[Home] [Help]
114: l_source_billing_profile NUMBER;
115: l_con_order_line_id NUMBER;
116: /*Added for ER 16036980*/
117: BEGIN
118: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
119: THEN
120: fnd_log.STRING (fnd_log.level_statement,
121: g_module_current || '.Check_merge_yn',
122: 'Warranty Flag ' || p_warranty_flag
116: /*Added for ER 16036980*/
117: BEGIN
118: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
119: THEN
120: fnd_log.STRING (fnd_log.level_statement,
121: g_module_current || '.Check_merge_yn',
122: 'Warranty Flag ' || p_warranty_flag
123: );
124: END IF;
333: FROM hz_cust_accounts_all ca
334: WHERE ca.cust_account_id = c_cust_acct_id;
335: BEGIN
336:
337: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
338: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
339: 'p_context_level = '||p_context_level);
340:
341: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
334: WHERE ca.cust_account_id = c_cust_acct_id;
335: BEGIN
336:
337: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
338: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
339: 'p_context_level = '||p_context_level);
340:
341: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
342: 'p_order_header_id = '||p_order_header_id);
337: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
338: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
339: 'p_context_level = '||p_context_level);
340:
341: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
342: 'p_order_header_id = '||p_order_header_id);
343:
344: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
345: 'p_order_line_id = '||p_order_line_id);
340:
341: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
342: 'p_order_header_id = '||p_order_header_id);
343:
344: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
345: 'p_order_line_id = '||p_order_line_id);
346:
347: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
348: 'p_contract_hdr_id = '||p_contract_hdr_id);
343:
344: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
345: 'p_order_line_id = '||p_order_line_id);
346:
347: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
348: 'p_contract_hdr_id = '||p_contract_hdr_id);
349:
350: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
351: 'p_contract_line_id = '||p_contract_line_id);
346:
347: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
348: 'p_contract_hdr_id = '||p_contract_hdr_id);
349:
350: fnd_log.STRING (fnd_log.level_statement,g_module_current||'.get_cc_trxn_extn parameters',
351: 'p_contract_line_id = '||p_contract_line_id);
352: END IF;
353:
354: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
372:
373: -- For a transaction extension id, an instrument assignment id
374: -- should always exist in iPayments.
375: IF l_instr_id IS NULL THEN
376: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
377: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
378: fnd_log.STRING (fnd_log.level_error,
379: g_module_current
380: || '.get_cc_trxn_extn-Header.ERROR',
374: -- should always exist in iPayments.
375: IF l_instr_id IS NULL THEN
376: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
377: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
378: fnd_log.STRING (fnd_log.level_error,
379: g_module_current
380: || '.get_cc_trxn_extn-Header.ERROR',
381: 'After CURSOR - c_InstrId'
382: || ' ,Payment Txn ID = '
384: || ' ,p_order_header_id = '
385: || p_order_header_id
386: );
387: ELSE
388: fnd_log.STRING (fnd_log.level_error,
389: g_module_current
390: || '.get_cc_trxn_extn-Line.ERROR',
391: 'After CURSOR - c_InstrId'
392: || ' ,Payment Txn ID = '
434:
435: l_trxnextension_rec.originating_application_id := g_app_id;
436: l_trxnextension_rec.trxn_ref_number1 := TO_CHAR (SYSDATE, 'ddmmyyyyhhmmssss');
437:
438: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
439: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
440: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
441: fnd_log.STRING(
442: fnd_log.level_statement,
436: l_trxnextension_rec.trxn_ref_number1 := TO_CHAR (SYSDATE, 'ddmmyyyyhhmmssss');
437:
438: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
439: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
440: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
441: fnd_log.STRING(
442: fnd_log.level_statement,
443: g_module_current || '.get_cc_trxn_extn-Header',
444: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order header'
437:
438: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
439: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
440: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
441: fnd_log.STRING(
442: fnd_log.level_statement,
443: g_module_current || '.get_cc_trxn_extn-Header',
444: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order header'
445: || ' ,Party_Id = '
438: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
439: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
440: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
441: fnd_log.STRING(
442: fnd_log.level_statement,
443: g_module_current || '.get_cc_trxn_extn-Header',
444: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order header'
445: || ' ,Party_Id = '
446: || l_payercontext_rec.party_id
454: || l_instr_id
455: || ' ,application_id= '
456: || l_trxnextension_rec.originating_application_id
457: );
458: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
459: ELSE
460: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
461: fnd_log.STRING
462: (fnd_log.level_statement,
456: || l_trxnextension_rec.originating_application_id
457: );
458: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
459: ELSE
460: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
461: fnd_log.STRING
462: (fnd_log.level_statement,
463: g_module_current || '.get_cc_trxn_extn-Line',
464: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order line'
457: );
458: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
459: ELSE
460: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
461: fnd_log.STRING
462: (fnd_log.level_statement,
463: g_module_current || '.get_cc_trxn_extn-Line',
464: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order line'
465: || ' ,Party_Id = '
458: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
459: ELSE
460: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
461: fnd_log.STRING
462: (fnd_log.level_statement,
463: g_module_current || '.get_cc_trxn_extn-Line',
464: 'Before call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension for order line'
465: || ' ,Party_Id = '
466: || l_payercontext_rec.party_id
474: || l_instr_id
475: || ' ,application_id= '
476: || l_trxnextension_rec.originating_application_id
477: );
478: fnd_log.STRING(fnd_log.level_statement,g_module_current,' ');
479: END IF;
480: END IF;
481:
482: -- A payer equivalency level of full is provided for iPayments to be
499: x_response => l_response
500: );
501:
502: IF l_return_status <> 'S' THEN
503: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
504: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
505: fnd_log.STRING
506: (fnd_log.level_error,
507: g_module_current || '.get_cc_trxn_extn-Header.ERROR',
501:
502: IF l_return_status <> 'S' THEN
503: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
504: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
505: fnd_log.STRING
506: (fnd_log.level_error,
507: g_module_current || '.get_cc_trxn_extn-Header.ERROR',
508: 'After call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension'
509: || ' ,x_return_status= '
502: IF l_return_status <> 'S' THEN
503: IF (fnd_log.level_error >= fnd_log.g_current_runtime_level) THEN
504: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
505: fnd_log.STRING
506: (fnd_log.level_error,
507: g_module_current || '.get_cc_trxn_extn-Header.ERROR',
508: 'After call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension'
509: || ' ,x_return_status= '
510: || l_return_status
515: || ' ,Result Message= '
516: || l_response.result_message
517: );
518: ELSE
519: fnd_log.STRING
520: (fnd_log.level_error,
521: g_module_current || '.get_cc_trxn_extn-Line.ERROR',
522: 'After call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension'
523: || ' ,x_return_status= '
516: || l_response.result_message
517: );
518: ELSE
519: fnd_log.STRING
520: (fnd_log.level_error,
521: g_module_current || '.get_cc_trxn_extn-Line.ERROR',
522: 'After call to IBY_FNDCPT_TRXN_PUB.Create_Transaction_Extension'
523: || ' ,x_return_status= '
524: || l_return_status
546: END IF;
547: RAISE g_exception_halt_validation;
548: END IF;
549:
550: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
551: fnd_log.STRING (fnd_log.level_statement,
552: g_module_current||'.get_cc_trxn_extn ',
553: 'l_entity_id = '||l_entity_id);
554: END IF;
547: RAISE g_exception_halt_validation;
548: END IF;
549:
550: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level) THEN
551: fnd_log.STRING (fnd_log.level_statement,
552: g_module_current||'.get_cc_trxn_extn ',
553: 'l_entity_id = '||l_entity_id);
554: END IF;
555:
588: g_sqlerrm_token,
589: SQLERRM
590: );
591:
592: IF fnd_log.level_unexpected >= fnd_log.g_current_runtime_level THEN
593: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
594: fnd_log.STRING (fnd_log.level_unexpected,
595: g_module_current
596: || '.get_cc_trxn_extn-Header.UNEXPECTED',
590: );
591:
592: IF fnd_log.level_unexpected >= fnd_log.g_current_runtime_level THEN
593: IF p_context_level = G_CONTEXT_ORDER_HEADER THEN
594: fnd_log.STRING (fnd_log.level_unexpected,
595: g_module_current
596: || '.get_cc_trxn_extn-Header.UNEXPECTED',
597: ' sqlcode = ' || SQLCODE || ', sqlerrm = '
598: || SQLERRM
597: ' sqlcode = ' || SQLCODE || ', sqlerrm = '
598: || SQLERRM
599: );
600: ELSE
601: fnd_log.STRING (fnd_log.level_unexpected,
602: g_module_current
603: || '.get_cc_trxn_extn-Line.UNEXPECTED',
604: ' sqlcode = ' || SQLCODE || ', sqlerrm = '
605: || SQLERRM
661: INTO l_roleid;
662:
663: CLOSE l_party_csr;
664:
665: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
666: THEN
667: fnd_log.STRING (fnd_log.level_statement,
668: g_module_current || '.PARTY_ROLE',
669: 'Party Role Id = ' || l_roleid
663: CLOSE l_party_csr;
664:
665: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
666: THEN
667: fnd_log.STRING (fnd_log.level_statement,
668: g_module_current || '.PARTY_ROLE',
669: 'Party Role Id = ' || l_roleid
670: );
671: END IF;
711: p_cplv_tbl => l_cplv_tbl_in,
712: x_cplv_tbl => l_cplv_tbl_out
713: );
714:
715: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
716: THEN
717: fnd_log.STRING
718: (fnd_log.level_event,
719: g_module_current || '.PARTY_ROLE.external_call.after',
713: );
714:
715: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
716: THEN
717: fnd_log.STRING
718: (fnd_log.level_event,
719: g_module_current || '.PARTY_ROLE.external_call.after',
720: 'okc_contract_party_pub.create_k_party_role(Return status ='
721: || l_return_status
714:
715: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
716: THEN
717: fnd_log.STRING
718: (fnd_log.level_event,
719: g_module_current || '.PARTY_ROLE.external_call.after',
720: 'okc_contract_party_pub.create_k_party_role(Return status ='
721: || l_return_status
722: || ')'
1705: p_clev_tbl => l_clev_tbl_in,
1706: x_clev_tbl => l_clev_tbl_out
1707: );
1708:
1709: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1710: THEN
1711: fnd_log.STRING
1712: (fnd_log.level_event,
1713: g_module_current || '.Update_Line_Dates.external_call.after',
1707: );
1708:
1709: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1710: THEN
1711: fnd_log.STRING
1712: (fnd_log.level_event,
1713: g_module_current || '.Update_Line_Dates.external_call.after',
1714: 'okc_contract_pub.update_contract_line(Return status = '
1715: || l_return_status
1708:
1709: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1710: THEN
1711: fnd_log.STRING
1712: (fnd_log.level_event,
1713: g_module_current || '.Update_Line_Dates.external_call.after',
1714: 'okc_contract_pub.update_contract_line(Return status = '
1715: || l_return_status
1716: || ')'
1738: g_sqlerrm_token,
1739: SQLERRM
1740: );
1741:
1742: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level
1743: THEN
1744: fnd_log.STRING (fnd_log.level_exception,
1745: g_module_current
1746: || '.Update_Line_Dates.UNEXPECTED',
1740: );
1741:
1742: IF fnd_log.level_exception >= fnd_log.g_current_runtime_level
1743: THEN
1744: fnd_log.STRING (fnd_log.level_exception,
1745: g_module_current
1746: || '.Update_Line_Dates.UNEXPECTED',
1747: 'sqlcode = ' || SQLCODE || ', sqlerrm = '
1748: || SQLERRM
1790: p_crjv_tbl => l_crjv_tbl_in,
1791: x_crjv_tbl => l_crjv_tbl_out
1792: );
1793:
1794: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1795: THEN
1796: fnd_log.STRING
1797: (fnd_log.level_event,
1798: g_module_current
1792: );
1793:
1794: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1795: THEN
1796: fnd_log.STRING
1797: (fnd_log.level_event,
1798: g_module_current
1799: || '.Create_Obj_Rel.external_call_hdr.after',
1800: 'okc_k_rel_objs_pub.create_row(Return status = '
1793:
1794: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1795: THEN
1796: fnd_log.STRING
1797: (fnd_log.level_event,
1798: g_module_current
1799: || '.Create_Obj_Rel.external_call_hdr.after',
1800: 'okc_k_rel_objs_pub.create_row(Return status = '
1801: || l_return_status
1826: p_crjv_tbl => l_crjv_tbl_in,
1827: x_crjv_tbl => l_crjv_tbl_out
1828: );
1829:
1830: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1831: THEN
1832: fnd_log.STRING
1833: (fnd_log.level_event,
1834: g_module_current
1828: );
1829:
1830: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1831: THEN
1832: fnd_log.STRING
1833: (fnd_log.level_event,
1834: g_module_current
1835: || '.Create_Obj_Rel.external_call_line.after',
1836: 'okc_k_rel_objs_pub.create_row(Return status = '
1829:
1830: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1831: THEN
1832: fnd_log.STRING
1833: (fnd_log.level_event,
1834: g_module_current
1835: || '.Create_Obj_Rel.external_call_line.after',
1836: 'okc_k_rel_objs_pub.create_row(Return status = '
1837: || l_return_status
1973: p_chrv_tbl => l_chrv_tbl_in,
1974: x_chrv_tbl => l_chrv_tbl_out
1975: );
1976:
1977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1978: THEN
1979: fnd_log.STRING
1980: (fnd_log.level_event,
1981: g_module_current || '.Update_Hdr_Dates.external_call.after',
1975: );
1976:
1977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1978: THEN
1979: fnd_log.STRING
1980: (fnd_log.level_event,
1981: g_module_current || '.Update_Hdr_Dates.external_call.after',
1982: 'okc_contract_pub.update_contract_header(Return status = '
1983: || l_return_status
1976:
1977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
1978: THEN
1979: fnd_log.STRING
1980: (fnd_log.level_event,
1981: g_module_current || '.Update_Hdr_Dates.external_call.after',
1982: 'okc_contract_pub.update_contract_header(Return status = '
1983: || l_return_status
1984: || ')'
2118: p_clev_tbl => l_clev_tbl_in,
2119: x_clev_tbl => l_clev_tbl_out
2120: );
2121:
2122: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2123: THEN
2124: fnd_log.STRING
2125: (fnd_log.level_event,
2126: g_module_current
2120: );
2121:
2122: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2123: THEN
2124: fnd_log.STRING
2125: (fnd_log.level_event,
2126: g_module_current
2127: || '.update_contract_line.external_call.after',
2128: 'okc_contract_pub.update_contract_line(Return status = '
2121:
2122: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2123: THEN
2124: fnd_log.STRING
2125: (fnd_log.level_event,
2126: g_module_current
2127: || '.update_contract_line.external_call.after',
2128: 'okc_contract_pub.update_contract_line(Return status = '
2129: || l_return_status
2158: p_clev_tbl => l_clev_tbl_in,
2159: x_clev_tbl => l_clev_tbl_out
2160: );
2161:
2162: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2163: THEN
2164: fnd_log.STRING
2165: (fnd_log.level_event,
2166: g_module_current || '.Update_Cov_level.external_call.after',
2160: );
2161:
2162: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2163: THEN
2164: fnd_log.STRING
2165: (fnd_log.level_event,
2166: g_module_current || '.Update_Cov_level.external_call.after',
2167: 'okc_contract_pub.update_contract_line(Return status = '
2168: || l_return_status
2161:
2162: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2163: THEN
2164: fnd_log.STRING
2165: (fnd_log.level_event,
2166: g_module_current || '.Update_Cov_level.external_call.after',
2167: 'okc_contract_pub.update_contract_line(Return status = '
2168: || l_return_status
2169: || ')'
2191: p_cimv_tbl => l_cimv_tbl_in,
2192: x_cimv_tbl => l_cimv_tbl_out
2193: );
2194:
2195: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2196: THEN
2197: fnd_log.STRING
2198: (fnd_log.level_event,
2199: g_module_current || '.Update_Cov_level.external_call.after',
2193: );
2194:
2195: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2196: THEN
2197: fnd_log.STRING
2198: (fnd_log.level_event,
2199: g_module_current || '.Update_Cov_level.external_call.after',
2200: 'okc_contract_item_pub.update_contract_item(Return status = '
2201: || l_return_status
2194:
2195: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2196: THEN
2197: fnd_log.STRING
2198: (fnd_log.level_event,
2199: g_module_current || '.Update_Cov_level.external_call.after',
2200: 'okc_contract_item_pub.update_contract_item(Return status = '
2201: || l_return_status
2202: || ')'
2480: l_entity_id NUMBER;
2481: BEGIN
2482: x_return_status := okc_api.g_ret_sts_success;
2483:
2484: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level
2485: THEN
2486: fnd_log.STRING (fnd_log.level_procedure,
2487: g_module_current || '.Create_K_Hdr.begin',
2488: 'Merge Type = '
2482: x_return_status := okc_api.g_ret_sts_success;
2483:
2484: IF fnd_log.level_procedure >= fnd_log.g_current_runtime_level
2485: THEN
2486: fnd_log.STRING (fnd_log.level_procedure,
2487: g_module_current || '.Create_K_Hdr.begin',
2488: 'Merge Type = '
2489: || p_k_header_rec.merge_type
2490: || 'Merge Id'
2506: p_enddate => p_k_header_rec.end_date
2507: );
2508: END IF;
2509:
2510: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2511: THEN
2512: fnd_log.STRING (fnd_log.level_statement,
2513: g_module_current || '.Create_K_Hdr',
2514: 'Chr id = ' || l_chrid
2508: END IF;
2509:
2510: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2511: THEN
2512: fnd_log.STRING (fnd_log.level_statement,
2513: g_module_current || '.Create_K_Hdr',
2514: 'Chr id = ' || l_chrid
2515: );
2516: END IF;
2523: INTO l_sts_code;
2524:
2525: CLOSE l_sts_csr;
2526:
2527: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2528: THEN
2529: fnd_log.STRING (fnd_log.level_statement,
2530: g_module_current || '.Create_K_Hdr',
2531: 'Status code = ' || l_sts_code
2525: CLOSE l_sts_csr;
2526:
2527: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2528: THEN
2529: fnd_log.STRING (fnd_log.level_statement,
2530: g_module_current || '.Create_K_Hdr',
2531: 'Status code = ' || l_sts_code
2532: );
2533: END IF;
2671: p_chrv_tbl => l_chrv_tbl_in,
2672: x_chrv_tbl => l_chrv_tbl_out
2673: );
2674:
2675: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2676: THEN
2677: fnd_log.STRING
2678: (fnd_log.level_event,
2679: g_module_current || '.Create_K_Hdr.external_call.after',
2673: );
2674:
2675: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2676: THEN
2677: fnd_log.STRING
2678: (fnd_log.level_event,
2679: g_module_current || '.Create_K_Hdr.external_call.after',
2680: 'okc_contract_pub.create_contract_header(Return Status = '
2681: || l_return_status
2674:
2675: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2676: THEN
2677: fnd_log.STRING
2678: (fnd_log.level_event,
2679: g_module_current || '.Create_K_Hdr.external_call.after',
2680: 'okc_contract_pub.create_contract_header(Return Status = '
2681: || l_return_status
2682: || ')'
2700: p_msg_index_out => l_ind
2701: );
2702: x_order_error := x_order_error || l_msg_data || '#';
2703:
2704: IF (g_fnd_log_option = 'Y')
2705: THEN
2706: fnd_message.set_encoded (l_msg_data);
2707: l_msg_data := fnd_message.get;
2708: fnd_file.put_line
2752: p_data => l_msg_data,
2753: p_msg_index_out => l_ind
2754: );
2755:
2756: IF (g_fnd_log_option = 'Y') THEN
2757: fnd_message.set_encoded (l_msg_data);
2758: l_msg_data := fnd_message.get;
2759: fnd_file.put_line
2760: (fnd_file.LOG,
2767: END IF;
2768: END IF;
2769:
2770:
2771: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2772: THEN
2773: fnd_log.STRING (fnd_log.level_statement,
2774: g_module_current || '.Create_K_Hdr.oks_header_rules',
2775: 'Accounting id = '
2769:
2770:
2771: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
2772: THEN
2773: fnd_log.STRING (fnd_log.level_statement,
2774: g_module_current || '.Create_K_Hdr.oks_header_rules',
2775: 'Accounting id = '
2776: || p_k_header_rec.accounting_rule_id
2777: || ',renewal type = '
2782: || p_k_header_rec.renewal_po
2783: || ',ren price list = '
2784: || p_k_header_rec.renewal_price_list_id
2785: );
2786: fnd_log.STRING (fnd_log.level_statement,
2787: g_module_current || '.Create_K_Hdr.oks_header_rules',
2788: 'ren markup = '
2789: || p_k_header_rec.renewal_markup
2790: || ',qto contact = '
2911:
2912: --
2913:
2914: --Added in R12 by rsu
2915: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2916: THEN
2917: fnd_log.STRING (fnd_log.level_statement,
2918: g_module_current || '.Create_K_Hdr',
2919: 'Before calling oks_contract_hdr_pub.create_header'
2913:
2914: --Added in R12 by rsu
2915: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
2916: THEN
2917: fnd_log.STRING (fnd_log.level_statement,
2918: g_module_current || '.Create_K_Hdr',
2919: 'Before calling oks_contract_hdr_pub.create_header'
2920: );
2921: fnd_log.STRING (fnd_log.level_statement,
2917: fnd_log.STRING (fnd_log.level_statement,
2918: g_module_current || '.Create_K_Hdr',
2919: 'Before calling oks_contract_hdr_pub.create_header'
2920: );
2921: fnd_log.STRING (fnd_log.level_statement,
2922: g_module_current || '.Create_K_Hdr',
2923: 'p_k_header_rec.tax_classification_code: '
2924: || p_k_header_rec.tax_classification_code
2925: );
2922: g_module_current || '.Create_K_Hdr',
2923: 'p_k_header_rec.tax_classification_code: '
2924: || p_k_header_rec.tax_classification_code
2925: );
2926: fnd_log.STRING (fnd_log.level_statement,
2927: g_module_current || '.Create_K_Hdr',
2928: 'p_k_header_rec.exemption_certificate_number: '
2929: || p_k_header_rec.exemption_certificate_number
2930: );
2927: g_module_current || '.Create_K_Hdr',
2928: 'p_k_header_rec.exemption_certificate_number: '
2929: || p_k_header_rec.exemption_certificate_number
2930: );
2931: fnd_log.STRING (fnd_log.level_statement,
2932: g_module_current || '.Create_K_Hdr',
2933: 'p_k_header_rec.exemption_reason_code: '
2934: || p_k_header_rec.exemption_reason_code
2935: );
2932: g_module_current || '.Create_K_Hdr',
2933: 'p_k_header_rec.exemption_reason_code: '
2934: || p_k_header_rec.exemption_reason_code
2935: );
2936: fnd_log.STRING (fnd_log.level_statement,
2937: g_module_current || '.Create_K_Hdr',
2938: 'p_k_header_rec.tax_status_flag: '
2939: || p_k_header_rec.tax_status_flag
2940: );
2956: x_khrv_tbl => l_khrv_tbl_out,
2957: p_validate_yn => 'N'
2958: );
2959:
2960: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2961: THEN
2962: fnd_log.STRING
2963: (fnd_log.level_event,
2964: g_module_current || '.Create_K_Hdr.external_call.after',
2958: );
2959:
2960: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2961: THEN
2962: fnd_log.STRING
2963: (fnd_log.level_event,
2964: g_module_current || '.Create_K_Hdr.external_call.after',
2965: ' oks_contract_hdr_pub.create_header(Return Status = '
2966: || l_return_status
2959:
2960: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
2961: THEN
2962: fnd_log.STRING
2963: (fnd_log.level_event,
2964: g_module_current || '.Create_K_Hdr.external_call.after',
2965: ' oks_contract_hdr_pub.create_header(Return Status = '
2966: || l_return_status
2967: || ')'
2983: p_msg_index_out => l_ind
2984: );
2985: x_order_error := x_order_error || l_msg_data || '#';
2986:
2987: IF (g_fnd_log_option = 'Y')
2988: THEN
2989: fnd_message.set_encoded (l_msg_data);
2990: l_msg_data := fnd_message.get;
2991: fnd_file.put_line
3036: x_msg_data => x_msg_data,
3037: x_return_status => l_return_status
3038: );
3039:
3040: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3041: THEN
3042: fnd_log.STRING (fnd_log.level_event,
3043: g_module_current
3044: || '.Create_K_Hdr.Internal_call.after',
3038: );
3039:
3040: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3041: THEN
3042: fnd_log.STRING (fnd_log.level_event,
3043: g_module_current
3044: || '.Create_K_Hdr.Internal_call.after',
3045: ' Party_role for Vendor(Return Status = '
3046: || l_return_status
3066: x_msg_data => x_msg_data,
3067: x_return_status => l_return_status
3068: );
3069:
3070: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3071: THEN
3072: fnd_log.STRING (fnd_log.level_event,
3073: g_module_current
3074: || '.Create_K_Hdr.Internal_call.after',
3068: );
3069:
3070: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3071: THEN
3072: fnd_log.STRING (fnd_log.level_event,
3073: g_module_current
3074: || '.Create_K_Hdr.Internal_call.after',
3075: ' Party_role for Customer(Return Status = '
3076: || l_return_status
3096: x_msg_data => x_msg_data,
3097: x_return_status => l_return_status
3098: );
3099:
3100: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3101: THEN
3102: fnd_log.STRING (fnd_log.level_event,
3103: g_module_current
3104: || '.Create_K_Hdr.Internal_call.after',
3098: );
3099:
3100: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3101: THEN
3102: fnd_log.STRING (fnd_log.level_event,
3103: g_module_current
3104: || '.Create_K_Hdr.Internal_call.after',
3105: ' Party_role for Merchant(Return Status = '
3106: || l_return_status
3126: x_msg_data => x_msg_data,
3127: x_return_status => l_return_status
3128: );
3129:
3130: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3131: THEN
3132: fnd_log.STRING (fnd_log.level_event,
3133: g_module_current
3134: || '.Create_K_Hdr.Internal_call.after',
3128: );
3129:
3130: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3131: THEN
3132: fnd_log.STRING (fnd_log.level_event,
3133: g_module_current
3134: || '.Create_K_Hdr.Internal_call.after',
3135: ' Party_role for Subscriber(Return Status = '
3136: || l_return_status
3189: x_msg_data => x_msg_data,
3190: x_return_status => l_return_status
3191: );
3192:
3193: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3194: THEN
3195: fnd_log.STRING
3196: (fnd_log.level_event,
3197: g_module_current
3191: );
3192:
3193: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3194: THEN
3195: fnd_log.STRING
3196: (fnd_log.level_event,
3197: g_module_current
3198: || '.Create_K_Hdr.Internal_call.after',
3199: ' Party_role for Third Party(Return Status = '
3192:
3193: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3194: THEN
3195: fnd_log.STRING
3196: (fnd_log.level_event,
3197: g_module_current
3198: || '.Create_K_Hdr.Internal_call.after',
3199: ' Party_role for Third Party(Return Status = '
3200: || l_return_status
3214: ---Creating Vendor Contact
3215:
3216: -- Fix for the Bug3557612
3217: -- Create vendor contact role if the profile option is not null
3218: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3219: THEN
3220: fnd_log.STRING (fnd_log.level_statement,
3221: g_module_current
3222: || '.Create_K_Hdr.before_vendor_contact',
3216: -- Fix for the Bug3557612
3217: -- Create vendor contact role if the profile option is not null
3218: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3219: THEN
3220: fnd_log.STRING (fnd_log.level_statement,
3221: g_module_current
3222: || '.Create_K_Hdr.before_vendor_contact',
3223: ' Vendor contact profile option value = '
3224: || fnd_profile.VALUE ('OKS_VENDOR_CONTACT_ROLE')
3273: l_counter := l_counter + 1;
3274: l_count := l_count + 1;
3275: END LOOP;
3276:
3277: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3278: THEN
3279: fnd_log.STRING (fnd_log.level_statement,
3280: g_module_current,
3281: 'Resource ID is : ' || l_derived_res_id
3275: END LOOP;
3276:
3277: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3278: THEN
3279: fnd_log.STRING (fnd_log.level_statement,
3280: g_module_current,
3281: 'Resource ID is : ' || l_derived_res_id
3282: );
3283: END IF;
3381: p_ctcv_tbl => l_ctcv_tbl_in,
3382: x_ctcv_tbl => l_ctcv_tbl_out
3383: );
3384:
3385: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.STRING
3388: (fnd_log.level_event,
3389: g_module_current || '.Create_K_Hdr.External_call.after',
3383: );
3384:
3385: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.STRING
3388: (fnd_log.level_event,
3389: g_module_current || '.Create_K_Hdr.External_call.after',
3390: ' okc_contract_party_pub.create_contact(Return Status = '
3391: || l_return_status
3384:
3385: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3386: THEN
3387: fnd_log.STRING
3388: (fnd_log.level_event,
3389: g_module_current || '.Create_K_Hdr.External_call.after',
3390: ' okc_contract_party_pub.create_contact(Return Status = '
3391: || l_return_status
3392: || ')'
3432: p_scrv_tbl => l_scrv_tbl_in,
3433: x_scrv_tbl => l_scrv_tbl_out
3434: );
3435:
3436: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3437: THEN
3438: fnd_log.STRING
3439: (fnd_log.level_event,
3440: g_module_current || '.Create_K_Hdr.external_call.after',
3434: );
3435:
3436: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3437: THEN
3438: fnd_log.STRING
3439: (fnd_log.level_event,
3440: g_module_current || '.Create_K_Hdr.external_call.after',
3441: 'oks_sales_credit_pub.insert_sales_credit(Return status = '
3442: || l_return_status
3435:
3436: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3437: THEN
3438: fnd_log.STRING
3439: (fnd_log.level_event,
3440: g_module_current || '.Create_K_Hdr.external_call.after',
3441: 'oks_sales_credit_pub.insert_sales_credit(Return status = '
3442: || l_return_status
3443: || ')'
3468:
3469: LOOP
3470: l_ctcv_tbl_in.DELETE;
3471:
3472: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3473: THEN
3474: fnd_log.STRING (fnd_log.level_statement,
3475: g_module_current
3476: || '.Create_K_Hdr.contact creation',
3470: l_ctcv_tbl_in.DELETE;
3471:
3472: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3473: THEN
3474: fnd_log.STRING (fnd_log.level_statement,
3475: g_module_current
3476: || '.Create_K_Hdr.contact creation',
3477: ' Party Role = '
3478: || p_contact_tbl (i).party_role
3497:
3498: CLOSE l_ra_hcontacts_cur;
3499:
3500: --if l_findparty_id = l_thirdparty_id Then
3501: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3502: THEN
3503: fnd_log.STRING (fnd_log.level_statement,
3504: g_module_current
3505: || '.Create_K_Hdr.contact creation',
3499:
3500: --if l_findparty_id = l_thirdparty_id Then
3501: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3502: THEN
3503: fnd_log.STRING (fnd_log.level_statement,
3504: g_module_current
3505: || '.Create_K_Hdr.contact creation',
3506: ' Third Party = '
3507: || l_thirdparty_id
3535: );
3536: RAISE g_exception_halt_validation;
3537: END IF;
3538:
3539: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3540: THEN
3541: fnd_log.STRING (fnd_log.level_statement,
3542: g_module_current
3543: || '.Create_K_Hdr.contact creation',
3537: END IF;
3538:
3539: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
3540: THEN
3541: fnd_log.STRING (fnd_log.level_statement,
3542: g_module_current
3543: || '.Create_K_Hdr.contact creation',
3544: ' FLAG = '
3545: || p_contact_tbl (i).flag
3578: p_ctcv_tbl => l_ctcv_tbl_in,
3579: x_ctcv_tbl => l_ctcv_tbl_out
3580: );
3581:
3582: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3583: THEN
3584: fnd_log.STRING
3585: (fnd_log.level_event,
3586: g_module_current || '.Create_K_Hdr.external_call.after',
3580: );
3581:
3582: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3583: THEN
3584: fnd_log.STRING
3585: (fnd_log.level_event,
3586: g_module_current || '.Create_K_Hdr.external_call.after',
3587: 'okc_contract_party_pub.create_contact(Return status = '
3588: || l_return_status
3581:
3582: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3583: THEN
3584: fnd_log.STRING
3585: (fnd_log.level_event,
3586: g_module_current || '.Create_K_Hdr.external_call.after',
3587: 'okc_contract_party_pub.create_contact(Return status = '
3588: || l_return_status
3589: || ')'
3632: p_cgcv_tbl => l_cgcv_tbl_in,
3633: x_cgcv_tbl => l_cgcv_tbl_out
3634: );
3635:
3636: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3637: THEN
3638: fnd_log.STRING
3639: (fnd_log.level_event,
3640: g_module_current || '.Create_K_Hdr.external_call.after',
3634: );
3635:
3636: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3637: THEN
3638: fnd_log.STRING
3639: (fnd_log.level_event,
3640: g_module_current || '.Create_K_Hdr.external_call.after',
3641: 'okc_contract_group_pub.create_contract_grpngs(Return status = '
3642: || l_return_status
3635:
3636: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3637: THEN
3638: fnd_log.STRING
3639: (fnd_log.level_event,
3640: g_module_current || '.Create_K_Hdr.external_call.after',
3641: 'okc_contract_group_pub.create_contract_grpngs(Return status = '
3642: || l_return_status
3643: || ')'
3677: p_cpsv_tbl => l_cpsv_tbl_in,
3678: x_cpsv_tbl => l_cpsv_tbl_out
3679: );
3680:
3681: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3682: THEN
3683: fnd_log.STRING
3684: (fnd_log.level_event,
3685: g_module_current || '.Create_K_Hdr.external_call.after',
3679: );
3680:
3681: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3682: THEN
3683: fnd_log.STRING
3684: (fnd_log.level_event,
3685: g_module_current || '.Create_K_Hdr.external_call.after',
3686: 'okc_contract_pub.create_contract_process(Return status = '
3687: || l_return_status
3680:
3681: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3682: THEN
3683: fnd_log.STRING
3684: (fnd_log.level_event,
3685: g_module_current || '.Create_K_Hdr.external_call.after',
3686: 'okc_contract_pub.create_contract_process(Return status = '
3687: || l_return_status
3688: || ')'
3718: p_gvev_tbl => l_gvev_tbl_in,
3719: x_gvev_tbl => l_gvev_tbl_out
3720: );
3721:
3722: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3723: THEN
3724: fnd_log.STRING
3725: (fnd_log.level_event,
3726: g_module_current || '.Create_K_Hdr.external_call.after',
3720: );
3721:
3722: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3723: THEN
3724: fnd_log.STRING
3725: (fnd_log.level_event,
3726: g_module_current || '.Create_K_Hdr.external_call.after',
3727: 'okc_contract_pub.create_governance(Return status = '
3728: || l_return_status
3721:
3722: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3723: THEN
3724: fnd_log.STRING
3725: (fnd_log.level_event,
3726: g_module_current || '.Create_K_Hdr.external_call.after',
3727: 'okc_contract_pub.create_governance(Return status = '
3728: || l_return_status
3729: || ')'
3753: x_msg_data => x_msg_data,
3754: x_crjv_tbl_out => l_crjv_tbl_out
3755: );
3756:
3757: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3758: THEN
3759: fnd_log.STRING (fnd_log.level_event,
3760: g_module_current
3761: || '.Create_K_Hdr.internal_call.after',
3755: );
3756:
3757: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
3758: THEN
3759: fnd_log.STRING (fnd_log.level_event,
3760: g_module_current
3761: || '.Create_K_Hdr.internal_call.after',
3762: 'create_obj_rel(Return status = '
3763: || l_return_status
3997: p_invserviceid => p_k_line_rec.srv_id,
3998: p_cle_tbl => p_cle_tbl
3999: );
4000:
4001: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4002: THEN
4003: fnd_log.STRING (fnd_log.level_statement,
4004: g_module_current || '.Create_K_Service_Lines',
4005: ' Top Lines Count = ' || p_cle_tbl.COUNT
3999: );
4000:
4001: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4002: THEN
4003: fnd_log.STRING (fnd_log.level_statement,
4004: g_module_current || '.Create_K_Service_Lines',
4005: ' Top Lines Count = ' || p_cle_tbl.COUNT
4006: );
4007: END IF;
4081: x_hdr_edt => l_hdredt,
4082: x_status => l_hdrstatus
4083: );
4084:
4085: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4086: THEN
4087: fnd_log.STRING (fnd_log.level_event,
4088: g_module_current
4089: || '.Create_K_Service_Lines.internal_call.after',
4083: );
4084:
4085: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4086: THEN
4087: fnd_log.STRING (fnd_log.level_event,
4088: g_module_current
4089: || '.Create_K_Service_Lines.internal_call.after',
4090: 'check_hdr_effectivity(Return status = '
4091: || l_hdrstatus
4101: g_sqlerrm_token,
4102: 'line dates are not within header effectivity'
4103: );
4104:
4105: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
4106: THEN
4107: fnd_log.STRING (fnd_log.level_error,
4108: g_module_current
4109: || '.Create_K_Service_Lines.ERROR',
4103: );
4104:
4105: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
4106: THEN
4107: fnd_log.STRING (fnd_log.level_error,
4108: g_module_current
4109: || '.Create_K_Service_Lines.ERROR',
4110: 'Line dates are not withen header effectivity'
4111: );
4141: x_msg_count => x_msg_count,
4142: x_msg_data => x_msg_data
4143: );
4144:
4145: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4146: THEN
4147: fnd_log.STRING (fnd_log.level_event,
4148: g_module_current
4149: || '.Create_K_Service_Lines.internal_call.after',
4143: );
4144:
4145: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4146: THEN
4147: fnd_log.STRING (fnd_log.level_event,
4148: g_module_current
4149: || '.Create_K_Service_Lines.internal_call.after',
4150: 'update_hdr_dates(Return status = '
4151: || l_return_status
4242: p_clev_tbl => l_clev_tbl_in,
4243: x_clev_tbl => l_clev_tbl_out
4244: );
4245:
4246: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4247: THEN
4248: fnd_log.STRING
4249: (fnd_log.level_event,
4250: g_module_current
4244: );
4245:
4246: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4247: THEN
4248: fnd_log.STRING
4249: (fnd_log.level_event,
4250: g_module_current
4251: || '.Create_K_Service_Lines.External_call.after',
4252: 'okc_contract_pub.create_contract_line(Return status = '
4245:
4246: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4247: THEN
4248: fnd_log.STRING
4249: (fnd_log.level_event,
4250: g_module_current
4251: || '.Create_K_Service_Lines.External_call.after',
4252: 'okc_contract_pub.create_contract_line(Return status = '
4253: || l_return_status
4271: p_msg_index_out => l_ind
4272: );
4273: x_order_error := x_order_error || l_msg_data || '#';
4274:
4275: IF (g_fnd_log_option = 'Y')
4276: THEN
4277: fnd_message.set_encoded (l_msg_data);
4278: l_msg_data := fnd_message.get;
4279: fnd_file.put_line
4295: RAISE g_exception_halt_validation;
4296: END IF;
4297: END IF;
4298:
4299: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4300: THEN
4301: fnd_log.STRING (fnd_log.level_statement,
4302: g_module_current || '.Create_K_Service_Lines',
4303: 'Line Id= ' || l_line_id
4297: END IF;
4298:
4299: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4300: THEN
4301: fnd_log.STRING (fnd_log.level_statement,
4302: g_module_current || '.Create_K_Service_Lines',
4303: 'Line Id= ' || l_line_id
4304: );
4305: END IF;
4333: p_data => l_msg_data,
4334: p_msg_index_out => l_ind
4335: );
4336:
4337: IF (g_fnd_log_option = 'Y') THEN
4338: fnd_message.set_encoded (l_msg_data);
4339: l_msg_data := fnd_message.get;
4340: fnd_file.put_line
4341: (fnd_file.LOG,
4350:
4351: -------------------------------------
4352: -- rules inserted by oks --IRT
4353: -------------------------------------
4354: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4355: THEN
4356: fnd_log.STRING (fnd_log.level_statement,
4357: g_module_current || '.Create_K_Service_Lines',
4358: 'Accounting id = '
4352: -- rules inserted by oks --IRT
4353: -------------------------------------
4354: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4355: THEN
4356: fnd_log.STRING (fnd_log.level_statement,
4357: g_module_current || '.Create_K_Service_Lines',
4358: 'Accounting id = '
4359: || p_k_line_rec.accounting_rule_id
4360: || ',Commitment id = '
4392: l_klnv_tbl_in (1).standard_cov_yn := p_k_line_rec.standard_cov_yn;
4393: l_klnv_tbl_in (1).price_uom := p_k_line_rec.price_uom;
4394:
4395: --Added in R12 by rsu
4396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
4397: THEN
4398: fnd_log.STRING (fnd_log.level_statement,
4399: g_module_current || '.Create_K_Service_Lines',
4400: 'Before calling oks_contract_line_pub.create_line'
4394:
4395: --Added in R12 by rsu
4396: IF (fnd_log.level_statement >= fnd_log.g_current_runtime_level)
4397: THEN
4398: fnd_log.STRING (fnd_log.level_statement,
4399: g_module_current || '.Create_K_Service_Lines',
4400: 'Before calling oks_contract_line_pub.create_line'
4401: );
4402: fnd_log.STRING (fnd_log.level_statement,
4398: fnd_log.STRING (fnd_log.level_statement,
4399: g_module_current || '.Create_K_Service_Lines',
4400: 'Before calling oks_contract_line_pub.create_line'
4401: );
4402: fnd_log.STRING (fnd_log.level_statement,
4403: g_module_current || '.Create_K_Service_Lines',
4404: 'p_k_line_rec.tax_classification_code: '
4405: || p_k_line_rec.tax_classification_code
4406: );
4403: g_module_current || '.Create_K_Service_Lines',
4404: 'p_k_line_rec.tax_classification_code: '
4405: || p_k_line_rec.tax_classification_code
4406: );
4407: fnd_log.STRING (fnd_log.level_statement,
4408: g_module_current || '.Create_K_Service_Lines',
4409: 'p_k_line_rec.exempt_certificate_number: '
4410: || p_k_line_rec.exemption_certificate_number
4411: );
4408: g_module_current || '.Create_K_Service_Lines',
4409: 'p_k_line_rec.exempt_certificate_number: '
4410: || p_k_line_rec.exemption_certificate_number
4411: );
4412: fnd_log.STRING (fnd_log.level_statement,
4413: g_module_current || '.Create_K_Service_Lines',
4414: 'p_k_line_rec.exempt_reason_code: '
4415: || p_k_line_rec.exemption_reason_code
4416: );
4413: g_module_current || '.Create_K_Service_Lines',
4414: 'p_k_line_rec.exempt_reason_code: '
4415: || p_k_line_rec.exemption_reason_code
4416: );
4417: fnd_log.STRING (fnd_log.level_statement,
4418: g_module_current || '.Create_K_Service_Lines',
4419: 'p_k_line_rec.tax_status: '
4420: || p_k_line_rec.tax_status
4421: );
4457: p_msg_index_out => l_ind
4458: );
4459: x_order_error := x_order_error || l_msg_data || '#';
4460:
4461: IF (g_fnd_log_option = 'Y')
4462: THEN
4463: fnd_message.set_encoded (l_msg_data);
4464: l_msg_data := fnd_message.get;
4465: fnd_file.put_line
4481: RAISE g_exception_halt_validation;
4482: END IF;
4483: END IF;
4484:
4485: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4486: THEN
4487: fnd_log.STRING
4488: (fnd_log.level_event,
4489: g_module_current
4483: END IF;
4484:
4485: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4486: THEN
4487: fnd_log.STRING
4488: (fnd_log.level_event,
4489: g_module_current
4490: || '.Create_K_Service_Lines.external_call.after',
4491: 'oks_contract_line_pub.create_line (Return status = '
4484:
4485: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4486: THEN
4487: fnd_log.STRING
4488: (fnd_log.level_event,
4489: g_module_current
4490: || '.Create_K_Service_Lines.external_call.after',
4491: 'oks_contract_line_pub.create_line (Return status = '
4492: || l_return_status
4500: x_timeunit => l_timeunits,
4501: x_return_status => l_return_status
4502: );
4503:
4504: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4505: THEN
4506: fnd_log.STRING (fnd_log.level_event,
4507: g_module_current
4508: || '.Create_K_Service_Lines.external_call.after',
4502: );
4503:
4504: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4505: THEN
4506: fnd_log.STRING (fnd_log.level_event,
4507: g_module_current
4508: || '.Create_K_Service_Lines.external_call.after',
4509: 'okc_time_util_pub.get_duration(Return status = '
4510: || l_return_status
4557: p_cimv_tbl => l_cimv_tbl_in,
4558: x_cimv_tbl => l_cimv_tbl_out
4559: );
4560:
4561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4562: THEN
4563: fnd_log.STRING
4564: (fnd_log.level_event,
4565: g_module_current || '.Create_K_Service_Lines.external_call.after',
4559: );
4560:
4561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4562: THEN
4563: fnd_log.STRING
4564: (fnd_log.level_event,
4565: g_module_current || '.Create_K_Service_Lines.external_call.after',
4566: 'okc_contract_item_pub.create_contract_item(Return status = '
4567: || l_return_status
4560:
4561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4562: THEN
4563: fnd_log.STRING
4564: (fnd_log.level_event,
4565: g_module_current || '.Create_K_Service_Lines.external_call.after',
4566: 'okc_contract_item_pub.create_contract_item(Return status = '
4567: || l_return_status
4568: || ')'
4608: p_scrv_tbl => l_scrv_tbl_in,
4609: x_scrv_tbl => l_scrv_tbl_out
4610: );
4611:
4612: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4613: THEN
4614: fnd_log.STRING
4615: (fnd_log.level_event,
4616: g_module_current
4610: );
4611:
4612: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4613: THEN
4614: fnd_log.STRING
4615: (fnd_log.level_event,
4616: g_module_current
4617: || '.Create_K_Service_Lines.external_call.after',
4618: 'oks_sales_credit_pub.insert_sales_credit(Return status = '
4611:
4612: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4613: THEN
4614: fnd_log.STRING
4615: (fnd_log.level_event,
4616: g_module_current
4617: || '.Create_K_Service_Lines.external_call.after',
4618: 'oks_sales_credit_pub.insert_sales_credit(Return status = '
4619: || l_return_status
4675: x_msg_data => x_msg_data,
4676: x_return_status => l_return_status
4677: );
4678:
4679: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
4680: )
4681: THEN
4682: fnd_log.STRING
4683: (fnd_log.level_event,
4678:
4679: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
4680: )
4681: THEN
4682: fnd_log.STRING
4683: (fnd_log.level_event,
4684: g_module_current
4685: || '.Create_K_Service_Lines.contact_creation',
4686: 'party_role(Return status = '
4679: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
4680: )
4681: THEN
4682: fnd_log.STRING
4683: (fnd_log.level_event,
4684: g_module_current
4685: || '.Create_K_Service_Lines.contact_creation',
4686: 'party_role(Return status = '
4687: || l_return_status
4711: l_role := 'CUST_SHIPPING';
4712: l_obj := 'OKX_CONTSHIP';
4713: END IF;
4714:
4715: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4716: THEN
4717: fnd_log.STRING (fnd_log.level_statement,
4718: g_module_current
4719: || '.Create_K_Service_Lines.before_contact',
4713: END IF;
4714:
4715: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
4716: THEN
4717: fnd_log.STRING (fnd_log.level_statement,
4718: g_module_current
4719: || '.Create_K_Service_Lines.before_contact',
4720: 'Line Party Id = '
4721: || l_lin_party_id
4778: x_msg_count => x_msg_count,
4779: x_msg_data => x_msg_data
4780: );
4781:
4782: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4783: THEN
4784: fnd_log.STRING
4785: (fnd_log.level_event,
4786: g_module_current
4780: );
4781:
4782: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4783: THEN
4784: fnd_log.STRING
4785: (fnd_log.level_event,
4786: g_module_current
4787: || '.Create_K_Service_Lines.after_coverage_ext',
4788: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
4781:
4782: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4783: THEN
4784: fnd_log.STRING
4785: (fnd_log.level_event,
4786: g_module_current
4787: || '.Create_K_Service_Lines.after_coverage_ext',
4788: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
4789: || l_return_status
4812: RAISE g_exception_halt_validation;
4813: END IF;
4814: ELSIF p_k_line_rec.coverage_template_id IS NULL AND p_caller <> 'ST' AND l_lsl_id <> 46 ---Modified for ER 16036980
4815: THEN
4816: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
4817: THEN
4818: fnd_log.STRING (fnd_log.level_error,
4819: g_module_current
4820: || '.Create_K_Service_Lines.ERROR',
4814: ELSIF p_k_line_rec.coverage_template_id IS NULL AND p_caller <> 'ST' AND l_lsl_id <> 46 ---Modified for ER 16036980
4815: THEN
4816: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
4817: THEN
4818: fnd_log.STRING (fnd_log.level_error,
4819: g_module_current
4820: || '.Create_K_Service_Lines.ERROR',
4821: 'Coverage is not associated with '
4822: || p_k_line_rec.srv_id
4896: x_ctr_grp_id_template => l_ctr_grp_id_template,
4897: x_ctr_grp_id_instance => l_ctr_grp_id_instance
4898: );
4899:
4900: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4901: THEN
4902: fnd_log.STRING
4903: (fnd_log.level_event,
4904: g_module_current
4898: );
4899:
4900: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4901: THEN
4902: fnd_log.STRING
4903: (fnd_log.level_event,
4904: g_module_current
4905: || '.Create_K_Service_Lines.after_instantiate_counters',
4906: 'cs_counters_pub.autoinstantiate_counters(Return Status = '
4899:
4900: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
4901: THEN
4902: fnd_log.STRING
4903: (fnd_log.level_event,
4904: g_module_current
4905: || '.Create_K_Service_Lines.after_instantiate_counters',
4906: 'cs_counters_pub.autoinstantiate_counters(Return Status = '
4907: || l_return_status
5032: x_line_edt => l_line_edt,
5033: x_status => l_line_status
5034: );
5035:
5036: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
5037: THEN
5038: fnd_log.STRING (fnd_log.level_statement,
5039: g_module_current || '.Create_K_Covered_Levels',
5040: 'Check line effectivity status = ' || l_line_status
5034: );
5035:
5036: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
5037: THEN
5038: fnd_log.STRING (fnd_log.level_statement,
5039: g_module_current || '.Create_K_Covered_Levels',
5040: 'Check line effectivity status = ' || l_line_status
5041: );
5042: END IF;
5042: END IF;
5043:
5044: IF l_line_status = 'E'
5045: THEN
5046: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
5047: THEN
5048: fnd_log.STRING
5049: (fnd_log.level_error,
5050: g_module_current || '.Create_K_Covered_Levels.ERROR',
5044: IF l_line_status = 'E'
5045: THEN
5046: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
5047: THEN
5048: fnd_log.STRING
5049: (fnd_log.level_error,
5050: g_module_current || '.Create_K_Covered_Levels.ERROR',
5051: 'Covered level Dates are not within Line effectivity'
5052: );
5045: THEN
5046: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
5047: THEN
5048: fnd_log.STRING
5049: (fnd_log.level_error,
5050: g_module_current || '.Create_K_Covered_Levels.ERROR',
5051: 'Covered level Dates are not within Line effectivity'
5052: );
5053: END IF;
5070: x_hdr_edt => l_hdredt,
5071: x_status => l_hdrstatus
5072: );
5073:
5074: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
5075: THEN
5076: fnd_log.STRING (fnd_log.level_statement,
5077: g_module_current || '.Create_K_Covered_Levels',
5078: 'Check Header effectivity status = '
5072: );
5073:
5074: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
5075: THEN
5076: fnd_log.STRING (fnd_log.level_statement,
5077: g_module_current || '.Create_K_Covered_Levels',
5078: 'Check Header effectivity status = '
5079: || l_hdrstatus
5080: );
5081: END IF;
5082:
5083: IF l_hdrstatus = 'E'
5084: THEN
5085: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
5086: THEN
5087: fnd_log.STRING (fnd_log.level_error,
5088: g_module_current || '.Create_K_Covered_Levels',
5089: 'Line Dates are not within Header effectivity'
5083: IF l_hdrstatus = 'E'
5084: THEN
5085: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
5086: THEN
5087: fnd_log.STRING (fnd_log.level_error,
5088: g_module_current || '.Create_K_Covered_Levels',
5089: 'Line Dates are not within Header effectivity'
5090: );
5091: END IF;
5122: x_msg_count => x_msg_count,
5123: x_msg_data => x_msg_data
5124: );
5125:
5126: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5127: THEN
5128: fnd_log.STRING
5129: (fnd_log.level_event,
5130: g_module_current
5124: );
5125:
5126: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5127: THEN
5128: fnd_log.STRING
5129: (fnd_log.level_event,
5130: g_module_current
5131: || '.Create_K_Covered_Levels.afterupdatehdrdtaes',
5132: 'update_hdr_dates(Return status = '
5125:
5126: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5127: THEN
5128: fnd_log.STRING
5129: (fnd_log.level_event,
5130: g_module_current
5131: || '.Create_K_Covered_Levels.afterupdatehdrdtaes',
5132: 'update_hdr_dates(Return status = '
5133: || l_return_status
5164: x_msg_count => x_msg_count,
5165: x_msg_data => x_msg_data
5166: );
5167:
5168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5169: THEN
5170: fnd_log.STRING
5171: (fnd_log.level_event,
5172: g_module_current
5166: );
5167:
5168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5169: THEN
5170: fnd_log.STRING
5171: (fnd_log.level_event,
5172: g_module_current
5173: || '.Create_K_Covered_Levels.after_update.line_dtaes',
5174: 'update_hdr_dates(Return status = '
5167:
5168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5169: THEN
5170: fnd_log.STRING
5171: (fnd_log.level_event,
5172: g_module_current
5173: || '.Create_K_Covered_Levels.after_update.line_dtaes',
5174: 'update_hdr_dates(Return status = '
5175: || l_return_status
5308: p_clev_tbl => l_clev_tbl_in,
5309: x_clev_tbl => l_clev_tbl_out
5310: );
5311:
5312: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5313: THEN
5314: fnd_log.STRING
5315: (fnd_log.level_event,
5316: g_module_current
5310: );
5311:
5312: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5313: THEN
5314: fnd_log.STRING
5315: (fnd_log.level_event,
5316: g_module_current
5317: || '.Create_K_Covered_Levels.after_create.top_line',
5318: 'okc_contract_pub.create_contract_line(Return status = '
5311:
5312: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5313: THEN
5314: fnd_log.STRING
5315: (fnd_log.level_event,
5316: g_module_current
5317: || '.Create_K_Covered_Levels.after_create.top_line',
5318: 'okc_contract_pub.create_contract_line(Return status = '
5319: || l_return_status
5338: p_msg_index_out => l_ind
5339: );
5340: x_order_error := x_order_error || l_msg_data || '#';
5341:
5342: IF (g_fnd_log_option = 'Y')
5343: THEN
5344: fnd_message.set_encoded (l_msg_data);
5345: l_msg_data := fnd_message.get;
5346: fnd_file.put_line
5380: x_msg_data => x_msg_data,
5381: x_return_status => l_return_status
5382: );
5383:
5384: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5385: THEN
5386: fnd_log.STRING (fnd_log.level_event,
5387: g_module_current
5388: || '.Create_K_Covered_Levels.after_tax',
5382: );
5383:
5384: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5385: THEN
5386: fnd_log.STRING (fnd_log.level_event,
5387: g_module_current
5388: || '.Create_K_Covered_Levels.after_tax',
5389: 'oks_tax_util_pvt.get_tax(Return status = '
5390: || l_return_status
5438: x_klnv_tbl => l_klnv_tbl_out,
5439: p_validate_yn => 'N'
5440: );
5441:
5442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5443: THEN
5444: fnd_log.STRING
5445: (fnd_log.level_event,
5446: g_module_current
5440: );
5441:
5442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5443: THEN
5444: fnd_log.STRING
5445: (fnd_log.level_event,
5446: g_module_current
5447: || '.Create_K_Covered_Levels.after_create.covered_line',
5448: 'oks_contract_line_pub.create_line(Return status = '
5441:
5442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5443: THEN
5444: fnd_log.STRING
5445: (fnd_log.level_event,
5446: g_module_current
5447: || '.Create_K_Covered_Levels.after_create.covered_line',
5448: 'oks_contract_line_pub.create_line(Return status = '
5449: || l_return_status
5466: p_msg_index_out => l_ind
5467: );
5468: x_order_error := x_order_error || l_msg_data || '#';
5469:
5470: IF (g_fnd_log_option = 'Y')
5471: THEN
5472: fnd_message.set_encoded (l_msg_data);
5473: l_msg_data := fnd_message.get;
5474: fnd_file.put_line
5519: okc_cim_pvt.insert_row_upg (x_return_status => l_return_status,
5520: p_cimv_tbl => l_cimv_tbl
5521: );
5522:
5523: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5524: THEN
5525: fnd_log.STRING
5526: (fnd_log.level_event,
5527: g_module_current
5521: );
5522:
5523: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5524: THEN
5525: fnd_log.STRING
5526: (fnd_log.level_event,
5527: g_module_current
5528: || '.Create_K_Covered_Levels.after_create.contract_item',
5529: 'okc_cim_pvt.insert_row_upg(Return status = '
5522:
5523: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5524: THEN
5525: fnd_log.STRING
5526: (fnd_log.level_event,
5527: g_module_current
5528: || '.Create_K_Covered_Levels.after_create.contract_item',
5529: 'okc_cim_pvt.insert_row_upg(Return status = '
5530: || l_return_status
5557: x_msg_data => x_msg_data,
5558: x_crjv_tbl_out => l_crjv_tbl_out
5559: );
5560:
5561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5562: THEN
5563: fnd_log.STRING
5564: (fnd_log.level_event,
5565: g_module_current
5559: );
5560:
5561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5562: THEN
5563: fnd_log.STRING
5564: (fnd_log.level_event,
5565: g_module_current
5566: || '.Create_K_Covered_Levels.create.object_relation',
5567: 'create_obj_rel(Return status = '
5560:
5561: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5562: THEN
5563: fnd_log.STRING
5564: (fnd_log.level_event,
5565: g_module_current
5566: || '.Create_K_Covered_Levels.create.object_relation',
5567: 'create_obj_rel(Return status = '
5568: || l_return_status
5796: p_pavv_tbl => l_pavv_tbl_in,
5797: x_pavv_tbl => l_pavv_tbl_out
5798: );
5799:
5800: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5801: THEN
5802: fnd_log.STRING
5803: (fnd_log.level_event,
5804: g_module_current
5798: );
5799:
5800: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5801: THEN
5802: fnd_log.STRING
5803: (fnd_log.level_event,
5804: g_module_current
5805: || '.Create_K_Covered_Levels.after_create.price_att',
5806: 'okc_price_adjustment_pvt.create_price_att_value(Return status = '
5799:
5800: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5801: THEN
5802: fnd_log.STRING
5803: (fnd_log.level_event,
5804: g_module_current
5805: || '.Create_K_Covered_Levels.after_create.price_att',
5806: 'okc_price_adjustment_pvt.create_price_att_value(Return status = '
5807: || l_return_status
5994: x_msg_count => x_msg_count,
5995: x_msg_data => x_msg_data
5996: );
5997:
5998: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5999: THEN
6000: fnd_log.STRING
6001: (fnd_log.level_event,
6002: g_module_current
5996: );
5997:
5998: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5999: THEN
6000: fnd_log.STRING
6001: (fnd_log.level_event,
6002: g_module_current
6003: || '.Create_contract_Ibnew.after_create.header',
6004: 'oks_extwarprgm_pvt.create_k_hdr(Return status = '
5997:
5998: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
5999: THEN
6000: fnd_log.STRING
6001: (fnd_log.level_event,
6002: g_module_current
6003: || '.Create_contract_Ibnew.after_create.header',
6004: 'oks_extwarprgm_pvt.create_k_hdr(Return status = '
6005: || l_return_status
6032: x_msg_count => x_msg_count,
6033: x_msg_data => x_msg_data
6034: );
6035:
6036: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6037: THEN
6038: fnd_log.STRING
6039: (fnd_log.level_event,
6040: g_module_current
6034: );
6035:
6036: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6037: THEN
6038: fnd_log.STRING
6039: (fnd_log.level_event,
6040: g_module_current
6041: || '.Create_contract_Ibnew.after_create.header',
6042: 'okc_oc_int_pub.create_k_relationships(Return status = '
6035:
6036: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6037: THEN
6038: fnd_log.STRING
6039: (fnd_log.level_event,
6040: g_module_current
6041: || '.Create_contract_Ibnew.after_create.header',
6042: 'okc_oc_int_pub.create_k_relationships(Return status = '
6043: || l_return_status
6098: x_msg_count => x_msg_count,
6099: x_msg_data => x_msg_data
6100: );
6101:
6102: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6103: THEN
6104: fnd_log.STRING
6105: (fnd_log.level_event,
6106: g_module_current
6100: );
6101:
6102: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6103: THEN
6104: fnd_log.STRING
6105: (fnd_log.level_event,
6106: g_module_current
6107: || '.Create_contract_Ibnew.after_create.service_line',
6108: 'oks_extwarprgm_pvt.create_k_service_lines(Return status = '
6101:
6102: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6103: THEN
6104: fnd_log.STRING
6105: (fnd_log.level_event,
6106: g_module_current
6107: || '.Create_contract_Ibnew.after_create.service_line',
6108: 'oks_extwarprgm_pvt.create_k_service_lines(Return status = '
6109: || l_return_status
6165: x_msg_count => x_msg_count,
6166: x_msg_data => x_msg_data
6167: );
6168:
6169: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6170: THEN
6171: fnd_log.STRING
6172: (fnd_log.level_event,
6173: g_module_current
6167: );
6168:
6169: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6170: THEN
6171: fnd_log.STRING
6172: (fnd_log.level_event,
6173: g_module_current
6174: || '.Create_contract_Ibnew.after_create.covered_line',
6175: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
6168:
6169: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6170: THEN
6171: fnd_log.STRING
6172: (fnd_log.level_event,
6173: g_module_current
6174: || '.Create_contract_Ibnew.after_create.covered_line',
6175: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
6176: || l_return_status
6241: x_timeunit => l_timeunits,
6242: x_return_status => l_return_status
6243: );
6244:
6245: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
6246: THEN
6247: fnd_log.STRING (fnd_log.level_statement,
6248: g_module_current
6249: || '.Create_contract_Ibnew.after.get_duration',
6243: );
6244:
6245: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
6246: THEN
6247: fnd_log.STRING (fnd_log.level_statement,
6248: g_module_current
6249: || '.Create_contract_Ibnew.after.get_duration',
6250: 'Get_Duration Status ='
6251: || l_return_status
6279: x_bil_sch_out_tbl => l_bil_sch_out,
6280: x_return_status => l_return_status
6281: );
6282:
6283: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6284: THEN
6285: fnd_log.STRING
6286: (fnd_log.level_event,
6287: g_module_current
6281: );
6282:
6283: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6284: THEN
6285: fnd_log.STRING
6286: (fnd_log.level_event,
6287: g_module_current
6288: || '.Create_contract_Ibnew.after.bill_sch',
6289: 'oks_bill_sch.create_bill_sch_rules(Return status = '
6282:
6283: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6284: THEN
6285: fnd_log.STRING
6286: (fnd_log.level_event,
6287: g_module_current
6288: || '.Create_contract_Ibnew.after.bill_sch',
6289: 'oks_bill_sch.create_bill_sch_rules(Return status = '
6290: || l_return_status
6306: (p_line_id => l_lineid,
6307: x_return_status => l_return_status
6308: );
6309:
6310: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6311: THEN
6312: fnd_log.STRING
6313: (fnd_log.level_event,
6314: g_module_current || '.Create_contract_Ibnew.after.bcl_om',
6308: );
6309:
6310: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6311: THEN
6312: fnd_log.STRING
6313: (fnd_log.level_event,
6314: g_module_current || '.Create_contract_Ibnew.after.bcl_om',
6315: ' oks_bill_util_pub.create_bcl_for_om(Return status = '
6316: || l_return_status
6309:
6310: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6311: THEN
6312: fnd_log.STRING
6313: (fnd_log.level_event,
6314: g_module_current || '.Create_contract_Ibnew.after.bcl_om',
6315: ' oks_bill_util_pub.create_bcl_for_om(Return status = '
6316: || l_return_status
6317: || ')'
6333: x_msg_count => x_msg_count,
6334: x_msg_data => x_msg_data
6335: );
6336:
6337: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6338: )
6339: THEN
6340: fnd_log.STRING
6341: (fnd_log.level_event,
6336:
6337: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6338: )
6339: THEN
6340: fnd_log.STRING
6341: (fnd_log.level_event,
6342: g_module_current
6343: || '.Create_contract_Ibnew.after.om_sll',
6344: 'oks_bill_sch.update_om_sll_date(Return status = '
6337: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6338: )
6339: THEN
6340: fnd_log.STRING
6341: (fnd_log.level_event,
6342: g_module_current
6343: || '.Create_contract_Ibnew.after.om_sll',
6344: 'oks_bill_sch.update_om_sll_date(Return status = '
6345: || l_return_status
6360: x_msg_count => x_msg_count,
6361: x_msg_data => x_msg_data
6362: );
6363:
6364: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6365: )
6366: THEN
6367: fnd_log.STRING
6368: (fnd_log.level_event,
6363:
6364: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6365: )
6366: THEN
6367: fnd_log.STRING
6368: (fnd_log.level_event,
6369: g_module_current
6370: || '.Create_contract_Ibnew.after.sch_cp',
6371: 'oks_bill_sch.create_bill_sch_cp(Return status = '
6364: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
6365: )
6366: THEN
6367: fnd_log.STRING
6368: (fnd_log.level_event,
6369: g_module_current
6370: || '.Create_contract_Ibnew.after.sch_cp',
6371: 'oks_bill_sch.create_bill_sch_cp(Return status = '
6372: || l_return_status
6384: (p_line_id => l_lineid,
6385: x_return_status => l_return_status
6386: );
6387:
6388: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6389: THEN
6390: fnd_log.STRING
6391: (fnd_log.level_event,
6392: g_module_current
6386: );
6387:
6388: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6389: THEN
6390: fnd_log.STRING
6391: (fnd_log.level_event,
6392: g_module_current
6393: || '.Create_contract_Ibnew.after.bcl_om',
6394: 'oks_bill_util_pub.create_bcl_for_om(Return status = '
6387:
6388: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6389: THEN
6390: fnd_log.STRING
6391: (fnd_log.level_event,
6392: g_module_current
6393: || '.Create_contract_Ibnew.after.bcl_om',
6394: 'oks_bill_util_pub.create_bcl_for_om(Return status = '
6395: || l_return_status
6510: p_oiev_tbl => l_oiev_tbl_in,
6511: x_oiev_tbl => l_oiev_tbl_out
6512: );
6513:
6514: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6515: THEN
6516: fnd_log.STRING
6517: (fnd_log.level_event,
6518: g_module_current || '.CReate_transaction_source',
6512: );
6513:
6514: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6515: THEN
6516: fnd_log.STRING
6517: (fnd_log.level_event,
6518: g_module_current || '.CReate_transaction_source',
6519: 'OKC_OPER_INST_PUB.Create_Operation_Instance (Return status = '
6520: || l_return_status
6513:
6514: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6515: THEN
6516: fnd_log.STRING
6517: (fnd_log.level_event,
6518: g_module_current || '.CReate_transaction_source',
6519: 'OKC_OPER_INST_PUB.Create_Operation_Instance (Return status = '
6520: || l_return_status
6521: || ')'
6546: p_olev_tbl => l_olev_tbl_in,
6547: x_olev_tbl => l_olev_tbl_out
6548: );
6549:
6550: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6551: THEN
6552: fnd_log.STRING
6553: (fnd_log.level_event,
6554: g_module_current || '.CReate_transaction_source',
6548: );
6549:
6550: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6551: THEN
6552: fnd_log.STRING
6553: (fnd_log.level_event,
6554: g_module_current || '.CReate_transaction_source',
6555: 'OKC_OPER_INST_PUB.Create_Operation_Line (Return status = '
6556: || l_return_status
6549:
6550: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6551: THEN
6552: fnd_log.STRING
6553: (fnd_log.level_event,
6554: g_module_current || '.CReate_transaction_source',
6555: 'OKC_OPER_INST_PUB.Create_Operation_Line (Return status = '
6556: || l_return_status
6557: || ')'
6743: x_msg_count => x_msg_count,
6744: x_msg_data => x_msg_data
6745: );
6746:
6747: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6748: THEN
6749: fnd_log.STRING
6750: (fnd_log.level_event,
6751: g_module_current || '.CReate_transaction_source',
6745: );
6746:
6747: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6748: THEN
6749: fnd_log.STRING
6750: (fnd_log.level_event,
6751: g_module_current || '.CReate_transaction_source',
6752: 'OKC_OPER_INST_PUB.Create_transaction_source(Return status = '
6753: || l_return_status
6746:
6747: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6748: THEN
6749: fnd_log.STRING
6750: (fnd_log.level_event,
6751: g_module_current || '.CReate_transaction_source',
6752: 'OKC_OPER_INST_PUB.Create_transaction_source(Return status = '
6753: || l_return_status
6754: || ')'
6801: x_msg_count => x_msg_count,
6802: x_msg_data => x_msg_data
6803: );
6804:
6805: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6806: THEN
6807: fnd_log.STRING
6808: (fnd_log.level_event,
6809: g_module_current || '.CReate_transaction_source',
6803: );
6804:
6805: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6806: THEN
6807: fnd_log.STRING
6808: (fnd_log.level_event,
6809: g_module_current || '.CReate_transaction_source',
6810: 'OKC_OPER_INST_PUB.Create_transaction_source(Return status = '
6811: || l_return_status
6804:
6805: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6806: THEN
6807: fnd_log.STRING
6808: (fnd_log.level_event,
6809: g_module_current || '.CReate_transaction_source',
6810: 'OKC_OPER_INST_PUB.Create_transaction_source(Return status = '
6811: || l_return_status
6812: || ')'
6987: x_return_status := okc_api.g_ret_sts_success;
6988: l_target_chr_id := 0;
6989: l_old_cp_id := 0;
6990:
6991: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6992: THEN
6993: fnd_log.STRING (fnd_log.level_event,
6994: g_module_current || '.CREATE_CONTRACT_IBSPLIT.',
6995: ', count = ' || p_kdtl_tbl.COUNT || ')'
6989: l_old_cp_id := 0;
6990:
6991: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
6992: THEN
6993: fnd_log.STRING (fnd_log.level_event,
6994: g_module_current || '.CREATE_CONTRACT_IBSPLIT.',
6995: ', count = ' || p_kdtl_tbl.COUNT || ')'
6996: );
6997: END IF;
7077: --bug start 3736860
7078: l_qtyltax := actual_tax / p_kdtl_tbl (l_ctr).old_cp_quantity;
7079:
7080: --bug end 3736860
7081: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7082: THEN
7083: fnd_log.STRING (fnd_log.level_statement,
7084: g_module_current
7085: || '.CREATE_CONTRACT_IBSPLIT',
7079:
7080: --bug end 3736860
7081: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7082: THEN
7083: fnd_log.STRING (fnd_log.level_statement,
7084: g_module_current
7085: || '.CREATE_CONTRACT_IBSPLIT',
7086: ' cp quantity = '
7087: || p_kdtl_tbl (l_ctr).old_cp_quantity
7111: --bug end 3736860
7112: END IF;
7113:
7114: -- end of change
7115: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7116: THEN
7117: fnd_log.STRING (fnd_log.level_statement,
7118: g_module_current
7119: || '.CREATE_CONTRACT_IBSPLIT',
7113:
7114: -- end of change
7115: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7116: THEN
7117: fnd_log.STRING (fnd_log.level_statement,
7118: g_module_current
7119: || '.CREATE_CONTRACT_IBSPLIT',
7120: ' l_old_qty = '
7121: || l_old_qty
7155: SET price_negotiated = NVL (l_oldamt, 0),
7156: price_unit = NVL (p_kdtl_tbl (l_ctr).service_unit_price, 0)
7157: WHERE ID = p_kdtl_tbl (l_ctr).object_line_id;
7158:
7159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7160: THEN
7161: fnd_log.STRING
7162: (fnd_log.level_event,
7163: g_module_current
7157: WHERE ID = p_kdtl_tbl (l_ctr).object_line_id;
7158:
7159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7160: THEN
7161: fnd_log.STRING
7162: (fnd_log.level_event,
7163: g_module_current
7164: || '.CREATE_CONTRACT_IBSPLIT.after_update.cov_lvl',
7165: ' update_cov_level(Return status = '
7158:
7159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7160: THEN
7161: fnd_log.STRING
7162: (fnd_log.level_event,
7163: g_module_current
7164: || '.CREATE_CONTRACT_IBSPLIT.after_update.cov_lvl',
7165: ' update_cov_level(Return status = '
7166: || l_return_status
7198: x_klnv_tbl => l_klnv_tbl_out,
7199: p_validate_yn => 'N'
7200: );
7201:
7202: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7203: THEN
7204: fnd_log.STRING
7205: (fnd_log.level_event,
7206: g_module_current
7200: );
7201:
7202: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7203: THEN
7204: fnd_log.STRING
7205: (fnd_log.level_event,
7206: g_module_current
7207: || '.CREATE_CONTRACT_IBSPLIT.after_cov_lvl_tax',
7208: 'oks_contract_line_pub.update_line(Return status = '
7201:
7202: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7203: THEN
7204: fnd_log.STRING
7205: (fnd_log.level_event,
7206: g_module_current
7207: || '.CREATE_CONTRACT_IBSPLIT.after_cov_lvl_tax',
7208: 'oks_contract_line_pub.update_line(Return status = '
7209: || l_return_status
7339: x_pricing_att => l_price_attribs_in,
7340: x_return_status => l_return_status
7341: );
7342:
7343: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7344: THEN
7345: fnd_log.STRING
7346: (fnd_log.level_event,
7347: g_module_current
7341: );
7342:
7343: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7344: THEN
7345: fnd_log.STRING
7346: (fnd_log.level_event,
7347: g_module_current
7348: || '.CREATE_CONTRACT_IBSPLIT.after.price_att',
7349: 'oks_extwar_util_pvt.get_k_pricing_attributes(Return status = '
7342:
7343: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7344: THEN
7345: fnd_log.STRING
7346: (fnd_log.level_event,
7347: g_module_current
7348: || '.CREATE_CONTRACT_IBSPLIT.after.price_att',
7349: 'oks_extwar_util_pvt.get_k_pricing_attributes(Return status = '
7350: || l_return_status
7368: x_msg_count => x_msg_count,
7369: x_msg_data => x_msg_data
7370: );
7371:
7372: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7373: THEN
7374: fnd_log.STRING
7375: (fnd_log.level_event,
7376: g_module_current
7370: );
7371:
7372: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7373: THEN
7374: fnd_log.STRING
7375: (fnd_log.level_event,
7376: g_module_current
7377: || '.CREATE_CONTRACT_IBSPLIT.after_create.cov_lvl',
7378: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
7371:
7372: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7373: THEN
7374: fnd_log.STRING
7375: (fnd_log.level_event,
7376: g_module_current
7377: || '.CREATE_CONTRACT_IBSPLIT.after_create.cov_lvl',
7378: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
7379: || l_return_status
7452: x_msg_count => x_msg_count,
7453: x_msg_data => x_msg_data
7454: );
7455:
7456: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7457: THEN
7458: fnd_log.STRING
7459: (fnd_log.level_event,
7460: g_module_current
7454: );
7455:
7456: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7457: THEN
7458: fnd_log.STRING
7459: (fnd_log.level_event,
7460: g_module_current
7461: || '.CREATE_CONTRACT_IBSPLIT.ADJUST_SPLIT_BILL_SCH',
7462: 'Return status = ' || l_return_status
7455:
7456: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7457: THEN
7458: fnd_log.STRING
7459: (fnd_log.level_event,
7460: g_module_current
7461: || '.CREATE_CONTRACT_IBSPLIT.ADJUST_SPLIT_BILL_SCH',
7462: 'Return status = ' || l_return_status
7463: );
7508: x_msg_count => x_msg_count,
7509: x_msg_data => x_msg_data
7510: );
7511:
7512: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7513: THEN
7514: fnd_log.STRING
7515: (fnd_log.level_event,
7516: g_module_current
7510: );
7511:
7512: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7513: THEN
7514: fnd_log.STRING
7515: (fnd_log.level_event,
7516: g_module_current
7517: || '.CREATE_CONTRACT_IBSPLIT.Create_transaction_source',
7518: 'Return status = ' || l_return_status
7511:
7512: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7513: THEN
7514: fnd_log.STRING
7515: (fnd_log.level_event,
7516: g_module_current
7517: || '.CREATE_CONTRACT_IBSPLIT.Create_transaction_source',
7518: 'Return status = ' || l_return_status
7519: );
7536: x_msg_count => x_msg_count,
7537: x_msg_data => x_msg_data
7538: );
7539:
7540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7541: THEN
7542: fnd_log.STRING
7543: (fnd_log.level_event,
7544: g_module_current
7538: );
7539:
7540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7541: THEN
7542: fnd_log.STRING
7543: (fnd_log.level_event,
7544: g_module_current
7545: || '.CREATE_CONTRACT_IBSPLIT.Create_source_links',
7546: 'Return status = ' || l_return_status
7539:
7540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7541: THEN
7542: fnd_log.STRING
7543: (fnd_log.level_event,
7544: g_module_current
7545: || '.CREATE_CONTRACT_IBSPLIT.Create_source_links',
7546: 'Return status = ' || l_return_status
7547: );
7598: p_insv_rec => l_insthist_rec,
7599: x_insv_rec => x_insthist_rec
7600: );
7601:
7602: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7603: )
7604: THEN
7605: fnd_log.STRING
7606: (fnd_log.level_event,
7601:
7602: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7603: )
7604: THEN
7605: fnd_log.STRING
7606: (fnd_log.level_event,
7607: g_module_current || '.CREATE_K_IBSPLIT',
7608: 'oks_ins_pvt.insert_row(Return status = '
7609: || l_return_status
7602: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7603: )
7604: THEN
7605: fnd_log.STRING
7606: (fnd_log.level_event,
7607: g_module_current || '.CREATE_K_IBSPLIT',
7608: 'oks_ins_pvt.insert_row(Return status = '
7609: || l_return_status
7610: || ')'
7636: p_ihdv_tbl => l_inst_dtls_tbl,
7637: x_ihdv_tbl => x_inst_dtls_tbl
7638: );
7639:
7640: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7641: THEN
7642: fnd_log.STRING
7643: (fnd_log.level_event,
7644: g_module_current || '.CREATE_K_IBSPLIT',
7638: );
7639:
7640: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7641: THEN
7642: fnd_log.STRING
7643: (fnd_log.level_event,
7644: g_module_current || '.CREATE_K_IBSPLIT',
7645: 'oks_ihd_pvt.insert_row(Return status = '
7646: || l_return_status
7639:
7640: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7641: THEN
7642: fnd_log.STRING
7643: (fnd_log.level_event,
7644: g_module_current || '.CREATE_K_IBSPLIT',
7645: 'oks_ihd_pvt.insert_row(Return status = '
7646: || l_return_status
7647: || ')'
7867: x_return_status := okc_api.g_ret_sts_success;
7868: l_old_cp_id := 0;
7869: l_target_chr_id := 0;
7870:
7871: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7872: THEN
7873: fnd_log.STRING (fnd_log.level_event,
7874: g_module_current || '.CREATE_CONTRACT_IBREPLACE.',
7875: 'count = ' || p_kdtl_tbl.COUNT || ')'
7869: l_target_chr_id := 0;
7870:
7871: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
7872: THEN
7873: fnd_log.STRING (fnd_log.level_event,
7874: g_module_current || '.CREATE_CONTRACT_IBREPLACE.',
7875: 'count = ' || p_kdtl_tbl.COUNT || ')'
7876: );
7877: END IF;
7893: l_sts_code
7894: );
7895:
7896: --IF l_ste_code <> 'ENTERED' THEN
7897: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7898: THEN
7899: fnd_log.STRING
7900: (fnd_log.level_statement,
7901: g_module_current || '.CREATE_CONTRACT_IBREPLACE',
7895:
7896: --IF l_ste_code <> 'ENTERED' THEN
7897: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7898: THEN
7899: fnd_log.STRING
7900: (fnd_log.level_statement,
7901: g_module_current || '.CREATE_CONTRACT_IBREPLACE',
7902: 'Service Start Date = '
7903: || p_kdtl_tbl (l_ctr).service_sdt
7896: --IF l_ste_code <> 'ENTERED' THEN
7897: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7898: THEN
7899: fnd_log.STRING
7900: (fnd_log.level_statement,
7901: g_module_current || '.CREATE_CONTRACT_IBREPLACE',
7902: 'Service Start Date = '
7903: || p_kdtl_tbl (l_ctr).service_sdt
7904: || '
7945: l_repl_rule := l_cov_rec.inheritance_type;
7946:
7947: CLOSE l_cov_csr;
7948:
7949: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7950: THEN
7951: fnd_log.STRING (fnd_log.level_statement,
7952: g_module_current
7953: || '.CREATE_CONTRACT_IBREPLACE',
7947: CLOSE l_cov_csr;
7948:
7949: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
7950: THEN
7951: fnd_log.STRING (fnd_log.level_statement,
7952: g_module_current
7953: || '.CREATE_CONTRACT_IBREPLACE',
7954: 'Replace Rule = ' || l_repl_rule
7955: );
7973: x_timeunit => l_timeunits,
7974: x_return_status => l_return_status
7975: );
7976:
7977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7978: )
7979: THEN
7980: fnd_log.STRING
7981: (fnd_log.level_event,
7976:
7977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7978: )
7979: THEN
7980: fnd_log.STRING
7981: (fnd_log.level_event,
7982: g_module_current
7983: || '.CREATE_CONTRACT_IBREPLACE.after.get_duration',
7984: 'Return Status = ' || l_return_status
7977: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
7978: )
7979: THEN
7980: fnd_log.STRING
7981: (fnd_log.level_event,
7982: g_module_current
7983: || '.CREATE_CONTRACT_IBREPLACE.after.get_duration',
7984: 'Return Status = ' || l_return_status
7985: );
8014: l_termdt := TRUNC (p_kdtl_tbl (l_ctr).prod_sdt);
8015: END IF;
8016: END IF;
8017:
8018: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8019: THEN
8020: fnd_log.STRING (fnd_log.level_statement,
8021: g_module_current
8022: || '.CREATE_CONTRACT_IBREPLACE',
8016: END IF;
8017:
8018: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8019: THEN
8020: fnd_log.STRING (fnd_log.level_statement,
8021: g_module_current
8022: || '.CREATE_CONTRACT_IBREPLACE',
8023: 'New amount = '
8024: || l_newamt
8026: || l_oldamt
8027: );
8028: END IF;
8029:
8030: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8031: THEN
8032: fnd_log.STRING (fnd_log.level_statement,
8033: g_module_current
8034: || '.CREATE_CONTRACT_IBREPLACE',
8028: END IF;
8029:
8030: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8031: THEN
8032: fnd_log.STRING (fnd_log.level_statement,
8033: g_module_current
8034: || '.CREATE_CONTRACT_IBREPLACE',
8035: 'New tax = '
8036: || l_newtax
8064: FROM okc_k_lines_b okcl, oks_k_lines_b oksl
8065: WHERE okcl.id = p_kdtl_tbl (l_ctr).object_line_id
8066: AND okcl.id = oksl.cle_id;
8067: EXCEPTION WHEN OTHERS THEN
8068: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
8069: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_CONTRACT_IBREPLACE.price_uom_error', 'Error is: ' || SQLERRM);
8070: END IF;
8071: NULL;
8072: END;
8065: WHERE okcl.id = p_kdtl_tbl (l_ctr).object_line_id
8066: AND okcl.id = oksl.cle_id;
8067: EXCEPTION WHEN OTHERS THEN
8068: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
8069: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_CONTRACT_IBREPLACE.price_uom_error', 'Error is: ' || SQLERRM);
8070: END IF;
8071: NULL;
8072: END;
8073: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
8069: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_CONTRACT_IBREPLACE.price_uom_error', 'Error is: ' || SQLERRM);
8070: END IF;
8071: NULL;
8072: END;
8073: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
8074: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_CONTRACT_IBREPLACE',
8075: 'Unit Price = '|| l_covd_rec.list_price ||
8076: ', Price UOM = '|| l_covd_rec.price_uom);
8077: END IF;
8070: END IF;
8071: NULL;
8072: END;
8073: IF FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
8074: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.CREATE_CONTRACT_IBREPLACE',
8075: 'Unit Price = '|| l_covd_rec.list_price ||
8076: ', Price UOM = '|| l_covd_rec.price_uom);
8077: END IF;
8078: /* End of code Added for Bug#14829043 */
8111: p_clev_tbl => l_clev_tbl_in,
8112: x_clev_tbl => l_clev_tbl_out
8113: );
8114:
8115: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8116: THEN
8117: fnd_log.STRING
8118: (fnd_log.level_event,
8119: g_module_current
8113: );
8114:
8115: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8116: THEN
8117: fnd_log.STRING
8118: (fnd_log.level_event,
8119: g_module_current
8120: || '.CREATE_CONTRACT_IBREPLACE.update_cov_lvl',
8121: 'okc_contract_pub.update_contract_line(Return status = '
8114:
8115: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8116: THEN
8117: fnd_log.STRING
8118: (fnd_log.level_event,
8119: g_module_current
8120: || '.CREATE_CONTRACT_IBREPLACE.update_cov_lvl',
8121: 'okc_contract_pub.update_contract_line(Return status = '
8122: || l_return_status
8155: x_klnv_tbl => l_klnv_tbl_out,
8156: p_validate_yn => 'N'
8157: );
8158:
8159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8160: THEN
8161: fnd_log.STRING
8162: (fnd_log.level_event,
8163: g_module_current
8157: );
8158:
8159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8160: THEN
8161: fnd_log.STRING
8162: (fnd_log.level_event,
8163: g_module_current
8164: || '.CREATE_CONTRACT_IBREPLACE.after_update.cov_lvl_tax',
8165: 'oks_contract_line_pub.update_line(Return status = '
8158:
8159: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8160: THEN
8161: fnd_log.STRING
8162: (fnd_log.level_event,
8163: g_module_current
8164: || '.CREATE_CONTRACT_IBREPLACE.after_update.cov_lvl_tax',
8165: 'oks_contract_line_pub.update_line(Return status = '
8166: || l_return_status
8203: p_comments => NULL,
8204: p_validate_status => 'N'
8205: );
8206:
8207: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8208: THEN
8209: fnd_log.STRING
8210: (fnd_log.level_event,
8211: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
8205: );
8206:
8207: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8208: THEN
8209: fnd_log.STRING
8210: (fnd_log.level_event,
8211: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
8212: 'okc_contract_pub.update_contract_line(Return status ='
8213: || l_return_status
8206:
8207: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8208: THEN
8209: fnd_log.STRING
8210: (fnd_log.level_event,
8211: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
8212: 'okc_contract_pub.update_contract_line(Return status ='
8213: || l_return_status
8214: || ')'
8287: l_inst_dtls_tbl (l_ctr1).new_customer :=
8288: p_kdtl_tbl (l_ctr).cust_account;
8289: l_inst_dtls_tbl (l_ctr1).new_k_status := l_sts_code;
8290:
8291: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8292: THEN
8293: fnd_log.STRING (fnd_log.level_statement,
8294: g_module_current
8295: || '.CREATE_CONTRACT_IBREPLACE',
8289: l_inst_dtls_tbl (l_ctr1).new_k_status := l_sts_code;
8290:
8291: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8292: THEN
8293: fnd_log.STRING (fnd_log.level_statement,
8294: g_module_current
8295: || '.CREATE_CONTRACT_IBREPLACE',
8296: 'New End date = '
8297: || l_newedt
8383: x_msg_count => x_msg_count,
8384: x_msg_data => x_msg_data
8385: );
8386:
8387: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8388: THEN
8389: fnd_log.STRING
8390: (fnd_log.level_event,
8391: g_module_current
8385: );
8386:
8387: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8388: THEN
8389: fnd_log.STRING
8390: (fnd_log.level_event,
8391: g_module_current
8392: || '.CREATE_CONTRACT_IBREPLACE.create_cov_lvl',
8393: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
8386:
8387: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8388: THEN
8389: fnd_log.STRING
8390: (fnd_log.level_event,
8391: g_module_current
8392: || '.CREATE_CONTRACT_IBREPLACE.create_cov_lvl',
8393: 'oks_extwarprgm_pvt.create_k_covered_levels(Return status = '
8394: || l_return_status
8486: x_msg_count => x_msg_count,
8487: x_msg_data => x_msg_data
8488: );
8489:
8490: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8491: THEN
8492: fnd_log.STRING
8493: (fnd_log.level_event,
8494: g_module_current
8488: );
8489:
8490: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8491: THEN
8492: fnd_log.STRING
8493: (fnd_log.level_event,
8494: g_module_current
8495: || '.CREATE_CONTRACT_IBREPLACE.OKS_BILL_SCH.ADJUST_REPLACE_PRODUCT_BS',
8496: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8489:
8490: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8491: THEN
8492: fnd_log.STRING
8493: (fnd_log.level_event,
8494: g_module_current
8495: || '.CREATE_CONTRACT_IBREPLACE.OKS_BILL_SCH.ADJUST_REPLACE_PRODUCT_BS',
8496: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8497: || l_return_status
8525: x_msg_count => x_msg_count,
8526: x_msg_data => x_msg_data
8527: );
8528:
8529: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8530: THEN
8531: fnd_log.STRING
8532: (fnd_log.level_event,
8533: g_module_current
8527: );
8528:
8529: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8530: THEN
8531: fnd_log.STRING
8532: (fnd_log.level_event,
8533: g_module_current
8534: || '.CREATE_CONTRACT_IBREPLACE.Create_transaction_source',
8535: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8528:
8529: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8530: THEN
8531: fnd_log.STRING
8532: (fnd_log.level_event,
8533: g_module_current
8534: || '.CREATE_CONTRACT_IBREPLACE.Create_transaction_source',
8535: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8536: || l_return_status
8554: x_msg_count => x_msg_count,
8555: x_msg_data => x_msg_data
8556: );
8557:
8558: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8559: THEN
8560: fnd_log.STRING
8561: (fnd_log.level_event,
8562: g_module_current
8556: );
8557:
8558: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8559: THEN
8560: fnd_log.STRING
8561: (fnd_log.level_event,
8562: g_module_current
8563: || '.CREATE_CONTRACT_IBREPLACE.Create_source_links',
8564: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8557:
8558: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8559: THEN
8560: fnd_log.STRING
8561: (fnd_log.level_event,
8562: g_module_current
8563: || '.CREATE_CONTRACT_IBREPLACE.Create_source_links',
8564: 'ADJUST_REPLACE_PRODUCT_BS(Return status = '
8565: || l_return_status
8616: p_insv_rec => l_insthist_rec,
8617: x_insv_rec => x_insthist_rec
8618: );
8619:
8620: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
8621: )
8622: THEN
8623: fnd_log.STRING
8624: (fnd_log.level_event,
8619:
8620: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
8621: )
8622: THEN
8623: fnd_log.STRING
8624: (fnd_log.level_event,
8625: g_module_current || '.CREATE_IBREPLACE',
8626: 'oks_ins_pvt.insert_row(Return status = '
8627: || l_return_status
8620: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
8621: )
8622: THEN
8623: fnd_log.STRING
8624: (fnd_log.level_event,
8625: g_module_current || '.CREATE_IBREPLACE',
8626: 'oks_ins_pvt.insert_row(Return status = '
8627: || l_return_status
8628: || ')'
8654: p_ihdv_tbl => l_inst_dtls_tbl,
8655: x_ihdv_tbl => x_inst_dtls_tbl
8656: );
8657:
8658: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8659: THEN
8660: fnd_log.STRING
8661: (fnd_log.level_event,
8662: g_module_current || '.CREATE_K_IBREPLACE',
8656: );
8657:
8658: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8659: THEN
8660: fnd_log.STRING
8661: (fnd_log.level_event,
8662: g_module_current || '.CREATE_K_IBREPLACE',
8663: 'oks_ihd_pvt.insert_row(Return status = '
8664: || l_return_status
8657:
8658: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8659: THEN
8660: fnd_log.STRING
8661: (fnd_log.level_event,
8662: g_module_current || '.CREATE_K_IBREPLACE',
8663: 'oks_ihd_pvt.insert_row(Return status = '
8664: || l_return_status
8665: || ')'
8797: BEGIN
8798: x_return_status := okc_api.g_ret_sts_success;
8799: l_old_cp_id := 0;
8800:
8801: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8802: THEN
8803: fnd_log.STRING (fnd_log.level_event,
8804: g_module_current || '.Create_Contract_IBRETURN.',
8805: 'count = ' || p_kdtl_tbl.COUNT || ')'
8799: l_old_cp_id := 0;
8800:
8801: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8802: THEN
8803: fnd_log.STRING (fnd_log.level_event,
8804: g_module_current || '.Create_Contract_IBRETURN.',
8805: 'count = ' || p_kdtl_tbl.COUNT || ')'
8806: );
8807: END IF;
8819: );
8820:
8821: IF l_ste_code = 'HOLD'
8822: THEN
8823: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
8824: THEN
8825: fnd_log.STRING (fnd_log.level_error,
8826: g_module_current
8827: || '.CREATE_CONTRACT_IBRETURN.ERROR',
8821: IF l_ste_code = 'HOLD'
8822: THEN
8823: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
8824: THEN
8825: fnd_log.STRING (fnd_log.level_error,
8826: g_module_current
8827: || '.CREATE_CONTRACT_IBRETURN.ERROR',
8828: ' Contract '
8829: || p_kdtl_tbl (l_ctr).contract_number
8876: THEN
8877: l_retdt := p_kdtl_tbl (l_ctr).prod_sdt;
8878: END IF;
8879:
8880: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8881: THEN
8882: fnd_log.STRING (fnd_log.level_statement,
8883: g_module_current
8884: || '.CREATE_CONTRACT_IBRETURN',
8878: END IF;
8879:
8880: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8881: THEN
8882: fnd_log.STRING (fnd_log.level_statement,
8883: g_module_current
8884: || '.CREATE_CONTRACT_IBRETURN',
8885: 'Credit option = '
8886: || p_kdtl_tbl (l_ctr).raise_credit
8917: (l_ctr).hdr_org_id,
8918: p_transaction_date => TRUNC (l_retdt)
8919: );
8920:
8921: IF fnd_log.level_statement >=
8922: fnd_log.g_current_runtime_level
8923: THEN
8924: fnd_log.STRING (fnd_log.level_statement,
8925: g_module_current
8918: p_transaction_date => TRUNC (l_retdt)
8919: );
8920:
8921: IF fnd_log.level_statement >=
8922: fnd_log.g_current_runtime_level
8923: THEN
8924: fnd_log.STRING (fnd_log.level_statement,
8925: g_module_current
8926: || '.CREATE_CONTRACT_IBRETURN',
8920:
8921: IF fnd_log.level_statement >=
8922: fnd_log.g_current_runtime_level
8923: THEN
8924: fnd_log.STRING (fnd_log.level_statement,
8925: g_module_current
8926: || '.CREATE_CONTRACT_IBRETURN',
8927: 'Credit option from GCD = '
8928: || l_credit_amount
8945: END IF;
8946: END IF;
8947: END IF;
8948:
8949: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8950: THEN
8951: fnd_log.STRING (fnd_log.level_statement,
8952: g_module_current
8953: || '.CREATE_CONTRACT_IBRETURN',
8947: END IF;
8948:
8949: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
8950: THEN
8951: fnd_log.STRING (fnd_log.level_statement,
8952: g_module_current
8953: || '.CREATE_CONTRACT_IBRETURN',
8954: 'Suppress credit = '
8955: || l_suppress_credit
8974: p_term_cancel_source => 'IBRETURN',
8975: x_return_status => l_return_status
8976: );
8977:
8978: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8979: THEN
8980: fnd_log.STRING
8981: (fnd_log.level_event,
8982: g_module_current
8976: );
8977:
8978: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8979: THEN
8980: fnd_log.STRING
8981: (fnd_log.level_event,
8982: g_module_current
8983: || '.CREATE_CONTRACT_IBRETURN.terminate_cp',
8984: 'oks_bill_rec_pub.pre_terminate_cp(Return status = '
8977:
8978: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
8979: THEN
8980: fnd_log.STRING
8981: (fnd_log.level_event,
8982: g_module_current
8983: || '.CREATE_CONTRACT_IBRETURN.terminate_cp',
8984: 'oks_bill_rec_pub.pre_terminate_cp(Return status = '
8985: || l_return_status
9064: p_chrv_tbl => l_chrv_tbl_in,
9065: x_chrv_tbl => l_chrv_tbl_out
9066: );
9067:
9068: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9069: )
9070: THEN
9071: fnd_log.STRING
9072: (fnd_log.level_event,
9067:
9068: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9069: )
9070: THEN
9071: fnd_log.STRING
9072: (fnd_log.level_event,
9073: g_module_current
9074: || '.CREATE_CONTRACT_IBRETURN.external_call.after',
9075: 'okc_contract_pub.update_contract_header(Return status =
9068: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9069: )
9070: THEN
9071: fnd_log.STRING
9072: (fnd_log.level_event,
9073: g_module_current
9074: || '.CREATE_CONTRACT_IBRETURN.external_call.after',
9075: 'okc_contract_pub.update_contract_header(Return status =
9076: '
9115: p_comments => NULL,
9116: p_validate_status => 'N'
9117: );
9118:
9119: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9120: THEN
9121: fnd_log.STRING
9122: (fnd_log.level_event,
9123: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9117: );
9118:
9119: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9120: THEN
9121: fnd_log.STRING
9122: (fnd_log.level_event,
9123: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9124: 'oks_change_status_pvt.Update_line_status (Return status ='
9125: || l_return_status
9118:
9119: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9120: THEN
9121: fnd_log.STRING
9122: (fnd_log.level_event,
9123: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9124: 'oks_change_status_pvt.Update_line_status (Return status ='
9125: || l_return_status
9126: || ')'
9164: p_comments => NULL,
9165: p_validate_status => 'N'
9166: );
9167:
9168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9169: )
9170: THEN
9171: fnd_log.STRING
9172: (fnd_log.level_event,
9167:
9168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9169: )
9170: THEN
9171: fnd_log.STRING
9172: (fnd_log.level_event,
9173: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9174: 'oks_change_status_pvt.Update_line_status (Return status = '
9175: || l_return_status
9168: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9169: )
9170: THEN
9171: fnd_log.STRING
9172: (fnd_log.level_event,
9173: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9174: 'oks_change_status_pvt.Update_line_status (Return status = '
9175: || l_return_status
9176: || ')'
9211: p_date_cancelled => TRUNC (date_cancelled),
9212: p_validate_status => 'N'
9213: );
9214:
9215: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9216: )
9217: THEN
9218: fnd_log.STRING
9219: (fnd_log.level_event,
9214:
9215: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9216: )
9217: THEN
9218: fnd_log.STRING
9219: (fnd_log.level_event,
9220: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9221: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status =
9222: '
9215: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9216: )
9217: THEN
9218: fnd_log.STRING
9219: (fnd_log.level_event,
9220: g_module_current || '.CREATE_CONTRACT_IBRETURN',
9221: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status =
9222: '
9223: || l_return_status
9336: p_insv_rec => l_insthist_rec,
9337: x_insv_rec => x_insthist_rec
9338: );
9339:
9340: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9341: )
9342: THEN
9343: fnd_log.STRING
9344: (fnd_log.level_event,
9339:
9340: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9341: )
9342: THEN
9343: fnd_log.STRING
9344: (fnd_log.level_event,
9345: g_module_current || '.CREATE_K_IBRETURN',
9346: 'oks_ins_pvt.insert_row(Return status = '
9347: || l_return_status
9340: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
9341: )
9342: THEN
9343: fnd_log.STRING
9344: (fnd_log.level_event,
9345: g_module_current || '.CREATE_K_IBRETURN',
9346: 'oks_ins_pvt.insert_row(Return status = '
9347: || l_return_status
9348: || ')'
9370: p_ihdv_tbl => l_inst_dtls_tbl,
9371: x_ihdv_tbl => x_inst_dtls_tbl
9372: );
9373:
9374: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9375: THEN
9376: fnd_log.STRING
9377: (fnd_log.level_event,
9378: g_module_current || '.CREATE_IBRETURN',
9372: );
9373:
9374: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9375: THEN
9376: fnd_log.STRING
9377: (fnd_log.level_event,
9378: g_module_current || '.CREATE_IBRETURN',
9379: 'oks_ihd_pvt.insert_row(Return status = '
9380: || l_return_status
9373:
9374: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9375: THEN
9376: fnd_log.STRING
9377: (fnd_log.level_event,
9378: g_module_current || '.CREATE_IBRETURN',
9379: 'oks_ihd_pvt.insert_row(Return status = '
9380: || l_return_status
9381: || ')'
9869:
9870: get_party_id (p_kdtl_rec.new_account_id, l_party_id, l_party_name);
9871: l_hdr_rec.party_id := l_party_id;
9872:
9873: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9874: THEN
9875: fnd_log.STRING (fnd_log.level_statement,
9876: g_module_current
9877: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9871: l_hdr_rec.party_id := l_party_id;
9872:
9873: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9874: THEN
9875: fnd_log.STRING (fnd_log.level_statement,
9876: g_module_current
9877: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9878: 'Party id = ' || l_hdr_rec.party_id
9879: );
9892: p_rnrl_rec => NULL,
9893: x_rnrl_rec => l_rnrl_rec_out
9894: );
9895:
9896: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9897: THEN
9898: fnd_log.STRING
9899: (fnd_log.level_event,
9900: g_module_current
9894: );
9895:
9896: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9897: THEN
9898: fnd_log.STRING
9899: (fnd_log.level_event,
9900: g_module_current
9901: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9902: 'oks_renew_util_pub.get_renew_rules(Return status = '
9895:
9896: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
9897: THEN
9898: fnd_log.STRING
9899: (fnd_log.level_event,
9900: g_module_current
9901: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9902: 'oks_renew_util_pub.get_renew_rules(Return status = '
9903: || l_return_status
9924: END IF;
9925:
9926: l_hdr_rec.start_date := TRUNC (l_trfdt);
9927:
9928: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9929: THEN
9930: fnd_log.STRING (fnd_log.level_statement,
9931: g_module_current
9932: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9926: l_hdr_rec.start_date := TRUNC (l_trfdt);
9927:
9928: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9929: THEN
9930: fnd_log.STRING (fnd_log.level_statement,
9931: g_module_current
9932: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9933: 'Transfer status Profile = '
9934: || fnd_profile.VALUE ('OKS_TRANSFER_STATUS')
9989: l_hdr_rec.sts_code := l_sts_code;
9990: END IF;
9991: END IF;
9992:
9993: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9994: THEN
9995: fnd_log.STRING (fnd_log.level_statement,
9996: g_module_current
9997: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9991: END IF;
9992:
9993: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
9994: THEN
9995: fnd_log.STRING (fnd_log.level_statement,
9996: g_module_current
9997: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
9998: 'Header Status = '
9999: || l_hdr_rec.sts_code
10011: INTO l_bill_to_id, l_ship_to_id;
10012:
10013: CLOSE l_get_bill_ship_csr;
10014:
10015: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10016: THEN
10017: fnd_log.STRING (fnd_log.level_statement,
10018: g_module_current
10019: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10013: CLOSE l_get_bill_ship_csr;
10014:
10015: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10016: THEN
10017: fnd_log.STRING (fnd_log.level_statement,
10018: g_module_current
10019: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10020: ' Bill to Id = '
10021: || l_bill_to_id
10037: IF validate_bill_ship_ids%NOTFOUND
10038: THEN
10039: CLOSE validate_bill_ship_ids;
10040:
10041: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
10042: THEN
10043: fnd_log.STRING (fnd_log.level_error,
10044: g_module_current
10045: || '.CREATE_K_SYSTEM_TRF.ERROR',
10039: CLOSE validate_bill_ship_ids;
10040:
10041: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
10042: THEN
10043: fnd_log.STRING (fnd_log.level_error,
10044: g_module_current
10045: || '.CREATE_K_SYSTEM_TRF.ERROR',
10046: ' Bill to Id ('
10047: || l_bill_to_id
10074: IF validate_bill_ship_ids%NOTFOUND
10075: THEN
10076: CLOSE validate_bill_ship_ids;
10077:
10078: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
10079: THEN
10080: fnd_log.STRING (fnd_log.level_error,
10081: g_module_current
10082: || '.CREATE_K_SYSTEM_TRF.ERROR',
10076: CLOSE validate_bill_ship_ids;
10077:
10078: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
10079: THEN
10080: fnd_log.STRING (fnd_log.level_error,
10081: g_module_current
10082: || '.CREATE_K_SYSTEM_TRF.ERROR',
10083: ' Bill to Id ('
10084: || l_ship_to_id
10177: x_msg_count => x_msg_count,
10178: x_msg_data => x_msg_data
10179: );
10180:
10181: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10182: THEN
10183: fnd_log.STRING
10184: (fnd_log.level_statement,
10185: g_module_current
10179: );
10180:
10181: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10182: THEN
10183: fnd_log.STRING
10184: (fnd_log.level_statement,
10185: g_module_current
10186: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10187: 'OKS_EXTWARPRGM_PVT.create_k_hdr(Return status = '
10180:
10181: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10182: THEN
10183: fnd_log.STRING
10184: (fnd_log.level_statement,
10185: g_module_current
10186: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10187: 'OKS_EXTWARPRGM_PVT.create_k_hdr(Return status = '
10188: || l_return_status
10224: p_cacv_tbl => l_cacv_tbl_in,
10225: x_cacv_tbl => l_cacv_tbl_out
10226: );
10227:
10228: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10229: THEN
10230: fnd_log.STRING
10231: (fnd_log.level_statement,
10232: g_module_current
10226: );
10227:
10228: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10229: THEN
10230: fnd_log.STRING
10231: (fnd_log.level_statement,
10232: g_module_current
10233: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10234: 'okc_contract_pub.create_contract_access(Return status = '
10227:
10228: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10229: THEN
10230: fnd_log.STRING
10231: (fnd_log.level_statement,
10232: g_module_current
10233: || '.CREATE_K_SYSTEM_TRF.create_contract_header',
10234: 'okc_contract_pub.create_contract_access(Return status = '
10235: || l_return_status
10366:
10367: l_line_rec.srv_sdt := TRUNC (l_trfdt);
10368: l_line_rec.srv_edt := TRUNC (p_kdtl_rec.service_edt);
10369:
10370: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10371: THEN
10372: fnd_log.STRING (fnd_log.level_statement,
10373: g_module_current
10374: || '.CREATE_K_SYSTEM_TRF.create_k_service_line',
10368: l_line_rec.srv_edt := TRUNC (p_kdtl_rec.service_edt);
10369:
10370: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10371: THEN
10372: fnd_log.STRING (fnd_log.level_statement,
10373: g_module_current
10374: || '.CREATE_K_SYSTEM_TRF.create_k_service_line',
10375: 'Start date = '
10376: || l_line_rec.srv_sdt
10493: x_msg_count => x_msg_count,
10494: x_msg_data => x_msg_data
10495: );
10496:
10497: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10498: THEN
10499: fnd_log.STRING
10500: (fnd_log.level_statement,
10501: g_module_current
10495: );
10496:
10497: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10498: THEN
10499: fnd_log.STRING
10500: (fnd_log.level_statement,
10501: g_module_current
10502: || '.CREATE_K_SYSTEM_TRF.create_k_service_line',
10503: 'oks_extwarprgm_pvt.create_k_service_lines(Return status = '
10496:
10497: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10498: THEN
10499: fnd_log.STRING
10500: (fnd_log.level_statement,
10501: g_module_current
10502: || '.CREATE_K_SYSTEM_TRF.create_k_service_line',
10503: 'oks_extwarprgm_pvt.create_k_service_lines(Return status = '
10504: || l_return_status
10604: /* Open l_Cust_csr;
10605: Fetch l_Cust_csr into l_Cust_rec;
10606: If l_Cust_csr%notfound Then
10607: Close l_Cust_Csr;
10608: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
10609: fnd_log.string(FND_LOG.LEVEL_ERROR,G_MODULE_CURRENT||'.CREATE_K_SYSTEM_TRF.ERROR',
10610: 'l_Cust_csr Not Found ' );
10611: END IF;
10612: l_return_status := OKC_API.G_RET_STS_ERROR;
10605: Fetch l_Cust_csr into l_Cust_rec;
10606: If l_Cust_csr%notfound Then
10607: Close l_Cust_Csr;
10608: IF FND_LOG.LEVEL_ERROR >= FND_LOG.G_CURRENT_RUNTIME_LEVEL THEN
10609: fnd_log.string(FND_LOG.LEVEL_ERROR,G_MODULE_CURRENT||'.CREATE_K_SYSTEM_TRF.ERROR',
10610: 'l_Cust_csr Not Found ' );
10611: END IF;
10612: l_return_status := OKC_API.G_RET_STS_ERROR;
10613: OKC_API.set_message(G_APP_NAME,'OKS_CUST_PROD_DTLS_NOT_FOUND','CUSTOMER_PRODUCT',p_kdtl_rec.old_cp_id);
10693: ELSE
10694: l_newamt := 0;
10695: END IF;
10696:
10697: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10698: THEN
10699: fnd_log.STRING (fnd_log.level_statement,
10700: g_module_current
10701: || '.CREATE_K_SYSTEM_TRF.Create_Contract_subline',
10695: END IF;
10696:
10697: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
10698: THEN
10699: fnd_log.STRING (fnd_log.level_statement,
10700: g_module_current
10701: || '.CREATE_K_SYSTEM_TRF.Create_Contract_subline',
10702: 'New amount = ' || l_newamt
10703: );
10802: x_msg_count => x_msg_count,
10803: x_msg_data => x_msg_data
10804: );
10805:
10806: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10807: THEN
10808: fnd_log.STRING (fnd_log.level_event,
10809: g_module_current
10810: || '.CREATE_K_SYSTEM_TRF.Create_Contract_subline',
10804: );
10805:
10806: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10807: THEN
10808: fnd_log.STRING (fnd_log.level_event,
10809: g_module_current
10810: || '.CREATE_K_SYSTEM_TRF.Create_Contract_subline',
10811: 'New amount = ' || l_newamt
10812: );
10898: x_timeunit => l_timeunits,
10899: x_return_status => l_return_status
10900: );
10901:
10902: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10903: THEN
10904: fnd_log.STRING
10905: (fnd_log.level_event,
10906: g_module_current
10900: );
10901:
10902: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10903: THEN
10904: fnd_log.STRING
10905: (fnd_log.level_event,
10906: g_module_current
10907: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10908: 'Okc_time_util_pub.get_duration(Return status = '
10901:
10902: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10903: THEN
10904: fnd_log.STRING
10905: (fnd_log.level_event,
10906: g_module_current
10907: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10908: 'Okc_time_util_pub.get_duration(Return status = '
10909: || l_return_status
10940: x_bil_sch_out_tbl => l_bil_sch_out,
10941: x_return_status => l_return_status
10942: );
10943:
10944: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10945: THEN
10946: fnd_log.STRING
10947: (fnd_log.level_event,
10948: g_module_current
10942: );
10943:
10944: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10945: THEN
10946: fnd_log.STRING
10947: (fnd_log.level_event,
10948: g_module_current
10949: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10950: 'oks_bill_sch.create_bill_sch_rules(Return status = '
10943:
10944: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
10945: THEN
10946: fnd_log.STRING
10947: (fnd_log.level_event,
10948: g_module_current
10949: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10950: 'oks_bill_sch.create_bill_sch_rules(Return status = '
10951: || l_return_status
10966: (
10967: P_LINE_ID => p_line_id ,
10968: X_RETURN_STATUS => l_return_status
10969: );
10970: If(G_FND_LOG_OPTION = 'Y') Then
10971: FND_FILE.PUT_LINE (FND_FILE.LOG,'IBNEW :- CREATE_BCL_FOR_OM ' || l_return_status );
10972: OKS_RENEW_PVT.DEBUG_LOG( 'OKS_EXTWARPRGM_PVT.CREATE_K_SYSTEM_TRF :: CREATE_BCL_FOR_OM '|| l_return_status);
10973: End if;
10974:
10988: x_msg_data => x_msg_data
10989: );
10990:
10991: -- FND_FILE.PUT_LINE( fnd_file.LOG, 'IBNEW :- Update_OM_SLL_Date ' || l_return_status );
10992: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
10993: )
10994: THEN
10995: fnd_log.STRING
10996: (fnd_log.level_event,
10991: -- FND_FILE.PUT_LINE( fnd_file.LOG, 'IBNEW :- Update_OM_SLL_Date ' || l_return_status );
10992: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
10993: )
10994: THEN
10995: fnd_log.STRING
10996: (fnd_log.level_event,
10997: g_module_current
10998: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10999: 'oks_bill_sch.update_om_sll_date(Return status = '
10992: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
10993: )
10994: THEN
10995: fnd_log.STRING
10996: (fnd_log.level_event,
10997: g_module_current
10998: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
10999: 'oks_bill_sch.update_om_sll_date(Return status = '
11000: || l_return_status
11015: x_msg_count => x_msg_count,
11016: x_msg_data => x_msg_data
11017: );
11018:
11019: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
11020: )
11021: THEN
11022: fnd_log.STRING
11023: (fnd_log.level_event,
11018:
11019: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
11020: )
11021: THEN
11022: fnd_log.STRING
11023: (fnd_log.level_event,
11024: g_module_current
11025: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
11026: 'oks_bill_sch.create_bill_sch_cp(Return status = '
11019: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
11020: )
11021: THEN
11022: fnd_log.STRING
11023: (fnd_log.level_event,
11024: g_module_current
11025: || '.CREATE_K_SYSTEM_TRF.Create_billing_schedule',
11026: 'oks_bill_sch.create_bill_sch_cp(Return status = '
11027: || l_return_status
11039: P_LINE_ID => p_line_id ,
11040: X_RETURN_STATUS => l_return_status
11041: );
11042: -- FND_FILE.PUT_LINE (FND_FILE.LOG,'IBNEW :- CREATE_BCL_FOR_OM ' || l_return_status );
11043: If(G_FND_LOG_OPTION = 'Y') Then
11044: OKS_RENEW_PVT.DEBUG_LOG( 'OKS_EXTWARPRGM_PVT.CREATE_K_SYSTEM_TRF :: CREATE_BCL_FOR_OM '|| l_return_status);
11045: End if;
11046: If Not l_return_status = 'S' then
11047: Raise G_EXCEPTION_HALT_VALIDATION;
11094: IF l_ste_code = 'HOLD'
11095: THEN
11096: l_return_status := okc_api.g_ret_sts_error;
11097:
11098: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
11099: THEN
11100: fnd_log.STRING (fnd_log.level_error,
11101: g_module_current
11102: || '.CREATE_CONTRACT_IBTERMINATE.ERROR',
11096: l_return_status := okc_api.g_ret_sts_error;
11097:
11098: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
11099: THEN
11100: fnd_log.STRING (fnd_log.level_error,
11101: g_module_current
11102: || '.CREATE_CONTRACT_IBTERMINATE.ERROR',
11103: 'Contract in QA_HOLD status'
11104: );
11143: INTO l_service_name;
11144:
11145: CLOSE l_serv_csr;
11146:
11147: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
11148: THEN
11149: fnd_log.STRING (fnd_log.level_statement,
11150: g_module_current || '.CREATE_K_SYSTEM_TRF',
11151: 'new cust acct id = '
11145: CLOSE l_serv_csr;
11146:
11147: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
11148: THEN
11149: fnd_log.STRING (fnd_log.level_statement,
11150: g_module_current || '.CREATE_K_SYSTEM_TRF',
11151: 'new cust acct id = '
11152: || p_kdtl_tbl (l_ctr).new_account_id
11153: || ',party id = '
11180: THEN
11181: l_trfdt := p_kdtl_tbl (l_ctr).prod_sdt;
11182: END IF;
11183:
11184: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
11185: THEN
11186: fnd_log.STRING (fnd_log.level_statement,
11187: g_module_current || '.CREATE_K_SYSTEM_TRF',
11188: 'Transfer Option = '
11182: END IF;
11183:
11184: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
11185: THEN
11186: fnd_log.STRING (fnd_log.level_statement,
11187: g_module_current || '.CREATE_K_SYSTEM_TRF',
11188: 'Transfer Option = '
11189: || l_trf_option
11190: || ',For service line = '
11235: INTO l_relationship;
11236:
11237: CLOSE l_cust_rel_csr;
11238:
11239: IF fnd_log.level_statement >=
11240: fnd_log.g_current_runtime_level
11241: THEN
11242: fnd_log.STRING
11243: (fnd_log.level_statement,
11236:
11237: CLOSE l_cust_rel_csr;
11238:
11239: IF fnd_log.level_statement >=
11240: fnd_log.g_current_runtime_level
11241: THEN
11242: fnd_log.STRING
11243: (fnd_log.level_statement,
11244: g_module_current
11238:
11239: IF fnd_log.level_statement >=
11240: fnd_log.g_current_runtime_level
11241: THEN
11242: fnd_log.STRING
11243: (fnd_log.level_statement,
11244: g_module_current
11245: || '.CREATE_K_SYSTEM_TRF',
11246: 'TERM_NO_REL profile relationship = '
11239: IF fnd_log.level_statement >=
11240: fnd_log.g_current_runtime_level
11241: THEN
11242: fnd_log.STRING
11243: (fnd_log.level_statement,
11244: g_module_current
11245: || '.CREATE_K_SYSTEM_TRF',
11246: 'TERM_NO_REL profile relationship = '
11247: || l_relationship_type
11261: l_ste_code,
11262: l_sts_code
11263: );
11264:
11265: IF fnd_log.level_statement >=
11266: fnd_log.g_current_runtime_level
11267: THEN
11268: fnd_log.STRING (fnd_log.level_statement,
11269: g_module_current
11262: l_sts_code
11263: );
11264:
11265: IF fnd_log.level_statement >=
11266: fnd_log.g_current_runtime_level
11267: THEN
11268: fnd_log.STRING (fnd_log.level_statement,
11269: g_module_current
11270: || '.CREATE_K_SYSTEM_TRF',
11264:
11265: IF fnd_log.level_statement >=
11266: fnd_log.g_current_runtime_level
11267: THEN
11268: fnd_log.STRING (fnd_log.level_statement,
11269: g_module_current
11270: || '.CREATE_K_SYSTEM_TRF',
11271: 'Product status Code = '
11272: || p_kdtl_tbl (l_ctr).prod_sts_code
11277:
11278: IF l_ste_code <> 'ENTERED'
11279: THEN
11280: --Terminate the CUrrent Owners Contract subline with date terminated as Transfer date
11281: IF fnd_log.level_statement >=
11282: fnd_log.g_current_runtime_level
11283: THEN
11284: fnd_log.STRING
11285: (fnd_log.level_statement,
11278: IF l_ste_code <> 'ENTERED'
11279: THEN
11280: --Terminate the CUrrent Owners Contract subline with date terminated as Transfer date
11281: IF fnd_log.level_statement >=
11282: fnd_log.g_current_runtime_level
11283: THEN
11284: fnd_log.STRING
11285: (fnd_log.level_statement,
11286: g_module_current || '.CREATE_K_SYSTEM_TRF',
11280: --Terminate the CUrrent Owners Contract subline with date terminated as Transfer date
11281: IF fnd_log.level_statement >=
11282: fnd_log.g_current_runtime_level
11283: THEN
11284: fnd_log.STRING
11285: (fnd_log.level_statement,
11286: g_module_current || '.CREATE_K_SYSTEM_TRF',
11287: 'OKS Raise credit memo profile option value ='
11288: || fnd_profile.VALUE
11281: IF fnd_log.level_statement >=
11282: fnd_log.g_current_runtime_level
11283: THEN
11284: fnd_log.STRING
11285: (fnd_log.level_statement,
11286: g_module_current || '.CREATE_K_SYSTEM_TRF',
11287: 'OKS Raise credit memo profile option value ='
11288: || fnd_profile.VALUE
11289: ('OKS_RAISE_CREDIT_MEMO_FOR_IB_INT')
11349: p_term_cancel_source => 'IBTRANSFER',
11350: x_return_status => l_return_status
11351: );
11352:
11353: IF (fnd_log.level_event >=
11354: fnd_log.g_current_runtime_level
11355: )
11356: THEN
11357: fnd_log.STRING
11350: x_return_status => l_return_status
11351: );
11352:
11353: IF (fnd_log.level_event >=
11354: fnd_log.g_current_runtime_level
11355: )
11356: THEN
11357: fnd_log.STRING
11358: (fnd_log.level_event,
11353: IF (fnd_log.level_event >=
11354: fnd_log.g_current_runtime_level
11355: )
11356: THEN
11357: fnd_log.STRING
11358: (fnd_log.level_event,
11359: g_module_current || '.CREATE_K_SYSTEM_TRF',
11360: 'oks_bill_rec_pub.Pre_terminate_cp(Return status ='
11361: || l_return_status
11354: fnd_log.g_current_runtime_level
11355: )
11356: THEN
11357: fnd_log.STRING
11358: (fnd_log.level_event,
11359: g_module_current || '.CREATE_K_SYSTEM_TRF',
11360: 'oks_bill_rec_pub.Pre_terminate_cp(Return status ='
11361: || l_return_status
11362: || ')'
11401: p_clev_tbl => l_clev_tbl_in,
11402: x_clev_tbl => l_clev_tbl_out
11403: );
11404:
11405: IF (fnd_log.level_event >=
11406: fnd_log.g_current_runtime_level
11407: )
11408: THEN
11409: fnd_log.STRING
11402: x_clev_tbl => l_clev_tbl_out
11403: );
11404:
11405: IF (fnd_log.level_event >=
11406: fnd_log.g_current_runtime_level
11407: )
11408: THEN
11409: fnd_log.STRING
11410: (fnd_log.level_event,
11405: IF (fnd_log.level_event >=
11406: fnd_log.g_current_runtime_level
11407: )
11408: THEN
11409: fnd_log.STRING
11410: (fnd_log.level_event,
11411: g_module_current || '.CREATE_K_SYSTEM_TRF',
11412: 'okc_contract_pub.update_contract_line(Return status = '
11413: || l_return_status
11406: fnd_log.g_current_runtime_level
11407: )
11408: THEN
11409: fnd_log.STRING
11410: (fnd_log.level_event,
11411: g_module_current || '.CREATE_K_SYSTEM_TRF',
11412: 'okc_contract_pub.update_contract_line(Return status = '
11413: || l_return_status
11414: || ')'
11451: p_chrv_tbl => l_chrv_tbl_in,
11452: x_chrv_tbl => l_chrv_tbl_out
11453: );
11454:
11455: IF (fnd_log.level_event >=
11456: fnd_log.g_current_runtime_level
11457: )
11458: THEN
11459: fnd_log.STRING
11452: x_chrv_tbl => l_chrv_tbl_out
11453: );
11454:
11455: IF (fnd_log.level_event >=
11456: fnd_log.g_current_runtime_level
11457: )
11458: THEN
11459: fnd_log.STRING
11460: (fnd_log.level_event,
11455: IF (fnd_log.level_event >=
11456: fnd_log.g_current_runtime_level
11457: )
11458: THEN
11459: fnd_log.STRING
11460: (fnd_log.level_event,
11461: g_module_current
11462: || '.Update_Hdr_Dates.external_call.after',
11463: 'okc_contract_pub.update_contract_header(Return status = '
11456: fnd_log.g_current_runtime_level
11457: )
11458: THEN
11459: fnd_log.STRING
11460: (fnd_log.level_event,
11461: g_module_current
11462: || '.Update_Hdr_Dates.external_call.after',
11463: 'okc_contract_pub.update_contract_header(Return status = '
11464: || l_return_status
11510: p_comments => NULL,
11511: p_validate_status => 'N'
11512: );
11513:
11514: IF (fnd_log.level_event >=
11515: fnd_log.g_current_runtime_level
11516: )
11517: THEN
11518: fnd_log.STRING
11511: p_validate_status => 'N'
11512: );
11513:
11514: IF (fnd_log.level_event >=
11515: fnd_log.g_current_runtime_level
11516: )
11517: THEN
11518: fnd_log.STRING
11519: (fnd_log.level_event,
11514: IF (fnd_log.level_event >=
11515: fnd_log.g_current_runtime_level
11516: )
11517: THEN
11518: fnd_log.STRING
11519: (fnd_log.level_event,
11520: g_module_current || '.CREATE_K_SYSTEM_TRF',
11521: 'okc_contract_pub.update_contract_line(Return status ='
11522: || l_return_status
11515: fnd_log.g_current_runtime_level
11516: )
11517: THEN
11518: fnd_log.STRING
11519: (fnd_log.level_event,
11520: g_module_current || '.CREATE_K_SYSTEM_TRF',
11521: 'okc_contract_pub.update_contract_line(Return status ='
11522: || l_return_status
11523: || ')'
11563: p_comments => NULL,
11564: p_validate_status => 'N'
11565: );
11566:
11567: IF (fnd_log.level_event >=
11568: fnd_log.g_current_runtime_level
11569: )
11570: THEN
11571: fnd_log.STRING
11564: p_validate_status => 'N'
11565: );
11566:
11567: IF (fnd_log.level_event >=
11568: fnd_log.g_current_runtime_level
11569: )
11570: THEN
11571: fnd_log.STRING
11572: (fnd_log.level_event,
11567: IF (fnd_log.level_event >=
11568: fnd_log.g_current_runtime_level
11569: )
11570: THEN
11571: fnd_log.STRING
11572: (fnd_log.level_event,
11573: g_module_current || '.CREATE_K_SYSTEM_TRF',
11574: 'okc_contract_pub.update_contract_line(Return status = '
11575: || l_return_status
11568: fnd_log.g_current_runtime_level
11569: )
11570: THEN
11571: fnd_log.STRING
11572: (fnd_log.level_event,
11573: g_module_current || '.CREATE_K_SYSTEM_TRF',
11574: 'okc_contract_pub.update_contract_line(Return status = '
11575: || l_return_status
11576: || ')'
11612: (date_cancelled),
11613: p_validate_status => 'N'
11614: );
11615:
11616: IF (fnd_log.level_event >=
11617: fnd_log.g_current_runtime_level
11618: )
11619: THEN
11620: fnd_log.STRING
11613: p_validate_status => 'N'
11614: );
11615:
11616: IF (fnd_log.level_event >=
11617: fnd_log.g_current_runtime_level
11618: )
11619: THEN
11620: fnd_log.STRING
11621: (fnd_log.level_event,
11616: IF (fnd_log.level_event >=
11617: fnd_log.g_current_runtime_level
11618: )
11619: THEN
11620: fnd_log.STRING
11621: (fnd_log.level_event,
11622: g_module_current || '.CREATE_K_SYSTEM_TRF',
11623: 'oks_change_status_pvt.Update_header_status(Return status = '
11624: || l_return_status
11617: fnd_log.g_current_runtime_level
11618: )
11619: THEN
11620: fnd_log.STRING
11621: (fnd_log.level_event,
11622: g_module_current || '.CREATE_K_SYSTEM_TRF',
11623: 'oks_change_status_pvt.Update_header_status(Return status = '
11624: || l_return_status
11625: || ')'
11749: CLOSE l_cust_rel_csr;
11750: /*E1*/
11751: END IF;
11752:
11753: IF fnd_log.level_statement >=
11754: fnd_log.g_current_runtime_level
11755: THEN
11756: fnd_log.STRING
11757: (fnd_log.level_statement,
11750: /*E1*/
11751: END IF;
11752:
11753: IF fnd_log.level_statement >=
11754: fnd_log.g_current_runtime_level
11755: THEN
11756: fnd_log.STRING
11757: (fnd_log.level_statement,
11758: g_module_current || '.CREATE_K_SYSTEM_TRF',
11752:
11753: IF fnd_log.level_statement >=
11754: fnd_log.g_current_runtime_level
11755: THEN
11756: fnd_log.STRING
11757: (fnd_log.level_statement,
11758: g_module_current || '.CREATE_K_SYSTEM_TRF',
11759: 'TRANS_NO_REL profile relationship = '
11760: || l_relationship_type
11753: IF fnd_log.level_statement >=
11754: fnd_log.g_current_runtime_level
11755: THEN
11756: fnd_log.STRING
11757: (fnd_log.level_statement,
11758: g_module_current || '.CREATE_K_SYSTEM_TRF',
11759: 'TRANS_NO_REL profile relationship = '
11760: || l_relationship_type
11761: || ', Actual Relationship = '
11767: IF l_relationship IS NULL OR l_trf_option = 'TRANS'
11768: THEN
11769: -- If Contract is in Entered Status then no updates on the original Contract
11770: -- but Create a Contract for New Owner in Entered Status.
11771: IF fnd_log.level_statement >=
11772: fnd_log.g_current_runtime_level
11773: THEN
11774: fnd_log.STRING (fnd_log.level_statement,
11775: g_module_current
11768: THEN
11769: -- If Contract is in Entered Status then no updates on the original Contract
11770: -- but Create a Contract for New Owner in Entered Status.
11771: IF fnd_log.level_statement >=
11772: fnd_log.g_current_runtime_level
11773: THEN
11774: fnd_log.STRING (fnd_log.level_statement,
11775: g_module_current
11776: || '.CREATE_K_SYSTEM_TRF',
11770: -- but Create a Contract for New Owner in Entered Status.
11771: IF fnd_log.level_statement >=
11772: fnd_log.g_current_runtime_level
11773: THEN
11774: fnd_log.STRING (fnd_log.level_statement,
11775: g_module_current
11776: || '.CREATE_K_SYSTEM_TRF',
11777: 'Product Status code = '
11778: || p_kdtl_tbl (l_ctr).prod_sts_code
11785:
11786: /*4*/
11787: IF l_ste_code <> 'ENTERED'
11788: THEN
11789: IF fnd_log.level_statement >=
11790: fnd_log.g_current_runtime_level
11791: THEN
11792: fnd_log.STRING
11793: (fnd_log.level_statement,
11786: /*4*/
11787: IF l_ste_code <> 'ENTERED'
11788: THEN
11789: IF fnd_log.level_statement >=
11790: fnd_log.g_current_runtime_level
11791: THEN
11792: fnd_log.STRING
11793: (fnd_log.level_statement,
11794: g_module_current || '.CREATE_K_SYSTEM_TRF',
11788: THEN
11789: IF fnd_log.level_statement >=
11790: fnd_log.g_current_runtime_level
11791: THEN
11792: fnd_log.STRING
11793: (fnd_log.level_statement,
11794: g_module_current || '.CREATE_K_SYSTEM_TRF',
11795: 'OKS Raise credit memo profile option value ='
11796: || fnd_profile.VALUE
11789: IF fnd_log.level_statement >=
11790: fnd_log.g_current_runtime_level
11791: THEN
11792: fnd_log.STRING
11793: (fnd_log.level_statement,
11794: g_module_current || '.CREATE_K_SYSTEM_TRF',
11795: 'OKS Raise credit memo profile option value ='
11796: || fnd_profile.VALUE
11797: ('OKS_RAISE_CREDIT_MEMO_FOR_IB_INT')
11857: p_term_cancel_source => 'IBTRANSFER',
11858: x_return_status => l_return_status
11859: );
11860:
11861: IF (fnd_log.level_event >=
11862: fnd_log.g_current_runtime_level
11863: )
11864: THEN
11865: fnd_log.STRING
11858: x_return_status => l_return_status
11859: );
11860:
11861: IF (fnd_log.level_event >=
11862: fnd_log.g_current_runtime_level
11863: )
11864: THEN
11865: fnd_log.STRING
11866: (fnd_log.level_event,
11861: IF (fnd_log.level_event >=
11862: fnd_log.g_current_runtime_level
11863: )
11864: THEN
11865: fnd_log.STRING
11866: (fnd_log.level_event,
11867: g_module_current || '.CREATE_K_SYSTEM_TRF',
11868: 'oks_bill_rec_pub.Pre_terminate_cp(Return status ='
11869: || l_return_status
11862: fnd_log.g_current_runtime_level
11863: )
11864: THEN
11865: fnd_log.STRING
11866: (fnd_log.level_event,
11867: g_module_current || '.CREATE_K_SYSTEM_TRF',
11868: 'oks_bill_rec_pub.Pre_terminate_cp(Return status ='
11869: || l_return_status
11870: || ')'
11911: p_clev_tbl => l_clev_tbl_in,
11912: x_clev_tbl => l_clev_tbl_out
11913: );
11914:
11915: IF (fnd_log.level_event >=
11916: fnd_log.g_current_runtime_level
11917: )
11918: THEN
11919: fnd_log.STRING
11912: x_clev_tbl => l_clev_tbl_out
11913: );
11914:
11915: IF (fnd_log.level_event >=
11916: fnd_log.g_current_runtime_level
11917: )
11918: THEN
11919: fnd_log.STRING
11920: (fnd_log.level_event,
11915: IF (fnd_log.level_event >=
11916: fnd_log.g_current_runtime_level
11917: )
11918: THEN
11919: fnd_log.STRING
11920: (fnd_log.level_event,
11921: g_module_current || '.CREATE_K_SYSTEM_TRF',
11922: 'okc_contract_pub.update_contract_line(Return status = '
11923: || l_return_status
11916: fnd_log.g_current_runtime_level
11917: )
11918: THEN
11919: fnd_log.STRING
11920: (fnd_log.level_event,
11921: g_module_current || '.CREATE_K_SYSTEM_TRF',
11922: 'okc_contract_pub.update_contract_line(Return status = '
11923: || l_return_status
11924: || ')'
11961: p_chrv_tbl => l_chrv_tbl_in,
11962: x_chrv_tbl => l_chrv_tbl_out
11963: );
11964:
11965: IF (fnd_log.level_event >=
11966: fnd_log.g_current_runtime_level
11967: )
11968: THEN
11969: fnd_log.STRING
11962: x_chrv_tbl => l_chrv_tbl_out
11963: );
11964:
11965: IF (fnd_log.level_event >=
11966: fnd_log.g_current_runtime_level
11967: )
11968: THEN
11969: fnd_log.STRING
11970: (fnd_log.level_event,
11965: IF (fnd_log.level_event >=
11966: fnd_log.g_current_runtime_level
11967: )
11968: THEN
11969: fnd_log.STRING
11970: (fnd_log.level_event,
11971: g_module_current
11972: || '.Update_Hdr_Dates.external_call.after',
11973: 'okc_contract_pub.update_contract_header(Return status = '
11966: fnd_log.g_current_runtime_level
11967: )
11968: THEN
11969: fnd_log.STRING
11970: (fnd_log.level_event,
11971: g_module_current
11972: || '.Update_Hdr_Dates.external_call.after',
11973: 'okc_contract_pub.update_contract_header(Return status = '
11974: || l_return_status
12012: p_comments => NULL,
12013: p_validate_status => 'N'
12014: );
12015:
12016: IF (fnd_log.level_event >=
12017: fnd_log.g_current_runtime_level
12018: )
12019: THEN
12020: fnd_log.STRING
12013: p_validate_status => 'N'
12014: );
12015:
12016: IF (fnd_log.level_event >=
12017: fnd_log.g_current_runtime_level
12018: )
12019: THEN
12020: fnd_log.STRING
12021: (fnd_log.level_event,
12016: IF (fnd_log.level_event >=
12017: fnd_log.g_current_runtime_level
12018: )
12019: THEN
12020: fnd_log.STRING
12021: (fnd_log.level_event,
12022: g_module_current || '.CREATE_K_SYSTEM_TRF',
12023: 'oks_change_status_pvt.Update_line_status(Return status ='
12024: || l_return_status
12017: fnd_log.g_current_runtime_level
12018: )
12019: THEN
12020: fnd_log.STRING
12021: (fnd_log.level_event,
12022: g_module_current || '.CREATE_K_SYSTEM_TRF',
12023: 'oks_change_status_pvt.Update_line_status(Return status ='
12024: || l_return_status
12025: || ')'
12065: p_comments => NULL,
12066: p_validate_status => 'N'
12067: );
12068:
12069: IF (fnd_log.level_event >=
12070: fnd_log.g_current_runtime_level
12071: )
12072: THEN
12073: fnd_log.STRING
12066: p_validate_status => 'N'
12067: );
12068:
12069: IF (fnd_log.level_event >=
12070: fnd_log.g_current_runtime_level
12071: )
12072: THEN
12073: fnd_log.STRING
12074: (fnd_log.level_event,
12069: IF (fnd_log.level_event >=
12070: fnd_log.g_current_runtime_level
12071: )
12072: THEN
12073: fnd_log.STRING
12074: (fnd_log.level_event,
12075: g_module_current || '.CREATE_K_SYSTEM_TRF',
12076: 'okc_contract_pub.update_contract_line(Return status = '
12077: || l_return_status
12070: fnd_log.g_current_runtime_level
12071: )
12072: THEN
12073: fnd_log.STRING
12074: (fnd_log.level_event,
12075: g_module_current || '.CREATE_K_SYSTEM_TRF',
12076: 'okc_contract_pub.update_contract_line(Return status = '
12077: || l_return_status
12078: || ')'
12114: (date_cancelled),
12115: p_validate_status => 'N'
12116: );
12117:
12118: IF (fnd_log.level_event >=
12119: fnd_log.g_current_runtime_level
12120: )
12121: THEN
12122: fnd_log.STRING
12115: p_validate_status => 'N'
12116: );
12117:
12118: IF (fnd_log.level_event >=
12119: fnd_log.g_current_runtime_level
12120: )
12121: THEN
12122: fnd_log.STRING
12123: (fnd_log.level_event,
12118: IF (fnd_log.level_event >=
12119: fnd_log.g_current_runtime_level
12120: )
12121: THEN
12122: fnd_log.STRING
12123: (fnd_log.level_event,
12124: g_module_current || '.CREATE_K_SYSTEM_TRF',
12125: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status = '
12126: || l_return_status
12119: fnd_log.g_current_runtime_level
12120: )
12121: THEN
12122: fnd_log.STRING
12123: (fnd_log.level_event,
12124: g_module_current || '.CREATE_K_SYSTEM_TRF',
12125: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status = '
12126: || l_return_status
12127: || ')'
12223: is a part of System Transfer.
12224: If SYstem id is Not null then SYsytem transfer
12225: else Customer product Transfer.
12226: -----------------------------------------------------------*/
12227: IF fnd_log.level_statement >=
12228: fnd_log.g_current_runtime_level
12229: THEN
12230: fnd_log.STRING (fnd_log.level_statement,
12231: g_module_current
12224: If SYstem id is Not null then SYsytem transfer
12225: else Customer product Transfer.
12226: -----------------------------------------------------------*/
12227: IF fnd_log.level_statement >=
12228: fnd_log.g_current_runtime_level
12229: THEN
12230: fnd_log.STRING (fnd_log.level_statement,
12231: g_module_current
12232: || '.CREATE_K_SYSTEM_TRF.system_trf',
12226: -----------------------------------------------------------*/
12227: IF fnd_log.level_statement >=
12228: fnd_log.g_current_runtime_level
12229: THEN
12230: fnd_log.STRING (fnd_log.level_statement,
12231: g_module_current
12232: || '.CREATE_K_SYSTEM_TRF.system_trf',
12233: 'System Id = '
12234: || p_kdtl_tbl (l_ctr).system_id
12263: p_kdtl_tbl (l_ctr).old_account_id
12264: )
12265: /*5*/
12266: LOOP
12267: IF fnd_log.level_statement >=
12268: fnd_log.g_current_runtime_level
12269: THEN
12270: fnd_log.STRING
12271: (fnd_log.level_statement,
12264: )
12265: /*5*/
12266: LOOP
12267: IF fnd_log.level_statement >=
12268: fnd_log.g_current_runtime_level
12269: THEN
12270: fnd_log.STRING
12271: (fnd_log.level_statement,
12272: g_module_current
12266: LOOP
12267: IF fnd_log.level_statement >=
12268: fnd_log.g_current_runtime_level
12269: THEN
12270: fnd_log.STRING
12271: (fnd_log.level_statement,
12272: g_module_current
12273: || '.CREATE_K_SYSTEM_TRF.system_trf',
12274: 'In Contracts_rec Loop'
12267: IF fnd_log.level_statement >=
12268: fnd_log.g_current_runtime_level
12269: THEN
12270: fnd_log.STRING
12271: (fnd_log.level_statement,
12272: g_module_current
12273: || '.CREATE_K_SYSTEM_TRF.system_trf',
12274: 'In Contracts_rec Loop'
12275: );
12274: 'In Contracts_rec Loop'
12275: );
12276: END IF;
12277:
12278: IF fnd_log.level_statement >=
12279: fnd_log.g_current_runtime_level
12280: THEN
12281: fnd_log.STRING
12282: (fnd_log.level_statement,
12275: );
12276: END IF;
12277:
12278: IF fnd_log.level_statement >=
12279: fnd_log.g_current_runtime_level
12280: THEN
12281: fnd_log.STRING
12282: (fnd_log.level_statement,
12283: g_module_current
12277:
12278: IF fnd_log.level_statement >=
12279: fnd_log.g_current_runtime_level
12280: THEN
12281: fnd_log.STRING
12282: (fnd_log.level_statement,
12283: g_module_current
12284: || '.CREATE_K_SYSTEM_TRF.system_trf',
12285: 'Source chr_id = '
12278: IF fnd_log.level_statement >=
12279: fnd_log.g_current_runtime_level
12280: THEN
12281: fnd_log.STRING
12282: (fnd_log.level_statement,
12283: g_module_current
12284: || '.CREATE_K_SYSTEM_TRF.system_trf',
12285: 'Source chr_id = '
12286: || p_kdtl_tbl (l_ctr).hdr_id
12286: || p_kdtl_tbl (l_ctr).hdr_id
12287: );
12288: END IF;
12289:
12290: IF fnd_log.level_statement >=
12291: fnd_log.g_current_runtime_level
12292: THEN
12293: fnd_log.STRING
12294: (fnd_log.level_statement,
12287: );
12288: END IF;
12289:
12290: IF fnd_log.level_statement >=
12291: fnd_log.g_current_runtime_level
12292: THEN
12293: fnd_log.STRING
12294: (fnd_log.level_statement,
12295: g_module_current
12289:
12290: IF fnd_log.level_statement >=
12291: fnd_log.g_current_runtime_level
12292: THEN
12293: fnd_log.STRING
12294: (fnd_log.level_statement,
12295: g_module_current
12296: || '.CREATE_K_SYSTEM_TRF.system_trf',
12297: 'Target chr Id = '
12290: IF fnd_log.level_statement >=
12291: fnd_log.g_current_runtime_level
12292: THEN
12293: fnd_log.STRING
12294: (fnd_log.level_statement,
12295: g_module_current
12296: || '.CREATE_K_SYSTEM_TRF.system_trf',
12297: 'Target chr Id = '
12298: || l_contracts_rec.new_contract_id
12316: x_msg_data => x_msg_data,
12317: x_return_status => l_return_status
12318: );
12319:
12320: IF (fnd_log.level_event >=
12321: fnd_log.g_current_runtime_level
12322: )
12323: THEN
12324: fnd_log.STRING
12317: x_return_status => l_return_status
12318: );
12319:
12320: IF (fnd_log.level_event >=
12321: fnd_log.g_current_runtime_level
12322: )
12323: THEN
12324: fnd_log.STRING
12325: (fnd_log.level_event,
12320: IF (fnd_log.level_event >=
12321: fnd_log.g_current_runtime_level
12322: )
12323: THEN
12324: fnd_log.STRING
12325: (fnd_log.level_event,
12326: g_module_current
12327: || '.CREATE_K_SYSTEM_TRF',
12328: 'header_merge_yn(Return status ='
12321: fnd_log.g_current_runtime_level
12322: )
12323: THEN
12324: fnd_log.STRING
12325: (fnd_log.level_event,
12326: g_module_current
12327: || '.CREATE_K_SYSTEM_TRF',
12328: 'header_merge_yn(Return status ='
12329: || l_return_status
12348: )
12349: LOOP
12350: l_line_found := 'T';
12351:
12352: IF fnd_log.level_statement >=
12353: fnd_log.g_current_runtime_level
12354: THEN
12355: fnd_log.STRING
12356: (fnd_log.level_statement,
12349: LOOP
12350: l_line_found := 'T';
12351:
12352: IF fnd_log.level_statement >=
12353: fnd_log.g_current_runtime_level
12354: THEN
12355: fnd_log.STRING
12356: (fnd_log.level_statement,
12357: g_module_current
12351:
12352: IF fnd_log.level_statement >=
12353: fnd_log.g_current_runtime_level
12354: THEN
12355: fnd_log.STRING
12356: (fnd_log.level_statement,
12357: g_module_current
12358: || '.CREATE_K_SYSTEM_TRF.system_trf',
12359: 'Source line_id = '
12352: IF fnd_log.level_statement >=
12353: fnd_log.g_current_runtime_level
12354: THEN
12355: fnd_log.STRING
12356: (fnd_log.level_statement,
12357: g_module_current
12358: || '.CREATE_K_SYSTEM_TRF.system_trf',
12359: 'Source line_id = '
12360: || p_kdtl_tbl (l_ctr).service_line_id
12360: || p_kdtl_tbl (l_ctr).service_line_id
12361: );
12362: END IF;
12363:
12364: IF fnd_log.level_statement >=
12365: fnd_log.g_current_runtime_level
12366: THEN
12367: fnd_log.STRING
12368: (fnd_log.level_statement,
12361: );
12362: END IF;
12363:
12364: IF fnd_log.level_statement >=
12365: fnd_log.g_current_runtime_level
12366: THEN
12367: fnd_log.STRING
12368: (fnd_log.level_statement,
12369: g_module_current
12363:
12364: IF fnd_log.level_statement >=
12365: fnd_log.g_current_runtime_level
12366: THEN
12367: fnd_log.STRING
12368: (fnd_log.level_statement,
12369: g_module_current
12370: || '.CREATE_K_SYSTEM_TRF.system_trf',
12371: 'Target line_id = '
12364: IF fnd_log.level_statement >=
12365: fnd_log.g_current_runtime_level
12366: THEN
12367: fnd_log.STRING
12368: (fnd_log.level_statement,
12369: g_module_current
12370: || '.CREATE_K_SYSTEM_TRF.system_trf',
12371: 'Target line_id = '
12372: || l_topline_rec.cle_id
12383: x_msg_data => x_msg_data,
12384: x_return_status => l_return_status
12385: );
12386:
12387: IF (fnd_log.level_event >=
12388: fnd_log.g_current_runtime_level
12389: )
12390: THEN
12391: fnd_log.STRING
12384: x_return_status => l_return_status
12385: );
12386:
12387: IF (fnd_log.level_event >=
12388: fnd_log.g_current_runtime_level
12389: )
12390: THEN
12391: fnd_log.STRING
12392: (fnd_log.level_event,
12387: IF (fnd_log.level_event >=
12388: fnd_log.g_current_runtime_level
12389: )
12390: THEN
12391: fnd_log.STRING
12392: (fnd_log.level_event,
12393: g_module_current
12394: || '.CREATE_K_SYSTEM_TRF',
12395: 'line_merge_yn(Return status ='
12388: fnd_log.g_current_runtime_level
12389: )
12390: THEN
12391: fnd_log.STRING
12392: (fnd_log.level_event,
12393: g_module_current
12394: || '.CREATE_K_SYSTEM_TRF',
12395: 'line_merge_yn(Return status ='
12396: || l_return_status
12417: x_msg_data => x_msg_data,
12418: x_msg_count => x_msg_count
12419: );
12420:
12421: IF (fnd_log.level_event >=
12422: fnd_log.g_current_runtime_level
12423: )
12424: THEN
12425: fnd_log.STRING
12418: x_msg_count => x_msg_count
12419: );
12420:
12421: IF (fnd_log.level_event >=
12422: fnd_log.g_current_runtime_level
12423: )
12424: THEN
12425: fnd_log.STRING
12426: (fnd_log.level_event,
12421: IF (fnd_log.level_event >=
12422: fnd_log.g_current_runtime_level
12423: )
12424: THEN
12425: fnd_log.STRING
12426: (fnd_log.level_event,
12427: g_module_current
12428: || '.CREATE_K_SYSTEM_TRF',
12429: 'Create_contract_subline(Return status ='
12422: fnd_log.g_current_runtime_level
12423: )
12424: THEN
12425: fnd_log.STRING
12426: (fnd_log.level_event,
12427: g_module_current
12428: || '.CREATE_K_SYSTEM_TRF',
12429: 'Create_contract_subline(Return status ='
12430: || l_return_status
12459: x_msg_count => x_msg_count,
12460: x_msg_data => x_msg_data
12461: );
12462:
12463: IF (fnd_log.level_event >=
12464: fnd_log.g_current_runtime_level
12465: )
12466: THEN
12467: fnd_log.STRING
12460: x_msg_data => x_msg_data
12461: );
12462:
12463: IF (fnd_log.level_event >=
12464: fnd_log.g_current_runtime_level
12465: )
12466: THEN
12467: fnd_log.STRING
12468: (fnd_log.level_event,
12463: IF (fnd_log.level_event >=
12464: fnd_log.g_current_runtime_level
12465: )
12466: THEN
12467: fnd_log.STRING
12468: (fnd_log.level_event,
12469: g_module_current
12470: || '.CREATE_K_SYSTEM_TRF',
12471: 'Create_transaction_source(Return status ='
12464: fnd_log.g_current_runtime_level
12465: )
12466: THEN
12467: fnd_log.STRING
12468: (fnd_log.level_event,
12469: g_module_current
12470: || '.CREATE_K_SYSTEM_TRF',
12471: 'Create_transaction_source(Return status ='
12472: || l_return_status
12508: x_msg_count => x_msg_count,
12509: x_msg_data => x_msg_data
12510: );
12511:
12512: IF (fnd_log.level_event >=
12513: fnd_log.g_current_runtime_level
12514: )
12515: THEN
12516: fnd_log.STRING
12509: x_msg_data => x_msg_data
12510: );
12511:
12512: IF (fnd_log.level_event >=
12513: fnd_log.g_current_runtime_level
12514: )
12515: THEN
12516: fnd_log.STRING
12517: (fnd_log.level_event,
12512: IF (fnd_log.level_event >=
12513: fnd_log.g_current_runtime_level
12514: )
12515: THEN
12516: fnd_log.STRING
12517: (fnd_log.level_event,
12518: g_module_current
12519: || '.CREATE_K_SYSTEM_TRF',
12520: 'Create_source_links(Return status ='
12513: fnd_log.g_current_runtime_level
12514: )
12515: THEN
12516: fnd_log.STRING
12517: (fnd_log.level_event,
12518: g_module_current
12519: || '.CREATE_K_SYSTEM_TRF',
12520: 'Create_source_links(Return status ='
12521: || l_return_status
12534: INTO l_start_date, l_end_date;
12535:
12536: CLOSE l_hdrdt_csr;
12537:
12538: IF fnd_log.level_statement >=
12539: fnd_log.g_current_runtime_level
12540: THEN
12541: fnd_log.STRING
12542: (fnd_log.level_statement,
12535:
12536: CLOSE l_hdrdt_csr;
12537:
12538: IF fnd_log.level_statement >=
12539: fnd_log.g_current_runtime_level
12540: THEN
12541: fnd_log.STRING
12542: (fnd_log.level_statement,
12543: g_module_current
12537:
12538: IF fnd_log.level_statement >=
12539: fnd_log.g_current_runtime_level
12540: THEN
12541: fnd_log.STRING
12542: (fnd_log.level_statement,
12543: g_module_current
12544: || '.CREATE_K_SYSTEM_TRF',
12545: 'Header start date = '
12538: IF fnd_log.level_statement >=
12539: fnd_log.g_current_runtime_level
12540: THEN
12541: fnd_log.STRING
12542: (fnd_log.level_statement,
12543: g_module_current
12544: || '.CREATE_K_SYSTEM_TRF',
12545: 'Header start date = '
12546: || l_start_date
12555: INTO l_srv_sdt, l_srv_edt;
12556:
12557: CLOSE l_srvdt_csr;
12558:
12559: IF fnd_log.level_statement >=
12560: fnd_log.g_current_runtime_level
12561: THEN
12562: fnd_log.STRING
12563: (fnd_log.level_statement,
12556:
12557: CLOSE l_srvdt_csr;
12558:
12559: IF fnd_log.level_statement >=
12560: fnd_log.g_current_runtime_level
12561: THEN
12562: fnd_log.STRING
12563: (fnd_log.level_statement,
12564: g_module_current
12558:
12559: IF fnd_log.level_statement >=
12560: fnd_log.g_current_runtime_level
12561: THEN
12562: fnd_log.STRING
12563: (fnd_log.level_statement,
12564: g_module_current
12565: || '.CREATE_K_SYSTEM_TRF',
12566: 'Line start date = '
12559: IF fnd_log.level_statement >=
12560: fnd_log.g_current_runtime_level
12561: THEN
12562: fnd_log.STRING
12563: (fnd_log.level_statement,
12564: g_module_current
12565: || '.CREATE_K_SYSTEM_TRF',
12566: 'Line start date = '
12567: || l_srv_sdt
12614: x_msg_data => x_msg_data,
12615: x_msg_count => x_msg_count
12616: );
12617:
12618: IF (fnd_log.level_event >=
12619: fnd_log.g_current_runtime_level
12620: )
12621: THEN
12622: fnd_log.STRING
12615: x_msg_count => x_msg_count
12616: );
12617:
12618: IF (fnd_log.level_event >=
12619: fnd_log.g_current_runtime_level
12620: )
12621: THEN
12622: fnd_log.STRING
12623: (fnd_log.level_event,
12618: IF (fnd_log.level_event >=
12619: fnd_log.g_current_runtime_level
12620: )
12621: THEN
12622: fnd_log.STRING
12623: (fnd_log.level_event,
12624: g_module_current
12625: || '.CREATE_K_SYSTEM_TRF',
12626: 'Create_billing_schedule(Return status ='
12619: fnd_log.g_current_runtime_level
12620: )
12621: THEN
12622: fnd_log.STRING
12623: (fnd_log.level_event,
12624: g_module_current
12625: || '.CREATE_K_SYSTEM_TRF',
12626: 'Create_billing_schedule(Return status ='
12627: || l_return_status
12711: p_chr_id => l_merge_chr_id,
12712: x_msg_tbl => l_msg_tbl
12713: );
12714:
12715: IF (fnd_log.level_event >=
12716: fnd_log.g_current_runtime_level
12717: )
12718: THEN
12719: fnd_log.STRING
12712: x_msg_tbl => l_msg_tbl
12713: );
12714:
12715: IF (fnd_log.level_event >=
12716: fnd_log.g_current_runtime_level
12717: )
12718: THEN
12719: fnd_log.STRING
12720: (fnd_log.level_event,
12715: IF (fnd_log.level_event >=
12716: fnd_log.g_current_runtime_level
12717: )
12718: THEN
12719: fnd_log.STRING
12720: (fnd_log.level_event,
12721: g_module_current
12722: || '.CREATE_K_SYSTEM_TRF',
12723: 'okc_qa_check_pub.execute_qa_check_list(Return status ='
12716: fnd_log.g_current_runtime_level
12717: )
12718: THEN
12719: fnd_log.STRING
12720: (fnd_log.level_event,
12721: g_module_current
12722: || '.CREATE_K_SYSTEM_TRF',
12723: 'okc_qa_check_pub.execute_qa_check_list(Return status ='
12724: || x_return_status
12750: i := l_msg_tbl.NEXT (i);
12751: END LOOP;
12752: END IF; --table count
12753:
12754: IF fnd_log.level_error >=
12755: fnd_log.g_current_runtime_level
12756: THEN
12757: fnd_log.STRING
12758: (fnd_log.level_error,
12751: END LOOP;
12752: END IF; --table count
12753:
12754: IF fnd_log.level_error >=
12755: fnd_log.g_current_runtime_level
12756: THEN
12757: fnd_log.STRING
12758: (fnd_log.level_error,
12759: g_module_current
12753:
12754: IF fnd_log.level_error >=
12755: fnd_log.g_current_runtime_level
12756: THEN
12757: fnd_log.STRING
12758: (fnd_log.level_error,
12759: g_module_current
12760: || '.CREATE_K_SYSTEM_TRF',
12761: 'qa Check list error'
12754: IF fnd_log.level_error >=
12755: fnd_log.g_current_runtime_level
12756: THEN
12757: fnd_log.STRING
12758: (fnd_log.level_error,
12759: g_module_current
12760: || '.CREATE_K_SYSTEM_TRF',
12761: 'qa Check list error'
12762: || l_msg_tbl (i).error_status
12859: x_line_id => l_line_id,
12860: x_msg_count => x_msg_count
12861: );
12862:
12863: IF (fnd_log.level_event >=
12864: fnd_log.g_current_runtime_level
12865: )
12866: THEN
12867: fnd_log.STRING
12860: x_msg_count => x_msg_count
12861: );
12862:
12863: IF (fnd_log.level_event >=
12864: fnd_log.g_current_runtime_level
12865: )
12866: THEN
12867: fnd_log.STRING
12868: (fnd_log.level_event,
12863: IF (fnd_log.level_event >=
12864: fnd_log.g_current_runtime_level
12865: )
12866: THEN
12867: fnd_log.STRING
12868: (fnd_log.level_event,
12869: g_module_current
12870: || '.CREATE_K_SYSTEM_TRF',
12871: 'Create_Contract_line(Return status = '
12864: fnd_log.g_current_runtime_level
12865: )
12866: THEN
12867: fnd_log.STRING
12868: (fnd_log.level_event,
12869: g_module_current
12870: || '.CREATE_K_SYSTEM_TRF',
12871: 'Create_Contract_line(Return status = '
12872: || l_return_status
12895: p_target_contract_line_id => l_line_id,
12896: x_actual_coverage_id => l_coverage_id
12897: );
12898:
12899: IF (fnd_log.level_event >=
12900: fnd_log.g_current_runtime_level
12901: )
12902: THEN
12903: fnd_log.STRING
12896: x_actual_coverage_id => l_coverage_id
12897: );
12898:
12899: IF (fnd_log.level_event >=
12900: fnd_log.g_current_runtime_level
12901: )
12902: THEN
12903: fnd_log.STRING
12904: (fnd_log.level_event,
12899: IF (fnd_log.level_event >=
12900: fnd_log.g_current_runtime_level
12901: )
12902: THEN
12903: fnd_log.STRING
12904: (fnd_log.level_event,
12905: g_module_current
12906: || '.CREATE_K_SYSTEM_TRF',
12907: 'Oks_coverages_pub.create_adjusted_coverage(Return status = '
12900: fnd_log.g_current_runtime_level
12901: )
12902: THEN
12903: fnd_log.STRING
12904: (fnd_log.level_event,
12905: g_module_current
12906: || '.CREATE_K_SYSTEM_TRF',
12907: 'Oks_coverages_pub.create_adjusted_coverage(Return status = '
12908: || l_return_status
12933: x_msg_count => x_msg_count,
12934: x_msg_data => x_msg_data
12935: );
12936:
12937: IF (fnd_log.level_event >=
12938: fnd_log.g_current_runtime_level
12939: )
12940: THEN
12941: fnd_log.STRING
12934: x_msg_data => x_msg_data
12935: );
12936:
12937: IF (fnd_log.level_event >=
12938: fnd_log.g_current_runtime_level
12939: )
12940: THEN
12941: fnd_log.STRING
12942: (fnd_log.level_event,
12937: IF (fnd_log.level_event >=
12938: fnd_log.g_current_runtime_level
12939: )
12940: THEN
12941: fnd_log.STRING
12942: (fnd_log.level_event,
12943: g_module_current
12944: || '..after_coverage_ext',
12945: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
12938: fnd_log.g_current_runtime_level
12939: )
12940: THEN
12941: fnd_log.STRING
12942: (fnd_log.level_event,
12943: g_module_current
12944: || '..after_coverage_ext',
12945: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
12946: || l_return_status
12971: x_msg_data => x_msg_data,
12972: x_msg_count => x_msg_count
12973: );
12974:
12975: IF (fnd_log.level_event >=
12976: fnd_log.g_current_runtime_level
12977: )
12978: THEN
12979: fnd_log.STRING
12972: x_msg_count => x_msg_count
12973: );
12974:
12975: IF (fnd_log.level_event >=
12976: fnd_log.g_current_runtime_level
12977: )
12978: THEN
12979: fnd_log.STRING
12980: (fnd_log.level_event,
12975: IF (fnd_log.level_event >=
12976: fnd_log.g_current_runtime_level
12977: )
12978: THEN
12979: fnd_log.STRING
12980: (fnd_log.level_event,
12981: g_module_current
12982: || '.CREATE_K_SYSTEM_TRF',
12983: 'Create_contract_subline(Return status = '
12976: fnd_log.g_current_runtime_level
12977: )
12978: THEN
12979: fnd_log.STRING
12980: (fnd_log.level_event,
12981: g_module_current
12982: || '.CREATE_K_SYSTEM_TRF',
12983: 'Create_contract_subline(Return status = '
12984: || l_return_status
13010: x_msg_count => x_msg_count,
13011: x_msg_data => x_msg_data
13012: );
13013:
13014: IF (fnd_log.level_event >=
13015: fnd_log.g_current_runtime_level
13016: )
13017: THEN
13018: fnd_log.STRING
13011: x_msg_data => x_msg_data
13012: );
13013:
13014: IF (fnd_log.level_event >=
13015: fnd_log.g_current_runtime_level
13016: )
13017: THEN
13018: fnd_log.STRING
13019: (fnd_log.level_event,
13014: IF (fnd_log.level_event >=
13015: fnd_log.g_current_runtime_level
13016: )
13017: THEN
13018: fnd_log.STRING
13019: (fnd_log.level_event,
13020: g_module_current
13021: || '.CREATE_K_SYSTEM_TRF',
13022: 'Create_transaction_source(Return status ='
13015: fnd_log.g_current_runtime_level
13016: )
13017: THEN
13018: fnd_log.STRING
13019: (fnd_log.level_event,
13020: g_module_current
13021: || '.CREATE_K_SYSTEM_TRF',
13022: 'Create_transaction_source(Return status ='
13023: || l_return_status
13056: x_msg_count => x_msg_count,
13057: x_msg_data => x_msg_data
13058: );
13059:
13060: IF (fnd_log.level_event >=
13061: fnd_log.g_current_runtime_level
13062: )
13063: THEN
13064: fnd_log.STRING
13057: x_msg_data => x_msg_data
13058: );
13059:
13060: IF (fnd_log.level_event >=
13061: fnd_log.g_current_runtime_level
13062: )
13063: THEN
13064: fnd_log.STRING
13065: (fnd_log.level_event,
13060: IF (fnd_log.level_event >=
13061: fnd_log.g_current_runtime_level
13062: )
13063: THEN
13064: fnd_log.STRING
13065: (fnd_log.level_event,
13066: g_module_current
13067: || '.CREATE_K_SYSTEM_TRF',
13068: 'Create_source_links(Return status ='
13061: fnd_log.g_current_runtime_level
13062: )
13063: THEN
13064: fnd_log.STRING
13065: (fnd_log.level_event,
13066: g_module_current
13067: || '.CREATE_K_SYSTEM_TRF',
13068: 'Create_source_links(Return status ='
13069: || l_return_status
13082: INTO l_start_date, l_end_date;
13083:
13084: CLOSE l_hdrdt_csr;
13085:
13086: IF fnd_log.level_statement >=
13087: fnd_log.g_current_runtime_level
13088: THEN
13089: fnd_log.STRING
13090: (fnd_log.level_statement,
13083:
13084: CLOSE l_hdrdt_csr;
13085:
13086: IF fnd_log.level_statement >=
13087: fnd_log.g_current_runtime_level
13088: THEN
13089: fnd_log.STRING
13090: (fnd_log.level_statement,
13091: g_module_current
13085:
13086: IF fnd_log.level_statement >=
13087: fnd_log.g_current_runtime_level
13088: THEN
13089: fnd_log.STRING
13090: (fnd_log.level_statement,
13091: g_module_current
13092: || '.CREATE_K_SYSTEM_TRF',
13093: 'Header start date = '
13086: IF fnd_log.level_statement >=
13087: fnd_log.g_current_runtime_level
13088: THEN
13089: fnd_log.STRING
13090: (fnd_log.level_statement,
13091: g_module_current
13092: || '.CREATE_K_SYSTEM_TRF',
13093: 'Header start date = '
13094: || l_start_date
13103: INTO l_srv_sdt, l_srv_edt;
13104:
13105: CLOSE l_srvdt_csr;
13106:
13107: IF fnd_log.level_statement >=
13108: fnd_log.g_current_runtime_level
13109: THEN
13110: fnd_log.STRING
13111: (fnd_log.level_statement,
13104:
13105: CLOSE l_srvdt_csr;
13106:
13107: IF fnd_log.level_statement >=
13108: fnd_log.g_current_runtime_level
13109: THEN
13110: fnd_log.STRING
13111: (fnd_log.level_statement,
13112: g_module_current
13106:
13107: IF fnd_log.level_statement >=
13108: fnd_log.g_current_runtime_level
13109: THEN
13110: fnd_log.STRING
13111: (fnd_log.level_statement,
13112: g_module_current
13113: || '.CREATE_K_SYSTEM_TRF',
13114: 'Line start date = '
13107: IF fnd_log.level_statement >=
13108: fnd_log.g_current_runtime_level
13109: THEN
13110: fnd_log.STRING
13111: (fnd_log.level_statement,
13112: g_module_current
13113: || '.CREATE_K_SYSTEM_TRF',
13114: 'Line start date = '
13115: || l_srv_sdt
13162: x_msg_data => x_msg_data,
13163: x_msg_count => x_msg_count
13164: );
13165:
13166: IF (fnd_log.level_event >=
13167: fnd_log.g_current_runtime_level
13168: )
13169: THEN
13170: fnd_log.STRING
13163: x_msg_count => x_msg_count
13164: );
13165:
13166: IF (fnd_log.level_event >=
13167: fnd_log.g_current_runtime_level
13168: )
13169: THEN
13170: fnd_log.STRING
13171: (fnd_log.level_event,
13166: IF (fnd_log.level_event >=
13167: fnd_log.g_current_runtime_level
13168: )
13169: THEN
13170: fnd_log.STRING
13171: (fnd_log.level_event,
13172: g_module_current
13173: || '.CREATE_K_SYSTEM_TRF',
13174: 'Create_billing_schedule(Return status = '
13167: fnd_log.g_current_runtime_level
13168: )
13169: THEN
13170: fnd_log.STRING
13171: (fnd_log.level_event,
13172: g_module_current
13173: || '.CREATE_K_SYSTEM_TRF',
13174: 'Create_billing_schedule(Return status = '
13175: || l_return_status
13257: p_chr_id => l_merge_chr_id,
13258: x_msg_tbl => l_msg_tbl
13259: );
13260:
13261: IF (fnd_log.level_event >=
13262: fnd_log.g_current_runtime_level
13263: )
13264: THEN
13265: fnd_log.STRING
13258: x_msg_tbl => l_msg_tbl
13259: );
13260:
13261: IF (fnd_log.level_event >=
13262: fnd_log.g_current_runtime_level
13263: )
13264: THEN
13265: fnd_log.STRING
13266: (fnd_log.level_event,
13261: IF (fnd_log.level_event >=
13262: fnd_log.g_current_runtime_level
13263: )
13264: THEN
13265: fnd_log.STRING
13266: (fnd_log.level_event,
13267: g_module_current
13268: || '.CREATE_K_SYSTEM_TRF',
13269: 'okc_qa_check_pub.execute_qa_check_list(Return status = '
13262: fnd_log.g_current_runtime_level
13263: )
13264: THEN
13265: fnd_log.STRING
13266: (fnd_log.level_event,
13267: g_module_current
13268: || '.CREATE_K_SYSTEM_TRF',
13269: 'okc_qa_check_pub.execute_qa_check_list(Return status = '
13270: || x_return_status
13295: i := l_msg_tbl.NEXT (i);
13296: END LOOP;
13297: END IF; --table count
13298:
13299: IF fnd_log.level_error >=
13300: fnd_log.g_current_runtime_level
13301: THEN
13302: fnd_log.STRING
13303: (fnd_log.level_error,
13296: END LOOP;
13297: END IF; --table count
13298:
13299: IF fnd_log.level_error >=
13300: fnd_log.g_current_runtime_level
13301: THEN
13302: fnd_log.STRING
13303: (fnd_log.level_error,
13304: g_module_current
13298:
13299: IF fnd_log.level_error >=
13300: fnd_log.g_current_runtime_level
13301: THEN
13302: fnd_log.STRING
13303: (fnd_log.level_error,
13304: g_module_current
13305: || '.CREATE_K_SYSTEM_TRF',
13306: 'qa Check list error'
13299: IF fnd_log.level_error >=
13300: fnd_log.g_current_runtime_level
13301: THEN
13302: fnd_log.STRING
13303: (fnd_log.level_error,
13304: g_module_current
13305: || '.CREATE_K_SYSTEM_TRF',
13306: 'qa Check list error'
13307: || l_msg_tbl (i).error_status
13394: -- Create New Contract
13395: /*8*/
13396: IF l_contract_exist = 'F' OR l_contract_merge = 'F'
13397: THEN
13398: IF fnd_log.level_statement >=
13399: fnd_log.g_current_runtime_level
13400: THEN
13401: fnd_log.STRING
13402: (fnd_log.level_statement,
13395: /*8*/
13396: IF l_contract_exist = 'F' OR l_contract_merge = 'F'
13397: THEN
13398: IF fnd_log.level_statement >=
13399: fnd_log.g_current_runtime_level
13400: THEN
13401: fnd_log.STRING
13402: (fnd_log.level_statement,
13403: g_module_current || '.CREATE_K_SYSTEM_TRF',
13397: THEN
13398: IF fnd_log.level_statement >=
13399: fnd_log.g_current_runtime_level
13400: THEN
13401: fnd_log.STRING
13402: (fnd_log.level_statement,
13403: g_module_current || '.CREATE_K_SYSTEM_TRF',
13404: 'Header merge failed, Create a new contract.'
13405: );
13398: IF fnd_log.level_statement >=
13399: fnd_log.g_current_runtime_level
13400: THEN
13401: fnd_log.STRING
13402: (fnd_log.level_statement,
13403: g_module_current || '.CREATE_K_SYSTEM_TRF',
13404: 'Header merge failed, Create a new contract.'
13405: );
13406: END IF;
13414: x_msg_count => x_msg_count,
13415: x_return_status => l_return_status
13416: );
13417:
13418: IF (fnd_log.level_event >=
13419: fnd_log.g_current_runtime_level
13420: )
13421: THEN
13422: fnd_log.STRING
13415: x_return_status => l_return_status
13416: );
13417:
13418: IF (fnd_log.level_event >=
13419: fnd_log.g_current_runtime_level
13420: )
13421: THEN
13422: fnd_log.STRING
13423: (fnd_log.level_event,
13418: IF (fnd_log.level_event >=
13419: fnd_log.g_current_runtime_level
13420: )
13421: THEN
13422: fnd_log.STRING
13423: (fnd_log.level_event,
13424: g_module_current || '.CREATE_K_SYSTEM_TRF',
13425: 'Create_Contract_header(Return status = '
13426: || l_return_status
13419: fnd_log.g_current_runtime_level
13420: )
13421: THEN
13422: fnd_log.STRING
13423: (fnd_log.level_event,
13424: g_module_current || '.CREATE_K_SYSTEM_TRF',
13425: 'Create_Contract_header(Return status = '
13426: || l_return_status
13427: || ')'
13466: x_line_id => l_line_id,
13467: x_msg_count => x_msg_count
13468: );
13469:
13470: IF (fnd_log.level_event >=
13471: fnd_log.g_current_runtime_level
13472: )
13473: THEN
13474: fnd_log.STRING
13467: x_msg_count => x_msg_count
13468: );
13469:
13470: IF (fnd_log.level_event >=
13471: fnd_log.g_current_runtime_level
13472: )
13473: THEN
13474: fnd_log.STRING
13475: (fnd_log.level_event,
13470: IF (fnd_log.level_event >=
13471: fnd_log.g_current_runtime_level
13472: )
13473: THEN
13474: fnd_log.STRING
13475: (fnd_log.level_event,
13476: g_module_current || '.CREATE_K_SYSTEM_TRF',
13477: 'Create_Contract_line(Return status = '
13478: || l_return_status
13471: fnd_log.g_current_runtime_level
13472: )
13473: THEN
13474: fnd_log.STRING
13475: (fnd_log.level_event,
13476: g_module_current || '.CREATE_K_SYSTEM_TRF',
13477: 'Create_Contract_line(Return status = '
13478: || l_return_status
13479: || ')'
13499: p_target_contract_line_id => l_line_id,
13500: x_actual_coverage_id => l_coverage_id
13501: );
13502:
13503: IF (fnd_log.level_event >=
13504: fnd_log.g_current_runtime_level
13505: )
13506: THEN
13507: fnd_log.STRING
13500: x_actual_coverage_id => l_coverage_id
13501: );
13502:
13503: IF (fnd_log.level_event >=
13504: fnd_log.g_current_runtime_level
13505: )
13506: THEN
13507: fnd_log.STRING
13508: (fnd_log.level_event,
13503: IF (fnd_log.level_event >=
13504: fnd_log.g_current_runtime_level
13505: )
13506: THEN
13507: fnd_log.STRING
13508: (fnd_log.level_event,
13509: g_module_current
13510: || '.CREATE_K_SYSTEM_TRF',
13511: 'oks_coverages_pub.create_adjusted_coverage(Return status = '
13504: fnd_log.g_current_runtime_level
13505: )
13506: THEN
13507: fnd_log.STRING
13508: (fnd_log.level_event,
13509: g_module_current
13510: || '.CREATE_K_SYSTEM_TRF',
13511: 'oks_coverages_pub.create_adjusted_coverage(Return status = '
13512: || l_return_status
13536: x_msg_count => x_msg_count,
13537: x_msg_data => x_msg_data
13538: );
13539:
13540: IF (fnd_log.level_event >=
13541: fnd_log.g_current_runtime_level
13542: )
13543: THEN
13544: fnd_log.STRING
13537: x_msg_data => x_msg_data
13538: );
13539:
13540: IF (fnd_log.level_event >=
13541: fnd_log.g_current_runtime_level
13542: )
13543: THEN
13544: fnd_log.STRING
13545: (fnd_log.level_event,
13540: IF (fnd_log.level_event >=
13541: fnd_log.g_current_runtime_level
13542: )
13543: THEN
13544: fnd_log.STRING
13545: (fnd_log.level_event,
13546: g_module_current
13547: || '..after_coverage_ext',
13548: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
13541: fnd_log.g_current_runtime_level
13542: )
13543: THEN
13544: fnd_log.STRING
13545: (fnd_log.level_event,
13546: g_module_current
13547: || '..after_coverage_ext',
13548: 'OKS_COVERAGES_PVT.Create_K_coverage_ext(Return status = '
13549: || l_return_status
13574: x_msg_data => x_msg_data,
13575: x_msg_count => x_msg_count
13576: );
13577:
13578: IF (fnd_log.level_event >=
13579: fnd_log.g_current_runtime_level
13580: )
13581: THEN
13582: fnd_log.STRING
13575: x_msg_count => x_msg_count
13576: );
13577:
13578: IF (fnd_log.level_event >=
13579: fnd_log.g_current_runtime_level
13580: )
13581: THEN
13582: fnd_log.STRING
13583: (fnd_log.level_event,
13578: IF (fnd_log.level_event >=
13579: fnd_log.g_current_runtime_level
13580: )
13581: THEN
13582: fnd_log.STRING
13583: (fnd_log.level_event,
13584: g_module_current || '.CREATE_K_SYSTEM_TRF',
13585: 'create_contract_subline(Return status = '
13586: || l_return_status
13579: fnd_log.g_current_runtime_level
13580: )
13581: THEN
13582: fnd_log.STRING
13583: (fnd_log.level_event,
13584: g_module_current || '.CREATE_K_SYSTEM_TRF',
13585: 'create_contract_subline(Return status = '
13586: || l_return_status
13587: || ')'
13605: x_msg_count => x_msg_count,
13606: x_msg_data => x_msg_data
13607: );
13608:
13609: IF (fnd_log.level_event >=
13610: fnd_log.g_current_runtime_level
13611: )
13612: THEN
13613: fnd_log.STRING
13606: x_msg_data => x_msg_data
13607: );
13608:
13609: IF (fnd_log.level_event >=
13610: fnd_log.g_current_runtime_level
13611: )
13612: THEN
13613: fnd_log.STRING
13614: (fnd_log.level_event,
13609: IF (fnd_log.level_event >=
13610: fnd_log.g_current_runtime_level
13611: )
13612: THEN
13613: fnd_log.STRING
13614: (fnd_log.level_event,
13615: g_module_current || '.CREATE_K_SYSTEM_TRF',
13616: 'Create_transaction_source(Return status ='
13617: || l_return_status
13610: fnd_log.g_current_runtime_level
13611: )
13612: THEN
13613: fnd_log.STRING
13614: (fnd_log.level_event,
13615: g_module_current || '.CREATE_K_SYSTEM_TRF',
13616: 'Create_transaction_source(Return status ='
13617: || l_return_status
13618: || ')'
13636: x_msg_count => x_msg_count,
13637: x_msg_data => x_msg_data
13638: );
13639:
13640: IF (fnd_log.level_event >=
13641: fnd_log.g_current_runtime_level
13642: )
13643: THEN
13644: fnd_log.STRING
13637: x_msg_data => x_msg_data
13638: );
13639:
13640: IF (fnd_log.level_event >=
13641: fnd_log.g_current_runtime_level
13642: )
13643: THEN
13644: fnd_log.STRING
13645: (fnd_log.level_event,
13640: IF (fnd_log.level_event >=
13641: fnd_log.g_current_runtime_level
13642: )
13643: THEN
13644: fnd_log.STRING
13645: (fnd_log.level_event,
13646: g_module_current || '.CREATE_K_SYSTEM_TRF',
13647: 'Create_transaction_source(Return status ='
13648: || l_return_status
13641: fnd_log.g_current_runtime_level
13642: )
13643: THEN
13644: fnd_log.STRING
13645: (fnd_log.level_event,
13646: g_module_current || '.CREATE_K_SYSTEM_TRF',
13647: 'Create_transaction_source(Return status ='
13648: || l_return_status
13649: || ')'
13753: x_msg_count => x_msg_count,
13754: x_return_status => l_return_status
13755: );
13756:
13757: IF (fnd_log.level_event >=
13758: fnd_log.g_current_runtime_level
13759: )
13760: THEN
13761: fnd_log.STRING
13754: x_return_status => l_return_status
13755: );
13756:
13757: IF (fnd_log.level_event >=
13758: fnd_log.g_current_runtime_level
13759: )
13760: THEN
13761: fnd_log.STRING
13762: (fnd_log.level_event,
13757: IF (fnd_log.level_event >=
13758: fnd_log.g_current_runtime_level
13759: )
13760: THEN
13761: fnd_log.STRING
13762: (fnd_log.level_event,
13763: g_module_current
13764: || '.CREATE_K_SYSTEM_TRF',
13765: 'Create_billing_schedule(Return status = '
13758: fnd_log.g_current_runtime_level
13759: )
13760: THEN
13761: fnd_log.STRING
13762: (fnd_log.level_event,
13763: g_module_current
13764: || '.CREATE_K_SYSTEM_TRF',
13765: 'Create_billing_schedule(Return status = '
13766: || l_return_status
13806: p_chr_id => l_chr_id,
13807: x_msg_tbl => l_msg_tbl
13808: );
13809:
13810: IF (fnd_log.level_event >=
13811: fnd_log.g_current_runtime_level
13812: )
13813: THEN
13814: fnd_log.STRING
13807: x_msg_tbl => l_msg_tbl
13808: );
13809:
13810: IF (fnd_log.level_event >=
13811: fnd_log.g_current_runtime_level
13812: )
13813: THEN
13814: fnd_log.STRING
13815: (fnd_log.level_event,
13810: IF (fnd_log.level_event >=
13811: fnd_log.g_current_runtime_level
13812: )
13813: THEN
13814: fnd_log.STRING
13815: (fnd_log.level_event,
13816: g_module_current
13817: || '.CREATE_K_SYSTEM_TRF',
13818: 'okc_qa_check_pub.execute_qa_check_list(Return status = '
13811: fnd_log.g_current_runtime_level
13812: )
13813: THEN
13814: fnd_log.STRING
13815: (fnd_log.level_event,
13816: g_module_current
13817: || '.CREATE_K_SYSTEM_TRF',
13818: 'okc_qa_check_pub.execute_qa_check_list(Return status = '
13819: || x_return_status
13843: i := l_msg_tbl.NEXT (i);
13844: END LOOP;
13845: END IF; --table count
13846:
13847: IF fnd_log.level_error >=
13848: fnd_log.g_current_runtime_level
13849: THEN
13850: fnd_log.STRING (fnd_log.level_error,
13851: g_module_current
13844: END LOOP;
13845: END IF; --table count
13846:
13847: IF fnd_log.level_error >=
13848: fnd_log.g_current_runtime_level
13849: THEN
13850: fnd_log.STRING (fnd_log.level_error,
13851: g_module_current
13852: || '.CREATE_K_SYSTEM_TRF',
13846:
13847: IF fnd_log.level_error >=
13848: fnd_log.g_current_runtime_level
13849: THEN
13850: fnd_log.STRING (fnd_log.level_error,
13851: g_module_current
13852: || '.CREATE_K_SYSTEM_TRF',
13853: 'qa Check list error'
13854: || l_msg_tbl (i).error_status
14031: p_insv_rec => l_insthist_rec,
14032: x_insv_rec => x_insthist_rec
14033: );
14034:
14035: IF (fnd_log.level_event >=
14036: fnd_log.g_current_runtime_level
14037: )
14038: THEN
14039: fnd_log.STRING
14032: x_insv_rec => x_insthist_rec
14033: );
14034:
14035: IF (fnd_log.level_event >=
14036: fnd_log.g_current_runtime_level
14037: )
14038: THEN
14039: fnd_log.STRING
14040: (fnd_log.level_event,
14035: IF (fnd_log.level_event >=
14036: fnd_log.g_current_runtime_level
14037: )
14038: THEN
14039: fnd_log.STRING
14040: (fnd_log.level_event,
14041: g_module_current || '.CREATE_K_SYSTEM_TRF',
14042: 'oks_ins_pvt.insert_row(Return status = '
14043: || l_return_status
14036: fnd_log.g_current_runtime_level
14037: )
14038: THEN
14039: fnd_log.STRING
14040: (fnd_log.level_event,
14041: g_module_current || '.CREATE_K_SYSTEM_TRF',
14042: 'oks_ins_pvt.insert_row(Return status = '
14043: || l_return_status
14044: || ')'
14083: p_ihdv_tbl => l_inst_dtls_tbl,
14084: x_ihdv_tbl => x_inst_dtls_tbl
14085: );
14086:
14087: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14088: )
14089: THEN
14090: fnd_log.STRING
14091: (fnd_log.level_event,
14086:
14087: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14088: )
14089: THEN
14090: fnd_log.STRING
14091: (fnd_log.level_event,
14092: g_module_current || '.CREATE_K_SYSTEM_TRF',
14093: 'oks_ihd_pvt.insert_row(Return status = '
14094: || l_return_status
14087: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14088: )
14089: THEN
14090: fnd_log.STRING
14091: (fnd_log.level_event,
14092: g_module_current || '.CREATE_K_SYSTEM_TRF',
14093: 'oks_ihd_pvt.insert_row(Return status = '
14094: || l_return_status
14095: || ')'
14238: l_credit_amount VARCHAR2 (50);
14239: BEGIN
14240: x_return_status := okc_api.g_ret_sts_success;
14241:
14242: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14243: THEN
14244: fnd_log.STRING (fnd_log.level_event,
14245: g_module_current || '.CREATE_CONTRACT_IBTERMINATE.',
14246: 'count = ' || p_kdtl_tbl.COUNT || ')'
14240: x_return_status := okc_api.g_ret_sts_success;
14241:
14242: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14243: THEN
14244: fnd_log.STRING (fnd_log.level_event,
14245: g_module_current || '.CREATE_CONTRACT_IBTERMINATE.',
14246: 'count = ' || p_kdtl_tbl.COUNT || ')'
14247: );
14248: END IF;
14264: IF l_ste_code = 'HOLD'
14265: THEN
14266: l_return_status := okc_api.g_ret_sts_error;
14267:
14268: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
14269: THEN
14270: fnd_log.STRING (fnd_log.level_error,
14271: g_module_current
14272: || '.CREATE_CONTRACT_IBTERMINATE.ERROR',
14266: l_return_status := okc_api.g_ret_sts_error;
14267:
14268: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
14269: THEN
14270: fnd_log.STRING (fnd_log.level_error,
14271: g_module_current
14272: || '.CREATE_CONTRACT_IBTERMINATE.ERROR',
14273: 'Contract in QA_HOLD status'
14274: );
14320: THEN
14321: l_trmdt := p_kdtl_tbl (l_ctr).prod_sdt;
14322: END IF;
14323:
14324: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
14325: THEN
14326: fnd_log.STRING
14327: (fnd_log.level_statement,
14328: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14322: END IF;
14323:
14324: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
14325: THEN
14326: fnd_log.STRING
14327: (fnd_log.level_statement,
14328: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14329: 'OKS Raise credit memo profile option value ='
14330: || fnd_profile.VALUE
14323:
14324: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
14325: THEN
14326: fnd_log.STRING
14327: (fnd_log.level_statement,
14328: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14329: 'OKS Raise credit memo profile option value ='
14330: || fnd_profile.VALUE
14331: ('OKS_RAISE_CREDIT_MEMO_FOR_IB_INT')
14387: p_term_cancel_source => 'IBTERMINATE',
14388: x_return_status => l_return_status
14389: );
14390:
14391: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14392: THEN
14393: fnd_log.STRING
14394: (fnd_log.level_event,
14395: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14389: );
14390:
14391: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14392: THEN
14393: fnd_log.STRING
14394: (fnd_log.level_event,
14395: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14396: 'oks_bill_rec_pub.Pre_terminate_cp(Return status = '
14397: || l_return_status
14390:
14391: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14392: THEN
14393: fnd_log.STRING
14394: (fnd_log.level_event,
14395: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14396: 'oks_bill_rec_pub.Pre_terminate_cp(Return status = '
14397: || l_return_status
14398: || ')'
14438: p_clev_tbl => l_clev_tbl_in,
14439: x_clev_tbl => l_clev_tbl_out
14440: );
14441:
14442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14443: )
14444: THEN
14445: fnd_log.STRING
14446: (fnd_log.level_event,
14441:
14442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14443: )
14444: THEN
14445: fnd_log.STRING
14446: (fnd_log.level_event,
14447: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14448: 'oks_bill_rec_pub.update_contract_line(Return status = '
14449: || l_return_status
14442: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14443: )
14444: THEN
14445: fnd_log.STRING
14446: (fnd_log.level_event,
14447: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14448: 'oks_bill_rec_pub.update_contract_line(Return status = '
14449: || l_return_status
14450: || ')'
14488: p_chrv_tbl => l_chrv_tbl_in,
14489: x_chrv_tbl => l_chrv_tbl_out
14490: );
14491:
14492: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14493: )
14494: THEN
14495: fnd_log.STRING
14496: (fnd_log.level_event,
14491:
14492: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14493: )
14494: THEN
14495: fnd_log.STRING
14496: (fnd_log.level_event,
14497: g_module_current
14498: || '.Update_Hdr_Dates.external_call.after',
14499: 'okc_contract_pub.update_contract_header(Return status = '
14492: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14493: )
14494: THEN
14495: fnd_log.STRING
14496: (fnd_log.level_event,
14497: g_module_current
14498: || '.Update_Hdr_Dates.external_call.after',
14499: 'okc_contract_pub.update_contract_header(Return status = '
14500: || l_return_status
14536: p_comments => NULL,
14537: p_validate_status => 'N'
14538: );
14539:
14540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14541: THEN
14542: fnd_log.STRING
14543: (fnd_log.level_event,
14544: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14538: );
14539:
14540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14541: THEN
14542: fnd_log.STRING
14543: (fnd_log.level_event,
14544: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14545: 'okc_contract_pub.update_contract_line(Return status ='
14546: || l_return_status
14539:
14540: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14541: THEN
14542: fnd_log.STRING
14543: (fnd_log.level_event,
14544: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14545: 'okc_contract_pub.update_contract_line(Return status ='
14546: || l_return_status
14547: || ')'
14585: p_comments => NULL,
14586: p_validate_status => 'N'
14587: );
14588:
14589: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14590: )
14591: THEN
14592: fnd_log.STRING
14593: (fnd_log.level_event,
14588:
14589: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14590: )
14591: THEN
14592: fnd_log.STRING
14593: (fnd_log.level_event,
14594: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14595: 'okc_contract_pub.update_contract_line(Return status = '
14596: || l_return_status
14589: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14590: )
14591: THEN
14592: fnd_log.STRING
14593: (fnd_log.level_event,
14594: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14595: 'okc_contract_pub.update_contract_line(Return status = '
14596: || l_return_status
14597: || ')'
14633: p_date_cancelled => TRUNC (date_cancelled),
14634: p_validate_status => 'N'
14635: );
14636:
14637: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14638: )
14639: THEN
14640: fnd_log.STRING
14641: (fnd_log.level_event,
14636:
14637: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14638: )
14639: THEN
14640: fnd_log.STRING
14641: (fnd_log.level_event,
14642: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14643: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status = '
14644: || l_return_status
14637: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14638: )
14639: THEN
14640: fnd_log.STRING
14641: (fnd_log.level_event,
14642: g_module_current || '.CREATE_CONTRACT_IBTERMINATE',
14643: 'OKS_WF_K_PROCESS_PVT.cancel_contract(Return status = '
14644: || l_return_status
14645: || ')'
14780: p_insv_rec => l_insthist_rec,
14781: x_insv_rec => x_insthist_rec
14782: );
14783:
14784: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14785: )
14786: THEN
14787: fnd_log.STRING
14788: (fnd_log.level_event,
14783:
14784: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14785: )
14786: THEN
14787: fnd_log.STRING
14788: (fnd_log.level_event,
14789: g_module_current || '.CREATE_K_SYSTEM_TRF',
14790: 'oks_ins_pvt.insert_row(Return status = '
14791: || l_return_status
14784: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
14785: )
14786: THEN
14787: fnd_log.STRING
14788: (fnd_log.level_event,
14789: g_module_current || '.CREATE_K_SYSTEM_TRF',
14790: 'oks_ins_pvt.insert_row(Return status = '
14791: || l_return_status
14792: || ')'
14814: p_ihdv_tbl => l_inst_dtls_tbl,
14815: x_ihdv_tbl => x_inst_dtls_tbl
14816: );
14817:
14818: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14819: THEN
14820: fnd_log.STRING
14821: (fnd_log.level_event,
14822: g_module_current || '.CREATE_IBTERMINATE',
14816: );
14817:
14818: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14819: THEN
14820: fnd_log.STRING
14821: (fnd_log.level_event,
14822: g_module_current || '.CREATE_IBTERMINATE',
14823: 'oks_ihd_pvt.insert_row(Return status = '
14824: || l_return_status
14817:
14818: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
14819: THEN
14820: fnd_log.STRING
14821: (fnd_log.level_event,
14822: g_module_current || '.CREATE_IBTERMINATE',
14823: 'oks_ihd_pvt.insert_row(Return status = '
14824: || l_return_status
14825: || ')'
15009: l_klnv_tbl_out oks_kln_pvt.klnv_tbl_type;
15010: BEGIN
15011: x_return_status := okc_api.g_ret_sts_success;
15012:
15013: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15014: THEN
15015: fnd_log.STRING (fnd_log.level_event,
15016: g_module_current || '.UPDATE_CONTRACT_IDC.after.',
15017: 'count = ' || p_kdtl_tbl.COUNT || ')'
15011: x_return_status := okc_api.g_ret_sts_success;
15012:
15013: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15014: THEN
15015: fnd_log.STRING (fnd_log.level_event,
15016: g_module_current || '.UPDATE_CONTRACT_IDC.after.',
15017: 'count = ' || p_kdtl_tbl.COUNT || ')'
15018: );
15019: END IF;
15033: IF p_kdtl_tbl (l_ctr).installation_date IS NULL
15034: THEN
15035: l_return_status := okc_api.g_ret_sts_warning;
15036:
15037: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
15038: THEN
15039: fnd_log.STRING (fnd_log.level_error,
15040: g_module_current || '.IB_INTERFACE',
15041: 'Installation date changed to null '
15035: l_return_status := okc_api.g_ret_sts_warning;
15036:
15037: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
15038: THEN
15039: fnd_log.STRING (fnd_log.level_error,
15040: g_module_current || '.IB_INTERFACE',
15041: 'Installation date changed to null '
15042: );
15043: END IF;
15097: x_timeunit => l_timeunits,
15098: x_return_status => l_return_status
15099: );
15100:
15101: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15102: THEN
15103: fnd_log.STRING
15104: (fnd_log.level_event,
15105: g_module_current
15099: );
15100:
15101: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15102: THEN
15103: fnd_log.STRING
15104: (fnd_log.level_event,
15105: g_module_current
15106: || '.UPDATE_CONTRACT_IDC.after.get_k_dtls',
15107: 'Okc_time_util_pub.get_duration(Return status = '
15100:
15101: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15102: THEN
15103: fnd_log.STRING
15104: (fnd_log.level_event,
15105: g_module_current
15106: || '.UPDATE_CONTRACT_IDC.after.get_k_dtls',
15107: 'Okc_time_util_pub.get_duration(Return status = '
15108: || l_return_status
15135: INTO l_cov_att;
15136:
15137: CLOSE l_cov_csr;
15138:
15139: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
15140: THEN
15141: fnd_log.STRING (fnd_log.level_statement,
15142: g_module_current || '.UPDATE_CONTRACT_IDC',
15143: 'Coverage attribute = ' || l_cov_att
15137: CLOSE l_cov_csr;
15138:
15139: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
15140: THEN
15141: fnd_log.STRING (fnd_log.level_statement,
15142: g_module_current || '.UPDATE_CONTRACT_IDC',
15143: 'Coverage attribute = ' || l_cov_att
15144: );
15145: END IF;
15163: CLOSE l_checksr_csr;
15164:
15165: l_return_status := okc_api.g_ret_sts_warning;
15166:
15167: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
15168: THEN
15169: fnd_log.STRING (fnd_log.level_error,
15170: g_module_current
15171: || '.UPDATE_CONTRACT_IDC.ERROR',
15165: l_return_status := okc_api.g_ret_sts_warning;
15166:
15167: IF fnd_log.level_error >= fnd_log.g_current_runtime_level
15168: THEN
15169: fnd_log.STRING (fnd_log.level_error,
15170: g_module_current
15171: || '.UPDATE_CONTRACT_IDC.ERROR',
15172: 'SR is logged '
15173: || ',status = '
15267: IF l_hdr_flag = 'T'
15268: THEN
15269: l_sts_flag := 'Y';
15270:
15271: IF fnd_log.level_statement >=
15272: fnd_log.g_current_runtime_level
15273: THEN
15274: fnd_log.STRING (fnd_log.level_statement,
15275: g_module_current
15268: THEN
15269: l_sts_flag := 'Y';
15270:
15271: IF fnd_log.level_statement >=
15272: fnd_log.g_current_runtime_level
15273: THEN
15274: fnd_log.STRING (fnd_log.level_statement,
15275: g_module_current
15276: || '.UPDATE_CONTRACT_IDC',
15270:
15271: IF fnd_log.level_statement >=
15272: fnd_log.g_current_runtime_level
15273: THEN
15274: fnd_log.STRING (fnd_log.level_statement,
15275: g_module_current
15276: || '.UPDATE_CONTRACT_IDC',
15277: 'Header start date = '
15278: || l_hdr_sdt
15292: x_msg_count => x_msg_count,
15293: x_msg_data => x_msg_data
15294: );
15295:
15296: IF (fnd_log.level_event >=
15297: fnd_log.g_current_runtime_level
15298: )
15299: THEN
15300: fnd_log.STRING
15293: x_msg_data => x_msg_data
15294: );
15295:
15296: IF (fnd_log.level_event >=
15297: fnd_log.g_current_runtime_level
15298: )
15299: THEN
15300: fnd_log.STRING
15301: (fnd_log.level_event,
15296: IF (fnd_log.level_event >=
15297: fnd_log.g_current_runtime_level
15298: )
15299: THEN
15300: fnd_log.STRING
15301: (fnd_log.level_event,
15302: g_module_current
15303: || '.UPDATE_CONTRACT_IDC',
15304: 'Update_hdr_dates(Return status = '
15297: fnd_log.g_current_runtime_level
15298: )
15299: THEN
15300: fnd_log.STRING
15301: (fnd_log.level_event,
15302: g_module_current
15303: || '.UPDATE_CONTRACT_IDC',
15304: 'Update_hdr_dates(Return status = '
15305: || l_return_status
15314: END IF; --hdrflag
15315:
15316: l_sts_flag := 'Y';
15317:
15318: IF fnd_log.level_statement >=
15319: fnd_log.g_current_runtime_level
15320: THEN
15321: fnd_log.STRING (fnd_log.level_statement,
15322: g_module_current
15315:
15316: l_sts_flag := 'Y';
15317:
15318: IF fnd_log.level_statement >=
15319: fnd_log.g_current_runtime_level
15320: THEN
15321: fnd_log.STRING (fnd_log.level_statement,
15322: g_module_current
15323: || '.UPDATE_CONTRACT_IDC',
15317:
15318: IF fnd_log.level_statement >=
15319: fnd_log.g_current_runtime_level
15320: THEN
15321: fnd_log.STRING (fnd_log.level_statement,
15322: g_module_current
15323: || '.UPDATE_CONTRACT_IDC',
15324: 'Top line start date = '
15325: || l_top_sdt
15341: x_msg_count => x_msg_count,
15342: x_msg_data => x_msg_data
15343: );
15344:
15345: IF (fnd_log.level_event >=
15346: fnd_log.g_current_runtime_level
15347: )
15348: THEN
15349: fnd_log.STRING
15342: x_msg_data => x_msg_data
15343: );
15344:
15345: IF (fnd_log.level_event >=
15346: fnd_log.g_current_runtime_level
15347: )
15348: THEN
15349: fnd_log.STRING
15350: (fnd_log.level_event,
15345: IF (fnd_log.level_event >=
15346: fnd_log.g_current_runtime_level
15347: )
15348: THEN
15349: fnd_log.STRING
15350: (fnd_log.level_event,
15351: g_module_current
15352: || '.UPDATE_CONTRACT_IDC',
15353: 'Update_Line_dates(Return status = '
15346: fnd_log.g_current_runtime_level
15347: )
15348: THEN
15349: fnd_log.STRING
15350: (fnd_log.level_event,
15351: g_module_current
15352: || '.UPDATE_CONTRACT_IDC',
15353: 'Update_Line_dates(Return status = '
15354: || l_return_status
15402: x_klnv_tbl => l_klnv_tbl_out,
15403: p_validate_yn => 'N'
15404: );
15405:
15406: IF (fnd_log.level_event >=
15407: fnd_log.g_current_runtime_level
15408: )
15409: THEN
15410: fnd_log.STRING
15403: p_validate_yn => 'N'
15404: );
15405:
15406: IF (fnd_log.level_event >=
15407: fnd_log.g_current_runtime_level
15408: )
15409: THEN
15410: fnd_log.STRING
15411: (fnd_log.level_event,
15406: IF (fnd_log.level_event >=
15407: fnd_log.g_current_runtime_level
15408: )
15409: THEN
15410: fnd_log.STRING
15411: (fnd_log.level_event,
15412: g_module_current || '.UPDATE_CONTRACT_IDC',
15413: 'oks_contract_line_pub.update_line(Return status = '
15414: || l_return_status
15407: fnd_log.g_current_runtime_level
15408: )
15409: THEN
15410: fnd_log.STRING
15411: (fnd_log.level_event,
15412: g_module_current || '.UPDATE_CONTRACT_IDC',
15413: 'oks_contract_line_pub.update_line(Return status = '
15414: || l_return_status
15415: || ')'
15437: p_new_start_date => l_top_sdt,
15438: p_new_end_date => l_top_edt
15439: );
15440:
15441: IF (fnd_log.level_event >=
15442: fnd_log.g_current_runtime_level
15443: )
15444: THEN
15445: fnd_log.STRING
15438: p_new_end_date => l_top_edt
15439: );
15440:
15441: IF (fnd_log.level_event >=
15442: fnd_log.g_current_runtime_level
15443: )
15444: THEN
15445: fnd_log.STRING
15446: (fnd_log.level_event,
15441: IF (fnd_log.level_event >=
15442: fnd_log.g_current_runtime_level
15443: )
15444: THEN
15445: fnd_log.STRING
15446: (fnd_log.level_event,
15447: g_module_current || '.UPDATE_CONTRACT_IDC',
15448: 'oks_coverages_pub.update_cov_eff(Return status = '
15449: || l_return_status
15442: fnd_log.g_current_runtime_level
15443: )
15444: THEN
15445: fnd_log.STRING
15446: (fnd_log.level_event,
15447: g_module_current || '.UPDATE_CONTRACT_IDC',
15448: 'oks_coverages_pub.update_cov_eff(Return status = '
15449: || l_return_status
15450: || ')'
15466: x_msg_count => x_msg_count,
15467: x_msg_data => x_msg_data
15468: );
15469:
15470: IF (fnd_log.level_event >=
15471: fnd_log.g_current_runtime_level
15472: )
15473: THEN
15474: fnd_log.STRING
15467: x_msg_data => x_msg_data
15468: );
15469:
15470: IF (fnd_log.level_event >=
15471: fnd_log.g_current_runtime_level
15472: )
15473: THEN
15474: fnd_log.STRING
15475: (fnd_log.level_event,
15470: IF (fnd_log.level_event >=
15471: fnd_log.g_current_runtime_level
15472: )
15473: THEN
15474: fnd_log.STRING
15475: (fnd_log.level_event,
15476: g_module_current || '.UPDATE_CONTRACT_IDC',
15477: 'oks_pm_programs_pvt.ADJUST_PM_PROGRAM_SCHEDULE(Return status = '
15478: || l_return_status
15471: fnd_log.g_current_runtime_level
15472: )
15473: THEN
15474: fnd_log.STRING
15475: (fnd_log.level_event,
15476: g_module_current || '.UPDATE_CONTRACT_IDC',
15477: 'oks_pm_programs_pvt.ADJUST_PM_PROGRAM_SCHEDULE(Return status = '
15478: || l_return_status
15479: || ')'
15485: RAISE g_exception_halt_validation;
15486: END IF;
15487: END IF; --topflag
15488:
15489: IF fnd_log.level_statement >=
15490: fnd_log.g_current_runtime_level
15491: THEN
15492: fnd_log.STRING (fnd_log.level_statement,
15493: g_module_current
15486: END IF;
15487: END IF; --topflag
15488:
15489: IF fnd_log.level_statement >=
15490: fnd_log.g_current_runtime_level
15491: THEN
15492: fnd_log.STRING (fnd_log.level_statement,
15493: g_module_current
15494: || '.UPDATE_CONTRACT_IDC',
15488:
15489: IF fnd_log.level_statement >=
15490: fnd_log.g_current_runtime_level
15491: THEN
15492: fnd_log.STRING (fnd_log.level_statement,
15493: g_module_current
15494: || '.UPDATE_CONTRACT_IDC',
15495: 'sub line start date = '
15496: || l_sub_sdt
15510: x_msg_count => x_msg_count,
15511: x_msg_data => x_msg_data
15512: );
15513:
15514: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15515: )
15516: THEN
15517: fnd_log.STRING (fnd_log.level_event,
15518: g_module_current
15513:
15514: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15515: )
15516: THEN
15517: fnd_log.STRING (fnd_log.level_event,
15518: g_module_current
15519: || '.UPDATE_CONTRACT_IDC',
15520: 'Update_line_dates(Return status = '
15521: || l_return_status
15559: x_klnv_tbl => l_klnv_tbl_out,
15560: p_validate_yn => 'N'
15561: );
15562:
15563: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15564: )
15565: THEN
15566: fnd_log.STRING
15567: (fnd_log.level_event,
15562:
15563: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15564: )
15565: THEN
15566: fnd_log.STRING
15567: (fnd_log.level_event,
15568: g_module_current || '.UPDATE_CONTRACT_IDC',
15569: 'oks_contract_line_pub.update_line(Return status = '
15570: || l_return_status
15563: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15564: )
15565: THEN
15566: fnd_log.STRING
15567: (fnd_log.level_event,
15568: g_module_current || '.UPDATE_CONTRACT_IDC',
15569: 'oks_contract_line_pub.update_line(Return status = '
15570: || l_return_status
15571: || ')'
15626: l_inst_dtls_tbl (1).new_customer :=
15627: p_kdtl_tbl (l_ctr).cust_account;
15628: END IF; --SR logged
15629: ELSE
15630: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
15631: THEN
15632: fnd_log.STRING (fnd_log.level_statement,
15633: g_module_current || '.UPDATE_CONTRACT_IDC',
15634: 'coverage attribute not set'
15628: END IF; --SR logged
15629: ELSE
15630: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
15631: THEN
15632: fnd_log.STRING (fnd_log.level_statement,
15633: g_module_current || '.UPDATE_CONTRACT_IDC',
15634: 'coverage attribute not set'
15635: );
15636: END IF;
15681: p_insv_rec => l_insthist_rec,
15682: x_insv_rec => x_insthist_rec
15683: );
15684:
15685: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15686: )
15687: THEN
15688: fnd_log.STRING
15689: (fnd_log.level_event,
15684:
15685: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15686: )
15687: THEN
15688: fnd_log.STRING
15689: (fnd_log.level_event,
15690: g_module_current || '.UPDATE_CONTRACT_IDC',
15691: 'oks_ins_pvt.insert_row(Return status = '
15692: || l_return_status
15685: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
15686: )
15687: THEN
15688: fnd_log.STRING
15689: (fnd_log.level_event,
15690: g_module_current || '.UPDATE_CONTRACT_IDC',
15691: 'oks_ins_pvt.insert_row(Return status = '
15692: || l_return_status
15693: || ')'
15715: p_ihdv_tbl => l_inst_dtls_tbl,
15716: x_ihdv_tbl => x_inst_dtls_tbl
15717: );
15718:
15719: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15720: THEN
15721: fnd_log.STRING
15722: (fnd_log.level_event,
15723: g_module_current || '.UPDATE_CONTRACT_IDC',
15717: );
15718:
15719: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15720: THEN
15721: fnd_log.STRING
15722: (fnd_log.level_event,
15723: g_module_current || '.UPDATE_CONTRACT_IDC',
15724: 'oks_ihd_pvt.insert_row(Return status = '
15725: || l_return_status
15718:
15719: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15720: THEN
15721: fnd_log.STRING
15722: (fnd_log.level_event,
15723: g_module_current || '.UPDATE_CONTRACT_IDC',
15724: 'oks_ihd_pvt.insert_row(Return status = '
15725: || l_return_status
15726: || ')'
15888: x_return_status := okc_api.g_ret_sts_success;
15889: l_old_cp_id := 0;
15890: l_target_chr_id := 0;
15891:
15892: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15893: THEN
15894: fnd_log.STRING (fnd_log.level_event,
15895: g_module_current || '.CREATE_CONTRACT_IBUPDATE.',
15896: 'count = ' || p_kdtl_tbl.COUNT || ')'
15890: l_target_chr_id := 0;
15891:
15892: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level)
15893: THEN
15894: fnd_log.STRING (fnd_log.level_event,
15895: g_module_current || '.CREATE_CONTRACT_IBUPDATE.',
15896: 'count = ' || p_kdtl_tbl.COUNT || ')'
15897: );
15898: END IF;
15928: l_ste_code,
15929: l_sts_code
15930: );
15931:
15932: IF fnd_log.level_statement >=
15933: fnd_log.g_current_runtime_level
15934: THEN
15935: fnd_log.STRING (fnd_log.level_statement,
15936: g_module_current
15929: l_sts_code
15930: );
15931:
15932: IF fnd_log.level_statement >=
15933: fnd_log.g_current_runtime_level
15934: THEN
15935: fnd_log.STRING (fnd_log.level_statement,
15936: g_module_current
15937: || '.CREATE_CONTRACT_IBUPDATE',
15931:
15932: IF fnd_log.level_statement >=
15933: fnd_log.g_current_runtime_level
15934: THEN
15935: fnd_log.STRING (fnd_log.level_statement,
15936: g_module_current
15937: || '.CREATE_CONTRACT_IBUPDATE',
15938: 'lse_id= ' || p_kdtl_tbl (l_ctr).lse_id
15939: );
16013: INTO l_billed_amount;
16014:
16015: CLOSE l_bill_csr;
16016:
16017: IF fnd_log.level_statement >=
16018: fnd_log.g_current_runtime_level
16019: THEN
16020: fnd_log.STRING (fnd_log.level_statement,
16021: g_module_current
16014:
16015: CLOSE l_bill_csr;
16016:
16017: IF fnd_log.level_statement >=
16018: fnd_log.g_current_runtime_level
16019: THEN
16020: fnd_log.STRING (fnd_log.level_statement,
16021: g_module_current
16022: || '.CREATE_CONTRACT_IBUPDATE',
16016:
16017: IF fnd_log.level_statement >=
16018: fnd_log.g_current_runtime_level
16019: THEN
16020: fnd_log.STRING (fnd_log.level_statement,
16021: g_module_current
16022: || '.CREATE_CONTRACT_IBUPDATE',
16023: 'Billed amount = '
16024: || l_billed_amount
16052: x_msg_count => x_msg_count,
16053: x_msg_data => x_msg_data
16054: );
16055:
16056: IF (fnd_log.level_event >=
16057: fnd_log.g_current_runtime_level
16058: )
16059: THEN
16060: fnd_log.STRING
16053: x_msg_data => x_msg_data
16054: );
16055:
16056: IF (fnd_log.level_event >=
16057: fnd_log.g_current_runtime_level
16058: )
16059: THEN
16060: fnd_log.STRING
16061: (fnd_log.level_event,
16056: IF (fnd_log.level_event >=
16057: fnd_log.g_current_runtime_level
16058: )
16059: THEN
16060: fnd_log.STRING
16061: (fnd_log.level_event,
16062: g_module_current || '.CREATE_CONTRACT_IBUPDATE',
16063: 'oks_qp_int_pvt.compute_price(Return status = '
16064: || l_return_status
16057: fnd_log.g_current_runtime_level
16058: )
16059: THEN
16060: fnd_log.STRING
16061: (fnd_log.level_event,
16062: g_module_current || '.CREATE_CONTRACT_IBUPDATE',
16063: 'oks_qp_int_pvt.compute_price(Return status = '
16064: || l_return_status
16065: || ',Repriced amount = '
16082: x_msg_count => x_msg_count,
16083: x_msg_data => x_msg_data
16084: );
16085:
16086: IF (fnd_log.level_event >=
16087: fnd_log.g_current_runtime_level
16088: )
16089: THEN
16090: fnd_log.STRING
16083: x_msg_data => x_msg_data
16084: );
16085:
16086: IF (fnd_log.level_event >=
16087: fnd_log.g_current_runtime_level
16088: )
16089: THEN
16090: fnd_log.STRING
16091: (fnd_log.level_event,
16086: IF (fnd_log.level_event >=
16087: fnd_log.g_current_runtime_level
16088: )
16089: THEN
16090: fnd_log.STRING
16091: (fnd_log.level_event,
16092: g_module_current || '.CREATE_CONTRACT_IBUPDATE',
16093: 'Oks_bill_sch.Create_Bill_Sch_CP(Return status = '
16094: || l_return_status
16087: fnd_log.g_current_runtime_level
16088: )
16089: THEN
16090: fnd_log.STRING
16091: (fnd_log.level_event,
16092: g_module_current || '.CREATE_CONTRACT_IBUPDATE',
16093: 'Oks_bill_sch.Create_Bill_Sch_CP(Return status = '
16094: || l_return_status
16095: || ')'
16218: IF l_billed_amount =
16219: p_kdtl_tbl (l_ctr).service_amount
16220: THEN
16221: -- Terminate the subline and create a New Subline with the update qty
16222: IF fnd_log.level_statement >=
16223: fnd_log.g_current_runtime_level
16224: THEN
16225: fnd_log.STRING (fnd_log.level_statement,
16226: g_module_current
16219: p_kdtl_tbl (l_ctr).service_amount
16220: THEN
16221: -- Terminate the subline and create a New Subline with the update qty
16222: IF fnd_log.level_statement >=
16223: fnd_log.g_current_runtime_level
16224: THEN
16225: fnd_log.STRING (fnd_log.level_statement,
16226: g_module_current
16227: || '.CREATE_CONTRACT_IBUPDATE',
16221: -- Terminate the subline and create a New Subline with the update qty
16222: IF fnd_log.level_statement >=
16223: fnd_log.g_current_runtime_level
16224: THEN
16225: fnd_log.STRING (fnd_log.level_statement,
16226: g_module_current
16227: || '.CREATE_CONTRACT_IBUPDATE',
16228: 'The Line is fully billed'
16229: );
16238: IF l_ste_code = 'HOLD'
16239: THEN
16240: l_return_status := okc_api.g_ret_sts_error;
16241:
16242: IF fnd_log.level_error >=
16243: fnd_log.g_current_runtime_level
16244: THEN
16245: fnd_log.STRING
16246: (fnd_log.level_error,
16239: THEN
16240: l_return_status := okc_api.g_ret_sts_error;
16241:
16242: IF fnd_log.level_error >=
16243: fnd_log.g_current_runtime_level
16244: THEN
16245: fnd_log.STRING
16246: (fnd_log.level_error,
16247: g_module_current
16241:
16242: IF fnd_log.level_error >=
16243: fnd_log.g_current_runtime_level
16244: THEN
16245: fnd_log.STRING
16246: (fnd_log.level_error,
16247: g_module_current
16248: || '.CREATE_CONTRACT_IBUPDATE.ERROR',
16249: ' Contract in QA_HOLD status'
16242: IF fnd_log.level_error >=
16243: fnd_log.g_current_runtime_level
16244: THEN
16245: fnd_log.STRING
16246: (fnd_log.level_error,
16247: g_module_current
16248: || '.CREATE_CONTRACT_IBUPDATE.ERROR',
16249: ' Contract in QA_HOLD status'
16250: );
16280: p_term_cancel_source => 'IBUPDATE',
16281: x_return_status => l_return_status
16282: );
16283:
16284: IF (fnd_log.level_event >=
16285: fnd_log.g_current_runtime_level
16286: )
16287: THEN
16288: fnd_log.STRING
16281: x_return_status => l_return_status
16282: );
16283:
16284: IF (fnd_log.level_event >=
16285: fnd_log.g_current_runtime_level
16286: )
16287: THEN
16288: fnd_log.STRING
16289: (fnd_log.level_event,
16284: IF (fnd_log.level_event >=
16285: fnd_log.g_current_runtime_level
16286: )
16287: THEN
16288: fnd_log.STRING
16289: (fnd_log.level_event,
16290: g_module_current
16291: || '.CREATE_CONTRACT_IBUPDATE',
16292: ' oks_bill_rec_pub.Pre_terminate_cp(Retun status = '
16285: fnd_log.g_current_runtime_level
16286: )
16287: THEN
16288: fnd_log.STRING
16289: (fnd_log.level_event,
16290: g_module_current
16291: || '.CREATE_CONTRACT_IBUPDATE',
16292: ' oks_bill_rec_pub.Pre_terminate_cp(Retun status = '
16293: || l_return_status
16431: x_msg_data => x_msg_data
16432: );
16433:
16434: --errorout_n('in update Create_K_Covered_Levels l_return_status'||l_return_status);
16435: IF (fnd_log.level_event >=
16436: fnd_log.g_current_runtime_level
16437: )
16438: THEN
16439: fnd_log.STRING
16432: );
16433:
16434: --errorout_n('in update Create_K_Covered_Levels l_return_status'||l_return_status);
16435: IF (fnd_log.level_event >=
16436: fnd_log.g_current_runtime_level
16437: )
16438: THEN
16439: fnd_log.STRING
16440: (fnd_log.level_event,
16435: IF (fnd_log.level_event >=
16436: fnd_log.g_current_runtime_level
16437: )
16438: THEN
16439: fnd_log.STRING
16440: (fnd_log.level_event,
16441: g_module_current
16442: || '.CREATE_CONTRACT_IBUPDATE',
16443: 'oks_extwarprgm_pvt.create_k_covered_levels(Retun status = '
16436: fnd_log.g_current_runtime_level
16437: )
16438: THEN
16439: fnd_log.STRING
16440: (fnd_log.level_event,
16441: g_module_current
16442: || '.CREATE_CONTRACT_IBUPDATE',
16443: 'oks_extwarprgm_pvt.create_k_covered_levels(Retun status = '
16444: || l_return_status
16472: x_msg_count => x_msg_count,
16473: x_msg_data => x_msg_data
16474: );
16475:
16476: IF (fnd_log.level_event >=
16477: fnd_log.g_current_runtime_level
16478: )
16479: THEN
16480: fnd_log.STRING
16473: x_msg_data => x_msg_data
16474: );
16475:
16476: IF (fnd_log.level_event >=
16477: fnd_log.g_current_runtime_level
16478: )
16479: THEN
16480: fnd_log.STRING
16481: (fnd_log.level_event,
16476: IF (fnd_log.level_event >=
16477: fnd_log.g_current_runtime_level
16478: )
16479: THEN
16480: fnd_log.STRING
16481: (fnd_log.level_event,
16482: g_module_current
16483: || '.CREATE_CONTRACT_IBUPDATE',
16484: 'Create_transaction_source(Retun status = '
16477: fnd_log.g_current_runtime_level
16478: )
16479: THEN
16480: fnd_log.STRING
16481: (fnd_log.level_event,
16482: g_module_current
16483: || '.CREATE_CONTRACT_IBUPDATE',
16484: 'Create_transaction_source(Retun status = '
16485: || l_return_status
16517: THEN
16518: RAISE g_exception_halt_validation;
16519: END IF;
16520:
16521: IF (fnd_log.level_event >=
16522: fnd_log.g_current_runtime_level
16523: )
16524: THEN
16525: fnd_log.STRING
16518: RAISE g_exception_halt_validation;
16519: END IF;
16520:
16521: IF (fnd_log.level_event >=
16522: fnd_log.g_current_runtime_level
16523: )
16524: THEN
16525: fnd_log.STRING
16526: (fnd_log.level_event,
16521: IF (fnd_log.level_event >=
16522: fnd_log.g_current_runtime_level
16523: )
16524: THEN
16525: fnd_log.STRING
16526: (fnd_log.level_event,
16527: g_module_current
16528: || '.CREATE_CONTRACT_IBUPDATE',
16529: 'Create_source_links(Retun status = '
16522: fnd_log.g_current_runtime_level
16523: )
16524: THEN
16525: fnd_log.STRING
16526: (fnd_log.level_event,
16527: g_module_current
16528: || '.CREATE_CONTRACT_IBUPDATE',
16529: 'Create_source_links(Retun status = '
16530: || l_return_status
16547: x_msg_count => l_msg_count,
16548: x_msg_data => l_msg_data
16549: );
16550:
16551: IF (fnd_log.level_event >=
16552: fnd_log.g_current_runtime_level
16553: )
16554: THEN
16555: fnd_log.STRING
16548: x_msg_data => l_msg_data
16549: );
16550:
16551: IF (fnd_log.level_event >=
16552: fnd_log.g_current_runtime_level
16553: )
16554: THEN
16555: fnd_log.STRING
16556: (fnd_log.level_event,
16551: IF (fnd_log.level_event >=
16552: fnd_log.g_current_runtime_level
16553: )
16554: THEN
16555: fnd_log.STRING
16556: (fnd_log.level_event,
16557: g_module_current
16558: || '.CREATE_CONTRACT_IBUPDATE',
16559: 'oks_qp_int_pvt.compute_price(Retun status = '
16552: fnd_log.g_current_runtime_level
16553: )
16554: THEN
16555: fnd_log.STRING
16556: (fnd_log.level_event,
16557: g_module_current
16558: || '.CREATE_CONTRACT_IBUPDATE',
16559: 'oks_qp_int_pvt.compute_price(Retun status = '
16560: || l_return_status
16577: INTO l_subline_amount;
16578:
16579: CLOSE l_amount_csr;
16580:
16581: IF fnd_log.level_statement >=
16582: fnd_log.g_current_runtime_level
16583: THEN
16584: fnd_log.STRING (fnd_log.level_statement,
16585: g_module_current
16578:
16579: CLOSE l_amount_csr;
16580:
16581: IF fnd_log.level_statement >=
16582: fnd_log.g_current_runtime_level
16583: THEN
16584: fnd_log.STRING (fnd_log.level_statement,
16585: g_module_current
16586: || '.CREATE_CONTRACT_IBUPDATE',
16580:
16581: IF fnd_log.level_statement >=
16582: fnd_log.g_current_runtime_level
16583: THEN
16584: fnd_log.STRING (fnd_log.level_statement,
16585: g_module_current
16586: || '.CREATE_CONTRACT_IBUPDATE',
16587: 'Subline Amount = '
16588: || l_subline_amount
16706: x_msg_count => l_msg_count,
16707: x_msg_data => l_msg_data
16708: );
16709:
16710: IF (fnd_log.level_event >=
16711: fnd_log.g_current_runtime_level
16712: )
16713: THEN
16714: fnd_log.STRING
16707: x_msg_data => l_msg_data
16708: );
16709:
16710: IF (fnd_log.level_event >=
16711: fnd_log.g_current_runtime_level
16712: )
16713: THEN
16714: fnd_log.STRING
16715: (fnd_log.level_event,
16710: IF (fnd_log.level_event >=
16711: fnd_log.g_current_runtime_level
16712: )
16713: THEN
16714: fnd_log.STRING
16715: (fnd_log.level_event,
16716: g_module_current
16717: || '.CREATE_CONTRACT_IBUPDATE',
16718: 'oks_bill_sch.create_bill_sch_cp(Retun status = '
16711: fnd_log.g_current_runtime_level
16712: )
16713: THEN
16714: fnd_log.STRING
16715: (fnd_log.level_event,
16716: g_module_current
16717: || '.CREATE_CONTRACT_IBUPDATE',
16718: 'oks_bill_sch.create_bill_sch_cp(Retun status = '
16719: || l_return_status
16754: x_msg_count => l_msg_count,
16755: x_msg_data => l_msg_data
16756: );
16757:
16758: IF (fnd_log.level_event >=
16759: fnd_log.g_current_runtime_level
16760: )
16761: THEN
16762: fnd_log.STRING
16755: x_msg_data => l_msg_data
16756: );
16757:
16758: IF (fnd_log.level_event >=
16759: fnd_log.g_current_runtime_level
16760: )
16761: THEN
16762: fnd_log.STRING
16763: (fnd_log.level_event,
16758: IF (fnd_log.level_event >=
16759: fnd_log.g_current_runtime_level
16760: )
16761: THEN
16762: fnd_log.STRING
16763: (fnd_log.level_event,
16764: g_module_current
16765: || '.CREATE_CONTRACT_IBUPDATE',
16766: 'oks_qp_int_pvt.compute_price(Retun status = '
16759: fnd_log.g_current_runtime_level
16760: )
16761: THEN
16762: fnd_log.STRING
16763: (fnd_log.level_event,
16764: g_module_current
16765: || '.CREATE_CONTRACT_IBUPDATE',
16766: 'oks_qp_int_pvt.compute_price(Retun status = '
16767: || l_return_status
16861: x_msg_count => l_msg_count,
16862: x_msg_data => l_msg_data
16863: );
16864:
16865: IF (fnd_log.level_event >=
16866: fnd_log.g_current_runtime_level
16867: )
16868: THEN
16869: fnd_log.STRING
16862: x_msg_data => l_msg_data
16863: );
16864:
16865: IF (fnd_log.level_event >=
16866: fnd_log.g_current_runtime_level
16867: )
16868: THEN
16869: fnd_log.STRING
16870: (fnd_log.level_event,
16865: IF (fnd_log.level_event >=
16866: fnd_log.g_current_runtime_level
16867: )
16868: THEN
16869: fnd_log.STRING
16870: (fnd_log.level_event,
16871: g_module_current
16872: || '.CREATE_CONTRACT_IBUPDATE',
16873: 'oks_bill_sch.create_bill_sch_cp(Retun status = '
16866: fnd_log.g_current_runtime_level
16867: )
16868: THEN
16869: fnd_log.STRING
16870: (fnd_log.level_event,
16871: g_module_current
16872: || '.CREATE_CONTRACT_IBUPDATE',
16873: 'oks_bill_sch.create_bill_sch_cp(Retun status = '
16874: || l_return_status
16998: p_insv_rec => l_insthist_rec,
16999: x_insv_rec => x_insthist_rec
17000: );
17001:
17002: IF (fnd_log.level_event >=
17003: fnd_log.g_current_runtime_level
17004: )
17005: THEN
17006: fnd_log.STRING
16999: x_insv_rec => x_insthist_rec
17000: );
17001:
17002: IF (fnd_log.level_event >=
17003: fnd_log.g_current_runtime_level
17004: )
17005: THEN
17006: fnd_log.STRING
17007: (fnd_log.level_event,
17002: IF (fnd_log.level_event >=
17003: fnd_log.g_current_runtime_level
17004: )
17005: THEN
17006: fnd_log.STRING
17007: (fnd_log.level_event,
17008: g_module_current
17009: || '.CREATE_CONTRACT_IBUPDATE',
17010: 'oks_ins_pvt.insert_row(Return status = '
17003: fnd_log.g_current_runtime_level
17004: )
17005: THEN
17006: fnd_log.STRING
17007: (fnd_log.level_event,
17008: g_module_current
17009: || '.CREATE_CONTRACT_IBUPDATE',
17010: 'oks_ins_pvt.insert_row(Return status = '
17011: || l_return_status
17038: p_ihdv_tbl => l_inst_dtls_tbl,
17039: x_ihdv_tbl => x_inst_dtls_tbl
17040: );
17041:
17042: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
17043: )
17044: THEN
17045: fnd_log.STRING
17046: (fnd_log.level_event,
17041:
17042: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
17043: )
17044: THEN
17045: fnd_log.STRING
17046: (fnd_log.level_event,
17047: g_module_current
17048: || '.CREATE_CONTRACT_IBUPDATE',
17049: 'oks_ihd_pvt.insert_row(Return status = '
17042: IF (fnd_log.level_event >= fnd_log.g_current_runtime_level
17043: )
17044: THEN
17045: fnd_log.STRING
17046: (fnd_log.level_event,
17047: g_module_current
17048: || '.CREATE_CONTRACT_IBUPDATE',
17049: 'oks_ihd_pvt.insert_row(Return status = '
17050: || l_return_status
17146: l_gen_bulk_rec.squal_char04.EXTEND;
17147: l_gen_bulk_rec.squal_char07.EXTEND;
17148: l_gen_bulk_rec.squal_num01.EXTEND;
17149:
17150: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17151: THEN
17152: fnd_log.STRING (fnd_log.level_statement,
17153: g_module_current,
17154: 'Values passed to JTF API : '
17148: l_gen_bulk_rec.squal_num01.EXTEND;
17149:
17150: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17151: THEN
17152: fnd_log.STRING (fnd_log.level_statement,
17153: g_module_current,
17154: 'Values passed to JTF API : '
17155: || ' Party ID '
17156: || p_party_id
17172: l_gen_bulk_rec.squal_char07 (1) := l_country_code;
17173: l_gen_bulk_rec.squal_num01 (1) := p_party_id;
17174: l_use_type := 'RESOURCE';
17175:
17176: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17177: THEN
17178: fnd_log.STRING (fnd_log.level_statement,
17179: g_module_current
17180: || '.JTF_TERR_ASSIGN_PUB.get_winners',
17174: l_use_type := 'RESOURCE';
17175:
17176: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17177: THEN
17178: fnd_log.STRING (fnd_log.level_statement,
17179: g_module_current
17180: || '.JTF_TERR_ASSIGN_PUB.get_winners',
17181: 'Before JTF API call '
17182: );
17199: x_winners_rec => l_gen_return_rec
17200: );
17201: x_winners_rec := l_gen_return_rec;
17202:
17203: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17204: THEN
17205: fnd_log.STRING (fnd_log.level_statement,
17206: g_module_current
17207: || '.JTF_TERR_ASSIGN_PUB.get_winners',
17201: x_winners_rec := l_gen_return_rec;
17202:
17203: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17204: THEN
17205: fnd_log.STRING (fnd_log.level_statement,
17206: g_module_current
17207: || '.JTF_TERR_ASSIGN_PUB.get_winners',
17208: 'After JTF call '
17209: );
17246: l_msg VARCHAR2 (1000);
17247: l_user_name VARCHAR2 (100);
17248: l_order_num_prompt VARCHAR2 (100);
17249: BEGIN
17250: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17251: THEN
17252: fnd_log.STRING (fnd_log.level_statement,
17253: g_module_current,
17254: 'Inside SEND_NOTIFICATION : '
17248: l_order_num_prompt VARCHAR2 (100);
17249: BEGIN
17250: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17251: THEN
17252: fnd_log.STRING (fnd_log.level_statement,
17253: g_module_current,
17254: 'Inside SEND_NOTIFICATION : '
17255: );
17256: END IF;
17271: INTO l_user_name;
17272:
17273: CLOSE l_fnd_csr;
17274:
17275: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17276: THEN
17277: fnd_log.STRING (fnd_log.level_statement,
17278: g_module_current,
17279: 'Territory Admin is not null - ' || l_user_name
17273: CLOSE l_fnd_csr;
17274:
17275: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17276: THEN
17277: fnd_log.STRING (fnd_log.level_statement,
17278: g_module_current,
17279: 'Territory Admin is not null - ' || l_user_name
17280: );
17281: END IF;
17287: INTO l_user_name;
17288:
17289: CLOSE l_fnd_csr;
17290:
17291: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17292: THEN
17293: fnd_log.STRING (fnd_log.level_statement,
17294: g_module_current,
17295: 'Contract Admin is not null - ' || l_user_name
17289: CLOSE l_fnd_csr;
17290:
17291: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17292: THEN
17293: fnd_log.STRING (fnd_log.level_statement,
17294: g_module_current,
17295: 'Contract Admin is not null - ' || l_user_name
17296: );
17297: END IF;
17297: END IF;
17298: ELSE
17299: l_user_name := fnd_profile.VALUE ('OKC_K_APPROVER');
17300:
17301: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17302: THEN
17303: fnd_log.STRING (fnd_log.level_statement,
17304: g_module_current,
17305: 'Contract Approver is not null - ' || l_user_name
17299: l_user_name := fnd_profile.VALUE ('OKC_K_APPROVER');
17300:
17301: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17302: THEN
17303: fnd_log.STRING (fnd_log.level_statement,
17304: g_module_current,
17305: 'Contract Approver is not null - ' || l_user_name
17306: );
17307: END IF;
17345: ELSE
17346: l_msg := fnd_message.get_string ('OKS', 'OKS_TERR_SETUP_ERR_SUB');
17347: END IF;
17348:
17349: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17350: THEN
17351: fnd_log.STRING (fnd_log.level_statement,
17352: g_module_current,
17353: 'p_recipient is '
17347: END IF;
17348:
17349: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17350: THEN
17351: fnd_log.STRING (fnd_log.level_statement,
17352: g_module_current,
17353: 'p_recipient is '
17354: || l_user_name
17355: || ' Order no is '
17370: p_contract_id
17371: )
17372: );
17373:
17374: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17375: THEN
17376: fnd_log.STRING (fnd_log.level_statement,
17377: g_module_current,
17378: 'Exiting Send_notification ' || l_return_status
17372: );
17373:
17374: IF fnd_log.level_statement >= fnd_log.g_current_runtime_level
17375: THEN
17376: fnd_log.STRING (fnd_log.level_statement,
17377: g_module_current,
17378: 'Exiting Send_notification ' || l_return_status
17379: );
17380: END IF;