Database....

[Willi Egger <w.egger@boede.nl>]

[-- Attachment #1: Type: text/plain, Size: 289 bytes --]

Hi Contexters

Is there anybody who has experionce with the database options as
described in core-dat?

I tried to setup an address-database. But I am unable to get it working.
I get an error message saying "missing \endcsname"

Please have a look at the enclosed testfiles.

Cheers Willi

[-- Attachment #2: database.tex --]
[-- Type: text/x-tex, Size: 1336 bytes --]

% Sample record

\def\DoWithRecord#1%
   {\startpacked
    \let\\=\quad
    name:  \getrecordentry{name}~\getrecordentry{family name}\par
    address: \getrecordentry{postal address}\par
    \stoppacked}

\definerecord[address][command=\DoWithRecord]
\setuprecord[address][command=\DoWithRecord]


\definerecordentry[address][Name]
\definerecordentry[address][Surname]
\definerecordentry[address][Foreletters]
\definerecordentry[address][Street]
\definerecordentry[address][StreetNumber]
\definerecordentry[address][Place]
\definerecordentry[address][PostalCode]
\definerecordentry[address][FunctionNL]
\definerecordentry[address][Function]
\definerecordentry[address][Phone]
\definerecordentry[address][Fax]
\definerecordentry[address][Email]


\startrecord{Hans}
\memberofgroup                  {board}
\setrecordentry{Name}           {Hans}
\setrecordentry{Surname}        {Hagen}
\setrecordentry{Foreletters}    {H.}
\setrecordentry{Street}         {Ridderstraat}
\setrecordentry{StreetNumber}   {27}
\setrecordentry{Place}          {Hasselt}
\setrecordentry{PostalCode}     {8061 GH}
\setrecordentry{FunctionNL}     {Voorzitter NTG}
\setrecordentry{Function}       {President NTG}
\setrecordentry{Phone}          {38-4775369}
\setrecordentry{Fax}            {38-4775374}
\setrecordentry{Email}          {pragma@wxs.nl}
\stoprecord

[-- Attachment #3: test.tex --]
[-- Type: text/x-tex, Size: 1460 bytes --]

% Footertexts
% Database
% W. Egger
% 3.07.2003

\setupoutput[pdftex]

%\input NTG-board-members

\processrecords[database.tex][Hans]

\def\FootItemHeaderI{Telefoon}
\def\FootItemHeaderII{Webstek}
\def\FootItemHeaderIII{}
\def\FootItemHeaderIV{e-mail}
\def\FootItemI{0485 573896}
\def\FootItemII{www.boede.nl}
\def\FootItemIII{}
\def\FootItemIV{w.egger@boede.nl}


\startbuffer[SetUpFooterText]
       \hbox to \textwidth{%
         \vbox{% Hans Hagen: needed either \hbox or \vbox; 04-05-2003\setupfootertexts[{\getbuffer[SetUpFooterText]}][]
             \starttabulate[|*{4}{lw(.25\textwidth)|}]
                \NC {\tfx \FootItemHeaderI}
                \NC {\tfx \FootItemHeaderII}
                \NC {\tfx \FootItemHeaderIII}
                \NC {\tfx \FootItemHeaderIV} \NC\NR
                \NC \switchtobodyfont[rm] \FootItemI
                \NC \switchtobodyfont[rm] \FootItemII
                \NC \switchtobodyfont[rm] \FootItemIII
                \NC \switchtobodyfont[rm] \FootItemIV \NC\NR
             \stoptabulate%
          }%
       }%
\stopbuffer

\setupfootertexts[{\getbuffer[SetUpFooterText]}]

\starttext

Some text

\startlines
\getrecordentry{Name}
\getrecordentry{Surame}
\getrecordentry{Foreletters}
\getrecordentry{Street}
\getrecordentry{StreetNumber}
\getrecordentry{Place}
\getrecordentry{PostalCode}
\getrecordentry{FunctionNL}
\getrecordentry{Function}
\getrecordentry{Phone}
\getrecordentry{Email}
\stoplines

\stoptext