69: g_Enforce_list_price_rec.enforce_line_prices_flag :='N';
70:
71: WHEN OTHERS THEN
72:
73: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
74: THEN
75: OE_MSG_PUB.Add_Exc_Msg
76: ( G_PKG_NAME ,
77: 'Enforce_List_price'
71: WHEN OTHERS THEN
72:
73: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
74: THEN
75: OE_MSG_PUB.Add_Exc_Msg
76: ( G_PKG_NAME ,
77: 'Enforce_List_price'
78: );
79: END IF;
174:
175:
176: WHEN OTHERS THEN
177:
178: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: OE_MSG_PUB.Add_Exc_Msg
181: ( G_PKG_NAME ,
182: 'Load_Order_Type'
176: WHEN OTHERS THEN
177:
178: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
179: THEN
180: OE_MSG_PUB.Add_Exc_Msg
181: ( G_PKG_NAME ,
182: 'Load_Order_Type'
183: );
184: END IF;
309: RAISE NO_DATA_FOUND ;
310:
311: WHEN OTHERS THEN
312:
313: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
314: THEN
315: OE_MSG_PUB.Add_Exc_Msg
316: ( G_PKG_NAME ,
317: 'Load_Line_Type'
311: WHEN OTHERS THEN
312:
313: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
314: THEN
315: OE_MSG_PUB.Add_Exc_Msg
316: ( G_PKG_NAME ,
317: 'Load_Line_Type'
318: );
319: END IF;
375: EXCEPTION
376:
377: WHEN OTHERS THEN
378:
379: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
380: THEN
381: OE_MSG_PUB.Add_Exc_Msg
382: ( G_PKG_NAME ,
383: 'Load_Agreement'
377: WHEN OTHERS THEN
378:
379: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
380: THEN
381: OE_MSG_PUB.Add_Exc_Msg
382: ( G_PKG_NAME ,
383: 'Load_Agreement'
384: );
385: END IF;
446: g_ship_to_rec.invoice_to_org_id := NULL;
447:
448: WHEN OTHERS THEN
449:
450: IF OE_MSG_PUB.Check_Msg_Level
451: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
452: THEN
453: OE_MSG_PUB.Add_Exc_Msg
454: ( G_PKG_NAME
447:
448: WHEN OTHERS THEN
449:
450: IF OE_MSG_PUB.Check_Msg_Level
451: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
452: THEN
453: OE_MSG_PUB.Add_Exc_Msg
454: ( G_PKG_NAME
455: , 'Load_Ship_To_Org - Fetch Bill to Site'
449:
450: IF OE_MSG_PUB.Check_Msg_Level
451: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
452: THEN
453: OE_MSG_PUB.Add_Exc_Msg
454: ( G_PKG_NAME
455: , 'Load_Ship_To_Org - Fetch Bill to Site'
456: );
457: END IF;
478: g_ship_to_rec.payment_term_id := NULL;
479:
480: WHEN OTHERS THEN
481:
482: IF OE_MSG_PUB.Check_Msg_Level
483: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
484: THEN
485: OE_MSG_PUB.Add_Exc_Msg
486: ( G_PKG_NAME
479:
480: WHEN OTHERS THEN
481:
482: IF OE_MSG_PUB.Check_Msg_Level
483: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
484: THEN
485: OE_MSG_PUB.Add_Exc_Msg
486: ( G_PKG_NAME
487: , 'Load_Ship_To_Org - Fetch Payment Terms'
481:
482: IF OE_MSG_PUB.Check_Msg_Level
483: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
484: THEN
485: OE_MSG_PUB.Add_Exc_Msg
486: ( G_PKG_NAME
487: , 'Load_Ship_To_Org - Fetch Payment Terms'
488: );
489: END IF;
509: RAISE;
510:
511: WHEN OTHERS THEN
512:
513: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
514: THEN
515: OE_MSG_PUB.Add_Exc_Msg
516: ( G_PKG_NAME ,
517: 'Load_Ship_To_Org'
511: WHEN OTHERS THEN
512:
513: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
514: THEN
515: OE_MSG_PUB.Add_Exc_Msg
516: ( G_PKG_NAME ,
517: 'Load_Ship_To_Org'
518: );
519: END IF;
582: g_invoice_to_rec.payment_term_id := NULL;
583:
584: WHEN OTHERS THEN
585:
586: IF OE_MSG_PUB.Check_Msg_Level
587: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
588: THEN
589: OE_MSG_PUB.Add_Exc_Msg
590: ( G_PKG_NAME
583:
584: WHEN OTHERS THEN
585:
586: IF OE_MSG_PUB.Check_Msg_Level
587: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
588: THEN
589: OE_MSG_PUB.Add_Exc_Msg
590: ( G_PKG_NAME
591: , 'Load_Invoice_To_Org - Fetch Payment Terms'
585:
586: IF OE_MSG_PUB.Check_Msg_Level
587: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
588: THEN
589: OE_MSG_PUB.Add_Exc_Msg
590: ( G_PKG_NAME
591: , 'Load_Invoice_To_Org - Fetch Payment Terms'
592: );
593: END IF;
617: RAISE;
618:
619: WHEN OTHERS THEN
620:
621: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
622: THEN
623: OE_MSG_PUB.Add_Exc_Msg
624: ( G_PKG_NAME ,
625: 'Load_Invoice_To_Org'
619: WHEN OTHERS THEN
620:
621: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
622: THEN
623: OE_MSG_PUB.Add_Exc_Msg
624: ( G_PKG_NAME ,
625: 'Load_Invoice_To_Org'
626: );
627: END IF;
694: EXCEPTION
695:
696: WHEN OTHERS THEN
697:
698: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
699: THEN
700: OE_MSG_PUB.Add_Exc_Msg
701: ( G_PKG_NAME ,
702: 'Load_Deliver_To_Org'
696: WHEN OTHERS THEN
697:
698: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
699: THEN
700: OE_MSG_PUB.Add_Exc_Msg
701: ( G_PKG_NAME ,
702: 'Load_Deliver_To_Org'
703: );
704: END IF;
774: g_sold_to_rec.invoice_to_org_id := NULL;
775:
776: WHEN OTHERS THEN
777:
778: IF OE_MSG_PUB.Check_Msg_Level
779: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
780: THEN
781: OE_MSG_PUB.Add_Exc_Msg
782: ( G_PKG_NAME
775:
776: WHEN OTHERS THEN
777:
778: IF OE_MSG_PUB.Check_Msg_Level
779: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
780: THEN
781: OE_MSG_PUB.Add_Exc_Msg
782: ( G_PKG_NAME
783: , 'Load_Sold_To_Org - Fetch Invoice To'
777:
778: IF OE_MSG_PUB.Check_Msg_Level
779: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
780: THEN
781: OE_MSG_PUB.Add_Exc_Msg
782: ( G_PKG_NAME
783: , 'Load_Sold_To_Org - Fetch Invoice To'
784: );
785: END IF;
811: g_sold_to_rec.ship_to_org_id := NULL;
812:
813: WHEN OTHERS THEN
814:
815: IF OE_MSG_PUB.Check_Msg_Level
816: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
817: THEN
818: OE_MSG_PUB.Add_Exc_Msg
819: ( G_PKG_NAME
812:
813: WHEN OTHERS THEN
814:
815: IF OE_MSG_PUB.Check_Msg_Level
816: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
817: THEN
818: OE_MSG_PUB.Add_Exc_Msg
819: ( G_PKG_NAME
820: , 'Load_Sold_To_Org - Fetch Ship To'
814:
815: IF OE_MSG_PUB.Check_Msg_Level
816: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
817: THEN
818: OE_MSG_PUB.Add_Exc_Msg
819: ( G_PKG_NAME
820: , 'Load_Sold_To_Org - Fetch Ship To'
821: );
822: END IF;
848: g_sold_to_rec.deliver_to_org_id := NULL;
849:
850: WHEN OTHERS THEN
851:
852: IF OE_MSG_PUB.Check_Msg_Level
853: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854: THEN
855: OE_MSG_PUB.Add_Exc_Msg
856: ( G_PKG_NAME
849:
850: WHEN OTHERS THEN
851:
852: IF OE_MSG_PUB.Check_Msg_Level
853: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854: THEN
855: OE_MSG_PUB.Add_Exc_Msg
856: ( G_PKG_NAME
857: , 'Load_Sold_To_Org - Fetch Deliver To'
851:
852: IF OE_MSG_PUB.Check_Msg_Level
853: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
854: THEN
855: OE_MSG_PUB.Add_Exc_Msg
856: ( G_PKG_NAME
857: , 'Load_Sold_To_Org - Fetch Deliver To'
858: );
859: END IF;
879: g_sold_to_rec.payment_term_id := NULL;
880:
881: WHEN OTHERS THEN
882:
883: IF OE_MSG_PUB.Check_Msg_Level
884: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
885: THEN
886: OE_MSG_PUB.Add_Exc_Msg
887: ( G_PKG_NAME
880:
881: WHEN OTHERS THEN
882:
883: IF OE_MSG_PUB.Check_Msg_Level
884: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
885: THEN
886: OE_MSG_PUB.Add_Exc_Msg
887: ( G_PKG_NAME
888: , 'Load_Sold_To_Org - Fetch Payment Term'
882:
883: IF OE_MSG_PUB.Check_Msg_Level
884: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
885: THEN
886: OE_MSG_PUB.Add_Exc_Msg
887: ( G_PKG_NAME
888: , 'Load_Sold_To_Org - Fetch Payment Term'
889: );
890: END IF;
910: RAISE;
911:
912: WHEN OTHERS THEN
913:
914: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: OE_MSG_PUB.Add_Exc_Msg
917: ( G_PKG_NAME ,
918: 'Load_Sold_To_Org'
912: WHEN OTHERS THEN
913:
914: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
915: THEN
916: OE_MSG_PUB.Add_Exc_Msg
917: ( G_PKG_NAME ,
918: 'Load_Sold_To_Org'
919: );
920: END IF;
982: RAISE NO_DATA_FOUND ;
983:
984: WHEN OTHERS THEN
985:
986: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
987: THEN
988: OE_MSG_PUB.Add_Exc_Msg
989: ( G_PKG_NAME ,
990: 'Load_Price_List'
984: WHEN OTHERS THEN
985:
986: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
987: THEN
988: OE_MSG_PUB.Add_Exc_Msg
989: ( G_PKG_NAME ,
990: 'Load_Price_List'
991: );
992: END IF;
1041: EXCEPTION
1042:
1043: WHEN OTHERS THEN
1044:
1045: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1046: THEN
1047: OE_MSG_PUB.Add_Exc_Msg
1048: ( G_PKG_NAME ,
1049: 'Load_Set_Of_Books'
1043: WHEN OTHERS THEN
1044:
1045: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1046: THEN
1047: OE_MSG_PUB.Add_Exc_Msg
1048: ( G_PKG_NAME ,
1049: 'Load_Set_Of_Books'
1050: );
1051: END IF;
1106: RETURN g_item_cost_rec;
1107:
1108: WHEN OTHERS THEN
1109:
1110: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1111: THEN
1112: OE_MSG_PUB.Add_Exc_Msg
1113: ( G_PKG_NAME ,
1114: 'Load_Item_Cost'
1108: WHEN OTHERS THEN
1109:
1110: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1111: THEN
1112: OE_MSG_PUB.Add_Exc_Msg
1113: ( G_PKG_NAME ,
1114: 'Load_Item_Cost'
1115: );
1116: END IF;
1170: RAISE NO_DATA_FOUND;
1171:
1172: WHEN OTHERS THEN
1173:
1174: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1175: THEN
1176: OE_MSG_PUB.Add_Exc_Msg
1177: ( G_PKG_NAME
1178: , 'Load_Order_Header'
1172: WHEN OTHERS THEN
1173:
1174: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1175: THEN
1176: OE_MSG_PUB.Add_Exc_Msg
1177: ( G_PKG_NAME
1178: , 'Load_Order_Header'
1179: );
1180: END IF;
1266: EXCEPTION
1267:
1268: WHEN OTHERS THEN
1269:
1270: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1271: THEN
1272: OE_MSG_PUB.Add_Exc_Msg
1273: ( G_PKG_NAME ,
1274: 'Load_header_discount'
1268: WHEN OTHERS THEN
1269:
1270: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1271: THEN
1272: OE_MSG_PUB.Add_Exc_Msg
1273: ( G_PKG_NAME ,
1274: 'Load_header_discount'
1275: );
1276: END IF;
1392: EXCEPTION
1393:
1394: WHEN OTHERS THEN
1395:
1396: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1397: THEN
1398: OE_MSG_PUB.Add_Exc_Msg
1399: ( G_PKG_NAME ,
1400: 'Load_Line_Discount'
1394: WHEN OTHERS THEN
1395:
1396: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1397: THEN
1398: OE_MSG_PUB.Add_Exc_Msg
1399: ( G_PKG_NAME ,
1400: 'Load_Line_Discount'
1401: );
1402: END IF;
1463: RAISE NO_DATA_FOUND;
1464:
1465: WHEN OTHERS THEN
1466:
1467: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1468: THEN
1469: OE_MSG_PUB.Add_Exc_Msg
1470: ( G_PKG_NAME
1471: , 'Load_Top_Model_Line'
1465: WHEN OTHERS THEN
1466:
1467: IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1468: THEN
1469: OE_MSG_PUB.Add_Exc_Msg
1470: ( G_PKG_NAME
1471: , 'Load_Top_Model_Line'
1472: );
1473: END IF;
1801:
1802: if l_debug_level > 0 then
1803: oe_debug_pub.add('exception in load item', 1);
1804: end if;
1805: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1806: THEN
1807: OE_MSG_PUB.Add_Exc_Msg
1808: ( G_PKG_NAME ,
1809: 'Load_Item'
1803: oe_debug_pub.add('exception in load item', 1);
1804: end if;
1805: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1806: THEN
1807: OE_MSG_PUB.Add_Exc_Msg
1808: ( G_PKG_NAME ,
1809: 'Load_Item'
1810: );
1811: END IF;
1876: g_set_rec.Set_Status := NULL;
1877:
1878: WHEN OTHERS THEN
1879:
1880: IF OE_MSG_PUB.Check_Msg_Level
1881: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1882: THEN
1883: OE_MSG_PUB.Add_Exc_Msg
1884: ( G_PKG_NAME
1877:
1878: WHEN OTHERS THEN
1879:
1880: IF OE_MSG_PUB.Check_Msg_Level
1881: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1882: THEN
1883: OE_MSG_PUB.Add_Exc_Msg
1884: ( G_PKG_NAME
1885: , 'Load_set '
1879:
1880: IF OE_MSG_PUB.Check_Msg_Level
1881: (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1882: THEN
1883: OE_MSG_PUB.Add_Exc_Msg
1884: ( G_PKG_NAME
1885: , 'Load_set '
1886: );
1887: END IF;
1907: EXCEPTION
1908:
1909: WHEN OTHERS THEN
1910:
1911: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1912: THEN
1913: OE_MSG_PUB.Add_Exc_Msg
1914: ( G_PKG_NAME ,
1915: 'Load_Delivery_Set'
1909: WHEN OTHERS THEN
1910:
1911: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1912: THEN
1913: OE_MSG_PUB.Add_Exc_Msg
1914: ( G_PKG_NAME ,
1915: 'Load_Delivery_Set'
1916: );
1917: END IF;
1966:
1967: --return g_payment_term_rec ;
1968: WHEN OTHERS THEN
1969:
1970: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1971: THEN
1972: OE_MSG_PUB.Add_Exc_Msg
1973: ( G_PKG_NAME ,
1974: 'Load_Payment_Term'
1968: WHEN OTHERS THEN
1969:
1970: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
1971: THEN
1972: OE_MSG_PUB.Add_Exc_Msg
1973: ( G_PKG_NAME ,
1974: 'Load_Payment_Term'
1975: );
1976: END IF;
2023:
2024: -- return g_salesrep_rec ;
2025: WHEN OTHERS THEN
2026:
2027: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2028: THEN
2029: OE_MSG_PUB.Add_Exc_Msg
2030: ( G_PKG_NAME ,
2031: 'Load_Salesrep_rec'
2025: WHEN OTHERS THEN
2026:
2027: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2028: THEN
2029: OE_MSG_PUB.Add_Exc_Msg
2030: ( G_PKG_NAME ,
2031: 'Load_Salesrep_rec'
2032: );
2033: END IF;
2428: EXCEPTION
2429:
2430: WHEN OTHERS THEN
2431:
2432: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2433: THEN
2434: OE_MSG_PUB.Add_Exc_Msg
2435: ( G_PKG_NAME ,
2436: 'Load_list_lines'||sqlerrm
2430: WHEN OTHERS THEN
2431:
2432: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2433: THEN
2434: OE_MSG_PUB.Add_Exc_Msg
2435: ( G_PKG_NAME ,
2436: 'Load_list_lines'||sqlerrm
2437: );
2438: END IF;
2509: EXCEPTION
2510:
2511: WHEN OTHERS THEN
2512:
2513: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2514: THEN
2515: OE_MSG_PUB.Add_Exc_Msg
2516: ( G_PKG_NAME ,
2517: 'Load_Cust_Trx_Type'
2511: WHEN OTHERS THEN
2512:
2513: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2514: THEN
2515: OE_MSG_PUB.Add_Exc_Msg
2516: ( G_PKG_NAME ,
2517: 'Load_Cust_Trx_Type'
2518: );
2519: END IF;
2612: EXCEPTION
2613:
2614: WHEN OTHERS THEN
2615:
2616: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2617: THEN
2618: OE_MSG_PUB.Add_Exc_Msg
2619: ( G_PKG_NAME ,
2620: 'get_tax_calculation_flag'
2614: WHEN OTHERS THEN
2615:
2616: IF OE_MSG_PUB.Check_Msg_Level (OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
2617: THEN
2618: OE_MSG_PUB.Add_Exc_Msg
2619: ( G_PKG_NAME ,
2620: 'get_tax_calculation_flag'
2621: );
2622: END IF;