$CONTROL LINES=62 << 9401061294 cp [ Kresl im SKOPF ] >> << 9601210497 cp [ Kresl im Skopf fuer Flachglas ] >> << Version: 9702190697 ph [ Jahrtausendwende: Z2000 ] >> BEGIN DATA BASE SWDB; << TEXT IN "SWTX" >> << COPYRIGHT O.C.S. GmbH (1991 - 2001) >> << All rights reserved. >> PASSWORDS: 1 CHEF; ITEMS: ABLAGE, X30; ABRECHTEXT, 2X30; AMTKZ, X12; ANSPRUCHST, X12; BELEG, S; BETEILDATUM, L; BETEILIGUNG, I; BLZ, L; BREGRESS, I; BUCHUNGSART, I; BUTEXT, X20; DIREKTION, I; FKUNDE, L; FRANCI, L; GEBUEHR, L; IHRERECH, X10; IHREZEICHEN, X10; KASSA, I; KEY, L; KONTONR, X12; KONTROLLE, X18; KRESL, L; KRESX, X10; KUNDE, S; KURS, L; LAND, I; LAND0, I; LWTTEXT, 5X20; MELDEDATUM, L; MELDENR, I; NAME, 3X30; ORT, X30; PLZ, X10; POLICE, X20; POLICENART, I; POSTBEZIRK, I; QUITTUNG, I; REFERNR, X20; REGRESS, I; REGULIERUNG, I; RESERVE, L; RESL, L; RESX, X10; RUECKSTUFUNG, I; SCHADEN, X10; SCHADENART, I; SCHADENTAG, L; SCHIFF, X60; SPARTE, I; SPESEN, L; STATBETRAG, 4L; STATSCHL1, I; STATSCHL2, I; STATSCHL3, I; STATSCHL4, I; STRASSE, X30; STXTNR, X22; SUANSP, X2; SUMREGRESSE, L; SUMZAHL, L; TERMIN, L; TEXT, X78; TRANSPMITTEL, I; UNSERZEICHEN, X10; VERJAER, L; VERLAENG, L; VERSICHERER, L; VIA, I; VRSCHADEN, X20; WAEHRUNG, I; WARENART, I; ZAHLBETRAG, 2L; ZAHLDATUM, L; ZAHLTEXT, 2X30; ZAHLWEG, I; ZERTIFNR, X20; $PAGE SETS: NAME: ASCHADEN,A(0/0); ENTRY:SCHADEN(4); << X10 Schadens-Nr. >> CAPACITY:501; << CAP: ASCHADEN >> NAME: AKEY,A(0/0); ENTRY:KEY(2); << L Gesellschaft,Kunde >> CAPACITY:201; << CAP: AKEY >> NAME: APOLIC,A(0/0); ENTRY:POLICE(1); << X20 Policen-Nr. >> CAPACITY:101; << CAP: APOLICE >> NAME: ANSPRUCHST,A(0/0); ENTRY:ANSPRUCHST(2); << X12 Anspruchsteller + Schadens-Nr. >> CAPACITY:201; << CAP: ANSPRUCHST >> NAME: AVRSCHADEN,A(0/0); ENTRY:VRSCHADEN(1); << X20 Versicherer-Schaden-Nr. >> CAPACITY:101; << CAP: AVRSCHADEN >> NAME: ASCHIFF,A(0/0); ENTRY:SCHIFF(1); << X60 Schiff >> CAPACITY:101; << CAP: ASCHIFF >> NAME: AREFERNR,A(0/0); ENTRY:REFERNR(1); << X20 Referenz-Nr. >> CAPACITY:101; << CAP: AREFERNR >> NAME: AZERTIFNR,A(0/0); ENTRY:ZERTIFNR(1); << X20 Zertifikats-Nr. >> CAPACITY:101; << CAP: AZERTIFNR >> NAME: AKUNDE,A(0/0); ENTRY:KUNDE(1); << S Kunden-Nr. >> CAPACITY:101; << CAP: AKUNDE >> NAME: SKOPF,D(0/0); ENTRY:SCHADEN(ASCHADEN), << X10 Schadens-Nr. >> VRSCHADEN(AVRSCHADEN), << X20 Schadens-Nr. bei der Gesellschaft >> VERSICHERER(AKEY), << L Gesellschafts-Nr. >> POLICE(APOLIC), << X20 Policen-Nr. >> FKUNDE(AKEY), << L Firmen-Kunden-Nr. >> KUNDE(AKUNDE), << S Kunden-Nr. >> SCHADENTAG, << L Schadensdatum >> MELDEDATUM, << L Datum Schadensmeldung >> TERMIN, << L Termin >> BETEILDATUM, << L Datum der gueltigen Beteiligung >> BETEILIGUNG, << I n1 Beteiligungskennzeichen >> << 0 = keine Beteiligung >> << 1 = Abrechnung mit Fuehrender VU >> << 2 = Abrechnung mit den Beteiligten VU >> << Beteiligungsart wie in Police >> ABRECHTEXT, << 2X30 Text (erscheint auf Transportabrechnung) >> RESERVE, << L Vorausichtliche Schadenshoehe >> REGRESS, << I n1 1 = Regressanspruch besteht >> SUMZAHL, << L Summe der Zahlungen >> SUMREGRESSE, << L Summe der Regresszahlungen >> MELDENR, << I n4 Melde-Nr. >> SCHADENART, << I n2 Schadensart Tabelle 490000 >> WARENART, << I n2 Warenart Tabelle 500000 >> LAND, << I n3 Land Tabelle 470000 >> TRANSPMITTEL, << I n2 Transportmittel Tabelle 480000 >> RUECKSTUFUNG, << I n1 1 = Police wird Rueckgestuft >> SPARTE, << I n4 Sparte >> REGULIERUNG, << I 1 = Reguliert >> POLICENART, << I Kfz/Sach/Transport usw. >> KRESL, << L Anschrift fuer Homann fuer Rahmen-Police >> << Regressforderung fuer Flachglas >> KRESX, << X10 Reserve >> KONTROLLE, << X18 8X DATE$ 8X TIME$ 2X SB >> SCHIFF(ASCHIFF), << X60 Schiffsname >> FRANCI, << L Franchise >> AMTKZ, << X12 Amtliches Kennzeichen >> REFERNR(AREFERNR),<< X20 Referenz-Nr. >> VIA, << I Via Land >> LAND0, << I Abreiseland >> VERJAER, << L Verjaehrung des Schadens am >> VERLAENG, << L VerlÌngerung >> LWTTEXT; << 5X20 Text fÏr: 1. Warenart >> << 2. Transportmittel >> << 3. Abreiseland >> << 4. via Land >> << 5. Ankunftsland >> CAPACITY:101; << CAP: SKOPF >> NAME: ANSPRUCH,D(0/0); ENTRY:SCHADEN(ASCHADEN), << X10 Schadensnr. >> ANSPRUCHST(ANSPRUCHST), << X12 Anspruchsteller & Schaden >> NAME, << 3X30 Namen >> STRASSE, << X30 Strasse >> PLZ, << X10 PLZ >> ORT, << X30 Ort >> POSTBEZIRK, << I (vormals fuer Postbezirk) >> BLZ, << L n8 Bankleitzahl >> KONTONR, << X12 Konto-Nr. bei der Bank >> KONTROLLE; << X18 8X DATE$ 8X TIME$ 2X SB >> CAPACITY:101; << CAP: ANSPRUCH >> NAME: SBEWEG,D(0/0); ENTRY:SCHADEN(ASCHADEN), << X10 Schadens-Nr. >> ANSPRUCHST, << X12 Anspruchsteller & Schaden >> BUCHUNGSART, << I 0 = nicht zu buchen >> << 1 = Zahlung >> << 2 = Regress >> << 3 = gebucht >> ZAHLWEG, << I >> ZAHLBETRAG, << 2L Bezahlter Betrag 1=Waehrung 2=DM >> WAEHRUNG, << I Waehrung Tabelle KZ+ 460000 >> ZAHLDATUM, << L Zahlungsdatum >> BUTEXT, << X20 Buchungstext in FIBU >> BELEG, << S n6 Beleg-Nr (automatisch aus NUMMER) >> SPESEN, << L Bankspesen >> GEBUEHR, << L Verwaltungsbeguehr >> KURS, << L Kurs >> IHREZEICHEN, << X10 Ihre Zeichen >> UNSERZEICHEN, << X10 Unsere Zeichen >> IHRERECH, << X10 Ihre Rechnungs-Nr. >> KASSA, << I Kassa: kommt nicht auf VR-Abrechnung >> QUITTUNG, << I 0 = zu drucken >> << 1 = gedruckt >> << 2 = nicht zu drucken >> RESL, << L >> RESX, << X10 Stelle 5-10 = Uebertragungs-Nr. >> KONTROLLE, << X18 >> DIREKTION, << I 1 = nur Statistik >> BREGRESS, << I 1 = Regressbewegung >> ZAHLTEXT, << 2X30 Text fuer Zahlungstraeger >> ZERTIFNR(AZERTIFNR);<< X20 Zertifikats-Nr. >> CAPACITY:101; << CAP: SBEWEG >> NAME: STEXT,M(0/0); ENTRY:STXTNR(0), << X22 Schadens-Nr. + Zeilen-Nr. >> << oder Belegnummer + Zeilennummer >> TEXT; << X78 Textzeile >> CAPACITY:1000; << CAP: STEXT >> NAME: AANSP,A(0/0); ENTRY:SUANSP(1); << X2 Matchcode aus Ablagename (Anspruchst.) >> CAPACITY:1000; << CAP: AANSP >> NAME: ANSP,D(0/0); ENTRY:SUANSP(AANSP), << X2 Machtcode aus Ablagename (Anspruchst.) >> SCHADEN(ASCHADEN), << X10 Schaden-Nr. >> ABLAGE, << X30 Ablagename >> ANSPRUCHST(ANSPRUCHST); << X12 Anspruchsteller >> CAPACITY:1000; << CAP: ANSP >> NAME: STATISTIK,M(0/0); ENTRY:SCHADEN(0), << X10 Schadennummer >> ORT, << X30 Risiko-Ort >> STATBETRAG, << 4L 1. Ersatzforderung >> << 2. Verwertung >> << 3. Entschaedigung >> << 4. Notverkauf >> STATSCHL1, << I 1 = Regie >> << 2 = C+C >> << 3 = KOOP-KFL >> STATSCHL2, << I 1 = Tiefkuehltruhe >> << 2 = Tiefkuehlraum >> << 3 = Kaltraum >> << 4 = Sonstige >> STATSCHL3, << I 1 = Kompressorausfall >> << 2 = undichte Leitung >> << 3 = Sicherung durchgebrannt >> << 4 = Schaltuhr-Ausfall >> << 5 = Ventilator-Ausfall >> << 6 = Verdampfer vereist >> << 7 = Stromausfall Anlage >> << 8 = Stromausfall Kabel >> << 9 = Ursache ungewiss >> STATSCHL4, << I frei >> RESL, << L frei >> RESX; << X10 frei >> CAPACITY:1000; << CAP: STATISTIK >> $PAGE END.