DBA Data[Home] [Help]

APPS.DPP_EXECUTIONPROCESS_PVT dependencies on FND_MSG_PUB

Line 11: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);

7: -- NOTE :
8: -- End of Comments
9:
10: G_PKG_NAME CONSTANT VARCHAR2(30) := 'DPP_EXECUTIONPROCESS_PVT';
11: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
12: G_FILE_NAME CONSTANT VARCHAR2(14) := 'dppexppb.pls';
13:
14: G_NO_REC_PROC_MSG CONSTANT VARCHAR2(50) := 'This process is not enabled (process code) : ';
15: G_NO_EVT_MSG CONSTANT VARCHAR2(52) := 'Business event not raised for the process code : ';

Line 158: FND_MSG_PUB.INITIALIZE;

154:
155: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, 'Public API: ' || L_API_NAME || ' started at: ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss'));
156:
157: --Initialize message list
158: FND_MSG_PUB.INITIALIZE;
159:
160: -- Initialize API return status to sucess
161: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
162:

Line 279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

275: WHEN FND_API.G_EXC_ERROR THEN
276: ROLLBACK TO INITIATE_EXEC;
277: retcode := 2;
278: errbuf := 'Error';
279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
280: IF l_msg_count > 1 THEN
281: FOR I IN 1..l_msg_count LOOP
282: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
283: END LOOP;

Line 282: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

278: errbuf := 'Error';
279: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
280: IF l_msg_count > 1 THEN
281: FOR I IN 1..l_msg_count LOOP
282: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
283: END LOOP;
284: END IF;
285:
286: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

288: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
289: ROLLBACK TO INITIATE_EXEC;
290: retcode := 2;
291: errbuf := 'Error';
292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
293: IF l_msg_count > 1 THEN
294: FOR I IN 1..l_msg_count LOOP
295: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
296: END LOOP;

Line 295: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

291: errbuf := 'Error';
292: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
293: IF l_msg_count > 1 THEN
294: FOR I IN 1..l_msg_count LOOP
295: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
296: END LOOP;
297: END IF;
298:
299: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 309: FND_MSG_PUB.add;

305: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
306: fnd_message.set_token('ROUTINE', l_full_name);
307: fnd_message.set_token('ERRNO', sqlcode);
308: fnd_message.set_token('REASON', sqlerrm);
309: FND_MSG_PUB.add;
310:
311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
312: IF l_msg_count > 1 THEN
313: FOR I IN 1..l_msg_count LOOP

Line 311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

307: fnd_message.set_token('ERRNO', sqlcode);
308: fnd_message.set_token('REASON', sqlerrm);
309: FND_MSG_PUB.add;
310:
311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
312: IF l_msg_count > 1 THEN
313: FOR I IN 1..l_msg_count LOOP
314: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
315: END LOOP;

Line 314: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

310:
311: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
312: IF l_msg_count > 1 THEN
313: FOR I IN 1..l_msg_count LOOP
314: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
315: END LOOP;
316: END IF;
317:
318: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 385: FND_MSG_PUB.INITIALIZE;

381: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
382:
383: --Initialize message list if p_init_msg_list is TRUE.
384: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
385: FND_MSG_PUB.INITIALIZE;
386: END IF;
387:
388: -- Initialize API return status to sucess
389: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );

485:
486: EXCEPTION
487: WHEN FND_API.G_EXC_ERROR THEN
488: ROLLBACK TO EXECUTE_NOTIF;
489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
490: IF x_msg_count > 1 THEN
491: FOR I IN 1..x_msg_count LOOP
492: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
493: END LOOP;

Line 492: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

488: ROLLBACK TO EXECUTE_NOTIF;
489: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
490: IF x_msg_count > 1 THEN
491: FOR I IN 1..x_msg_count LOOP
492: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
493: END LOOP;
494: END IF;
495: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || x_msg_data),1,4000));
496: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );

496: FND_FILE.NEW_LINE(FND_FILE.LOG);
497:
498: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
499: ROLLBACK TO EXECUTE_NOTIF;
500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
501: IF x_msg_count > 1 THEN
502: FOR I IN 1..x_msg_count LOOP
503: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
504: END LOOP;

Line 503: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

499: ROLLBACK TO EXECUTE_NOTIF;
500: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
501: IF x_msg_count > 1 THEN
502: FOR I IN 1..x_msg_count LOOP
503: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
504: END LOOP;
505: END IF;
506: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || x_msg_data),1,4000));
507: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 515: FND_MSG_PUB.add;

511: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
512: fnd_message.set_token('ROUTINE', l_full_name);
513: fnd_message.set_token('ERRNO', sqlcode);
514: fnd_message.set_token('REASON', sqlerrm);
515: FND_MSG_PUB.add;
516:
517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
518: IF x_msg_count > 1 THEN
519: FOR I IN 1..x_msg_count LOOP

Line 517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

513: fnd_message.set_token('ERRNO', sqlcode);
514: fnd_message.set_token('REASON', sqlerrm);
515: FND_MSG_PUB.add;
516:
517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
518: IF x_msg_count > 1 THEN
519: FOR I IN 1..x_msg_count LOOP
520: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
521: END LOOP;

Line 520: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

516:
517: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
518: IF x_msg_count > 1 THEN
519: FOR I IN 1..x_msg_count LOOP
520: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
521: END LOOP;
522: END IF;
523: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || x_msg_data),1,4000));
524: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 577: FND_MSG_PUB.INITIALIZE;

573: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_PROCEDURE, 'dpp.plsql.' || L_FULL_NAME, L_API_NAME||': START');
574:
575: --Initialize message list if p_init_msg_list is TRUE.
576: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
577: FND_MSG_PUB.INITIALIZE;
578: END IF;
579:
580: -- Initialize API return status to sucess
581: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

610:
611: EXCEPTION
612: WHEN FND_API.G_EXC_ERROR THEN
613: ROLLBACK TO EXEC_PROCESS;
614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
615: IF x_msg_count > 1 THEN
616: FOR I IN 1..x_msg_count LOOP
617: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
618: END LOOP;

Line 617: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

613: ROLLBACK TO EXEC_PROCESS;
614: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
615: IF x_msg_count > 1 THEN
616: FOR I IN 1..x_msg_count LOOP
617: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
618: END LOOP;
619: END IF;
620: FND_FILE.PUT_LINE(FND_FILE.LOG, G_NO_EVT_MSG || P_PROCESS_CODE);
621: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

623: FND_FILE.NEW_LINE(FND_FILE.LOG);
624:
625: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
626: ROLLBACK TO EXEC_PROCESS;
627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
628: IF x_msg_count > 1 THEN
629: FOR I IN 1..x_msg_count LOOP
630: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
631: END LOOP;

Line 630: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

626: ROLLBACK TO EXEC_PROCESS;
627: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
628: IF x_msg_count > 1 THEN
629: FOR I IN 1..x_msg_count LOOP
630: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
631: END LOOP;
632: END IF;
633: FND_FILE.PUT_LINE(FND_FILE.LOG, G_NO_EVT_MSG || P_PROCESS_CODE);
634: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 644: FND_MSG_PUB.ADD;

640: FND_MESSAGE.SET_NAME('FND', 'SQL_PLSQL_ERROR');
641: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
642: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
643: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
644: FND_MSG_PUB.ADD;
645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
646: IF x_msg_count > 1 THEN
647: FOR I IN 1..x_msg_count LOOP
648: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

Line 645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );

641: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
642: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
643: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
644: FND_MSG_PUB.ADD;
645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
646: IF x_msg_count > 1 THEN
647: FOR I IN 1..x_msg_count LOOP
648: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
649: END LOOP;

Line 648: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

644: FND_MSG_PUB.ADD;
645: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => x_msg_count, p_data => x_msg_data );
646: IF x_msg_count > 1 THEN
647: FOR I IN 1..x_msg_count LOOP
648: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
649: END LOOP;
650: END IF;
651: FND_FILE.PUT_LINE(FND_FILE.LOG, G_NO_EVT_MSG || P_PROCESS_CODE);
652: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 688: fnd_msg_pub.add;

684: EXCEPTION
685: WHEN NO_DATA_FOUND THEN
686: L_RET_ID := null;
687: fnd_message.set_name( 'DPP','DPP_SUPP_TRDPRFLS_MISSING_ERR');
688: fnd_msg_pub.add;
689: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_EXCEPTION, 'dpp.plsql.' || L_FULL_NAME, 'Supplier trade profile setup not available');
690: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Supplier trade profile setup not available');
691: FND_FILE.NEW_LINE(FND_FILE.LOG);
692: RAISE FND_API.G_EXC_ERROR;

Line 781: fnd_msg_pub.add;

777: --Check if setup is available at system parameter level
778: IF NOT IS_PROCESS_SETUP(NULL, P_ORG_ID) THEN
779: --Process Setup does not exist
780: fnd_message.set_name( 'DPP','DPP_PROCESS_SETUP_MISSING_ERR');
781: fnd_msg_pub.add;
782: FND_FILE.PUT_LINE(FND_FILE.LOG, 'No price protection setup available for vendor id : '
783: || P_VENDOR_ID || ' at site id ' || P_VENDOR_SITE_ID || ', org id ' || P_ORG_ID);
784: FND_FILE.NEW_LINE(FND_FILE.LOG);
785: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'No price protection setup available for vendor id : '

Line 848: FND_MSG_PUB.INITIALIZE;

844:
845: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Public API: ' || l_api_name || ' started at: ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss'));
846:
847: --Initialize message list
848: FND_MSG_PUB.INITIALIZE;
849:
850: -- Initialize API return status to sucess
851: L_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
852:

Line 889: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

885: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, '*' || G_AUTO_EVT_SUCCESS_MSG );
886: ELSE
887: retcode := 1;
888: errbuf := 'Warning';
889: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
890: IF l_msg_count > 1 THEN
891: FOR I IN 1..l_msg_count LOOP
892: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
893: END LOOP;

Line 892: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

888: errbuf := 'Warning';
889: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
890: IF l_msg_count > 1 THEN
891: FOR I IN 1..l_msg_count LOOP
892: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
893: END LOOP;
894: END IF;
895: FND_FILE.PUT_LINE(FND_FILE.LOG,G_ERR_AUTO_NTF_MSG);
896: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

915: WHEN FND_API.G_EXC_ERROR THEN
916: ROLLBACK TO INITIATE_NOTIF;
917: retcode := 2;
918: errbuf := 'Error';
919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
920: IF l_msg_count > 1 THEN
921: FOR I IN 1..l_msg_count LOOP
922: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
923: END LOOP;

Line 922: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

918: errbuf := 'Error';
919: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
920: IF l_msg_count > 1 THEN
921: FOR I IN 1..l_msg_count LOOP
922: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
923: END LOOP;
924: END IF;
925: FND_FILE.PUT_LINE(FND_FILE.LOG,G_ERR_AUTO_NTF_MSG);
926: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

930: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
931: ROLLBACK TO INITIATE_NOTIF;
932: retcode := 2;
933: errbuf := 'Error';
934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
935: IF l_msg_count > 1 THEN
936: FOR I IN 1..l_msg_count LOOP
937: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
938: END LOOP;

Line 937: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

933: errbuf := 'Error';
934: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
935: IF l_msg_count > 1 THEN
936: FOR I IN 1..l_msg_count LOOP
937: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
938: END LOOP;
939: END IF;
940: FND_FILE.PUT_LINE(FND_FILE.LOG, G_ERR_AUTO_NTF_MSG);
941: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 952: FND_MSG_PUB.add;

948: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
949: fnd_message.set_token('ROUTINE', l_full_name);
950: fnd_message.set_token('ERRNO', sqlcode);
951: fnd_message.set_token('REASON', sqlerrm);
952: FND_MSG_PUB.add;
953:
954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
955: IF l_msg_count > 1 THEN
956: FOR I IN 1..l_msg_count LOOP

Line 954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );

950: fnd_message.set_token('ERRNO', sqlcode);
951: fnd_message.set_token('REASON', sqlerrm);
952: FND_MSG_PUB.add;
953:
954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
955: IF l_msg_count > 1 THEN
956: FOR I IN 1..l_msg_count LOOP
957: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
958: END LOOP;

Line 957: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

953:
954: FND_MSG_PUB.Count_And_Get (p_encoded => FND_API.G_FALSE, p_count => l_msg_count, p_data => l_msg_data );
955: IF l_msg_count > 1 THEN
956: FOR I IN 1..l_msg_count LOOP
957: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
958: END LOOP;
959: END IF;
960: FND_FILE.PUT_LINE(FND_FILE.LOG, G_ERR_AUTO_NTF_MSG);
961: FND_FILE.NEW_LINE(FND_FILE.LOG);

Line 1016: FND_MSG_PUB.initialize;

1012: END IF;
1013:
1014: -- Initialize message list if p_init_msg_list is set to TRUE.
1015: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1016: FND_MSG_PUB.initialize;
1017: END IF;
1018:
1019: -- Initialize API return status to SUCCESS
1020: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1041: FND_MSG_PUB.Count_And_Get (

1037: x_return_status := FND_API.G_RET_STS_ERROR;
1038: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1039: FND_FILE.NEW_LINE(FND_FILE.LOG);
1040: -- Standard call to get message count and if count=1, get the message
1041: FND_MSG_PUB.Count_And_Get (
1042: p_encoded => FND_API.G_FALSE,
1043: p_count => x_msg_count,
1044: p_data => x_msg_data
1045: );

Line 1052: FND_MSG_PUB.Count_And_Get (

1048: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1049: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1050: FND_FILE.NEW_LINE(FND_FILE.LOG);
1051: -- Standard call to get message count and if count=1, get the message
1052: FND_MSG_PUB.Count_And_Get (
1053: p_encoded => FND_API.G_FALSE,
1054: p_count => x_msg_count,
1055: p_data => x_msg_data
1056: );

Line 1062: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1058: ROLLBACK TO POPULATE_EXECUTIONPROCESS;
1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1061: FND_FILE.NEW_LINE(FND_FILE.LOG);
1062: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1064: END IF;
1065: -- Standard call to get message count and if count=1, get the message
1066: FND_MSG_PUB.Count_And_Get (

Line 1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1059: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1060: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1061: FND_FILE.NEW_LINE(FND_FILE.LOG);
1062: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1064: END IF;
1065: -- Standard call to get message count and if count=1, get the message
1066: FND_MSG_PUB.Count_And_Get (
1067: p_encoded => FND_API.G_FALSE,

Line 1066: FND_MSG_PUB.Count_And_Get (

1062: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1063: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1064: END IF;
1065: -- Standard call to get message count and if count=1, get the message
1066: FND_MSG_PUB.Count_And_Get (
1067: p_encoded => FND_API.G_FALSE,
1068: p_count => x_msg_count,
1069: p_data => x_msg_data
1070: );

Line 1188: FND_MSG_PUB.Count_And_Get (

1184: x_return_status := FND_API.G_RET_STS_ERROR;
1185: FND_FILE.PUT_LINE(FND_FILE.LOG,G_NO_SETUP_MSG);
1186: FND_FILE.NEW_LINE(FND_FILE.LOG);
1187: -- Standard call to get message count and if count=1, get the message
1188: FND_MSG_PUB.Count_And_Get (
1189: p_encoded => FND_API.G_FALSE,
1190: p_count => x_msg_count,
1191: p_data => x_msg_data
1192: );

Line 1199: FND_MSG_PUB.Count_And_Get (

1195: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1196: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1197: FND_FILE.NEW_LINE(FND_FILE.LOG);
1198: -- Standard call to get message count and if count=1, get the message
1199: FND_MSG_PUB.Count_And_Get (
1200: p_encoded => FND_API.G_FALSE,
1201: p_count => x_msg_count,
1202: p_data => x_msg_data
1203: );

Line 1209: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1205: ROLLBACK TO InsertExecProcesses;
1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1207: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1208: FND_FILE.NEW_LINE(FND_FILE.LOG);
1209: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1211: END IF;
1212: -- Standard call to get message count and if count=1, get the message
1213: FND_MSG_PUB.Count_And_Get (

Line 1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1206: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1207: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1208: FND_FILE.NEW_LINE(FND_FILE.LOG);
1209: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1211: END IF;
1212: -- Standard call to get message count and if count=1, get the message
1213: FND_MSG_PUB.Count_And_Get (
1214: p_encoded => FND_API.G_FALSE,

Line 1213: FND_MSG_PUB.Count_And_Get (

1209: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1210: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1211: END IF;
1212: -- Standard call to get message count and if count=1, get the message
1213: FND_MSG_PUB.Count_And_Get (
1214: p_encoded => FND_API.G_FALSE,
1215: p_count => x_msg_count,
1216: p_data => x_msg_data
1217: );

Line 1292: FND_MSG_PUB.initialize;

1288: BEGIN
1289: SAVEPOINT Change_Status;
1290:
1291: -- Initialize message list
1292: FND_MSG_PUB.initialize;
1293:
1294:
1295: DPP_UTILITY_PVT.DEBUG_MESSAGE( FND_LOG.LEVEL_STATEMENT, 'dpp.plsql.' || L_FULL_NAME, 'Public API: ' || l_api_name || ' started at: ' || to_char(sysdate,'dd-mon-yyyy hh24:mi:ss'));
1296:

Line 1379: FND_MSG_PUB.add;

1375: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1376: fnd_message.set_token('ROUTINE', l_full_name);
1377: fnd_message.set_token('ERRNO', sqlcode);
1378: fnd_message.set_token('REASON', sqlerrm);
1379: FND_MSG_PUB.add;
1380: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1381: END;
1382:
1383: ELSIF l_skip_adjustment_flag = 'Y' AND l_skip_approval_flag = 'Y' THEN

Line 1422: FND_MSG_PUB.add;

1418: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1419: fnd_message.set_token('ROUTINE', l_full_name);
1420: fnd_message.set_token('ERRNO', sqlcode);
1421: fnd_message.set_token('REASON', sqlerrm);
1422: FND_MSG_PUB.add;
1423: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1424: END;
1425:
1426: ELSE

Line 1450: FND_MSG_PUB.add;

1446: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1447: fnd_message.set_token('ROUTINE', l_full_name);
1448: fnd_message.set_token('ERRNO', sqlcode);
1449: fnd_message.set_token('REASON', sqlerrm);
1450: FND_MSG_PUB.add;
1451: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1452: END;
1453:
1454: END IF;

Line 1523: FND_MSG_PUB.Count_And_Get (

1519: ROLLBACK TO Change_Status;
1520: retcode := 2;
1521: errbuf := 'Error';
1522: -- Standard call to get message count and if count=1, get the message
1523: FND_MSG_PUB.Count_And_Get (
1524: p_encoded => FND_API.G_FALSE,
1525: p_count => l_msg_count,
1526: p_data => l_msg_data
1527: );

Line 1530: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

1526: p_data => l_msg_data
1527: );
1528: IF l_msg_count > 1 THEN
1529: FOR I IN 1..l_msg_count LOOP
1530: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1531: END LOOP;
1532: END IF;
1533:
1534: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 1541: FND_MSG_PUB.Count_And_Get (

1537: ROLLBACK TO Change_Status;
1538: retcode := 2;
1539: errbuf := 'Error';
1540: -- Standard call to get message count and if count=1, get the message
1541: FND_MSG_PUB.Count_And_Get (
1542: p_encoded => FND_API.G_FALSE,
1543: p_count => l_msg_count,
1544: p_data => l_msg_data
1545: );

Line 1548: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

1544: p_data => l_msg_data
1545: );
1546: IF l_msg_count > 1 THEN
1547: FOR I IN 1..l_msg_count LOOP
1548: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1549: END LOOP;
1550: END IF;
1551:
1552: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 1562: FND_MSG_PUB.add;

1558: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1559: fnd_message.set_token('ROUTINE', l_full_name);
1560: fnd_message.set_token('ERRNO', sqlcode);
1561: fnd_message.set_token('REASON', sqlerrm);
1562: FND_MSG_PUB.add;
1563:
1564: -- Standard call to get message count and if count=1, get the message
1565: FND_MSG_PUB.Count_And_Get (
1566: p_encoded => FND_API.G_FALSE,

Line 1565: FND_MSG_PUB.Count_And_Get (

1561: fnd_message.set_token('REASON', sqlerrm);
1562: FND_MSG_PUB.add;
1563:
1564: -- Standard call to get message count and if count=1, get the message
1565: FND_MSG_PUB.Count_And_Get (
1566: p_encoded => FND_API.G_FALSE,
1567: p_count => l_msg_count,
1568: p_data => l_msg_data
1569: );

Line 1572: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);

1568: p_data => l_msg_data
1569: );
1570: IF l_msg_count > 1 THEN
1571: FOR I IN 1..l_msg_count LOOP
1572: l_msg_data := SUBSTR((l_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1573: END LOOP;
1574: END IF;
1575:
1576: FND_FILE.PUT_LINE(FND_FILE.LOG,substr(('Error Message : ' || l_msg_data),1,4000));

Line 1654: FND_MSG_PUB.initialize;

1650: END IF;
1651:
1652: -- Initialize message list if p_init_msg_list is set to TRUE.
1653: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1654: FND_MSG_PUB.initialize;
1655: END IF;
1656:
1657: -- Initialize API return status to SUCCESS
1658: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1713: FND_MSG_PUB.Count_And_Get (

1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1711: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1712: -- Standard call to get message count and if count=1, get the message
1713: FND_MSG_PUB.Count_And_Get (
1714: p_encoded => FND_API.G_FALSE,
1715: p_count => x_msg_count,
1716: p_data => x_msg_data
1717: );

Line 1724: FND_MSG_PUB.Count_And_Get (

1720: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1721: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1722: FND_FILE.NEW_LINE(FND_FILE.LOG);
1723: -- Standard call to get message count and if count=1, get the message
1724: FND_MSG_PUB.Count_And_Get (
1725: p_encoded => FND_API.G_FALSE,
1726: p_count => x_msg_count,
1727: p_data => x_msg_data
1728: );

Line 1734: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1730: ROLLBACK TO APPROVE_TRANSACTION;
1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1733: FND_FILE.NEW_LINE(FND_FILE.LOG);
1734: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1736: END IF;
1737: -- Standard call to get message count and if count=1, get the message
1738: FND_MSG_PUB.Count_And_Get (

Line 1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1731: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1732: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1733: FND_FILE.NEW_LINE(FND_FILE.LOG);
1734: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1736: END IF;
1737: -- Standard call to get message count and if count=1, get the message
1738: FND_MSG_PUB.Count_And_Get (
1739: p_encoded => FND_API.G_FALSE,

Line 1738: FND_MSG_PUB.Count_And_Get (

1734: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1735: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1736: END IF;
1737: -- Standard call to get message count and if count=1, get the message
1738: FND_MSG_PUB.Count_And_Get (
1739: p_encoded => FND_API.G_FALSE,
1740: p_count => x_msg_count,
1741: p_data => x_msg_data
1742: );

Line 1799: FND_MSG_PUB.initialize;

1795: END IF;
1796:
1797: -- Initialize message list if p_init_msg_list is set to TRUE.
1798: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1799: FND_MSG_PUB.initialize;
1800: END IF;
1801:
1802: -- Initialize API return status to SUCCESS
1803: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 1841: FND_MSG_PUB.Count_And_Get (

1837: x_return_status := FND_API.G_RET_STS_ERROR;
1838: --FND_FILE.PUT_LINE(FND_FILE.LOG,'Supplier Trade Profile or Process Setup not available');
1839: --FND_FILE.NEW_LINE(FND_FILE.LOG);
1840: -- Standard call to get message count and if count=1, get the message
1841: FND_MSG_PUB.Count_And_Get (
1842: p_encoded => FND_API.G_FALSE,
1843: p_count => x_msg_count,
1844: p_data => x_msg_data
1845: );

Line 1852: FND_MSG_PUB.Count_And_Get (

1848: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1849: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1850: FND_FILE.NEW_LINE(FND_FILE.LOG);
1851: -- Standard call to get message count and if count=1, get the message
1852: FND_MSG_PUB.Count_And_Get (
1853: p_encoded => FND_API.G_FALSE,
1854: p_count => x_msg_count,
1855: p_data => x_msg_data
1856: );

Line 1862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

1858: ROLLBACK TO UPDATE_STATUS;
1859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1860: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1861: FND_FILE.NEW_LINE(FND_FILE.LOG);
1862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1864: END IF;
1865: -- Standard call to get message count and if count=1, get the message
1866: FND_MSG_PUB.Count_And_Get (

Line 1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

1859: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1860: FND_FILE.PUT_LINE(FND_FILE.LOG,'Unexpected error occured: ' || SQLERRM);
1861: FND_FILE.NEW_LINE(FND_FILE.LOG);
1862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1864: END IF;
1865: -- Standard call to get message count and if count=1, get the message
1866: FND_MSG_PUB.Count_And_Get (
1867: p_encoded => FND_API.G_FALSE,

Line 1866: FND_MSG_PUB.Count_And_Get (

1862: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1863: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1864: END IF;
1865: -- Standard call to get message count and if count=1, get the message
1866: FND_MSG_PUB.Count_And_Get (
1867: p_encoded => FND_API.G_FALSE,
1868: p_count => x_msg_count,
1869: p_data => x_msg_data
1870: );

Line 1938: FND_MSG_PUB.initialize;

1934: END IF;
1935:
1936: -- Initialize message list if p_init_msg_list is set to TRUE.
1937: IF FND_API.to_Boolean( p_init_msg_list ) THEN
1938: FND_MSG_PUB.initialize;
1939: END IF;
1940:
1941: -- Initialize API return status to SUCCESS
1942: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 2042: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN

2038: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2039: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2040: WHEN OTHERS THEN
2041: x_return_status := Fnd_Api.g_ret_sts_unexp_error ;
2042: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_unexp_error) THEN
2043: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
2044: fnd_message.set_token('ROUTINE', l_full_name);
2045: fnd_message.set_token('ERRNO', SQLCODE);
2046: fnd_message.set_token('REASON', sqlerrm);