5.12 SCHNITTSTELLE GARANTIEANTRÄGE

Mit der Datei X81 können Garantieanträge markenneutral abgestellt
werden.
Nähere Angaben zu dieser Funktion siehe im Kapitel 'Datenaustausch II'.

5.12.1 AUFBAU DER DATEI X81

Die Datei X81 ist eine sequentielle Datei mit Satzlänge 128. Es folgt
eine Definition der einzelnen Feldern, entsprechend der COBOL-Norm:
0015 *
0016 FD X81
0017 LABEL RECORD IS STANDARD.
0018 *
0019 01 X81-SATZ-1.
0020 * ***** KOPFSATZ *****
0021 03 X81-SATZART PIC X.
0022 *:: P(0001)
0023 * SATZART = K
0024 03 X81-ANTR-NR PIC 9(6).
0025 *:: P(0002)
0026 * ANTRAGSNUMMER
0027 03 X81-BEGINN PIC 9(6).
0028 *:: P(0008)
0029 * BEGINNDATUM GARANTIE
0030 03 X81-NEHM-DATUM PIC 9(6).
0031 *:: P(0014)
0032 * ANNAHME-/REPARATURDATUM
0033 03 X81-KM PIC 9(7).
0034 *:: P(0020)
0035 * KM-LEISTUNG
0036 03 X81-ANTR-ART PIC X.
0037 *:: P(0027)
0038 * GARANTIE-ART
0039 03 X81-KDNR PIC X(15).
0040 *:: P(0028)
0041 * HÄNDLERNUMMER BEI IMPORTEUR
0042 03 X81-FGST PIC X(20).
0043 *:: P(0043)
0044 * FAHRGESTELLNUMMER
0045 03 X81-MOTOR PIC X(20).
0046 *:: P(0063)
0047 * MOTORNUMMER
0048 03 X81-FABRNR PIC X(10).
0049 *:: P(0083)
0050 * FABRIKATIONSNUMMER
0051 03 X81-TYPE PIC X(20).
0052 *:: P(0093)
0053 * FAHRZEUGTYPE
0054 03 X81-AUFNR PIC 9(6).
0055 *:: P(0113)
0056 * AUFTRAGSNUMMER
0057 03 FILLER PIC X(10).
0058 *:: P(0119)
0059 *
0060
0061 *
0062 01 X81-SATZ-2.
0063 * ***** AW-POSITION *****
0064 03 FILLER PIC X(7).
0065 *:: P(0001)
0066 * SATZART = A BZW. E
0067 * ANTRAGSNUMMER
0068 03 X81-EXTERN-NR PIC X(20).
0069 *:: P(0008)
0070 * EXTERNE AW-/ET-NUMMER
0071 03 X81-TEXT1 PIC X(30).
0072 *:: P(0028)
0073 * TEXT
0074 03 X81-KZ-WZ PIC X.
0075 *:: P(0058)
0076 * KENNZEICHEN W/Z BEI AW
0077 03 X81-MNG PIC S9(5)V99.
0078 *:: P(0059)
0079 * SUMME ANZAHL AW ODER AZ
0080 * BZW. MENGE BEI ET
0081 03 X81-ANTRAGS-PRS PIC S9(7)V99.
0082 *:: P(0066)
0083 * ANTRAGSPREIS BEI ET
0084 03 X81-VP PIC S9(7)V99.
0085 *:: P(0075)
0086 * ANSATZ BZW. EINZEL-VP
0087 03 X81-BRUTTO PIC S9(7)V99.
0088 *:: P(0084)
0089 * POSITIONSWERT BRUTTO
0090 03 X81-INTERN-PROZ PIC 999.
0091 *:: P(0093)
0092 * INTERN ÜBERNOMMEN IN %
0093 03 X81-NETTO PIC S9(7)V99.
0094 *:: P(0096)
0095 * POSITIONSWERT MINUS INTERN
0096 03 X81-MWS PIC 9.
0097 *:: P(0105)
0098 * MWST-CODE 0-8
0099 03 X81-SERIEN-NR PIC X(20).
0100 *:: P(0106)
0101 * SERIENNR. ALTTEIL BEI ET
0102 03 X81-SV PIC X.
0103 *:: P(0126)
0104 * KZ SCHADENSVERURSACHER
0105 * BEI ET
0106 * ' '= NEIN
0107 * '1'= JA
0108 03 X81-FREMD PIC X.
0109 *:: P(0127)
0110 * KENNZEICHEN FREMD-POSITION
0111 * ' '= NEIN
0112 * '1'= JA
0113 03 FILLER PIC X(1).
0114 *:: P(0128)
0115 *
0116
0117 *
0118 01 X81-SATZ-3.
0119 * ***** TE-POSITION *****
0120 03 FILLER PIC X(7).
0121 *:: P(0001)
0122 * SATZART = T
0123 * ANTRAGSNUMMER
0124 03 X81-TE-TEXT1 PIC X(30).
0125 *:: P(0008)
0126 03 X81-TE-TEXT2 PIC X(30).
0127 *:: P(0038)
0128 03 X81-TE-TEXT3 PIC X(30).
0129 *:: P(0068)
0130 * TEXT
0131 03 FILLER PIC X(31).
0132 *:: P(0098)
0133 /