=== FC 57: Leerpuffer to Raus-Lager ermitteln  [STL] ===
INTERFACE:
  Input:
  Output:
    Puffer : Int                                        // Puffer ermitteln
  InOut:
  Temp:
    Puffer_ShopGroup : Int
    Position : Int
    Schleife : Int                                      // Loopzähler
    Puffer_Zähler : Int
    Puffer_DW : Int
    AR1Zeiger : DWord                                   // Statt AR1 (ging nur bis DB-Länge <= 8191 Bytes)
    AR1Start : DInt                                     // Startwert mit Offset 0
  Constant:
  Return:
    Ret_Val : Void

--- NW 1: Aktiver Puffer zum Ausfahren ---
      L      0
      T      Puffer


--- NW 2: Aktiven Puffer zum Auslagern suchen ? ---
CALL FC "DatenOut" (SSDB:=502, SSDW:=0, PARA:=16#F100, SEARCHDATEN:=P#M220.0, RE_VAL:="MB199", OUTDATEN:=P#M220.0, Position:=Position)   // DL Puffer Leerpuffer ausfahren | 1.Eintrag lesen

      AN     "M199.7"                                        // Eintrag vorhanden
      BEC

      L      "MW220"                                         // 1.AusfahrPuffer speichern
      T      Puffer


--- NW 3: Ende ---
      BE

