=== FC 1004: DL_Einsprung  [STL] ===
INTERFACE:
  Input:
    Bereich_DL : Int                                    // Nur für Stammdaten =1!
    ID : Int
  Output:
    Dyn.DB : Int
    AR_Start : DInt
    Error : Bool
  InOut:
  Temp:
  Constant:
  Return:
    Ret_Val : Void

--- NW 1: Inittialisierung ---
      L      0
      T      "Dyn.DB"
      L      DINT#0
      T      AR_Start
      SET
      S      Error


--- NW 2: ID suchen ---
      L      ID
      T      "MW200"

CALL FC "DatenOut" (SSDB:=Bereich_DL, SSDW:=0, PARA:=16#0000, SEARCHDATEN:=P#M200.0, RE_VAL:="MB199", OUTDATEN:=P#M220.0, Position:="MW196")   // Eintrag lesen

      L      "MB199"
      L      2#1111111                                       // Bit 7 ausblenden
      AW
      L      0                                               // Fehler vorhanden?
      <>I                                                    // Ja
      =      Error
      BEC


--- NW 3: Daten übergeben ---
      L      "MW224"
      T      "Dyn.DB"                                        // Dyn.DB
      L      0                                               // sinnvoller Wert ?
      <=I                                                    // Nein !
      S      Error
      BEC

      L      "MW226"
      ITD
      T      AR_Start


--- NW 4: Ende ---
      BE

