[Home] [Help]
17: G_SOB_NAME_REP VARCHAR2(2000);
18: G_ORG_ID NUMBER;
19: G_ORG_NAME VARCHAR2(2000);
20: G_ACCRUAL_REVERSAL_DAYS OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
21: G_FUNC_CURRENCY_CODE_REP OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
22: G_ACCRUAL_DATE DATE;
23:
24: TYPE trx_rec_type IS RECORD (
25: old_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
21: G_FUNC_CURRENCY_CODE_REP OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
22: G_ACCRUAL_DATE DATE;
23:
24: TYPE trx_rec_type IS RECORD (
25: old_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
26: new_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
27: ID okl_trx_contracts_all.ID%TYPE := OKL_API.G_MISS_NUM
28: );
29:
22: G_ACCRUAL_DATE DATE;
23:
24: TYPE trx_rec_type IS RECORD (
25: old_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
26: new_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
27: ID okl_trx_contracts_all.ID%TYPE := OKL_API.G_MISS_NUM
28: );
29:
30: TYPE trx_tbl_type IS TABLE OF trx_rec_type INDEX BY BINARY_INTEGER;
23:
24: TYPE trx_rec_type IS RECORD (
25: old_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
26: new_trx_number okl_trx_contracts_all.trx_number%TYPE := OKL_API.G_MISS_CHAR,
27: ID okl_trx_contracts_all.ID%TYPE := OKL_API.G_MISS_NUM
28: );
29:
30: TYPE trx_tbl_type IS TABLE OF trx_rec_type INDEX BY BINARY_INTEGER;
31: G_trx_number_tbl trx_tbl_type;
52: contract_id OKL_K_HEADERS_FULL_V.ID%TYPE,
53: contract_number OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
54: sts_code OKL_K_HEADERS_FULL_V.STS_CODE%TYPE,
55: product_id OKL_K_HEADERS_FULL_V.PDT_ID%TYPE,
56: accrual_status OKL_TRX_CONTRACTS.ACCRUAL_STATUS_YN%TYPE,
57: override_status OKL_TRX_CONTRACTS.UPDATE_STATUS_YN%TYPE,
58: start_date OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
53: contract_number OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
54: sts_code OKL_K_HEADERS_FULL_V.STS_CODE%TYPE,
55: product_id OKL_K_HEADERS_FULL_V.PDT_ID%TYPE,
56: accrual_status OKL_TRX_CONTRACTS.ACCRUAL_STATUS_YN%TYPE,
57: override_status OKL_TRX_CONTRACTS.UPDATE_STATUS_YN%TYPE,
58: start_date OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
56: accrual_status OKL_TRX_CONTRACTS.ACCRUAL_STATUS_YN%TYPE,
57: override_status OKL_TRX_CONTRACTS.UPDATE_STATUS_YN%TYPE,
58: start_date OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
62: currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE,
63: currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
57: override_status OKL_TRX_CONTRACTS.UPDATE_STATUS_YN%TYPE,
58: start_date OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
62: currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE,
63: currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
65: try_id OKL_TRX_TYPES_V.ID%TYPE,
58: start_date OKL_K_HEADERS_FULL_V.CONTRACT_NUMBER%TYPE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
62: currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE,
63: currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
65: try_id OKL_TRX_TYPES_V.ID%TYPE,
66: reverse_date_to DATE,
59: deal_type OKL_K_HEADERS_FULL_V.DEAL_TYPE%TYPE,
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
62: currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE,
63: currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
65: try_id OKL_TRX_TYPES_V.ID%TYPE,
66: reverse_date_to DATE,
67: batch_name VARCHAR2(2000),
60: khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
61: currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE,
62: currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE,
63: currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
65: try_id OKL_TRX_TYPES_V.ID%TYPE,
66: reverse_date_to DATE,
67: batch_name VARCHAR2(2000),
68: sob_id OKL_TRX_CONTRACTS.SET_OF_BOOKS_ID%TYPE,
64: func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
65: try_id OKL_TRX_TYPES_V.ID%TYPE,
66: reverse_date_to DATE,
67: batch_name VARCHAR2(2000),
68: sob_id OKL_TRX_CONTRACTS.SET_OF_BOOKS_ID%TYPE,
69: accrual_date DATE,
70: period_end_date DATE,
71: period_start_date DATE,
72: source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE,
68: sob_id OKL_TRX_CONTRACTS.SET_OF_BOOKS_ID%TYPE,
69: accrual_date DATE,
70: period_end_date DATE,
71: period_start_date DATE,
72: source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE,
73: source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE,
74: submission_mode VARCHAR2(2000),
75: rev_rec_method OKL_PRODUCT_PARAMETERS_V.REVENUE_RECOGNITION_METHOD%TYPE);
76:
69: accrual_date DATE,
70: period_end_date DATE,
71: period_start_date DATE,
72: source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE,
73: source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE,
74: submission_mode VARCHAR2(2000),
75: rev_rec_method OKL_PRODUCT_PARAMETERS_V.REVENUE_RECOGNITION_METHOD%TYPE);
76:
77: --Added by kthiruva on 02-Mar-2006 for logging purposes
455:
456: --Bug 5036337
457: CURSOR check_actual_trx(p_khr_id NUMBER) IS
458: SELECT TRUNC(MAX(trx.date_transaction_occurred)) last_accrual_date
459: FROM OKL_TRX_CONTRACTS trx,
460: OKL_TRX_TYPES_V try,
461: OKL_TXL_CNTRCT_LNS txl,
462: OKL_STRM_TYPE_V sty
463: WHERE trx.khr_id = p_khr_id
1275: x_sob_name OUT NOCOPY VARCHAR2,
1276: x_org_id OUT NOCOPY OKL_SYS_ACCT_OPTS.org_id%TYPE,
1277: x_org_name OUT NOCOPY VARCHAR2,
1278: x_accrual_reversal_days OUT NOCOPY NUMBER,
1279: x_func_currency_code OUT NOCOPY OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE,
1280: x_return_status OUT NOCOPY VARCHAR2
1281: ) IS
1282:
1283: l_period_name VARCHAR2(2000);
1286: l_period_status VARCHAR2(2000);
1287: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
1288: l_sob_name VARCHAR2(2000);
1289: l_try_id OKL_TRX_TYPES_V.id%TYPE;
1290: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
1291: l_org_id OKL_SYS_ACCT_OPTS.org_id%TYPE;
1292: l_org_name VARCHAR2(2000);
1293: l_accrual_reversal_days NUMBER;
1294:
1493: p_init_msg_list IN VARCHAR2,
1494: x_return_status OUT NOCOPY VARCHAR2,
1495: x_msg_count OUT NOCOPY NUMBER,
1496: x_msg_data OUT NOCOPY VARCHAR2,
1497: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
1498: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
1499: p_accrual_rec IN accrual_rec_type,
1500: p_stream_tbl IN stream_tbl_type,
1501: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
1494: x_return_status OUT NOCOPY VARCHAR2,
1495: x_msg_count OUT NOCOPY NUMBER,
1496: x_msg_data OUT NOCOPY VARCHAR2,
1497: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
1498: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
1499: p_accrual_rec IN accrual_rec_type,
1500: p_stream_tbl IN stream_tbl_type,
1501: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
1502:
1589: WHERE kle.id = p_kle_id;
1590:
1591:
1592: --local variables
1593: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
1594: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
1595: l_api_name VARCHAR2(20) := 'CREATE_ACCRUALS';
1596: l_api_version CONSTANT NUMBER := 1.0;
1597: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
1590:
1591:
1592: --local variables
1593: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
1594: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
1595: l_api_name VARCHAR2(20) := 'CREATE_ACCRUALS';
1596: l_api_version CONSTANT NUMBER := 1.0;
1597: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
1598: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
1594: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
1595: l_api_name VARCHAR2(20) := 'CREATE_ACCRUALS';
1596: l_api_version CONSTANT NUMBER := 1.0;
1597: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
1598: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
1599: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
1600: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
1601: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
1602: l_tmpl_identify_rec Okl_Account_Dist_Pvt.tmpl_identify_rec_type;
1595: l_api_name VARCHAR2(20) := 'CREATE_ACCRUALS';
1596: l_api_version CONSTANT NUMBER := 1.0;
1597: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
1598: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
1599: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
1600: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
1601: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
1602: l_tmpl_identify_rec Okl_Account_Dist_Pvt.tmpl_identify_rec_type;
1603: --START: change by nikshah, for SLA Uptake Bug 5705866
1642:
1643: -- MGAAP 7263041
1644: CURSOR primary_rep_trx_id_csr(p_trx_number IN VARCHAR2) IS
1645: SELECT ID
1646: FROM OKL_TRX_CONTRACTS
1647: WHERE TRX_NUMBER = p_trx_number
1648: AND REPRESENTATION_TYPE = 'PRIMARY';
1649:
1650: l_primary_rep_trx_id OKL_TRX_CONTRACTS.ID%TYPE;
1646: FROM OKL_TRX_CONTRACTS
1647: WHERE TRX_NUMBER = p_trx_number
1648: AND REPRESENTATION_TYPE = 'PRIMARY';
1649:
1650: l_primary_rep_trx_id OKL_TRX_CONTRACTS.ID%TYPE;
1651:
1652: BEGIN
1653: -- Set save point
1654:
1790: l_tclv_tbl(i).attribute15 := get_line_dff_rec.attribute15;
1791: END LOOP;
1792: END LOOP;
1793:
1794: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.create_trx_contracts');
1795: WRITE_TO_LOG('The contents of l_tcnv_rec being passed to the create call ');
1796: WRITE_TO_LOG('===========================================================');
1797: WRITE_TO_LOG('l_tcnv_rec.khr_id :'||l_tcnv_rec.khr_id);
1798: WRITE_TO_LOG('l_tcnv_rec.pdt_id :'||l_tcnv_rec.pdt_id);
1835: WRITE_TO_LOG('l_tclv_tbl(i).accrual_rule_yn :'||l_tclv_tbl(i).accrual_rule_yn);
1836: END LOOP;
1837:
1838: -- Call Transaction Public API to insert transaction header and line records
1839: Okl_Trx_Contracts_Pub.create_trx_contracts
1840: (p_api_version => p_api_version
1841: ,p_init_msg_list => p_init_msg_list
1842: ,x_return_status => x_return_status
1843: ,x_msg_count => x_msg_count
2335: l_try_id NUMBER;
2336: l_currency_conversion_type OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_TYPE%TYPE;
2337: l_currency_conversion_rate OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_RATE%TYPE;
2338: l_currency_conversion_date OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_DATE%TYPE;
2339: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2340: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2341: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2342: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2343: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2336: l_currency_conversion_type OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_TYPE%TYPE;
2337: l_currency_conversion_rate OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_RATE%TYPE;
2338: l_currency_conversion_date OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_DATE%TYPE;
2339: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2340: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2341: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2342: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2343: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2344: l_start_date OKL_K_HEADERS_FULL_V.start_date%TYPE;
2338: l_currency_conversion_date OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_DATE%TYPE;
2339: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2340: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2341: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2342: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2343: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2344: l_start_date OKL_K_HEADERS_FULL_V.start_date%TYPE;
2345: l_sts_code OKL_K_HEADERS_FULL_V.sts_code%TYPE;
2346: l_generate_accrual_yn OKL_K_HEADERS_FULL_V.generate_accrual_yn%TYPE;
2339: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2340: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2341: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2342: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2343: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2344: l_start_date OKL_K_HEADERS_FULL_V.start_date%TYPE;
2345: l_sts_code OKL_K_HEADERS_FULL_V.sts_code%TYPE;
2346: l_generate_accrual_yn OKL_K_HEADERS_FULL_V.generate_accrual_yn%TYPE;
2347: l_generate_accrual_override_yn OKL_K_HEADERS_FULL_V.generate_accrual_override_yn%TYPE;
2387:
2388: --Added by bkatraga for bug 13332631
2389: CURSOR last_status_csr(p_khr_id NUMBER) IS
2390: SELECT accrual_status_yn
2391: FROM OKL_TRX_CONTRACTS
2392: WHERE date_transaction_occurred = (SELECT MAX(date_transaction_occurred)
2393: FROM OKL_TRX_CONTRACTS
2394: WHERE khr_id = p_khr_id
2395: AND tcn_type = 'ACL'
2389: CURSOR last_status_csr(p_khr_id NUMBER) IS
2390: SELECT accrual_status_yn
2391: FROM OKL_TRX_CONTRACTS
2392: WHERE date_transaction_occurred = (SELECT MAX(date_transaction_occurred)
2393: FROM OKL_TRX_CONTRACTS
2394: WHERE khr_id = p_khr_id
2395: AND tcn_type = 'ACL'
2396: AND tsu_code = 'PROCESSED'
2397: AND representation_type = 'PRIMARY')
2399: AND khr_id = p_khr_id
2400: AND tsu_code = 'PROCESSED'
2401: AND representation_type = 'PRIMARY';
2402:
2403: l_last_accrual_status OKL_TRX_CONTRACTS.accrual_status_yn%TYPE;
2404: --end bkatraga for bug 13332631
2405:
2406: BEGIN
2407:
2929: x_msg_count OUT NOCOPY NUMBER,
2930: x_msg_data OUT NOCOPY VARCHAR2,
2931: p_acceleration_rec IN acceleration_rec_type,
2932: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY', --MGAAP 7263041
2933: x_trx_number OUT NOCOPY OKL_TRX_CONTRACTS.TRX_NUMBER%TYPE) IS --MGAAP 7263041
2934:
2935: -- local collections
2936: TYPE accelerate_ref_cursor IS REF CURSOR;
2937: TYPE stream_rec IS RECORD
2964: l_currency_code OKL_K_HEADERS_FULL_V.CURRENCY_CODE%TYPE;
2965: l_currency_conversion_type OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_TYPE%TYPE;
2966: l_currency_conversion_rate OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_RATE%TYPE;
2967: l_currency_conversion_date OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_DATE%TYPE;
2968: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2969: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2970: l_billing_type VARCHAR2(2000) := NULL;
2971: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2972: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2967: l_currency_conversion_date OKL_K_HEADERS_FULL_V.CURRENCY_CONVERSION_DATE%TYPE;
2968: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2969: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2970: l_billing_type VARCHAR2(2000) := NULL;
2971: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2972: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2973: acceleration_streams_csr accelerate_ref_cursor;
2974: l_stream_rec stream_rec;
2975: l_counter NUMBER := 1;
2968: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
2969: l_factoring_synd_flag VARCHAR2(2000) := NULL;
2970: l_billing_type VARCHAR2(2000) := NULL;
2971: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
2972: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
2973: acceleration_streams_csr accelerate_ref_cursor;
2974: l_stream_rec stream_rec;
2975: l_counter NUMBER := 1;
2976:
3562: p_reverse_rec IN accrual_rec_type,
3563: x_return_status OUT NOCOPY VARCHAR2,
3564: x_msg_count OUT NOCOPY NUMBER,
3565: x_msg_data OUT NOCOPY VARCHAR2,
3566: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3567: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3568: x_memo_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3569: x_memo_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3570: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' -- MGAAP 7263041
3563: x_return_status OUT NOCOPY VARCHAR2,
3564: x_msg_count OUT NOCOPY NUMBER,
3565: x_msg_data OUT NOCOPY VARCHAR2,
3566: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3567: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3568: x_memo_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3569: x_memo_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3570: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' -- MGAAP 7263041
3571: ) IS
3564: x_msg_count OUT NOCOPY NUMBER,
3565: x_msg_data OUT NOCOPY VARCHAR2,
3566: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3567: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3568: x_memo_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3569: x_memo_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3570: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' -- MGAAP 7263041
3571: ) IS
3572:
3565: x_msg_data OUT NOCOPY VARCHAR2,
3566: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3567: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3568: x_memo_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3569: x_memo_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3570: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' -- MGAAP 7263041
3571: ) IS
3572:
3573: -- local variables
3570: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' -- MGAAP 7263041
3571: ) IS
3572:
3573: -- local variables
3574: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
3575: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3576: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3577: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3578: l_api_name VARCHAR2(20) := 'REVERSE_ACCRUALS';
3571: ) IS
3572:
3573: -- local variables
3574: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
3575: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3576: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3577: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3578: l_api_name VARCHAR2(20) := 'REVERSE_ACCRUALS';
3579: l_api_version CONSTANT NUMBER := 1.0;
3572:
3573: -- local variables
3574: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
3575: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3576: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3577: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3578: l_api_name VARCHAR2(20) := 'REVERSE_ACCRUALS';
3579: l_api_version CONSTANT NUMBER := 1.0;
3580: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
3576: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3577: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3578: l_api_name VARCHAR2(20) := 'REVERSE_ACCRUALS';
3579: l_api_version CONSTANT NUMBER := 1.0;
3580: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
3581: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
3582: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3579: l_api_version CONSTANT NUMBER := 1.0;
3580: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
3581: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
3582: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3585: l_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'ACCRUAL';
3586: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
3587: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3580: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
3581: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
3582: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3585: l_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'ACCRUAL';
3586: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
3587: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3588: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3581: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
3582: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3585: l_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'ACCRUAL';
3586: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
3587: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3588: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3589: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
3582: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3585: l_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'ACCRUAL';
3586: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
3587: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3588: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3589: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
3590: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
3583: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3584: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3585: l_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'ACCRUAL';
3586: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
3587: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3588: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3589: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
3590: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
3591: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
3602: -- removed to_date function in between statement as parameters are already of date datatype.
3603: CURSOR reverse_trx_csr(p_khr_id NUMBER, p_reversal_date_to DATE, p_reversal_date_from DATE) IS
3604: SELECT id, transaction_date,
3605: trx_number -- MGAAP 7263041
3606: FROM OKL_TRX_CONTRACTS
3607: WHERE khr_id = p_khr_id
3608: AND TRUNC(date_transaction_occurred) BETWEEN TRUNC(p_reversal_date_to) AND TRUNC(p_reversal_date_from)
3609: AND tsu_code = l_tsu_code_ent
3610: AND tcn_type = l_tcn_type
3715: RAISE OKL_API.G_EXCEPTION_ERROR;
3716: END IF;
3717: END IF;
3718:
3719: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
3720: --Call the transaction public api for update
3721: Okl_Trx_Contracts_Pub.update_trx_contracts
3722: (p_api_version => p_api_version,
3723: p_init_msg_list => p_init_msg_list,
3717: END IF;
3718:
3719: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
3720: --Call the transaction public api for update
3721: Okl_Trx_Contracts_Pub.update_trx_contracts
3722: (p_api_version => p_api_version,
3723: p_init_msg_list => p_init_msg_list,
3724: x_return_status => x_return_status,
3725: x_msg_count => x_msg_count,
3725: x_msg_count => x_msg_count,
3726: x_msg_data => x_msg_data,
3727: p_tcnv_tbl => l_tcnv_tbl,
3728: x_tcnv_tbl => x_rev_tcnv_tbl);
3729: WRITE_TO_LOG('Return status after the call to Okl_Trx_Contracts_Pub.update_trx_contracts :'||x_return_status);
3730:
3731: -- store the highest degree of error
3732: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
3733: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
3888: p_reverse_rec IN accrual_rec_type,
3889: x_return_status OUT NOCOPY VARCHAR2,
3890: x_msg_count OUT NOCOPY NUMBER,
3891: x_msg_data OUT NOCOPY VARCHAR2,
3892: x_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3893: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3894: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY'
3895: ) IS
3896:
3889: x_return_status OUT NOCOPY VARCHAR2,
3890: x_msg_count OUT NOCOPY NUMBER,
3891: x_msg_data OUT NOCOPY VARCHAR2,
3892: x_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
3893: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3894: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY'
3895: ) IS
3896:
3897: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3893: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
3894: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY'
3895: ) IS
3896:
3897: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3898: x_rev_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3899:
3900: BEGIN
3901:
3894: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY'
3895: ) IS
3896:
3897: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3898: x_rev_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
3899:
3900: BEGIN
3901:
3902: REVERSE_ACCRUALS (
3931: -- local variables
3932: l_api_name CONSTANT VARCHAR2(30) := 'REVERSE_ACCRUALS';
3933: l_api_version CONSTANT NUMBER := 1.0;
3934: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3935: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3936: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3937: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3938: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3939: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3932: l_api_name CONSTANT VARCHAR2(30) := 'REVERSE_ACCRUALS';
3933: l_api_version CONSTANT NUMBER := 1.0;
3934: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3935: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3936: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3937: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3938: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3939: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3940: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3933: l_api_version CONSTANT NUMBER := 1.0;
3934: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
3935: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
3936: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3937: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3938: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3939: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3940: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3941: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3936: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
3937: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3938: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3939: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3940: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3941: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3942: l_contract_number VARCHAR2(2000);
3943: l_tcn_type VARCHAR2(2000) := p_tcn_type;
3944: l_count1 NUMBER := 1;
3937: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
3938: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
3939: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
3940: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3941: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
3942: l_contract_number VARCHAR2(2000);
3943: l_tcn_type VARCHAR2(2000) := p_tcn_type;
3944: l_count1 NUMBER := 1;
3945: l_count2 NUMBER := 1;
3952:
3953: -- Cursor to select accrual transactions for cancellation using specified tcn_type
3954: CURSOR reverse_trx_csr IS
3955: SELECT trx.id,trx.transaction_date
3956: FROM OKL_TRX_CONTRACTS trx, okl_trx_types_v typ
3957: WHERE trx.khr_id = p_khr_id
3958: AND trx.tsu_code = l_tsu_code_ent
3959: AND trx.tcn_type = NVL(p_tcn_type,trx.tcn_type)
3960: AND trx.try_id = typ.id
4072: END IF;
4073: END IF;
4074:
4075: --Call the transaction public api for update
4076: Okl_Trx_Contracts_Pub.update_trx_contracts
4077: (p_api_version => p_api_version,
4078: p_init_msg_list => p_init_msg_list,
4079: x_return_status => x_return_status,
4080: x_msg_count => x_msg_count,
4165:
4166: -- local variables
4167: l_api_name CONSTANT VARCHAR2(30) := 'REVERSE_ALL_ACCRUALS';
4168: l_api_version CONSTANT NUMBER := 1.0;
4169: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4170: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4171: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4172: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4173: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4168: l_api_version CONSTANT NUMBER := 1.0;
4169: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4170: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4171: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4172: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4173: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4174: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4175: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4176: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4169: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4170: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4171: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4172: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4173: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4174: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4175: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4176: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4177: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4170: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4171: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4172: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4173: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4174: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4175: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4176: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4177: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4178: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4173: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4174: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4175: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4176: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4177: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4178: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4179: l_count NUMBER := 1;
4180: l_count2 NUMBER := 1;
4181: l_contract_number VARCHAR2(2000);
4174: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4175: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4176: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4177: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4178: x_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4179: l_count NUMBER := 1;
4180: l_count2 NUMBER := 1;
4181: l_contract_number VARCHAR2(2000);
4182:
4188:
4189: -- Cursor to select accrual transactions for cancellation
4190: CURSOR reverse_trx_csr(p_khr_id NUMBER) IS
4191: SELECT id, transaction_date
4192: FROM OKL_TRX_CONTRACTS
4193: WHERE khr_id = p_khr_id
4194: AND tsu_code = l_tsu_code_ent
4195: AND tcn_type = l_tcn_type;
4196: --AND representation_type = 'PRIMARY'; --MGAAP 7263041
4288: END IF;
4289: END IF;
4290:
4291: --Call the transaction public api for update
4292: Okl_Trx_Contracts_Pub.update_trx_contracts
4293: (p_api_version => p_api_version,
4294: p_init_msg_list => p_init_msg_list,
4295: x_return_status => x_return_status,
4296: x_msg_count => x_msg_count,
4374: p_catchup_rec IN accrual_rec_type,
4375: x_return_status OUT NOCOPY VARCHAR2,
4376: x_msg_count OUT NOCOPY NUMBER,
4377: x_msg_data OUT NOCOPY VARCHAR2,
4378: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4379: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4380: x_catch_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4381: x_catch_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4382: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4375: x_return_status OUT NOCOPY VARCHAR2,
4376: x_msg_count OUT NOCOPY NUMBER,
4377: x_msg_data OUT NOCOPY VARCHAR2,
4378: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4379: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4380: x_catch_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4381: x_catch_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4382: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4383: ) IS
4376: x_msg_count OUT NOCOPY NUMBER,
4377: x_msg_data OUT NOCOPY VARCHAR2,
4378: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4379: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4380: x_catch_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4381: x_catch_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4382: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4383: ) IS
4384:
4377: x_msg_data OUT NOCOPY VARCHAR2,
4378: x_rev_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4379: x_rev_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4380: x_catch_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4381: x_catch_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4382: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4383: ) IS
4384:
4385: -- local variables
4382: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4383: ) IS
4384:
4385: -- local variables
4386: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4387: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4388: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4389: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4390: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
4383: ) IS
4384:
4385: -- local variables
4386: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4387: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4388: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4389: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4390: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
4391: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
4384:
4385: -- local variables
4386: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4387: l_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4388: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4389: l_source_id_tbl Okl_Reversal_Pub.source_id_tbl_type;
4390: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
4391: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
4392: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
4392: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
4393: l_template_tbl Okl_Account_Dist_Pub.avlv_tbl_type;
4394: l_amount_tbl Okl_Account_Dist_Pub.amount_tbl_type;
4395: l_acc_gen_primary_key_tbl Okl_Account_Dist_Pub.acc_gen_primary_key;
4396: l_catchup_trx_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
4397: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4398: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4393: l_template_tbl Okl_Account_Dist_Pub.avlv_tbl_type;
4394: l_amount_tbl Okl_Account_Dist_Pub.amount_tbl_type;
4395: l_acc_gen_primary_key_tbl Okl_Account_Dist_Pub.acc_gen_primary_key;
4396: l_catchup_trx_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
4397: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4398: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4396: l_catchup_trx_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
4397: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4398: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4402: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
4403: l_catchup_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'CATCH-UP';
4404: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4397: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
4398: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4402: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
4403: l_catchup_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'CATCH-UP';
4404: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4405: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4398: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE := 'ACL';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4402: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
4403: l_catchup_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'CATCH-UP';
4404: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4405: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4406: l_api_name VARCHAR2(20) := 'CATCHUP_ACCRUALS';
4399: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4402: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
4403: l_catchup_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'CATCH-UP';
4404: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4405: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4406: l_api_name VARCHAR2(20) := 'CATCHUP_ACCRUALS';
4407: l_api_version CONSTANT NUMBER := 1.0;
4400: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4401: l_tsu_code_can OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'CANCELED';
4402: l_non_accrual_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'NON-ACCRUAL';
4403: l_catchup_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'CATCH-UP';
4404: l_reversal_activity OKL_TRX_CONTRACTS.ACCRUAL_ACTIVITY%TYPE := 'REVERSAL';
4405: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4406: l_api_name VARCHAR2(20) := 'CATCHUP_ACCRUALS';
4407: l_api_version CONSTANT NUMBER := 1.0;
4408: l_accrual_rec accrual_rec_type;
4413: -- Cursor to select transaction headers for accrual catchup
4414: CURSOR catchup_trx_csr(p_khr_id NUMBER) IS
4415: SELECT id, transaction_date,
4416: trx_number -- MGAAP 7263041
4417: FROM OKL_TRX_CONTRACTS
4418: WHERE khr_id = p_khr_id
4419: AND tcn_type = l_tcn_type
4420: AND tsu_code = l_tsu_code_ent
4421: AND accrual_activity = l_non_accrual_activity
4522: RAISE OKL_API.G_EXCEPTION_ERROR;
4523: END IF;
4524: END IF;
4525:
4526: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
4527: --Call the transaction public api for update
4528: Okl_Trx_Contracts_Pub.update_trx_contracts
4529: (p_api_version => p_api_version,
4530: p_init_msg_list => p_init_msg_list,
4524: END IF;
4525:
4526: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
4527: --Call the transaction public api for update
4528: Okl_Trx_Contracts_Pub.update_trx_contracts
4529: (p_api_version => p_api_version,
4530: p_init_msg_list => p_init_msg_list,
4531: x_return_status => x_return_status,
4532: x_msg_count => x_msg_count,
4532: x_msg_count => x_msg_count,
4533: x_msg_data => x_msg_data,
4534: p_tcnv_tbl => l_tcnv_tbl,
4535: x_tcnv_tbl => x_rev_tcnv_tbl);
4536: WRITE_TO_LOG('Return status after the call to Okl_Trx_Contracts_Pub.update_trx_contracts :'||x_return_status);
4537:
4538: -- store the highest degree of error
4539: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
4540: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
4696: p_catchup_rec IN accrual_rec_type,
4697: x_return_status OUT NOCOPY VARCHAR2,
4698: x_msg_count OUT NOCOPY NUMBER,
4699: x_msg_data OUT NOCOPY VARCHAR2,
4700: x_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4701: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4702: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4703: ) IS
4704:
4697: x_return_status OUT NOCOPY VARCHAR2,
4698: x_msg_count OUT NOCOPY NUMBER,
4699: x_msg_data OUT NOCOPY VARCHAR2,
4700: x_tcnv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type,
4701: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4702: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4703: ) IS
4704:
4705: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4701: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4702: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4703: ) IS
4704:
4705: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4706: x_rev_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4707:
4708: BEGIN
4709:
4702: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY' --MGAAP 7263041
4703: ) IS
4704:
4705: x_rev_tcnv_tbl OKL_TRX_CONTRACTS_PUB.tcnv_tbl_type;
4706: x_rev_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4707:
4708: BEGIN
4709:
4710: CATCHUP_ACCRUALS (
4729: p_init_msg_list IN VARCHAR2,
4730: x_return_status OUT NOCOPY VARCHAR2,
4731: x_msg_count OUT NOCOPY NUMBER,
4732: x_msg_data OUT NOCOPY VARCHAR2,
4733: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
4734: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4735: p_accrual_rec IN accrual_rec_type,
4736: p_ctxt_val_tbl IN Okl_Account_dist_Pub.ctxt_val_tbl_type,
4737: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
4730: x_return_status OUT NOCOPY VARCHAR2,
4731: x_msg_count OUT NOCOPY NUMBER,
4732: x_msg_data OUT NOCOPY VARCHAR2,
4733: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
4734: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
4735: p_accrual_rec IN accrual_rec_type,
4736: p_ctxt_val_tbl IN Okl_Account_dist_Pub.ctxt_val_tbl_type,
4737: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
4738:
4759: FROM okl_k_headers khr
4760: WHERE khr.id = p_khr_id;
4761:
4762: --local variables
4763: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4764: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4765: l_api_name VARCHAR2(30) := 'CREATE_ACCR_LINE_FORMULA';
4766: l_api_version CONSTANT NUMBER := 1.0;
4767: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
4760: WHERE khr.id = p_khr_id;
4761:
4762: --local variables
4763: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4764: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4765: l_api_name VARCHAR2(30) := 'CREATE_ACCR_LINE_FORMULA';
4766: l_api_version CONSTANT NUMBER := 1.0;
4767: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
4768: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
4763: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
4764: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
4765: l_api_name VARCHAR2(30) := 'CREATE_ACCR_LINE_FORMULA';
4766: l_api_version CONSTANT NUMBER := 1.0;
4767: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
4768: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
4769: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4770: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4771: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4766: l_api_version CONSTANT NUMBER := 1.0;
4767: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
4768: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
4769: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
4770: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
4771: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
4772: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
4773: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
4774: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
5010: l_tclv_tbl(l_line_number).kle_id := l_asset_rec.id;
5011: END LOOP; --Added by bkatraga for bug 13447258
5012: END LOOP;
5013:
5014: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.create_trx_contracts');
5015: WRITE_TO_LOG('The contents of l_tcnv_rec being passed to the create call ');
5016: WRITE_TO_LOG('===========================================================');
5017: WRITE_TO_LOG('l_tcnv_rec.khr_id :'||l_tcnv_rec.khr_id);
5018: WRITE_TO_LOG('l_tcnv_rec.pdt_id :'||l_tcnv_rec.pdt_id);
5055: WRITE_TO_LOG('l_tclv_tbl(i).accrual_rule_yn :'||l_tclv_tbl(i).accrual_rule_yn);
5056: END LOOP;
5057:
5058: -- Call Transaction Public API to insert transaction header and line records
5059: Okl_Trx_Contracts_Pub.create_trx_contracts
5060: (p_api_version => p_api_version
5061: ,p_init_msg_list => p_init_msg_list
5062: ,x_return_status => x_return_status
5063: ,x_msg_count => x_msg_count
5233: l_tcnv_rec.amount := l_trx_header_amt;
5234:
5235:
5236: -- update the transaction header and line records with amounts
5237: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
5238: Okl_Trx_Contracts_Pub.update_trx_contracts
5239: (p_api_version => p_api_version
5240: ,p_init_msg_list => p_init_msg_list
5241: ,x_return_status => x_return_status
5234:
5235:
5236: -- update the transaction header and line records with amounts
5237: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
5238: Okl_Trx_Contracts_Pub.update_trx_contracts
5239: (p_api_version => p_api_version
5240: ,p_init_msg_list => p_init_msg_list
5241: ,x_return_status => x_return_status
5242: ,x_msg_count => x_msg_count
5244: ,p_tcnv_rec => l_tcnv_rec
5245: ,p_tclv_tbl => l_tclv_tbl
5246: ,x_tcnv_rec => x_tcnv_rec
5247: ,x_tclv_tbl => x_tclv_tbl );
5248: WRITE_TO_LOG('Return Status after the call to Okl_Trx_Contracts_Pub.update_trx_contracts is '||x_return_status);
5249: -- store the highest degree of error
5250: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
5251: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
5252: -- need to leave
5346: p_init_msg_list IN VARCHAR2,
5347: x_return_status OUT NOCOPY VARCHAR2,
5348: x_msg_count OUT NOCOPY NUMBER,
5349: x_msg_data OUT NOCOPY VARCHAR2,
5350: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
5351: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
5352: p_accrual_rec IN accrual_rec_type,
5353: p_ctxt_val_tbl IN Okl_Account_dist_Pub.ctxt_val_tbl_type,
5354: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
5347: x_return_status OUT NOCOPY VARCHAR2,
5348: x_msg_count OUT NOCOPY NUMBER,
5349: x_msg_data OUT NOCOPY VARCHAR2,
5350: x_tcnv_rec OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tcnv_rec_type,
5351: x_tclv_tbl OUT NOCOPY OKL_TRX_CONTRACTS_PUB.tclv_tbl_type,
5352: p_accrual_rec IN accrual_rec_type,
5353: p_ctxt_val_tbl IN Okl_Account_dist_Pub.ctxt_val_tbl_type,
5354: p_representation_type IN VARCHAR2 DEFAULT 'PRIMARY') IS --MGAAP 7263041
5355:
5377: FROM okl_k_headers khr
5378: WHERE khr.id = p_khr_id;
5379:
5380: --local variables
5381: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
5382: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
5383: l_api_name VARCHAR2(30) := 'CREATE_ACCRUALS_FORMULA';
5384: l_api_version CONSTANT NUMBER := 1.0;
5385: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
5378: WHERE khr.id = p_khr_id;
5379:
5380: --local variables
5381: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
5382: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
5383: l_api_name VARCHAR2(30) := 'CREATE_ACCRUALS_FORMULA';
5384: l_api_version CONSTANT NUMBER := 1.0;
5385: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
5386: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
5381: l_tcnv_rec OKL_TRX_CONTRACTS_PUB.tcnv_rec_type;
5382: l_tclv_tbl OKL_TRX_CONTRACTS_PUB.tclv_tbl_type;
5383: l_api_name VARCHAR2(30) := 'CREATE_ACCRUALS_FORMULA';
5384: l_api_version CONSTANT NUMBER := 1.0;
5385: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
5386: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
5387: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
5388: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
5389: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
5384: l_api_version CONSTANT NUMBER := 1.0;
5385: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE;
5386: l_tcl_type OKL_TXL_CNTRCT_LNS.TCL_TYPE%TYPE;
5387: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
5388: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
5389: l_source_table OKL_TRNS_ACC_DSTRS.SOURCE_TABLE%TYPE := 'OKL_TXL_CNTRCT_LNS';
5390: l_tmpl_identify_rec Okl_Account_Dist_Pub.tmpl_identify_rec_type;
5391: l_dist_info_rec Okl_Account_Dist_Pub.dist_info_rec_type;
5392: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
5607: l_tclv_tbl(i).currency_code := p_accrual_rec.currency_code;
5608: l_tclv_tbl(i).accrual_rule_yn := p_accrual_rec.accrual_rule_yn;
5609: END LOOP;
5610:
5611: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.create_trx_contracts');
5612: WRITE_TO_LOG('The contents of l_tcnv_rec being passed to the create call ');
5613: WRITE_TO_LOG('===========================================================');
5614: WRITE_TO_LOG('l_tcnv_rec.khr_id :'||l_tcnv_rec.khr_id);
5615: WRITE_TO_LOG('l_tcnv_rec.pdt_id :'||l_tcnv_rec.pdt_id);
5652: WRITE_TO_LOG('l_tclv_tbl(i).accrual_rule_yn :'||l_tclv_tbl(i).accrual_rule_yn);
5653: END LOOP;
5654:
5655: -- Call Transaction Public API to insert transaction header and line records
5656: Okl_Trx_Contracts_Pub.create_trx_contracts
5657: (p_api_version => p_api_version
5658: ,p_init_msg_list => p_init_msg_list
5659: ,x_return_status => x_return_status
5660: ,x_msg_count => x_msg_count
5828: l_tcnv_rec.amount := l_trx_header_amt;
5829:
5830:
5831: -- update the transaction header and line records with amounts
5832: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
5833: Okl_Trx_Contracts_Pub.update_trx_contracts
5834: (p_api_version => p_api_version
5835: ,p_init_msg_list => p_init_msg_list
5836: ,x_return_status => x_return_status
5829:
5830:
5831: -- update the transaction header and line records with amounts
5832: WRITE_TO_LOG('Prior to the call to Okl_Trx_Contracts_Pub.update_trx_contracts');
5833: Okl_Trx_Contracts_Pub.update_trx_contracts
5834: (p_api_version => p_api_version
5835: ,p_init_msg_list => p_init_msg_list
5836: ,x_return_status => x_return_status
5837: ,x_msg_count => x_msg_count
5839: ,p_tcnv_rec => l_tcnv_rec
5840: ,p_tclv_tbl => l_tclv_tbl
5841: ,x_tcnv_rec => x_tcnv_rec
5842: ,x_tclv_tbl => x_tclv_tbl );
5843: WRITE_TO_LOG('Return Status after the call to Okl_Trx_Contracts_Pub.update_trx_contracts is '||x_return_status);
5844: -- store the highest degree of error
5845: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
5846: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN
5847: -- need to leave
6092: l_sts_code OKL_K_HEADERS_FULL_V.sts_code%TYPE;
6093: l_product_id OKL_K_HEADERS_FULL_V.pdt_id%TYPE;
6094: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
6095: l_try_id OKL_TRX_TYPES_V.id%TYPE;
6096: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6097: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6098: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6093: l_product_id OKL_K_HEADERS_FULL_V.pdt_id%TYPE;
6094: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
6095: l_try_id OKL_TRX_TYPES_V.id%TYPE;
6096: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6097: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6098: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6094: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
6095: l_try_id OKL_TRX_TYPES_V.id%TYPE;
6096: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6097: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6098: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6095: l_try_id OKL_TRX_TYPES_V.id%TYPE;
6096: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6097: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6098: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6103: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
6096: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6097: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
6098: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6103: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
6104: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
6099: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6103: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
6104: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
6105: l_batch_name OKL_TRX_CONTRACTS.DESCRIPTION%TYPE := p_process_accrual_rec.batch_name;
6106: l_reverse_date_to DATE;
6107: l_sob_name VARCHAR2(2000);
6100: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6103: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
6104: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
6105: l_batch_name OKL_TRX_CONTRACTS.DESCRIPTION%TYPE := p_process_accrual_rec.batch_name;
6106: l_reverse_date_to DATE;
6107: l_sob_name VARCHAR2(2000);
6108: l_sysdate DATE := SYSDATE;
6101: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
6102: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6103: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
6104: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
6105: l_batch_name OKL_TRX_CONTRACTS.DESCRIPTION%TYPE := p_process_accrual_rec.batch_name;
6106: l_reverse_date_to DATE;
6107: l_sob_name VARCHAR2(2000);
6108: l_sysdate DATE := SYSDATE;
6109: l_api_version CONSTANT NUMBER := 1.0;
6120: l_accrual_date DATE;
6121: l_rule_info_cat VARCHAR2(2000) := 'LAINTP';
6122: l_period_status VARCHAR2(1);
6123:
6124: l_previous_accrual_status OKL_TRX_CONTRACTS.accrual_status_yn%TYPE;
6125: l_previous_override_status OKL_TRX_CONTRACTS.update_status_yn%TYPE;
6126:
6127: --Bug# 13815781
6128: --l_last_interest_calc_date DATE;
6121: l_rule_info_cat VARCHAR2(2000) := 'LAINTP';
6122: l_period_status VARCHAR2(1);
6123:
6124: l_previous_accrual_status OKL_TRX_CONTRACTS.accrual_status_yn%TYPE;
6125: l_previous_override_status OKL_TRX_CONTRACTS.update_status_yn%TYPE;
6126:
6127: --Bug# 13815781
6128: --l_last_interest_calc_date DATE;
6129: -- bug 2490346
6136: l_rule_result VARCHAR2(1);
6137: l_sty_id OKL_STRM_TYPE_V.id%TYPE;
6138: l_stream_tbl stream_tbl_type;
6139: l_stream_tbl_rep stream_tbl_type; -- MGAAP 7263041
6140: l_tcnv_rec Okl_Trx_Contracts_Pub.tcnv_rec_type;
6141: l_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6142: l_can_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6143: l_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6144: l_can_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6137: l_sty_id OKL_STRM_TYPE_V.id%TYPE;
6138: l_stream_tbl stream_tbl_type;
6139: l_stream_tbl_rep stream_tbl_type; -- MGAAP 7263041
6140: l_tcnv_rec Okl_Trx_Contracts_Pub.tcnv_rec_type;
6141: l_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6142: l_can_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6143: l_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6144: l_can_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6145: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
6138: l_stream_tbl stream_tbl_type;
6139: l_stream_tbl_rep stream_tbl_type; -- MGAAP 7263041
6140: l_tcnv_rec Okl_Trx_Contracts_Pub.tcnv_rec_type;
6141: l_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6142: l_can_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6143: l_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6144: l_can_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6145: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
6146: l_accrual_rec accrual_rec_type;
6139: l_stream_tbl_rep stream_tbl_type; -- MGAAP 7263041
6140: l_tcnv_rec Okl_Trx_Contracts_Pub.tcnv_rec_type;
6141: l_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6142: l_can_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6143: l_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6144: l_can_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6145: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
6146: l_accrual_rec accrual_rec_type;
6147: l_reverse_rec accrual_rec_type;
6140: l_tcnv_rec Okl_Trx_Contracts_Pub.tcnv_rec_type;
6141: l_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6142: l_can_tcnv_tbl Okl_Trx_Contracts_Pub.tcnv_tbl_type;
6143: l_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6144: l_can_tclv_tbl Okl_Trx_Contracts_Pub.tclv_tbl_type;
6145: l_ctxt_val_tbl Okl_Account_Dist_Pub.ctxt_val_tbl_type;
6146: l_accrual_rec accrual_rec_type;
6147: l_reverse_rec accrual_rec_type;
6148: l_catchup_rec accrual_rec_type;
6168: -- AND rule_information_category = l_rule_info_cat;
6169:
6170:
6171: -- Cursor to select the previous accrual and override statuses
6172: -- bug 2474969, modified subquery from okl_trx_contracts to okl_trx_contracts_v
6173: -- bug 2870449, 25-Mar-03, SGIYER, added khr_id = p_khr_id to outer query.
6174: CURSOR last_status_csr(p_khr_id NUMBER) IS
6175: SELECT accrual_status_yn, update_status_yn
6176: FROM OKL_TRX_CONTRACTS
6172: -- bug 2474969, modified subquery from okl_trx_contracts to okl_trx_contracts_v
6173: -- bug 2870449, 25-Mar-03, SGIYER, added khr_id = p_khr_id to outer query.
6174: CURSOR last_status_csr(p_khr_id NUMBER) IS
6175: SELECT accrual_status_yn, update_status_yn
6176: FROM OKL_TRX_CONTRACTS
6177: WHERE date_transaction_occurred = (SELECT MAX(date_transaction_occurred)
6178: FROM OKL_TRX_CONTRACTS
6179: WHERE khr_id = p_khr_id
6180: AND tcn_type = l_tcn_type
6174: CURSOR last_status_csr(p_khr_id NUMBER) IS
6175: SELECT accrual_status_yn, update_status_yn
6176: FROM OKL_TRX_CONTRACTS
6177: WHERE date_transaction_occurred = (SELECT MAX(date_transaction_occurred)
6178: FROM OKL_TRX_CONTRACTS
6179: WHERE khr_id = p_khr_id
6180: AND tcn_type = l_tcn_type
6181: AND tsu_code = l_tsu_code_ent
6182: AND representation_type = 'PRIMARY') -- MGAAP 7263041
6189: -- bug# 2474969
6190: -- bug# 2852781. Added tsu_code check for rebook error.
6191: CURSOR check_agn_csr(p_khr_id NUMBER) IS
6192: SELECT 'Y'
6193: FROM OKL_TRX_CONTRACTS
6194: WHERE tcn_type = l_tcn_type
6195: AND khr_id = p_khr_id
6196: AND tsu_code = l_tsu_code_ent
6197: AND representation_type = 'PRIMARY'; -- MGAAP 7263041
6230: -- cursor to check for accrual trx for a given period for variable rate contracts
6231: -- 12/5/05. Bug 4862620. Check for trx with variable interest income only
6232: CURSOR check_variable_trx(p_khr_id NUMBER, p_date DATE) IS
6233: SELECT 'Y'
6234: FROM OKL_TRX_CONTRACTS trx, OKL_TRX_TYPES_V try, OKL_TXL_CNTRCT_LNS txl, OKL_STRM_TYPE_V sty
6235: WHERE trx.khr_id = p_khr_id
6236: AND trx.try_id = try.id
6237: AND try.name = 'Accrual'
6238: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
6248: -- CURSOR check_actual_trx(p_khr_id NUMBER, p_date DATE) IS
6249: -- SELECT 'Y'
6250: CURSOR check_actual_trx(p_khr_id NUMBER) IS
6251: SELECT TRUNC(MAX(trx.date_transaction_occurred)) last_accrual_date
6252: FROM OKL_TRX_CONTRACTS trx,
6253: OKL_TRX_TYPES_V try,
6254: OKL_TXL_CNTRCT_LNS txl,
6255: OKL_STRM_TYPE_V sty
6256: WHERE trx.khr_id = p_khr_id
9961: l_product_id OKL_K_HEADERS_FULL_V.pdt_id%TYPE;
9962: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
9963: l_try_id OKL_TRX_TYPES_V.id%TYPE;
9964: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
9965: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9966: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9967: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
9968: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
9969: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
9962: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
9963: l_try_id OKL_TRX_TYPES_V.id%TYPE;
9964: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
9965: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9966: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9967: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
9968: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
9969: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
9970: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
9963: l_try_id OKL_TRX_TYPES_V.id%TYPE;
9964: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
9965: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9966: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9967: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
9968: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
9969: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
9970: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
9971: l_reverse_date_to DATE;
9964: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
9965: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9966: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9967: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
9968: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
9969: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
9970: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
9971: l_reverse_date_to DATE;
9972: l_sob_name VARCHAR2(2000);
9965: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9966: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
9967: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
9968: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
9969: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
9970: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
9971: l_reverse_date_to DATE;
9972: l_sob_name VARCHAR2(2000);
9973: l_api_version CONSTANT NUMBER := 1.0;
9986: l_contract_error_count NUMBER := 1;
9987: l_period_status VARCHAR2(1);
9988: l_counter NUMBER := 1;
9989: l_contract_counter NUMBER := 0;
9990: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
9991: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
9992:
9993: l_reqid FND_CONCURRENT_REQUESTS.request_id%TYPE;
9994: req_data VARCHAR2(10);
9987: l_period_status VARCHAR2(1);
9988: l_counter NUMBER := 1;
9989: l_contract_counter NUMBER := 0;
9990: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
9991: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
9992:
9993: l_reqid FND_CONCURRENT_REQUESTS.request_id%TYPE;
9994: req_data VARCHAR2(10);
9995: i NUMBER;
10628: l_product_id OKL_K_HEADERS_FULL_V.pdt_id%TYPE;
10629: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
10630: l_try_id OKL_TRX_TYPES_V.id%TYPE;
10631: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
10632: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10633: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10634: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
10635: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10629: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
10630: l_try_id OKL_TRX_TYPES_V.id%TYPE;
10631: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
10632: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10633: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10634: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
10635: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10630: l_try_id OKL_TRX_TYPES_V.id%TYPE;
10631: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
10632: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10633: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10634: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
10635: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10638: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
10631: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
10632: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10633: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10634: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
10635: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10638: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
10639: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
10632: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10633: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
10634: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
10635: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10638: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
10639: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
10640: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
10636: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10638: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
10639: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
10640: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
10641: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
10642: l_reverse_date_to DATE;
10643: l_sob_name VARCHAR2(2000);
10644: l_sysdate DATE := SYSDATE;
10637: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
10638: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
10639: --Fixed Bug 5707866 SLA Uptake Project by nikshah, changed tsu_code to PROCESSED from ENTERED
10640: l_tsu_code_ent OKL_TRX_CONTRACTS.TSU_CODE%TYPE := 'PROCESSED';
10641: l_tcn_type OKL_TRX_CONTRACTS.TCN_TYPE%TYPE := 'ACL';
10642: l_reverse_date_to DATE;
10643: l_sob_name VARCHAR2(2000);
10644: l_sysdate DATE := SYSDATE;
10645: l_api_version CONSTANT NUMBER := 1.0;
10660: l_rule_info_cat VARCHAR2(2000) := 'LAINTP';
10661: l_period_status VARCHAR2(1);
10662: l_counter NUMBER := 1;
10663: l_contract_counter NUMBER := 0;
10664: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
10665: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
10666: l_lower_limit NUMBER := 1;
10667: l_upper_limit NUMBER;
10668: l_process_records NUMBER := 30;
10661: l_period_status VARCHAR2(1);
10662: l_counter NUMBER := 1;
10663: l_contract_counter NUMBER := 0;
10664: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
10665: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
10666: l_lower_limit NUMBER := 1;
10667: l_upper_limit NUMBER;
10668: l_process_records NUMBER := 30;
10669: l_total_records NUMBER;
11020: l_product_id OKL_K_HEADERS_FULL_V.pdt_id%TYPE;
11021: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
11022: l_try_id OKL_TRX_TYPES_V.id%TYPE;
11023: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
11024: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11025: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11021: l_deal_type OKL_K_HEADERS_FULL_V.deal_type%TYPE;
11022: l_try_id OKL_TRX_TYPES_V.id%TYPE;
11023: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
11024: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11025: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11022: l_try_id OKL_TRX_TYPES_V.id%TYPE;
11023: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
11024: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11025: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11030: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
11023: l_accrual_reversal_days OKL_SYS_ACCT_OPTS.accrual_reversal_days%TYPE;
11024: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11025: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11030: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
11031: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
11024: l_func_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11025: l_khr_currency_code OKL_TRX_CONTRACTS.CURRENCY_CODE%TYPE;
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11030: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
11031: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
11032: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
11026: l_currency_conv_type OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_TYPE%TYPE;
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11030: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
11031: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
11032: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
11033: l_reverse_date_to DATE;
11034: l_sob_name VARCHAR2(2000);
11027: l_currency_conv_rate OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_RATE%TYPE;
11028: l_currency_conv_date OKL_TRX_CONTRACTS.CURRENCY_CONVERSION_DATE%TYPE;
11029: l_sob_id OKL_SYS_ACCT_OPTS.set_of_books_id%TYPE;
11030: l_source_trx_type OKL_TRX_CONTRACTS.SOURCE_TRX_TYPE%TYPE;
11031: l_source_trx_id OKL_TRX_CONTRACTS.SOURCE_TRX_ID%TYPE;
11032: l_try_name OKL_TRX_TYPES_V.NAME%TYPE := 'Accrual';
11033: l_reverse_date_to DATE;
11034: l_sob_name VARCHAR2(2000);
11035: l_api_version CONSTANT NUMBER := 1.0;