1.6.2 Beispiel 1
ERKENN.INF
*art datei kennung pis len val
* (egal) 1:diff <- wird bei 1 nicht beachtet!
* 2: == (muss ggf. mit einem Komma
* 3: != abgeschlossen werden!)
*
* Auftragskopf erstellen
1 1 1 1 *
* Positionszeile (K-Zeile) erstellen
200 3 1 1 *
Zugehörige Datei MOVE.INF
* Kopf bearbeiten ************************************************************
*Z I E L A N G A B E N Q U E L L A N G A B E N
*Block Datei Pos Lng Format Datei Pos Lng Sonderbehandlungen mit Parameter
* Kunde lesen
1 255 300 7 C7 0 75 17 204,KUNDE * hole Kunde aus Tabelle
1 41 F1 009 * Initialisieren
1 255 1 1 041,200 * -> weiter mit 200 *
* Positionen bearbeiten ******************************************************
*
* Initialisieren der Puffer
200 6 F1 009 * TSS Initialisieren
200 23 F1 009 * Dispo Init
...
Zugehörige Datei EDI.INF
...
6DAIMLERBE1 56317.11.0018:3717.11.0000:00DAI20170 DAI23000
6DAIMLERBE1 56318.11.0018:3718.11.0000:00DAI20170 DAI23000
7DAIMLERBE1 56319.11.0018:3719.11.0000:00DAI20170 DAI23000
7DAIMLERBE1 56320.11.0018:3720.11.0000:00DAI20170 DAI23000
...
Ablauf
Das Programm liest in ERKENN.INF die erste Zeile ("Auftragskopf erstellen"):
-
pis=1, len=1 besagt: Lies in EDI.INF die 1. Position mit der Länge 1 (= "6")
-
Kennung=1 besagt: Vergleiche, ob sich dieser Wert "6" im Vergleich zur Vorzeile geändert hat. Wenn dies zutrifft, also wahr ist (was hier in der 3. Zeile der Fall ist), dann beginne die Abarbeitung von MOVE.INF in der ersten vorkommenden Zeile mit Satzart art=1: "hole Kunde aus Tabelle ..."
Wenn dieser Vergleich nicht wahr ist (was in der 1., 2. und 4. Zeile der Fall ist), dann beginne die Abarbeitung von MOVE.INF in der ersten vorkommenden Zeile mit Blocknummer=200: " TSS Initialisieren..."