29: l_xlstl_cnt NUMBER := 0;
30: l_esdtl_cnt NUMBER := 0;
31:
32: TYPE xsitl_tbl_type IS TABLE OF OKL_EXT_SELL_INVS_TL%ROWTYPE INDEX BY BINARY_INTEGER;
33: TYPE xlstl_tbl_type IS TABLE OF OKL_XTL_SELL_INVS_TL%ROWTYPE INDEX BY BINARY_INTEGER;
34: TYPE esdtl_tbl_type IS TABLE OF OKL_XTD_SELL_INVS_TL%ROWTYPE INDEX BY BINARY_INTEGER;
35:
36: xsitl_tbl xsitl_tbl_type;
37: xlstl_tbl xlstl_tbl_type;
277:
278: IF xlstl_tbl.COUNT > 0 THEN
279: FORALL indx IN xlstl_tbl.first..xlstl_tbl.LAST
280: SAVE EXCEPTIONS
281: INSERT INTO OKL_XTL_SELL_INVS_TL
282: VALUES xlstl_tbl(indx);
283: END IF;
284:
285: IF SQL%BULK_EXCEPTIONS.COUNT > 0 THEN
291:
292: --error_tbl(error_tbl.count + 1).id := to_number(xlstl_tbl(i).id);
293: END LOOP;
294: END IF;
295: PRINT_TO_LOG('BULK Done Inserting into okl_xtl_sell_invs_tl');
296:
297: -- --------------------------------------
298: -- Transfer Xtd records to the Xtd table
299: -- --------------------------------------
388: PRINT_TO_LOG('BULK Deleting xls when error ...');
389: DELETE FROM Okl_Xtl_Sell_Invs_B
390: WHERE id = del_error_rec.xls_id;
391:
392: DELETE FROM Okl_Xtl_Sell_Invs_TL
393: WHERE id = del_error_rec.xls_id;
394:
395: PRINT_TO_LOG('BULK Finally deleting xsi when error ...');
396: DELETE FROM Okl_Ext_Sell_Invs_B
1953:
1954: DELETE FROM okl_xtl_sell_invs_b
1955: WHERE id = d_xlsv_rec.id;
1956:
1957: DELETE FROM okl_xtl_sell_invs_tl
1958: WHERE id = d_xlsv_rec.id;
1959:
1960: d_xsiv_rec.id := del3level.xsi_id;
1961:
3094:
3095: DELETE FROM okl_xtl_sell_invs_b
3096: WHERE id = d_xlsv_rec.id;
3097:
3098: DELETE FROM okl_xtl_sell_invs_tl
3099: WHERE id = d_xlsv_rec.id;
3100:
3101: d_xsiv_rec.id := del2level.xsi_id;
3102: