=== FC 1182: VP_Draussen_FC  [STL] ===
INTERFACE:
  Input:
  Output:
  InOut:
  Temp:
  Constant:
  Return:
    Ret_Val : Void

--- NW 1: Rückmeldung ---
      SET                                                    // Rückmeldungen erst mal resetten
      R      "M180.6"                                        // Weiterfahrt von Ziel-FC erlaubt


--- NW 2: Schleuse 3121 (Sorter VP_A von KontrollPlatz): Ausgefahren ? ---
      L      "MW190"
      L      3121                                            // Aufruf von Schleuse 3121 ?
      <>I                                                    // Nein!
      JC     X3121E

      L      "MD182"                                         // ShopGroup

      L      "DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_IDX

CALL FC "Reservierung_in_Puffer_eintragen" (TrolleyID:="DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_IDX, Ziel:="DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_DEST_Ziel, ShopGroup:="MD182", Gesamt_Trolley_DL:=1000)

// Daten in Sep 3121 löschen:
      L      DINT#0
      T      "DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_IDX // IDX
      L      0
      T      "DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_DEST_Ziel

// Bei Partner (Schleuse 3123) wieder mit Schritt 0 beginnen (erneuter Ziel-FC-Aufruf)
      L      0
      T      "DVP_OmniFahren".Schleuse_3123.Dyn.Sk.Akt_Schritt

      L      DINT#0
      T      "DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_IDX // IDX
      L      0
      T      "DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_DEST_Ziel

      BEU

X3121E: NOP 0


--- NW 3: Schleuse 3123 (Sorter VP_A von RückführStrecke): Ausgefahren ? ---
      L      "MW190"
      L      3123                                            // Aufruf von Schleuse 3123 ?
      <>I                                                    // Nein!
      JC     X3123E

      SET
// /      R     "M83.1"

      L      "MD182"                                         // ShopGroup
      L      "DVP_OmniFahren".Schleuse_3123.Dyn.Trolley_ShopGroup // Shop-Gruppe

CALL FC "Reservierung_in_Puffer_eintragen" (TrolleyID:="DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_IDX, Ziel:="DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_DEST_Ziel, ShopGroup:="MD182", Gesamt_Trolley_DL:=1000)

// Daten in Sep 3123 löschen:
      L      DINT#0
      T      "DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_IDX // IDX
      L      0
      T      "DVP_Sorter_A".Sorter_MB3123.Dyn.Scanner.Rec_DEST_Ziel

// Bei Partner (Schleuse 3121) wieder mit Schritt 0 beginnen (erneuter Ziel-FC-Aufruf)
      L      0
      T      "DVP_OmniFahren".Schleuse_3121.Dyn.Sk.Akt_Schritt

      L      DINT#0
      T      "DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_IDX // IDX
      L      0
      T      "DVP_Sorter_A".Sorter_MB3121.Dyn.Scanner.Rec_DEST_Ziel

      BEU

X3123E: NOP 0


--- NW 4: Ende ---
      BE

