67 lines
1.9 KiB
Plaintext
67 lines
1.9 KiB
Plaintext
// Block Name (Original): TestLAD
|
|
// Block Number: 2
|
|
// Original Language: LAD
|
|
|
|
FUNCTION_BLOCK "TestLAD"
|
|
{ S7_Optimized_Access := 'TRUE' }
|
|
VERSION : 0.1
|
|
|
|
VAR_INPUT
|
|
END_VAR
|
|
|
|
VAR_OUTPUT
|
|
END_VAR
|
|
|
|
VAR_IN_OUT
|
|
END_VAR
|
|
|
|
VAR_TEMP
|
|
All_Auto_RETVAL : Int;
|
|
Reset_SP_Word_RETVAL : Int;
|
|
mResetWaterTot : Bool;
|
|
mResetSyrupTot : Bool;
|
|
mResetCO2Tot : Bool;
|
|
mResetProductTot : Bool;
|
|
Block_Move_Err : Int;
|
|
END_VAR
|
|
|
|
BEGIN
|
|
|
|
// Network 1: Manual Syrup Drain Valve Open - Operator Alarm (Original Language: LAD)
|
|
|
|
"gHVP301_Open" := (("gSyrupRoomEn" AND (NOT "gIN_HVP301_Aux")) AND (NOT "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_FastChangeOverEnabled") AND "Procedure_Variables"."FTP302Line_Preparation"."Done") AND (NOT "Procedure_Variables"."Syr_RunOut"."Done") OR (((("gSyrupRoomEn" AND (NOT "gIN_HVP301_Aux")) AND "gBlenderCIPMode") AND "gIN_CIP_CIPRunning") AND "Procedure_Variables"."Blender_Run"."Running");
|
|
|
|
// Network 2: Manual Syrup Drain Valve Open - Operator Alarm (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 3: ResetTotalizer (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 4: ResetWaterTot (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 5: ResetCO2Tot (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 6: ResetProductTot (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 7: ResetCO2Tot (Original Language: LAD)
|
|
|
|
// Network did not produce printable SCL code.
|
|
|
|
// Network 8: Mod Copy Recipe (Original Language: LAD)
|
|
|
|
"mAux_FP_M700_1" := "HMI_Variables_Cmd"."Recipe"."Main_Page" AND (NOT "mFP_Recip_Main_Page");
|
|
"mFP_Recip_Main_Page" := "HMI_Variables_Cmd"."Recipe"."Main_Page";
|
|
IF "mAux_FP_M700_1" THEN
|
|
"HMI_Variables_Cmd"."Recipe"."Edit" := TRUE;
|
|
END_IF;
|
|
|
|
END_FUNCTION_BLOCK
|