$CONTROL LINES=62 << Version: 9702061097 ph [ Jahrtausendwechsel: Z2000 ] >> BEGIN DATA BASE DDB; << TEXT IN "DTX" >> << COPYRIGHT O.C.S. GmbH (1991 - 2001) >> << All rights reserved. >> PASSWORDS: 1 CHEF; ITEMS: ABELAST, L; << 9,2 Belastung >> ABSZ, X4; << Branchenschluesselzahl + " " >> ABUCHDAT, L; << Buchungsdatum von Allianz >> ABUFF, X188; << Originalsatz Allianz-Inkasso >> AGUTSCHR, L; << 9,2 Gutschrift >> AINKBET, L; << von Gloe ermittelter Betrag >> ANLAGEDAT, L; << Datum der Einspielung >> FRECH, L; << Key Rechnungsnummer >> JOURREG, X2; << Kz. Journal und Registrierart>> KZABRECH, I; << 0 = nicht ausgeben, 1= ausgeb>> KZVERBUCHT, I; << Kz Band eingebucht >> POLICE, X20; SETS: NAME: APOL,A(0/0); ENTRY:POLICE(1); << X20 Policen-Nr. >> CAPACITY:2000; << CAP: APOL >> NAME:AINR,A(0/0); ENTRY:FRECH(1); << L Rechnungs-Nr. >> CAPACITY:2000; << CAP: AINR >> NAME:AINKASSO,D(0/0); ENTRY:POLICE(APOL), << X20 Policennummer >> FRECH(AINR), << L Inkasso-Nummer >> ABSZ, << X3 Branchenschluesselzahl >> ABUCHDAT, << L Buchungsdatum Allianz >> ABELAST, << L 9,2 Belastung >> AGUTSCHR, << L 9,2 Gutschrift >> JOURREG, << X2 1.St. Journal, 2.St. Registrierart >> KZABRECH, << I Bei 1 kann Allianz-Band ausgegeben werden>> ABUFF, << X188 Allianz Originalsatz >> ANLAGEDAT, << L Einspielungsdatum >> AINKBET, << L Betrag Gloe >> KZVERBUCHT; << I KZ Band eingebucht >> CAPACITY:2000; << CAP: AINKASSO >> END.