FB38 MAN P01 : CEA Hydraulic Press - Test and Manual Mode

 

 

 

Netzwerk 1: Pre-setting

 

#tmp_enable_hydraulic_test :=

"E01 HydOil Off Min"

AND "M00 EStp ok"

AND "DI OUT P01".T36_PEW_SCAL.Support.Out_Scale < 80.0 // oil temperature

AND "DI OUT P01".P113_PEW_SCAL.Support.Out_Scale < 220.0; // Auxiliary oil pressure tank

 

// Start stop Traverse-Control Procedure

#tmp_logical_link_outcome :=

"DI OUT P01".MaPa.Support.CmdExe_Ram_Dn

AND "DI OUT P01".MaPa.Set_Force_Pressing_kN > "DI OUT P01".P421_PEW_SCAL_kN.Support.Out_Scale

AND NOT "DI OUT P01".MaPa.Support.BDC_reached

AND "DI OUT P01".C27.FB_WP

AND "DI OUT P01".M01.DRV.LampWP

AND "DI OUT P01".M03.DRV.LampWP

AND "DI OUT P01".M02.DRV.LampWP

OR "DI OUT P01".MaPa.Support.CmdExe_Ram_Up AND NOT "DI OUT P01".MaPa.Support.Slow_TDC_reached

OR "DI OUT P01".MaPa.Support.CmdExe_Ram_Dn_PL AND NOT "DI OUT P01".MaPa.Support.BDC_reached

OR "DI OUT P01".MaPa.Support.CmdExe_Ram_OTC AND "M00 Ram OTC" AND NOT "DI OUT P01".Save_OTC_reached;

 

// Stop impuse semi automaic mode

#Support.RamHALT_Imp := NOT #tmp_logical_link_outcome AND #Support.RamHALT_FEg;

#Support.RamHALT_FEg := #tmp_logical_link_outcome;

 

 

 

Netzwerk 2: Overrun Traverse Control (OTC)

 

IF "DI OUT P01".MaPa.Support.CmdExe_Ram_OTC AND "M00 Ram OTC" AND NOT "DI OUT P01".Save_OTC_reached AND #tmp_logical_link_outcome AND NOT "M00 HYD OpraTest" THEN

// Ram rapid traverse down OTC

IF "DI OUT P01".LinearEncoder_Master.ActPos_Dint > "DI OUT P01".MaPa.Set_OTC_Pos THEN

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP :=

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := TRUE;

"DI OUT P01".YF41E_PAW_RAMP.Support.Steep := 2.5;

"DI OUT P01".YF41E_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_VolFlow_OTC;

"DI OUT P01".YP42_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_Pressure_bar;

"DI OUT P01".YP43E_PAW_RAMP.Support.Target := "DI OUT P01".YP43E_PAW_RAMP.Support.Target;

// C13 WP, Y09 WP, Y04 WP, Y05 WP, Y08 WP, Y03 HP

"DI OUT P01".C13.CmdExe_HP := FALSE;

"DI OUT P01".C13.CmdExe_WP := "HMI KEY".P01.C13.F12_Enable_WP;

"DI OUT P01".Y09.CmdExe_WP := "HMI KEY".P01.Y09.F12_Enable_WP;

"DI OUT P01".Y04.CmdExe_WP := "HMI KEY".P01.Y04.F12_Enable_WP;

"DI OUT P01".Y08.CmdExe_WP := "HMI KEY".P01.Y08.F12_Enable_WP;

"DI OUT P01".Y05.CmdExe_WP := "HMI KEY".P01.Y05.F12_Enable_WP;

"DI OUT P01".Y03.CmdExe_WP := FALSE;

ELSE // Ram rapid traverse up OTC

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP :=

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := TRUE;

"DI OUT P01".YF41E_PAW_RAMP.Support.Steep := 2.5;

"DI OUT P01".YF41E_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_VolFlow_OTC;

"DI OUT P01".YP42_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Max_Pressure_bar;

"DI OUT P01".YP43E_PAW_RAMP.Support.Target := 0.0;

// C13 HP, Y09 WP, Y04 WP, Y05 HP, Y08 WP, Y03 HP

"DI OUT P01".C13.CmdExe_WP := FALSE;

"DI OUT P01".C13.CmdExe_HP := "HMI KEY".P01.C13.F11_Enable_HP;

"DI OUT P01".Y09.CmdExe_WP := "HMI KEY".P01.Y09.F12_Enable_WP;

"DI OUT P01".Y04.CmdExe_WP := "HMI KEY".P01.Y04.F12_Enable_WP;

"DI OUT P01".Y08.CmdExe_WP := "HMI KEY".P01.Y08.F12_Enable_WP;

"DI OUT P01".Y05.CmdExe_WP :=

"DI OUT P01".Y03.CmdExe_WP := FALSE;

END_IF;

END_IF;

#Support.RamOTC_TON(IN := "M00 Ram OTC" AND "DI OUT P01".Save_OTC_reached,

PT := t#5s);

IF #Support.RamOTC_TON.Q THEN

"M00 Ram OTC" := "DI OUT P01".Save_OTC_reached := FALSE;

END_IF;

 

 

 

Netzwerk 3: Manual Mode

 

IF "M00 ManuCmpltMa run" THEN

// Manual mode 2Hd ram down 2Hd + pressing

IF "DI OUT P01".MaPa.Support.CmdExe_Ram_Dn AND NOT "DI OUT P01".MaPa.Support.BDC_reached

AND "DI OUT P01".MaPa.Set_Force_Pressing_kN > "DI OUT P01".P421_PEW_SCAL_kN.Support.Out_Scale THEN

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP := TRUE;

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := FALSE;

"DI OUT P01".YF41E_PAW_RAMP.Support.Steep := 1.0;

"DI OUT P01".YF41E_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_VolFlow_Down_2Hd;

"DI OUT P01".YP43E_PAW_RAMP.Support.Target := 0.0;

IF "DI OUT P01".MaPa.Max_RRT_Pos > "DI OUT P01".LinearEncoder_Master.ActPos_Dint THEN

"M01 YP42 Linear CmdExe" := TRUE;

"ParallelismControl"(ENABLE := "M01 YP42 Linear CmdExe",

TOLERANCE := "DI OUT P01".MaPa.Set_ParaTolerance,

PARA_FAULT => "DI MAIN P01".SEQ1.FLT."3_FAULT_00_15".%X0);

END_IF;

// C13 WP, Y09 WP, Y04 WP, Y05 WP, Y08 WP, Y03 HP

"DI OUT P01".C13.CmdExe_HP := FALSE;

"DI OUT P01".C13.CmdExe_WP := "HMI KEY".P01.C13.F12_Enable_WP;

"DI OUT P01".Y09.CmdExe_WP := "HMI KEY".P01.Y09.F12_Enable_WP;

"DI OUT P01".Y04.CmdExe_WP := "HMI KEY".P01.Y04.F12_Enable_WP;

"DI OUT P01".Y08.CmdExe_WP := "HMI KEY".P01.Y08.F12_Enable_WP;

"DI OUT P01".Y05.CmdExe_WP := "HMI KEY".P01.Y05.F12_Enable_WP;

"DI OUT P01".Y03.CmdExe_WP := FALSE;

// Manual mode 2Hd ram up

ELSIF "DI OUT P01".MaPa.Support.CmdExe_Ram_Up AND NOT "DI OUT P01".MaPa.Support.Slow_TDC_reached THEN

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP := TRUE;

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := FALSE;

"DI OUT P01".YF41E_PAW_RAMP.Support.Steep := 1.0;

"DI OUT P01".YF41E_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_VolFlow_Up_2Hd;

"DI OUT P01".YP42_PAW_RAMP.Support.Target :=

"DI OUT P01".YP43E_PAW_RAMP.Support.Target := 0.0;

// C13 HP, Y09 WP, Y04 WP, Y05 HP, Y08 WP, Y03 HP

"DI OUT P01".C13.CmdExe_WP := FALSE;

"DI OUT P01".C13.CmdExe_HP := "HMI KEY".P01.C13.F11_Enable_HP;

"DI OUT P01".Y09.CmdExe_WP := "HMI KEY".P01.Y09.F12_Enable_WP;

"DI OUT P01".Y04.CmdExe_WP := "HMI KEY".P01.Y04.F12_Enable_WP;

"DI OUT P01".Y08.CmdExe_WP := "HMI KEY".P01.Y08.F12_Enable_WP;

"DI OUT P01".Y05.CmdExe_WP :=

"DI OUT P01".Y03.CmdExe_WP := FALSE;

// Manual mode pressure less down

ELSIF "E01 PrsurLes EnblKs" AND "DI OUT P01".MaPa.Support.CmdExe_Ram_Dn_PL AND NOT "DI OUT P01".MaPa.Support.BDC_reached THEN

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP := TRUE;

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := FALSE;

"DI OUT P01".YF41E_PAW_RAMP.Support.Steep := 0.1;

"DI OUT P01".YF41E_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Set_VolFlow_PrsrLess;

"DI OUT P01".YP42_PAW_RAMP.Support.Target := "DI OUT P01".MaPa.Mim_Pressure_bar;

"DI OUT P01".YP43E_PAW_RAMP.Support.Target := 0.0;

// C13 HP/WP, Y09 HP, Y04 WP, Y05 HP, Y08 HP, Y03 WP

"DI OUT P01".C13.CmdExe_WP :=

"DI OUT P01".C13.CmdExe_HP :=

"DI OUT P01".Y09.CmdExe_WP := FALSE;

"DI OUT P01".Y04.CmdExe_WP := "HMI KEY".P01.Y04.F12_Enable_WP;

"DI OUT P01".Y08.CmdExe_WP :=

"DI OUT P01".Y05.CmdExe_WP := FALSE;

"DI OUT P01".Y03.CmdExe_WP := "HMI KEY".P01.Y03.F12_Enable_WP;

END_IF;

END_IF;

// Halt moving up and down

IF #Support.RamHALT_Imp OR "DI MAIN GLB".TOF_ManuOff_Pulse.Q THEN

"DI OUT P01".C13.CmdExe_WP :=

"DI OUT P01".C13.CmdExe_HP :=

"DI OUT P01".Y09.CmdExe_WP :=

"DI OUT P01".Y03.CmdExe_WP :=

"DI OUT P01".Y04.CmdExe_WP :=

"DI OUT P01".Y08.CmdExe_WP :=

"DI OUT P01".Y05.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 4: M01 Control pump

 

"HMI KEY".P01.M01.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DI OUT P01".M01.drv_com_flt;

 

 

 

Netzwerk 5: M02 Main pump 1

 

"HMI KEY".P01.M02.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DI OUT P01".M02.drv_com_flt;

IF NOT "HMI KEY".P01.M02.F12_Enable_WP THEN

"DI OUT P01".M02.DRV.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 6: M03 Main pump 2

 

"HMI KEY".P01.M03.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DI OUT P01".M03.drv_com_flt;

IF NOT "HMI KEY".P01.M03.F12_Enable_WP THEN

"DI OUT P01".M03.DRV.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 7: M04 Stroke limitation drive

 

// Jog fast WP (toggle function)

IF #ST_MANU AND NOT #SUPPORT_SEQ THEN

IF "HMI KEY".P01.M04.F19_Jog_fast_WP AND NOT #M04.F19_Jog_fast_WP_REg THEN

#M04.CmdExe_fast_WP := NOT #M04.CmdExe_slow_WP AND "DI OUT P01".RE04_ActDiff_Val < 0;

#M04.CmdExe_fast_HP := FALSE;

// Jog fast WP (toggle function)

ELSIF "HMI KEY".P01.M04.F20_Jog_fast_HP AND NOT #M04.F20_Jog_fast_HP_REg THEN

#M04.CmdExe_fast_HP := NOT #M04.CmdExe_fast_HP AND "DI OUT P01".RE04_ActDiff_Val > 0;

#M04.CmdExe_fast_WP := FALSE;

// Jog slow WP (button function)

ELSIF "HMI KEY".P01.M04.F3_Jog_slow_WP OR "DI OUT P01".RE04.Support.Adjustment_cmd THEN

#M04.CmdExe_slow_WP := "HMI KEY".P01.M04.F3_Jog_slow_WP;

#M04.CmdExe_fast_HP :=

#M04.CmdExe_fast_WP := FALSE;

// Jog slow WP (button function)

ELSIF "HMI KEY".P01.M04.F4_Jog_slow_HP OR "DI OUT P01".RE04.Support.Adjustment_cmd THEN

#M04.CmdExe_slow_HP := "HMI KEY".P01.M04.F4_Jog_slow_HP;

#M04.CmdExe_fast_HP :=

#M04.CmdExe_fast_WP := FALSE;

ELSE

#M04.CmdExe_slow_HP :=

#M04.CmdExe_slow_WP := FALSE;

END_IF;

// Jog fast WP HP (Assigning rising edge)

#M04.F19_Jog_fast_WP_REg := "HMI KEY".P01.M04.F19_Jog_fast_WP;

#M04.F20_Jog_fast_HP_REg := "HMI KEY".P01.M04.F20_Jog_fast_HP;

// Set velocity value

IF "DI OUT P01".M04.DRV.CmdExe_HP THEN

"DI OUT P01".M04.DRV.SetTrgtPos := #M04.ManuVelocity_1;

ELSIF "DI OUT P01".M04.DRV.CmdExe_WP THEN

"DI OUT P01".M04.DRV.SetTrgtPos := #M04.ManuVelocity_1;

END_IF;

END_IF;

// M04 slow down

IF ABS("DI OUT P01".RE04_ActDiff_Val) < 10 THEN

IF "DI OUT P01".RE04_ActDiff_Val > 0 THEN

#M04.ManuVelocity_1 := "DI OUT P01".M04.DRV.SetTrgtPos := -400.0;

ELSE

#M04.ManuVelocity_1 := "DI OUT P01".M04.DRV.SetTrgtPos := 400.0;

END_IF;

END_IF;

// Enabling 13MA1 Stroke limitation motor WP

"HMI KEY".P01.M04.F12_Enable_WP :=

"E00 M04 BDC" AND "E00 M04 CFP"

AND NOT "DI MAIN GLB".TOF_ManuOff_Pulse.Q

AND "DI OUT P01".M04.DRV.SavWord = w#16#7002

AND #tmp_enable_hydraulic_test AND NOT "DI OUT P01".M04.drv_com_flt;

// Enabling 13MA1 Stroke limitation motor HP

"HMI KEY".P01.M04.F11_Enable_HP :=

"E00 M04 TDC" AND "E00 M04 CFP"

AND NOT "DI MAIN GLB".TOF_ManuOff_Pulse.Q

AND "DI OUT P01".M04.DRV.SavWord = w#16#7002

AND #tmp_enable_hydraulic_test AND NOT "DI OUT P01".M04.drv_com_flt;

 

 

 

Netzwerk 8: C13 Ram safety valve WP_HP

 

"HMI KEY".P01.C13.F12_Enable_WP :=

"DI OUT P01".C27.FB_WP

AND NOT "DI OUT P01".MaPa.Support.BDC_reached

AND #tmp_enable_hydraulic_test AND NOT "DIF_Main_Safety_RTG1".FB_SAFE_P01.A01_C13_WP.ERROR;

"HMI KEY".P01.C13.F11_Enable_HP :=

"DI OUT P01".C27.FB_WP

AND NOT "DI OUT P01".MaPa.Support.TDC_reached

AND #tmp_enable_hydraulic_test AND NOT "DIF_Main_Safety_RTG1".FB_SAFE_P01.A01_C13_HP.ERROR;

 

 

 

Netzwerk 9: Y09 Ram safety valve WP

 

"HMI KEY".P01.Y09.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DIF_Main_Safety_RTG1".FB_SAFE_P01.A01_Y09_WP.ERROR;

 

IF NOT "HMI KEY".P01.Y09.F12_Enable_WP THEN

"DI OUT P01".Y09.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 10: C27 Ram stow pin

 

"HMI KEY".P01.C27.F11_Enable_HP :=

#tmp_enable_hydraulic_test AND NOT "DIF_Main_Safety_RTG1".FB_SAFE_P01.A01_C27_RSP_HP.ERROR;

"HMI KEY".P01.C27.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DIF_Main_Safety_RTG1".FB_SAFE_P01.A01_C27_RSP_WP.ERROR;

 

IF NOT ("HMI KEY".P01.C27.F12_Enable_WP AND "HMI KEY".P01.C27.F11_Enable_HP) THEN

"DI OUT P01".C27.VLV.CmdExe_WP :=

"DI OUT P01".C27.VLV.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 11: Y01 Auxiliary tank loading valve (max 210 bar)

 

"HMI KEY".P01.Y01.F12_Enable_WP :=

#tmp_enable_hydraulic_test AND NOT "DI OUT P01".M01.drv_com_flt;

IF NOT "HMI KEY".P01.Y01.F12_Enable_WP THEN

"DI OUT P01".Y01.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 12: Y02 Auxiliary tank relief valve (min 140 bar)

 

"HMI KEY".P01.Y02.F12_Enable_WP := #tmp_enable_hydraulic_test;

IF NOT "HMI KEY".P01.Y02.F12_Enable_WP THEN

"DI OUT P01".Y02.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 13: Y03 Ram pressure less down

 

"HMI KEY".P01.Y03.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.Y03.F12_Enable_WP THEN

"DI OUT P01".Y03.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 14: Y04 Oil pressure circulation valve

 

"HMI KEY".P01.Y04.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.Y04.F12_Enable_WP THEN

"DI OUT P01".Y04.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 15: Y05 Ram oil filling valve

 

"HMI KEY".P01.Y05.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.Y05.F12_Enable_WP THEN

"DI OUT P01".Y05.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 16: Y08 Oil pressure standby valve

 

"HMI KEY".P01.Y08.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.Y08.F12_Enable_WP THEN

"DI OUT P01".Y08.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 17: YF41E Oil volume flow prop.valve 0-100%

 

"HMI KEY".P01.YF41E.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.YF41E.F12_Enable_WP THEN

"DI OUT P01".YF41E_PAW_VALU.Support.CmdExe_WP := FALSE;

END_IF;

 

 

 

Netzwerk 18: YP43E Ram rapid traverse down proportion valve setpoint 0-100%

 

"HMI KEY".P01.YP43E.F12_Enable_WP := #tmp_enable_hydraulic_test AND "E00 DC24V";

IF NOT "HMI KEY".P01.YP43E.F12_Enable_WP THEN

"DI OUT P01".YP43E_PAW_VALU.Support.CmdExe_WP := FALSE;

END_IF;

 

 

 

[See next page..]

 

 

Home

 

Erfahrung

 

Referenzen

 

Sondermaschinen

 

MSR-Maschinen

 

SPS-Programmierung

 

Visualisierung HMI

 

Elektro CAD

 

Leistungsprofil

 

Personalia

 

SW-Development

 

Dokumentation

 

 

 

Impressum & DSGVO