FUNCTION_BLOCK "FB_StockRemovalManagementLvl2"
{ S7_Optimized_Access := 'TRUE' }
VERSION : 0.1
   VAR_INPUT 
      udt_IN_MES : "UDT_Payload_CReqM";
      x_InQuit : Bool;
      n_JamCountAMR : UInt;
      n_JamCapacityAMRCriticalAmount : UInt;
      n_JamCountF2H : UInt;
      n_JamCapacityF2HCriticalAmount : UInt;
      n_JamCapacityEmpty : UInt;
      n_JamCapacityEmptyCriticalAmount : UInt;
      t_IN_RemovalWaitTime : Time;
   END_VAR
   VAR_INPUT RETAIN
      stStorage211BlockData : "UDT_StorageBlockData";   // Blockdaten
   END_VAR
   VAR_INPUT 
      stStorage212BlockData : "UDT_StorageBlockData";
      stStorage213BlockData : "UDT_StorageBlockData";
      stStorage214BlockData : "UDT_StorageBlockData";
   END_VAR
   VAR_INPUT RETAIN
      stStorage221BlockData : "UDT_StorageBlockData";   // Blockdaten
   END_VAR
   VAR_INPUT 
      stStorage222BlockData : "UDT_StorageBlockData";
      stStorage223BlockData : "UDT_StorageBlockData";
      stStorage224BlockData : "UDT_StorageBlockData";
   END_VAR
   VAR_INPUT RETAIN
      stStorage231BlockData : "UDT_StorageBlockData";   // Blockdaten
   END_VAR
   VAR_INPUT 
      stStorage232BlockData : "UDT_StorageBlockData";
      stStorage233BlockData : "UDT_StorageBlockData";
      stStorage234BlockData : "UDT_StorageBlockData";
   END_VAR

   VAR_IN_OUT 
      arrudt_InOut_MESPart : Array[*] of "UDT_Payload_CReqM";
      arLineBlk211 : Array[1.."cNoLines"] of "stStorageLine";   // Daten pro Linie
      arLineBlk212 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk213 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk214 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk221 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk222 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk223 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk224 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk231 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk232 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk233 : Array[1.."cNoLines"] of "stStorageLine";
      arLineBlk234 : Array[1.."cNoLines"] of "stStorageLine";
      udt_InOut_HandshakeDataMES : "udt_HandshakeMessageFromMES";
      arrudt_InOutMFRTRO : Array[1..12] of "UDT_MFR_StoreTRO";
      arrstr_InOut_FillingChart : Array[1..12] of Struct
         n_BLK : Int;
         udt_LineLvlBlk : "udt_LineLvl";
      END_STRUCT;
      arrstr_InOut_EmptyChart : Array[1..12] of Struct
         n_BLK : Int;
         udt_LineLvlBlk : "udt_LineLvl";
      END_STRUCT;
      arrudt_HMILines : Array[1..12] of "udt_LinienSortierungHMI";
      udt_InOutMessageToMesBlk211 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk212 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk213 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk214 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk221 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk222 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk223 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk224 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk231 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk232 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk233 : "udt_HandshakeMessageToMES";
      udt_InOutMessageToMesBlk234 : "udt_HandshakeMessageToMES";
      stIn_JamCarrierBlock1 : Struct
         stIn_JamCarrier2101 : Struct
            udt_JamCarrier2101_1 : Struct
               arCarrier : Array[1.."cJam2101_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2101_2 : Struct
               arCarrier : Array[1.."cJam2101_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2102 : Struct
            udt_JamCarrier2102_1 : Struct
               arCarrier : Array[1.."cJam2102_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2102_2 : Struct
               arCarrier : Array[1.."cJam2102_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2102_3 : Struct
               arCarrier : Array[1.."cJam2102_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2103 : Struct
            udt_JamCarrier2103_1 : Struct
               arCarrier : Array[1.."cJam2103_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2103_2 : Struct
               arCarrier : Array[1.."cJam2103_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2104 : Struct
            udt_JamCarrier2104_1 : Struct
               arCarrier : Array[1.."cJam2104_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2104_2 : Struct
               arCarrier : Array[1.."cJam2104_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2104_3 : Struct
               arCarrier : Array[1.."cJam2104_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2105 : Struct
            udt_JamCarrier2105_1 : Struct
               arCarrier : Array[1.."cJam2105_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2105_2 : Struct
               arCarrier : Array[1.."cJam2105_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2106 : Struct
            udt_JamCarrier2106_1 : Struct
               arCarrier : Array[1.."cJam2106_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2106_2 : Struct
               arCarrier : Array[1.."cJam2106_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2107 : Struct
            udt_JamCarrier2107_1 : Struct
               arCarrier : Array[1.."cJam2107_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2107_2 : Struct
               arCarrier : Array[1.."cJam2107_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2108 : Struct
            udt_JamCarrier2108_1 : Struct
               arCarrier : Array[1.."cJam2108_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2108_2 : Struct
               arCarrier : Array[1.."cJam2108_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2109 : Struct
            udt_JamCarrier2109_1 : Struct
               arCarrier : Array[1.."cJam2109_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2109_2 : Struct
               arCarrier : Array[1.."cJam2109_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
      END_STRUCT;
      stIn_JamCarrierBlock2 : Struct
         stIn_JamCarrier2201 : Struct
            udt_JamCarrier2201_1 : Struct
               arCarrier : Array[1.."cJam2201_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2201_2 : Struct
               arCarrier : Array[1.."cJam2201_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2202 : Struct
            udt_JamCarrier2202_1 : Struct
               arCarrier : Array[1.."cJam2202_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2202_2 : Struct
               arCarrier : Array[1.."cJam2202_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2202_3 : Struct
               arCarrier : Array[1.."cJam2202_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2203 : Struct
            udt_JamCarrier2203_1 : Struct
               arCarrier : Array[1.."cJam2203_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2203_2 : Struct
               arCarrier : Array[1.."cJam2203_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2204 : Struct
            udt_JamCarrier2204_1 : Struct
               arCarrier : Array[1.."cJam2204_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2204_2 : Struct
               arCarrier : Array[1.."cJam2204_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2204_3 : Struct
               arCarrier : Array[1.."cJam2204_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2205 : Struct
            udt_JamCarrier2205_1 : Struct
               arCarrier : Array[1.."cJam2205_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2205_2 : Struct
               arCarrier : Array[1.."cJam2205_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2206 : Struct
            udt_JamCarrier2206_1 : Struct
               arCarrier : Array[1.."cJam2206_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2206_2 : Struct
               arCarrier : Array[1.."cJam2206_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2207 : Struct
            udt_JamCarrier2207_1 : Struct
               arCarrier : Array[1.."cJam2207_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2207_2 : Struct
               arCarrier : Array[1.."cJam2207_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2208 : Struct
            udt_JamCarrier2208_1 : Struct
               arCarrier : Array[1.."cJam2208_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2208_2 : Struct
               arCarrier : Array[1.."cJam2208_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2209 : Struct
            udt_JamCarrier2209_1 : Struct
               arCarrier : Array[1.."cJam2209_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2209_2 : Struct
               arCarrier : Array[1.."cJam2209_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
      END_STRUCT;
      stIn_JamCarrierBlock3 : Struct
         stIn_JamCarrier2301 : Struct
            udt_JamCarrier2301_1 : Struct
               arCarrier : Array[1.."cJam2301_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2301_2 : Struct
               arCarrier : Array[1.."cJam2301_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2302 : Struct
            udt_JamCarrier2302_1 : Struct
               arCarrier : Array[1.."cJam2302_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2302_2 : Struct
               arCarrier : Array[1.."cJam2302_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2302_3 : Struct
               arCarrier : Array[1.."cJam2302_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2303 : Struct
            udt_JamCarrier2303_1 : Struct
               arCarrier : Array[1.."cJam2303_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2303_2 : Struct
               arCarrier : Array[1.."cJam2303_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2304 : Struct
            udt_JamCarrier2304_1 : Struct
               arCarrier : Array[1.."cJam2304_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2304_2 : Struct
               arCarrier : Array[1.."cJam2304_2"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2304_3 : Struct
               arCarrier : Array[1.."cJam2304_3"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2305 : Struct
            udt_JamCarrier2305_1 : Struct
               arCarrier : Array[1.."cJam2305_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2305_2 : Struct
               arCarrier : Array[1.."cJam2305_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2306 : Struct
            udt_JamCarrier2306_1 : Struct
               arCarrier : Array[1.."cJam2306_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2306_2 : Struct
               arCarrier : Array[1.."cJam2306_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2307 : Struct
            udt_JamCarrier2307_1 : Struct
               arCarrier : Array[1.."cJam2307_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2307_2 : Struct
               arCarrier : Array[1.."cJam2307_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2308 : Struct
            udt_JamCarrier2308_1 : Struct
               arCarrier : Array[1.."cJam2308_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2308_2 : Struct
               arCarrier : Array[1.."cJam2308_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
         stIn_JamCarrier2309 : Struct
            udt_JamCarrier2309_1 : Struct
               arCarrier : Array[1.."cJam2309_1"] of "stCarrier";
            END_STRUCT;
            udt_JamCarrier2309_2 : Struct
               arCarrier : Array[1.."cJam2309_2"] of "stCarrier";
            END_STRUCT;
         END_STRUCT;
      END_STRUCT;
      udt_InOutStorageBlockSequencerData : "udt_StorageSite";
   END_VAR

   VAR 
      n_StepBufferMES : Int;
      n_StepTransferMESToBLk : Int;
      n_UpperBoundBuffer : Int;
      n_LowerBoundBuffer : Int;
      n_EmptyElementIDX : Int;
      n_EmptyElementIDXSave : Int;
      n_TransferElementIDX : Int;
      n_TransferElementIDXSave : Int;
      n_RearrangelSequence : Int;
      n_BlockManegementSequence : Int;
      x_ResetTimer : Bool;
      tonr_StartRemoval {InstructionName := 'TON_TIME'; LibVersion := '1.0'; S7_SetPoint := 'False'} : TON_TIME;
      arrudt_MESPartDelete { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'} : Struct
         nBarcode { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'} : DInt;
         nDestination { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'} : Int;
         nStored { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'} : Int;
         nPriority { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'} : Int;
      END_STRUCT;
      udt_MESSave { S7_SetPoint := 'False'} : "UDT_Payload_CReqM";
      nSearchStorageDATAIdx : Int;
      Lfb_Blk211LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk211 : "udt_LineLvl";
      Lfb_Blk212LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk212 : "udt_LineLvl";
      Lfb_Blk213LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk213 : "udt_LineLvl";
      Lfb_Blk214LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk214 : "udt_LineLvl";
      Lfb_Blk221LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk221 : "udt_LineLvl";
      Lfb_Blk222LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk222 : "udt_LineLvl";
      Lfb_Blk223LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk223 : "udt_LineLvl";
      Lfb_Blk224LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk224 : "udt_LineLvl";
      Lfb_Blk231LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk231 : "udt_LineLvl";
      Lfb_Blk232LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk232 : "udt_LineLvl";
      Lfb_Blk233LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk233 : "udt_LineLvl";
      Lfb_Blk234LineAnalyze { S7_SetPoint := 'False'} : "FB_LineLvlAnalyze";
      udt_LineLvlBlk234 : "udt_LineLvl";
      nMaxFilledBLK { S7_SetPoint := 'True'} : USInt;
      nMaxFilledBLKSAve : USInt;
      nMaxFilledSecBLKSAve : USInt;
      nMaxFilledLine : USInt;
      nMaxFilledLineSAve : USInt;
      n_filledLineCounter : USInt;
      n_rearrangeLineCounter : USInt;
      udt_BlkBlocked { S7_SetPoint := 'False'} : "udt_Blkblocked";
      xStartStockRemovalProcess { S7_SetPoint := 'True'} : Bool;
      rtrig_StartStockRemoval {InstructionName := 'R_TRIG'; LibVersion := '1.0'; S7_SetPoint := 'False'} : R_TRIG;
      udt_MFRTRO { ExternalAccessible := 'False'; ExternalVisible := 'False'; ExternalWritable := 'False'; S7_SetPoint := 'False'} : "UDT_MFR_StoreTRO";
      Lfb_StockRemovalBlk211 { S7_SetPoint := 'False'} : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk212 { S7_SetPoint := 'False'} : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk213 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk214 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk221 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk222 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk223 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk224 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk231 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk232 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk233 : "FB_StockRemovalBLKModul";
      Lfb_StockRemovalBlk234 : "FB_StockRemovalBLKModul";
      arrudt_InOutHandshake : Array[1..12] of "udt_StockRemovalBlkHandshake";
      arrudt_InOutHandshakeEmpty : Array[1..12] of "udt_StockRemovalBlkHandshake";
      Lfb_Blk211LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk211 : "udt_LineLvl";
      Lfb_Blk212LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk212 : "udt_LineLvl";
      Lfb_Blk213LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk213 : "udt_LineLvl";
      Lfb_Blk214LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk214 : "udt_LineLvl";
      Lfb_Blk221LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk221 : "udt_LineLvl";
      Lfb_Blk222LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk222 : "udt_LineLvl";
      Lfb_Blk223LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk223 : "udt_LineLvl";
      Lfb_Blk224LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk224 : "udt_LineLvl";
      Lfb_Blk231LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk231 : "udt_LineLvl";
      Lfb_Blk232LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk232 : "udt_LineLvl";
      Lfb_Blk233LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk233 : "udt_LineLvl";
      Lfb_Blk234LineEmptyAnalyze { S7_SetPoint := 'False'} : "FB_LineEmptyAnalyze";
      udt_LineEmptyLvlBlk234 : "udt_LineLvl";
      str_StartBLKTimer : Struct
         xStartBLK211 : Bool;
         xStartBLK212 : Bool;
         xStartBLK213 : Bool;
         xStartBLK214 : Bool;
         xStartBLK221 : Bool;
         xStartBLK222 : Bool;
         xStartBLK223 : Bool;
         xStartBLK224 : Bool;
         xStartBLK231 : Bool;
         xStartBLK232 : Bool;
         xStartBLK233 : Bool;
         xStartBLK234 : Bool;
      END_STRUCT;
      nMaxEmptyBLK { S7_SetPoint := 'True'} : Int;
      nMaxEmptyBLKSave : Int := 1;
      nMaxEmptyLine : Int;
      nMaxFilledBlkAmount : Int;
      Lfb_BlkGrp1RearrangeSeq { S7_SetPoint := 'False'} : "FB_RearrangeSequencer";
      Lfb_BlkGrp2RearrangeSeq : "FB_RearrangeSequencer";
      Lfb_BlkGrp3RearrangeSeq : "FB_RearrangeSequencer";
      Lfb_StockRemoveSequencer : "FB_StockRemovalSequencerUDT";
      Lfb_StorageTaskScheduler : "FB_StorageTaskScheduler";
      Lfb_RearrangeStartCoordinator : "FB_RearrangeStartCoordination";
      x_Reset_Muss_Noch_Aufgelgt_Werden { S7_SetPoint := 'True'} : Bool;
      nCandLager : Int;
      nCandLine : Int;
   END_VAR

   VAR_TEMP 
      str_TempBlk21 : Struct
         tmpValue : Int;
         tmpIDX : Int;
         arr_StorageLvl : Array[1..19] of USInt;
         arr_Indizes : Array[1..19] of USInt;
      END_STRUCT;
      n_TempNextLine : USInt;
      n_StartResetIDX : USInt;
      xCarrierFound : Bool;
   END_VAR

   VAR CONSTANT 
      c1_Reset : Int := 1;
      cLinieOK : Byte := 16#FE;
      "~~~~~~~~~~StepsBufferMES~~~~~~~~~~~~~~" : Bool;
      c000_Wait : Int := 0;
      c010_NewData : Int := 10;
      c020_SearchEmptyElement : Int := 20;
      c030_Finish : Int := 30;
      c040_Reset : Int := 40;
      "~~~~~~~~~~StepsTransferBufferToBLK~~~~~~~~~~~~~~" : Int;
      c010_JumpPointData : Int;
      c020_SearchData : Int := 20;
      "~~~~~~~~~~StoreIDsSection211~~~~~~~~~~~~~~" : Int;
      cSection211Line01 : Int := 21101;
      cSection211Line02 : Int := 21102;
      cSection211Line03 : Int := 21103;
      cSection211Line04 : Int := 21104;
      cSection211Line05 : Int := 21105;
      cSection211Line06 : Int := 21106;
      cSection211Line07 : Int := 21107;
      cSection211Line08 : Int := 21108;
      cSection211Line09 : Int := 21109;
      cSection211Line10 : Int := 21110;
      cSection211Line11 : Int := 21111;
      cSection211Line12 : Int := 21112;
      cSection211Line13 : Int := 21113;
      cSection211Line14 : Int := 21114;
      cSection211Line15 : Int := 21115;
      cSection211Line16 : Int := 21116;
      cSection211Line17 : Int := 21117;
      cSection211Line18 : Int := 21118;
      cSection211Line19 : Int := 21119;
      cSection211Line20 : Int := 21120;
      cSection211Line21 : Int := 21121;
      "~~~~~~~~~~StoreIDsSection212~~~~~~~~~~~~~~" : Int;
      cSection212Line01 : Int := 21201;
      cSection212Line02 : Int := 21202;
      cSection212Line03 : Int := 21203;
      cSection212Line04 : Int := 21204;
      cSection212Line05 : Int := 21205;
      cSection212Line06 : Int := 21206;
      cSection212Line07 : Int := 21207;
      cSection212Line08 : Int := 21208;
      cSection212Line09 : Int := 21209;
      cSection212Line10 : Int := 21210;
      cSection212Line11 : Int := 21211;
      cSection212Line12 : Int := 21212;
      cSection212Line13 : Int := 21213;
      cSection212Line14 : Int := 21214;
      cSection212Line15 : Int := 21215;
      cSection212Line16 : Int := 21216;
      cSection212Line17 : Int := 21217;
      cSection212Line18 : Int := 21218;
      cSection212Line19 : Int := 21219;
      cSection212Line20 : Int := 21220;
      cSection212Line21 : Int := 21221;
      "~~~~~~~~~~StoreIDsSection213~~~~~~~~~~~~~~" : Int;
      cSection213Line01 : Int := 21301;
      cSection213Line02 : Int := 21302;
      cSection213Line03 : Int := 21303;
      cSection213Line04 : Int := 21304;
      cSection213Line05 : Int := 21305;
      cSection213Line06 : Int := 21306;
      cSection213Line07 : Int := 21307;
      cSection213Line08 : Int := 21308;
      cSection213Line09 : Int := 21309;
      cSection213Line10 : Int := 21310;
      cSection213Line11 : Int := 21311;
      cSection213Line12 : Int := 21312;
      cSection213Line13 : Int := 21313;
      cSection213Line14 : Int := 21314;
      cSection213Line15 : Int := 21315;
      cSection213Line16 : Int := 21316;
      cSection213Line17 : Int := 21317;
      cSection213Line18 : Int := 21318;
      cSection213Line19 : Int := 21319;
      cSection213Line20 : Int := 21320;
      cSection213Line21 : Int := 21321;
      "~~~~~~~~~~StoreIDsSection214~~~~~~~~~~~~~~" : Int;
      cSection214Line01 : Int := 21401;
      cSection214Line02 : Int := 21402;
      cSection214Line03 : Int := 21403;
      cSection214Line04 : Int := 21404;
      cSection214Line05 : Int := 21405;
      cSection214Line06 : Int := 21406;
      cSection214Line07 : Int := 21407;
      cSection214Line08 : Int := 21408;
      cSection214Line09 : Int := 21409;
      cSection214Line10 : Int := 21410;
      cSection214Line11 : Int := 21411;
      cSection214Line12 : Int := 21412;
      cSection214Line13 : Int := 21413;
      "~~~~~~~~~~StoreIDsSection221~~~~~~~~~~~~~~" : Int;
      cSection221Line01 : Int := 22101;
      cSection221Line02 : Int := 22102;
      cSection221Line03 : Int := 22103;
      cSection221Line04 : Int := 22104;
      cSection221Line05 : Int := 22105;
      cSection221Line06 : Int := 22106;
      cSection221Line07 : Int := 22107;
      cSection221Line08 : Int := 22108;
      cSection221Line09 : Int := 22109;
      cSection221Line10 : Int := 22110;
      cSection221Line11 : Int := 22111;
      cSection221Line12 : Int := 22112;
      cSection221Line13 : Int := 22113;
      cSection221Line14 : Int := 22114;
      cSection221Line15 : Int := 22115;
      cSection221Line16 : Int := 22116;
      cSection221Line17 : Int := 22117;
      cSection221Line18 : Int := 22118;
      cSection221Line19 : Int := 22119;
      "~~~~~~~~~~StoreIDsSection222~~~~~~~~~~~~~~" : Int;
      cSection222Line01 : Int := 22201;
      cSection222Line02 : Int := 22202;
      cSection222Line03 : Int := 22203;
      cSection222Line04 : Int := 22204;
      cSection222Line05 : Int := 22205;
      cSection222Line06 : Int := 22206;
      cSection222Line07 : Int := 22207;
      cSection222Line08 : Int := 22208;
      cSection222Line09 : Int := 22209;
      cSection222Line10 : Int := 22210;
      cSection222Line11 : Int := 22211;
      cSection222Line12 : Int := 22212;
      cSection222Line13 : Int := 22213;
      cSection222Line14 : Int := 22214;
      cSection222Line15 : Int := 22215;
      cSection222Line16 : Int := 22216;
      cSection222Line17 : Int := 22217;
      cSection222Line18 : Int := 22218;
      cSection222Line19 : Int := 22219;
      "~~~~~~~~~~StoreIDsSection223~~~~~~~~~~~~~~" : Int;
      cSection223Line01 : Int := 22301;
      cSection223Line02 : Int := 22302;
      cSection223Line03 : Int := 22303;
      cSection223Line04 : Int := 22304;
      cSection223Line05 : Int := 22305;
      cSection223Line06 : Int := 22306;
      cSection223Line07 : Int := 22307;
      cSection223Line08 : Int := 22308;
      cSection223Line09 : Int := 22309;
      cSection223Line10 : Int := 22310;
      cSection223Line11 : Int := 22311;
      cSection223Line12 : Int := 22312;
      cSection223Line13 : Int := 22313;
      cSection223Line14 : Int := 22314;
      cSection223Line15 : Int := 22315;
      cSection223Line16 : Int := 22316;
      cSection223Line17 : Int := 22317;
      cSection223Line18 : Int := 22318;
      cSection223Line19 : Int := 22319;
      cSection223Line20 : Int := 22320;
      cSection223Line21 : Int := 22321;
      "~~~~~~~~~~StoreIDsSection224~~~~~~~~~~~~~~" : Int;
      cSection224Line01 : Int := 22401;
      cSection224Line02 : Int := 22402;
      cSection224Line03 : Int := 22403;
      cSection224Line04 : Int := 22404;
      cSection224Line05 : Int := 22405;
      cSection224Line06 : Int := 22406;
      cSection224Line07 : Int := 22407;
      cSection224Line08 : Int := 22408;
      cSection224Line09 : Int := 22409;
      cSection224Line10 : Int := 22410;
      cSection224Line11 : Int := 22411;
      cSection224Line12 : Int := 22412;
      cSection224Line13 : Int := 22413;
      "~~~~~~~~~~StoreIDsSection231~~~~~~~~~~~~~~" : Int;
      cSection231Line01 : Int := 23101;
      cSection231Line02 : Int := 23102;
      cSection231Line03 : Int := 23103;
      cSection231Line04 : Int := 23104;
      cSection231Line05 : Int := 23105;
      cSection231Line06 : Int := 23106;
      cSection231Line07 : Int := 23107;
      cSection231Line08 : Int := 23108;
      cSection231Line09 : Int := 23109;
      cSection231Line10 : Int := 23110;
      cSection231Line11 : Int := 23111;
      cSection231Line12 : Int := 23112;
      cSection231Line13 : Int := 23113;
      cSection231Line14 : Int := 23114;
      cSection231Line15 : Int := 23115;
      cSection231Line16 : Int := 23116;
      cSection231Line17 : Int := 23117;
      cSection231Line18 : Int := 23118;
      cSection231Line19 : Int := 23119;
      "~~~~~~~~~~StoreIDsSection232~~~~~~~~~~~~~~" : Int;
      cSection232Line01 : Int := 23201;
      cSection232Line02 : Int := 23202;
      cSection232Line03 : Int := 23203;
      cSection232Line04 : Int := 23204;
      cSection232Line05 : Int := 23205;
      cSection232Line06 : Int := 23206;
      cSection232Line07 : Int := 23207;
      cSection232Line08 : Int := 23208;
      cSection232Line09 : Int := 23209;
      cSection232Line10 : Int := 23210;
      cSection232Line11 : Int := 23211;
      cSection232Line12 : Int := 23212;
      cSection232Line13 : Int := 23213;
      cSection232Line14 : Int := 23214;
      cSection232Line15 : Int := 23215;
      cSection232Line16 : Int := 23216;
      cSection232Line17 : Int := 23217;
      cSection232Line18 : Int := 23218;
      cSection232Line19 : Int := 23219;
      "~~~~~~~~~~StoreIDsSection233~~~~~~~~~~~~~~" : Int;
      cSection233Line01 : Int := 23301;
      cSection233Line02 : Int := 23302;
      cSection233Line03 : Int := 23303;
      cSection233Line04 : Int := 23304;
      cSection233Line05 : Int := 23305;
      cSection233Line06 : Int := 23306;
      cSection233Line07 : Int := 23307;
      cSection233Line08 : Int := 23308;
      cSection233Line09 : Int := 23309;
      cSection233Line10 : Int := 23310;
      cSection233Line11 : Int := 23311;
      cSection233Line12 : Int := 23312;
      cSection233Line13 : Int := 23313;
      cSection233Line14 : Int := 23314;
      cSection233Line15 : Int := 23315;
      cSection233Line16 : Int := 23316;
      cSection233Line17 : Int := 23317;
      cSection233Line18 : Int := 23318;
      cSection233Line19 : Int := 23319;
      cSection233Line20 : Int := 23320;
      cSection233Line21 : Int := 23321;
      "~~~~~~~~~~StoreIDsSection234~~~~~~~~~~~~~~" : Int;
      cSection234Line01 : Int := 23401;
      cSection234Line02 : Int := 23402;
      cSection234Line03 : Int := 23403;
      cSection234Line04 : Int := 23404;
      cSection234Line05 : Int := 23405;
      cSection234Line06 : Int := 23406;
      cSection234Line07 : Int := 23407;
      cSection234Line08 : Int := 23408;
      cSection234Line09 : Int := 23409;
      cSection234Line10 : Int := 23410;
      cSection234Line11 : Int := 23411;
      cSection234Line12 : Int := 23412;
      cSection234Line13 : Int := 23413;
      cSection234Line14 : Int := 23414;
      cSection234Line15 : Int := 23415;
      cBlock211 : Int := 211;
      cBlock212 : Int := 212;
      cBlock213 : Int := 213;
      cBlock214 : Int := 214;
      cBlock221 : Int := 221;
      cBlock222 : Int := 222;
      cBlock223 : Int := 223;
      cBlock224 : Int := 224;
      cBlock231 : Int := 231;
      cBlock232 : Int := 232;
      cBlock233 : Int := 233;
      cBlock234 : Int := 234;
      "~~~~~~~~ArrayElemente~~~~~~~~~~~~" : Int;
      c211 : USInt := 1;
      c212 : USInt := 2;
      c213 : USInt := 3;
      c214 : USInt := 4;
      c221 : USInt := 5;
      c222 : USInt := 6;
      c223 : USInt := 7;
      c224 : USInt := 8;
      c231 : USInt := 9;
      c232 : USInt := 10;
      c233 : USInt := 11;
      c234 : USInt := 12;
      "~~~~~RearrangeSequence~~~~~" : Int;
      c0000_Wait : Int := 0;
      c0010_SearchLine : Int := 10;
      c0030_StartRearrange : Int := 30;
      c0020_CalculateAmount : Int := 20;
      c0040_CheckCarrier : Int := 40;
      c0050_ResetTRO : Int := 50;
      c0060_CheckMoreLines : Int := 60;
      c0900_Error : Int := 900;
      "~~~~~StockRemovalSequence~~~~~" : Int;
      c0010_CheckSituation : Int := 10;
      c0015_StartEmptyCarrierRemoval : Int := 15;
      c0020_StartCarrierRemoval : Int := 20;
      c0030_WaitForJobDone : Int := 30;
      c0040_Reset : Int := 40;
      "~~~~~ErrorID~~~~~" : Int;
      c0010_NoLineFound : Int := 10;
      "~~~~~Destinations~~~~~" : Int;
      c01_AMR : Int := 1;
      c02_F2H : Int := 2;
   END_VAR


BEGIN
	REGION Info
	(* Company: Schönenberger Systeme GmbH / (C) Copyright (2022). All rights reserved.
	-----------------------------------------------------------------------------------------
	Title: FB_StockRemovalManagement
	Comment/Function: manages stock removal out of the individual storage areas
	Library/Family: -
	Author: department: "Automatisierung" ; person in charge / contact: C.Nottelmann (Automated Intelligence)
	Target System: CPU 1518F-4 PN/DP
	Engineering: TIA Portal V20
	Restrictions: -
	Requirements: -
	-----------------------------------------------------------------------------------------
	Change log table:
	Version     | Date       | Signature (Safety) | Expert in charge | Changes applied
	------------|------------|--------------------|------------------|-----------------------
	001.000.000 | 2025-06-12 | -                  |                  | Header added on 12.06.2025
	                                                                   
	*)
	END_REGION
	
	REGION ToDo / Brainstorm
	    
	    (*
	      !Check! Buffern der Schuttelanforderung von MES
	      !Check!Prüfen ob Linie zum Sortieren frei ist / umsortierun erforderlich ist
	      -Prio verarbeitung
	      !Check!Ausleiten je nach Kapazität und Ziel (AMR / F2h)
	      -Positionsfehler Carrier erkennen
	      -Reorganisieren der Carrier bei mehrfachen Positionsfehlern
	      !Check! Ausleiten Blockweise
	       
	       
	       
	       
	       *NEW*
	       !Check! Modulare Blockverarbeitung 
	       !Check! Jeder Block eigene Auswertzeit
	       !Check! str_IN_MES durch udt ersetzen 
	       !Check! Message wenn angeforderter Carrier nicht gefunden
	       !Check! Message wenn angeforderter Carrier gefunden
	    *)
	    
	    
	END_REGION
	
	
	REGION Times & Trigger  
	    #tonr_StartRemoval(IN := #n_BlockManegementSequence = #c0000_Wait,
	                       //R:=#x_ResetTimer,
	                       PT := #t_IN_RemovalWaitTime);
	END_REGION
	
	REGION check Array size
	    //MES Buffer
	    #n_LowerBoundBuffer := DINT_TO_USINT(LOWER_BOUND(ARR := #arrudt_InOut_MESPart, DIM := 1));
	    #n_UpperBoundBuffer := DINT_TO_USINT(UPPER_BOUND(ARR := #arrudt_InOut_MESPart, DIM := 1));
	    
	END_REGION
	
	REGION Buffer MES Message
	    
	    CASE #n_StepBufferMES OF
	        #c000_Wait:
	            //Action
	            
	            //Transition
	            IF #udt_InOut_HandshakeDataMES.str_Ctrl.xNewDataAvaible THEN
	                #n_StepBufferMES := #c010_NewData;
	            END_IF;
	            
	        #c010_NewData:
	            //Action
	            #udt_MESSave := #udt_IN_MES;
	            #udt_InOut_HandshakeDataMES.str_Status.xReadingNewData := True;
	            
	            //Transition
	            IF #udt_MESSave.nBarcode > 0 THEN
	                #n_StepBufferMES := #c020_SearchEmptyElement;
	                //Else Error
	            END_IF;
	            
	        #c020_SearchEmptyElement:
	            
	            //Action
	            FOR #n_EmptyElementIDX := #n_LowerBoundBuffer TO #n_UpperBoundBuffer DO 
	                IF #arrudt_InOut_MESPart[#n_EmptyElementIDX].nBarcode = 0
	                THEN
	                    #n_EmptyElementIDXSave := #n_EmptyElementIDX;
	                    #arrudt_InOut_MESPart[#n_EmptyElementIDX] := #udt_IN_MES;
	                    #udt_InOut_HandshakeDataMES.str_Status.xNewDataSaved := True;
	                    #udt_InOut_HandshakeDataMES.str_Status.xReadingNewData := False;
	                    EXIT;
	                END_IF;
	                
	            END_FOR;
	            
	            
	            //Transition
	            IF #arrudt_InOut_MESPart[#n_EmptyElementIDXSave].nBarcode > 0
	            THEN
	                #n_StepBufferMES := #c030_Finish;
	            END_IF;
	            
	        #c030_Finish:
	            // Action
	            
	            //Transition
	            IF NOT #udt_InOut_HandshakeDataMES.str_Ctrl.xNewDataAvaible
	            THEN
	                #n_StepBufferMES := #c040_Reset;
	            END_IF;
	            
	        #c040_Reset:
	            //Action
	            #udt_InOut_HandshakeDataMES.str_Status.xReadingNewData := False;
	            #udt_InOut_HandshakeDataMES.str_Status.xNewDataSaved := False;
	            #udt_InOut_HandshakeDataMES.str_Status.xDataIncorrect := False;
	            #n_EmptyElementIDXSave := 0;
	            
	            //Transition
	            #n_StepBufferMES := #c000_Wait;
	            
	    END_CASE;
	    
	    
	END_REGION
	
	REGION Transfer from MES Message to Blk 
	    REGION Search Data
	        FOR #n_TransferElementIDX := #n_LowerBoundBuffer TO #n_UpperBoundBuffer DO
	            IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode > 0
	            THEN
	                CASE #arrudt_InOut_MESPart[#n_TransferElementIDX].nLocation OF
	                    #cSection211Line01:
	                        REGION cSection211Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line02:
	                        REGION cSection211Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line03:
	                        REGION cSection211Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line04:
	                        REGION cSection211Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line05:
	                        REGION cSection211Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line06:
	                        REGION cSection211Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line07:
	                        REGION cSection211Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE; //Embi
	                                    EXIT; //gefunden, fertig
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line08:
	                        REGION cSection211Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line09:
	                        REGION cSection211Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line10:
	                        REGION cSection211Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line11:
	                        REGION cSection211Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                    #cSection211Line12:
	                        REGION cSection211Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line13:
	                        REGION cSection211Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line14:
	                        REGION cSection211Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line15:
	                        REGION cSection211Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line16:
	                        REGION cSection211Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line17:
	                        REGION cSection211Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line18:
	                        REGION cSection211Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line19:
	                        REGION cSection211Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line20:
	                        REGION cSection211Line20
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[20].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection211Line21:
	                        REGION cSection211Line21
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk211[21].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK211 := True;
	                                    #arLineBlk211[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk211[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk211[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line01:
	                        REGION cSection212Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line02:
	                        REGION cSection212Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line03:
	                        REGION cSection212Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line04:
	                        REGION cSection212Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line05:
	                        REGION cSection212Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line06:
	                        REGION cSection212Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line07:
	                        REGION cSection212Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line08:
	                        REGION cSection212Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line09:
	                        REGION cSection212Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line10:
	                        REGION cSection212Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line11:
	                        REGION cSection212Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line12:
	                        REGION cSection212Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line13:
	                        REGION cSection212Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line14:
	                        REGION cSection212Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line15:
	                        REGION cSection212Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line16:
	                        REGION cSection212Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line17:
	                        REGION cSection212Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line18:
	                        REGION cSection212Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line19:
	                        REGION cSection212Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line20:
	                        REGION cSection212Line20
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[20].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection212Line21:
	                        REGION cSection212Line21
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk212[21].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK212 := True;
	                                    #arLineBlk212[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk212[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk212[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line01:
	                        REGION cSection213Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line02:
	                        REGION cSection213Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line03:
	                        REGION cSection213Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line04:
	                        REGION cSection213Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line05:
	                        REGION cSection213Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line06:
	                        REGION cSection213Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line07:
	                        REGION cSection213Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line08:
	                        REGION cSection213Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line09:
	                        REGION cSection213Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line10:
	                        REGION cSection213Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line11:
	                        REGION cSection213Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line12:
	                        REGION cSection213Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line13:
	                        REGION cSection213Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection213Line14:
	                        REGION cSection213Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line15:
	                        REGION cSection213Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line16:
	                        REGION cSection213Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line17:
	                        REGION cSection213Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line18:
	                        REGION cSection213Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line19:
	                        REGION cSection213Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line20:
	                        REGION cSection213Line20
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[20].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection213Line21:
	                        REGION cSection213Line21
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk213[21].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK213 := True;
	                                    #arLineBlk213[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk213[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk213[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line01:
	                        REGION cSection214Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line02:
	                        REGION cSection214Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line03:
	                        REGION cSection214Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line04:
	                        REGION cSection214Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line05:
	                        REGION cSection214Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line06:
	                        REGION cSection214Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line07:
	                        REGION cSection214Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection214Line08:
	                        REGION cSection214Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line09:
	                        REGION cSection214Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line10:
	                        REGION cSection214Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line11:
	                        REGION cSection214Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection214Line12:
	                        REGION cSection214Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection214Line13:
	                        REGION cSection214Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk214[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK214 := True;
	                                    #arLineBlk214[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk214[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk214[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line01:
	                        REGION cSection221Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line02:
	                        REGION Section221Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line03:
	                        REGION cSection221Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line04:
	                        REGION cSection221Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line05:
	                        REGION cSection221Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line06:
	                        REGION cSection221Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line07:
	                        REGION cSection221Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line08:
	                        REGION cSection221Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line09:
	                        REGION cSection221Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line10:
	                        REGION cSection221Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line11:
	                        REGION cSection221Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line12:
	                        REGION cSection221Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection221Line13:
	                        REGION cSection221Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk221[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK221 := True;
	                                    #arLineBlk221[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk221[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk221[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                        
	                    #cSection222Line01:
	                        REGION cSection222Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line02:
	                        REGION cSection222Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line03:
	                        REGION cSection222Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line04:
	                        REGION cSection222Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line05:
	                        REGION cSection222Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line06:
	                        REGION cSection222Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line07:
	                        REGION cSection222Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line08:
	                        REGION cSection222Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line09:
	                        REGION cSection222Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line10:
	                        REGION cSection222Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                    
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line11:
	                        REGION cSection222Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line12:
	                        REGION cSection222Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line13:
	                        REGION cSection222Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line14:
	                        REGION cSection222Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line15:
	                        REGION cSection222Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line16:
	                        REGION cSection222Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection222Line17:
	                        REGION cSection222Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk222[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK222 := True;
	                                    #arLineBlk222[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk222[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk222[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                        
	                    #cSection223Line01:
	                        REGION cSection223Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line02:
	                        REGION cSection223Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line03:
	                        REGION cSection223Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line04:
	                        REGION cSection223Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line05:
	                        REGION cSection223Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line06:
	                        REGION cSection223Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line07:
	                        REGION cSection223Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line08:
	                        REGION cSection223Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line09:
	                        REGION cSection223Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line10:
	                        REGION cSection223Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line11:
	                        REGION cSection223Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line12:
	                        REGION cSection223Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line13:
	                        REGION cSection223Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line14:
	                        REGION cSection223Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line15:
	                        REGION cSection223Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line16:
	                        REGION cSection223Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line17:
	                        REGION cSection223Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line18:
	                        REGION cSection223Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line19:
	                        REGION cSection223Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection223Line20:
	                        REGION cSection223Line20
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[20].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection223Line21:
	                        REGION cSection223Line21
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk223[21].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK223 := True;
	                                    #arLineBlk223[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk223[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk223[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line01:
	                        REGION cSection224Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line02:
	                        REGION cSection224Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line03:
	                        REGION cSection224Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line04:
	                        REGION cSection224Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line05:
	                        REGION cSection224Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line06:
	                        REGION cSection224Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line07:
	                        REGION cSection224Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection224Line08:
	                        REGION cSection224Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line09:
	                        REGION cSection224Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line10:
	                        REGION cSection224Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line11:
	                        REGION cSection224Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line12:
	                        REGION cSection224Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection224Line13:
	                        REGION cSection224Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk224[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK224 := True;
	                                    #arLineBlk224[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk224[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk224[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line01:
	                        REGION cSection231Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line02:
	                        REGION cSection231Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line03:
	                        REGION cSection231Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection231Line04:
	                        REGION cSection231Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line05:
	                        REGION cSection231Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line06:
	                        REGION cSection231Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line07:
	                        REGION cSection231Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line08:
	                        REGION cSection231Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line09:
	                        REGION cSection231Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line10:
	                        REGION cSection231Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line11:
	                        REGION cSection231Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line12:
	                        REGION cSection231Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line13:
	                        REGION cSection231Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line14:
	                        REGION cSection231Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line15:
	                        REGION cSection231Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection231Line16:
	                        REGION cSection231Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line17:
	                        REGION cSection231Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line18:
	                        REGION cSection231Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection231Line19:
	                        REGION cSection231Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk231[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK231 := True;
	                                    #arLineBlk231[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk231[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk231[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line01:
	                        REGION cSection232Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line02:
	                        REGION cSection232Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                                
	                                
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line03:
	                        REGION cSection232Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line04:
	                        REGION cSection232Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line05:
	                        REGION cSection232Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line06:
	                        REGION cSection232Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection232Line07:
	                        REGION cSection232Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line08:
	                        REGION cSection232Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line09:
	                        REGION cSection232Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection232Line10:
	                        REGION cSection232Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line11:
	                        REGION cSection232Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line12:
	                        REGION cSection232Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line13:
	                        REGION cSection232Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line14:
	                        REGION cSection232Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line15:
	                        REGION cSection232Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line16:
	                        REGION cSection232Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection232Line17:
	                        REGION cSection232Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk232[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK232 := True;
	                                    #arLineBlk232[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk232[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk232[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line01:
	                        REGION cSection233Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line02:
	                        REGION cSection233Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection233Line03:
	                        REGION cSection233Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line04:
	                        REGION cSection233Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line05:
	                        REGION cSection233Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line06:
	                        REGION cSection233Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line07:
	                        REGION cSection233Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line08:
	                        REGION cSection233Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line09:
	                        REGION cSection233Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line10:
	                        REGION cSection233Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection233Line11:
	                        REGION cSection233Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line12:
	                        REGION cSection233Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line13:
	                        REGION cSection233Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line14:
	                        REGION cSection233Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line15:
	                        REGION cSection233Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line16:
	                        REGION cSection233Line16
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[16].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[16].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line17:
	                        REGION cSection233Line17
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[17].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[17].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line18:
	                        REGION cSection233Line18
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[18].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[18].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line19:
	                        REGION cSection233Line19
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[19].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[19].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line20:
	                        REGION cSection233Line20
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[20].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[20].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection233Line21:
	                        REGION cSection233Line21
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk233[21].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK233 := True;
	                                    #arLineBlk233[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk233[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk233[21].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line01:
	                        REGION cSection234Line01
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[1].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[1].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line02:
	                        REGION cSection234Line02
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[2].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[2].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line03:
	                        REGION cSection234Line03
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[3].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[3].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line04:
	                        REGION cSection234Line04
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[4].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[4].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line05:
	                        REGION cSection234Line05
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[5].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[5].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line06:
	                        REGION cSection234Line06
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[6].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[6].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line07:
	                        REGION cSection234Line07
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[7].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[7].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                        
	                    #cSection234Line08:
	                        REGION cSection234Line08
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[8].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[8].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line09:
	                        REGION cSection234Line09
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[9].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[9].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line10:
	                        REGION cSection234Line10
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[10].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[10].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line11:
	                        REGION cSection234Line11
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[11].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[11].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line12:
	                        REGION cSection234Line12
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[12].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[12].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line13:
	                        REGION cSection234Line13
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[13].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[13].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line14:
	                        REGION cSection234Line14
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[14].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[14].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                        
	                    #cSection234Line15:
	                        REGION cSection234Line15
	                            FOR #nSearchStorageDATAIdx := 1 TO "cNoPositions" DO
	                                IF #arLineBlk234[15].arCarrier[#nSearchStorageDATAIdx].nBarcode = #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode
	                                THEN
	                                    #str_StartBLKTimer.xStartBLK234 := True;
	                                    #arLineBlk234[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X5 := True;
	                                    IF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c01_AMR
	                                        
	                                    THEN
	                                        ;
	                                        #arLineBlk234[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X8 := True;
	                                    ELSIF #arrudt_InOut_MESPart[#n_TransferElementIDX].nDestination = #c02_F2H
	                                    THEN
	                                        ;
	                                        #arLineBlk234[15].arCarrier[#nSearchStorageDATAIdx].bStatus.%X9 := True;
	                                    END_IF;
	                                    #xCarrierFound := TRUE;
	                                    EXIT;
	                                END_IF;
	                            END_FOR;
	                        END_REGION
	                END_CASE;
	                
	                //Am Ende vom CASE angekommen
	                IF #xCarrierFound THEN
	                    "FC_Send_CRRespM"(sInPLCID:= "cPLCIDUH03",
	                                      nInBarcode:= #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode, //prüfen
	                                      nInReasonCode:= 5, // 5 = in progress, WES specification
	                                      FIFO:="DB_LGF_FIFO_CommWES_ASRS",
	                                      BUFFER:="DB_Buffer_CommunicationWES_ASRS".BUFFER,
	                                      nInOutSequenceNumber:="DB_CommunicationParameters".nSeqNumWESASRS);
	                ELSE
	                    "FC_Send_CRRespM"(sInPLCID := "cPLCIDUH03",
	                                      nInBarcode := #arrudt_InOut_MESPart[#n_TransferElementIDX].nBarcode, //prüfen
	                                      nInReasonCode := 2, // 2 = retrieve fail, WES specification
	                                      FIFO := "DB_LGF_FIFO_CommWES_ASRS",
	                                      BUFFER := "DB_Buffer_CommunicationWES_ASRS".BUFFER,
	                                      nInOutSequenceNumber:="DB_CommunicationParameters".nSeqNumWESASRS);
	                END_IF;
	                
	                
	            END_IF;
	        END_FOR;
	    END_REGION
	END_REGION
	
	REGION Analyse Lines
	    REGION Block 21
	        //Nur Ausführen wenn Prozess nicht aktiv!!!!!!
	        
	        REGION Blk211
	            
	            #Lfb_Blk211LineAnalyze(arLineBlk := #arLineBlk211,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c211].udt_LineLvlBlk);
	            
	            
	            
	            
	            
	        END_REGION
	        
	        REGION Blk212
	            
	            #Lfb_Blk212LineAnalyze(arLineBlk := #arLineBlk212,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk213
	            
	            #Lfb_Blk213LineAnalyze(arLineBlk := #arLineBlk213,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk214
	            
	            #Lfb_Blk214LineAnalyze(arLineBlk := #arLineBlk214,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk);
	            
	            
	        END_REGION
	    END_REGION
	    
	    REGION Block 22
	        REGION Blk221
	            
	            #Lfb_Blk221LineAnalyze(arLineBlk := #arLineBlk221,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk222
	            
	            #Lfb_Blk222LineAnalyze(arLineBlk := #arLineBlk222,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk223
	            
	            #Lfb_Blk223LineAnalyze(arLineBlk := #arLineBlk223,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk224
	            
	            #Lfb_Blk224LineAnalyze(arLineBlk := #arLineBlk224,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk);
	            
	            
	        END_REGION
	    END_REGION
	    
	    REGION Block 23
	        REGION Blk231
	            
	            #Lfb_Blk231LineAnalyze(arLineBlk := #arLineBlk231,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk232
	            
	            #Lfb_Blk232LineAnalyze(arLineBlk := #arLineBlk232,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk233
	            
	            #Lfb_Blk233LineAnalyze(arLineBlk := #arLineBlk233,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	        REGION Blk234
	            
	            #Lfb_Blk234LineAnalyze(arLineBlk := #arLineBlk234,
	                                   str_OutState => #arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk);
	            
	            
	        END_REGION
	        
	    END_REGION
	    
	END_REGION
	
	REGION Storage Block
	    // Prüfen welcher Block am meisten eingelagert hat und als nächstes auslagern muss
	    
	    #nMaxFilledBLK := #c211;
	    #nMaxFilledBlkAmount := #arrstr_InOut_FillingChart[#c211].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c211].udt_LineLvlBlk.arr_OrderLines[1]];
	    #nMaxFilledLine := #arrstr_InOut_FillingChart[#c211].udt_LineLvlBlk.arr_OrderLines[1];
	    
	    
	    IF #arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c212;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk.arr_OrderLines[1];
	        ;
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c213;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c214;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c221;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c222;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c223;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c224;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c231;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c232;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c233;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	    IF #arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk.arr_OrderLines[1]] > #nMaxFilledBlkAmount
	        AND ((#arLineBlk212[#arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk.n_LineMAX].stData.Status.bByte AND #cLinieOK) = 0)
	    THEN
	        #nMaxFilledBLK := #c234;
	        #nMaxFilledLine := #arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk.arr_OrderLines[1];
	    END_IF;
	    
	END_REGION
	
	REGION Enable Block
	    
	    REGION Storage Block 
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[1].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[1].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage211BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[2].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[2].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage212BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[3].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[3].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage213BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[4].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[4].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage214BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[5].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[5].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage221BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[6].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[6].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage222BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[7].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[7].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage223BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[8].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[8].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage224BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[9].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[9].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage231BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[10].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[10].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage232BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[11].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[11].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage233BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[12].udt_RearrangeStorageCtrl.xEnableReaarrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_Storage[12].udt_RearrangeStorageCtrl.xEnableRemove :=
	        NOT #stStorage234BlockData.xError;
	        
	    END_REGION
	    REGION Enable Block Group
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[1].udt_BlockGroupCtrl.xReadyRearrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[1].udt_BlockGroupCtrl.xReadyRemove :=
	        NOT #stStorage211BlockData.xError AND NOT #stStorage212BlockData.xError
	        AND NOT #stStorage213BlockData.xError AND NOT #stStorage214BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[2].udt_BlockGroupCtrl.xReadyRearrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[2].udt_BlockGroupCtrl.xReadyRemove :=
	        NOT #stStorage221BlockData.xError AND NOT #stStorage222BlockData.xError
	        AND NOT #stStorage223BlockData.xError AND NOT #stStorage224BlockData.xError;
	        
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[3].udt_BlockGroupCtrl.xReadyRearrange :=
	        #udt_InOutStorageBlockSequencerData.arrudt_BlockGroup[3].udt_BlockGroupCtrl.xReadyRemove :=
	        NOT #stStorage231BlockData.xError AND NOT #stStorage232BlockData.xError
	        AND NOT #stStorage233BlockData.xError AND NOT #stStorage234BlockData.xError;
	        
	    END_REGION
	    
	    
	END_REGION
	
	REGION Rearrange Start Coordinator
	    
	    //Start Telegramm/Timer Mapping
	    //
	    //Zum Testen deaktiviert
	    //
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[1].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK211;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[2].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK212;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[3].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK213;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[4].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK214;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[5].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK221;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[6].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK222;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[7].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK223;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[8].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK224;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[9].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK231;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[10].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK232;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[11].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK233;
	    // #udt_InOutStorageBlockSequencerData.arrudt_Storage[12].udt_RearrangeStorageCtrl.xMarkPulse := #str_StartBLKTimer.xStartBLK234;
	    
	    #Lfb_RearrangeStartCoordinator(xInReset := #x_Reset_Muss_Noch_Aufgelgt_Werden,
	                                   xInRearrangeStartDelay := T#10s,
	                                   udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	    
	    
	    //Reset start Timer
	    #str_StartBLKTimer.xStartBLK211 := false;
	    #str_StartBLKTimer.xStartBLK212 := False;
	    #str_StartBLKTimer.xStartBLK213 := False;
	    #str_StartBLKTimer.xStartBLK214 := False;
	    #str_StartBLKTimer.xStartBLK221 := False;
	    #str_StartBLKTimer.xStartBLK222 := False;
	    #str_StartBLKTimer.xStartBLK223 := False;
	    #str_StartBLKTimer.xStartBLK224 := False;
	    #str_StartBLKTimer.xStartBLK231 := False;
	    #str_StartBLKTimer.xStartBLK232 := False;
	    #str_StartBLKTimer.xStartBLK233 := False;
	    #str_StartBLKTimer.xStartBLK234 := False;
	    
	END_REGION
	
	REGION Rearrange Sequencer
	    
	    #Lfb_BlkGrp1RearrangeSeq(x_In_Reset := #x_Reset_Muss_Noch_Aufgelgt_Werden,
	                             udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData,
	                             n_In_BlockID := 1);
	    
	    #Lfb_BlkGrp2RearrangeSeq(x_In_Reset := #x_Reset_Muss_Noch_Aufgelgt_Werden,
	                             udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData,
	                             n_In_BlockID := 2);
	    
	    #Lfb_BlkGrp3RearrangeSeq(x_In_Reset := #x_Reset_Muss_Noch_Aufgelgt_Werden,
	                             udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData,
	                             n_In_BlockID := 3);
	END_REGION
	
	REGION Remove Sequencer
	    
	    #Lfb_StorageTaskScheduler(xReset := #x_Reset_Muss_Noch_Aufgelgt_Werden,
	                              nInMaxEmptyBLK := #nMaxEmptyBLK,
	                              nInMaxEmptyLine := #nMaxEmptyLine,
	                              udt_In_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                              udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	    
	    
	END_REGION
	
	
	
	REGION Call Block Modules
	    
	    REGION Storage 211
	        // Storage 211
	        #Lfb_StockRemovalBlk211(n_InBlkID := 211,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK211,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 211',
	                                n_In_LagerIndex := 1,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk211,
	                                arrJamCarrier := #stIn_JamCarrierBlock1.stIn_JamCarrier2103.udt_JamCarrier2103_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c211],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c211],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c211],
	                                udt_HMI := #arrudt_HMILines[#c211],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk211,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 212
	        // Storage 212
	        #Lfb_StockRemovalBlk212(n_InBlkID := 212,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK212,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 212',
	                                n_In_LagerIndex := 2,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk212,
	                                arrJamCarrier := #stIn_JamCarrierBlock1.stIn_JamCarrier2103.udt_JamCarrier2103_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c212],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c212],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c212],
	                                udt_HMI := #arrudt_HMILines[#c212],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk212,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    
	    REGION Storage 213
	        // Storage 213
	        #Lfb_StockRemovalBlk213(n_InBlkID := 213,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK213,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 213',
	                                n_In_LagerIndex := 3,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk213,
	                                arrJamCarrier := #stIn_JamCarrierBlock1.stIn_JamCarrier2104.udt_JamCarrier2104_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c213],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c213],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c213],
	                                udt_HMI := #arrudt_HMILines[#c213],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk213,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 214
	        // Storage 214
	        #Lfb_StockRemovalBlk214(n_InBlkID := 214,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK214,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 214',
	                                n_In_LagerIndex := 4,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk214,
	                                arrJamCarrier := #stIn_JamCarrierBlock1.stIn_JamCarrier2104.udt_JamCarrier2104_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c214],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c214],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c214],
	                                udt_HMI := #arrudt_HMILines[#c214],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk214,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 221
	        // Storage 221
	        #Lfb_StockRemovalBlk221(n_InBlkID := 221,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK221,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 221',
	                                n_In_LagerIndex := 5,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk221,
	                                arrJamCarrier := #stIn_JamCarrierBlock2.stIn_JamCarrier2203.udt_JamCarrier2203_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c221],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c221],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c221],
	                                udt_HMI := #arrudt_HMILines[#c221],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk221,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    
	    REGION Storage 222
	        // Storage 222
	        #Lfb_StockRemovalBlk222(n_InBlkID := 222,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK222,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 222',
	                                n_In_LagerIndex := 6,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk222,
	                                arrJamCarrier := #stIn_JamCarrierBlock2.stIn_JamCarrier2203.udt_JamCarrier2203_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c222],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c222],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c222],
	                                udt_HMI := #arrudt_HMILines[#c222],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk222,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    
	    REGION Storage 223
	        // Storage 223
	        #Lfb_StockRemovalBlk223(n_InBlkID := 223,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK223,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 223',
	                                n_In_LagerIndex := 7,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk223,
	                                arrJamCarrier := #stIn_JamCarrierBlock2.stIn_JamCarrier2204.udt_JamCarrier2204_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c223],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c223],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c223],
	                                udt_HMI := #arrudt_HMILines[#c223],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk223,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 224
	        // Storage 224
	        #Lfb_StockRemovalBlk224(n_InBlkID := 224,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK224,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 224',
	                                n_In_LagerIndex := 8,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk224,
	                                arrJamCarrier := #stIn_JamCarrierBlock2.stIn_JamCarrier2204.udt_JamCarrier2204_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c224],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c224],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c224],
	                                udt_HMI := #arrudt_HMILines[#c224],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk224,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 231
	        // Storage 231
	        #Lfb_StockRemovalBlk231(n_InBlkID := 231,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK231,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 231',
	                                n_In_LagerIndex := 9,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk231,
	                                arrJamCarrier := #stIn_JamCarrierBlock3.stIn_JamCarrier2301.udt_JamCarrier2301_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c231],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c231],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c231],
	                                udt_HMI := #arrudt_HMILines[#c231],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk231,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 232
	        // Storage 232
	        #Lfb_StockRemovalBlk232(n_InBlkID := 232,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK232,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 232',
	                                n_In_LagerIndex := 10,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk232,
	                                arrJamCarrier := #stIn_JamCarrierBlock3.stIn_JamCarrier2301.udt_JamCarrier2301_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c232],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c232],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c232],
	                                udt_HMI := #arrudt_HMILines[#c232],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk232,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 233
	        // Storage 233
	        #Lfb_StockRemovalBlk233(n_InBlkID := 233,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK233,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 233',
	                                n_In_LagerIndex := 11,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk233,
	                                arrJamCarrier := #stIn_JamCarrierBlock3.stIn_JamCarrier2302.udt_JamCarrier2302_2.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c233],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c233],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c233],
	                                udt_HMI := #arrudt_HMILines[#c233],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk233,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	    REGION Storage 234
	        // Storage 234
	        #Lfb_StockRemovalBlk234(n_InBlkID := 234,
	                                x_InStartBlk := #str_StartBLKTimer.xStartBLK234,
	                                x_InQuit := #x_InQuit,
	                                n_JamCountAMR := #n_JamCountAMR,
	                                n_JamCapacityAMRCriticalAmount := #n_JamCapacityAMRCriticalAmount,
	                                n_JamCountF2H := #n_JamCountF2H,
	                                n_JamCapacityF2HCriticalAmount := #n_JamCapacityF2HCriticalAmount,
	                                n_JamCapacityEmpty := #n_JamCapacityEmpty,
	                                n_JamCapacityEmptyCriticalAmount := #n_JamCapacityEmptyCriticalAmount,
	                                sIn_ObjectName := 'Blk 234',
	                                n_In_LagerIndex := 12,
	                                udt_CarrierNeeded := "DB_HandshakeStorage".str_StorageRemoval.udt_CarrierNeeded,
	                                arLineBlk := #arLineBlk234,
	                                arrJamCarrier := #stIn_JamCarrierBlock3.stIn_JamCarrier2302.udt_JamCarrier2302_1.arCarrier,
	                                str_InOut_FillingChart := #arrstr_InOut_FillingChart[#c234],
	                                str_InOut_EmptyChart := #arrstr_InOut_EmptyChart[#c234],
	                                udt_InOutMFRTRO := #arrudt_InOutMFRTRO[#c234],
	                                udt_HMI := #arrudt_HMILines[#c234],
	                                udt_InOutHandshakeMessageToMes := #udt_InOutMessageToMesBlk234,
	                                udt_InOutStorageSite := #udt_InOutStorageBlockSequencerData);
	        
	        
	        
	        
	        
	        
	        
	        
	        
	    END_REGION
	    
	END_REGION
	
	(* REGION Storage Block Handling
	    
	    CASE #n_BlockManegementSequence OF
	            
	        #c0000_Wait:
	            //Action
	            #nMaxFilledBLKSAve := #c1_Reset;
	            #nMaxEmptyBLKSave := #c1_Reset;
	            FOR #n_StartResetIDX := 1 TO 12 DO
	                #arrudt_InOutHandshake[#n_StartResetIDX].str_Ctrl.b_Start := FALSE;
	                #arrudt_InOutHandshake[#n_StartResetIDX].str_Ctrl.b_RemoveRelease := False;
	            END_FOR;
	            //Transition
	            IF #tonr_StartRemoval.Q (* OR #n_JamCountAMR < #n_JamCapacityAMRCriticalAmount
	                OR #n_JamCapacityEmpty < #n_JamCapacityEmptyCriticalAmount *)
	                    AND "IBN".xReleasMainStorageRemove
	                    
	                THEN
	                    #n_BlockManegementSequence := #c0010_CheckSituation;
	                END_IF;
	                
	            #c0010_CheckSituation:
	                //Action
	                
	                #nMaxFilledBLKSAve := #nMaxFilledBLK;
	                
	                //Transition
	                IF #n_JamCapacityEmpty < #n_JamCapacityEmptyCriticalAmount
	                     
	                THEN
	                    (* #n_BlockManegementSequence := #c0015_StartEmptyCarrierRemoval; *)
	                    #n_BlockManegementSequence := #c0020_StartCarrierRemoval;
	                ELSE
	                    #n_BlockManegementSequence := #c0020_StartCarrierRemoval;
	                END_IF;
	                
	                
	            #c0015_StartEmptyCarrierRemoval:
	                //Action
	                #nMaxEmptyBLKSave := #nMaxEmptyBLK;
	                #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_Ctrl.b_Start := True;
	                #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_Ctrl.b_RemoveRelease := True;
	                //Transition
	                IF #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_State.b_Busy
	                THEN
	                    
	                    #n_BlockManegementSequence := #c0030_WaitForJobDone;
	                END_IF;
	                
	            #c0020_StartCarrierRemoval:
	                //Action
	                IF #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_State.usi_Status = 2
	                    OR #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_State.usi_Status = 0
	                THEN
	                    #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_Ctrl.b_Start := True;
	                    #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_Ctrl.b_RemoveRelease := True;
	                END_IF;
	                //Transition
	                IF #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_State.b_Busy
	                THEN
	                    #n_BlockManegementSequence := #c0030_WaitForJobDone;
	                END_IF;
	                
	            #c0030_WaitForJobDone:
	                //Action
	                IF #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_State.usi_Status = 2
	                THEN
	                    ;
	                ELSIF #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_State.usi_Status = 0
	                THEN
	                    #nMaxFilledSecBLKSAve := #nMaxFilledBLKSAve + 1;
	                    IF #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_State.usi_Status = 2
	                    THEN
	                        #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_Ctrl.b_Start := True;
	                    END_IF;
	                END_IF;
	               // #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_Ctrl.b_Start := FALSE;
	                
	                //Transition
	                IF #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_State.b_Done
	                    OR  #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_State.b_Done
	                    OR (NOT #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_Ctrl.b_Start
	                    AND NOT #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_Ctrl.b_Start
	                    AND #arrudt_InOutHandshake[#nMaxFilledSecBLKSAve].str_State.b_Done)
	                THEN
	                    #n_BlockManegementSequence := #c0040_Reset;
	                END_IF;
	                
	            #c0040_Reset:
	                //Action
	                #arrudt_InOutHandshake[#nMaxFilledBLKSAve].str_Ctrl.b_Start := False;
	                #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_Ctrl.b_Start := False;
	                #arrudt_InOutHandshake[#nMaxEmptyBLKSave].str_Ctrl.b_RemoveRelease := FALSE;
	                
	                
	                
	                //Transition
	                #n_BlockManegementSequence := #c0000_Wait;
	                
	        END_CASE;
	        
	        
	    END_REGION *)
	
	REGION Leer Carrier handlen
	    
	    REGION Analyse Lines
	        REGION Block 21
	            
	            
	            REGION Blk211
	                
	                #Lfb_Blk211LineEmptyAnalyze(arLine := #arLineBlk211,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c211].udt_LineLvlBlk);
	                
	                
	                
	                
	            END_REGION
	            
	            REGION Blk212
	                
	                #Lfb_Blk212LineEmptyAnalyze(arLine := #arLineBlk212,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk);
	                
	                
	                
	            END_REGION
	            
	            REGION Blk213
	                
	                #Lfb_Blk213LineEmptyAnalyze(arLine := #arLineBlk213,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk214
	                
	                #Lfb_Blk214LineEmptyAnalyze(arLine := #arLineBlk214,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk);
	                
	                
	            END_REGION
	        END_REGION
	        
	        REGION Block 22
	            REGION Blk221
	                
	                #Lfb_Blk221LineEmptyAnalyze(arLine := #arLineBlk221,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk);
	                
	            END_REGION
	            
	            REGION Blk222
	                
	                #Lfb_Blk222LineEmptyAnalyze(arLine := #arLineBlk222,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk223
	                
	                #Lfb_Blk223LineEmptyAnalyze(arLine := #arLineBlk223,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk224
	                
	                #Lfb_Blk224LineEmptyAnalyze(arLine := #arLineBlk224,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk);
	                
	                
	            END_REGION
	        END_REGION
	        
	        REGION Block 23
	            REGION Blk231
	                
	                #Lfb_Blk231LineEmptyAnalyze(arLine := #arLineBlk231,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk232
	                
	                #Lfb_Blk232LineEmptyAnalyze(arLine := #arLineBlk232,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk233
	                
	                #Lfb_Blk233LineEmptyAnalyze(arLine := #arLineBlk233,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	            REGION Blk234
	                
	                #Lfb_Blk234LineEmptyAnalyze(arLine := #arLineBlk234,
	                                            str_OutState => #arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk);
	                
	                
	            END_REGION
	            
	        END_REGION
	        
	    END_REGION
	    
	    REGION Storage Block
	        // Prüfen welcher Block am meisten eingelagert hat und als nächstes auslagern muss
	        
	        #nMaxEmptyBLK := #c211;
	        #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c211].udt_LineLvlBlk.arr_OrderLines[1];
	        
	        
	        IF #arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk212blocked
	        THEN
	            #nMaxEmptyBLK := #c212;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk213blocked
	        THEN
	            #nMaxEmptyBLK := #c213;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk214blocked
	        THEN
	            #nMaxEmptyBLK := #c214;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk221blocked
	        THEN
	            #nMaxEmptyBLK := #c221;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk222blocked
	        THEN
	            #nMaxEmptyBLK := #c222;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk223blocked
	        THEN
	            #nMaxEmptyBLK := #c223;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk224blocked
	        THEN
	            #nMaxEmptyBLK := #c224;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk231blocked
	        THEN
	            #nMaxEmptyBLK := #c231;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk232blocked
	        THEN
	            #nMaxEmptyBLK := #c232;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk233blocked
	        THEN
	            #nMaxEmptyBLK := #c233;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        IF #arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk.arr_StorageLvl[#arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk.arr_OrderLines[1]] >
	            #arrstr_InOut_EmptyChart[#nMaxEmptyBLK].udt_LineLvlBlk.arr_StorageLvl[#nMaxEmptyLine]
	            AND NOT #udt_BlkBlocked.x_LineLvlBlk234blocked
	        THEN
	            #nMaxEmptyBLK := #c234;
	            #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk.arr_OrderLines[1];
	        END_IF;
	        
	        
	        
	        
	(*            IF #arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk212blocked
	            THEN
	                #nMaxEmptyBLK := #c212;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c212].udt_LineLvlBlk.arr_OrderLines[1];
	                ;
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk213blocked
	            THEN
	                #nMaxEmptyBLK := #c213;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c213].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk214blocked
	            THEN
	                #nMaxEmptyBLK := #c214;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c214].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk221blocked
	            THEN
	                #nMaxEmptyBLK := #c221;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c221].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk222blocked
	            THEN
	                #nMaxEmptyBLK := #c222;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c222].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk223blocked
	            THEN
	                #nMaxEmptyBLK := #c223;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c223].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk224blocked
	            THEN
	                #nMaxEmptyBLK := #c224;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c224].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk231blocked
	            THEN
	                #nMaxEmptyBLK := #c231;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c231].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk232blocked
	            THEN
	                #nMaxEmptyBLK := #c232;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c232].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk233blocked
	            THEN
	                #nMaxEmptyBLK := #c233;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c233].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF;
	            
	            IF #arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk.arr_OrderLines[1] > #nMaxEmptyBLK
	                AND NOT #udt_BlkBlocked.x_LineLvlBlk234blocked
	            THEN
	                #nMaxEmptyBLK := #c234;
	                #nMaxEmptyLine := #arrstr_InOut_EmptyChart[#c234].udt_LineLvlBlk.arr_OrderLines[1];
	            END_IF; *)
	        
	    END_REGION
	    
	    REGION Empty Carrier Request
	        
	        
	        
	    END_REGION
	    
	END_REGION
	
	REGION HMI Mapping
	    
	    #arrudt_HMILines[#c211].udt_LineSorted := #arrstr_InOut_FillingChart[#c211].udt_LineLvlBlk;
	    #arrudt_HMILines[#c212].udt_LineSorted := #arrstr_InOut_FillingChart[#c212].udt_LineLvlBlk;
	    #arrudt_HMILines[#c213].udt_LineSorted := #arrstr_InOut_FillingChart[#c213].udt_LineLvlBlk;
	    #arrudt_HMILines[#c214].udt_LineSorted := #arrstr_InOut_FillingChart[#c214].udt_LineLvlBlk;
	    #arrudt_HMILines[#c221].udt_LineSorted := #arrstr_InOut_FillingChart[#c221].udt_LineLvlBlk;
	    #arrudt_HMILines[#c222].udt_LineSorted := #arrstr_InOut_FillingChart[#c222].udt_LineLvlBlk;
	    #arrudt_HMILines[#c223].udt_LineSorted := #arrstr_InOut_FillingChart[#c223].udt_LineLvlBlk;
	    #arrudt_HMILines[#c224].udt_LineSorted := #arrstr_InOut_FillingChart[#c224].udt_LineLvlBlk;
	    #arrudt_HMILines[#c231].udt_LineSorted := #arrstr_InOut_FillingChart[#c231].udt_LineLvlBlk;
	    #arrudt_HMILines[#c232].udt_LineSorted := #arrstr_InOut_FillingChart[#c232].udt_LineLvlBlk;
	    #arrudt_HMILines[#c233].udt_LineSorted := #arrstr_InOut_FillingChart[#c233].udt_LineLvlBlk;
	    #arrudt_HMILines[#c234].udt_LineSorted := #arrstr_InOut_FillingChart[#c234].udt_LineLvlBlk;
	    
	END_REGION
	
	
	
END_FUNCTION_BLOCK

