Miguel
/
Obsidean_VM
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
Obsidean_VM/04-SIDEL/00 - MASTER/Source/source/ProcedureDeaireator_StartUp.md

4.4 KiB
Raw Blame History 

// Block Type: FB
// Block Name (Original): ProcedureDeaireator StartUp
// Block Number: 1803
// Original Network Languages: LAD

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

VAR_STAT
  mStepNum : Int;
  mTimeStep : Int;
  mTransition : Bool;
  mDeairStartUpONS : Bool;
END_VAR

BEGIN

  // Network 1: Qualifier (Original Language: LAD)

  "Procedure_Variables"."TN301_StartUp"."Qualifier" := ("gBlenderProdMode" AND "gBlenderRinseMode" AND "gBlenderSuppliesOk") OR ("gBlenderRinseMode" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_Deaireation" AND "gBlenderSuppliesOk");

  // Network 2: Reset (Original Language: LAD)

  "Procedure_Variables"."TN301_StartUp"."Reset" := "gBlenderCIPMode" OR ("gBlenderRinseMode" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_Deaireation");

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

  IF "Procedure_Variables"."TN301_StartUp"."Reset" THEN
    "mStepNum" := 0;
    "mTimeStep" := 0;
  END_IF;

  IF "Procedure_Variables"."TN301_StartUp"."Reset" THEN
    "Procedure_Variables"."TN301_StartUp"."Done" := FALSE;
  END_IF;

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

  // PBox SymPy processed, logic in consumer
  "mDeairStartUpONS" := "HMI_Variables_Cmd"."Commands_From_HMI"."CMD_TN301_StartUp" OR "Procedure_Variables"."Blender_Run"."Request"; // P_TRIG("HMI_Variables_Cmd"."Commands_From_HMI"."CMD_TN301_StartUp" OR "Procedure_Variables"."Blender_Run"."Request") - Mem: "mDeairStartUpONS"

  "Procedure_Variables"."TN301_StartUp"."Request" := ("HMI_Variables_Cmd"."Commands_From_HMI"."CMD_TN301_StartUp" AND "Procedure_Variables"."TN301_StartUp"."Qualifier" AND NOT "mDeairStartUpONS") OR ("Procedure_Variables"."Blender_Run"."Request" AND "Procedure_Variables"."TN301_StartUp"."Qualifier" AND NOT "mDeairStartUpONS");

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

  "Procedure_Variables"."TN301_StartUp"."Wait" := "HMI_Device"."PPN301"."Alarm" OR ("gCO2LowPress_Fault" AND "gWorkshopTest") OR ("HMI_Digital"."_PAL_S11"."Filtered" AND "Disable_Bit" AND "gWorkshopTest");

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

  "Procedure_Variables"."TN301_StartUp"."Latch" := ("Procedure_Variables"."TN301_StartUp"."Request" AND "Procedure_Variables"."TN301_StartUp"."Done" AND "Procedure_Variables"."TN301_StartUp"."Reset") OR ("Procedure_Variables"."TN301_StartUp"."Done" AND "Procedure_Variables"."TN301_StartUp"."Latch" AND "Procedure_Variables"."TN301_StartUp"."Reset");

  IF ("Procedure_Variables"."TN301_StartUp"."Request" AND "Procedure_Variables"."TN301_StartUp"."Done" AND "Procedure_Variables"."TN301_StartUp"."Reset") OR ("Procedure_Variables"."TN301_StartUp"."Done" AND "Procedure_Variables"."TN301_StartUp"."Latch" AND "Procedure_Variables"."TN301_StartUp"."Reset") THEN
    "HMI_Variables_Status"."Procedures"."BlenderStateNum" := 5;
  END_IF;

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

  "HMI_Alarms"."gH_Message" := ("gBlenderProdMode" AND "Procedure_Variables"."TN301_StartUp"."Qualifier" AND "Procedure_Variables"."TN301_StartUp"."Done" AND "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_EnDeaireation" AND "Procedure_Variables"."TN301_StartUp"."Latch") OR ("gBlenderProdMode" AND "Procedure_Variables"."TN301_StartUp"."Qualifier" AND "Procedure_Variables"."TN301_StartUp"."Done" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_ByPassDeair" AND "Procedure_Variables"."TN301_StartUp"."Latch");

  // Network 8: Running (Original Language: LAD)

  "Procedure_Variables"."TN301_StartUp"."Running" := "Procedure_Variables"."TN301_StartUp"."Wait" AND "Procedure_Variables"."TN301_StartUp"."Latch";

  // Network 9: Deaireator Start UP Sequence (Original Language: LAD)

  IF "Procedure_Variables"."TN301_StartUp"."Running" THEN
    Deaireator_StartUp_Seq(mStep := "mStepNum", mTimer := "mTimeStep", mTransition := "mTransition");
  END_IF;

  // Network 10: Deaerator StartUp Running (Original Language: LAD)

  "HMI_Variables_Status"."Procedures"."TN301StartUpRun" := "Procedure_Variables"."TN301_StartUp"."Latch";

  "HMI_Alarms"."gH_Status" := "Procedure_Variables"."TN301_StartUp"."Latch";

  // Network 11: MIX - Procedure auxiliary variable (Original Language: LAD)

  "gSP_PPN304" := "HMI_Blender_Parameters"."Actual_Recipe_Parameters"."_Deareation_Vacum" AND "gStillWaterByPassEn" AND ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_VacuumPump" >= 1);

END_FUNCTION_BLOCK