DBA Data[Home] [Help]

APPS.XDP_PURGE dependencies on FND_MESSAGE

Line 30: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');

26: IF p_debug_level >= g_debug_level THEN
27: RETURN;
28: END IF;
29: IF p_no_records > 1 THEN
30: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
31: FND_MESSAGE.SET_TOKEN('RECORDS',p_no_records);
32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig

Line 31: FND_MESSAGE.SET_TOKEN('RECORDS',p_no_records);

27: RETURN;
28: END IF;
29: IF p_no_records > 1 THEN
30: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
31: FND_MESSAGE.SET_TOKEN('RECORDS',p_no_records);
32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig
35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');

Line 32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);

28: END IF;
29: IF p_no_records > 1 THEN
30: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
31: FND_MESSAGE.SET_TOKEN('RECORDS',p_no_records);
32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig
35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
36: FND_MESSAGE.SET_TOKEN('RECORDS','No');

Line 35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');

31: FND_MESSAGE.SET_TOKEN('RECORDS',p_no_records);
32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig
35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
36: FND_MESSAGE.SET_TOKEN('RECORDS','No');
37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);

Line 36: FND_MESSAGE.SET_TOKEN('RECORDS','No');

32: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig
35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
36: FND_MESSAGE.SET_TOKEN('RECORDS','No');
37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);
40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);

Line 37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);

33: ELSIF (p_no_records = 0) THEN
34: RETURN; -- do not log anythig
35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
36: FND_MESSAGE.SET_TOKEN('RECORDS','No');
37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);
40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
41: END IF;

Line 39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);

35: FND_MESSAGE.SET_NAME('XDP',p_msg_name||'S');
36: FND_MESSAGE.SET_TOKEN('RECORDS','No');
37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);
40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
41: END IF;
42: l_error_msg := SUBSTR(FND_MESSAGE.GET,0,1999);
43:

Line 40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);

36: FND_MESSAGE.SET_TOKEN('RECORDS','No');
37: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);
40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
41: END IF;
42: l_error_msg := SUBSTR(FND_MESSAGE.GET,0,1999);
43:
44: -- IF CALLER IS CONCURRENT MANAGER, USE FND_FILE

Line 42: l_error_msg := SUBSTR(FND_MESSAGE.GET,0,1999);

38: ELSE
39: FND_MESSAGE.SET_NAME('XDP',p_msg_name);
40: FND_MESSAGE.SET_TOKEN('TABLE_NAME',p_table_name);
41: END IF;
42: l_error_msg := SUBSTR(FND_MESSAGE.GET,0,1999);
43:
44: -- IF CALLER IS CONCURRENT MANAGER, USE FND_FILE
45: -- OR ELSE USE DBMS_OUTPUT
46:

Line 305: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

301: BEGIN
302:
303: IF p_sv_soa_id IS NULL THEN
304: IF (p_time_from IS NULL) OR (p_time_to IS NULL) THEN
305: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
306: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
307: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
308: PURGE_ERRORS(FND_MESSAGE.GET);
309: END IF;

Line 306: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');

302:
303: IF p_sv_soa_id IS NULL THEN
304: IF (p_time_from IS NULL) OR (p_time_to IS NULL) THEN
305: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
306: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
307: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
308: PURGE_ERRORS(FND_MESSAGE.GET);
309: END IF;
310:

Line 307: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');

303: IF p_sv_soa_id IS NULL THEN
304: IF (p_time_from IS NULL) OR (p_time_to IS NULL) THEN
305: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
306: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
307: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
308: PURGE_ERRORS(FND_MESSAGE.GET);
309: END IF;
310:
311: FOR l_sv_soa IN (SELECT SV_SOA_ID FROM XNP_SV_SOA A, XNP_SV_STATUS_TYPES_B B

Line 308: PURGE_ERRORS(FND_MESSAGE.GET);

304: IF (p_time_from IS NULL) OR (p_time_to IS NULL) THEN
305: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
306: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
307: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
308: PURGE_ERRORS(FND_MESSAGE.GET);
309: END IF;
310:
311: FOR l_sv_soa IN (SELECT SV_SOA_ID FROM XNP_SV_SOA A, XNP_SV_STATUS_TYPES_B B
312: WHERE a.STATUS_TYPE_CODE = b.STATUS_TYPE_CODE

Line 357: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

353: ||p_sv_soa_id,'XDP_FOUND_REC',0);
354: COMMIT;
355: EXCEPTION
356: WHEN OTHERS THEN
357: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
358: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
359: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
360: PURGE_ERRORS(FND_MESSAGE.GET);
361: END XDP_CHECK_SOA;

Line 358: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');

354: COMMIT;
355: EXCEPTION
356: WHEN OTHERS THEN
357: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
358: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
359: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
360: PURGE_ERRORS(FND_MESSAGE.GET);
361: END XDP_CHECK_SOA;
362:

Line 359: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');

355: EXCEPTION
356: WHEN OTHERS THEN
357: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
358: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
359: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
360: PURGE_ERRORS(FND_MESSAGE.GET);
361: END XDP_CHECK_SOA;
362:
363: -- Internal procedure for verifying if an order is deletable

Line 360: PURGE_ERRORS(FND_MESSAGE.GET);

356: WHEN OTHERS THEN
357: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
358: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
359: FND_MESSAGE.SET_TOKEN('CONDITION','XDP_CHECK_SOA');
360: PURGE_ERRORS(FND_MESSAGE.GET);
361: END XDP_CHECK_SOA;
362:
363: -- Internal procedure for verifying if an order is deletable
364: -- Name IS_ORDER_DELETABLE

Line 760: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ORD');

756: BEGIN
757:
758: -- Lock the record for update
759:
760: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ORD');
761: FND_MESSAGE.SET_TOKEN('ORDER_ID',p_order_id);
762: PURGE_ERRORS(FND_MESSAGE.GET);
763:
764: SELECT 1 INTO l_dummy FROM XDP_ORDER_HEADERS

Line 761: FND_MESSAGE.SET_TOKEN('ORDER_ID',p_order_id);

757:
758: -- Lock the record for update
759:
760: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ORD');
761: FND_MESSAGE.SET_TOKEN('ORDER_ID',p_order_id);
762: PURGE_ERRORS(FND_MESSAGE.GET);
763:
764: SELECT 1 INTO l_dummy FROM XDP_ORDER_HEADERS
765: WHERE order_id = p_order_id for update nowait;

Line 762: PURGE_ERRORS(FND_MESSAGE.GET);

758: -- Lock the record for update
759:
760: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ORD');
761: FND_MESSAGE.SET_TOKEN('ORDER_ID',p_order_id);
762: PURGE_ERRORS(FND_MESSAGE.GET);
763:
764: SELECT 1 INTO l_dummy FROM XDP_ORDER_HEADERS
765: WHERE order_id = p_order_id for update nowait;
766:

Line 870: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

866: WHEN OTHERS THEN
867: ROLLBACK TO Order_Rollback;
868: x_purge_status := 'EXCEPTION';
869: x_purge_status := 'FAIL';
870: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
871: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
872: FND_MESSAGE.SET_TOKEN('CONDITION','');
873: PURGE_ERRORS(FND_MESSAGE.GET);
874: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));

Line 871: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');

867: ROLLBACK TO Order_Rollback;
868: x_purge_status := 'EXCEPTION';
869: x_purge_status := 'FAIL';
870: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
871: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
872: FND_MESSAGE.SET_TOKEN('CONDITION','');
873: PURGE_ERRORS(FND_MESSAGE.GET);
874: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
875: END XDP_PURGE_ORDER;

Line 872: FND_MESSAGE.SET_TOKEN('CONDITION','');

868: x_purge_status := 'EXCEPTION';
869: x_purge_status := 'FAIL';
870: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
871: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
872: FND_MESSAGE.SET_TOKEN('CONDITION','');
873: PURGE_ERRORS(FND_MESSAGE.GET);
874: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
875: END XDP_PURGE_ORDER;
876:

Line 873: PURGE_ERRORS(FND_MESSAGE.GET);

869: x_purge_status := 'FAIL';
870: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
871: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
872: FND_MESSAGE.SET_TOKEN('CONDITION','');
873: PURGE_ERRORS(FND_MESSAGE.GET);
874: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
875: END XDP_PURGE_ORDER;
876:
877: PROCEDURE XDP_PURGE_ORDERS

Line 983: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

979: -- Reset exception counter
980: l_exception_counter := 0;
981: ELSIF l_purge_status = 'EXCEPTION' THEN
982: l_exception_counter := l_exception_counter + 1;
983: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
984: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
985: FND_MESSAGE.SET_TOKEN('CONDITION','order_id ='|| l_order_id);
986: PURGE_ERRORS(FND_MESSAGE.GET);
987: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));

Line 984: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');

980: l_exception_counter := 0;
981: ELSIF l_purge_status = 'EXCEPTION' THEN
982: l_exception_counter := l_exception_counter + 1;
983: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
984: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
985: FND_MESSAGE.SET_TOKEN('CONDITION','order_id ='|| l_order_id);
986: PURGE_ERRORS(FND_MESSAGE.GET);
987: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
988:

Line 985: FND_MESSAGE.SET_TOKEN('CONDITION','order_id ='|| l_order_id);

981: ELSIF l_purge_status = 'EXCEPTION' THEN
982: l_exception_counter := l_exception_counter + 1;
983: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
984: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
985: FND_MESSAGE.SET_TOKEN('CONDITION','order_id ='|| l_order_id);
986: PURGE_ERRORS(FND_MESSAGE.GET);
987: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
988:
989: -- if exceptions continusly occurred for more than gl_max_exception

Line 986: PURGE_ERRORS(FND_MESSAGE.GET);

982: l_exception_counter := l_exception_counter + 1;
983: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
984: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
985: FND_MESSAGE.SET_TOKEN('CONDITION','order_id ='|| l_order_id);
986: PURGE_ERRORS(FND_MESSAGE.GET);
987: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
988:
989: -- if exceptions continusly occurred for more than gl_max_exception
990: -- then bubble up the exception and get out

Line 992: PURGE_ERRORS(FND_MESSAGE.GET,p_abort=>TRUE);

988:
989: -- if exceptions continusly occurred for more than gl_max_exception
990: -- then bubble up the exception and get out
991: IF (l_exception_counter > g_max_exceptions) THEN
992: PURGE_ERRORS(FND_MESSAGE.GET,p_abort=>TRUE);
993: END IF;
994: END IF;
995:
996: -- This only applies when it is to purge, where deletions have occured

Line 1019: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1015: PURGE_ERRORS((G_Total_WK_TIME/100) || ' seconds used to purge workflow items for these orders');
1016: COMMIT;
1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1020: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
1021: FND_MESSAGE.SET_TOKEN('CONDITION','');
1022:
1023: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);

Line 1020: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');

1016: COMMIT;
1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1020: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
1021: FND_MESSAGE.SET_TOKEN('CONDITION','');
1022:
1023: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1024: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));

Line 1021: FND_MESSAGE.SET_TOKEN('CONDITION','');

1017: EXCEPTION
1018: WHEN OTHERS THEN
1019: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1020: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
1021: FND_MESSAGE.SET_TOKEN('CONDITION','');
1022:
1023: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1024: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
1025: RAISE;

Line 1023: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);

1019: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1020: FND_MESSAGE.SET_TOKEN('OBJECT','ORDER');
1021: FND_MESSAGE.SET_TOKEN('CONDITION','');
1022:
1023: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1024: PURGE_ERRORS(SUBSTR(SQLERRM, 1, 512));
1025: RAISE;
1026: END XDP_PURGE_ORDERS;
1027: --

Line 1181: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1177: RECORDS_PURGED_MSGS(l_no_msgs,'XNP_MSGS',l_rec_name,-1);
1178: EXCEPTION
1179: WHEN OTHERS THEN
1180: ROLLBACK TO MSG_RLBK;
1181: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1182: FND_MESSAGE.SET_TOKEN('OBJECT','MESSAGES');
1183: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1184: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1185: RAISE;

Line 1182: FND_MESSAGE.SET_TOKEN('OBJECT','MESSAGES');

1178: EXCEPTION
1179: WHEN OTHERS THEN
1180: ROLLBACK TO MSG_RLBK;
1181: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1182: FND_MESSAGE.SET_TOKEN('OBJECT','MESSAGES');
1183: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1184: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1185: RAISE;
1186: END XDP_PURGE_MESSAGES;

Line 1183: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);

1179: WHEN OTHERS THEN
1180: ROLLBACK TO MSG_RLBK;
1181: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1182: FND_MESSAGE.SET_TOKEN('OBJECT','MESSAGES');
1183: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1184: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1185: RAISE;
1186: END XDP_PURGE_MESSAGES;
1187:

Line 1184: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);

1180: ROLLBACK TO MSG_RLBK;
1181: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1182: FND_MESSAGE.SET_TOKEN('OBJECT','MESSAGES');
1183: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1184: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1185: RAISE;
1186: END XDP_PURGE_MESSAGES;
1187:
1188: -- Procedure XDP_PURGE_SOA

Line 1316: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1312: COMMIT;
1313: EXCEPTION
1314: WHEN OTHERS THEN
1315: ROLLBACK;
1316: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1317: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
1318: FND_MESSAGE.SET_TOKEN('CONDITION','');
1319: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1320: RAISE;

Line 1317: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');

1313: EXCEPTION
1314: WHEN OTHERS THEN
1315: ROLLBACK;
1316: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1317: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
1318: FND_MESSAGE.SET_TOKEN('CONDITION','');
1319: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1320: RAISE;
1321: END XDP_PURGE_SOA;

Line 1318: FND_MESSAGE.SET_TOKEN('CONDITION','');

1314: WHEN OTHERS THEN
1315: ROLLBACK;
1316: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1317: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
1318: FND_MESSAGE.SET_TOKEN('CONDITION','');
1319: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1320: RAISE;
1321: END XDP_PURGE_SOA;
1322:

Line 1319: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);

1315: ROLLBACK;
1316: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1317: FND_MESSAGE.SET_TOKEN('OBJECT','SOA');
1318: FND_MESSAGE.SET_TOKEN('CONDITION','');
1319: PURGE_ERRORS(FND_MESSAGE.GET,P_COMMIT => TRUE);
1320: RAISE;
1321: END XDP_PURGE_SOA;
1322:
1323: -- Procedure XDP_PURGE_MISC

Line 1509: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1505: COMMIT;
1506: EXCEPTION
1507: WHEN OTHERS THEN
1508: ROLLBACK;
1509: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1510: FND_MESSAGE.SET_TOKEN('OBJECT','MISC');
1511: PURGE_ERRORS(FND_MESSAGE.GET);
1512: RAISE;
1513: END XDP_PURGE_MISC;

Line 1510: FND_MESSAGE.SET_TOKEN('OBJECT','MISC');

1506: EXCEPTION
1507: WHEN OTHERS THEN
1508: ROLLBACK;
1509: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1510: FND_MESSAGE.SET_TOKEN('OBJECT','MISC');
1511: PURGE_ERRORS(FND_MESSAGE.GET);
1512: RAISE;
1513: END XDP_PURGE_MISC;
1514:

Line 1511: PURGE_ERRORS(FND_MESSAGE.GET);

1507: WHEN OTHERS THEN
1508: ROLLBACK;
1509: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1510: FND_MESSAGE.SET_TOKEN('OBJECT','MISC');
1511: PURGE_ERRORS(FND_MESSAGE.GET);
1512: RAISE;
1513: END XDP_PURGE_MISC;
1514:
1515: -- Procedure PURGE

Line 1623: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1619: --
1620: IF (p_run_mode <> 'CHECK') AND (p_run_mode <> 'PURGE') AND
1621: (p_run_mode <> 'VERIFY')
1622: THEN
1623: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1624: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1625: FND_MESSAGE.SET_TOKEN('CONDITION','p_run_mode ='||p_run_mode);
1626: RETCODE := 2;
1627: ERRBUF := FND_MESSAGE.GET;

Line 1624: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');

1620: IF (p_run_mode <> 'CHECK') AND (p_run_mode <> 'PURGE') AND
1621: (p_run_mode <> 'VERIFY')
1622: THEN
1623: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1624: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1625: FND_MESSAGE.SET_TOKEN('CONDITION','p_run_mode ='||p_run_mode);
1626: RETCODE := 2;
1627: ERRBUF := FND_MESSAGE.GET;
1628: PURGE_ERRORS(P_MSG => ERRBUF);

Line 1625: FND_MESSAGE.SET_TOKEN('CONDITION','p_run_mode ='||p_run_mode);

1621: (p_run_mode <> 'VERIFY')
1622: THEN
1623: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1624: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1625: FND_MESSAGE.SET_TOKEN('CONDITION','p_run_mode ='||p_run_mode);
1626: RETCODE := 2;
1627: ERRBUF := FND_MESSAGE.GET;
1628: PURGE_ERRORS(P_MSG => ERRBUF);
1629: RETURN;

Line 1627: ERRBUF := FND_MESSAGE.GET;

1623: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1624: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1625: FND_MESSAGE.SET_TOKEN('CONDITION','p_run_mode ='||p_run_mode);
1626: RETCODE := 2;
1627: ERRBUF := FND_MESSAGE.GET;
1628: PURGE_ERRORS(P_MSG => ERRBUF);
1629: RETURN;
1630: END IF;
1631: --

Line 1652: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_PROCESS');

1648: ELSE
1649: l_time_to := SYSDATE - p_number_of_days;
1650: END IF;
1651:
1652: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_PROCESS');
1653:
1654: --default time format will be used to convert time string
1655:
1656: FND_MESSAGE.SET_TOKEN('DATE_FROM',TO_CHAR(l_time_from,'MM-DD-YYYY HH:MI:SS'));

Line 1656: FND_MESSAGE.SET_TOKEN('DATE_FROM',TO_CHAR(l_time_from,'MM-DD-YYYY HH:MI:SS'));

1652: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_PROCESS');
1653:
1654: --default time format will be used to convert time string
1655:
1656: FND_MESSAGE.SET_TOKEN('DATE_FROM',TO_CHAR(l_time_from,'MM-DD-YYYY HH:MI:SS'));
1657: FND_MESSAGE.SET_TOKEN('DATE_TO',TO_CHAR(l_time_to,'MM-DD-YYYY HH:MI:SS'));
1658: PURGE_ERRORS(P_MSG=>FND_MESSAGE.GET);
1659: --
1660: -- By default, we will not manage workflow runtime data.

Line 1657: FND_MESSAGE.SET_TOKEN('DATE_TO',TO_CHAR(l_time_to,'MM-DD-YYYY HH:MI:SS'));

1653:
1654: --default time format will be used to convert time string
1655:
1656: FND_MESSAGE.SET_TOKEN('DATE_FROM',TO_CHAR(l_time_from,'MM-DD-YYYY HH:MI:SS'));
1657: FND_MESSAGE.SET_TOKEN('DATE_TO',TO_CHAR(l_time_to,'MM-DD-YYYY HH:MI:SS'));
1658: PURGE_ERRORS(P_MSG=>FND_MESSAGE.GET);
1659: --
1660: -- By default, we will not manage workflow runtime data.
1661: -- There is a performance hit if this flag is turned on. It is

Line 1658: PURGE_ERRORS(P_MSG=>FND_MESSAGE.GET);

1654: --default time format will be used to convert time string
1655:
1656: FND_MESSAGE.SET_TOKEN('DATE_FROM',TO_CHAR(l_time_from,'MM-DD-YYYY HH:MI:SS'));
1657: FND_MESSAGE.SET_TOKEN('DATE_TO',TO_CHAR(l_time_to,'MM-DD-YYYY HH:MI:SS'));
1658: PURGE_ERRORS(P_MSG=>FND_MESSAGE.GET);
1659: --
1660: -- By default, we will not manage workflow runtime data.
1661: -- There is a performance hit if this flag is turned on. It is
1662: -- better for performance to purge workflow using workflow purging

Line 1701: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');

1697: EXCEPTION
1698: WHEN OTHERS THEN
1699: ROLLBACK;
1700: RETCODE := 2;
1701: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1702: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1703: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1704: ERRBUF := FND_MESSAGE.GET;
1705: -- PURGE_ERRORS(P_MSG => ERRBUF,P_COMMIT => TRUE);

Line 1702: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');

1698: WHEN OTHERS THEN
1699: ROLLBACK;
1700: RETCODE := 2;
1701: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1702: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1703: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1704: ERRBUF := FND_MESSAGE.GET;
1705: -- PURGE_ERRORS(P_MSG => ERRBUF,P_COMMIT => TRUE);
1706: END PURGE;

Line 1703: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);

1699: ROLLBACK;
1700: RETCODE := 2;
1701: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1702: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1703: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1704: ERRBUF := FND_MESSAGE.GET;
1705: -- PURGE_ERRORS(P_MSG => ERRBUF,P_COMMIT => TRUE);
1706: END PURGE;
1707:

Line 1704: ERRBUF := FND_MESSAGE.GET;

1700: RETCODE := 2;
1701: FND_MESSAGE.SET_NAME('XDP','XDP_PURGE_ERROR');
1702: FND_MESSAGE.SET_TOKEN('OBJECT','PURGE');
1703: FND_MESSAGE.SET_TOKEN('CONDITION',SQLERRM);
1704: ERRBUF := FND_MESSAGE.GET;
1705: -- PURGE_ERRORS(P_MSG => ERRBUF,P_COMMIT => TRUE);
1706: END PURGE;
1707:
1708: END XDP_PURGE;