[Home] [Help]
110: p_rbk_khr_id NUMBER,
111: p_rbk_kle_id NUMBER ) IS
112: SELECT NVL(SUM(SEL.AMOUNT),0)
113: FROM OKL_STREAMS STM,
114: OKL_STRM_ELEMENTS SEL,
115: OKL_STRM_TYPE_V STY
116: WHERE STM.KHR_ID = p_rbk_khr_id
117: AND NVL(STM.KLE_ID,-99) = NVL ( p_rbk_kle_id,-99 )
118: AND STM.STY_ID = STY.ID
838: cnsld_id,
839: --ssiruvol Bug 5000886 end
840: oklh.deal_type deal_type
841: FROM
842: okl_strm_elements ste,
843: okl_streams stm,
844: okl_strm_type_v sty,
845: okc_k_headers_b khr,
846: okl_k_headers oklh
892: cnsld_id,
893: --ssiruvol Bug 5000886 end
894: khl.deal_type deal_type
895: FROM
896: okl_strm_elements ste,
897: -- Bug 4550607
898: okl_strm_elements ste1,
899: -- End Bug 4550607
900: okl_streams stm,
894: khl.deal_type deal_type
895: FROM
896: okl_strm_elements ste,
897: -- Bug 4550607
898: okl_strm_elements ste1,
899: -- End Bug 4550607
900: okl_streams stm,
901: okl_strm_type_v sty,
902: okc_k_headers_b khr,
1174: tap_id okl_trx_ap_invoices_v.id%TYPE,
1175: tpl_id okl_txl_ap_inv_lns_v.id%TYPE,
1176: -- xpi_id okl_ext_pay_invs_v.id%TYPE,
1177: -- xlp_id okl_xtl_pay_invs_v.id%TYPE,
1178: proc_sel_id okl_strm_elements.id%TYPE,
1179: bill_date DATE,
1180: contract_number okc_k_headers_b.contract_number%type,
1181: stream_name okl_strm_type_v.name%type,
1182: amount okl_strm_elements.amount%type,
1178: proc_sel_id okl_strm_elements.id%TYPE,
1179: bill_date DATE,
1180: contract_number okc_k_headers_b.contract_number%type,
1181: stream_name okl_strm_type_v.name%type,
1182: amount okl_strm_elements.amount%type,
1183: error_message Varchar2(2000)
1184: );
1185:
1186: --start:| 09-Mar-2007 cklee code fixed to refer to proper FK
1192: tap_id okl_trx_ap_invoices_v.id%TYPE,
1193: tpl_id okl_txl_ap_inv_lns_v.id%TYPE,
1194: -- xpi_id okl_ext_pay_invs_v.id%TYPE,
1195: -- xlp_id okl_xtl_pay_invs_v.id%TYPE,
1196: proc_sel_id okl_strm_elements.id%TYPE,
1197: bill_date DATE,
1198: contract_number okc_k_headers_b.contract_number%type,
1199: stream_name okl_strm_type_v.name%type,
1200: amount okl_strm_elements.amount%type,
1196: proc_sel_id okl_strm_elements.id%TYPE,
1197: bill_date DATE,
1198: contract_number okc_k_headers_b.contract_number%type,
1199: stream_name okl_strm_type_v.name%type,
1200: amount okl_strm_elements.amount%type,
1201: error_message Varchar2(2000)
1202: );
1203:
1204: TYPE tld_err_tbl_type IS TABLE OF tld_err_rec_type
1300: -- Get parent sty Id for an SEL_ID
1301: -----------------------------------------------------------------
1302: CURSOR get_parent_sty ( p_ref_sel_id NUMBER ) IS
1303: SELECT STM.STY_ID
1304: FROM OKL_STRM_ELEMENTS SEL,
1305: OKL_STREAMS STM
1306: WHERE SEL.ID = p_ref_sel_id
1307: AND SEL.STM_ID = STM.ID;
1308:
1391: l_evrgrn_psthrgh_flg NUMBER := 0;
1392: -- end fmiao for bug 4961860
1393:
1394: --ssiruvol Bug 5000886 start
1395: TYPE l_ele_id_tbl_type IS TABLE OF okl_strm_elements.id%TYPE
1396: INDEX BY BINARY_INTEGER;
1397:
1398: strm_ele_idx NUMBER;
1399: inv_ele_idx NUMBER;
1410: tap_id okl_trx_ap_invoices_v.id%TYPE,
1411: tpl_id okl_txl_ap_inv_lns_v.id%TYPE,
1412: xpi_id okl_ext_pay_invs_v.id%TYPE,
1413: xlp_id okl_xtl_pay_invs_v.id%TYPE,
1414: proc_sel_id okl_strm_elements.id%TYPE,
1415: bill_date DATE,
1416: contract_number okc_k_headers_b.contract_number%type,
1417: stream_name okl_strm_type_v.name%type,
1418: amount okl_strm_elements.amount%type,
1414: proc_sel_id okl_strm_elements.id%TYPE,
1415: bill_date DATE,
1416: contract_number okc_k_headers_b.contract_number%type,
1417: stream_name okl_strm_type_v.name%type,
1418: amount okl_strm_elements.amount%type,
1419: error_message Varchar2(2000)
1420: );
1421:
1422: TYPE lsm_succ_tbl_type IS TABLE OF lsm_succ_rec_type
2336: (inv_disb_rec.ref_sel_id IS NULL) THEN
2337:
2338: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.1 ### ');
2339: --ssiruvol Bug 5000886 start
2340: UPDATE okl_strm_elements
2341: SET date_billed = SYSDATE
2342: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 change start here
2343: ,last_update_date = sysdate
2344: ,last_update_login = FND_GLOBAL.LOGIN_ID -- BUG:14742784 change end here
2360: -- IF (check_rcpts( inv_disb_rec.ref_sel_id ) = 'FULL') THEN
2361: IF (check_rcpts( inv_disb_rec.cnsld_id ) = 'FULL') THEN
2362: FND_FILE.PUT_LINE (FND_FILE.OUTPUT, ' ### 43.3 ### ');
2363:
2364: UPDATE okl_strm_elements
2365: SET date_billed = SYSDATE
2366: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 change start here
2367: ,last_update_date = sysdate
2368: ,last_update_login = FND_GLOBAL.LOGIN_ID -- BUG:14742784 change end here
2411: IF l_commit_cnt > l_MAX_commit_cnt THEN
2412: --ssiruvol Bug 5000886 start
2413: IF l_strm_ele_id_tbl.COUNT > 0 THEN
2414: FORALL indx in l_strm_ele_id_tbl.FIRST .. l_strm_ele_id_tbl.LAST
2415: UPDATE okl_strm_elements
2416: SET date_billed = SYSDATE--l_date_billed_tbl(indx);
2417: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 Change start here
2418: ,last_update_date = sysdate
2419: ,last_update_login = FND_GLOBAL.LOGIN_ID -- BUG:14742784 change end here
2450:
2451: --ssiruvol Bug 5000886 start
2452: IF l_strm_ele_id_tbl.COUNT > 0 THEN
2453: FORALL indx in l_strm_ele_id_tbl.FIRST .. l_strm_ele_id_tbl.LAST
2454: UPDATE okl_strm_elements
2455: SET date_billed = SYSDATE
2456: ,last_updated_by = FND_GLOBAL.USER_ID -- BUG:14742784 change start here
2457: ,last_update_date = sysdate
2458: ,last_update_login = FND_GLOBAL.LOGIN_ID -- BUG:14742784 Change end here