5.21 SCHNITTSTELLE ABARBEITUNG SHOPPING-LIST

Diese Call-Schnittstelle dient dazu, einen nicht ausreichenden Lager-
bestand aus einem Fremdlager (beliebiges anderes Lager) auszugleichen.
Wenn die Funktion in der Markenpflege aktiviert wurde und bei der
Erfassung einer E-Position der Lagerstand unter 0 gebucht wurde, dann
wird beim Druck eines Materialscheines die Teilenummer in die Shop-
ping-List aufgenommen (Datei ESL) und ein Programm *LIBL/KBSHOPLIST
aufgerufen. Dieses muss folgende Parameter haben:
SCHNITTSTELLE KBSHOPLIST - ABARBEITUNG SHOPPING-LIST
INPUT:
SHOPL-BETRIEB BETRIEBSNUMMER
SHOPL-ETS-KEY TEILENUMMER
OUTPUT: *NONE
1 SHOPL-BETRIEB PIC S9(3) COMP-3.
1 SHOPL-FAK PIC S9(6) COMP-3.
Damit kann das Programm KBSHOPLIST feststellen, welche Sätze aus der
Datei ESL zu verarbeiten sind. Das Programm muss die Sätze anschließend
aus der Datei ESL löschen.

5.21.1 AUFBAU DER DATEI ESL

01 ESL-SATZ-1.
05 ESL-XKEY.
07 ESLBETRIEB PIC 9(3) DISPLAY.
*Betriebsnummer
07 ESLFAK PIC 9(6) DISPLAY.
*Auftragsnummer
07 ESLFAO PIC 9(4) DISPLAY.
*Positionsnummer in Auftrag
05 ESL-INHALT.
07 ESLETSKEY PIC X(20).
*Ersatzteilnummer
07 ESLMAR PIC X(2).
*Marke des Ersatzteiles
07 ESLETSMNG PIC S9(7)V9(2) COMP-3.
*Positionsmenge
07 ESLDATUM PIC 9(8) COMP-3.
*Tagesdatum
07 ESLAUFART PIC X(1).
*Auftragsart
07 ESLFILLER PIC X(30).