[Home] [Help]
4412: BEGIN
4413: IF l_lot_number is not null THEN
4414: select lot_num
4415: into l_lot_number
4416: from rcv_lots_supply
4417: where lot_num = l_lot_number
4418: and supply_type_code = 'SHIPMENT'
4419: and primary_quantity > 0
4420: and shipment_line_id in
9488: , p_rcv_org_id IN NUMBER
9489: , x_return_status OUT NOCOPY VARCHAR2
9490: )
9491: IS
9492: l_rlsu_quantity RCV_LOTS_SUPPLY.QUANTITY%TYPE := 0;
9493: l_rlsu_primary_quantity RCV_LOTS_SUPPLY.PRIMARY_QUANTITY%TYPE := 0;
9494: l_index NUMBER := 0;
9495: l_diff_txn_qty NUMBER := 0;
9496: l_partial_rcpt NUMBER := 0;
9489: , x_return_status OUT NOCOPY VARCHAR2
9490: )
9491: IS
9492: l_rlsu_quantity RCV_LOTS_SUPPLY.QUANTITY%TYPE := 0;
9493: l_rlsu_primary_quantity RCV_LOTS_SUPPLY.PRIMARY_QUANTITY%TYPE := 0;
9494: l_index NUMBER := 0;
9495: l_diff_txn_qty NUMBER := 0;
9496: l_partial_rcpt NUMBER := 0;
9497: l_rec_count NUMBER := 0;
9547: SELECT NVL(SUM(rlsu.quantity),0) ,
9548: NVL(SUM(rlsu.primary_quantity),0)
9549: INTO l_rlsu_quantity,
9550: l_rlsu_primary_quantity
9551: FROM rcv_lots_supply rlsu,
9552: rcv_shipment_lines rsl
9553: WHERE rlsu.shipment_line_id = rsl.shipment_line_id
9554: AND rsl.item_id = p_inventory_item_id
9555: AND rsl.to_organization_id = p_rcv_org_id
9619: , p_rcv_org_id IN NUMBER
9620: , p_product_txn_id IN NUMBER
9621: , x_return_status OUT NOCOPY VARCHAR2
9622: ) IS
9623: l_rlsu_primary_quantity RCV_LOTS_SUPPLY.PRIMARY_QUANTITY%TYPE := 0;
9624: l_mtli_primary_quantity NUMBER := 0;
9625: l_current_grp_prim_qty NUMBER := 0;
9626: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
9627:
9638:
9639: BEGIN
9640: SELECT NVL(SUM(rlsu.primary_quantity),0)
9641: INTO l_rlsu_primary_quantity
9642: FROM rcv_lots_supply rlsu,
9643: rcv_shipment_lines rsl
9644: WHERE rlsu.shipment_line_id = rsl.shipment_line_id
9645: AND rsl.item_id = p_inventory_item_id
9646: AND rsl.to_organization_id = p_rcv_org_id
9734: , p_product_txn_id IN NUMBER
9735: , p_from_lpn_id IN NUMBER
9736: , x_return_status OUT NOCOPY VARCHAR2
9737: ) IS
9738: l_rlsu_primary_quantity RCV_LOTS_SUPPLY.PRIMARY_QUANTITY%TYPE := 0;
9739: l_mtli_primary_quantity NUMBER := 0;
9740: l_current_grp_prim_qty NUMBER := 0;
9741: l_debug NUMBER := NVL(fnd_profile.VALUE('INV_DEBUG_TRACE'), 0);
9742: l_lot_code NUMBER := 0; --bug number 12814511
9776:
9777: IF(l_lot_code = 1) THEN
9778: -- condition added to return success for the bug number 12814511,
9779: -- No validation required for the receiving of lot controlled item when the source org has a plain item control,
9780: -- as the above validation procedure is based on the rcv_lots_supply
9781: -- where as in case of plain item in source org the rcv_lots_supply is not present
9782: -- so the total qty would be validated against the entered qty.
9783: RETURN;
9784: END IF;
9777: IF(l_lot_code = 1) THEN
9778: -- condition added to return success for the bug number 12814511,
9779: -- No validation required for the receiving of lot controlled item when the source org has a plain item control,
9780: -- as the above validation procedure is based on the rcv_lots_supply
9781: -- where as in case of plain item in source org the rcv_lots_supply is not present
9782: -- so the total qty would be validated against the entered qty.
9783: RETURN;
9784: END IF;
9785: -- end bug 12814511
9786:
9787: BEGIN
9788: SELECT NVL(SUM(rlsu.primary_quantity),0)
9789: INTO l_rlsu_primary_quantity
9790: FROM rcv_lots_supply rlsu,
9791: rcv_shipment_lines rsl
9792: WHERE rlsu.shipment_line_id = rsl.shipment_line_id
9793: AND rsl.item_id = p_inventory_item_id
9794: AND rsl.to_organization_id = p_rcv_org_id