DBA Data[Home] [Help]

APPS.PA_PURGE_PUB dependencies on FND_MSG_PUB

Line 59: FND_MSG_PUB.initialize;

55: errbuf := NULL ;
56: retcode := 0;
57: l_return_status := FND_API.G_RET_STS_SUCCESS;
58: pa_debug.set_err_stack('PA_PURGE_PUB.START_PROCESS');
59: FND_MSG_PUB.initialize;
60:
61: pa_debug.set_process('PLSQL','LOG',p_debug_mode);
62:
63: IF p_debug_mode = 'Y' THEN

Line 299: l_msg_count := FND_MSG_PUB.count_msg;

295:
296: EXCEPTION
297: WHEN Invalid_Arg_Exc_Pjr THEN
298: l_return_status := FND_API.G_RET_STS_ERROR;
299: l_msg_count := FND_MSG_PUB.count_msg;
300: retcode := '-1';
301:
302: IF p_debug_mode = 'Y' THEN
303: pa_debug.g_err_stage := 'Inside Invalid Argument exception of START_PROCESS API';

Line 321: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806

317: --
318: -- errbuf := l_data;
319: -- END IF;
320:
321: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
322: PA_INTERFACE_UTILS_PUB.get_messages
323: (p_encoded => FND_API.G_FALSE,
324: p_msg_index => 1,
325: p_msg_count => l_msg_count,

Line 331: IF i = FND_MSG_PUB.count_msg THEN

327: p_data => l_data,
328: p_msg_index_out => l_msg_index_out);
329:
330: pa_debug.write_file('Error : ' ||i||': '|| l_data);
331: IF i = FND_MSG_PUB.count_msg THEN
332: errbuf := l_data;
333: END IF;
334: END LOOP;
335:

Line 346: l_msg_count := FND_MSG_PUB.count_msg;

342: -- No raise as per FD
343:
344: WHEN FND_API.G_EXC_ERROR THEN
345: l_return_status := FND_API.G_RET_STS_ERROR;
346: l_msg_count := FND_MSG_PUB.count_msg;
347: retcode := '-1';
348:
349: IF p_debug_mode = 'Y' THEN
350: pa_debug.g_err_stage := 'Inside Expected Error block of START_PROCESS API';

Line 368: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806

364: --
365: -- errbuf := l_data;
366: -- END IF;
367:
368: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
369: PA_INTERFACE_UTILS_PUB.get_messages
370: (p_encoded => FND_API.G_FALSE,
371: p_msg_index => 1,
372: p_msg_count => l_msg_count,

Line 378: IF i = FND_MSG_PUB.count_msg THEN

374: p_data => l_data,
375: p_msg_index_out => l_msg_index_out);
376:
377: pa_debug.write_file('Error : ' ||i||': '|| l_data);
378: IF i = FND_MSG_PUB.count_msg THEN
379: errbuf := l_data;
380: END IF;
381: END LOOP;
382:

Line 397: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_PURGE_PUB'

393: l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
394: retcode := '-1';
395: errbuf := SUBSTRB(SQLERRM,1,240);
396:
397: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_PURGE_PUB'
398: ,p_procedure_name => 'START_PROCESS'
399: ,p_error_text => errbuf);
400:
401: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806

Line 401: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806

397: FND_MSG_PUB.add_exc_msg( p_pkg_name=> 'PA_PURGE_PUB'
398: ,p_procedure_name => 'START_PROCESS'
399: ,p_error_text => errbuf);
400:
401: FOR i in 1..FND_MSG_PUB.count_msg LOOP -- 5201806
402: PA_INTERFACE_UTILS_PUB.get_messages
403: (p_encoded => FND_API.G_FALSE,
404: p_msg_index => 1,
405: p_msg_count => l_msg_count,

Line 411: IF i = FND_MSG_PUB.count_msg THEN

407: p_data => l_data,
408: p_msg_index_out => l_msg_index_out);
409:
410: pa_debug.write_file('Error : ' ||i||': '|| l_data);
411: IF i = FND_MSG_PUB.count_msg THEN
412: errbuf := l_data;
413: END IF;
414: END LOOP;
415:

Line 639: Fnd_Msg_Pub.add_exc_msg

635: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
636: -- successfully deleted so far.
637: l_rows2 := l_rows2 + nvl(sql%rowcount,0);
638: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
639: Fnd_Msg_Pub.add_exc_msg
640: ( p_pkg_name => 'PA_PURGE_PUB'
641: , p_procedure_name => 'PURGE_FORECAST_ITEMS'
642: , p_error_text => SUBSTRB(SQLERRM,1,240));
643: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 672: Fnd_Msg_Pub.add_exc_msg

668: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
669: -- successfully deleted so far.
670: l_rows3 := l_rows3 + nvl(sql%rowcount,0);
671: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
672: Fnd_Msg_Pub.add_exc_msg
673: ( p_pkg_name => 'PA_PURGE_PUB'
674: , p_procedure_name => 'PURGE_FORECAST_ITEMS'
675: , p_error_text => SUBSTRB(SQLERRM,1,240));
676: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 707: Fnd_Msg_Pub.add_exc_msg

703: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
704: -- successfully deleted so far.
705: l_rows1 := l_rows1 + nvl(sql%rowcount,0);
706: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
707: Fnd_Msg_Pub.add_exc_msg
708: ( p_pkg_name => 'PA_PURGE_PUB'
709: , p_procedure_name => 'PURGE_FORECAST_ITEMS'
710: , p_error_text => SUBSTRB(SQLERRM,1,240));
711: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 787: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count

783:
784: EXCEPTION
785: WHEN FND_API.G_EXC_ERROR THEN
786: x_return_status := Fnd_Api.G_RET_STS_ERROR;
787: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
788:
789: IF c_get_forecast_item_ids%ISOPEN THEN
790: CLOSE c_get_forecast_item_ids;
791: END IF;

Line 821: Fnd_Msg_Pub.add_exc_msg

817: IF c_get_forecast_item_ids%ISOPEN THEN
818: CLOSE c_get_forecast_item_ids;
819: END IF;
820:
821: Fnd_Msg_Pub.add_exc_msg
822: ( p_pkg_name => 'PA_PURGE_PUB'
823: , p_procedure_name => 'PURGE_FORECAST_ITEMS'
824: , p_error_text => x_msg_data);
825:

Line 826: x_msg_count := FND_MSG_PUB.count_msg; --5201806

822: ( p_pkg_name => 'PA_PURGE_PUB'
823: , p_procedure_name => 'PURGE_FORECAST_ITEMS'
824: , p_error_text => x_msg_data);
825:
826: x_msg_count := FND_MSG_PUB.count_msg; --5201806
827:
828: IF p_debug_mode = 'Y' THEN
829: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
830: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 955: Fnd_Msg_Pub.add_exc_msg

951: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
952: -- successfully deleted so far.
953: l_rows3 := l_rows3 + nvl(sql%rowcount,0);
954: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
955: Fnd_Msg_Pub.add_exc_msg
956: ( p_pkg_name => 'PA_PURGE_PUB'
957: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
958: , p_error_text => SUBSTRB(SQLERRM,1,240));
959: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 982: Fnd_Msg_Pub.add_exc_msg

978: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
979: -- successfully deleted so far.
980: l_rows2 := l_rows2 + nvl(sql%rowcount,0);
981: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
982: Fnd_Msg_Pub.add_exc_msg
983: ( p_pkg_name => 'PA_PURGE_PUB'
984: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
985: , p_error_text => SUBSTRB(SQLERRM,1,240));
986: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 1008: Fnd_Msg_Pub.add_exc_msg

1004: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
1005: -- successfully deleted so far.
1006: l_rows1 := l_rows1 + nvl(sql%rowcount,0);
1007: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
1008: Fnd_Msg_Pub.add_exc_msg
1009: ( p_pkg_name => 'PA_PURGE_PUB'
1010: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
1011: , p_error_text => SUBSTRB(SQLERRM,1,240));
1012: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 1089: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count

1085:
1086: EXCEPTION
1087: WHEN FND_API.G_EXC_ERROR THEN
1088: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1089: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1090:
1091: IF c_purge_wf_details%ISOPEN THEN
1092: Close c_purge_wf_details;
1093: END IF;

Line 1124: Fnd_Msg_Pub.add_exc_msg

1120: IF c_purge_wf_details%ISOPEN THEN
1121: Close c_purge_wf_details;
1122: END IF;
1123:
1124: Fnd_Msg_Pub.add_exc_msg
1125: ( p_pkg_name => 'PA_PURGE_PUB'
1126: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
1127: , p_error_text => x_msg_data);
1128:

Line 1129: x_msg_count := FND_MSG_PUB.count_msg;--5201806

1125: ( p_pkg_name => 'PA_PURGE_PUB'
1126: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
1127: , p_error_text => x_msg_data);
1128:
1129: x_msg_count := FND_MSG_PUB.count_msg;--5201806
1130:
1131: IF p_debug_mode = 'Y' THEN
1132: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1133: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1228: Fnd_Msg_Pub.add_exc_msg

1224: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
1225: -- successfully deleted so far.
1226: l_rows1 :=l_rows1+nvl(sql%rowcount,0);
1227: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
1228: Fnd_Msg_Pub.add_exc_msg
1229: ( p_pkg_name => 'PA_PURGE_PUB'
1230: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1231: , p_error_text => SUBSTRB(SQLERRM,1,240));
1232: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 1272: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count

1268: END IF;
1269: EXCEPTION
1270: WHEN FND_API.G_EXC_ERROR THEN
1271: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1272: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1273:
1274: IF c_get_request_id%ISOPEN THEN
1275: CLOSE c_get_request_id;
1276: END IF;

Line 1307: Fnd_Msg_Pub.add_exc_msg

1303: IF c_get_request_id%ISOPEN THEN
1304: CLOSE c_get_request_id;
1305: END IF;
1306:
1307: Fnd_Msg_Pub.add_exc_msg
1308: ( p_pkg_name => 'PA_PURGE_PUB'
1309: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1310: , p_error_text => x_msg_data);
1311:

Line 1312: x_msg_count := FND_MSG_PUB.count_msg; --5201806

1308: ( p_pkg_name => 'PA_PURGE_PUB'
1309: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1310: , p_error_text => x_msg_data);
1311:
1312: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1313:
1314: IF p_debug_mode = 'Y' THEN
1315: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1316: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1467: Fnd_Msg_Pub.add_exc_msg

1463: WHEN NO_DATA_FOUND THEN
1464: NULL ; -- Do nothing
1465: WHEN OTHERS THEN
1466: l_local_error_flag := 'Y';
1467: Fnd_Msg_Pub.add_exc_msg
1468: ( p_pkg_name => 'PA_PURGE_PUB'
1469: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1470: , p_error_text => SUBSTRB(SQLERRM,1,240));
1471: EXIT;

Line 1512: x_msg_count := Fnd_Msg_Pub.count_msg;

1508: EXCEPTION
1509: WHEN FND_API.G_EXC_ERROR THEN
1510:
1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1512: x_msg_count := Fnd_Msg_Pub.count_msg;
1513:
1514: IF c_purge_org_authority%ISOPEN THEN
1515: CLOSE c_purge_org_authority;
1516: END IF;

Line 1532: Fnd_Msg_Pub.add_exc_msg

1528: IF c_purge_org_authority%ISOPEN THEN
1529: CLOSE c_purge_org_authority;
1530: END IF;
1531:
1532: Fnd_Msg_Pub.add_exc_msg
1533: ( p_pkg_name => 'PA_PURGE_PUB'
1534: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1535: , p_error_text => x_msg_data);
1536:

Line 1537: x_msg_count := FND_MSG_PUB.count_msg;

1533: ( p_pkg_name => 'PA_PURGE_PUB'
1534: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1535: , p_error_text => x_msg_data);
1536:
1537: x_msg_count := FND_MSG_PUB.count_msg;
1538:
1539: IF p_debug_mode = 'Y' THEN
1540: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1541: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1625: Fnd_Msg_Pub.add_exc_msg

1621: NULL ; -- Do nothing
1622: WHEN OTHERS THEN
1623: l_rows1 := l_rows1 + nvl(sql%rowcount,0);
1624: l_local_error_flag := 'Y';
1625: Fnd_Msg_Pub.add_exc_msg
1626: ( p_pkg_name => 'PA_PURGE_PUB'
1627: , p_procedure_name => 'PURGE_PJI_DEBUG'
1628: , p_error_text => SUBSTRB(SQLERRM,1,240));
1629: END;

Line 1649: Fnd_Msg_Pub.add_exc_msg

1645: NULL ; -- Do nothing
1646: WHEN OTHERS THEN
1647: l_rows2 := l_rows2 + nvl(sql%rowcount,0);
1648: l_local_error_flag := 'Y';
1649: Fnd_Msg_Pub.add_exc_msg
1650: ( p_pkg_name => 'PA_PURGE_PUB'
1651: , p_procedure_name => 'PURGE_PJI_DEBUG'
1652: , p_error_text => SUBSTRB(SQLERRM,1,240));
1653: END;

Line 1673: Fnd_Msg_Pub.add_exc_msg

1669: NULL ; -- Do nothing
1670: WHEN OTHERS THEN
1671: l_rows3 := l_rows3 + nvl(sql%rowcount,0);
1672: l_local_error_flag := 'Y';
1673: Fnd_Msg_Pub.add_exc_msg
1674: ( p_pkg_name => 'PA_PURGE_PUB'
1675: , p_procedure_name => 'PURGE_PJI_DEBUG'
1676: , p_error_text => SUBSTRB(SQLERRM,1,240));
1677: END;

Line 1746: x_msg_count := Fnd_Msg_Pub.count_msg;

1742:
1743: EXCEPTION
1744: WHEN FND_API.G_EXC_ERROR THEN
1745: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1746: x_msg_count := Fnd_Msg_Pub.count_msg;
1747:
1748: IF p_debug_mode = 'Y' THEN
1749: Pa_Debug.reset_curr_function;
1750: END IF;

Line 1757: Fnd_Msg_Pub.add_exc_msg

1753: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1754: x_msg_count := 1;
1755: x_msg_data := SUBSTRB(SQLERRM,1,240);
1756:
1757: Fnd_Msg_Pub.add_exc_msg
1758: ( p_pkg_name => 'PA_PURGE_PUB'
1759: , p_procedure_name => 'PURGE_PJI_DEBUG'
1760: , p_error_text => x_msg_data);
1761:

Line 1762: x_msg_count := FND_MSG_PUB.count_msg;

1758: ( p_pkg_name => 'PA_PURGE_PUB'
1759: , p_procedure_name => 'PURGE_PJI_DEBUG'
1760: , p_error_text => x_msg_data);
1761:
1762: x_msg_count := FND_MSG_PUB.count_msg;
1763:
1764: IF p_debug_mode = 'Y' THEN
1765: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1766: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1862: Fnd_Msg_Pub.add_exc_msg

1858: IF c_purge_details%ISOPEN THEN
1859: CLOSE c_purge_details ;
1860: END IF;
1861:
1862: Fnd_Msg_Pub.add_exc_msg
1863: ( p_pkg_name => 'PA_PURGE_PUB'
1864: , p_procedure_name => 'PRINT_OUTPUT_REPORT'
1865: , p_error_text => x_msg_data);
1866:

Line 1867: x_msg_count := FND_MSG_PUB.count_msg; --5201806

1863: ( p_pkg_name => 'PA_PURGE_PUB'
1864: , p_procedure_name => 'PRINT_OUTPUT_REPORT'
1865: , p_error_text => x_msg_data);
1866:
1867: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1868:
1869: IF l_debug_mode = 'Y' THEN -- 5201806
1870: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1871: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1968: Fnd_Msg_Pub.add_exc_msg

1964: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1965: x_msg_count := 1;
1966: x_msg_data := SUBSTRB(SQLERRM,1,240);
1967:
1968: Fnd_Msg_Pub.add_exc_msg
1969: ( p_pkg_name => 'PA_PURGE_PUB'
1970: , p_procedure_name => 'INSERT_PURGE_LOG'
1971: , p_error_text => x_msg_data);
1972:

Line 1973: x_msg_count := FND_MSG_PUB.count_msg; --5201806

1969: ( p_pkg_name => 'PA_PURGE_PUB'
1970: , p_procedure_name => 'INSERT_PURGE_LOG'
1971: , p_error_text => x_msg_data);
1972:
1973: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1974:
1975: IF l_debug_mode = 'Y' THEN
1976: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1977: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);