CALL  "SWR_ZYK" , DB5             // Call of FB 101 'SWR_ZYK' with instance DB
      DB_WORK_NO   :=DB1               // Work DB for SWR
      CALL_POSITION:=TRUE              // Call_Position = TRUE at begin of redundant program
      RETURN_VAL   :=MW6               // Block return value
      EXT_INFO     :=MW8               // Extended information
     A     DB5.DBX    9.1              // Check if station is Master
     JC    END
//redundant user program
     CALL  "AI1"
     CALL  "AO1"
END:  NOP   0
     CALL  "SWR_ZYK" , DB5             // Call of FB 101 'SWR_ZYK' with instance DB
      DB_WORK_NO   :=DB1               // Work DB for SWR
      CALL_POSITION:=FALSE             // Call_Position = FALSE at END of redundant program
      RETURN_VAL   :=MW10              // Block return value
      EXT_INFO     :=MW12              // Extended information