FB OUT P02 : Assign output stage feeding

[hit  <- on your browser to return]

Network 1: Call Manual operation mode

#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

Network 3: M200 blister input conveyor

#M200(CMD_ONOFF := FALSE,

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

      MCB := "E00 M200 MCB",

      FD_BACK := "E00 M200 FdB",

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

      MOT_CW => "A00 M200 Cont");

Network 4: M201 syringe output conveyor

#M201(CMD_ONOFF := FALSE,

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

      MCB := "E00 M201 MCB",

      FD_BACK := "E00 M201 FdB",

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

      MOT_CW => "A00 M201 Cont");

Network 5: Y200 blister Pre-Stopper

IF "E02 Y200 After Pos" THEN

    #Y200.VLV_O.ActorJog_WP := FALSE;

ELSIF "DI MAIN GLB".M00.AutoCmpltMa_run AND NOT "E02 M200 Carrier atPos" AND ("DI MAIN GLB".M00.CmpltMaRun_Imp OR #Y201.VLV_O.Vacant_FEg_Imp) THEN

    #Y200.VLV_O.ActorJog_WP := TRUE;

END_IF;

#Y200(CMD_WP := #Y200.VLV_O.ActorJog_WP,

      FB_HP := "E02 Y200 HP",

      FB_WP := "E02 Y200 WP",

      RLS := TRUE,

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

      VALV_WP => "A02 Y200 WP");

Network 6: Y201 blister Stopper

// create raising edge to close Y201

#M200.DRV.Occupied_REg_Imp := "E02 M200 Carrier atPos" AND "DI MAIN GLB".M00.AutoCmpltMa_run AND NOT #M200.DRV.Occupied_REg;

#M200.DRV.Occupied_REg := "E02 M200 Carrier atPos";

// create falling edge to open pre-stopper when stopper vacant

#Y201.VLV_O.Vacant_FEg_Imp := NOT "E02 Y201 AfterPos" AND #Y201.VLV_O.Vacant_FEg;

#Y201.VLV_O.Vacant_FEg := "E02 Y201 AfterPos";

// Y200 blister stopper WP/HP

IF "DI MAIN GLB".M00.CmpltMaRun_Imp OR "E02 Y201 AfterPos" OR #M200.DRV.Occupied_REg_Imp THEN

    #Y201.VLV_O.ActorJog_WP := FALSE;

ELSIF "DI MAIN P01".to_P02_Feeding.Request AND NOT "E02 M200 Carrier atPos" THEN

    #Y201.VLV_O.ActorJog_WP := TRUE;

END_IF;

#Y201(CMD_WP := #Y201.VLV_O.ActorJog_WP,

      FB_HP := "E02 Y201 HP",

      FB_WP := "E02 Y201 WP",

      RLS := TRUE,

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

      VALV_WP => "A02 Y201 WP");