2.8 KiB
2.8 KiB
// Block Type: FB
// Block Number: 1811
// Original Network Languages: LAD
FUNCTION_BLOCK "ProcedureSyrupMFMStartUp"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_STAT
mStepNum : Int;
mTimeStep : Int;
mTransition : Bool;
mSyrMFMStartUpONS : Bool;
mFTP302_StartUpReqTPON : Bool;
mFTP302_StartUpReqTP : "TP_TIME:v1.0";
END_VAR
BEGIN
// Network 1: Qualifier (Original Language: LAD)
"Procedure_Variables"."FTP302_StartUp"."Qualifier" := "gBlenderProdMode" AND "gBlenderSuppliesOk" AND "Blender_Variables_Pers"."gWaterRecipe";
// Network 2: SyrMFMStartUpReq (Original Language: LAD)
// Network 2 did not produce printable SCL code.
// Network 3: Reset (Original Language: LAD)
// PBox SymPy processed, logic in consumer
"mSyrMFMStartUpONS" := "Procedure_Variables"."FTP302_StartUp"."Request" AND "Procedure_Variables"."Blender_Run"."Latch" AND "Procedure_Variables"."FTP302Line_Preparation"."Done" AND "System_RunOut_Variables"."FastChangeOverActivated"; // P_TRIG("Procedure_Variables"."FTP302_StartUp"."Request" AND "Procedure_Variables"."Blender_Run"."Latch" AND "Procedure_Variables"."FTP302Line_Preparation"."Done" AND "System_RunOut_Variables"."FastChangeOverActivated") - Mem: "mSyrMFMStartUpONS"
"Procedure_Variables"."FTP302_StartUp"."Reset" := "gBlenderCIPMode" OR ("gBlenderRinseMode" AND "System_RunOut_Variables"."FastChangeOverActivated");
// Network 4: Done (Original Language: LAD)
IF "Procedure_Variables"."FTP302_StartUp"."Reset" THEN
"mStepNum" := 0;
END_IF;
IF "Procedure_Variables"."FTP302_StartUp"."Reset" THEN
"Procedure_Variables"."FTP302_StartUp"."Done" := FALSE;
END_IF;
// Network 5: Wait (Original Language: LAD)
"Procedure_Variables"."FTP302_StartUp"."Wait" := "HMI_Digital"."_PAL_S11"."Filtered" OR "HMI_Device"."PPP302"."Alarm";
// Network 6: Latch (Original Language: LAD)
"Procedure_Variables"."FTP302_StartUp"."Latch" := ("Procedure_Variables"."FTP302_StartUp"."Latch" AND "Procedure_Variables"."FTP302_StartUp"."Reset" AND "FirstScan" AND "Procedure_Variables"."FTP302_StartUp"."Done") OR ("Procedure_Variables"."FTP302_StartUp"."Request" AND "Procedure_Variables"."FTP302_StartUp"."Reset" AND "FirstScan" AND "Procedure_Variables"."FTP302_StartUp"."Done");
// Network 7: Running (Original Language: LAD)
"Procedure_Variables"."FTP302_StartUp"."Running" := "Procedure_Variables"."FTP302_StartUp"."Latch" AND "Procedure_Variables"."FTP302_StartUp"."Wait";
// Network 8: Syrup Autocorrection Running (Original Language: LAD)
"HMI_Variables_Status"."Procedures"."FTP302PrepRun" := "Procedure_Variables"."FTP302_StartUp"."Latch";
// Network 9: Sequence (Original Language: LAD)
IF "Procedure_Variables"."FTP302_StartUp"."Running" THEN
Syrup_MFM_StartUp_Seq(mStep := "mStepNum", mTime := "mTimeStep", mTransition := "mTransition");
END_IF;
END_FUNCTION_BLOCK