13: -- Validated: Security Deposit Disposition - If rule exist, check correct dates
14: -- OKLRAMPB.pls - OKL_AM_PARTIES_PVT
15: -- Validated: Termination Quote Recipients - Warnings only if rule setup is not correct
16: -- Validated: Repurchase Quote Recipient - Only for Repurchase Agreements, Not a Rule
17: -- OKLRAMUB.pls - OKL_AM_UTIL_PVT
18: -- Validated: Bill To Address - Mandatory; non-AM rule
19: -- OKLRARRB.pls - OKL_AM_ASSET_RETURN_PVT
20: -- Not Validated: Floor and Item Price Formulas - Optional
21: -- Not Validated: Repurchase Agreement Flag - Optional
118:
119: IF l_program_khr_id IS NOT NULL THEN
120:
121: IF (is_debug_statement_on) THEN
122: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
123: END IF;
124: okl_am_util_pvt.get_rule_record(
125: p_rgd_code => 'AMREPQ',
126: p_rdf_code => 'AMARQC',
120:
121: IF (is_debug_statement_on) THEN
122: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
123: END IF;
124: okl_am_util_pvt.get_rule_record(
125: p_rgd_code => 'AMREPQ',
126: p_rdf_code => 'AMARQC',
127: p_chr_id => p_chr_id,
128: p_cle_id => NULL,
129: p_message_yn => FALSE,
130: x_rulv_rec => l_rulv_rec,
131: x_return_status => l_return_status);
132: IF (is_debug_statement_on) THEN
133: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
134: END IF;
135:
136: IF l_return_status = OKL_API.G_RET_STS_SUCCESS THEN
137: IF l_rulv_rec.rule_information1 IS NOT NULL
375: l_return_status := OKL_API.G_RET_STS_SUCCESS;
376:
377: Else
378:
379: okl_am_util_pvt.set_invalid_rule_message (
380: p_rgd_code => p_rgd_code,
381: p_rdf_code => p_rdf_code);
382:
383: l_return_status := OKL_API.G_RET_STS_ERROR;
409:
410: ELSE -- Invalid combination of values
411:
412: IF (is_debug_statement_on) THEN
413: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.set_invalid_rule_message');
414: END IF;
415: okl_am_util_pvt.set_invalid_rule_message (
416: p_rgd_code => p_rgd_code,
417: p_rdf_code => p_rdf_code);
411:
412: IF (is_debug_statement_on) THEN
413: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.set_invalid_rule_message');
414: END IF;
415: okl_am_util_pvt.set_invalid_rule_message (
416: p_rgd_code => p_rgd_code,
417: p_rdf_code => p_rdf_code);
418: IF (is_debug_statement_on) THEN
419: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.set_invalid_rule_message');
415: okl_am_util_pvt.set_invalid_rule_message (
416: p_rgd_code => p_rgd_code,
417: p_rdf_code => p_rdf_code);
418: IF (is_debug_statement_on) THEN
419: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.set_invalid_rule_message');
420: END IF;
421:
422: l_return_status := OKL_API.G_RET_STS_ERROR;
423:
449: ELSE
450:
451: -- Invalid combination of values
452: IF (is_debug_statement_on) THEN
453: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.set_invalid_rule_message');
454: END IF;
455: okl_am_util_pvt.set_invalid_rule_message (
456: p_rgd_code => p_rgd_code,
457: p_rdf_code => p_rdf_code);
451: -- Invalid combination of values
452: IF (is_debug_statement_on) THEN
453: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.set_invalid_rule_message');
454: END IF;
455: okl_am_util_pvt.set_invalid_rule_message (
456: p_rgd_code => p_rgd_code,
457: p_rdf_code => p_rdf_code);
458: IF (is_debug_statement_on) THEN
459: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.set_invalid_rule_message');
455: okl_am_util_pvt.set_invalid_rule_message (
456: p_rgd_code => p_rgd_code,
457: p_rdf_code => p_rdf_code);
458: IF (is_debug_statement_on) THEN
459: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.set_invalid_rule_message');
460: END IF;
461:
462: l_return_status := OKL_API.G_RET_STS_ERROR;
463:
525: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'In param, p_chr_id: '||p_chr_id);
526: END IF;
527:
528: IF (is_debug_statement_on) THEN
529: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
530: END IF;
531: okl_am_util_pvt.get_rule_record (
532: p_rgd_code => p_rgd_code,
533: p_rdf_code => p_rdf_code,
527:
528: IF (is_debug_statement_on) THEN
529: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
530: END IF;
531: okl_am_util_pvt.get_rule_record (
532: p_rgd_code => p_rgd_code,
533: p_rdf_code => p_rdf_code,
534: p_chr_id => p_chr_id,
535: p_cle_id => NULL,
536: p_message_yn => FALSE,
537: x_rulv_rec => l_rulv_rec,
538: x_return_status => l_return_status);
539: IF (is_debug_statement_on) THEN
540: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
541: END IF;
542:
543: -- If rule is not found, return Success
544: -- If rule is found, check its setup
673: -- Budget Amount
674: -- *************
675:
676: IF (is_debug_statement_on) THEN
677: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
678: END IF;
679: okl_am_util_pvt.get_rule_record (
680: p_rgd_code => l_rgd_code,
681: p_rdf_code => 'AMPRBA',
675:
676: IF (is_debug_statement_on) THEN
677: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
678: END IF;
679: okl_am_util_pvt.get_rule_record (
680: p_rgd_code => l_rgd_code,
681: p_rdf_code => 'AMPRBA',
682: p_chr_id => p_chr_id,
683: p_cle_id => NULL,
684: p_message_yn => TRUE,
685: x_rulv_rec => l_rulv_rec,
686: x_return_status => l_return_status);
687: IF (is_debug_statement_on) THEN
688: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
689: END IF;
690:
691: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
692: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
710: -- Strategy
711: -- ********
712:
713: IF (is_debug_statement_on) THEN
714: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
715: END IF;
716: okl_am_util_pvt.get_rule_record(
717: p_rgd_code => l_rgd_code,
718: p_rdf_code => 'AMPRST',
712:
713: IF (is_debug_statement_on) THEN
714: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
715: END IF;
716: okl_am_util_pvt.get_rule_record(
717: p_rgd_code => l_rgd_code,
718: p_rdf_code => 'AMPRST',
719: p_chr_id => p_chr_id,
720: p_cle_id => NULL,
721: p_message_yn => TRUE,
722: x_rulv_rec => l_rulv_rec,
723: x_return_status => l_return_status);
724: IF (is_debug_statement_on) THEN
725: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
726: END IF;
727:
728: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
729: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
735: -- Assignment Group
736: -- ****************
737:
738: IF (is_debug_statement_on) THEN
739: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
740: END IF;
741: okl_am_util_pvt.get_rule_record(
742: p_rgd_code => l_rgd_code,
743: p_rdf_code => 'AMPRAG',
737:
738: IF (is_debug_statement_on) THEN
739: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
740: END IF;
741: okl_am_util_pvt.get_rule_record(
742: p_rgd_code => l_rgd_code,
743: p_rdf_code => 'AMPRAG',
744: p_chr_id => p_chr_id,
745: p_cle_id => NULL,
746: p_message_yn => TRUE,
747: x_rulv_rec => l_rulv_rec,
748: x_return_status => l_return_status);
749: IF (is_debug_statement_on) THEN
750: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
751: END IF;
752:
753: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
754: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
760: -- Execution Due Date
761: -- ******************
762:
763: IF (is_debug_statement_on) THEN
764: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
765: END IF;
766: okl_am_util_pvt.get_rule_record(
767: p_rgd_code => l_rgd_code,
768: p_rdf_code => 'AMPRED',
762:
763: IF (is_debug_statement_on) THEN
764: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
765: END IF;
766: okl_am_util_pvt.get_rule_record(
767: p_rgd_code => l_rgd_code,
768: p_rdf_code => 'AMPRED',
769: p_chr_id => p_chr_id,
770: p_cle_id => NULL,
771: p_message_yn => TRUE,
772: x_rulv_rec => l_rulv_rec,
773: x_return_status => l_return_status);
774: IF (is_debug_statement_on) THEN
775: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
776: END IF;
777:
778: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
779: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
842: -- Top End of Term Purchase Option Formula
843: -- ***************************************
844:
845: IF (is_debug_statement_on) THEN
846: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
847: END IF;
848: okl_am_util_pvt.get_rule_record(
849: p_rgd_code => 'AMTFOC',
850: p_rdf_code => 'AMBPOC',
844:
845: IF (is_debug_statement_on) THEN
846: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
847: END IF;
848: okl_am_util_pvt.get_rule_record(
849: p_rgd_code => 'AMTFOC',
850: p_rdf_code => 'AMBPOC',
851: p_chr_id => p_chr_id,
852: p_cle_id => NULL,
853: p_message_yn => TRUE,
854: x_rulv_rec => l_rulv_rec,
855: x_return_status => l_return_status);
856: IF (is_debug_statement_on) THEN
857: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
858: END IF;
859:
860: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
861: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
1216: -- Quote Effectivity for Termination and Repurchase Quotes
1217: -- *******************************************************
1218:
1219: IF (is_debug_statement_on) THEN
1220: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1221: END IF;
1222: okl_am_util_pvt.get_rule_record(
1223: p_rgd_code => 'AMTQPR',
1224: p_rdf_code => 'AMQTEF',
1218:
1219: IF (is_debug_statement_on) THEN
1220: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1221: END IF;
1222: okl_am_util_pvt.get_rule_record(
1223: p_rgd_code => 'AMTQPR',
1224: p_rdf_code => 'AMQTEF',
1225: p_chr_id => p_chr_id,
1226: p_cle_id => NULL,
1227: p_message_yn => TRUE,
1228: x_rulv_rec => l_rulv_rec,
1229: x_return_status => l_return_status);
1230: IF (is_debug_statement_on) THEN
1231: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
1232: END IF;
1233:
1234: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
1235: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
1256: -- Term Status for Termination Quote
1257: -- *********************************
1258:
1259: IF (is_debug_statement_on) THEN
1260: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1261: END IF;
1262: okl_am_util_pvt.get_rule_record(
1263: p_rgd_code => 'AMTQPR',
1264: p_rdf_code => 'AMTSET',
1258:
1259: IF (is_debug_statement_on) THEN
1260: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1261: END IF;
1262: okl_am_util_pvt.get_rule_record(
1263: p_rgd_code => 'AMTQPR',
1264: p_rdf_code => 'AMTSET',
1265: p_chr_id => p_chr_id,
1266: p_cle_id => NULL,
1267: p_message_yn => TRUE,
1268: x_rulv_rec => l_rulv_rec,
1269: x_return_status => l_return_status);
1270: IF (is_debug_statement_on) THEN
1271: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
1272: END IF;
1273:
1274: IF l_return_status <> OKL_API.G_RET_STS_SUCCESS THEN
1275: IF l_overall_status <> OKL_API.G_RET_STS_UNEXP_ERROR THEN
1644: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'In param, p_chr_id: '||p_chr_id);
1645: END IF;
1646:
1647: IF (is_debug_statement_on) THEN
1648: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_bill_to_address');
1649: END IF;
1650: okl_am_util_pvt.get_bill_to_address (
1651: p_contract_id => p_chr_id,
1652: x_bill_to_address_rec => l_bill_to_address_rec,
1646:
1647: IF (is_debug_statement_on) THEN
1648: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_bill_to_address');
1649: END IF;
1650: okl_am_util_pvt.get_bill_to_address (
1651: p_contract_id => p_chr_id,
1652: x_bill_to_address_rec => l_bill_to_address_rec,
1653: x_return_status => l_return_status);
1654: IF (is_debug_statement_on) THEN
1651: p_contract_id => p_chr_id,
1652: x_bill_to_address_rec => l_bill_to_address_rec,
1653: x_return_status => l_return_status);
1654: IF (is_debug_statement_on) THEN
1655: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_bill_to_address , return status: ' || l_return_status);
1656: END IF;
1657:
1658: x_return_status := l_return_status;
1659: IF (is_debug_procedure_on) THEN
1734: -- Get Security Deposit Rule
1735: -- *************************
1736:
1737: IF (is_debug_statement_on) THEN
1738: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1739: END IF;
1740: okl_am_util_pvt.get_rule_record (
1741: p_rgd_code => 'LASDEP',
1742: p_rdf_code => 'LASDEP',
1736:
1737: IF (is_debug_statement_on) THEN
1738: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'calling okl_am_util_pvt.get_rule_record');
1739: END IF;
1740: okl_am_util_pvt.get_rule_record (
1741: p_rgd_code => 'LASDEP',
1742: p_rdf_code => 'LASDEP',
1743: p_chr_id => p_chr_id,
1744: p_cle_id => NULL,
1745: x_rulv_rec => l_rulv_rec,
1746: x_return_status => l_return_status,
1747: p_message_yn => FALSE);
1748: IF (is_debug_statement_on) THEN
1749: OKL_DEBUG_PUB.LOG_DEBUG(G_LEVEL_STATEMENT,l_module_name,'called okl_am_util_pvt.get_rule_record , return status: ' || l_return_status);
1750: END IF;
1751:
1752: IF l_return_status = OKL_API.G_RET_STS_SUCCESS THEN
1753: