[Home] [Help]
2664: l_ref_split_ship_from VARCHAR2(10);--16525601
2665:
2666:
2667: CURSOR c_split_details IS
2668: SELECT * FROM oe_line_split_details
2669: WHERE line_id = l_init_line_id
2670: AND request_id = FND_GLOBAL.CONC_REQUEST_ID
2671: FOR UPDATE NOWAIT;
2672:
2702: raise;
2703: END;
2704:
2705: select count(*) into l_count
2706: from oe_line_split_details where line_id = l_init_line_id
2707: AND request_id = FND_GLOBAL.CONC_REQUEST_ID;
2708:
2709: IF l_count = 0 THEN
2710: Fnd_Message.Set_Name('ONT','OE_CANCEL_SPLIT_SUCCESS');
2718: IF l_count > 1 THEN
2719:
2720: SELECT sum(ORDERED_QUANTITY), sum(ORDERED_QUANTITY2)
2721: INTO l_ord_qty_sum, l_ord_qty2_sum
2722: FROM oe_line_split_details
2723: WHERE line_id = l_init_line_id
2724: AND request_id = FND_GLOBAL.CONC_REQUEST_ID;
2725:
2726: SELECT ordered_quantity, ordered_quantity2
3063: END IF;
3064: END IF;
3065:
3066: -- Irrespective of program result, deleting the data from table
3067: DELETE FROM oe_line_split_details
3068: WHERE line_id = l_init_line_id
3069: AND request_id = FND_GLOBAL.CONC_REQUEST_ID;
3070:
3071: ELSE -- l_count < 2
3126: errbuf := 'Concurrent program did not finish successfully. See error messages and log file for more details';
3127: END IF;
3128: ROLLBACK;
3129: -- Irrespective of program result, deleting the data from table
3130: DELETE FROM oe_line_split_details
3131: WHERE line_id = l_init_line_id
3132: AND request_id = FND_GLOBAL.CONC_REQUEST_ID;
3133: COMMIT;
3134: END Defer_Split;
3138: begin
3139: oe_debug_pub.add('entering oe_split_util.bulk_insert');
3140:
3141: FORALL j IN p_line_conc_tbl.FIRST .. p_line_conc_tbl.LAST
3142: INSERT INTO OE_LINE_SPLIT_DETAILS
3143: VALUES p_line_conc_tbl(j);
3144:
3145: exception
3146: WHEN OTHERS THEN