From mboxrd@z Thu Jan  1 00:00:00 1970
X-Msuck: nntp://news.gmane.io/gmane.comp.tex.context/30682
Path: news.gmane.org!not-for-mail
From: Bernd Militzer <bernd@militzer.net>
Newsgroups: gmane.comp.tex.context
Subject: TABLEproblem
Date: Thu, 07 Sep 2006 07:58:02 +0200
Message-ID: <44FFB4EA.4060801@militzer.net>
Reply-To: mailing list for ConTeXt users <ntg-context@ntg.nl>
NNTP-Posting-Host: main.gmane.org
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="------------030200080700090003000704"
X-Trace: sea.gmane.org 1157608699 30300 80.91.229.2 (7 Sep 2006 05:58:19 GMT)
X-Complaints-To: usenet@sea.gmane.org
NNTP-Posting-Date: Thu, 7 Sep 2006 05:58:19 +0000 (UTC)
Original-X-From: ntg-context-bounces@ntg.nl Thu Sep 07 07:58:17 2006
Return-path: <ntg-context-bounces@ntg.nl>
Envelope-to: gctc-ntg-context-518@m.gmane.org
Original-Received: from ronja.vet.uu.nl ([131.211.172.88] helo=ronja.ntg.nl)
	by ciao.gmane.org with esmtp (Exim 4.43)
	id 1GLCtx-0008MA-SS
	for gctc-ntg-context-518@m.gmane.org; Thu, 07 Sep 2006 07:58:14 +0200
Original-Received: from localhost (localhost [127.0.0.1])
	by ronja.ntg.nl (Postfix) with ESMTP id 6F49E1FE57;
	Thu,  7 Sep 2006 07:58:13 +0200 (CEST)
Original-Received: from ronja.ntg.nl ([127.0.0.1])
 by localhost (smtp.ntg.nl [127.0.0.1]) (amavisd-new, port 10024) with LMTP
 id 07955-04-3; Thu,  7 Sep 2006 07:58:08 +0200 (CEST)
Original-Received: from ronja.vet.uu.nl (localhost [127.0.0.1])
	by ronja.ntg.nl (Postfix) with ESMTP id 27DBC1FE35;
	Thu,  7 Sep 2006 07:58:08 +0200 (CEST)
Original-Received: from localhost (localhost [127.0.0.1])
	by ronja.ntg.nl (Postfix) with ESMTP id 559581FE35
	for <ntg-context@ntg.nl>; Thu,  7 Sep 2006 07:58:06 +0200 (CEST)
Original-Received: from ronja.ntg.nl ([127.0.0.1])
	by localhost (smtp.ntg.nl [127.0.0.1]) (amavisd-new,
	port 10024) with LMTP id 07955-04-2 for <ntg-context@ntg.nl>;
	Thu,  7 Sep 2006 07:58:02 +0200 (CEST)
Original-Received: from new.militzer.net (new.militzer.net [81.169.143.226])
	by ronja.ntg.nl (Postfix) with SMTP id C51511FE2F
	for <ntg-context@ntg.nl>; Thu,  7 Sep 2006 07:58:01 +0200 (CEST)
Original-Received: from localhost (localhost [127.0.0.1])
	by new.militzer.net (Postfix) with ESMTP id 62B491840B1
	for <ntg-context@ntg.nl>; Thu,  7 Sep 2006 07:58:01 +0200 (CEST)
Original-Received: from new.militzer.net ([127.0.0.1])
	by localhost (new [127.0.0.1]) (amavisd-new, port 10024) with ESMTP
	id 07245-09 for <ntg-context@ntg.nl>;
	Thu, 7 Sep 2006 07:57:57 +0200 (CEST)
Original-Received: from [192.168.192.153] (pD9E633D9.dip.t-dialin.net [217.230.51.217])
	by new.militzer.net (Postfix) with ESMTP id ABC2C1840B0
	for <ntg-context@ntg.nl>; Thu,  7 Sep 2006 07:57:56 +0200 (CEST)
User-Agent: Thunderbird 1.5.0.5 (Macintosh/20060719)
Original-To: mailing list for ConTeXt users <ntg-context@ntg.nl>
X-Virus-Scanned: by amavisd-new-20030616-p10 (Debian) at new.militzer.net
X-Virus-Scanned: amavisd-new at ntg.nl
X-BeenThere: ntg-context@ntg.nl
X-Mailman-Version: 2.1.7
Precedence: list
List-Id: mailing list for ConTeXt users <ntg-context.ntg.nl>
List-Unsubscribe: <http://www.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ntg.nl?subject=unsubscribe>
List-Archive: <http://www.ntg.nl/pipermail/ntg-context>
List-Post: <mailto:ntg-context@ntg.nl>
List-Help: <mailto:ntg-context-request@ntg.nl?subject=help>
List-Subscribe: <http://www.ntg.nl/mailman/listinfo/ntg-context>,
	<mailto:ntg-context-request@ntg.nl?subject=subscribe>
Original-Sender: ntg-context-bounces@ntg.nl
Errors-To: ntg-context-bounces@ntg.nl
X-Virus-Scanned: amavisd-new at ntg.nl
Xref: news.gmane.org gmane.comp.tex.context:30682
Archived-At: <http://permalink.gmane.org/gmane.comp.tex.context/30682>

This is a multi-part message in MIME format.
--------------030200080700090003000704
Content-Type: text/plain; charset=ISO-8859-15; format=flowed
Content-Transfer-Encoding: 7bit

Hi all,

after I installed ConTeXt (TeXExec | version 6.2.0 - 1997-2006 - PRAGMA 
ADE/POD) om my MacMini my family-project does not compile any more.
With version 5.2.4 -1967-2005 (linux resp. PowerBook) I have no problems.

systems         : begin file TestFile at line 731
<TestFile-PID0134-A.tmp>
(/usr/local/teTeX/share/texmf.local/tex/context/base/pdfr-ec.tex)
section         : 1 \getPID {134}
(./TestFile-PID0134-A.tmp
Underfull \vbox (badness 10000) detected at line 12
references      : unknown reference [][PID135dat]
references      : unknown reference [][PID67dat]
references      : unknown reference [][PID268dat]
references      : unknown reference [][PID269dat]
references      : unknown reference [][PID134adat]
! Misplaced \noalign.
\TABLEnoalign ->\noalign
                         \bgroup \let \noalign \relax \let \next =
\insertTABLEtail ->\TABLEnoalign
                                 {\global \settrue \preventTABLEbreak 
\globa...

\stoptables ...erepeattail \else \insertTABLEtail
                                                  \fi \finishTABLE 
\egroup \...

\StopPersDatTab ->\stoptables
                              \stop
l.25 \StopPersDatTab
                    
?

I have no idea what to do.
every hint is welcome.
Thanks for help.

Bernd

--------------030200080700090003000704
Content-Type: application/x-tex; x-mac-type="0"; x-mac-creator="0";
	name="TestFile.tex"
Content-Disposition: inline;
 filename="TestFile.tex"
Content-Transfer-Encoding: quoted-printable

%#ConTeXt
%
% Stand: 2006-09-06
%
%
    \enableregime[windows]         =20
    \mainlanguage[de]              =20
    \setupencoding[default=3Dtexnansi]
%
    \setuppapersize[a4][a4]
%
	\startencoding[default]
	\definecharacter nmacron {\buildtextaccent\textmacron n}
	\definecharacter mmacron {\buildtextaccent\textmacron m}
	\stopencoding
%
%
% -------- Macros aus: envFamMiUrkunden.tex
%
	\def\gebR{{\bf Geburtsregister~}}
	\def\heiR{{\bf Heiratsregister~}}
	\def\totR{{\bf Sterberegister~}}
%
%
    \global\def\refPers{\futurelet\testchar\MitOptArgrefPers}
    %
    \def\MitOptArgrefPers{\ifx[\testchar%
     \let\next\OptArgrefPers \else %
     \let\next \NoOptArgrefPers \fi \next}
    %
=09
   %
    \def\OptArgrefPers[#1]#2{%
	   \ifnum\number #1=3D0{vgl.        \about[#2] s.S. \at[#2]}\fi
	   \ifnum\number #1=3D1{Partner von \about[#2] s.S. \at[#2]}\fi
       \ifnum\number #1=3D2{Vater von   \about[#2] s.S. \at[#2]}\fi
	   \ifnum\number #1=3D3{Mutter von  \about[#2] s.S. \at[#2]}\fi
	   \ifnum\number #1=3D4{Bruder von   \about[#2] s.S. \at[#2]}\fi
	   \ifnum\number #1=3D5{Schwester von  \about[#2] s.S. \at[#2]}\fi
   }=09
    %
    \def\NoOptArgrefPers#1{%
		\about[#1] s.S. \at[#1]
%		\myRef{#1}
    }
%
%
% Zur TeX-"Datenbank"
%
% Hilfe von:  Mojca Miklavec, Peter M=FCnster, Hans Hagen, Taco Hoekwater=
, Aditya Mahajan
%
%
% Aufbau der DB und Macros f=FCr den Zugriff auf die Datens=E4tze und -fe=
lder.
%
%
   \def\PID{\dodoubleempty\doPID}
   \def\doPID[#1][#2]{\getparameters[PID#1][#2]}
  =20
   \def\doGetPID#1#2{\getvalue{PID#2#1}}
%
%	Familienname, Vorname (#)
   \def\getPID#1{\doGetPID{Fam}{#1}, \doGetPID{Vor}{#1}~(#1)}
   \def\titPID#1{{\it\doGetPID{Fam}{#1}, \doGetPID{Vor}{#1}~(#1)}}
%
%	Vornamen Familiennamen
   \def\getNamen#1{\doGetPID{Vor}{#1}~\doGetPID{Fam}{#1}}
   \def\titNamen#1{{\it\doGetPID{Vor}{#1}~\doGetPID{Fam}{#1}}}
%
%	Vornamen Familiennamen (#)
   \def\getNameN#1{\doGetPID{Vor}{#1}~\doGetPID{Fam}{#1}~(#1)}
   \def\titNameN#1{{\it\doGetPID{Vor}{#1}~\doGetPID{Fam}{#1}~(#1)}}
%
%
% =20
%	Vereinfachung f=FCr =DCberschriften
   \def\getPIDGeb#1{\doGetPID{Fam}{#1}, \doGetPID{Vor}{#1}~(#1) -- Geburt=
}
   \def\getPIDHei#1{\doGetPID{Fam}{#1}, \doGetPID{Vor}{#1}~(#1) -- Heirat=
}
   \def\getPIDTod#1{\doGetPID{Fam}{#1}, \doGetPID{Vor}{#1}~(#1) -- Tod}
%
%	Einzeldaten
   \def\getFamilie#1{\doGetPID{Fam}{#1}}	% Familiennamen
   \def\titFamilie#1{{\it\doGetPID{Fam}{#1}}}
   \def\getExakt#1{\doGetPID{Nam}{#1}}		% Geburtsname (exakte Schreibweis=
e)
   \def\titExakt#1{{\it\doGetPID{Nam}{#1}}}
   \def\getVor#1{\doGetPID{Vor}{#1}}		% Vorname(n)
   \def\titVor#1{{\it\doGetPID{Vor}{#1}}}
   \def\getRuf#1{\doGetPID{Ruf}{#1}}		% Rufnamen
   \def\titRuf#1{{\it\doGetPID{Ruf}{#1}}}
% =20
   \def\getGeburt#1{\doGetPID{Geb}{#1}}		% Geburtsdatum
   \def\getGebOrt#1{\doGetPID{GebOrt}{#1}}	% Geburtsort
   \def\getGebZeit#1{\doGetPID{GebZeit}{#1}}% Geburtszeit
   \def\getKonf#1{\doGetPID{Konf}{#1}}		% Konfession
   \def\getTaufe#1{\doGetPID{Tau}{#1}}		% Taufdatum
   \def\getTauOrt#1{\doGetPID{TauOrt}{#1}}	% Taufort
   \def\getPateA#1{\doGetPID{Pate1}{#1}}	% 1. Taufpate
   \def\getPateB#1{\doGetPID{Pate2}{#1}}	% 2. Taufpate
   \def\getPateC#1{\doGetPID{Pate3}{#1}}	% 3. Taufpate
   \def\getKonfi#1{\doGetPID{Konfi}{#1}}	% Datum der Konfirmation
   \def\getKonfiOrt#1{\doGetPID{KonfiOrt}{#1}}	% Ort der Konfirmation
   \def\getKommu#1{\doGetPID{Kommu}{#1}}		% Datum der Kommunion
   \def\getKommuOrt#1{\doGetPID{KommuOrt}{#1}}	% Ort der Kommunion

   \def\getHeirat#1{\doGetPID{Hei}{#1}}			% kirchliche Heirat
   \def\getHeiratOrt#1{\doGetPID{HeiOrt}{#1}}	% Ort der kirchlichen Heira=
t
   \def\getAmt#1{\doGetPID{Amt}{#1}}		% standesamtliche Heirat
   \def\getAmtOrt#1{\doGetPID{AmtOrt}{#1}}	% Ort der standesamtlichen Hei=
rat
   \def\getTod#1{\doGetPID{Tod}{#1}}		% Sterbedatum
   \def\getTodOrt#1{\doGetPID{TodOrt}{#1}}	% Sterbeort
   \def\getTodZeit#1{\doGetPID{TodZeit}{#1}}% Sterbezeit
   \def\getAlter#1{\doGetPID{Alt}{#1}}		% Alter bei Tod
   \def\getUrsache#1{\doGetPID{Urs}{#1}}	% Ursache des Todes
   \def\getGrab#1{\doGetPID{Grab}{#1}}		% Datum des Begr=E4bnisses
   \def\getGrabOrt#1{\doGetPID{GrabOrt}{#1}}% Ort des Begr=E4bnisses
   \def\getBeruf#1{\doGetPID{Ber}{#1}}		% Beruf
   \def\getZusatz#1{\doGetPID{Zus}{#1}}		% Zusatzinformation=20
%
	\def\UrkGebKi#1{\doGetPID{UGebKi}{#1}}	% Geburtsurkunde Kirche
	\def\UrkGebAmt#1{\doGetPID{UGebAmt}{#1}}% Geburtsurkunde Standesamt
	\def\UrkTaufe#1{\doGetPID{UTaufe}{#1}}	% Taufurkunde Kirche
	\def\UrkKonfi#1{\doGetPID{UKonfi}{#1}}	% Konfirmationsurkunde
	\def\UrkKommu#1{\doGetPID{UKommu}{#1}}	% Kommunionsurkunde
	\def\UrkHeiKi#1{\doGetPID{UHeiKi}{#1}}	% Heiratsurkunde Kirche
	\def\UrkHeiAmt#1{\doGetPID{UHeiAmt}{#1}}% Heiratsurkunde Standesamt
	\def\UrkTodKi#1{\doGetPID{UTodKi}{#1}}	% Sterbeurkunde Kirche
	\def\UrkTodAmt#1{\doGetPID{UTodAmt}{#1}}% Sterbeurkunde Standesamt
%
	\def\Scheidung#1{\doGetPID{Scheidung}{#1}}		% Scheidung vom 1. LebensPar=
tner
%
	\def\Partner#1{\doGetPID{Partner}{#1}}		% 1. LebensPartner
	\def\PartnerB#1{\doGetPID{Partner2}{#1}}	% 2. LebensPartner
	\def\PartnerC#1{\doGetPID{Partner3}{#1}}	% 3. LebensPartner
%
	\def\Kinder#1{\doGetPID{Kinder}{#1}}	% Zahl der Kinder
	\def\KindA#1{\doGetPID{Kind1}{#1}}		% 1. Kinder
	\def\KindB#1{\doGetPID{Kind2}{#1}}		% 2. Kinder
	\def\KindC#1{\doGetPID{Kind3}{#1}}		% 3. Kinder
	\def\KindD#1{\doGetPID{Kind4}{#1}}		% 4. Kinder
	\def\KindE#1{\doGetPID{Kind5}{#1}}		% 5. Kinder
%
	\def\Vater#1{\doGetPID{Vater}{#1}}		% Vater
	\def\Mutter#1{\doGetPID{Mutter}{#1}}	% Mutter
%
	\def\Geschw#1{\doGetPID{Geschw}{#1}}	% Zahl der Geschwister
	\def\GeschwA#1{\doGetPID{Geschw1}{#1}}	% 1. Bruder/Schwester
	\def\GeschwB#1{\doGetPID{Geschw2}{#1}}	% 1. Bruder/Schwester
	\def\GeschwC#1{\doGetPID{Geschw3}{#1}}	% 1. Bruder/Schwester
	\def\GeschwD#1{\doGetPID{Geschw4}{#1}}	% 1. Bruder/Schwester
	\def\GeschwE#1{\doGetPID{Geschw5}{#1}}	% 1. Bruder/Schwester
%
% Ende der Spezialmacros =20
%
% Macros f=FCr die tabellarische Ausgabe=20
%
% Start / Stop der Tabelle
%
\def\StartPersDatTab{%
\start=20
%\SetTableToWidth{\textwidth}
\starttables[|lw(10mm)a{:}|lp(0.8\textwidth)|]
}
%
\def\StopPersDatTab{\stoptables\stop}
%
%
% Der FamilienNamen in der Tabelle
% Grunds=E4tzlich hat jede Person einen Familiennamen, gepr=FCft wird,
% ob eine andere Schreibweise vorliegt, die, wenn definiert, in=20
% in Klammern ausgegeben wird.
%
\def\FamNamenInTab#1#2{%
	\NC {\bf Name}\NC {\tfa\doGetPID{Fam}{#1}}%
	\doifdefined{PID#1Nam}%
	{~({\it\doGetPID{Nam}{#1}})}%
	% wenn 2. Parameter definiert wird, gebe den Familiennamen nach Heirat a=
us
	% gilt i.d.R. f=FCr die Frauen
	% z.Z. kann zwischen dem 1. und 2. Partner gew=E4hlt werden
	\doifelsenothing{#2}{}
	{
	\ifnum\number #2=3D1{~~~~~verh. {\tfa\it\doGetPID{Fam}{\doGetPID{Partner=
}{#1}}}}\fi
	\ifnum\number #2=3D2{~~~~~verh. {\it\doGetPID{Fam}{\doGetPID{Partner#2}{=
#1}}}}\fi
% 	~~~~~verh. {\it\doGetPID{Fam}{\doGetPID{Partner}{#1}}}
	}
\NC\AR
}
%
%
% Die Vorname(n) in der Tabelle
% werden grunds=E4tzlich ausgegeben.
%
\def\VorNamenInTab#1#2{\NC Vorname(n)\NC  \doGetPID{Vor}{#1}\NC\AR}
%
%
% Der Rufnamen in der Tabelle
% wird nur dann ausgegeben, wenn definiert!
%
\def\RufNamenInTab#1#2{%
	\doifdefined{PID#1Ruf}%
	{\NC Rufname   \NC  \doGetPID{Ruf}{#1}\NC\AR}
}
%
%
% Die Zusatzinformation in der Tabelle
% wird nur dann ausgegeben, wenn definiert!
%
\def\ZusatzInTab#1#2{%
	\doifdefined{PID#1Zus}%
{\NC{\bf  Zusatz} \NC \doGetPID{Zus}{#1}\NC\AR}
}
%
%
% Geburtsinformationen in der Tabelle
%
\def\GeburtInTab#1#2{%
%
% pr=FCfe, ob eine Standesamtsurkunde vorliegt, wenn nein, dann pr=FCfe, =
ob eine
% Kirchenurkunde angegeben ist. Wenn keine Urkunde dann: "keine Urkunde"
\NC {\bf Geburt}\NC=20
\doifdefinedelse{PID#1UGebAmt}{\doGetPID{UGebAmt}{#1}}
{\doifdefinedelse{PID#1UGebKi}{\doGetPID{UGebKi}{#1}}
{{\it keine Urkunde}}
}
\NC\AR=20
%
%
% wenn Geburtsdatum nicht definiert, dann Hinweis auf das Taufdatum
% wenn Geburtsdatum definiert und leer, dann Ausgabe: "unbekannt"
%
\NC Datum\NC
\doifdefinedelse{PID#1Geb}
{\doifelsenothing{\doGetPID{Geb}{#1}}{unbekannt}{\doGetPID{Geb}{#1}}}
{k.A. -- siehe Taufe}
\NC\AR
%
% % wenn Geburtsort definiert wird er gunds=E4tzlich augegeben
% %
% \doifdefined{PID#1GebOrt}{\NC Ort\NC  \doGetPID{GebOrt}{#1} \NC\AR}
%
% nur wenn das Geburtsdatum definiert ist, wird zun=E4chst gepr=FCft,
% 1. ob der Geburtsort vorliegt
% 2. ob eine Geburtszeit vorliegt
\doifdefined{PID#1Geb}
{\NC Ort\NC=20
\doifdefinedelse{PID#1GebOrt}{\doGetPID{GebOrt}{#1}}{?}
\NC\AR
%
\NC Zeit\NC=20
\doifdefinedelse{PID#1GebZeit}{ \doGetPID{GebZeit}{#1} } {k.A.}
\NC\AR }
%
}
%
% Die Konfession
% sollte grunds=E4tzlich definiert sein
%
\def\KonfessionInTab#1#2{\NC Konfession\NC \doGetPID{Konf}{#1} \NC\AR}
%
%
% alles =FCber die Taufe
\def\TaufeInTab#1#2{
%
% wenn Taufdatum nicht definiert, gebe aus: k.A.
%
\doifundefinedelse{PID#1Tau}
{\NC {\bf Taufe}\NC k.A. \NC\AR}
{
%
%  1. Taufurkunde oder die kirchl. Geburtsurkunde
% p=FCfe zun=E4chst, ob eine Taufurkunde vorliegt, wenn nein, pr=FCfe,
% ob eine Geburtsurkunde der Kirche vorliegt, sonst: keine Urkunden
%
\NC {\bf Taufe}\NC=20
\doifdefinedelse{PID#1UTaufe}{\doGetPID{UTaufe}{#1}}
{\doifdefinedelse{PID#1UGebKi}{\doGetPID{UGebKi}{#1}}{{\it keine Urkunde}=
} }
\NC\AR
%
%
% 2. Datum, wenn leer, dann ?
\NC Datum\NC \doifelsenothing{\doGetPID{Tau}{#1}}{unbekannt}{\doGetPID{Ta=
u}{#1}}\NC\AR
% 3. Ort, wenn leer, dann ?
\NC Ort  \NC \doifelsenothing{\doGetPID{TauOrt}{#1}}{?}{\doGetPID{TauOrt}=
{#1}}\NC\AR
% 4. Die Paten z.Z. bis drei
\doifdefined{PID#1Pate1}{\NC Pate\NC  \doGetPID{Pate1}{#1}\NC\AR}
\doifdefined{PID#1Pate2}{\NC Pate\NC  \doGetPID{Pate2}{#1}\NC\AR}
\doifdefined{PID#1Pate3}{\NC Pate\NC  \doGetPID{Pate3}{#1}\NC\AR}
}
}
%
%
% zur Konfirmation
\def\KonfirmationInTab#1#2{
\doifdefined{PID#1Konfi}{
%
\NC {\bf Konfirmation}\NC  \doGetPID{UKonfi}{#1} \NC\AR   % \UrkKonfi{\Pe=
rs}
%
\NC Datum\NC \doGetPID{Konfi}{#1} \NC\AR
%
\NC Ort\NC  \doGetPID{KonfiOrt}{#1} \NC\AR
%
}
}
%
%
%
% zur Kommunion
\def\KommunionInTab#1#2{
\doifdefined{PID#1Kommu}{
%
\NC {\bf Kommunion}\NC  \doGetPID{UKommu}{#1} \NC\AR   % \UrkKonfi{\Pers}
%
\NC Datum\NC \doGetPID{Kommu}{#1} \NC\AR
%
\NC Ort\NC  \doGetPID{KommuOrt}{#1} \NC\AR
%
}
}
%
%
% Heirat Kirche
\def\HeiratKircheInTab#1#2{
\doifdefinedelse{PID#1Hei}{
\NC {\bf Heirat} Kirche \NC
\doifdefinedelse{PID#1UHeiKi} {\doGetPID{UHeiKi}{#1}} {{\it keine Urkunde=
}}
\NC\AR
%
% \doifelsenothing{\doGetPID{Tau}{#1}}{unbekannt}{\doGetPID{Tau}{#1}}
\NC Datum\NC=20
%%\doGetPID{Hei}{#1}=20
\doifelsenothing{\doGetPID{Hei}{#1}}{unbekannt}{\doGetPID{Hei}{#1}}
\NC\AR
\NC Ort\NC=20
%%\doGetPID{HeiOrt}{#1}=20
\doifelsenothing{\doGetPID{HeiOrt}{#1}}{?}{\doGetPID{HeiOrt}{#1}}
\NC\AR}
{\doifundefined{PID#1Amt}{\NC {\bf Heirat} \NC {\it unverheiratet} \NC\AR=
}
}
}
%
%
% Heirat Standesamt
\def\HeiratAmtInTab#1#2{
\doifdefined{PID#1Amt}{
\NC {\bf Heirat} Standesamt\NC
\doifdefinedelse{PID#1UHeiAmt} {\doGetPID{UHeiAmt}{#1}} {{\it keine Urkun=
de}}
\NC\AR
%
\NC Datum \NC=20
%%\doGetPID{Amt}{#1}   =20
\doifelsenothing{\doGetPID{Amt}{#1}}{unbekannt}{\doGetPID{Amt}{#1}}
\NC\AR
\NC Ort   \NC=20
%%\doGetPID{AmtOrt}{#1}=20
\doifelsenothing{\doGetPID{AmtOrt}{#1}}{?}{\doGetPID{AmtOrt}{#1}}
\NC\AR}
}
%
%
% der erste Lebenspartner
\def\PartnerInTab#1#2{
\doifdefined{PID#1Partner}{
\NC=20
\doifdefinedelse{PID#1Partner2}{Partner 1}{Partner}
\NC=20
\doifelsenothing{#2}{\refPers{PID\doGetPID{Partner}{#1}dat}}
{
\ifnum\number #2=3D0{NN (\doGetPID{Partner}{#1})}\fi
\ifnum\number #2=3D1{\getPID{\doGetPID{Partner}{#1}}}\fi
}
\NC\AR}
}
%
%
% Scheidung vom 1. Partner
% wenn definiert Scheidung
% suche zun=E4chst nach dem Beleg (UScheidung)
% gebe dann das Datum aus (Scheidung)
\def\ScheidungInTab#1#2{
	\doifdefined{PID#1Scheidung}{
	\NC {\bf Scheidung} \NC =20
	\doifdefinedelse{PID#1UScheidung} {\doGetPID{UScheidung}{#1}} {{\it kein=
e Urkunde}}
	\NC\AR
	%
	\NC Datum \NC \doGetPID{Scheidung}{#1} \NC\AR
	}
}
%
%
% die weiteren Lebenspartner
\def\DiePartnerInTab#1#2{
\doifdefined{PID#1Partner2}{
\NC Partner 2
\NC
\doifelsenothing{#2}{\refPers{PID\doGetPID{Partner2}{#1}dat}}
{
\ifnum\number #2=3D0{NN (\doGetPID{Partner2}{#1})}\fi

\ifnum\number #2=3D1{\getPID{\doGetPID{Partner2}{#1}}}\fi
}
\NC\AR}
\doifdefined{PID#1Partner3}{
\NC Partner 3
\NC
\doifelsenothing{#2}{\refPers{PID\doGetPID{Partner3}{#1}dat}}
{
\ifnum\number #2=3D0{NN (\doGetPID{Partner3}{#1})}\fi

\ifnum\number #2=3D1{\getPID{\doGetPID{Partner3}{#1}}}\fi
}
\NC\AR}
}
%
%
% Die Sterbedaten
% gebe Sterbedaten nur dann aus, wenn Person verstorben,=20
% d.h. Sterbedatum ist definiert -- entweder Datum oder leer f=FCr unbeka=
nnt
%
\def\SterbeDatenInTab#1#2{
	%=20
	\doifdefined{PID#1Tod}{
	\NC {\bf Tod}\NC
	% pr=FCfe, ob Standesamtsurkunde, wenn nein pr=FCfe ob Kirchenurkunde,
	% wenn nein, dann: "keine Urkunde"
	\doifdefinedelse{PID#1UTodAmt}{\doGetPID{UTodAmt}{#1}}
	{\doifdefinedelse{PID#1UTodKi}{\doGetPID{UTodKi}{#1}}
	{{\it keine Urkunde}}
	}
	\NC\AR=20
	%
	\NC Datum \NC
	% wenn definiert und leer: unbekannt, sonst Sterbedatum
	\doifelsenothing{\doGetPID{Tod}{#1}}{unbekannt}{\doGetPID{Tod}{#1}}
	\NC\AR=20
	%
	\NC Ort \NC
	% wenn nicht definiert Ausgabe "?"
	\doifdefinedelse{PID#1TodOrt}{\doGetPID{TodOrt}{#1}}{?}
	\NC\AR=20
	%
	\NC Zeit \NC
	% wenn definiert Ausgabe: Sterbezeit, sonst "k.A."
	\doifdefinedelse{PID#1TodZeit}{\doGetPID{TodZeit}{#1}}{k.A.}
	\NC\AR
	%
	\NC Alter\NC
	% wenn definiert und nicht leer Ausgabe: Alter
	% wenn nicht definiert oder leer Ausgabe: "?"
	\doifdefinedelse{PID#1Alt}
	{\doifelsenothing{\doGetPID{Alt}{#1}}{?}{\doGetPID{Alt}{#1}}}
	{?}
	%
	\NC\AR
	%
	\NC Ursache \NC
	% wenn definiert und nicht leer Ausgabe: Ursache
	% wenn definiert und leer Ausgabe: ?
	% wenn nicht definiert Ausgabe: "k.A."
	\doifdefinedelse{PID#1Urs}
	{\doifelsenothing{\doGetPID{Urs}{#1}}{?}{\doGetPID{Urs}{#1}}}
	{k.A.}
	\NC\AR
	%
	}
}
%
%
%
% die Beerdigung
% Daten werden nur dann ausgegeben, wenn Person auch verstorben ist
%
\def\GrabInTab#1#2{
	\doifdefined{PID#1Tod}{
	\NC {\bf begraben}\NC
	% pr=FCfe, ob Kirchenurkunde vorliegt.
	% wenn ja und nicht leer dann gebe Kirchendokument an
	% wenn ja und leer Ausgabe: "?"
	% wenn nein, dann Ausgabe: "keine Urkunde"
	\doifdefinedelse{PID#1UTodKi}
		{\doifelsenothing{\doGetPID{UTodKi}{#1}}{?}{\doGetPID{UTodKi}{#1}}}=20
		{{\it keine Urkunde}}
	\NC\AR=09
	%
	\NC Datum\NC=20
	\doifdefinedelse{PID#1Grab}
		{\doifelsenothing{\doGetPID{Grab}{#1}}{unbekannt}{\doGetPID{Grab}{#1}}}=
 {unbekannt}
	\NC\AR
	%
	\NC Ort  \NC
	\doifdefinedelse{PID#1GrabOrt}
		{\doifelsenothing{\doGetPID{GrabOrt}{#1}}{?}{\doGetPID{GrabOrt}{#1}}} {=
?}
	\NC\AR
	%=09
	}
}
%
%
%
% der Beruf
\def\BerufInTab#1#2{
	\NC {\bf Beruf}\NC=20
	\doifdefinedelse{PID#1Ber}
		{\doifelsenothing{\doGetPID{Ber}{#1}}{k.A.}{\doGetPID{Ber}{#1}}} {k.A.}
	\NC\AR=09
}
%
%
% die Kinder
\def\KinderInTab#1#2{
	\NC {\bf Kinder}\NC=20
	\doifdefinedelse{PID#1Kinder}
		{\doifelsenothing{\doGetPID{Kinder}{#1}}{?}{\doGetPID{Kinder}{#1}}} {ke=
ine}
	\NC\AR
	%
	% und nun die Kinder 1 bis 5 in einzelnen Schritten
	%
	\doifdefined{PID#1Kind1}{
	\NC 1 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Kind1}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Kind1}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Kind1}{#1}}}\fi
	}
	\NC\AR}
	%
	\doifdefined{PID#1Kind2}{
	\NC 2 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Kind2}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Kind2}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Kind2}{#1}}}\fi
	}
	\NC\AR}
	%
	\doifdefined{PID#1Kind3}{
	\NC 3 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Kind3}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Kind3}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Kind3}{#1}}}\fi
	}
	\NC\AR}
	%
	\doifdefined{PID#1Kind4}{
	\NC 4 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Kind4}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Kind4}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Kind4}{#1}}}\fi
	}
	\NC\AR}
	%
	\doifdefined{PID#1Kind5}{
	\NC 1 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Kind5}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Kind5}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Kind5}{#1}}}\fi
	}
	\NC\AR}
	%
}
%
% der Vater
\def\VaterInTab#1#2{
	\NC {\bf Vater}\NC=20
	\doifdefinedelse{PID#1Vater}
		{\doifelsenothing{\doGetPID{Vater}{#1}}{NN}
			{
				\doifelsenothing{#2}{\refPers{PID\doGetPID{Vater}{#1}dat}}
				{
				\ifnum\number #2=3D0{NN (\doGetPID{Vater}{#1})}\fi
				\ifnum\number #2=3D1{\getPID{\doGetPID{Vater}{#1}}}\fi
				}
			}
		}=20
		{NN}
	\NC\AR
}
%
%
% die Mutter
\def\MutterInTab#1#2{
	\NC {\bf Mutter}\NC=20
	\doifdefinedelse{PID#1Mutter}
		{\doifelsenothing{\doGetPID{Mutter}{#1}}{NN}
			{
				\doifelsenothing{#2}{\refPers{PID\doGetPID{Mutter}{#1}dat}}
				{
				\ifnum\number #2=3D0{NN (\doGetPID{Mutter}{#1})}\fi
				\ifnum\number #2=3D1{\getPID{\doGetPID{Mutter}{#1}}}\fi
				}
			}
		}=20
		{NN}
	\NC\AR
}
%
%
%
% die Geschwister
\def\GeschwisterInTab#1#2{
	\NC {\bf Geschwister}\NC=20
	\doifdefinedelse{PID#1Geschw}
		{\doifelsenothing{\doGetPID{Geschw}{#1}}{?}{\doGetPID{Geschw}{#1}}} {ke=
ine}
	\NC\AR
	%
	%
	% und nun die Geschwister 1 bis 5 in einzelnen Schritten
	%
	\doifdefined{PID#1Geschw1}{
	\NC 1 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Geschw1}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Geschw1}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Geschw1}{#1}}}\fi
	}
	\NC\AR}
	%
	%
	\doifdefined{PID#1Geschw2}{
	\NC 2 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Geschw2}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Geschw2}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Geschw2}{#1}}}\fi
	}
	\NC\AR}
	%
	%
	\doifdefined{PID#1Geschw3}{
	\NC 3 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Geschw3}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Geschw3}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Geschw3}{#1}}}\fi
	}
	\NC\AR}
	%
	%
	\doifdefined{PID#1Geschw4}{
	\NC 4 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Geschw4}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Geschw4}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Geschw4}{#1}}}\fi
	}
	\NC\AR}
	%
	%
	\doifdefined{PID#1Geschw5}{
	\NC 5 \NC
	\doifelsenothing{#2}{\refPers{PID\doGetPID{Geschw5}{#1}dat}}
	{
	\ifnum\number #2=3D0{NN (\doGetPID{Geschw5}{#1})}\fi

	\ifnum\number #2=3D1{\getPID{\doGetPID{Geschw5}{#1}}}\fi
	}
	\NC\AR}
	%
}
%
% -----------Datens=E4tze aus MilitzerConTeXtDB.tex
%
 \PID[134]
	[Fam=3DRudolph,
	Nam=3DR\u{u}dolph,
	Vor=3DJohann Heinrich,
% 	Ruf=3D,
%
	Geb=3D5. Dezember 1771,
	GebOrt=3DOberkoskau (Oberm=FChle),
	GebZeit=3D2.00\,Uhr (nachts um 2 Uhr),
%
	Konf=3Dev-luth,
	Tau=3D8. Dezember 1771,
	TauOrt=3DUnterkoskau,
	Pate1=3DJohann Heinrich Heyner\textcomma\ Ha\u{u}swirth und Einwohner z\=
u{u} Oberkoskau,
	Pate2=3DJoh. Georg Pitschern\textcomma\ Ha\u{u}swirth \u{u}nd Einwohner =
allhier,
	Pate3=3DMgr. Elisabeth \dots\textcomma\ Joh. Nicol \dots\textcomma\=20
		des B\u{u}klischm=FCllers Eheweib,
%
	Hei=3D13. Mai 1794,
	HeiOrt=3DUnterkoskau,
	Partner=3D135,
% 	Partner2=3D,
%
	Tod=3D18. Juni 1818,
	TodOrt=3DOberkoskau,
	TodZeit=3D5.00\,Uhr (fr=FCh um 5 Uhr),
	Alt=3D46 Jahre\textcomma\ 6 Monate\textcomma\ 1 Woche\textcomma\ 5 Tage,
	Urs=3Dk.A.,
	Grab=3D20. Juni 1818,
	GrabOrt=3DUnterkoskau,
%
	Ber=3DM=FCller -- Besitzer der Oberm=FChle,
% 	Zus=3D,
%
	Geschw=3D1?,
	Geschw1=3D134a,
% 	Geschw2=3D,
% 	Geschw3=3D,
%  	Geschw4=3D,
% 	Geschw5=3D,
%
	Kinder=3D1,
	Kind1=3D67,
% 	Kind2=3D,
% 	Kind3=3D,
% 	Kind4=3D,
%  	Kind5=3D,
%
	Vater=3D268,
	Mutter=3D269,
%
	UGebKi=3D\gebR 1771 Pfarramt Unterkoskau S. 196 Nr. 13,
	UHeiKi=3D\heiR 1794 Pfarramt Unterkoskau S. 98,
	UTodKi=3D\totR 1818 Pfarramt Unterkoskau Nr. 5
	]
%=20
%

%
\starttext
% %
% \completecontent[alternative=3Dc]
% \page
% -------------
%
% Allgemeine Informationen ist eigentlich: DBDokPID0134.tex
%
\startbuffer[PID0134-A]
%
\def\Pers{134}
%
%
\StartPersDatTab
\FamNamenInTab{\Pers}{}
\VorNamenInTab{\Pers}{}
\RufNamenInTab{\Pers}{}
\ZusatzInTab{\Pers}{}
\GeburtInTab{\Pers}{}
\KonfessionInTab{\Pers}{}
\TaufeInTab{\Pers}{}
% \KonfirmationInTab{\Pers}{}
\HeiratKircheInTab{\Pers}{}
% \HeiratAmtInTab{\Pers}{}
\PartnerInTab{\Pers}{}
%\DiePartnerInTab{\Pers}{}
\SterbeDatenInTab{\Pers}{}
\GrabInTab{\Pers}{}
\BerufInTab{\Pers}{}
\KinderInTab{\Pers}{}
\VaterInTab{\Pers}{}
\MutterInTab{\Pers}{}
\GeschwisterInTab{\Pers}{}
\StopPersDatTab
%
\stopbuffer
%
% --- >  Start
%
%
\section[PID134dat]{\getPID{134}}=20
%
\getbuffer[PID0134-A]

% \placetable
% 	[left,force]
% 	{none}
% 	{\externalfigure[PID0134-A.tmp][height=3D0.9\textheight]} %
%
%
\stoptext
% ENDE

--------------030200080700090003000704
Content-Type: text/plain; charset="us-ascii"
MIME-Version: 1.0
Content-Transfer-Encoding: 7bit
Content-Disposition: inline

_______________________________________________
ntg-context mailing list
ntg-context@ntg.nl
http://www.ntg.nl/mailman/listinfo/ntg-context

--------------030200080700090003000704--