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 936: Fnd_Msg_Pub.add_exc_msg

932: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
933: -- successfully deleted so far.
934: l_rows3 := l_rows3 + nvl(sql%rowcount,0);
935: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
936: Fnd_Msg_Pub.add_exc_msg
937: ( p_pkg_name => 'PA_PURGE_PUB'
938: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
939: , p_error_text => SUBSTRB(SQLERRM,1,240));
940: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 963: Fnd_Msg_Pub.add_exc_msg

959: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
960: -- successfully deleted so far.
961: l_rows2 := l_rows2 + nvl(sql%rowcount,0);
962: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
963: Fnd_Msg_Pub.add_exc_msg
964: ( p_pkg_name => 'PA_PURGE_PUB'
965: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
966: , p_error_text => SUBSTRB(SQLERRM,1,240));
967: EXIT; -- 5201806 : exit the loop after discussion with Anders.

Line 989: Fnd_Msg_Pub.add_exc_msg

985: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
986: -- successfully deleted so far.
987: l_rows1 := l_rows1 + nvl(sql%rowcount,0);
988: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
989: Fnd_Msg_Pub.add_exc_msg
990: ( p_pkg_name => 'PA_PURGE_PUB'
991: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
992: , p_error_text => SUBSTRB(SQLERRM,1,240));
993: EXIT; -- 5201806 : exit the loop after discussion with Anders.

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

1066:
1067: EXCEPTION
1068: WHEN FND_API.G_EXC_ERROR THEN
1069: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1070: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1071:
1072: IF c_purge_wf_details%ISOPEN THEN
1073: Close c_purge_wf_details;
1074: END IF;

Line 1105: Fnd_Msg_Pub.add_exc_msg

1101: IF c_purge_wf_details%ISOPEN THEN
1102: Close c_purge_wf_details;
1103: END IF;
1104:
1105: Fnd_Msg_Pub.add_exc_msg
1106: ( p_pkg_name => 'PA_PURGE_PUB'
1107: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
1108: , p_error_text => x_msg_data);
1109:

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

1106: ( p_pkg_name => 'PA_PURGE_PUB'
1107: , p_procedure_name => 'PURGE_PROJ_WORKFLOW'
1108: , p_error_text => x_msg_data);
1109:
1110: x_msg_count := FND_MSG_PUB.count_msg;--5201806
1111:
1112: IF p_debug_mode = 'Y' THEN
1113: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1114: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1209: Fnd_Msg_Pub.add_exc_msg

1205: -- Dont raise ,Just increment the Number of Rows Deleted Counter for the number of rows
1206: -- successfully deleted so far.
1207: l_rows1 :=l_rows1+nvl(sql%rowcount,0);
1208: l_local_error_flag := 'Y'; -- 5201806 : Populate the error in stack
1209: Fnd_Msg_Pub.add_exc_msg
1210: ( p_pkg_name => 'PA_PURGE_PUB'
1211: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1212: , p_error_text => SUBSTRB(SQLERRM,1,240));
1213: EXIT; -- 5201806 : exit the loop after discussion with Anders.

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

1249: END IF;
1250: EXCEPTION
1251: WHEN FND_API.G_EXC_ERROR THEN
1252: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1253: x_msg_count := Fnd_Msg_Pub.count_msg; -- 5201806 Changed to x_msg_count
1254:
1255: IF c_get_request_id%ISOPEN THEN
1256: CLOSE c_get_request_id;
1257: END IF;

Line 1288: Fnd_Msg_Pub.add_exc_msg

1284: IF c_get_request_id%ISOPEN THEN
1285: CLOSE c_get_request_id;
1286: END IF;
1287:
1288: Fnd_Msg_Pub.add_exc_msg
1289: ( p_pkg_name => 'PA_PURGE_PUB'
1290: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1291: , p_error_text => x_msg_data);
1292:

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

1289: ( p_pkg_name => 'PA_PURGE_PUB'
1290: , p_procedure_name => 'PURGE_REPORTING_EXCEPTIONS'
1291: , p_error_text => x_msg_data);
1292:
1293: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1294:
1295: IF p_debug_mode = 'Y' THEN
1296: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1297: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1448: Fnd_Msg_Pub.add_exc_msg

1444: WHEN NO_DATA_FOUND THEN
1445: NULL ; -- Do nothing
1446: WHEN OTHERS THEN
1447: l_local_error_flag := 'Y';
1448: Fnd_Msg_Pub.add_exc_msg
1449: ( p_pkg_name => 'PA_PURGE_PUB'
1450: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1451: , p_error_text => SUBSTRB(SQLERRM,1,240));
1452: EXIT;

Line 1493: x_msg_count := Fnd_Msg_Pub.count_msg;

1489: EXCEPTION
1490: WHEN FND_API.G_EXC_ERROR THEN
1491:
1492: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1493: x_msg_count := Fnd_Msg_Pub.count_msg;
1494:
1495: IF c_purge_org_authority%ISOPEN THEN
1496: CLOSE c_purge_org_authority;
1497: END IF;

Line 1513: Fnd_Msg_Pub.add_exc_msg

1509: IF c_purge_org_authority%ISOPEN THEN
1510: CLOSE c_purge_org_authority;
1511: END IF;
1512:
1513: Fnd_Msg_Pub.add_exc_msg
1514: ( p_pkg_name => 'PA_PURGE_PUB'
1515: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1516: , p_error_text => x_msg_data);
1517:

Line 1518: x_msg_count := FND_MSG_PUB.count_msg;

1514: ( p_pkg_name => 'PA_PURGE_PUB'
1515: , p_procedure_name => 'PURGE_ORG_AUTHORITY'
1516: , p_error_text => x_msg_data);
1517:
1518: x_msg_count := FND_MSG_PUB.count_msg;
1519:
1520: IF p_debug_mode = 'Y' THEN
1521: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1522: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1606: Fnd_Msg_Pub.add_exc_msg

1602: NULL ; -- Do nothing
1603: WHEN OTHERS THEN
1604: l_rows1 := l_rows1 + nvl(sql%rowcount,0);
1605: l_local_error_flag := 'Y';
1606: Fnd_Msg_Pub.add_exc_msg
1607: ( p_pkg_name => 'PA_PURGE_PUB'
1608: , p_procedure_name => 'PURGE_PJI_DEBUG'
1609: , p_error_text => SUBSTRB(SQLERRM,1,240));
1610: END;

Line 1630: Fnd_Msg_Pub.add_exc_msg

1626: NULL ; -- Do nothing
1627: WHEN OTHERS THEN
1628: l_rows2 := l_rows2 + nvl(sql%rowcount,0);
1629: l_local_error_flag := 'Y';
1630: Fnd_Msg_Pub.add_exc_msg
1631: ( p_pkg_name => 'PA_PURGE_PUB'
1632: , p_procedure_name => 'PURGE_PJI_DEBUG'
1633: , p_error_text => SUBSTRB(SQLERRM,1,240));
1634: END;

Line 1654: Fnd_Msg_Pub.add_exc_msg

1650: NULL ; -- Do nothing
1651: WHEN OTHERS THEN
1652: l_rows3 := l_rows3 + nvl(sql%rowcount,0);
1653: l_local_error_flag := 'Y';
1654: Fnd_Msg_Pub.add_exc_msg
1655: ( p_pkg_name => 'PA_PURGE_PUB'
1656: , p_procedure_name => 'PURGE_PJI_DEBUG'
1657: , p_error_text => SUBSTRB(SQLERRM,1,240));
1658: END;

Line 1727: x_msg_count := Fnd_Msg_Pub.count_msg;

1723:
1724: EXCEPTION
1725: WHEN FND_API.G_EXC_ERROR THEN
1726: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1727: x_msg_count := Fnd_Msg_Pub.count_msg;
1728:
1729: IF p_debug_mode = 'Y' THEN
1730: Pa_Debug.reset_curr_function;
1731: END IF;

Line 1738: Fnd_Msg_Pub.add_exc_msg

1734: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1735: x_msg_count := 1;
1736: x_msg_data := SUBSTRB(SQLERRM,1,240);
1737:
1738: Fnd_Msg_Pub.add_exc_msg
1739: ( p_pkg_name => 'PA_PURGE_PUB'
1740: , p_procedure_name => 'PURGE_PJI_DEBUG'
1741: , p_error_text => x_msg_data);
1742:

Line 1743: x_msg_count := FND_MSG_PUB.count_msg;

1739: ( p_pkg_name => 'PA_PURGE_PUB'
1740: , p_procedure_name => 'PURGE_PJI_DEBUG'
1741: , p_error_text => x_msg_data);
1742:
1743: x_msg_count := FND_MSG_PUB.count_msg;
1744:
1745: IF p_debug_mode = 'Y' THEN
1746: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1747: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1843: Fnd_Msg_Pub.add_exc_msg

1839: IF c_purge_details%ISOPEN THEN
1840: CLOSE c_purge_details ;
1841: END IF;
1842:
1843: Fnd_Msg_Pub.add_exc_msg
1844: ( p_pkg_name => 'PA_PURGE_PUB'
1845: , p_procedure_name => 'PRINT_OUTPUT_REPORT'
1846: , p_error_text => x_msg_data);
1847:

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

1844: ( p_pkg_name => 'PA_PURGE_PUB'
1845: , p_procedure_name => 'PRINT_OUTPUT_REPORT'
1846: , p_error_text => x_msg_data);
1847:
1848: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1849:
1850: IF l_debug_mode = 'Y' THEN -- 5201806
1851: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1852: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);

Line 1949: Fnd_Msg_Pub.add_exc_msg

1945: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1946: x_msg_count := 1;
1947: x_msg_data := SUBSTRB(SQLERRM,1,240);
1948:
1949: Fnd_Msg_Pub.add_exc_msg
1950: ( p_pkg_name => 'PA_PURGE_PUB'
1951: , p_procedure_name => 'INSERT_PURGE_LOG'
1952: , p_error_text => x_msg_data);
1953:

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

1950: ( p_pkg_name => 'PA_PURGE_PUB'
1951: , p_procedure_name => 'INSERT_PURGE_LOG'
1952: , p_error_text => x_msg_data);
1953:
1954: x_msg_count := FND_MSG_PUB.count_msg; --5201806
1955:
1956: IF l_debug_mode = 'Y' THEN
1957: Pa_Debug.g_err_stage:= 'Unexpected Error'||x_msg_data;
1958: Pa_Debug.WRITE('PA_PURGE_PUB',Pa_Debug.g_err_stage, 5);