// 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)

  "mHVM302_Dly"(IN := "gIN_HVM302_Aux", PT := S5T#1S); // TODO: Declarar "mHVM302_Dly" : TON; en VAR_STAT o VAR
  "gHVM302_Open" := "mHVM302_Dly".Q;

  // Network 3: ResetTotalizer (Original Language: LAD)

  "mResetTotalizerTmr"(IN := "gBlendResetTotalizer", PT := S5T#2S); // TODO: Declarar "mResetTotalizerTmr" : TP; en VAR_STAT o VAR

  // Network 4: ResetWaterTot (Original Language: LAD)

  "mResetFTN301TotTmr"(IN := "gFTN301_ResetTot" OR "mResetTotalizerTmr", PT := S5T#2S); // TODO: Declarar "mResetFTN301TotTmr" : TP; en VAR_STAT o VAR
  "mResetWaterTot" := "mResetFTN301TotTmr".Q;

  // Network 5: ResetCO2Tot (Original Language: LAD)

  "mResetFTP302TotTmr"(IN := "gFTP302_ResetTot" OR "mResetTotalizerTmr", PT := S5T#2S); // TODO: Declarar "mResetFTP302TotTmr" : TP; en VAR_STAT o VAR
  "mResetSyrupTot" := "mResetFTP302TotTmr".Q AND "gSyrupRoomEn";

  // Network 6: ResetProductTot (Original Language: LAD)

  "mResetFTM303TotTmr"(IN := "gFTM303_ResetTot" OR "mResetTotalizerTmr", PT := S5T#2S); // TODO: Declarar "mResetFTM303TotTmr" : TP; en VAR_STAT o VAR
  "mResetCO2Tot" := "mResetFTM303TotTmr".Q;

  // Network 7: ResetCO2Tot (Original Language: LAD)

  "mResetProductTotTmr"(IN := "gProductMFMResetTot" OR "mResetTotalizerTmr", PT := S5T#2S); // TODO: Declarar "mResetProductTotTmr" : TP; en VAR_STAT o VAR
  "mResetProductTot" := "mResetProductTotTmr".Q;

  // 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";
  "T_Pulse_Recipe_Edit"(IN := "HMI_Variables_Cmd"."Recipe"."Main_Page" AND "HMI_Variables_Cmd"."Recipe"."Edit", PT := S5T#500ms); // TODO: Declarar "T_Pulse_Recipe_Edit" : TP; en VAR_STAT o VAR
  IF "T_Pulse_Recipe_Edit".Q AND "T_Pulse_Recipe_Edit" THEN
    "HMI_Variables_Cmd"."Recipe"."Edit" := FALSE;
  END_IF;
  IF "mAux_FP_M700_1" THEN
    "HMI_Variables_Cmd"."Recipe"."Edit" := TRUE;
  END_IF;

END_FUNCTION_BLOCK