51:
52: BEGIN
53: x_return_status := G_RET_STS_SUCCESS;
54:
55: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
57: 'Input Params to simple_srch ' || ' ' ||
58: 'p_contract_party_id: ' || p_contract_party_id || ' ' ||
59: 'p_account_id : ' || p_account_id);
52: BEGIN
53: x_return_status := G_RET_STS_SUCCESS;
54:
55: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
56: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
57: 'Input Params to simple_srch ' || ' ' ||
58: 'p_contract_party_id: ' || p_contract_party_id || ' ' ||
59: 'p_account_id : ' || p_account_id);
60: END IF;
82: l_contract_tbl
83: );
84: FOR j in 1..l_contract_tbl.COUNT
85: LOOP
86: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
87: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
88: 'Contract Number : ' || l_contract_tbl(j).contract_number || l_contract_tbl(j).contract_number_modifier);
89: END IF;
90: x_contract_tbl(j).contract_number := l_contract_tbl(j).contract_number;
83: );
84: FOR j in 1..l_contract_tbl.COUNT
85: LOOP
86: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
87: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
88: 'Contract Number : ' || l_contract_tbl(j).contract_number || l_contract_tbl(j).contract_number_modifier);
89: END IF;
90: x_contract_tbl(j).contract_number := l_contract_tbl(j).contract_number;
91: x_contract_tbl(j).contract_number_modifier := l_contract_tbl(j).contract_number_modifier;
104:
105: EXCEPTION
106: WHEN OTHERS
107: THEN
108: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
109: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
110: 'Error occured ' || SQLerrm);
111: END IF;
112: OKC_API.set_message(
105: EXCEPTION
106: WHEN OTHERS
107: THEN
108: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
109: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.simple_srch_rslts',
110: 'Error occured ' || SQLerrm);
111: END IF;
112: OKC_API.set_message(
113: p_app_name => g_app_name_oks,
297: l_contract_tbl OKS_ENTITLEMENTS_PUB.output_tbl_contract;
298: l_clvl_tbl_indx NUMBER :=1;
299:
300: BEGIN
301: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
302: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
303: 'p_contract_number :' || p_contract_number || ' ' ||
304: 'p_contract_status_code: ' || p_contract_status_code || ' '||
305: 'p_start_date_from : ' || p_start_date_from || ' ' ||
298: l_clvl_tbl_indx NUMBER :=1;
299:
300: BEGIN
301: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
302: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
303: 'p_contract_number :' || p_contract_number || ' ' ||
304: 'p_contract_status_code: ' || p_contract_status_code || ' '||
305: 'p_start_date_from : ' || p_start_date_from || ' ' ||
306: 'p_start_date_to :' || p_start_date_to || ' ' ||
406: IF p_account_check_all='ALL'
407: THEN
408: FOR i in 1..p_account_all_id.COUNT
409: LOOP
410: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
412: 'p_account_all_id(i).ID IS : ' || p_account_all_id(i).ID);
413: END IF;
414: l_clvl_id_tbl(l_clvl_tbl_indx).covlvl_id := p_account_all_id(i).ID;
407: THEN
408: FOR i in 1..p_account_all_id.COUNT
409: LOOP
410: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
411: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
412: 'p_account_all_id(i).ID IS : ' || p_account_all_id(i).ID);
413: END IF;
414: l_clvl_id_tbl(l_clvl_tbl_indx).covlvl_id := p_account_all_id(i).ID;
415: l_clvl_id_tbl(l_clvl_tbl_indx).covlvl_code := 'OKX_CUSTACCT';
448: );
449:
450: FOR j in 1..l_contract_tbl.COUNT
451: LOOP
452: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
453: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
454: 'Contract Number ' || l_contract_tbl(j).contract_number || l_contract_tbl(j).contract_number_modifier);
455: END IF;
456:
449:
450: FOR j in 1..l_contract_tbl.COUNT
451: LOOP
452: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
453: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
454: 'Contract Number ' || l_contract_tbl(j).contract_number || l_contract_tbl(j).contract_number_modifier);
455: END IF;
456:
457: x_contract_tbl(j).contract_number := l_contract_tbl(j).contract_number;
471:
472: EXCEPTION
473: WHEN OTHERS
474: THEN
475: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
477: 'Exception occured : ' || SQLerrm);
478: END IF;
479: OKC_API.set_message(
472: EXCEPTION
473: WHEN OTHERS
474: THEN
475: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
476: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.cntrct_srch_rslts',
477: 'Exception occured : ' || SQLerrm);
478: END IF;
479: OKC_API.set_message(
480: p_app_name => g_app_name_oks,
557: l_party_sites_tbl_type OKS_ENTITLEMENTS_WEB.party_sites_tbl_type;
558: l_party_sites_tbl_indx NUMBER :=1;
559:
560: BEGIN
561: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
562: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_sites',
563: 'Inside Party Sites: ' || ' ' ||
564: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
565: 'p_site_name_arg :' || p_site_name_arg );
558: l_party_sites_tbl_indx NUMBER :=1;
559:
560: BEGIN
561: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
562: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_sites',
563: 'Inside Party Sites: ' || ' ' ||
564: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
565: 'p_site_name_arg :' || p_site_name_arg );
566:
662: l_party_items_tbl_type OKS_ENTITLEMENTS_WEB.party_items_tbl_type;
663: l_party_items_tbl_indx NUMBER :=1;
664:
665: BEGIN
666: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
667: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_items',
668: 'Inside Party Items: ' || ' ' ||
669: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
670: 'p_item_name_arg :' || p_item_name_arg );
663: l_party_items_tbl_indx NUMBER :=1;
664:
665: BEGIN
666: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
667: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_items',
668: 'Inside Party Items: ' || ' ' ||
669: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
670: 'p_item_name_arg :' || p_item_name_arg );
671:
768: l_party_systems_tbl_indx NUMBER :=1;
769: l_account_tbl_indx NUMBER :=1;
770:
771: BEGIN
772: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
773: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_systems',
774: 'Inside party_systems: ' || ' ' ||
775: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
776: 'p_system_name_arg :' || p_system_name_arg );
769: l_account_tbl_indx NUMBER :=1;
770:
771: BEGIN
772: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
773: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_systems',
774: 'Inside party_systems: ' || ' ' ||
775: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
776: 'p_system_name_arg :' || p_system_name_arg );
777:
872: l_party_products_tbl_indx NUMBER :=1;
873: l_account_tbl_indx NUMBER :=1;
874:
875: BEGIN
876: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
877: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_products',
878: 'Inside party_products: ' || ' ' ||
879: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
880: 'p_product_name_arg :' || p_product_name_arg );
873: l_account_tbl_indx NUMBER :=1;
874:
875: BEGIN
876: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
877: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_products',
878: 'Inside party_products: ' || ' ' ||
879: 'p_party_id_arg :' || p_party_id_arg || ' ' ||
880: 'p_product_name_arg :' || p_product_name_arg );
881:
965: l_contract_status_tbl_indx NUMBER :=1;
966:
967: BEGIN
968:
969: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
970: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.adv_search_overview',
971: 'Inside adv_search_overview : ' || ' ' ||
972: 'p_party_id_arg :' || p_party_id_arg );
973:
966:
967: BEGIN
968:
969: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
970: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.adv_search_overview',
971: 'Inside adv_search_overview : ' || ' ' ||
972: 'p_party_id_arg :' || p_party_id_arg );
973:
974: END IF;
1073: l_contract_id_chr VARCHAR2(500);
1074:
1075: BEGIN
1076:
1077: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.contract_number_overview',
1079: 'Inside contract_number_overview : ' || ' ' ||
1080: 'p_contract_number_arg :' || p_contract_number_arg || ' ' ||
1081: 'p_contract_modifier_arg :' || p_contract_modifier_arg );
1074:
1075: BEGIN
1076:
1077: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1078: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.contract_number_overview',
1079: 'Inside contract_number_overview : ' || ' ' ||
1080: 'p_contract_number_arg :' || p_contract_number_arg || ' ' ||
1081: 'p_contract_modifier_arg :' || p_contract_modifier_arg );
1082:
1581: l_country VARCHAR2(60);
1582: l_temp_lse_id NUMBER;
1583:
1584: BEGIN
1585: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.contract_overview',
1587: 'Inside contract_overview : ' || ' ' ||
1588: 'p_contract_id_arg :' || p_contract_id_arg);
1589:
1582: l_temp_lse_id NUMBER;
1583:
1584: BEGIN
1585: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1586: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.contract_overview',
1587: 'Inside contract_overview : ' || ' ' ||
1588: 'p_contract_id_arg :' || p_contract_id_arg);
1589:
1590: END IF;
1905:
1906: l_party_contact_name VARCHAR2(360);
1907:
1908: BEGIN
1909: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1910: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_contact_name',
1911: 'Inside party_contact_name : ' || ' ' ||
1912: 'p_owner_table_id :' || p_owner_table_id || ' ' ||
1913: 'p_object1_id1 : ' || p_object1_id1 || ' ' ||
1906: l_party_contact_name VARCHAR2(360);
1907:
1908: BEGIN
1909: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
1910: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_contact_name',
1911: 'Inside party_contact_name : ' || ' ' ||
1912: 'p_owner_table_id :' || p_owner_table_id || ' ' ||
1913: 'p_object1_id1 : ' || p_object1_id1 || ' ' ||
1914: 'p_object1_id2 : ' || p_object1_id2);
2036: l_org_id NUMBER;
2037:
2038: BEGIN
2039:
2040: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2041: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_overview',
2042: 'Inside party_overview : ' || ' ' ||
2043: 'p_contract_id_arg :' || p_contract_id_arg || ' ' ||
2044: 'p_party_rle_code_arg :' || p_party_rle_code_arg);
2037:
2038: BEGIN
2039:
2040: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2041: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_overview',
2042: 'Inside party_overview : ' || ' ' ||
2043: 'p_contract_id_arg :' || p_contract_id_arg || ' ' ||
2044: 'p_party_rle_code_arg :' || p_party_rle_code_arg);
2045:
2168:
2169: l_party_contact_tbl_indx NUMBER :=1;
2170:
2171: BEGIN
2172: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2173: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_contacts_overview',
2174: 'Inside party_contacts_overview : ' || ' ' ||
2175: 'p_contact_id_arg :' || p_contact_id_arg);
2176:
2169: l_party_contact_tbl_indx NUMBER :=1;
2170:
2171: BEGIN
2172: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2173: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.party_contacts_overview',
2174: 'Inside party_contacts_overview : ' || ' ' ||
2175: 'p_contact_id_arg :' || p_contact_id_arg);
2176:
2177: END IF;
2728: l_timeunit VARCHAR2(25);
2729: l_return_status VARCHAR2(100);
2730:
2731: BEGIN
2732: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2733: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.line_overview',
2734: 'Inside line_overview : ' || ' ' ||
2735: 'p_line_id_arg :' || p_line_id_arg);
2736:
2729: l_return_status VARCHAR2(100);
2730:
2731: BEGIN
2732: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2733: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.line_overview',
2734: 'Inside line_overview : ' || ' ' ||
2735: 'p_line_id_arg :' || p_line_id_arg);
2736:
2737: END IF;
3009:
3010: l_bus_proc_tbl_indx NUMBER := 1;
3011:
3012: BEGIN
3013: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3014: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.coverage_overview',
3015: 'Inside coverage_overview : ' || ' ' ||
3016: 'p_coverage_ID_arg :' || p_coverage_ID_arg || ' ' ||
3017: 'p_contract_ID_arg : ' || p_contract_ID_arg);
3010: l_bus_proc_tbl_indx NUMBER := 1;
3011:
3012: BEGIN
3013: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3014: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.coverage_overview',
3015: 'Inside coverage_overview : ' || ' ' ||
3016: 'p_coverage_ID_arg :' || p_coverage_ID_arg || ' ' ||
3017: 'p_contract_ID_arg : ' || p_contract_ID_arg);
3018:
3435: l_previous_resolution_id NUMBER := 1;
3436:
3437: BEGIN
3438:
3439: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3440: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.bus_proc_overview',
3441: 'Inside bus_proc_overview : ' || ' ' ||
3442: 'p_bus_proc_ID_arg :' || p_bus_proc_ID_arg|| ' ' ||
3443: 'p_contract_ID_arg : ' || p_contract_ID_arg);
3436:
3437: BEGIN
3438:
3439: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3440: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.bus_proc_overview',
3441: 'Inside bus_proc_overview : ' || ' ' ||
3442: 'p_bus_proc_ID_arg :' || p_bus_proc_ID_arg|| ' ' ||
3443: 'p_contract_ID_arg : ' || p_contract_ID_arg);
3444:
3847: l_covered_prod_tbl_indx NUMBER := 1;
3848: l_org_id NUMBER;
3849: BEGIN
3850:
3851: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3852: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.usage_overview',
3853: 'Inside Usage Overview : ' || ' ' ||
3854: 'p_line_id_arg :' || p_line_id_arg);
3855:
3848: l_org_id NUMBER;
3849: BEGIN
3850:
3851: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
3852: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.usage_overview',
3853: 'Inside Usage Overview : ' || ' ' ||
3854: 'p_line_id_arg :' || p_line_id_arg);
3855:
3856: END IF;
4093:
4094: l_covered_prod_tbl_indx NUMBER := 1;
4095:
4096: BEGIN
4097: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4098: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.product_overview',
4099: 'Inside product_overview : ' || ' ' ||
4100: 'p_covered_prod_ID_arg :' || p_covered_prod_ID_arg);
4101:
4094: l_covered_prod_tbl_indx NUMBER := 1;
4095:
4096: BEGIN
4097: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
4098: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT ||'.product_overview',
4099: 'Inside product_overview : ' || ' ' ||
4100: 'p_covered_prod_ID_arg :' || p_covered_prod_ID_arg);
4101:
4102: END IF;