=== FB 9001: Port1_Daten_empfangen  [STL] ===
INTERFACE:
  Input:
  Output:
  InOut:
  Static:
    Dyn : Struct                                        // Status
      RET_VAL_SaveFIFO_IN : Byte                        // Rückmeldung bei Fifo-Zugriff
      Error : Struct                                    // Störungen
        Save_FIFO_IN : Bool                             // Save-FIFO fehlerhaft
        Auswerte_FC : Bool                              // Kein Auswerte-FC angegeben
        Telegramm : Bool                                // Telegramm in Auswerte-FC nicht bekannt
        Empfangs_DB : Bool
        DL_Sep : Bool
        DL_Weiche : Bool
        Status : Word                                   // Status bei Fehlerfall
  Temp:
    Temp_NDR : Bool
    Temp_Error : Bool
  Constant:

--- NW 1: Neue Daten vorhanden? ---
// Telegramm-Kopf hat Kennung ?:
      L      "SS_Port1_EmpfangsDaten".Port1.TelegrammKennung[1]
      L      0                                               // Daten vorhanden?
      ==I                                                    // Nein !
      BEC


--- NW 2: Empfangene Daten speichern ---
CALL FC "FifoOut" (SSDB:=8001, SSDW:=0, PARA:=WORD#16#E100, OUTDATEN:=P#M200.0, RE_VAL:="MB199")   // da Ringspeicher nächster Eintrag lesen + austragen

CALL FC "FifoIn" (SSDB:=8001, SSDW:=0, PARA:=WORD#16#0000, INDATEN:=DB9001.DBX0.0, RE_VAL:="MB199")

      L      "MB199"
      T      Dyn.RET_VAL_SaveFIFO_IN

      JBI    en03                                            // Alles ok

      SET
      S      Dyn.Error.Save_FIFO_IN                          // Error bei FIFO-Zugriff

en03: NOP 0


--- NW 3: Auswerte-FC aufrufen ---
      UC     "Port1_Telegramme_auswerten"


--- NW 4: Empfangsdatenfeld wieder freigeben ---
CALL FC "DBMOV" (QuellDB:=8000, QuellDW:=0, ZielDB:=9001, ZielDW:=00, Anzahl_DW:=15, RE_VAL:="MW196")   // Empfangsfach leeren, da Telegramm verarbeitet


--- NW 5: Ende ---
      BE

