15 KiB
15 KiB
// Block Type: FC
// Block Number: 2004
// Original Network Languages: LAD
FUNCTION "Interlocking_Panel_1" : Void
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
VAR_TEMP
mDummy : Bool;
retval : Int;
diffpress : DInt;
END_VAR
BEGIN
// Network 1: FILLER RECEIVE DATA (Original Language: LAD)
// Signals From Krones Filler
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DI0" := ("DI_Flr1_PROD_ok" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DI_Flr1_PROD_ok" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DI1" := ("DI_Flr1_PROD_Request" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DI_Flr1_PROD_Request" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DI2" := ("DI_Flr1_CIP/RinseFiller" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DI_Flr1_CIP/RinseFiller" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DI3" := ("DI_Flr1_CIP_DrainComplete" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DI_Flr1_CIP_DrainComplete" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DI4" := ("DI_Flr1_WaterRequest" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DI_Flr1_WaterRequest" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
// Network 2: FILLER SEND DATA (Original Language: LAD)
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO0" := ("DO_Flr1_Productionmode" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DO_Flr1_Productionmode" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO1" := ("DO_Flr1_PROD_Available" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "DO_Flr1_PROD_Available" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO2" := ("DO_Flr1_OpenBottleblock" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_OpenBottleblock" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO3" := ("DO_Flr1_CIPMode" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_CIPMode" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO4" := ("DO_Flr1_RinseMode" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_RinseMode" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO5" := ("DO_Flr1_CIP_DrainRequest" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_CIP_DrainRequest" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO6" := ("DO_Flr1_CIP_CleaningEnd" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_CIP_CleaningEnd" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
"HMI_IO_Showing"."Filler_IO_Signal"."Production"."_DO7" := ("DO_Flr1_Spare0" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 0)) OR ("DO_Flr1_Spare0" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1));
// Network 3: SYRUP ROOM RECEIVE DATA (Original Language: LAD)
"HMI_IO_Showing"."Syrup_Room_IO_Signal"."_DI0" := "AUX TRUE" AND "DI_SyrRoom_SyrPump_Running";
"HMI_Refrige_IO_Showing"."Syrup_Room_IO_Signal"."_DI1" := "AUX TRUE" AND "DI_SyrRoom_Pump_Ready";
"HMI_Refrige_IO_Showing"."Syrup_Room_IO_Signal"."_DI2" := "AUX TRUE" AND "DI_SyrRoom_WatPumpReady";
// Network 4: SYRUP ROOM SEND DATA (Original Language: LAD)
"HMI_IO_Showing"."Syrup_Room_IO_Signal"."_DO0" := "AUX TRUE" AND "DO_SyRm_SyrupReques";
"HMI_IO_Showing"."Syrup_Room_IO_Signal"."_DO1" := "AUX TRUE" AND "DO_SyRm_WaterRequest";
// Network 5: CIP ROOM RECEIVE DATA (Original Language: LAD)
// Signal Exchange From CIP Autosan
"HMI_IO_Showing"."Cip_Room_IO_Signal"."_DI0" := "AUX TRUE" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_LocalCIP" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_CIPSignalExchange" AND "DI_CIP_CIP_Enable";
"HMI_IO_Showing"."Cip_Room_IO_Signal"."_DI1" := "AUX TRUE" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_LocalCIP" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_CIPSignalExchange" AND "DI_CIP_CIP_Rinse";
"HMI_IO_Showing"."Cip_Room_IO_Signal"."_DI2" := "AUX TRUE" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_LocalCIP" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_CIPSignalExchange" AND "DI_CIP_Drain";
"HMI_IO_Showing"."Cip_Room_IO_Signal"."_DI3" := "AUX TRUE" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_LocalCIP" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_CIPSignalExchange" AND "DI_CIP_End";
// Network 6: CIP ROOM SEND DATA (Original Language: LAD)
"HMI_IO_Showing"."Cip_Room_IO_Signal"."_DO1" := "AUX TRUE" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_LocalCIP" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_CIPSignalExchange" AND "DO_CIP_DrainCompleted";
// Network 7: SIDEL CIP ROOM RECEIVE DATA (Original Language: LAD)
// ERROR: BLKMOV 32 sin SRCBLK válido.
// Network 8: SIDEL CIP ROOM SEND DATA (Original Language: LAD)
// ERROR: BLKMOV 32 sin SRCBLK válido.
// Network 9: SIDEL FILLER RECEIVE DATA (Original Language: LAD)
// ERROR: BLKMOV 36 sin SRCBLK válido.
// ERROR: BLKMOV 37 sin SRCBLK válido.
// Network 10: SIDEL FILLER SEND DATA (Original Language: LAD)
IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1) THEN
"HMI_IO_Showing"."Sidel_Filler_IO_Signal"."Production"."_DO2" := "Interlocking_Variables"."SIDEL_FILLER_SEND_DATA"."Run_Out_Amount1";
"HMI_IO_Showing"."Sidel_Filler_IO_Signal"."Production"."_DO3" := "Interlocking_Variables"."SIDEL_FILLER_SEND_DATA"."Run_Out_Amount2";
"HMI_IO_Showing"."Sidel_Filler_IO_Signal"."Production"."_DO4" := "Interlocking_Variables"."SIDEL_FILLER_SEND_DATA"."Product_Temperature";
"HMI_IO_Showing"."Sidel_Filler_IO_Signal"."Production"."_DO5" := "Interlocking_Variables"."SIDEL_FILLER_SEND_DATA"."Product_Carbonation";
"HMI_IO_Showing"."Sidel_Filler_IO_Signal"."Production"."_DO6" := "Interlocking_Variables"."SIDEL_FILLER_SEND_DATA"."Prod_Tank_Press_SP";
END_IF;
// ERROR: BLKMOV 46 sin SRCBLK válido.
// ERROR: BLKMOV 52 sin SRCBLK válido.
// Network 11: BLENDFILL FILLER RECEIVE DATA (Original Language: LAD)
// ERROR: BLKMOV 57 sin SRCBLK válido.
// ERROR: BLKMOV 58 sin SRCBLK válido.
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI100" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_Sanitize_Request" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI101" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_Cleaning_Alarm" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI102" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_Solution_Return" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI103" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_Recovery_Completed" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI104" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_Drain_Completed" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DI105" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."FILLER_MIXER_RECEIVE"."CIP_System_Flooded" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
// ERROR: BLKMOV 71 sin SRCBLK válido.
// ERROR: BLKMOV 72 sin SRCBLK válido.
// ERROR: BLKMOV 73 sin destino DSTBLK válido.
// Network 12: BLENDFILL FILLER SEND DATA (Original Language: LAD)
// ERROR: BLKMOV 59 sin SRCBLK válido.
// ERROR: BLKMOV 60 sin SRCBLK válido.
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO100" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_Completed" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO101" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_CleaningAlarm" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO102" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_ProductSending" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO103" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_RecoveryRequest" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO104" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_Drain_Request" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO105" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."CIP_FloodingRequest" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
"HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Cip"."_DO106" := "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND "Interlocking_Variables"."MIXER_FILLER_SEND"."Cip_Running" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1);
// ERROR: BLKMOV 75 sin SRCBLK válido.
// ERROR: BLKMOV 76 sin SRCBLK válido.
IF "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SidelFiller" AND "HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_BlendFillSystem" AND Eq("HMI_Blender_Parameters"."Processor_Options"."Blender_OPT"."_SignalExchange", 1) THEN
"retval" := BLKMOV(SRCBLK := "Interlocking_Variables"."MIXER_FILLER_SEND"."SPARE34", DSTBLK => "HMI_IO_Showing"."Mixer_Filler_IO_Signal"."Drain"."_DO10B"); // ADVERTENCIA: BLKMOV usado directamente, probablemente no compile!
END_IF;
END_FUNCTION