FB OUT P02 : Assign out puts P02

[hit  <- on your browser to return]

Network 1: Call P02 manual operation

#Manual(ST_MANU := "DI MAIN GLB".M00.ManuCmpltMa_run,

        MODULE_HP := "HMI KEY".P02.GLB.F20_HomPos,

        SUPPORT_SEQ := "DI MAIN P02".M00.HomPosRun);

Network 2: Pre-Setting

#tmp_operation_mode := "DI MAIN GLB".M00.AutoCmpltMa_run OR "DI MAIN GLB".M00.InchCmpltMa_run;

IF "E02 M31 FootSwitch" AND #tmp_operation_mode AND NOT (#"M31".DRV.Occupied_REg OR "E02 M32 LimSwitch") THEN

    "ModulDa".Pallet_Data.Pallet_Code := 16#CEA_1208;

    "ModulDa".Pallet_Data.Pallet_Ref_Pos_X := "HMI KEY".Execute.Pallet_Ref_Pos_X;

    "ModulDa".Pallet_Data.Pallet_Ref_Pos_Y := "HMI KEY".Execute.Pallet_Ref_Pos_Y;

    IF "HMI KEY".Message.Programme_1_Selected THEN

        "ModulDa".Pallet_Data.WorkPiece_1 := "HMI KEY".ProgChoice_1.WorkPiece_1;

        "ModulDa".Pallet_Data.Workpiece_2 := "HMI KEY".ProgChoice_1.WorkPiece_2;

        "ModulDa".Pallet_Data.Workpiece_3 := "HMI KEY".ProgChoice_1.WorkPiece_3;

    ELSIF "HMI KEY".Message.Programme_2_Selected THEN

        "ModulDa".Pallet_Data.WorkPiece_1 := "HMI KEY".ProgChoice_2.WorkPiece_1;

        "ModulDa".Pallet_Data.Workpiece_2 := "HMI KEY".ProgChoice_2.WorkPiece_2;

        "ModulDa".Pallet_Data.Workpiece_3 := "HMI KEY".ProgChoice_2.WorkPiece_3;

    ELSIF "HMI KEY".Message.Programme_3_Selected THEN

        "ModulDa".Pallet_Data.WorkPiece_1 := "HMI KEY".ProgChoice_3.WorkPiece_1;

        "ModulDa".Pallet_Data.Workpiece_2 := "HMI KEY".ProgChoice_3.WorkPiece_2;

        "ModulDa".Pallet_Data.Workpiece_3 := "HMI KEY".ProgChoice_3.WorkPiece_3;

    END_IF;

    "DI MAIN P01".SEQ1.SEQ331.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ331.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ332.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ332.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ333.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ333.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ334.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ334.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ335.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ335.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ336.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ336.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ337.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ337.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ338.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ338.TrgtPos.Y :=

    "DI MAIN P01".SEQ1.SEQ339.TrgtPos.X := "DI MAIN P01".SEQ1.SEQ339.TrgtPos.Y := 0.0;

    "DI MAIN P01".SEQ1.SEQ331.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ332.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ333.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ334.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ335.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ336.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ337.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ338.MaxParts :=

    "DI MAIN P01".SEQ1.SEQ339.MaxParts :=

    "HMI KEY".Message.Index_Position := 0;

    "DI MAIN P01".to_P02_Pallet.Request :=

    "DI MAIN P02".to_P01_Pallet.ReadyToGo :=

    "DI MAIN P01".to_P02_Pallet.Done :=

    "DI MAIN P02".to_P01_Pallet.DoneACK :=

    "DI MAIN P01".to_P02_Pallet.DoneACK := FALSE;

END_IF;

#"M31".DRV.Occupied_REg := "E02 M31 FootSwitch" AND #tmp_operation_mode;

// Cancel pallet commission

#Support.CommisionCancel_TON(IN := #Support.CommisionCancel_Pb,

                              PT := #Support.CommisionCancel_TON.PT);

IF #Support.CommisionCancel_TON.Q THEN

     #M32_Pallet_Data := #tmp_del_pallet_data; // block move

END_IF;

Network 3: M31 Pallet inlet conveyor

#M31_Interface(STA_IMP := "E02 M31 FootSwitch" AND #tmp_operation_mode,

               HALT_01 := NOT #tmp_operation_mode,

               LIM_SENSOR := "E02 M31 LimSwitch",

               DELAY_ON := 20,

               ACTOR_ON => #"M31_Interface".Dummy_07,

               CC_PC := #"M31_Interface".DRV.VC,

               CC_NC := #"M32_Interface".DRV.CC,

               BLK_MOVE := #tmp_operation_mode AND NOT "DI MAIN P02".M00.Busy,

               SOURCE_BLK_DATA := "ModulDa".Pallet_Data,

               TARGET_BLK_DATA := #M31_Pallet_Data);

#"M31"(CMD_ONOFF := #"M31_Interface".Dummy_07 OR #M31.DRV.ActorJog_WP,

       HALT_01 := "DI MAIN GLB".M00.TOF_CmpltMaOFF_Pulse.Q OR NOT "DI MAIN GLB".M00.GLB_Estop,

       MCB := "E00 M31 MCB",

       ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

       IO_ADDRESS := 44);

Network 4: M32 Pallet pick-up conveyor

#M32_Interface(STA_IMP := "E02 M31 FootSwitch" AND #tmp_operation_mode,

               HALT_01 := NOT #tmp_operation_mode,

               LIM_SENSOR := "E02 M32 LimSwitch",

               DELAY_ON := 20,

               ACTOR_ON => #"M32_Interface".Dummy_07,

               CC_PC := #"M32_Interface".DRV.CC,

               CC_NC := #M33.DRV.CC,

               BLK_MOVE := #tmp_operation_mode AND NOT "DI MAIN P02".M00.Busy,

               SOURCE_BLK_DATA := #M31_Pallet_Data,

               TARGET_BLK_DATA := #M32_Pallet_Data);

#"M32"(CMD_ONOFF := #"M32_Interface".Dummy_07 OR #M32.DRV.ActorJog_WP,

       HALT_01 := "DI MAIN GLB".M00.TOF_CmpltMaOFF_Pulse.Q OR NOT "DI MAIN GLB".M00.GLB_Estop,

       MCB := "E00 M32 MCB",

       ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

       IO_ADDRESS := 46);

Network 5: M33 Pallet outlet conveyor

#"M33"(CMD_ONOFF := #M33.DRV.ActorJog_WP,

       HALT_01 := ("DI MAIN GLB".M00.TOF_CmpltMaOFF_Pulse.Q OR NOT "DI MAIN GLB".M00.GLB_Estop) AND NOT "E02 M33 SnsrCW",

       MCB := "E00 M33 MCB",

       ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

       IO_ADDRESS := 48);

Network 6: C401 Pallet fixing unit 1

#C401(CMD_HP := FALSE,

      CMD_WP := FALSE,

      FB_HP := "E02 C401 HP",

      FB_WP := "E02 C401 WP",

      RLS := "E00 AirPressure OK",

      ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_REg,

      VALV_HP => "A02 C401 HP",

      VALV_WP => "A02 C401 WP");

Network 7: C402 Pallet fixing unit 2

#C402(CMD_HP := FALSE,

      CMD_WP := FALSE,

      FB_HP := "E02 C402 HP",

      FB_WP := "E02 C402 WP",

      RLS := "E00 AirPressure OK",

      ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_REg,

      VALV_HP => "A02 C402 HP",

      VALV_WP => "A02 C402 WP");

Network 8: Y404 Pallet stopper inlet conveyor

#Y404(CMD_WP := #tmp_operation_mode AND "E02 M31 On",

      FB_HP := "E02 Y404 HP",

      FB_WP := "E02 Y404 WP",

      RLS := TRUE,

      ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

      VALV_WP => "A02 Y404 WP");

Network 9: Y406 Pallet stopper pick-up conveyor

#Y406(CMD_WP := FALSE,

      FB_HP := "E02 Y406 HP",

      FB_WP := "E02 Y406 WP",

      RLS := TRUE,

      ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

      VALV_WP => "A02 Y406 WP");

Network 10: Y410 Pallet stopper outlet conveyor

#Y410(CMD_WP := FALSE,//tmp_operation_mode AND "E02 M33 On",

      FB_HP := "E02 Y410 HP",

      FB_WP := "E02 Y410 WP",

      RLS := TRUE,

      ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

      VALV_WP => "A02 Y410 WP");

Network 11: Q24M_A Lubricant dispenser A

#Q24M_A(CMD_ONOFF := FALSE,

        FD_BACK := "E00 Q24M_A FdB",

        HALT_01 := FALSE,

        MCB := "E00 Q24M_A MCB",

        ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

        MOT_CW => "A00 Q24M_A CW");

Network 12: Q24M_B Lubricant dispenser B

#Q24M_B(CMD_ONOFF := FALSE,

        FD_BACK := "E00 Q24M_B FdB",

        HALT_01 := FALSE,

        MCB := "E00 Q24M_B MCB",

        ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

        MOT_CW => "A00 Q24M_B CW");

Network 13: M12 Air compressor

#M12(CMD_ONOFF := FALSE,

     FD_BACK := "E00 M12 FdB",

     HALT_01 := FALSE,

     MCB := "E00 M12 MCB",

     ACK_FLT := "DI MAIN GLB".M00.FLT_CmpltMaACK_Imp,

     MOT_CW => "A00 M12 CW");