// Block Name (Original): TestLAD
// Block Number: 2
// Original Language: LAD

FUNCTION_BLOCK "TestLAD"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1

VAR_RETURN
  Ret_Val : Void;
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 "gBlenderCIPMode" AND "gIN_CIP_CIPRunning" AND "Procedure_Variables"."Blender_Run"."Running" AND NOT "gIN_HVP301_Aux") OR ("gSyrupRoomEn" AND "Procedure_Variables"."FTP302Line_Preparation"."Done" AND NOT "gIN_HVP301_Aux" AND NOT "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_FastChangeOverEnabled" AND NOT "Procedure_Variables"."Syr_RunOut"."Done");

  // 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;
  "gHVM302_Open" := "mHVM302_Dly".Q;

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

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

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

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

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

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

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

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

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

  "mResetProductTotTmr"(IN := "mResetTotalizerTmr" OR "gProductMFMResetTot", PT := S5T#2S); // TODO: Declarar "mResetProductTotTmr" : TP;
  "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;
  IF "T_Pulse_Recipe_Edit" AND "T_Pulse_Recipe_Edit".Q 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