```pascal // Block Type: FC // Block Name (Original): GNS PLCdia MainRoutine // Block Number: 2410 // Original Network Languages: LAD // Block Comment: // (c) by SIDEL // Name : General Safety: PLC Diagnostic: Main Call // Description: // Function: General Safeties // Module : PLC Diagnostic // - Options Main Call // -------------------------------------------------------------------------------- FUNCTION "GNS_PLCdia_MainRoutine" : Void { S7_Optimized_Access := 'TRUE' } VERSION : 0.1 BEGIN // Network 1: Option: Profinet-IO Node Diagnostic (Original Language: LAD) IF "AUX FALSE" THEN GNS_PLCdia_Profinet(); END_IF; // Network 2: Option: Profibus DP Node Diagnostic (Original Language: LAD) GNS_PLCdia_Profibus(); // Network 3: PROFIBUS NETWORK FAULT (Original Language: LAD) "SFM Profibus" := "PNetF" OR "PBusF"; "HMI_Alarms"."Fault"."Alarm049" := "PNetF" OR "PBusF"; END_FUNCTION ```