[Home] [Help]
15: PROCEDURE Get_Attr_Tbl
16: IS
17: I NUMBER:=0;
18: --
19: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
20: --
21: BEGIN
22:
23: FND_API.g_attr_tbl.DELETE;
256: ) RETURN VARCHAR2
257: IS
258: l_accounting_rule VARCHAR2(240) := NULL;
259: --
260: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
261: --
262: BEGIN
263:
264: IF p_accounting_rule_id IS NOT NULL THEN
308: IS
309: l_calculate_price_flag VARCHAR2(240) := NULL;
310: l_lookup_type VARCHAR2(80) :='CALCULATE_PRICE_FLAG';
311: --
312: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
313: --
314: BEGIN
315:
316: IF l_debug_level > 0 THEN
313: --
314: BEGIN
315:
316: IF l_debug_level > 0 THEN
317: oe_debug_pub.add( 'IN GET VALUES ' || P_CALCULATE_PRICE_FLAG ) ;
318: END IF;
319: IF p_calculate_price_flag IS NOT NULL THEN
320:
321: SELECT MEANING
327:
328: END IF;
329:
330: IF l_debug_level > 0 THEN
331: oe_debug_pub.add( 'IN GET VALUES ' || L_CALCULATE_PRICE_FLAG ) ;
332: END IF;
333: RETURN l_calculate_price_flag;
334:
335: EXCEPTION
370: ) RETURN VARCHAR2
371: IS
372: l_agreement VARCHAR2(240) := NULL;
373: --
374: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
375: --
376: BEGIN
377:
378: -- Appended name with revision for Bug 2249065
424: ) RETURN VARCHAR2
425: IS
426: l_conversion_type VARCHAR2(240) := NULL;
427: --
428: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
429: --
430: BEGIN
431:
432: IF p_conversion_type_code IS NOT NULL THEN
474: ) RETURN VARCHAR2
475: IS
476: l_deliver_to_contact VARCHAR2(240) := NULL;
477: --
478: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
479: --
480: BEGIN
481:
482: IF p_deliver_to_contact_id IS NOT NULL THEN
524: ) RETURN VARCHAR2
525: IS
526: l_inventory_org VARCHAR2(240) := NULL;
527: --
528: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
529: --
530: BEGIN
531:
532: IF p_inventory_org_id IS NOT NULL THEN
593:
594: )
595: IS
596: --
597: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
598: --
599: BEGIN
600:
601: IF p_deliver_to_org_id is NOT NULL THEN
673: IS
674: l_fob_point VARCHAR2(240) := NULL;
675: l_lookup_type VARCHAR2(80) :='FOB';
676: --
677: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
678: --
679: BEGIN
680:
681: IF p_fob_point_code IS NOT NULL THEN
725: IS
726: l_freight_terms VARCHAR2(240) := NULL;
727: l_lookup_type VARCHAR2(80) :='FREIGHT_TERMS';
728: --
729: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
730: --
731: BEGIN
732:
733: IF p_freight_terms_code IS NOT NULL THEN
778: ) RETURN VARCHAR2
779: IS
780: l_intermed_ship_to_contact VARCHAR2(240) := NULL;
781: --
782: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
783: --
784: BEGIN
785:
786: IF p_intermed_ship_to_contact_id IS NOT NULL THEN
845:
846: )
847: IS
848: --
849: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
850: --
851: BEGIN
852:
853: IF p_intermed_ship_to_org_id is NOT NULL THEN
924: ) RETURN VARCHAR2
925: IS
926: l_invoice_to_contact VARCHAR2(240) := NULL;
927: --
928: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
929: --
930: BEGIN
931:
932: IF p_invoice_to_contact_id IS NOT NULL THEN
993:
994: )
995: IS
996: --
997: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
998: --
999: BEGIN
1000:
1001: IF p_invoice_to_org_id is NOT NULL THEN
1072: ) RETURN VARCHAR2
1073: IS
1074: l_invoicing_rule VARCHAR2(240) := NULL;
1075: --
1076: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1077: --
1078: BEGIN
1079:
1080: IF p_invoicing_rule_id IS NOT NULL THEN
1122: ) RETURN VARCHAR2
1123: IS
1124: l_order_source VARCHAR2(240) := NULL;
1125: --
1126: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1127: --
1128: BEGIN
1129:
1130: IF p_order_source_id IS NOT NULL THEN
1172: ) RETURN VARCHAR2
1173: IS
1174: l_order_type VARCHAR2(240) := NULL;
1175: --
1176: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1177: --
1178: BEGIN
1179:
1180: IF p_order_type_id IS NOT NULL THEN
1222: ) RETURN VARCHAR2
1223: IS
1224: l_payment_term VARCHAR2(240) := NULL;
1225: --
1226: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1227: --
1228: BEGIN
1229:
1230: IF p_payment_term_id IS NOT NULL THEN
1272: ) RETURN VARCHAR2
1273: IS
1274: l_price_list VARCHAR2(240) := NULL;
1275: --
1276: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1277: --
1278: BEGIN
1279:
1280: IF p_price_list_id IS NOT NULL THEN
1323: ) RETURN VARCHAR2
1324: IS
1325: l_new_modifier_list VARCHAR2(240) := NULL;
1326: --
1327: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1328: --
1329: BEGIN
1330:
1331: IF p_new_modifier_list_id IS NOT NULL THEN
1373: IS
1374: l_demand_class VARCHAR2(240) := NULL;
1375: l_lookup_type VARCHAR2(80) :='DEMAND_CLASS';
1376: --
1377: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1378: --
1379: BEGIN
1380:
1381: IF p_demand_class_code IS NOT NULL THEN
1425: IS
1426: l_shipment_priority VARCHAR2(240) := NULL;
1427: l_lookup_type VARCHAR2(80) :='SHIPMENT_PRIORITY';
1428: --
1429: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1430: --
1431: BEGIN
1432:
1433: IF p_shipment_priority_code IS NOT NULL THEN
1487:
1488: )
1489: IS
1490: --
1491: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1492: --
1493: BEGIN
1494:
1495: IF p_ship_from_org_id is NOT NULL THEN
1558: ) RETURN VARCHAR2
1559: IS
1560: l_ship_to_contact VARCHAR2(240) := NULL;
1561: --
1562: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1563: --
1564: BEGIN
1565:
1566: IF p_ship_to_contact_id IS NOT NULL THEN
1627:
1628: )
1629: IS
1630: --
1631: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1632: --
1633: BEGIN
1634:
1635: IF p_ship_to_org_id is NOT NULL THEN
1705: ) RETURN VARCHAR2
1706: IS
1707: l_sold_to_contact VARCHAR2(240) := NULL;
1708: --
1709: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1710: --
1711: BEGIN
1712:
1713: IF p_sold_to_contact_id IS NOT NULL THEN
1756: x_customer_number OUT NOCOPY VARCHAR2
1757: )
1758: IS
1759: --
1760: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1761: --
1762: BEGIN
1763:
1764: IF p_sold_to_org_id is NOT NULL THEN
1763:
1764: IF p_sold_to_org_id is NOT NULL THEN
1765:
1766: IF l_debug_level > 0 THEN
1767: oe_debug_pub.add( 'DOING SELECT FOR CUSTOMER_NUMBER' ) ;
1768: END IF;
1769: SELECT O.NAME
1770: , O.CUSTOMER_NUMBER
1771: INTO x_org
1775:
1776: ELSE
1777:
1778: IF l_debug_level > 0 THEN
1779: oe_debug_pub.add( 'INSIDE QUERY FOR CUSTOMER NUMBER - NO ORG_ID PASSED' ) ;
1780: END IF;
1781: x_org := NULL ;
1782: x_customer_number := NULL ;
1783:
1821: x_account_description OUT NOCOPY VARCHAR2,
1822: x_registry_id OUT NOCOPY VARCHAR2
1823: ) IS
1824: --
1825: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1826: --
1827: BEGIN
1828:
1829: IF p_sold_to_org_id is NOT NULL THEN
1828:
1829: IF p_sold_to_org_id is NOT NULL THEN
1830:
1831: IF l_debug_level > 0 THEN
1832: oe_debug_pub.add( 'DOING SELECT FOR CUSTOMER_NUMBER' ) ;
1833: END IF;
1834: SELECT P.PARTY_NAME
1835: , C.ACCOUNT_NUMBER
1836: , C.ACCOUNT_NAME
1846:
1847: ELSE
1848:
1849: IF l_debug_level > 0 THEN
1850: oe_debug_pub.add( 'INSIDE QUERY FOR CUSTOMER NUMBER - NO ORG_ID PASSED' ) ;
1851: END IF;
1852: x_org := NULL ;
1853: x_customer_number := NULL ;
1854: x_account_description:= NULL ;
1893:
1894: -- eBTax Changes
1895: l_lookup_type VARCHAR2(80) :='ZX_EXEMPTION_CONTROL';
1896: --
1897: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1898: --
1899: BEGIN
1900:
1901: IF p_tax_exempt_flag IS NOT NULL THEN
1946: l_tax_exempt_reason VARCHAR2(240) := NULL;
1947: -- eBTax changes
1948: l_lookup_type VARCHAR2(80) :='ZX_EXEMPTION_REASON_CODE';
1949: --
1950: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1951: --
1952: BEGIN
1953:
1954: IF p_tax_exempt_reason_code IS NOT NULL THEN
1998: IS
1999: l_tax_point VARCHAR2(240) := NULL;
2000: l_lookup_type VARCHAR2(80) :='TAX_POINT_TYPE';
2001: --
2002: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2003: --
2004: BEGIN
2005:
2006: IF p_tax_point_code IS NOT NULL THEN
2049: ) RETURN VARCHAR2
2050: IS
2051: l_discount VARCHAR2(240) := NULL;
2052: --
2053: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2054: --
2055: BEGIN
2056:
2057: IF p_discount_id IS NOT NULL THEN
2105: select name
2106: from oe_sales_credit_types
2107: where sales_credit_type_id = p_sales_credit_type_id;
2108: --
2109: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2110: --
2111: BEGIN
2112:
2113: IF p_sales_credit_type_id IS NOT NULL THEN
2156: select name
2157: from ra_salesreps
2158: where salesrep_id = p_salesrep_id;
2159: --
2160: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2161: --
2162: BEGIN
2163:
2164: IF p_salesrep_id IS NOT NULL THEN
2203: ) RETURN VARCHAR2
2204: IS
2205: l_customer_item VARCHAR2(240) := NULL;
2206: --
2207: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2208: --
2209: BEGIN
2210:
2211: IF p_customer_item_id IS NOT NULL THEN
2255: ) RETURN VARCHAR2
2256: IS
2257: l_demand_bucket_type VARCHAR2(240) := NULL;
2258: --
2259: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2260: --
2261: BEGIN
2262:
2263: IF p_demand_bucket_type_code IS NOT NULL THEN
2308: IS
2309: l_inventory_item VARCHAR2(240) := NULL;
2310: l_validation_org_id NUMBER := NULL;
2311: --
2312: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2313: --
2314: BEGIN
2315:
2316: IF p_inventory_item_id IS NOT NULL THEN
2365: ) RETURN VARCHAR2
2366: IS
2367: l_item_type VARCHAR2(240) := NULL;
2368: --
2369: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2370: --
2371: BEGIN
2372:
2373: IF p_item_type_code IS NOT NULL THEN
2417: ) RETURN VARCHAR2
2418: IS
2419: l_line_type VARCHAR2(240) := NULL;
2420: --
2421: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2422: --
2423: BEGIN
2424:
2425: IF p_line_type_id IS NOT NULL THEN
2467: ) RETURN VARCHAR2
2468: IS
2469: l_project VARCHAR2(240) := NULL;
2470: --
2471: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2472: --
2473: BEGIN
2474: IF p_project_id IS NOT NULL THEN
2475:
2514: ) RETURN VARCHAR2
2515: IS
2516: l_rla_schedule_type VARCHAR2(240) := NULL;
2517: --
2518: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2519: --
2520: BEGIN
2521:
2522: IF p_rla_schedule_type_code IS NOT NULL THEN
2566: ) RETURN VARCHAR2
2567: IS
2568: l_task VARCHAR2(240) := NULL;
2569: --
2570: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2571: --
2572: BEGIN
2573:
2574: IF p_task_id IS NOT NULL THEN
2614: ) RETURN VARCHAR2
2615: IS
2616: l_over_ship_reason VARCHAR2(240) := NULL;
2617: --
2618: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2619: --
2620: BEGIN
2621:
2622: IF p_over_ship_reason_code IS NOT NULL THEN
2667: IS
2668: l_source_type VARCHAR2(240) := NULL;
2669: l_lookup_type VARCHAR2(80) :='SOURCE_TYPE';
2670: --
2671: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2672: --
2673: BEGIN
2674:
2675: IF p_source_type_code IS NOT NULL THEN
2719: IS
2720: l_order_date_type VARCHAR2(80) := NULL;
2721: l_lookup_type VARCHAR2(80) := 'REQUEST_DATE_TYPE';
2722: --
2723: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2724: --
2725: BEGIN
2726:
2727: IF p_order_date_type_code IS NOT NULL THEN
2771: IS
2772: l_return_reason VARCHAR2(240) := NULL;
2773: l_lookup_type VARCHAR2(80) :='CREDIT_MEMO_REASON';
2774: --
2775: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2776: --
2777: BEGIN
2778:
2779: IF p_return_reason_code IS NOT NULL THEN
2827:
2828: )
2829: IS
2830: --
2831: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2832: --
2833: BEGIN
2834:
2835: IF p_reference_line_id IS NOT NULL THEN
2894:
2895: )
2896: IS
2897: --
2898: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2899: --
2900: BEGIN
2901:
2902: IF p_reference_cust_trx_line_id IS NOT NULL THEN
2949: ) RETURN VARCHAR2
2950: IS
2951: l_credit_invoice_number VARCHAR2(240) := NULL;
2952: --
2953: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2954: --
2955: BEGIN
2956:
2957: IF p_credit_invoice_line_id IS NOT NULL THEN
3001: ) RETURN VARCHAR2
3002: IS
3003: l_veh_cus_item_cum_key VARCHAR2(240) := NULL;
3004: --
3005: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3006: --
3007: BEGIN
3008:
3009: IF p_veh_cus_item_cum_key_id IS NOT NULL THEN
3054: IS
3055: l_payment_type VARCHAR2(240) := NULL;
3056: l_lookup_type VARCHAR2(80) := 'PAYMENT TYPE';
3057: --
3058: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3059: --
3060: BEGIN
3061:
3062: IF p_payment_type_code IS NOT NULL THEN
3123: IS
3124: l_credit_card VARCHAR2(240) := NULL;
3125: l_lookup_type VARCHAR2(80) :='CREDIT_CARD';
3126: --
3127: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3128: --
3129: BEGIN
3130:
3131: IF p_credit_card_code IS NOT NULL THEN
3173: ) RETURN VARCHAR2
3174: IS
3175: l_commitment VARCHAR2(240) := NULL;
3176: --
3177: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3178: --
3179: BEGIN
3180:
3181: IF p_commitment_id IS NOT NULL THEN
3227: ) RETURN VARCHAR2
3228: IS
3229: l_agreement_contact VARCHAR2(240) := NULL;
3230: --
3231: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3232: --
3233: BEGIN
3234:
3235: IF p_agreement_contact_id IS NOT NULL THEN
3279: ) RETURN VARCHAR2
3280: IS
3281: l_agreement_type VARCHAR2(240) := NULL;
3282: --
3283: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3284: --
3285: BEGIN
3286:
3287: IF p_agreement_type_code IS NOT NULL THEN
3331: ) RETURN VARCHAR2
3332: IS
3333: l_customer VARCHAR2(240) := NULL;
3334: --
3335: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3336: --
3337: BEGIN
3338:
3339: IF p_sold_to_org_id IS NOT NULL THEN
3383: ) RETURN VARCHAR2
3384: IS
3385: l_invoice_contact VARCHAR2(240) := NULL;
3386: --
3387: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3388: --
3389: BEGIN
3390:
3391: IF p_invoice_contact_id IS NOT NULL THEN
3435: ) RETURN VARCHAR2
3436: IS
3437: l_invoice_to_site_use VARCHAR2(240) := NULL;
3438: --
3439: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3440: --
3441: BEGIN
3442:
3443: IF p_invoice_to_org_id IS NOT NULL THEN
3487: ) RETURN VARCHAR2
3488: IS
3489: l_override_arule VARCHAR2(240) := NULL;
3490: --
3491: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3492: --
3493: BEGIN
3494:
3495: IF p_override_arule_flag IS NOT NULL THEN
3539: ) RETURN VARCHAR2
3540: IS
3541: l_override_irule VARCHAR2(240) := NULL;
3542: --
3543: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3544: --
3545: BEGIN
3546:
3547: IF p_override_irule_flag IS NOT NULL THEN
3591: ) RETURN VARCHAR2
3592: IS
3593: l_revision_reason VARCHAR2(240) := NULL;
3594: --
3595: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3596: --
3597: BEGIN
3598:
3599: IF p_revision_reason_code IS NOT NULL THEN
3643: ) RETURN VARCHAR2
3644: IS
3645: l_ship_method VARCHAR2(240) := NULL;
3646: --
3647: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3648: --
3649: BEGIN
3650:
3651: IF p_ship_method_code IS NOT NULL THEN
3695: ) RETURN VARCHAR2
3696: IS
3697: l_term VARCHAR2(240) := NULL;
3698: --
3699: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3700: --
3701: BEGIN
3702:
3703: IF p_term_id IS NOT NULL THEN
3747: ) RETURN VARCHAR2
3748: IS
3749: l_currency VARCHAR2(240) := NULL;
3750: --
3751: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3752: --
3753: BEGIN
3754:
3755: IF p_currency_code IS NOT NULL THEN
3799: ) RETURN VARCHAR2
3800: IS
3801: l_secondary_price_list VARCHAR2(240) := NULL;
3802: --
3803: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3804: --
3805: BEGIN
3806:
3807: IF p_secondary_price_list_id IS NOT NULL THEN
3851: ) RETURN VARCHAR2
3852: IS
3853: l_terms VARCHAR2(240) := NULL;
3854: --
3855: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3856: --
3857: BEGIN
3858:
3859: IF p_terms_id IS NOT NULL THEN
3903: ) RETURN VARCHAR2
3904: IS
3905: l_automatic_discount VARCHAR2(240) := NULL;
3906: --
3907: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3908: --
3909: BEGIN
3910:
3911: IF p_automatic_discount_flag IS NOT NULL THEN
3955: ) RETURN VARCHAR2
3956: IS
3957: l_discount_lines VARCHAR2(240) := NULL;
3958: --
3959: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
3960: --
3961: BEGIN
3962:
3963: IF p_discount_lines_flag IS NOT NULL THEN
4007: ) RETURN VARCHAR2
4008: IS
4009: l_discount_type VARCHAR2(240) := NULL;
4010: --
4011: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4012: --
4013: BEGIN
4014:
4015: IF p_discount_type_code IS NOT NULL THEN
4059: ) RETURN VARCHAR2
4060: IS
4061: l_manual_discount VARCHAR2(240) := NULL;
4062: --
4063: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4064: --
4065: BEGIN
4066:
4067: IF p_manual_discount_flag IS NOT NULL THEN
4111: ) RETURN VARCHAR2
4112: IS
4113: l_override_allowed VARCHAR2(240) := NULL;
4114: --
4115: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4116: --
4117: BEGIN
4118:
4119: IF p_override_allowed_flag IS NOT NULL THEN
4163: ) RETURN VARCHAR2
4164: IS
4165: l_prorate VARCHAR2(240) := NULL;
4166: --
4167: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4168: --
4169: BEGIN
4170:
4171: IF p_prorate_flag IS NOT NULL THEN
4215: ) RETURN VARCHAR2
4216: IS
4217: l_method VARCHAR2(240) := NULL;
4218: --
4219: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4220: --
4221: BEGIN
4222:
4223: IF p_method_code IS NOT NULL THEN
4267: ) RETURN VARCHAR2
4268: IS
4269: l_price_list_line VARCHAR2(240) := NULL;
4270: --
4271: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4272: --
4273: BEGIN
4274:
4275: IF p_price_list_line_id IS NOT NULL THEN
4319: ) RETURN VARCHAR2
4320: IS
4321: l_pricing_rule VARCHAR2(240) := NULL;
4322: --
4323: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4324: --
4325: BEGIN
4326:
4327: IF p_pricing_rule_id IS NOT NULL THEN
4371: ) RETURN VARCHAR2
4372: IS
4373: l_reprice VARCHAR2(240) := NULL;
4374: --
4375: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4376: --
4377: BEGIN
4378:
4379: IF p_reprice_flag IS NOT NULL THEN
4423: ) RETURN VARCHAR2
4424: IS
4425: l_unit VARCHAR2(240) := NULL;
4426: --
4427: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4428: --
4429: BEGIN
4430:
4431: IF p_unit_code IS NOT NULL THEN
4475: ) RETURN VARCHAR2
4476: IS
4477: l_customer_class VARCHAR2(240) := NULL;
4478: --
4479: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4480: --
4481: BEGIN
4482:
4483: IF p_customer_class_code IS NOT NULL THEN
4527: ) RETURN VARCHAR2
4528: IS
4529: l_discount_customer VARCHAR2(240) := NULL;
4530: --
4531: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4532: --
4533: BEGIN
4534:
4535: IF p_discount_customer_id IS NOT NULL THEN
4579: ) RETURN VARCHAR2
4580: IS
4581: l_site_use VARCHAR2(240) := NULL;
4582: --
4583: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4584: --
4585: BEGIN
4586:
4587: IF p_site_use_id IS NOT NULL THEN
4631: ) RETURN VARCHAR2
4632: IS
4633: l_entity VARCHAR2(240) := NULL;
4634: --
4635: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4636: --
4637: BEGIN
4638:
4639: IF p_entity_id IS NOT NULL THEN
4683: ) RETURN VARCHAR2
4684: IS
4685: l_method_type VARCHAR2(240) := NULL;
4686: --
4687: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4688: --
4689: BEGIN
4690:
4691: IF p_method_type_code IS NOT NULL THEN
4735: ) RETURN VARCHAR2
4736: IS
4737: l_lot_serial VARCHAR2(240) := NULL;
4738: --
4739: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4740: --
4741: BEGIN
4742:
4743: IF p_lot_serial_id IS NOT NULL THEN
4787: ) RETURN VARCHAR2
4788: IS
4789: l_appear_on_ack VARCHAR2(240) := NULL;
4790: --
4791: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4792: --
4793: BEGIN
4794:
4795: IF p_appear_on_ack_flag IS NOT NULL THEN
4839: ) RETURN VARCHAR2
4840: IS
4841: l_appear_on_invoice VARCHAR2(240) := NULL;
4842: --
4843: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4844: --
4845: BEGIN
4846:
4847: IF p_appear_on_invoice_flag IS NOT NULL THEN
4891: ) RETURN VARCHAR2
4892: IS
4893: l_charge VARCHAR2(240) := NULL;
4894: --
4895: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4896: --
4897: BEGIN
4898:
4899: IF p_charge_id IS NOT NULL THEN
4943: ) RETURN VARCHAR2
4944: IS
4945: l_charge_type VARCHAR2(240) := NULL;
4946: --
4947: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
4948: --
4949: BEGIN
4950:
4951: IF p_charge_type_id IS NOT NULL THEN
4995: ) RETURN VARCHAR2
4996: IS
4997: l_cost_or_charge VARCHAR2(240) := NULL;
4998: --
4999: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5000: --
5001: BEGIN
5002:
5003: IF p_cost_or_charge_flag IS NOT NULL THEN
5047: ) RETURN VARCHAR2
5048: IS
5049: l_delivery VARCHAR2(240) := NULL;
5050: --
5051: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5052: --
5053: BEGIN
5054:
5055: IF p_delivery_id IS NOT NULL THEN
5099: ) RETURN VARCHAR2
5100: IS
5101: l_departure VARCHAR2(240) := NULL;
5102: --
5103: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5104: --
5105: BEGIN
5106:
5107: IF p_departure_id IS NOT NULL THEN
5151: ) RETURN VARCHAR2
5152: IS
5153: l_estimated VARCHAR2(240) := NULL;
5154: --
5155: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5156: --
5157: BEGIN
5158:
5159: IF p_estimated_flag IS NOT NULL THEN
5203: ) RETURN VARCHAR2
5204: IS
5205: l_invoiced VARCHAR2(240) := NULL;
5206: --
5207: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5208: --
5209: BEGIN
5210:
5211: IF p_invoiced_flag IS NOT NULL THEN
5255: ) RETURN VARCHAR2
5256: IS
5257: l_parent_charge VARCHAR2(240) := NULL;
5258: --
5259: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5260: --
5261: BEGIN
5262:
5263: IF p_parent_charge_id IS NOT NULL THEN
5307: ) RETURN VARCHAR2
5308: IS
5309: l_returnable VARCHAR2(240) := NULL;
5310: --
5311: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5312: --
5313: BEGIN
5314:
5315: IF p_returnable_flag IS NOT NULL THEN
5359: ) RETURN VARCHAR2
5360: IS
5361: l_tax_group VARCHAR2(1) := NULL;
5362: --
5363: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5364: --
5365: BEGIN
5366:
5367: IF p_tax_code IS NOT NULL THEN
5413: l_flow_status VARCHAR2(240) := NULL;
5414: l_lookup_type1 VARCHAR2(80) :='FLOW_STATUS';
5415: l_lookup_type2 VARCHAR2(80) :='LINE_FLOW_STATUS';
5416: --
5417: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5418: --
5419: BEGIN
5420:
5421: IF p_flow_status_code IS NOT NULL THEN
5467: IS
5468: l_freight_carrier VARCHAR2(240) := NULL;
5469: l_ship_from_org_id NUMBER;
5470: --
5471: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5472: --
5473: BEGIN
5474:
5475: IF p_ship_from_org_id = FND_API.G_MISS_NUM THEN
5529: IS
5530: l_sales_channel VARCHAR2(80);
5531: l_lookup_type VARCHAR2(80) := 'SALES_CHANNEL';
5532: --
5533: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5534: --
5535: BEGIN
5536:
5537: IF p_sales_channel_code IS NOT NULL THEN
5583:
5584: IS
5585: l_site_use_code VARCHAR2(30);
5586: --
5587: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5588: --
5589: BEGIN
5590:
5591: IF p_ship_to_org_id is NOT NULL THEN
5646:
5647: IS
5648: l_site_use_code VARCHAR2(30);
5649: --
5650: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5651: --
5652: BEGIN
5653:
5654: IF p_invoice_to_org_id is NOT NULL THEN
5713: , x_inventory_item OUT NOCOPY VARCHAR2)
5714:
5715: IS
5716: --
5717: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5718: --
5719: BEGIN
5720: IF l_debug_level > 0 THEN
5721: oe_debug_pub.add( 'ENTERING ORDERED_ITEM' , 1 ) ;
5717: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5718: --
5719: BEGIN
5720: IF l_debug_level > 0 THEN
5721: oe_debug_pub.add( 'ENTERING ORDERED_ITEM' , 1 ) ;
5722: END IF;
5723: IF NVL(p_item_identifier_type, 'INT') = 'INT' THEN
5724: BEGIN
5725: IF l_debug_level > 0 THEN
5722: END IF;
5723: IF NVL(p_item_identifier_type, 'INT') = 'INT' THEN
5724: BEGIN
5725: IF l_debug_level > 0 THEN
5726: oe_debug_pub.add( 'IN OEXSIDVB ITEM IDENTIFIER IS INT' ) ;
5727: END IF;
5728:
5729: SELECT concatenated_segments
5730: ,concatenated_segments
5733: FROM mtl_system_items_vl
5734: WHERE inventory_item_id = p_inventory_item_id
5735: AND organization_id = p_organization_id;
5736: IF l_debug_level > 0 THEN
5737: oe_debug_pub.add( 'ORDERED_ITEM_DSP: '||X_ORDERED_ITEM ) ;
5738: END IF;
5739:
5740: EXCEPTION
5741: WHEN NO_DATA_FOUND THEN
5747: END;
5748: ELSIF NVL(p_item_identifier_type, 'INT') = 'CUST' THEN
5749: BEGIN
5750: IF l_debug_level > 0 THEN
5751: oe_debug_pub.add( 'IN OEXSIDVB ITEM IDENTIFIER IS CUST' ) ;
5752: END IF;
5753: SELECT citems.customer_item_number
5754: ,sitems.concatenated_segments
5755: INTO x_ordered_item
5773: END;
5774: ELSE
5775: BEGIN
5776: IF l_debug_level > 0 THEN
5777: oe_debug_pub.add( 'IN OEXSIDVB ITEM IDENTIFIER IS GENE' ) ;
5778: END IF;
5779: IF p_ordered_item_id IS NULL THEN
5780: IF l_debug_level > 0 THEN
5781: oe_debug_pub.add( 'ORDERED_ITEM_ID IS NULL ' ) ;
5777: oe_debug_pub.add( 'IN OEXSIDVB ITEM IDENTIFIER IS GENE' ) ;
5778: END IF;
5779: IF p_ordered_item_id IS NULL THEN
5780: IF l_debug_level > 0 THEN
5781: oe_debug_pub.add( 'ORDERED_ITEM_ID IS NULL ' ) ;
5782: oe_debug_pub.add( 'ORDERED_ITEM: '||P_ORDERED_ITEM ) ;
5783: END IF;
5784: SELECT items.cross_reference
5785: ,sitems.concatenated_segments
5778: END IF;
5779: IF p_ordered_item_id IS NULL THEN
5780: IF l_debug_level > 0 THEN
5781: oe_debug_pub.add( 'ORDERED_ITEM_ID IS NULL ' ) ;
5782: oe_debug_pub.add( 'ORDERED_ITEM: '||P_ORDERED_ITEM ) ;
5783: END IF;
5784: SELECT items.cross_reference
5785: ,sitems.concatenated_segments
5786: INTO x_ordered_item
5805: Null;
5806: END;
5807: END IF;
5808: IF l_debug_level > 0 THEN
5809: oe_debug_pub.add( 'ORDERED_ITEM_DSP: '||X_ORDERED_ITEM ) ;
5810: END IF;
5811: EXCEPTION
5812:
5813: WHEN NO_DATA_FOUND THEN
5841: , x_Item_Identifier OUT NOCOPY VARCHAR2)
5842:
5843: IS
5844: --
5845: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5846: l_lookup_type VARCHAR2(80) :='ITEM_IDENTIFIER_TYPE';
5847: --
5848: BEGIN
5849: IF l_debug_level > 0 THEN
5846: l_lookup_type VARCHAR2(80) :='ITEM_IDENTIFIER_TYPE';
5847: --
5848: BEGIN
5849: IF l_debug_level > 0 THEN
5850: oe_debug_pub.add( 'ENTERING ITEM_IDENTIFIER' , 1 ) ;
5851: END IF;
5852: IF p_Item_Identifier_type in ('INT','CUST') THEN
5853: Select meaning
5854: Into x_Item_Identifier
5860:
5861: END IF;
5862:
5863: IF l_debug_level > 0 THEN
5864: oe_debug_pub.add( 'ITEM_IDENTIFIER' || X_ITEM_IDENTIFIER , 1 ) ;
5865: END IF;
5866: EXCEPTION
5867:
5868: WHEN NO_DATA_FOUND THEN
5895: (p_Item_Relationship_Type IN NUMBER
5896: , x_Item_Relationship_Type_Dsp OUT nocopy VARCHAR2)
5897: IS
5898: --
5899: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5900: l_lookup_type VARCHAR2(80) :='MTL_RELATIONSHIP_TYPES';
5901: --
5902: BEGIN
5903: IF l_debug_level > 0 THEN
5900: l_lookup_type VARCHAR2(80) :='MTL_RELATIONSHIP_TYPES';
5901: --
5902: BEGIN
5903: IF l_debug_level > 0 THEN
5904: oe_debug_pub.add('Entering Item_Relationship_Type',1);
5905: END IF;
5906: IF p_Item_Relationship_Type IS NOT NULL THEN
5907: Select meaning
5908: Into x_Item_Relationship_Type_dsp
5912: ELSE
5913: x_Item_Relationship_Type_Dsp := null;
5914:
5915: IF l_debug_level > 0 THEN
5916: oe_debug_pub.add('in else Item_Relationship_Type' || x_Item_Relationship_Type_Dsp,1);
5917: END IF;
5918: END IF;
5919:
5920: IF l_debug_level > 0 THEN
5917: END IF;
5918: END IF;
5919:
5920: IF l_debug_level > 0 THEN
5921: oe_debug_pub.add('Item_Relationship_Type_dsp' || x_Item_Relationship_Type_Dsp,1);
5922: END IF;
5923: EXCEPTION
5924:
5925: WHEN NO_DATA_FOUND THEN
5953: ) RETURN VARCHAR2
5954: IS
5955: l_user_status VARCHAR2(240) := NULL;
5956: --
5957: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
5958: l_lookup_type VARCHAR2(80) := 'USER_STATUS';
5959: --
5960: BEGIN
5961:
5959: --
5960: BEGIN
5961:
5962: IF l_debug_level > 0 THEN
5963: oe_debug_pub.add( 'IN GET VALUES ' || p_user_status_code ) ;
5964: END IF;
5965: IF p_user_status_code IS NOT NULL THEN
5966:
5967: SELECT MEANING
5973:
5974: END IF;
5975:
5976: IF l_debug_level > 0 THEN
5977: oe_debug_pub.add( 'IN GET VALUES ' || L_user_status ) ;
5978: END IF;
5979: RETURN l_user_status;
5980:
5981: EXCEPTION
6013: ) RETURN VARCHAR2
6014: IS
6015: l_Transaction_Phase VARCHAR2(240) := NULL;
6016: --
6017: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6018: l_lookup_type VARCHAR2(80) :='TRANSACTION_PHASE';
6019: --
6020: BEGIN
6021:
6019: --
6020: BEGIN
6021:
6022: IF l_debug_level > 0 THEN
6023: oe_debug_pub.add( 'IN GET VALUES ' || p_Transaction_Phase_code ) ;
6024: END IF;
6025: IF p_Transaction_Phase_code IS NOT NULL THEN
6026:
6027: SELECT MEANING
6033:
6034: END IF;
6035:
6036: IF l_debug_level > 0 THEN
6037: oe_debug_pub.add( 'IN GET VALUES ' || L_Transaction_Phase ) ;
6038: END IF;
6039: RETURN l_Transaction_Phase;
6040:
6041: EXCEPTION
6080: , x_sold_to_location_country OUT NOCOPY VARCHAR2
6081: )
6082: IS
6083: --
6084: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6085: --
6086: BEGIN
6087:
6088: IF p_sold_to_site_use_id is NOT NULL THEN
6210: AND ARL.lookup_code(+) = CONTACT.phone_line_type;
6211:
6212: EXCEPTION
6213: WHEN others THEN
6214: oe_debug_pub.add('Get_Contact_Details ' || sqlerrm, 1);
6215: END Get_Contact_Details;
6216:
6217: --serla begin
6218: FUNCTION payment_collection_event_name
6267: ( p_receipt_method IN NUMBER
6268: ) RETURN VARCHAR2
6269: IS
6270: l_receipt_method VARCHAR2(80);
6271: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6272: l_err_message VARCHAR2(2000);
6273: BEGIN
6274:
6275: IF l_debug_level > 0 THEN
6272: l_err_message VARCHAR2(2000);
6273: BEGIN
6274:
6275: IF l_debug_level > 0 THEN
6276: oe_debug_pub.add('Receipt method id....ksurendr'||p_receipt_method);
6277: END IF;
6278:
6279: IF p_receipt_method IS NOT NULL AND p_receipt_method <> 0 AND
6280: NOT OE_GLOBALS.Equal(p_receipt_method,FND_API.G_MISS_NUM) THEN
6278:
6279: IF p_receipt_method IS NOT NULL AND p_receipt_method <> 0 AND
6280: NOT OE_GLOBALS.Equal(p_receipt_method,FND_API.G_MISS_NUM) THEN
6281: IF l_debug_level > 0 THEN
6282: oe_debug_pub.add('Inside if part....');
6283: END IF;
6284: SELECT NAME
6285: INTO l_receipt_method
6286: FROM AR_RECEIPT_METHODS
6287: WHERE receipt_method_id = p_receipt_method;
6288: --bug 5204358
6289: ELSIF p_receipt_method = 0 THEN
6290: IF l_debug_level > 0 THEN
6291: oe_debug_pub.add('Inside else part....');
6292: END IF;
6293: fnd_message.set_name('ONT','OE_VPM_NO_PAY_METHOD');
6294: OE_MSG_PUB.Add;
6295: RAISE FND_API.G_EXC_ERROR;
6312:
6313: WHEN FND_API.G_EXC_ERROR THEN
6314: l_err_message := SQLERRM;
6315: IF l_debug_level > 0 THEN
6316: oe_debug_pub.add('Id to value error for receipt method....exc');
6317: oe_debug_pub.add('Error'||l_err_message);
6318: END IF;
6319:
6320: RAISE FND_API.G_EXC_ERROR;
6313: WHEN FND_API.G_EXC_ERROR THEN
6314: l_err_message := SQLERRM;
6315: IF l_debug_level > 0 THEN
6316: oe_debug_pub.add('Id to value error for receipt method....exc');
6317: oe_debug_pub.add('Error'||l_err_message);
6318: END IF;
6319:
6320: RAISE FND_API.G_EXC_ERROR;
6321:
6345: Select group_name into l_sales_group_name
6346: From jtf_rs_groups_vl
6347: Where Group_id=p_sales_group_id;
6348: ELSE
6349: Oe_Debug_Pub.add('Input sales group id is null');
6350: END IF;
6351:
6352: RETURN l_sales_group_name;
6353:
6363: OE_MSG_PUB.Add;
6364:
6365: END IF;
6366: ELSE
6367: oe_debug_pub.add('Sales Group, -1 sales group id');
6368: END IF;
6369:
6370:
6371: WHEN OTHERS THEN
6387: ) RETURN VARCHAR2
6388: IS
6389: l_end_customer_contact VARCHAR2(240) := NULL;
6390: --
6391: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6392: --
6393: BEGIN
6394:
6395: IF p_end_customer_contact_id IS NOT NULL THEN
6438: x_end_customer_number OUT NOCOPY VARCHAR2
6439: )
6440: IS
6441: --
6442: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6443: --
6444: BEGIN
6445:
6446: IF p_end_customer_id is NOT NULL THEN
6445:
6446: IF p_end_customer_id is NOT NULL THEN
6447:
6448: IF l_debug_level > 0 THEN
6449: oe_debug_pub.add( 'DOING SELECT FOR END_CUSTOMER_NUMBER' ) ;
6450: END IF;
6451: SELECT O.NAME
6452: , O.CUSTOMER_NUMBER
6453: INTO x_end_customer_name
6457:
6458: ELSE
6459:
6460: IF l_debug_level > 0 THEN
6461: oe_debug_pub.add( 'INSIDE QUERY FOR END CUSTOMER NUMBER - NO ORG_ID PASSED' ) ;
6462: END IF;
6463: x_end_customer_name := NULL ;
6464: x_end_customer_number := NULL ;
6465:
6506: , x_end_customer_country OUT NOCOPY /* file.sql.39 change */ VARCHAR2
6507: )
6508: IS
6509: --
6510: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6511: --
6512: BEGIN
6513:
6514: IF p_end_customer_site_use_id is NOT NULL THEN
6593: l_ib_owner_dsp VARCHAR2(60) := NULL;
6594: l_lookup_type1 VARCHAR2(80) :='ITEM_OWNER';
6595: l_lookup_type2 VARCHAR2(80) :='ONT_INSTALL_BASE';
6596: --
6597: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6598: --
6599: BEGIN
6600:
6601: IF p_ib_owner IS NOT NULL THEN
6646: l_ib_current_location_dsp VARCHAR2(60) := NULL;
6647: l_lookup_type1 VARCHAR2(80) :='ITEM_CURRENT_LOCATION';
6648: l_lookup_type2 VARCHAR2(80) :='ONT_INSTALL_BASE';
6649: --
6650: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6651: --
6652: BEGIN
6653:
6654: IF p_ib_current_location IS NOT NULL THEN
6699: l_ib_installed_at_location_dsp VARCHAR2(60) := NULL;
6700: l_lookup_type1 VARCHAR2(80) :='ITEM_INSTALL_LOCATION';
6701: l_lookup_type2 VARCHAR2(80) :='ONT_INSTALL_BASE';
6702: --
6703: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6704: --
6705: BEGIN
6706:
6707: IF p_ib_installed_at_location IS NOT NULL THEN
6754: l_charge_periodicity_dsp VARCHAR2(60) := NULL;
6755: --l_profile_value VARCHAR2(80) :=Oe_Sys_Parameters.Value('UOM_CLASS_CHARGE_PERIODICITY');
6756: l_profile_value VARCHAR2(80) :=fnd_profile.Value('ONT_UOM_CLASS_CHARGE_PERIODICITY');
6757: --
6758: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6759: --
6760: BEGIN
6761:
6762: IF p_charge_periodicity_code IS NOT NULL THEN
6808: ,p_inventory_item_id IN NUMBER
6809: ) RETURN VARCHAR2
6810: IS
6811: l_service_period_dsp VARCHAR2(60) := NULL;
6812: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6813: l_temp VARCHAR2(60) := NULL;
6814: BEGIN
6815:
6816: IF p_service_period IS NOT NULL THEN
6874: ( p_service_reference_type_code IN VARCHAR2
6875: ) RETURN VARCHAR2
6876: IS
6877: l_service_reference_type VARCHAR2(240) := NULL;
6878: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6879: BEGIN
6880:
6881: IF p_service_reference_type_code IS NOT NULL THEN
6882:
6930: l_change_reason VARCHAR2(60) := NULL;
6931: l_lookup_type1 VARCHAR2(80) :='CHANGE_CODE';
6932: l_lookup_type2 VARCHAR2(80) :='CANCEL_CODE';
6933: --
6934: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6935: --
6936: BEGIN
6937:
6938: IF p_change_reason_code IS NOT NULL THEN
6985: )
6986: IS
6987: l_expiration_event_code VARCHAR2(30):=NULL;
6988: --
6989: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
6990: --
6991: BEGIN
6992:
6993: x_contingency_name := NULL;
7046: FUNCTION Revrec_Event(p_revrec_event_code IN VARCHAR2) RETURN VARCHAR2
7047: IS
7048: l_revrec_event VARCHAR2(80);
7049: --
7050: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7051: --
7052: BEGIN
7053:
7054: IF p_revrec_event_code IS NOT NULL THEN
7095: FUNCTION Accepted_By(p_accepted_by IN NUMBER) RETURN VARCHAR2
7096: IS
7097: l_accepted_by_dsp VARCHAR2(100);
7098: --
7099: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
7100: --
7101: BEGIN
7102:
7103: IF p_accepted_by IS NOT NULL THEN