[Home] [Help]
7022:
7023: --jxlu 10/12/04
7024: CURSOR lot_att IS
7025: SELECT lot_number, sum(transaction_quantity) transaction_quantity
7026: from wms_ALLOCATIONS_GTMP
7027: GROUP BY LOT_NUMBER
7028: ORDER BY LOT_NUMBER;
7029:
7030: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
9432: -- ideally this should be done during above process for each case, need
9433: -- revisit them later on
9434:
9435:
9436: delete from wms_allocations_gtmp;
9437:
9438: -- Bug #4141928. No changes required for OPM convergence.
9439: -- Since this is a serial context
9440: IF p_is_sn_alloc = 'Y'
9444: END IF;
9445:
9446: IF l_lot_code > 1 THEN
9447:
9448: INSERT INTO WMS_ALLOCATIONS_GTMP
9449: (lot_number,
9450: serial_number,
9451: transaction_quantity,
9452: primary_quantity)
9494: mydebug('lot controlled. x_trx_qty_alloc:'||x_trx_qty_alloc);
9495: END IF;
9496: --jxlu 10/12/04 end
9497: ELSE -- not lot controlled
9498: INSERT INTO WMS_ALLOCATIONS_GTMP
9499: (serial_number,
9500: transaction_quantity,
9501: primary_quantity)
9502: SELECT fm_serial_number,1,1
9529: mydebug('SN control and SN allocation off and x_match=3');
9530: END IF;
9531:
9532: IF l_lot_code > 1 THEN
9533: INSERT INTO wms_allocations_gtmp
9534: (lot_number,
9535: serial_number,
9536: transaction_quantity,
9537: primary_quantity)
9543: AND mtlt.lot_number = msn.lot_number
9544: AND msn.inventory_item_id = p_item_id
9545: AND Nvl(msn.group_mark_id, -1) = -1;
9546: ELSE
9547: INSERT INTO wms_allocations_gtmp
9548: (serial_number,
9549: transaction_quantity,
9550: primary_quantity)
9551: SELECT serial_number,1,1
9571: IF (l_debug = 1) THEN
9572: mydebug('index is : ' || l_table_count);
9573: END IF;
9574:
9575: INSERT INTO wms_allocations_gtmp(lot_number, primary_quantity,
9576: transaction_quantity, secondary_quantity) -- Bug #4141928
9577: values(t_lpn_lot_qty_table(l_table_count).lot_number,
9578: t_lpn_lot_qty_table(l_table_count).pri_qty,
9579: t_lpn_lot_qty_table(l_table_count).trx_qty,
9928: ORDER BY LOT_NUMBER;
9929:
9930: CURSOR lot_att IS
9931: SELECT lot_number, sum(transaction_quantity) transaction_quantity
9932: from wms_ALLOCATIONS_GTMP
9933: GROUP BY LOT_NUMBER
9934: ORDER BY LOT_NUMBER;
9935:
9936: CURSOR mmtt_csr IS
9947:
9948: x_return_status := fnd_api.g_ret_sts_success;
9949: x_lot_att_vector := null;
9950:
9951: DELETE wms_allocations_gtmp;
9952: t_lpn_lot_qty_table.DELETE;
9953:
9954: x_trx_qty := 0;
9955: x_trx_sec_qty := 0; -- Bug #4141928
9970: mydebug('SN control and SN allocation on');
9971: END IF;
9972:
9973: IF p_is_lot_control ='true' THEN -- lot controlled
9974: INSERT INTO wms_allocations_gtmp
9975: (lot_number,
9976: serial_number,
9977: transaction_quantity,
9978: primary_quantity)
10001: t_lpn_lot_qty_table(l_table_index).lot_number := lot_ATT_rec.lot_number;
10002: t_lpn_lot_qty_table(l_table_index).trx_qty := lot_ATT_rec.transaction_quantity;
10003: END LOOP;
10004: ELSE -- not lot controlled
10005: INSERT INTO wms_ALLOCATIONS_GTMP
10006: (serial_number,
10007: transaction_quantity,
10008: primary_quantity)
10009: SELECT fm_serial_number,1,1
10154: mydebug('inserting into global temp table for serial is non allocated....');
10155: END IF;
10156: -- If negative Balance allowed then update vikas 09/07/04 V1
10157: if (p_is_negbal_allowed ='true') then
10158: INSERT INTO wms_ALLOCATIONS_GTMP
10159: (lot_number,
10160: primary_quantity,
10161: transaction_quantity,
10162: secondary_quantity) -- Bug #4141928
10166: l_trx_lot_sec_qty);
10167:
10168: -- vikas 09/07/04 end
10169: else
10170: INSERT INTO wms_ALLOCATIONS_GTMP
10171: (lot_number,
10172: primary_quantity,
10173: transaction_quantity,
10174: secondary_quantity) -- Bug #4141928