71 lines
2.8 KiB
Markdown
71 lines
2.8 KiB
Markdown
```pascal
|
|
// 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
|
|
|
|
```
|