DBA Data[Home] [Help]

APPS.OE_BULK_CACHE dependencies on OE_DEBUG_PUB

Line 58: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

54: l_tp_location_name VARCHAR2(3200);
55: l_addr_id VARCHAR2(3200);
56:
57: --
58: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
59: --
60: BEGIN
61: IF l_debug_level > 0 THEN
62: oe_debug_pub.add( 'ADDRESS TYPE = '||P_ADDRESS_TYPE_IN ) ;

Line 62: oe_debug_pub.add( 'ADDRESS TYPE = '||P_ADDRESS_TYPE_IN ) ;

58: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
59: --
60: BEGIN
61: IF l_debug_level > 0 THEN
62: oe_debug_pub.add( 'ADDRESS TYPE = '||P_ADDRESS_TYPE_IN ) ;
63: END IF;
64: IF l_debug_level > 0 THEN
65: oe_debug_pub.add( 'ORG = '||P_ORG_ID_IN ) ;
66: END IF;

Line 65: oe_debug_pub.add( 'ORG = '||P_ORG_ID_IN ) ;

61: IF l_debug_level > 0 THEN
62: oe_debug_pub.add( 'ADDRESS TYPE = '||P_ADDRESS_TYPE_IN ) ;
63: END IF;
64: IF l_debug_level > 0 THEN
65: oe_debug_pub.add( 'ORG = '||P_ORG_ID_IN ) ;
66: END IF;
67: IF l_debug_level > 0 THEN
68: oe_debug_pub.add( 'ADDRESS ID = '||P_ADDRESS_ID_IN ) ;
69: END IF;

Line 68: oe_debug_pub.add( 'ADDRESS ID = '||P_ADDRESS_ID_IN ) ;

64: IF l_debug_level > 0 THEN
65: oe_debug_pub.add( 'ORG = '||P_ORG_ID_IN ) ;
66: END IF;
67: IF l_debug_level > 0 THEN
68: oe_debug_pub.add( 'ADDRESS ID = '||P_ADDRESS_ID_IN ) ;
69: END IF;
70:
71: IF p_address_type_in = 'CUSTOMER' THEN
72: l_address_type := 1;

Line 78: oe_debug_pub.add( 'BEFORE CALLING EC ADDRESS DERIVATION API' ) ;

74: l_address_type := 2;
75: END IF;
76:
77: IF l_debug_level > 0 THEN
78: oe_debug_pub.add( 'BEFORE CALLING EC ADDRESS DERIVATION API' ) ;
79: END IF;
80: ece_trading_partners_pub.ece_Get_Address_wrapper(
81: p_api_version_number => 1.0,
82: x_return_status => l_return_status,

Line 129: oe_debug_pub.add( 'ADDR1 = '||SUBSTR ( L_ADDR1 , 0 , 240 ) ) ;

125: x_region_2_out => l_region2,
126: x_region_3_out => l_region3);
127:
128: IF l_debug_level > 0 THEN
129: oe_debug_pub.add( 'ADDR1 = '||SUBSTR ( L_ADDR1 , 0 , 240 ) ) ;
130: END IF;
131: IF l_debug_level > 0 THEN
132: oe_debug_pub.add( 'CITY = '||L_CITY ) ;
133: END IF;

Line 132: oe_debug_pub.add( 'CITY = '||L_CITY ) ;

128: IF l_debug_level > 0 THEN
129: oe_debug_pub.add( 'ADDR1 = '||SUBSTR ( L_ADDR1 , 0 , 240 ) ) ;
130: END IF;
131: IF l_debug_level > 0 THEN
132: oe_debug_pub.add( 'CITY = '||L_CITY ) ;
133: END IF;
134: IF l_debug_level > 0 THEN
135: oe_debug_pub.add( 'ZIP = '||L_ZIP ) ;
136: END IF;

Line 135: oe_debug_pub.add( 'ZIP = '||L_ZIP ) ;

131: IF l_debug_level > 0 THEN
132: oe_debug_pub.add( 'CITY = '||L_CITY ) ;
133: END IF;
134: IF l_debug_level > 0 THEN
135: oe_debug_pub.add( 'ZIP = '||L_ZIP ) ;
136: END IF;
137: IF l_debug_level > 0 THEN
138: oe_debug_pub.add( 'COUNTRY = '||L_COUNTRY ) ;
139: END IF;

Line 138: oe_debug_pub.add( 'COUNTRY = '||L_COUNTRY ) ;

134: IF l_debug_level > 0 THEN
135: oe_debug_pub.add( 'ZIP = '||L_ZIP ) ;
136: END IF;
137: IF l_debug_level > 0 THEN
138: oe_debug_pub.add( 'COUNTRY = '||L_COUNTRY ) ;
139: END IF;
140:
141: EXCEPTION
142: WHEN OTHERS THEN

Line 159: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

155: )
156: RETURN NUMBER
157: IS
158: --
159: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
160: --
161: BEGIN
162:
163: IF G_ORDER_TYPE_TBL.EXISTS(p_key)

Line 362: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

358: EXCEPTION
359: WHEN NO_DATA_FOUND THEN
360: IF G_ORDER_TYPE_TBL.EXISTS(p_key) THEN
361: IF l_debug_level > 0 THEN
362: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
363: END IF;
364: G_ORDER_TYPE_TBL.DELETE(p_key);
365: END IF;
366: RAISE NO_DATA_FOUND;

Line 370: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

366: RAISE NO_DATA_FOUND;
367: WHEN OTHERS THEN
368: IF G_ORDER_TYPE_TBL.EXISTS(p_key) THEN
369: IF l_debug_level > 0 THEN
370: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
371: END IF;
372: G_ORDER_TYPE_TBL.DELETE(p_key);
373: END IF;
374: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 388: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

384: )
385: RETURN NUMBER
386: IS
387: --
388: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
389: --
390: BEGIN
391:
392: IF G_LINE_TYPE_TBL.EXISTS(p_key) THEN

Line 423: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

419: EXCEPTION
420: WHEN NO_DATA_FOUND THEN
421: IF G_LINE_TYPE_TBL.EXISTS(p_key) THEN
422: IF l_debug_level > 0 THEN
423: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
424: END IF;
425: G_LINE_TYPE_TBL.DELETE(p_key);
426: END IF;
427: RAISE NO_DATA_FOUND;

Line 431: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

427: RAISE NO_DATA_FOUND;
428: WHEN OTHERS THEN
429: IF G_LINE_TYPE_TBL.EXISTS(p_key) THEN
430: IF l_debug_level > 0 THEN
431: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
432: END IF;
433: G_LINE_TYPE_TBL.DELETE(p_key);
434: END IF;
435: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 449: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

445: )
446: RETURN NUMBER
447: IS
448: --
449: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
450: --
451: BEGIN
452:
453: IF G_AGREEMENT_TBL.EXISTS(p_key)

Line 542: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

538: EXCEPTION
539: WHEN NO_DATA_FOUND THEN
540: IF G_AGREEMENT_TBL.EXISTS(p_key) THEN
541: IF l_debug_level > 0 THEN
542: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
543: END IF;
544: G_AGREEMENT_TBL.DELETE(p_key);
545: END IF;
546: RAISE NO_DATA_FOUND;

Line 550: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

546: RAISE NO_DATA_FOUND;
547: WHEN OTHERS THEN
548: IF G_AGREEMENT_TBL.EXISTS(p_key) THEN
549: IF l_debug_level > 0 THEN
550: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
551: END IF;
552: G_AGREEMENT_TBL.DELETE(p_key);
553: END IF;
554: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 589: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

585: --=================
586: */
587: -- INVCONV
588:
589: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
590: --
591: BEGIN
592:
593: IF G_ITEM_TBL.EXISTS(p_key1)

Line 713: oe_debug_pub.add( 'PROCESS INSTALLED' ) ;

709:
710: /* IF OE_Bulk_Order_PVT.G_PROCESS_INSTALLED_FLAG = 'Y' THEN
711:
712: IF l_debug_level > 0 THEN
713: oe_debug_pub.add( 'PROCESS INSTALLED' ) ;
714: END IF;
715:
716: IF INV_GMI_RSV_BRANCH.G_PROCESS_INV_INSTALLED = 'I' THEN
717: OPEN c_opm_item( l_key2

Line 730: oe_debug_pub.add( 'OPM item not found ', 1 ) ;

726: /*OPM HVOP need this in case of process warehouse and discrete item - Fully clear the process cache
727: IF c_opm_item%NOTFOUND THEN
728:
729: IF l_debug_level > 0 THEN
730: oe_debug_pub.add( 'OPM item not found ', 1 ) ;
731: END IF;
732: G_ITEM_TBL(p_key1).opm_item_id := NULL;
733: G_ITEM_TBL(p_key1).opm_item_um := NULL;
734: G_ITEM_TBL(p_key1).opm_item_um2 := NULL;

Line 756: oe_debug_pub.add( 'QUERYING BASED ON SHIP_FROM_ORG' , 3 ) ;

752:
753: IF (G_ITEM_TBL(p_key1).organization_id <> p_key2) THEN
754:
755: IF l_debug_level > 0 THEN
756: oe_debug_pub.add( 'QUERYING BASED ON SHIP_FROM_ORG' , 3 ) ;
757: END IF;
758:
759: -- invconv IF OE_Bulk_Order_PVT.G_PROCESS_INSTALLED_FLAG <> 'Y' THEN -- OPM HVOP added for error to test
760:

Line 804: oe_debug_pub.add( 'pal1 ' , 3 ) ;

800: WHERE INVENTORY_ITEM_ID = p_key1
801: AND ORGANIZATION_ID = p_key2; -- ship from org
802:
803: IF l_debug_level > 0 THEN
804: oe_debug_pub.add( 'pal1 ' , 3 ) ;
805: END IF;
806: -- INVCONV end if ;
807:
808:

Line 816: oe_debug_pub.add( 'pal2 ' , 3 ) ;

812: FROM mtl_parameters
813: WHERE organization_id = p_key2;
814: --bug 3798477
815: IF l_debug_level > 0 THEN
816: oe_debug_pub.add( 'pal2 ' , 3 ) ;
817: END IF;
818:
819: IF INV_GMI_RSV_BRANCH.Is_Org_Process_Org(p_key2) THEN
820: G_ITEM_TBL(p_key1).process_warehouse_flag := 'Y';

Line 825: oe_debug_pub.add( 'OPM IN OE_ORDER_CACHE.LOAD_ITEM PROCESS WAREHOUSE FLAG IS ' || G_ITEM_TBL ( P_KEY1 ) .PROCESS_WAREHOUSE_FLAG ) ;

821: ELSE
822: G_ITEM_TBL(p_key1).process_warehouse_flag := NULL;
823: END IF;
824: IF l_debug_level > 0 THEN
825: oe_debug_pub.add( 'OPM IN OE_ORDER_CACHE.LOAD_ITEM PROCESS WAREHOUSE FLAG IS ' || G_ITEM_TBL ( P_KEY1 ) .PROCESS_WAREHOUSE_FLAG ) ;
826: END IF;
827: IF l_debug_level > 0 THEN
828: oe_debug_pub.add( 'pal3 ' , 3 ) ;
829: END IF;

Line 828: oe_debug_pub.add( 'pal3 ' , 3 ) ;

824: IF l_debug_level > 0 THEN
825: oe_debug_pub.add( 'OPM IN OE_ORDER_CACHE.LOAD_ITEM PROCESS WAREHOUSE FLAG IS ' || G_ITEM_TBL ( P_KEY1 ) .PROCESS_WAREHOUSE_FLAG ) ;
826: END IF;
827: IF l_debug_level > 0 THEN
828: oe_debug_pub.add( 'pal3 ' , 3 ) ;
829: END IF;
830:
831:
832: END IF; -- if item tbl.org_id <> p_key2

Line 843: oe_debug_pub.add( 'NO DATA FOUND IN LOAD ITEM' ) ;

839:
840: EXCEPTION
841: WHEN NO_DATA_FOUND THEN
842: IF l_debug_level > 0 THEN
843: oe_debug_pub.add( 'NO DATA FOUND IN LOAD ITEM' ) ;
844: END IF;
845: IF G_ITEM_TBL.EXISTS(p_key1) THEN
846: IF l_debug_level > 0 THEN
847: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 847: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

843: oe_debug_pub.add( 'NO DATA FOUND IN LOAD ITEM' ) ;
844: END IF;
845: IF G_ITEM_TBL.EXISTS(p_key1) THEN
846: IF l_debug_level > 0 THEN
847: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
848: END IF;
849: G_ITEM_TBL.DELETE(p_key1);
850: END IF;
851:

Line 863: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

859: WHEN OTHERS THEN
860:
861: IF G_ITEM_TBL.EXISTS(p_key1) THEN
862: IF l_debug_level > 0 THEN
863: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
864: END IF;
865: G_ITEM_TBL.DELETE(p_key1);
866: END IF;
867: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 874: oe_debug_pub.add( 'pal4 ' , 3 ) ;

870: );
871: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
872:
873: IF l_debug_level > 0 THEN
874: oe_debug_pub.add( 'pal4 ' , 3 ) ;
875: END IF;
876: END Load_Item;
877:
878:

Line 892: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

888: l_region2 VARCHAR2(3200) := NULL;
889: l_region3 VARCHAR2(3200) := NULL;
890: l_return_status VARCHAR2(30);
891: --
892: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
893: --
894: BEGIN
895:
896: IF G_SHIP_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))

Line 927: oe_debug_pub.add( 'SHIP TO :'||P_KEY ) ;

923:
924: ELSIF p_default_attributes = 'Y' THEN
925:
926: IF l_debug_level > 0 THEN
927: oe_debug_pub.add( 'SHIP TO :'||P_KEY ) ;
928: END IF;
929: SELECT /* MOAC_SQL_CHANGE */ s.site_use_id
930: ,a.cust_account_id
931: ,s.warehouse_id

Line 1042: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1038: EXCEPTION
1039: WHEN NO_DATA_FOUND THEN
1040: IF G_SHIP_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1041: IF l_debug_level > 0 THEN
1042: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1043: END IF;
1044: G_SHIP_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1045: END IF;
1046: IF l_debug_level > 0 THEN

Line 1047: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SHIP TO' ) ;

1043: END IF;
1044: G_SHIP_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1045: END IF;
1046: IF l_debug_level > 0 THEN
1047: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SHIP TO' ) ;
1048: END IF;
1049: RAISE NO_DATA_FOUND;
1050: WHEN OTHERS THEN
1051: IF G_SHIP_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN

Line 1053: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1049: RAISE NO_DATA_FOUND;
1050: WHEN OTHERS THEN
1051: IF G_SHIP_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1052: IF l_debug_level > 0 THEN
1053: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1054: END IF;
1055: G_SHIP_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1056: END IF;
1057: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1077: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1073: l_msg_count NUMBER;
1074: l_msg_data VARCHAR2(2000);
1075: l_org_id NUMBER;
1076: --
1077: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1078: --
1079: BEGIN
1080:
1081: IF G_SOLD_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))

Line 1130: oe_debug_pub.add( 'AFTER CALL TO THE EDI API , RET STATUS: ' ||L_TP_RET_STATUS ) ;

1126: ,p_msg_count => l_msg_count
1127: ,p_msg_data => l_msg_data);
1128:
1129: IF l_debug_level > 0 THEN
1130: oe_debug_pub.add( 'AFTER CALL TO THE EDI API , RET STATUS: ' ||L_TP_RET_STATUS ) ;
1131: END IF;
1132:
1133: IF l_tp_ret = FALSE then
1134: IF l_debug_level > 0 THEN

Line 1135: oe_debug_pub.add( 'TP SETUP FALSE FOR :'||P_KEY ) ;

1131: END IF;
1132:
1133: IF l_tp_ret = FALSE then
1134: IF l_debug_level > 0 THEN
1135: oe_debug_pub.add( 'TP SETUP FALSE FOR :'||P_KEY ) ;
1136: END IF;
1137: G_SOLD_TO_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := FALSE;
1138: ELSE
1139: IF l_debug_level > 0 THEN

Line 1140: oe_debug_pub.add( 'TP SETUP TRUE FOR :'||P_KEY ) ;

1136: END IF;
1137: G_SOLD_TO_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := FALSE;
1138: ELSE
1139: IF l_debug_level > 0 THEN
1140: oe_debug_pub.add( 'TP SETUP TRUE FOR :'||P_KEY ) ;
1141: END IF;
1142: G_SOLD_TO_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := TRUE;
1143: END IF;
1144:

Line 1159: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1155: EXCEPTION
1156: WHEN NO_DATA_FOUND THEN
1157: IF G_SOLD_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1158: IF l_debug_level > 0 THEN
1159: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1160: END IF;
1161: G_SOLD_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1162: END IF;
1163: RAISE NO_DATA_FOUND;

Line 1167: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1163: RAISE NO_DATA_FOUND;
1164: WHEN OTHERS THEN
1165: IF G_SOLD_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1166: IF l_debug_level > 0 THEN
1167: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1168: END IF;
1169: G_SOLD_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1170: END IF;
1171: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1191: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1187: l_tp_ret_status VARCHAR2(30);
1188: l_msg_count NUMBER;
1189: l_msg_data VARCHAR2(2000);
1190: --
1191: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1192: --
1193: Cursor End_Customer_site(p_site_use_code VARCHAR,p_key NUMBER) IS
1194: SELECT a.cust_acct_site_id
1195: FROM hz_cust_site_uses_all b, hz_cust_acct_sites_all a

Line 1225: oe_debug_pub.add('found sold to site use id');

1221: FETCH End_customer_site
1222: INTO G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).address_id;
1223: IF End_customer_site%FOUND then
1224: CLOSE End_customer_site;
1225: oe_debug_pub.add('found sold to site use id');
1226: goto site_found;
1227: ELSE
1228: CLOSE End_customer_site;
1229: END IF;

Line 1236: oe_debug_pub.add('found sold to site use id');

1232: FETCH End_customer_site
1233: INTO G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).address_id;
1234: IF End_customer_site%FOUND then
1235: CLOSE End_customer_site;
1236: oe_debug_pub.add('found sold to site use id');
1237: goto site_found;
1238: ELSE
1239: CLOSE End_customer_site;
1240: END IF;

Line 1247: oe_debug_pub.add('found sold to site use id');

1243: FETCH End_customer_site
1244: INTO G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).address_id;
1245: IF End_customer_site%FOUND then
1246: CLOSE End_customer_site;
1247: oe_debug_pub.add('found sold to site use id');
1248: goto site_found;
1249: ELSE
1250: CLOSE End_customer_site;
1251: END IF;

Line 1258: oe_debug_pub.add('found sold to site use id');

1254: FETCH End_customer_site
1255: INTO G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).address_id;
1256: IF End_customer_site%FOUND then
1257: CLOSE End_customer_site;
1258: oe_debug_pub.add('found sold to site use id');
1259: goto site_found;
1260: ELSE
1261: CLOSE End_customer_site;
1262: END IF;

Line 1281: oe_debug_pub.add( 'AFTER CALL TO THE EDI API , RET STATUS: ' ||L_TP_RET_STATUS ) ;

1277: ,p_msg_count => l_msg_count
1278: ,p_msg_data => l_msg_data);
1279:
1280: IF l_debug_level > 0 THEN
1281: oe_debug_pub.add( 'AFTER CALL TO THE EDI API , RET STATUS: ' ||L_TP_RET_STATUS ) ;
1282: END IF;
1283:
1284: IF l_tp_ret = FALSE then
1285: IF l_debug_level > 0 THEN

Line 1286: oe_debug_pub.add( 'TP SETUP FALSE FOR :'||P_KEY ) ;

1282: END IF;
1283:
1284: IF l_tp_ret = FALSE then
1285: IF l_debug_level > 0 THEN
1286: oe_debug_pub.add( 'TP SETUP FALSE FOR :'||P_KEY ) ;
1287: END IF;
1288: G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := FALSE;
1289: ELSE
1290: IF l_debug_level > 0 THEN

Line 1291: oe_debug_pub.add( 'TP SETUP TRUE FOR :'||P_KEY ) ;

1287: END IF;
1288: G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := FALSE;
1289: ELSE
1290: IF l_debug_level > 0 THEN
1291: oe_debug_pub.add( 'TP SETUP TRUE FOR :'||P_KEY ) ;
1292: END IF;
1293: G_END_CUSTOMER_TBL(MOD(p_key,G_BINARY_LIMIT)).tp_setup := TRUE;
1294: END IF;
1295:

Line 1304: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1300: EXCEPTION
1301: WHEN NO_DATA_FOUND THEN
1302: IF G_END_CUSTOMER_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1303: IF l_debug_level > 0 THEN
1304: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1305: END IF;
1306: G_END_CUSTOMER_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1307: END IF;
1308: RAISE NO_DATA_FOUND;

Line 1312: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1308: RAISE NO_DATA_FOUND;
1309: WHEN OTHERS THEN
1310: IF G_END_CUSTOMER_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1311: IF l_debug_level > 0 THEN
1312: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1313: END IF;
1314: G_END_CUSTOMER_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1315: END IF;
1316: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1338: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1334: l_region2 VARCHAR2(3200) := NULL;
1335: l_region3 VARCHAR2(3200) := NULL;
1336: l_return_status VARCHAR2(30);
1337: --
1338: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1339: --
1340: Cursor End_customer_site_use (p_site_use_code varchar2) IS
1341: SELECT s.site_use_id
1342: ,a.cust_account_id

Line 1361: oe_debug_pub.add('Entering Load_End_Customer_Site');

1357: WHERE a.cust_acct_site_id = b.cust_acct_site_id
1358: AND b.site_use_id = p_key
1359: AND b.site_use_code=p_site_use_code;
1360: BEGIN
1361: oe_debug_pub.add('Entering Load_End_Customer_Site');
1362: IF G_END_CUSTOMER_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))
1363: AND ( p_default_attributes = 'N'
1364: OR (p_default_attributes = 'Y'
1365: AND G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).default_attributes = 'Y'))

Line 1380: oe_debug_pub.add('found sold to site use id');

1376: INTO G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).sold_to_site_use_id,
1377: G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).customer_id;
1378: IF End_customer_site_use%FOUND then
1379: CLOSE End_customer_site_use ;
1380: oe_debug_pub.add('found sold to site use id');
1381: goto site_found;
1382: ELSE
1383: CLOSE End_customer_site_use;
1384: END IF;

Line 1391: oe_debug_pub.add('found ship to site use id');

1387: INTO G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).sold_to_site_use_id,
1388: G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).customer_id;
1389: IF End_customer_site_use%FOUND then
1390: CLOSE End_customer_site_use ;
1391: oe_debug_pub.add('found ship to site use id');
1392: goto site_found;
1393: ELSE
1394: CLOSE End_customer_site_use;
1395: END IF;

Line 1402: oe_debug_pub.add('found bill to site use id');

1398: INTO G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).sold_to_site_use_id,
1399: G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).customer_id;
1400: IF End_customer_site_use%FOUND then
1401: CLOSE End_customer_site_use ;
1402: oe_debug_pub.add('found bill to site use id');
1403: goto site_found;
1404: ELSE
1405: CLOSE End_customer_site_use;
1406: END IF;

Line 1413: oe_debug_pub.add('found deliver to site use id');

1409: INTO G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).sold_to_site_use_id,
1410: G_END_CUSTOMER_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).customer_id;
1411: IF End_customer_site_use%FOUND then
1412: CLOSE End_customer_site_use ;
1413: oe_debug_pub.add('found deliver to site use id');
1414: goto site_found;
1415: ELSE
1416: CLOSE End_customer_site_use;
1417: END IF;

Line 1433: oe_debug_pub.add('found sold to site use id');

1429: ,G_SOLD_TO_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).location;
1430:
1431: IF End_customer_address%FOUND then
1432: CLOSE End_customer_address;
1433: oe_debug_pub.add('found sold to site use id');
1434: goto address_found;
1435: ELSE
1436: CLOSE End_customer_address;
1437: END IF;

Line 1447: oe_debug_pub.add('found ship to site use id');

1443: ,G_SOLD_TO_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).location;
1444:
1445: IF End_customer_address%FOUND then
1446: CLOSE End_customer_address;
1447: oe_debug_pub.add('found ship to site use id');
1448: goto address_found;
1449: ELSE
1450: CLOSE End_customer_address;
1451: END IF;

Line 1461: oe_debug_pub.add('found bill to site use id');

1457: ,G_SOLD_TO_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).location;
1458:
1459: IF End_customer_address%FOUND then
1460: CLOSE End_customer_address;
1461: oe_debug_pub.add('found bill to site use id');
1462: goto address_found;
1463: ELSE
1464: CLOSE End_customer_address;
1465: END IF;

Line 1475: oe_debug_pub.add('found deliver to site use id');

1471: ,G_SOLD_TO_SITE_TBL(MOD(p_key,G_BINARY_LIMIT)).location;
1472:
1473: IF End_customer_address%FOUND then
1474: CLOSE End_customer_address;
1475: oe_debug_pub.add('found deliver to site use id');
1476: goto address_found;
1477: ELSE
1478: CLOSE End_customer_address;
1479: END IF;

Line 1521: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;

1517:
1518: EXCEPTION
1519: WHEN NO_DATA_FOUND THEN
1520: IF l_debug_level > 0 THEN
1521: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;
1522: END IF;
1523: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1524: IF l_debug_level > 0 THEN
1525: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 1525: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1521: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;
1522: END IF;
1523: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1524: IF l_debug_level > 0 THEN
1525: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1526: END IF;
1527: G_SOLD_TO_SITE_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1528: END IF;
1529: RAISE NO_DATA_FOUND;

Line 1533: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1529: RAISE NO_DATA_FOUND;
1530: WHEN OTHERS THEN
1531: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1532: IF l_debug_level > 0 THEN
1533: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1534: END IF;
1535: G_SOLD_TO_SITE_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1536: END IF;
1537: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1559: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1555: l_region2 VARCHAR2(3200) := NULL;
1556: l_region3 VARCHAR2(3200) := NULL;
1557: l_return_status VARCHAR2(30);
1558: --
1559: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1560: --
1561: BEGIN
1562:
1563: IF G_INVOICE_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))

Line 1671: oe_debug_pub.add( 'NO DATA FOUND IN LOAD INVOICE TO :'||TO_CHAR ( P_KEY ) ) ;

1667:
1668: EXCEPTION
1669: WHEN NO_DATA_FOUND THEN
1670: IF l_debug_level > 0 THEN
1671: oe_debug_pub.add( 'NO DATA FOUND IN LOAD INVOICE TO :'||TO_CHAR ( P_KEY ) ) ;
1672: END IF;
1673: IF G_INVOICE_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1674: IF l_debug_level > 0 THEN
1675: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 1675: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1671: oe_debug_pub.add( 'NO DATA FOUND IN LOAD INVOICE TO :'||TO_CHAR ( P_KEY ) ) ;
1672: END IF;
1673: IF G_INVOICE_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1674: IF l_debug_level > 0 THEN
1675: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1676: END IF;
1677: G_INVOICE_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1678: END IF;
1679: RAISE NO_DATA_FOUND;

Line 1683: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1679: RAISE NO_DATA_FOUND;
1680: WHEN OTHERS THEN
1681: IF G_INVOICE_TO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1682: IF l_debug_level > 0 THEN
1683: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1684: END IF;
1685: G_INVOICE_TO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1686: END IF;
1687: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1707: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1703: l_region2 VARCHAR2(3200) := NULL;
1704: l_region3 VARCHAR2(3200) := NULL;
1705: l_return_status VARCHAR2(30);
1706: --
1707: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1708: --
1709: BEGIN
1710:
1711: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))

Line 1819: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;

1815:
1816: EXCEPTION
1817: WHEN NO_DATA_FOUND THEN
1818: IF l_debug_level > 0 THEN
1819: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;
1820: END IF;
1821: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1822: IF l_debug_level > 0 THEN
1823: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 1823: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1819: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SOLD_TO_SITE:'||TO_CHAR ( P_KEY ) ) ;
1820: END IF;
1821: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1822: IF l_debug_level > 0 THEN
1823: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1824: END IF;
1825: G_SOLD_TO_SITE_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1826: END IF;
1827: RAISE NO_DATA_FOUND;

Line 1831: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1827: RAISE NO_DATA_FOUND;
1828: WHEN OTHERS THEN
1829: IF G_SOLD_TO_SITE_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
1830: IF l_debug_level > 0 THEN
1831: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1832: END IF;
1833: G_SOLD_TO_SITE_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
1834: END IF;
1835: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1848: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1844: )
1845: RETURN NUMBER
1846: IS
1847: --
1848: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1849: --
1850: BEGIN
1851:
1852: IF G_SALESREP_TBL.EXISTS(p_key)

Line 1878: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SALESREP :'||TO_CHAR ( P_KEY ) ) ;

1874:
1875: EXCEPTION
1876: WHEN NO_DATA_FOUND THEN
1877: IF l_debug_level > 0 THEN
1878: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SALESREP :'||TO_CHAR ( P_KEY ) ) ;
1879: END IF;
1880: IF G_SALESREP_TBL.EXISTS(p_key) THEN
1881: IF l_debug_level > 0 THEN
1882: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 1882: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1878: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SALESREP :'||TO_CHAR ( P_KEY ) ) ;
1879: END IF;
1880: IF G_SALESREP_TBL.EXISTS(p_key) THEN
1881: IF l_debug_level > 0 THEN
1882: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1883: END IF;
1884: G_SALESREP_TBL.DELETE(p_key);
1885: END IF;
1886: RAISE NO_DATA_FOUND;

Line 1890: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

1886: RAISE NO_DATA_FOUND;
1887: WHEN OTHERS THEN
1888: IF G_SALESREP_TBL.EXISTS(p_key) THEN
1889: IF l_debug_level > 0 THEN
1890: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
1891: END IF;
1892: G_SALESREP_TBL.DELETE(p_key);
1893: END IF;
1894: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 1925: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

1921: l_region2 VARCHAR2(3200) := NULL;
1922: l_region3 VARCHAR2(3200) := NULL;
1923: l_return_status VARCHAR2(30);
1924: --
1925: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1926: --
1927: BEGIN
1928:
1929: -- Initially, ship from cache is only for EDI attributes therefore

Line 1953: oe_debug_pub.add( 'UNABLE TO DERIVE SHIP FROM ADDR' ||' KEY :'||P_KEY ) ;

1949: EXCEPTION
1950: WHEN OTHERS THEN
1951: NULL;
1952: IF l_debug_level > 0 THEN
1953: oe_debug_pub.add( 'UNABLE TO DERIVE SHIP FROM ADDR' ||' KEY :'||P_KEY ) ;
1954: END IF;
1955: END;
1956:
1957: Get_Address(

Line 2001: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SHIP FROM :'||TO_CHAR ( P_KEY ) ) ;

1997:
1998: EXCEPTION
1999: WHEN NO_DATA_FOUND THEN
2000: IF l_debug_level > 0 THEN
2001: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SHIP FROM :'||TO_CHAR ( P_KEY ) ) ;
2002: END IF;
2003: IF G_SHIP_FROM_TBL.EXISTS(p_key) THEN
2004: IF l_debug_level > 0 THEN
2005: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 2005: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2001: oe_debug_pub.add( 'NO DATA FOUND IN LOAD SHIP FROM :'||TO_CHAR ( P_KEY ) ) ;
2002: END IF;
2003: IF G_SHIP_FROM_TBL.EXISTS(p_key) THEN
2004: IF l_debug_level > 0 THEN
2005: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2006: END IF;
2007: G_SHIP_FROM_TBL.DELETE(p_key);
2008: END IF;
2009: RAISE NO_DATA_FOUND;

Line 2013: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2009: RAISE NO_DATA_FOUND;
2010: WHEN OTHERS THEN
2011: IF G_SHIP_FROM_TBL.EXISTS(p_key) THEN
2012: IF l_debug_level > 0 THEN
2013: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2014: END IF;
2015: G_SHIP_FROM_TBL.DELETE(p_key);
2016: END IF;
2017: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 2030: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

2026: )
2027: RETURN NUMBER
2028: IS
2029: --
2030: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2031: --
2032: BEGIN
2033:
2034: IF G_PRICE_LIST_TBL.EXISTS(p_key)

Line 2062: oe_debug_pub.add( 'NO DATA FOUND IN LOAD PRICE LIST :'||TO_CHAR ( P_KEY ) ) ;

2058:
2059: EXCEPTION
2060: WHEN NO_DATA_FOUND THEN
2061: IF l_debug_level > 0 THEN
2062: oe_debug_pub.add( 'NO DATA FOUND IN LOAD PRICE LIST :'||TO_CHAR ( P_KEY ) ) ;
2063: END IF;
2064: IF G_PRICE_LIST_TBL.EXISTS(p_key) THEN
2065: IF l_debug_level > 0 THEN
2066: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

Line 2066: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2062: oe_debug_pub.add( 'NO DATA FOUND IN LOAD PRICE LIST :'||TO_CHAR ( P_KEY ) ) ;
2063: END IF;
2064: IF G_PRICE_LIST_TBL.EXISTS(p_key) THEN
2065: IF l_debug_level > 0 THEN
2066: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2067: END IF;
2068: G_PRICE_LIST_TBL.DELETE(p_key);
2069: END IF;
2070: RAISE NO_DATA_FOUND;

Line 2074: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2070: RAISE NO_DATA_FOUND;
2071: WHEN OTHERS THEN
2072: IF G_PRICE_LIST_TBL.EXISTS(p_key) THEN
2073: IF l_debug_level > 0 THEN
2074: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2075: END IF;
2076: G_PRICE_LIST_TBL.DELETE(p_key);
2077: END IF;
2078: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 2108: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

2104: RETURN NUMBER
2105: IS
2106: --
2107: l_org_id NUMBER;
2108: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2109: --
2110: BEGIN
2111:
2112: IF G_LOC_INFO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT))

Line 2178: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2174: EXCEPTION
2175: WHEN NO_DATA_FOUND THEN
2176: IF G_LOC_INFO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
2177: IF l_debug_level > 0 THEN
2178: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2179: END IF;
2180: G_LOC_INFO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
2181: END IF;
2182: RAISE NO_DATA_FOUND;

Line 2186: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2182: RAISE NO_DATA_FOUND;
2183: WHEN OTHERS THEN
2184: IF G_LOC_INFO_TBL.EXISTS(MOD(p_key,G_BINARY_LIMIT)) THEN
2185: IF l_debug_level > 0 THEN
2186: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2187: END IF;
2188: G_LOC_INFO_TBL.DELETE(MOD(p_key,G_BINARY_LIMIT));
2189: END IF;
2190: OE_BULK_MSG_PUB.Add_Exc_Msg

Line 2204: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

2200: )
2201: RETURN NUMBER
2202: IS
2203: --
2204: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2205: --
2206: BEGIN
2207:
2208: SELECT V.AMOUNT_INCLUDES_TAX_FLAG,

Line 2236: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;

2232: )
2233: RETURN NUMBER
2234: IS
2235: --
2236: l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
2237: --
2238: BEGIN
2239:
2240: IF G_PERSON_TBL.EXISTS(p_key)

Line 2275: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2271: EXCEPTION
2272: WHEN NO_DATA_FOUND THEN
2273: IF G_PERSON_TBL.EXISTS(p_key) THEN
2274: IF l_debug_level > 0 THEN
2275: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2276: END IF;
2277: G_PERSON_TBL.DELETE(p_key);
2278: END IF;
2279: RAISE NO_DATA_FOUND;

Line 2283: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;

2279: RAISE NO_DATA_FOUND;
2280: WHEN OTHERS THEN
2281: IF G_PERSON_TBL.EXISTS(p_key) THEN
2282: IF l_debug_level > 0 THEN
2283: oe_debug_pub.add( 'DELETE INVALID RECORD' ) ;
2284: END IF;
2285: G_PERSON_TBL.DELETE(p_key);
2286: END IF;
2287: OE_BULK_MSG_PUB.Add_Exc_Msg