DBA Data[Home] [Help]

APPS.DPP_BUSINESSEVENTS_PVT dependencies on FND_MSG_PUB

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

20:
21: FUNCTION IS_NOTIF_EXECUTED(P_TXN_HDR_ID IN NUMBER, P_PROC_CODE IN VARCHAR2) RETURN BOOLEAN;
22:
23: G_PKG_NAME CONSTANT VARCHAR2(30) := 'DPP_BUSINESSEVENTS_PVT';
24: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
25: G_FILE_NAME CONSTANT VARCHAR2(12) := 'dppvbevb.pls';
26:
27:
28: FUNCTION IS_NOTIF_EXECUTED(P_TXN_HDR_ID IN NUMBER, P_PROC_CODE IN VARCHAR2)

Line 84: FND_MSG_PUB.INITIALIZE;

80: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_STATEMENT, l_module, L_API_NAME||': START');
81:
82: --Initialize message list if p_init_msg_list is TRUE.
83: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
84: FND_MSG_PUB.INITIALIZE;
85: END IF;
86:
87: -- Initialize API return status to sucess
88: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

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

158: WHEN FND_API.G_EXC_ERROR THEN
159: ROLLBACK TO SEND_CANCEL_NOTIF;
160: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
161: -- Standard call to get message count and if count=1, get the message
162: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
163: IF X_MSG_COUNT > 1 THEN
164: FOR I IN 1..X_MSG_COUNT LOOP
165: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
166: END LOOP;

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

161: -- Standard call to get message count and if count=1, get the message
162: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
163: IF X_MSG_COUNT > 1 THEN
164: FOR I IN 1..X_MSG_COUNT LOOP
165: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
166: END LOOP;
167: END IF;
168: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
169: ROLLBACK TO SEND_CANCEL_NOTIF;

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

168: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
169: ROLLBACK TO SEND_CANCEL_NOTIF;
170: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
171: -- Standard call to get message count and if count=1, get the message
172: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
173: IF X_MSG_COUNT > 1 THEN
174: FOR I IN 1..X_MSG_COUNT LOOP
175: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
176: END LOOP;

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

171: -- Standard call to get message count and if count=1, get the message
172: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
173: IF X_MSG_COUNT > 1 THEN
174: FOR I IN 1..X_MSG_COUNT LOOP
175: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
176: END LOOP;
177: END IF;
178: WHEN OTHERS THEN
179: ROLLBACK TO SEND_CANCEL_NOTIF;

Line 184: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

180: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
181:
182: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_STATEMENT, l_module, L_API_NAME || ',FND_API.G_RET_STS_UNEXP_ERROR :: ' || SQLERRM);
183:
184: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
185: FND_MESSAGE.SET_NAME('FND', 'SQL_PLSQL_ERROR');
186: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
187: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
188: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);

Line 191: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

187: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
188: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
189: END IF;
190:
191: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
192: THEN
193: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
194: END IF;
195: -- Standard call to get message count and if count=1, get the message

Line 193: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);

189: END IF;
190:
191: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
192: THEN
193: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
194: END IF;
195: -- Standard call to get message count and if count=1, get the message
196: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
197: IF X_MSG_COUNT > 1 THEN

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

192: THEN
193: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
194: END IF;
195: -- Standard call to get message count and if count=1, get the message
196: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
197: IF X_MSG_COUNT > 1 THEN
198: FOR I IN 1..X_MSG_COUNT LOOP
199: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
200: END LOOP;

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

195: -- Standard call to get message count and if count=1, get the message
196: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
197: IF X_MSG_COUNT > 1 THEN
198: FOR I IN 1..X_MSG_COUNT LOOP
199: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
200: END LOOP;
201: END IF;
202:
203: END SEND_CANCEL_NOTIFICATIONS;

Line 246: FND_MSG_PUB.INITIALIZE;

242: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_PROCEDURE, l_module, L_API_NAME||': START');
243:
244: --Initialize message list if p_init_msg_list is TRUE.
245: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
246: FND_MSG_PUB.INITIALIZE;
247: END IF;
248:
249: -- Initialize API return status to sucess
250: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

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

287: WHEN FND_API.G_EXC_ERROR THEN
288: ROLLBACK TO RAISE_BUS_EVT_FOR_PROC;
289: X_RETURN_STATUS := FND_API.G_RET_STS_ERROR;
290: -- Standard call to get message count and if count=1, get the message
291: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
292: IF X_MSG_COUNT > 1 THEN
293: FOR I IN 1..X_MSG_COUNT LOOP
294: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
295: END LOOP;

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

290: -- Standard call to get message count and if count=1, get the message
291: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
292: IF X_MSG_COUNT > 1 THEN
293: FOR I IN 1..X_MSG_COUNT LOOP
294: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
295: END LOOP;
296: END IF;
297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
298: ROLLBACK TO RAISE_BUS_EVT_FOR_PROC;

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

297: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
298: ROLLBACK TO RAISE_BUS_EVT_FOR_PROC;
299: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
300: -- Standard call to get message count and if count=1, get the message
301: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
302: IF X_MSG_COUNT > 1 THEN
303: FOR I IN 1..X_MSG_COUNT LOOP
304: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
305: END LOOP;

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

300: -- Standard call to get message count and if count=1, get the message
301: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
302: IF X_MSG_COUNT > 1 THEN
303: FOR I IN 1..X_MSG_COUNT LOOP
304: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
305: END LOOP;
306: END IF;
307: WHEN OTHERS THEN
308: ROLLBACK TO RAISE_BUS_EVT_FOR_PROC;

Line 313: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

309: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;
310:
311: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_STATEMENT, l_module, L_API_NAME || ',FND_API.G_RET_STS_UNEXP_ERROR :: ' || SQLERRM);
312:
313: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
314: FND_MESSAGE.SET_NAME('FND', 'SQL_PLSQL_ERROR');
315: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
316: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
317: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);

Line 320: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

316: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
317: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
318: END IF;
319:
320: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
321: THEN
322: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
323: END IF;
324: -- Standard call to get message count and if count=1, get the message

Line 322: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);

318: END IF;
319:
320: IF FND_MSG_PUB.CHECK_MSG_LEVEL ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
321: THEN
322: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
323: END IF;
324: -- Standard call to get message count and if count=1, get the message
325: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
326: IF X_MSG_COUNT > 1 THEN

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

321: THEN
322: FND_MSG_PUB.ADD_EXC_MSG(G_PKG_NAME, L_API_NAME);
323: END IF;
324: -- Standard call to get message count and if count=1, get the message
325: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
326: IF X_MSG_COUNT > 1 THEN
327: FOR I IN 1..X_MSG_COUNT LOOP
328: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
329: END LOOP;

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

324: -- Standard call to get message count and if count=1, get the message
325: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
326: IF X_MSG_COUNT > 1 THEN
327: FOR I IN 1..X_MSG_COUNT LOOP
328: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
329: END LOOP;
330: END IF;
331:
332: END RAISE_BUSINESS_EVT_FOR_PROCESS;

Line 377: FND_MSG_PUB.INITIALIZE;

373: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_STATEMENT, l_module, L_API_NAME || ', Program ID : ' || P_PROGRAM_ID );
374:
375: --Initialize message list if p_init_msg_list is TRUE.
376: IF FND_API.TO_BOOLEAN (P_INIT_MSG_LIST) THEN
377: FND_MSG_PUB.INITIALIZE;
378: END IF;
379:
380: -- Initialize API return status to sucess
381: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

Line 412: FND_MSG_PUB.COUNT_AND_GET(P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );

408: FND_FILE.PUT_LINE(FND_FILE.LOG, 'Event raised : ' || L_ITEM_KEY );
409: FND_FILE.NEW_LINE(FND_FILE.LOG);
410:
411:
412: FND_MSG_PUB.COUNT_AND_GET(P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA );
413:
414: EXCEPTION
415:
416: WHEN FND_API.G_EXC_ERROR THEN

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

419:
420: FND_FILE.PUT_LINE(FND_FILE.LOG,'EXC_ERROR : '||SQLERRM);
421: FND_FILE.NEW_LINE(FND_FILE.LOG);
422: ROLLBACK TO START_WF_ON_EFF_DATE;
423: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
424: IF X_MSG_COUNT > 1 THEN
425: FOR I IN 1..X_MSG_COUNT LOOP
426: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
427: END LOOP;

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

422: ROLLBACK TO START_WF_ON_EFF_DATE;
423: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
424: IF X_MSG_COUNT > 1 THEN
425: FOR I IN 1..X_MSG_COUNT LOOP
426: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
427: END LOOP;
428: END IF;
429: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
430: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR ;

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

432:
433: FND_FILE.PUT_LINE(FND_FILE.LOG, 'UNEXP_ERROR : '||SQLERRM);
434: FND_FILE.NEW_LINE(FND_FILE.LOG);
435: ROLLBACK TO START_WF_ON_EFF_DATE;
436: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
437: IF X_MSG_COUNT > 1 THEN
438: FOR I IN 1..X_MSG_COUNT LOOP
439: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
440: END LOOP;

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

435: ROLLBACK TO START_WF_ON_EFF_DATE;
436: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
437: IF X_MSG_COUNT > 1 THEN
438: FOR I IN 1..X_MSG_COUNT LOOP
439: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
440: END LOOP;
441: END IF;
442: WHEN OTHERS THEN
443: X_RETURN_STATUS := FND_API.G_RET_STS_UNEXP_ERROR;

Line 448: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

444: DPP_UTILITY_PVT.DEBUG_MESSAGE(FND_LOG.LEVEL_EXCEPTION, l_module, L_API_NAME || ',FND_API.G_RET_STS_UNEXP_ERROR :: ' || SQLERRM);
445:
446: FND_FILE.PUT_LINE(FND_FILE.LOG, 'OTHER_ERROR : '||SQLERRM);
447: FND_FILE.NEW_LINE(FND_FILE.LOG);
448: IF FND_MSG_PUB.CHECK_MSG_LEVEL(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
449: FND_MESSAGE.SET_NAME('FND', 'SQL_PLSQL_ERROR');
450: FND_MESSAGE.SET_TOKEN('ROUTINE', L_FULL_NAME);
451: FND_MESSAGE.SET_TOKEN('ERRNO', SQLCODE);
452: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);

Line 456: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )

452: FND_MESSAGE.SET_TOKEN('REASON', SQLERRM);
453: END IF;
454:
455: ROLLBACK TO START_WF_ON_EFF_DATE;
456: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
457: THEN
458: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME,L_API_NAME);
459: END IF;
460:

Line 458: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME,L_API_NAME);

454:
455: ROLLBACK TO START_WF_ON_EFF_DATE;
456: IF FND_MSG_PUB.CHECK_MSG_LEVEL (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR )
457: THEN
458: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME,L_API_NAME);
459: END IF;
460:
461: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
462: IF X_MSG_COUNT > 1 THEN

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

457: THEN
458: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME,L_API_NAME);
459: END IF;
460:
461: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
462: IF X_MSG_COUNT > 1 THEN
463: FOR I IN 1..X_MSG_COUNT LOOP
464: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
465: END LOOP;

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

460:
461: FND_MSG_PUB.COUNT_AND_GET (P_ENCODED => FND_API.G_FALSE, P_COUNT => X_MSG_COUNT, P_DATA => X_MSG_DATA);
462: IF X_MSG_COUNT > 1 THEN
463: FOR I IN 1..X_MSG_COUNT LOOP
464: X_MSG_DATA := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
465: END LOOP;
466: END IF;
467:
468: END RAISE_EFFECTIVE_DATE_EVENT;

Line 621: FND_MSG_PUB.initialize;

617: END IF;
618: -- Initialize message list if p_init_msg_list is set to TRUE.
619: IF FND_API.to_Boolean( p_init_msg_list )
620: THEN
621: FND_MSG_PUB.initialize;
622: END IF;
623:
624: -- Debug Message
625: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_PROCEDURE, l_module, 'Public API: ' || l_api_name || 'start');

Line 642: FND_MSG_PUB.add;

638: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
639: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
640: fnd_message.set_token('ERRNO', sqlcode);
641: fnd_message.set_token('REASON', 'EXECUTION DETAIL ID NOT FOUND');
642: FND_MSG_PUB.add;
643: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
644: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
645: END IF;
646: RAISE FND_API.g_exc_error;

Line 643: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

639: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
640: fnd_message.set_token('ERRNO', sqlcode);
641: fnd_message.set_token('REASON', 'EXECUTION DETAIL ID NOT FOUND');
642: FND_MSG_PUB.add;
643: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
644: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
645: END IF;
646: RAISE FND_API.g_exc_error;
647: WHEN OTHERS THEN

Line 644: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

640: fnd_message.set_token('ERRNO', sqlcode);
641: fnd_message.set_token('REASON', 'EXECUTION DETAIL ID NOT FOUND');
642: FND_MSG_PUB.add;
643: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
644: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
645: END IF;
646: RAISE FND_API.g_exc_error;
647: WHEN OTHERS THEN
648: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 652: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

648: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
649: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
650: fnd_message.set_token('ERRNO', sqlcode);
651: fnd_message.set_token('REASON', sqlerrm);
652: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
653: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID');
654: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ');
655: FND_MSG_PUB.add;
656: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

Line 655: FND_MSG_PUB.add;

651: fnd_message.set_token('REASON', sqlerrm);
652: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
653: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID');
654: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ');
655: FND_MSG_PUB.add;
656: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
657: END IF;
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END;

Line 656: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

652: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
653: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID');
654: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ');
655: FND_MSG_PUB.add;
656: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
657: END IF;
658: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
659: END;
660:

Line 677: FND_MSG_PUB.add;

673: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
674: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
675: fnd_message.set_token('ERRNO', sqlcode);
676: fnd_message.set_token('REASON', 'INVALID USER');
677: FND_MSG_PUB.add;
678: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
679: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
680: END IF;
681: RAISE FND_API.g_exc_error;

Line 678: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

674: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
675: fnd_message.set_token('ERRNO', sqlcode);
676: fnd_message.set_token('REASON', 'INVALID USER');
677: FND_MSG_PUB.add;
678: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
679: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
680: END IF;
681: RAISE FND_API.g_exc_error;
682: WHEN OTHERS THEN

Line 679: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

675: fnd_message.set_token('ERRNO', sqlcode);
676: fnd_message.set_token('REASON', 'INVALID USER');
677: FND_MSG_PUB.add;
678: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
679: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
680: END IF;
681: RAISE FND_API.g_exc_error;
682: WHEN OTHERS THEN
683: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 704: FND_MSG_PUB.add;

700:
701: IF p_txn_hdr_rec.claim_type_flag IS NULL THEN
702: --No claim type flag has been sent
703: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_TYPE');
704: FND_MSG_PUB.add;
705: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
706: RAISE FND_API.g_exc_error;
707: ELSE
708: --Concatinate the claim flag with necessary quotes to generate xml data

Line 705: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

701: IF p_txn_hdr_rec.claim_type_flag IS NULL THEN
702: --No claim type flag has been sent
703: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_TYPE');
704: FND_MSG_PUB.add;
705: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
706: RAISE FND_API.g_exc_error;
707: ELSE
708: --Concatinate the claim flag with necessary quotes to generate xml data
709: l_claim_type_flag := ''''||p_txn_hdr_rec.claim_type_flag||'''';

Line 733: FND_MSG_PUB.add;

729: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
730: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
731: fnd_message.set_token('ERRNO', sqlcode);
732: fnd_message.set_token('REASON', sqlerrm);
733: FND_MSG_PUB.add;
734: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
735: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
736: END IF;
737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 734: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

730: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
731: fnd_message.set_token('ERRNO', sqlcode);
732: fnd_message.set_token('REASON', sqlerrm);
733: FND_MSG_PUB.add;
734: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
735: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
736: END IF;
737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
738: END;

Line 735: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

731: fnd_message.set_token('ERRNO', sqlcode);
732: fnd_message.set_token('REASON', sqlerrm);
733: FND_MSG_PUB.add;
734: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
735: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
736: END IF;
737: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
738: END;
739: END LOOP;

Line 745: FND_MSG_PUB.add;

741: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
742: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
743: fnd_message.set_token('ERRNO', sqlcode);
744: fnd_message.set_token('REASON', 'Transaction Line Id is required for the API');
745: FND_MSG_PUB.add;
746: RAISE FND_API.G_EXC_ERROR;
747: END IF; --l_table_count
748: ELSE
749: IF p_txn_hdr_rec.claim_type_flag = 'SUPP_DSTR_CL' THEN

Line 763: FND_MSG_PUB.add;

759: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
760: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
761: fnd_message.set_token('ERRNO', sqlcode);
762: fnd_message.set_token('REASON', sqlerrm);
763: FND_MSG_PUB.add;
764: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
765: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
766: END IF;
767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 764: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

760: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
761: fnd_message.set_token('ERRNO', sqlcode);
762: fnd_message.set_token('REASON', sqlerrm);
763: FND_MSG_PUB.add;
764: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
765: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
766: END IF;
767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
768: END;

Line 765: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

761: fnd_message.set_token('ERRNO', sqlcode);
762: fnd_message.set_token('REASON', sqlerrm);
763: FND_MSG_PUB.add;
764: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
765: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
766: END IF;
767: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
768: END;
769: ELSE

Line 783: FND_MSG_PUB.add;

779: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
780: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
781: fnd_message.set_token('ERRNO', sqlcode);
782: fnd_message.set_token('REASON', sqlerrm);
783: FND_MSG_PUB.add;
784: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
785: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
786: END IF;
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 784: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

780: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
781: fnd_message.set_token('ERRNO', sqlcode);
782: fnd_message.set_token('REASON', sqlerrm);
783: FND_MSG_PUB.add;
784: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
785: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
786: END IF;
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END;

Line 785: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

781: fnd_message.set_token('ERRNO', sqlcode);
782: fnd_message.set_token('REASON', sqlerrm);
783: FND_MSG_PUB.add;
784: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
785: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
786: END IF;
787: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
788: END;
789: END IF;

Line 921: FND_MSG_PUB.add;

917: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
918: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
919: fnd_message.set_token('ERRNO', sqlcode);
920: fnd_message.set_token('REASON', 'INVALID CLAIM HEADER AMOUNT');
921: FND_MSG_PUB.add;
922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
924: END IF;
925: RAISE FND_API.G_EXC_ERROR;

Line 922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

918: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
919: fnd_message.set_token('ERRNO', sqlcode);
920: fnd_message.set_token('REASON', 'INVALID CLAIM HEADER AMOUNT');
921: FND_MSG_PUB.add;
922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
924: END IF;
925: RAISE FND_API.G_EXC_ERROR;
926: WHEN OTHERS THEN

Line 923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

919: fnd_message.set_token('ERRNO', sqlcode);
920: fnd_message.set_token('REASON', 'INVALID CLAIM HEADER AMOUNT');
921: FND_MSG_PUB.add;
922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
924: END IF;
925: RAISE FND_API.G_EXC_ERROR;
926: WHEN OTHERS THEN
927: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 931: FND_MSG_PUB.add;

927: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
928: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
929: fnd_message.set_token('ERRNO', sqlcode);
930: fnd_message.set_token('REASON', sqlerrm);
931: FND_MSG_PUB.add;
932: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
933: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_AMT');
934: FND_MSG_PUB.add;
935: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

Line 932: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

928: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
929: fnd_message.set_token('ERRNO', sqlcode);
930: fnd_message.set_token('REASON', sqlerrm);
931: FND_MSG_PUB.add;
932: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
933: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_AMT');
934: FND_MSG_PUB.add;
935: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
936: END IF;

Line 934: FND_MSG_PUB.add;

930: fnd_message.set_token('REASON', sqlerrm);
931: FND_MSG_PUB.add;
932: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
933: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_AMT');
934: FND_MSG_PUB.add;
935: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
936: END IF;
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END;

Line 935: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

931: FND_MSG_PUB.add;
932: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
933: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_CLAIM_AMT');
934: FND_MSG_PUB.add;
935: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
936: END IF;
937: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
938: END;
939: --Generate the Input Xml required for the Business Event --Update Claim

Line 1104: FND_MSG_PUB.add;

1100: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1101: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1102: fnd_message.set_token('ERRNO', sqlcode);
1103: fnd_message.set_token('REASON', sqlerrm);
1104: FND_MSG_PUB.add;
1105: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1106: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1107: FND_MSG_PUB.add;
1108: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

Line 1105: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1101: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1102: fnd_message.set_token('ERRNO', sqlcode);
1103: fnd_message.set_token('REASON', sqlerrm);
1104: FND_MSG_PUB.add;
1105: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1106: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1107: FND_MSG_PUB.add;
1108: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1109: END IF;

Line 1107: FND_MSG_PUB.add;

1103: fnd_message.set_token('REASON', sqlerrm);
1104: FND_MSG_PUB.add;
1105: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1106: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1107: FND_MSG_PUB.add;
1108: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1109: END IF;
1110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1111: END;

Line 1108: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1104: FND_MSG_PUB.add;
1105: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1106: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1107: FND_MSG_PUB.add;
1108: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1109: END IF;
1110: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1111: END;
1112: IF l_cost_adj_acct IS NULL THEN

Line 1126: FND_MSG_PUB.add;

1122: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1123: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1124: fnd_message.set_token('ERRNO', sqlcode);
1125: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT NOT FOUND');
1126: FND_MSG_PUB.add;
1127: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1128: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1129: END IF;
1130: RAISE FND_API.G_EXC_ERROR;

Line 1127: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1123: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1124: fnd_message.set_token('ERRNO', sqlcode);
1125: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT NOT FOUND');
1126: FND_MSG_PUB.add;
1127: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1128: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1129: END IF;
1130: RAISE FND_API.G_EXC_ERROR;
1131: WHEN OTHERS THEN

Line 1128: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1124: fnd_message.set_token('ERRNO', sqlcode);
1125: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT NOT FOUND');
1126: FND_MSG_PUB.add;
1127: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1128: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1129: END IF;
1130: RAISE FND_API.G_EXC_ERROR;
1131: WHEN OTHERS THEN
1132: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 1136: FND_MSG_PUB.add;

1132: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1133: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1134: fnd_message.set_token('ERRNO', sqlcode);
1135: fnd_message.set_token('REASON', sqlerrm);
1136: FND_MSG_PUB.add;
1137: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1138: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1139: FND_MSG_PUB.add;
1140: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

Line 1137: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1133: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1134: fnd_message.set_token('ERRNO', sqlcode);
1135: fnd_message.set_token('REASON', sqlerrm);
1136: FND_MSG_PUB.add;
1137: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1138: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1139: FND_MSG_PUB.add;
1140: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1141: END IF;

Line 1139: FND_MSG_PUB.add;

1135: fnd_message.set_token('REASON', sqlerrm);
1136: FND_MSG_PUB.add;
1137: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1138: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1139: FND_MSG_PUB.add;
1140: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1141: END IF;
1142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1143: END;

Line 1140: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1136: FND_MSG_PUB.add;
1137: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1138: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_COSTADJACC');
1139: FND_MSG_PUB.add;
1140: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1141: END IF;
1142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1143: END;
1144: END IF;

Line 1206: FND_MSG_PUB.add;

1202: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1203: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1204: fnd_message.set_token('ERRNO', sqlcode);
1205: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT IS NULL');
1206: FND_MSG_PUB.add;
1207: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1208: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1209: END IF;
1210: RAISE FND_API.G_EXC_ERROR;

Line 1207: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1203: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1204: fnd_message.set_token('ERRNO', sqlcode);
1205: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT IS NULL');
1206: FND_MSG_PUB.add;
1207: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1208: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1209: END IF;
1210: RAISE FND_API.G_EXC_ERROR;
1211: END IF;

Line 1208: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1204: fnd_message.set_token('ERRNO', sqlcode);
1205: fnd_message.set_token('REASON', 'COST ADJUSTMENT ACCOUNT IS NULL');
1206: FND_MSG_PUB.add;
1207: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1208: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1209: END IF;
1210: RAISE FND_API.G_EXC_ERROR;
1211: END IF;
1212:

Line 1337: FND_MSG_PUB.add;

1333: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1334: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1335: fnd_message.set_token('ERRNO', sqlcode);
1336: fnd_message.set_token('REASON', 'SUPPLIER TRADE PROFILE IS NOT FOUND'); --To be modified
1337: FND_MSG_PUB.add;
1338: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1339: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1340: END IF;
1341: RAISE FND_API.g_exc_error;

Line 1338: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1334: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1335: fnd_message.set_token('ERRNO', sqlcode);
1336: fnd_message.set_token('REASON', 'SUPPLIER TRADE PROFILE IS NOT FOUND'); --To be modified
1337: FND_MSG_PUB.add;
1338: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1339: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1340: END IF;
1341: RAISE FND_API.g_exc_error;
1342: WHEN OTHERS THEN

Line 1339: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1335: fnd_message.set_token('ERRNO', sqlcode);
1336: fnd_message.set_token('REASON', 'SUPPLIER TRADE PROFILE IS NOT FOUND'); --To be modified
1337: FND_MSG_PUB.add;
1338: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1339: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1340: END IF;
1341: RAISE FND_API.g_exc_error;
1342: WHEN OTHERS THEN
1343: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');

Line 1347: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1343: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1344: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1345: fnd_message.set_token('ERRNO', sqlcode);
1346: fnd_message.set_token('REASON', sqlerrm);
1347: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1348: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID'); --To be modified
1349: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
1350: FND_MSG_PUB.add;
1351: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

Line 1350: FND_MSG_PUB.add;

1346: fnd_message.set_token('REASON', sqlerrm);
1347: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1348: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID'); --To be modified
1349: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
1350: FND_MSG_PUB.add;
1351: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1352: END IF;
1353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1354: END;

Line 1351: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1347: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1348: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_EXE_DET_ID'); --To be modified
1349: fnd_message.set_token('SEQ_NAME', 'DPP_EXECUTION_DETAIL_ID_SEQ'); --To be modified
1350: FND_MSG_PUB.add;
1351: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1352: END IF;
1353: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1354: END;
1355:

Line 1668: FND_MSG_PUB.add;

1664: dbms_xmlquery.closeContext(l_queryCtx);
1665: ELSE
1666: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_PRO_CODE');
1667: fnd_message.set_token('PROCESS_CODE', p_txn_hdr_rec.process_code);
1668: FND_MSG_PUB.add;
1669: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1670: RAISE FND_API.g_exc_error;
1671: END IF;
1672:

Line 1669: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1665: ELSE
1666: FND_MESSAGE.set_name('DPP', 'DPP_BUSEVT_INVALID_PRO_CODE');
1667: fnd_message.set_token('PROCESS_CODE', p_txn_hdr_rec.process_code);
1668: FND_MSG_PUB.add;
1669: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1670: RAISE FND_API.g_exc_error;
1671: END IF;
1672:
1673: --Raise the Workflow Event Procedure for the given process

Line 1701: FND_MSG_PUB.count_and_get(

1697: IF FND_API.to_Boolean( p_commit )
1698: THEN
1699: COMMIT;
1700: END IF;
1701: FND_MSG_PUB.count_and_get(
1702: p_encoded => FND_API.g_false,
1703: p_count => x_msg_count,
1704: p_data => x_msg_data
1705: );

Line 1712: FND_MSG_PUB.count_and_get (

1708: EXCEPTION
1709: WHEN FND_API.g_exc_error THEN
1710: ROLLBACK TO Raise_Business_Event;
1711: x_return_status := FND_API.g_ret_sts_error;
1712: FND_MSG_PUB.count_and_get (
1713: p_encoded => FND_API.g_false,
1714: p_count => x_msg_count,
1715: p_data => x_msg_data
1716: );

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

1716: );
1717:
1718: IF x_msg_count > 1 THEN
1719: FOR I IN 1..x_msg_count LOOP
1720: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1721: END LOOP;
1722: END IF;
1723:
1724: WHEN FND_API.g_exc_unexpected_error THEN

Line 1727: FND_MSG_PUB.count_and_get (

1723:
1724: WHEN FND_API.g_exc_unexpected_error THEN
1725: ROLLBACK TO Raise_Business_Event;
1726: x_return_status := FND_API.g_ret_sts_unexp_error ;
1727: FND_MSG_PUB.count_and_get (
1728: p_encoded => FND_API.g_false,
1729: p_count => x_msg_count,
1730: p_data => x_msg_data
1731: );

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

1731: );
1732:
1733: IF x_msg_count > 1 THEN
1734: FOR I IN 1..x_msg_count LOOP
1735: x_msg_data := SUBSTR((x_msg_data||' '|| substr(FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F'),1,254)), 1, 4000);
1736: END LOOP;
1737: END IF;
1738:
1739: WHEN OTHERS THEN

Line 1746: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1742: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1743: fnd_message.set_token('ERRNO', sqlcode);
1744: fnd_message.set_token('REASON', sqlerrm);
1745: x_return_status := FND_API.g_ret_sts_unexp_error ;
1746: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1747: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1748: END IF;
1749: FND_MSG_PUB.count_and_get (
1750: p_encoded => FND_API.g_false,

Line 1747: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1743: fnd_message.set_token('ERRNO', sqlcode);
1744: fnd_message.set_token('REASON', sqlerrm);
1745: x_return_status := FND_API.g_ret_sts_unexp_error ;
1746: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1747: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1748: END IF;
1749: FND_MSG_PUB.count_and_get (
1750: p_encoded => FND_API.g_false,
1751: p_count => x_msg_count,

Line 1749: FND_MSG_PUB.count_and_get (

1745: x_return_status := FND_API.g_ret_sts_unexp_error ;
1746: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1747: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1748: END IF;
1749: FND_MSG_PUB.count_and_get (
1750: p_encoded => FND_API.g_false,
1751: p_count => x_msg_count,
1752: p_data => x_msg_data
1753: );

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

1753: );
1754:
1755: IF x_msg_count > 1 THEN
1756: FOR I IN 1..x_msg_count LOOP
1757: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1758: END LOOP;
1759: END IF;
1760:
1761: END Raise_Business_Event;

Line 1849: FND_MSG_PUB.add;

1845: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1846: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1847: fnd_message.set_token('ERRNO', sqlcode);
1848: fnd_message.set_token('REASON', sqlerrm);
1849: FND_MSG_PUB.add;
1850: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1851: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1852: END IF;
1853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 1850: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1846: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1847: fnd_message.set_token('ERRNO', sqlcode);
1848: fnd_message.set_token('REASON', sqlerrm);
1849: FND_MSG_PUB.add;
1850: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1851: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1852: END IF;
1853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1854: END;

Line 1851: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1847: fnd_message.set_token('ERRNO', sqlcode);
1848: fnd_message.set_token('REASON', sqlerrm);
1849: FND_MSG_PUB.add;
1850: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1851: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1852: END IF;
1853: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1854: END;
1855: --Define in WF Attributes l_parameter_list := WF_PARAMETER_LIST_T();

Line 1880: FND_MSG_PUB.add;

1876:
1877: ELSE
1878: DPP_UTILITY_PVT.debug_message(FND_LOG.LEVEL_STATEMENT, l_module, 'Work Flow Event is not Raised');
1879: FND_MESSAGE.set_name('DPP', 'DPP_CC_NO_ELIGIBLE_LINES_MSG');
1880: FND_MSG_PUB.add;
1881: RAISE FND_API.g_exc_error;
1882: END IF; --p_row_count > 0
1883: END IF;
1884:

Line 1889: FND_MSG_PUB.count_and_get (

1885: EXCEPTION
1886: WHEN FND_API.g_exc_error THEN
1887: ROLLBACK TO Raise_Workflow_Event;
1888: x_return_status := FND_API.g_ret_sts_error;
1889: FND_MSG_PUB.count_and_get (
1890: p_encoded => FND_API.g_false,
1891: p_count => x_msg_count,
1892: p_data => x_msg_data
1893: );

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

1892: p_data => x_msg_data
1893: );
1894: IF x_msg_count > 1 THEN
1895: FOR I IN 1..x_msg_count LOOP
1896: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1897: END LOOP;
1898: END IF;
1899:
1900: WHEN FND_API.g_exc_unexpected_error THEN

Line 1903: FND_MSG_PUB.count_and_get (

1899:
1900: WHEN FND_API.g_exc_unexpected_error THEN
1901: ROLLBACK TO Raise_Workflow_Event;
1902: x_return_status := FND_API.g_ret_sts_unexp_error ;
1903: FND_MSG_PUB.count_and_get (
1904: p_encoded => FND_API.g_false,
1905: p_count => x_msg_count,
1906: p_data => x_msg_data
1907: );

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

1906: p_data => x_msg_data
1907: );
1908: IF x_msg_count > 1 THEN
1909: FOR I IN 1..x_msg_count LOOP
1910: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1911: END LOOP;
1912: END IF;
1913:
1914: WHEN OTHERS THEN

Line 1920: FND_MSG_PUB.add;

1916: fnd_message.set_name('FND', 'SQL_PLSQL_ERROR');
1917: fnd_message.set_token('ROUTINE', 'DPP_BUSINESSEVENTS_PVT');
1918: fnd_message.set_token('ERRNO', sqlcode);
1919: fnd_message.set_token('REASON', sqlerrm);
1920: FND_MSG_PUB.add;
1921: x_return_status := FND_API.g_ret_sts_unexp_error ;
1922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1924: END IF;

Line 1922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

1918: fnd_message.set_token('ERRNO', sqlcode);
1919: fnd_message.set_token('REASON', sqlerrm);
1920: FND_MSG_PUB.add;
1921: x_return_status := FND_API.g_ret_sts_unexp_error ;
1922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1924: END IF;
1925: FND_MSG_PUB.count_and_get (
1926: p_encoded => FND_API.g_false,

Line 1923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);

1919: fnd_message.set_token('REASON', sqlerrm);
1920: FND_MSG_PUB.add;
1921: x_return_status := FND_API.g_ret_sts_unexp_error ;
1922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1924: END IF;
1925: FND_MSG_PUB.count_and_get (
1926: p_encoded => FND_API.g_false,
1927: p_count => x_msg_count,

Line 1925: FND_MSG_PUB.count_and_get (

1921: x_return_status := FND_API.g_ret_sts_unexp_error ;
1922: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1923: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
1924: END IF;
1925: FND_MSG_PUB.count_and_get (
1926: p_encoded => FND_API.g_false,
1927: p_count => x_msg_count,
1928: p_data => x_msg_data
1929: );

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

1928: p_data => x_msg_data
1929: );
1930: IF x_msg_count > 1 THEN
1931: FOR I IN 1..x_msg_count LOOP
1932: x_msg_data := SUBSTR((x_msg_data||' '|| FND_MSG_PUB.GET(P_MSG_INDEX => I, P_ENCODED => 'F')), 1, 4000);
1933: END LOOP;
1934: END IF;
1935:
1936: END Raise_Workflow_Event;