3.0 KiB
3.0 KiB
// Block Type: FC
// Block Number: 1891
// Original Network Languages: STL, LAD
FUNCTION "Maselli_PA_Ctrl_Read" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
mPACountError : Int;
__PlcmigTempFillBits_2B0 : Array[0..7] of Bool;
END_VAR
#_25S : Bool; // Auto-generated temporary
BEGIN
// Network 1: Brix (Original Language: LAD)
"Blender_Variables"."gProductBrix" := "P_gMaselli_ProductBrix";
// Network 2: Temperature (Original Language: LAD)
"Blender_Variables"."gProductTemp" := "P_gMaselli_ProductTemp";
// Network 3: Co2 (Original Language: LAD)
"Blender_Variables"."gProductCO2" := "P_gMaselli_ProductCO2";
// Network 4: Recipe Number (Original Language: LAD)
"Blender_Variables"."gProductRecipeNum" := "P_gMaselli_ProductNumber";
// Network 5: Error (Original Language: LAD)
"Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommErr" := "M18833";
// Network 6: Communication Ok (Original Language: LAD)
"Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommActive" := "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommErr";
// Network 7: Data (Original Language: STL)
// --- BEGIN STL Network 7 ---
A "Maselli_PA_Data".Input_From_Maselli.gPAMaselli_CommErr
AN "Maselli_PA_Data".Input_From_Maselli.gPAMaselli_Error
= "__PlcmigTempFillBits_2B0"[0]
A "__PlcmigTempFillBits_2B0"[0]
JNB _001
L "Maselli_PA_Data".mPAMaselliCountError
L 1
ADD_I
T "Maselli_PA_Data".mPAMaselliCountError
_001: NOP_0
A "__PlcmigTempFillBits_2B0"[0]
JNB _002
L 0
T "Blender_Variables".gProductRecipeNum
_002: NOP_0
A "__PlcmigTempFillBits_2B0"[0]
JNB _003
L 0
T "Blender_Variables".gProductCO2
_003: NOP_0
A "__PlcmigTempFillBits_2B0"[0]
JNB _004
L 0
T "Blender_Variables".gProductBrix
_004: NOP_0
A "__PlcmigTempFillBits_2B0"[0]
JNB _005
L 0
T "Blender_Variables".gProductTemp
_005: NOP_0
// --- END STL Network 7 ---
// Network 8: Error Count reset (Original Language: LAD)
IF "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_CommErr" OR "gBlenderCIPMode" THEN
"mPACountError" := 0;
END_IF;
// Network 9: Error (Original Language: LAD)
"Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_Error" := "mPACountError" >= 6;
// Network 10: Fault (Original Language: LAD)
"mPAMaselliTmrFault"(IN := "gProdMeterTransferRecipe", PT := S5T#25S); // TODO: Declarar "mPAMaselliTmrFault" : TON;
IF ("mPAMaselliTmrFault".Q AND "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_Error" AND "Procedure_Variables"."ProdBrix_Track"."Latch") OR ("mPAMaselliTmrFault".Q AND "Maselli_PA_Data"."Input_From_Maselli"."gPAMaselli_Error" AND "Procedure_Variables"."ProdCO2_Track"."Latch") THEN
"gPAMaselli_Error_Fault" := TRUE;
END_IF;
// Network 11: Fault (Original Language: LAD)
// Network 11 did not produce printable SCL code.
END_FUNCTION