Obsidean_VM/04-SIDEL/00 - MASTER/Source/source/Prod_Tank_RunOut_Seq.md

// Block Type: FC
// Block Name (Original): Prod Tank RunOut_Seq
// Block Number: 1808
// Original Network Languages: STL, LAD

FUNCTION "Prod_Tank_RunOut_Seq" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1

VAR_INPUT
  ProdTankRanOut : Bool;
END_VAR

VAR_INOUT
  mStep : Int;
  mTime : Int;
  mTransition : Bool;
  mPrdTnkMinLvl : Bool;
END_VAR

VAR_TEMP
  mProdTankMinLevel : Bool;
  __PlcmigTempFillBit_0B1 : Bool;
  __PlcmigTempFillBit_0B2 : Bool;
  __PlcmigTempFillBit_0B3 : Bool;
  __PlcmigTempFillBit_0B4 : Bool;
  __PlcmigTempFillBit_0B5 : Bool;
  __PlcmigTempFillBit_0B6 : Bool;
  __PlcmigTempFillBit_0B7 : Bool;
  __PlcmigTempFillBit_1B0 : Bool;
  __PlcmigTempFillBit_1B1 : Bool;
  __PlcmigTempFillBit_1B2 : Bool;
  __PlcmigTempFillBit_1B3 : Bool;
  __PlcmigTempFillBit_1B4 : Bool;
  __PlcmigTempFillBit_1B5 : Bool;
  __PlcmigTempFillBit_1B6 : Bool;
  __PlcmigTempFillBit_1B7 : Bool;
END_VAR

BEGIN

  // Network 1: STEP CONTROL (Original Language: STL)

  // --- BEGIN STL Network 1 ---
   
     	L	"mStep"
     	JL	LEND
     	JU	ST00
     	JU	ST01
     	JU	ST02
     	JU	ST03
     LEND:   		JU	FULL
     FULL:   		L	0
     	T	"mStep"
     	JU	END
   
  // --- END STL Network 1 ---

  // Network 2: STEP 00 (Original Language: LAD)

  IF "HMI_Digital"."LSN301L"."Filtered" AND ("System_RunOut_Variables"."RMM301_OV_ProdPipeRunOut" > 0.0) THEN
    "gSP_PPN301" := TRUE;
  END_IF;

  // Network 3: STEP 00 (Original Language: LAD)

  IF ("HMI_Digital"."LAL_S3"."Filtered" AND "System_RunOut_Variables"."FastChangeOverActivated" AND ("System_RunOut_Variables"."RMP302_OV_ProdPipeRunOut" > 0)) OR ("gIN_SyrTank_MinLvl" AND "System_RunOut_Variables"."FastChangeOverActivated" AND ("System_RunOut_Variables"."RMP302_OV_ProdPipeRunOut" > 0)) THEN
    "gSP_PPP302" := TRUE;
  END_IF;

  IF ("HMI_Digital"."LAL_S3"."Filtered" AND "System_RunOut_Variables"."FastChangeOverActivated" AND ("System_RunOut_Variables"."RMP302_OV_ProdPipeRunOut" > 0)) OR ("gIN_SyrTank_MinLvl" AND "System_RunOut_Variables"."FastChangeOverActivated" AND ("System_RunOut_Variables"."RMP302_OV_ProdPipeRunOut" > 0)) THEN
    "gSP_AVP390" := TRUE;
  END_IF;

  // Network 4: STEP 00 (Original Language: LAD)

  IF "AUX TRUE" THEN
    "gSP_RVN301" := TRUE;
  END_IF;

  IF "System_RunOut_Variables"."FastChangeOverActivated" AND "AUX TRUE" THEN
    "gSP_RVP303" := TRUE;
  END_IF;

  // Network 5: STEP 00 (Original Language: LAD)

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_DoubleDeair" THEN
    "gSP_RVN301_1" := TRUE;
  END_IF;

  IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_DoubleDeair" THEN
    "gSP_PPN305" := TRUE;
  END_IF;

  // Network 6: STEP 00 (Original Language: STL)

  // --- BEGIN STL Network 6 ---
   
     	A	"System_RunOut_Variables".ChillerPushDone
     	=	"__PlcmigTempFillBit_1B0"
     	BLD	103
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBit_1B1"
     	BLD	103
     	A	"Procedure_Variables".TM301_RunOut.Wait
     	=	"__PlcmigTempFillBit_1B2"
     	BLD	103
     	A	CLK_0.5S
     	=	"__PlcmigTempFillBit_1B3"
     	BLD	103
     	CALL	"_StepMove"
     	A	_Statusword_?
     	JC	END
   
  // --- END STL Network 6 ---

  // Network 7: STEP 01 (Original Language: LAD)

  IF "AUX TRUE" THEN
    "gRinseClose_RMM301" := TRUE;
  END_IF;

  IF "AUX TRUE" THEN
    "gRinseClose_RMP302" := TRUE;
  END_IF;

  // Network 8: STEP 01 (Original Language: STL)

  // --- BEGIN STL Network 8 ---
   
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBit_1B0"
     	BLD	103
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBit_1B1"
     	BLD	103
     	A	"Procedure_Variables".TM301_RunOut.Wait
     	=	"__PlcmigTempFillBit_1B2"
     	BLD	103
     	A	CLK_0.5S
     	=	"__PlcmigTempFillBit_1B3"
     	BLD	103
     	CALL	"_StepMove"
     	A	_Statusword_?
     	JC	END
   
  // --- END STL Network 8 ---

  // Network 9: STEP 02 (Original Language: LAD)

  "mProdTankMinLevel" := ("HMI_Instrument"."LTM302"."PVFiltered" < 2.0) OR ("ProdTankRanOut" AND "System_RunOut_Variables"."ProdPipeRunOutFillerBott");

  // Network 10: STEP 02 (Original Language: STL)

  // --- BEGIN STL Network 10 ---
   
     	A	"mProdTankMinLevel"
     	=	"__PlcmigTempFillBit_1B0"
     	BLD	103
     	A	"AUX TRUE"
     	=	"__PlcmigTempFillBit_1B1"
     	BLD	103
     	A	"Procedure_Variables".TM301_RunOut.Wait
     	=	"__PlcmigTempFillBit_1B2"
     	BLD	103
     	A	CLK_0.5S
     	=	"__PlcmigTempFillBit_1B3"
     	BLD	103
     	CALL	"_StepMove"
     	A	_Statusword_?
     	JC	END
   
  // --- END STL Network 10 ---

  // Network 11: STEP 03 (Original Language: LAD)

  IF "AUX FALSE" THEN
    "gRinseClose_RMM301" := FALSE;
  END_IF;

  IF "AUX FALSE" THEN
    "gRinseClose_RMP302" := FALSE;
  END_IF;

  IF "AUX FALSE" THEN
    "System_RunOut_Variables"."ChillerPushDone" := FALSE;
  END_IF;

  IF "AUX FALSE" THEN
    "Procedure_Variables"."TM301_RunOut"."Done" := TRUE;
  END_IF;

  // Network 12:  (Original Language: STL)

  // --- BEGIN STL Network 12 ---
   
     END:    		NOP_0
   
  // --- END STL Network 12 ---

END_FUNCTION