[NTG-context] Solution. Only one problem left ($ in file name)

28 Jun 2009

      The solution to my search (thanks Wolfgang for your help) is below. I  
have two overlays, one for the PDF and one for the rotated heading. I  
reset the heading's setups at every \typeSQLfile so the name gets  
changed. I just add both backgrounds (this is why I like ConTeXt,  
stuff like that (background=header becomes  
background={header,ifsqoverlay} just works.

What is left now is that the \expanded, \detokenize and stuff is still  
not able to typefile files with $ in their name. For files with _ in  
their name, it works  now. WIthout the expanded stuff in

\expanded{\typeSQLfile{\detokenize{Library-procedures/hlx$requery.pls}}}

the TeX job crashes because of the $ in the file name. WIth it it does  
not crash but I get

[fileLibrary-procedures/hlx$requery.pls does not exist]

WIth

\typeSQLfile{Library-procedures/hlx\$requery.pls}

it also does not crash, but I get

[fileLibrary-procedures/hlx\$requery.pls does not exist]

G

Solution so far:

\def\IfSQprojectname{Foo}
\definetyping[SQL][option=color,numbering=line,bodyfont=9pt]
\setuppapersize[A4,landscape][a4,landscape]
\setuptyping[SQL][palet=colorpretty]

\setuplayout
  [leftmargin=20mm,
   leftmargindistance=5mm,
   footer=0mm,
   header=0mm,
   rightmargin=0mm]

\definelayer[header][width=\paperwidth,height=\paperheight]
\defineoverlay[ifsqoverlay][\overlayfigure{IfSQ-overlay.pdf}]
\setupbackgrounds[page] 
[setups={header:margin},background={header,ifsqoverlay}]

\def\typeSQLfile#1{%
\startsetups header:margin
  \setlayerframed
    [header]
    [hoffset=\dimexpr\backspace-\leftmarginwidth-\leftmargindistance 
\relax,
     voffset=\dimexpr\topspace+\headerheight+\headerdistance\relax]
    [frame=off,
     orientation=90,
     width=\leftmarginwidth,
     height=\textheight,
     align={top,middle}]
    {\detokenize{#1}\hfil\pagenumber\hfil \IfSQprojectname, \date}
\stopsetups
\pagebreak\expanded{\typefile[SQL]{\detokenize{#1}}}}

\starttext
\typeSQLfile{Library-procedures/aanroep_kgcpros20.pls}
\typeSQLfile{Library-procedures/details.pls}
\expanded{\typeSQLfile{\detokenize{Library-procedures/hlx$requery.pls}}}
\stoptext

On 26 Jun 2009, at 10:47, Gerben Wierda wrote:
...
On 26 Jun 2009, at 10:05, Wolfgang Schuster wrote:
...
...
And while I'm at it, if I want a heading in the left margin as  
well, but I want it 90 degrees rotated, how do I do that?
\setuplayout
[leftmargin=1cm,
 leftmargindistance=5mm]
\startsetups header:margin
\framed
  [frame=off,
   orientation=90,
   width=\leftmarginwidth,
   height=\textheight,
   align={middle,middle}]
  {My document\hfil\pagenumber\hfil My name}
\stopsetups
\defineoverlay[header:margin][\setups{header:margin}]
\setupbackgrounds[text][leftmargin][background={header:margin}]
\starttext
...
\stoptext
Thanks. Almost there. I now have:
\definetyping[SQL][option=color,numbering=line,bodyfont=9pt]
\defineoverlay[ifsqoverlay][\overlayfigure{IfSQ-overlay.pdf}]
\setuppapersize[A4,landscape][a4,landscape]
\setupbackgrounds[page][background=ifsqoverlay]
\setuptyping[SQL][palet=colorpretty]
\def\typeSQLfile{\typefile[SQL]}
\setuplayout
[leftmargin=1cm,
 leftmargindistance=5mm,
 footer=0mm,
 header=0mm,
 rightmargin=0mm]
\startsetups header:margin
\framed
  [frame=off,
   orientation=90,
   width=2\leftmarginwidth,
   height=\textheight,
   align={top,middle}]
  {My document\hfil\pagenumber\hfil My name}
\stopsetups
\defineoverlay[header:margin][\setups{header:margin}]
\setupbackgrounds[text][leftmargin][background={header:margin}]
\starttext
\typeSQLfile{Library-procedures/details.pls}
%\typeSQLfile{Library-procedures/aanroep_kgcpros20.pls}
%\typeSQLfile{Library-procedures/details.pls}
%\typeSQLfile{Library-procedures/foo_print.pls}
%\typeSQLfile{Library-procedures/hlx$requery.pls}
%\typeSQLfile{Library-procedures/kgc$adm_meerling.pls}
%\typeSQLfile{Library-procedures/kgc$bereken.pls}
%\typeSQLfile{Library-procedures/kgc$datum.pls}
%\typeSQLfile{Library-procedures/kgc$item.pls}
%\typeSQLfile{Library-procedures/kgc$tab.pls}
%\typeSQLfile{Library-procedures/kgc$toon.pls}
%\typeSQLfile{Library-procedures/print_uitslagbrief.pls}
%\typeSQLfile{Library-procedures/qms$record.pls}
%\typeSQLfile{Library-procedures/voeruit_idef.pls}
%\typeSQLfile{Library-procedures/vul_onwy_list.pls}
%\typeSQLfile{Library-procedures/zoek_item.pls}
\stoptext
I do now have a rotated 'header' on the left side. And thanks to the  
larger width and the top aligment, the rotated 'heading' does not  
conflict with the line numbers.
But ... the page number is '1' on every page
And the I'd like to change the definition of the \typeSQLfile  
command such that it changes the document name in the rotated header  
too.
G
___________________________________________________________________________________
If your question is of interest to others as well, please add an  
entry to the Wiki!
maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : https://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________