$CONTROL LINES=62


<<         9301220293 ph  Lfd.Nr.  3  >>
<<VERSION: 9401260594 cp  Briefg erweitert um sb,erwin>>


BEGIN DATA BASE THXDB;

PASSWORDS:                        << Password definition >>

ITEMS:                            << Item definition >>
    ACTIV,               I;
    ART,                 I;
    AT-PAGE,             I;
    AUTHOR,              X20;
    BEZ,                 X30;
    BLOCK,               20I;
    BOTTOM-MARGIN,       I;
    BRIEFBESCH,          X40;
    BRIEFDAT,            X8;
    BRIEFN,              X8;
    CREATED-BY,          X4;
    DATE-CREATED,        I ;
    DATE-EDITED,         I ;
    DATUM,               S;
    DBNAME,              I;
    DESCRIPTION,         X40;
    DOCUMENT-ID,         X8;
    EINTRAG,             I;
    ERWIN,               X10;
    FILE-NR,             S;
    FIRNR,               I;
    FLAG,                I;
    FOOTLINE,            X80;
    FORTNUMMER,          S;
    HEADERFLAG,          X2;
    HEADLINE,            X80;
    KUNDE,               L;
    KZ,                  I;
    LEFT-MARGIN,         I;
    LINES-PER-PAGE,      I;
    NR,                  I;
    PAGE-NUMBER,         I;
    RESI,                I;
    RESS,                S;
    RIGHT-JUSTIFY,       X2;
    RIGHT-MARGIN,        I;
    SB,                  I;
    SCHADEN,             X10;
    SDATUM,              L;
    SETNUMMER,           I;
    TAB-STOPS,        16 I;
    TDATUM,              L;
    TOP-MARGIN,          I;
    TTEXT,               3X30;
    XINT,                7I;
    XSHORT,              3S;
    USERNR,              I;
    VERARBEITUNG,        I;
    VERMITTLER,          L;
    VERSICHERER,         L;
    VSNR,                X20;

SETS:                             << Set definition >>

NAME:  INDEX,M(0/0);
ENTRY: DOCUMENT-ID (2),
       DATE-CREATED,
       DATE-EDITED,
       DESCRIPTION,
       AUTHOR,
       CREATED-BY,
       LEFT-MARGIN,
       RIGHT-MARGIN,
       TOP-MARGIN,
       BOTTOM-MARGIN,
       LINES-PER-PAGE,
       RIGHT-JUSTIFY,
       TAB-STOPS,
       PAGE-NUMBER,
       AT-PAGE,
       FILE-NR,
       HEADERFLAG,
       EINTRAG,
       FIRNR,
       FLAG,
       RESS,
       RESI;
CAPACITY: 503;

NAME:  VERWALTUNG,M(0/0);
ENTRY: SETNUMMER (0),       << 1 = Textnummer  (@.....)      >>
       FORTNUMMER;          << 2 = Briefnummer (b.....)      >>
CAPACITY: 5;

NAME:  HEADER,D(0/0);
ENTRY: DOCUMENT-ID (INDEX),
       HEADLINE,
       FLAG;
CAPACITY: 300;

NAME:  TRAILER,D(0/0);
ENTRY: DOCUMENT-ID (INDEX),
       FOOTLINE,
       FLAG;
CAPACITY: 300;

NAME:  VARIABLE,M(0/0);
ENTRY: NR(0),
       ACTIV,
       BEZ,
       DBNAME,
       XINT,
       XSHORT;
CAPACITY: 501;

NAME:  ART,A(0/0);
ENTRY: ART(1);
CAPACITY:101;

NAME:  BRIEFART,D(0/0);
ENTRY: ART(ART),          << siehe Tabelle 61               >>
       DOCUMENT-ID;
CAPACITY:101;

NAME:  AKUNDE,A(0/0);
ENTRY: KUNDE(5);
CAPACITY: 101;

NAME:  APOLICE,A (0/0);
ENTRY: VSNR(3);
CAPACITY: 101;

NAME:  RASTER,D (0/0);
ENTRY: VSNR(APOLICE),
       KUNDE(AKUNDE),
       VERARBEITUNG,
       DOCUMENT-ID,
       BLOCK,
       RESS,
       RESI;
CAPACITY: 101;

NAME:  BRIEFE,D(0/0);
ENTRY: VSNR(APOLICE),
       KUNDE(AKUNDE),
       DOCUMENT-ID,
       DATUM,
       KZ,                   << 0=Serienbrief  1=manueller Brief     >>
       USERNR,
       RESS,
       RESI;
CAPACITY: 101;

NAME:  SNUMM,A(0/0);
ENTRY: SCHADEN(1);
CAPACITY: 503;

NAME:  ABRIEF,A(0/0);
ENTRY: BRIEFN(2);
CAPACITY: 503;

NAME:  BRIEFG,D(0/0);
ENTRY: KUNDE(AKUNDE),      <<L   Firma*10^6 + Kunden-Nummer          >> 
       VERSICHERER(AKUNDE),<<L   Firma*10^6 + Versicherer-Nr.        >> 
       VERMITTLER(AKUNDE), <<L   Firma*10^6 + Vermittler-Nr.         >> 
       TDATUM,             <<L   Termindatum                         >>
       VSNR(APOLICE),      <<X20 Policen-Nr.                         >>
       SCHADEN(SNUMM),     <<X10 Schaden-Nr.                         >>
       BRIEFDAT(ABRIEF),   <<X8  Brief-Dateiname ("b"+nnnnn)         >>
			   <<    nnnnn = VERWALTUNG - Nr. aus Setn.2 >>
       BRIEFN(ABRIEF),     <<X8  Briefname                           >>
       BRIEFBESCH,         <<X40 Briefbeschreibung                   >>
       TTEXT,              <<3X30 Textbeschreibung                   >>
       KZ,                 <<I   0=Serienbrief  1=manueller Brief    >>
       SDATUM,             <<L   geschrieben am                      >>
       SB,                 <<I   Sachbearbeiter                      >>
       ERWIN;              <<X10 reserve                             >>
CAPACITY: 503;

END.