eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.CSP_TO_FORM_MOLINES dependencies on FND_MSG_PUB

Line 93: FND_MSG_PUB.initialize;

89: savepoint Validate_And_Write_PUB;
90:
91: IF fnd_api.to_boolean(P_Init_Msg_List) THEN
92: -- initialize message list
93: FND_MSG_PUB.initialize;
94: END IF;
95:
96: -- Standard call to check for call compatibility.
97: IF NOT FND_API.Compatible_API_Call ( l_api_version_number,

Line 109: fnd_msg_pub.add;

105: --validating p_action_code
106: IF nvl(p_action_code, fnd_api.g_miss_num) NOT IN (0, 1, 2) THEN
107: fnd_message.set_name ('INV', 'INV-INVALID ACTION');
108: fnd_message.set_token ('ROUTINE', l_pkg_api_name, FALSE);
109: fnd_msg_pub.add;
110: RAISE EXCP_USER_DEFINED;
111: END IF;
112:
113: IF p_action_code = 0 THEN

Line 118: FND_MSG_PUB.ADD;

114: -- check p_header_id and p_line_id. if null return an error.
115: IF nvl(p_header_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
116: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
117: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_header_id', FALSE);
118: FND_MSG_PUB.ADD;
119: RAISE EXCP_USER_DEFINED;
120: ELSE
121: -- validate where the header_id already exists.
122: BEGIN

Line 130: FND_MSG_PUB.ADD;

126: EXCEPTION
127: WHEN NO_DATA_FOUND THEN
128: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_MOVEORDER');
129: FND_MESSAGE.SET_TOKEN('HEADER_ID', to_char(p_header_id), FALSE);
130: FND_MSG_PUB.ADD;
131: RAISE EXCP_USER_DEFINED;
132: WHEN OTHERS THEN
133: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
134: fnd_message.set_token('ERR_FIELD', 'p_header_id', FALSE);

Line 137: FND_MSG_PUB.ADD;

133: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
134: fnd_message.set_token('ERR_FIELD', 'p_header_id', FALSE);
135: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
136: fnd_message.set_token('TABLE', 'MTL_TXN_REQUEST_HEADERS', FALSE);
137: FND_MSG_PUB.ADD;
138: RAISE EXCP_USER_DEFINED;
139: END;
140:
141: END IF;

Line 146: FND_MSG_PUB.ADD;

142:
143: IF nvl(p_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
144: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
145: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_line_id', FALSE);
146: FND_MSG_PUB.ADD;
147: RAISE EXCP_USER_DEFINED;
148: ELSE
149: -- First check whether the line id already exists.
150: OPEN l_Get_Line_ID_Csr;

Line 162: FND_MSG_PUB.ADD;

158: EXCEPTION
159: WHEN NO_DATA_FOUND THEN
160: FND_MESSAGE.SET_NAME('CSP', 'CSP_MOLINE_NO_EXIST');
161: FND_MESSAGE.SET_TOKEN('LINE_ID', to_char(p_line_id), FALSE);
162: FND_MSG_PUB.ADD;
163: RAISE EXCP_USER_DEFINED;
164: WHEN OTHERS THEN
165: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
166: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);

Line 169: FND_MSG_PUB.ADD;

165: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
166: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);
167: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
168: fnd_message.set_token('TABLE', 'MTL_TXN_REQUEST_LINES', FALSE);
169: FND_MSG_PUB.ADD;
170: RAISE EXCP_USER_DEFINED;
171: END;
172: ELSE
173: fnd_message.set_name ('CSP', 'CSP_DUPLICATE_RECORD');

Line 174: fnd_msg_pub.add;

170: RAISE EXCP_USER_DEFINED;
171: END;
172: ELSE
173: fnd_message.set_name ('CSP', 'CSP_DUPLICATE_RECORD');
174: fnd_msg_pub.add;
175: RAISE EXCP_USER_DEFINED;
176: END IF;
177: CLOSE l_Get_Line_ID_Csr;
178: END IF;

Line 190: FND_MSG_PUB.ADD;

186: EXCEPTION
187: WHEN NO_DATA_FOUND THEN
188: FND_MESSAGE.SET_NAME('JTF', 'JTF_TASK_INVALID_TASK_ID');
189: FND_MESSAGE.SET_TOKEN('P_TASK_ID', to_char(p_task_id), FALSE);
190: FND_MSG_PUB.ADD;
191: RAISE EXCP_USER_DEFINED;
192: WHEN OTHERS THEN
193: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
194: fnd_message.set_token('ERR_FIELD', 'p_task_id', FALSE);

Line 197: FND_MSG_PUB.ADD;

193: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
194: fnd_message.set_token('ERR_FIELD', 'p_task_id', FALSE);
195: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
196: fnd_message.set_token('TABLE', 'JTF_TASKS_TL', FALSE);
197: FND_MSG_PUB.ADD;
198: RAISE EXCP_USER_DEFINED;
199: END;
200: END IF;
201:

Line 215: FND_MSG_PUB.ADD;

211: WHEN NO_DATA_FOUND THEN
212: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_TASK_ASSIGNMENT');
213: FND_MESSAGE.SET_TOKEN('ASSIGNMENT_ID', to_char(p_task_assignment_id), FALSE);
214: FND_MESSAGE.SET_TOKEN('TASK_ID', to_char(p_task_id), FALSE);
215: FND_MSG_PUB.ADD;
216: RAISE EXCP_USER_DEFINED;
217: WHEN OTHERS THEN
218: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
219: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);

Line 222: FND_MSG_PUB.ADD;

218: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
219: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);
220: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
221: fnd_message.set_token('TABLE', 'JTF_TASK_ASSIGNMENTS', FALSE);
222: FND_MSG_PUB.ADD;
223: RAISE EXCP_USER_DEFINED;
224: END;
225: ELSE
226: BEGIN

Line 234: FND_MSG_PUB.ADD;

230: EXCEPTION
231: WHEN NO_DATA_FOUND THEN
232: FND_MESSAGE.SET_NAME('JTF', 'JTF_TASK_INV_TK_ASS');
233: FND_MESSAGE.SET_TOKEN('P_TASK_ASSIGNMENT_ID', to_char(p_task_assignment_id), FALSE);
234: FND_MSG_PUB.ADD;
235: RAISE EXCP_USER_DEFINED;
236: WHEN OTHERS THEN
237: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
238: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);

Line 241: FND_MSG_PUB.ADD;

237: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
238: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);
239: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
240: fnd_message.set_token('TABLE', 'JTF_TASK_ASSIGNMENTS', FALSE);
241: FND_MSG_PUB.ADD;
242: RAISE EXCP_USER_DEFINED;
243: END;
244: END IF;
245: END IF;

Line 257: FND_MSG_PUB.ADD;

253: EXCEPTION
254: WHEN NO_DATA_FOUND THEN
255: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_INCIDENT_ID');
256: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', to_char(p_incident_id), FALSE);
257: FND_MSG_PUB.ADD;
258: RAISE EXCP_USER_DEFINED;
259: WHEN OTHERS THEN
260: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
261: fnd_message.set_token('ERR_FIELD', 'p_incident_id', FALSE);

Line 264: FND_MSG_PUB.ADD;

260: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
261: fnd_message.set_token('ERR_FIELD', 'p_incident_id', FALSE);
262: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
263: fnd_message.set_token('TABLE', 'CS_INCIDENTS_ALL', FALSE);
264: FND_MSG_PUB.ADD;
265: RAISE EXCP_USER_DEFINED;
266: END;
267: END IF;
268:

Line 294: FND_MSG_PUB.ADD;

290: ELSIF p_action_code = 1 THEN
291: IF nvl(p_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
292: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
293: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_line_id', FALSE);
294: FND_MSG_PUB.ADD;
295: RAISE EXCP_USER_DEFINED;
296: ELSE
297: BEGIN
298: SELECT line_id INTO l_check_existence

Line 305: FND_MSG_PUB.ADD;

301: EXCEPTION
302: WHEN NO_DATA_FOUND THEN
303: FND_MESSAGE.SET_NAME('CSP', 'CSP_MOLINE_NO_EXIST');
304: FND_MESSAGE.SET_TOKEN('LINE_ID', to_char(p_line_id), FALSE);
305: FND_MSG_PUB.ADD;
306: RAISE EXCP_USER_DEFINED;
307: WHEN OTHERS THEN
308: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
309: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);

Line 312: FND_MSG_PUB.ADD;

308: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
309: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);
310: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
311: fnd_message.set_token('TABLE', 'CSP_MOVERDER_LINES', FALSE);
312: FND_MSG_PUB.ADD;
313: RAISE EXCP_USER_DEFINED;
314: END;
315: END IF;
316:

Line 328: FND_MSG_PUB.ADD;

324: EXCEPTION
325: WHEN NO_DATA_FOUND THEN
326: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_MOVEORDER');
327: FND_MESSAGE.SET_TOKEN('HEADER_ID', to_char(p_header_id), FALSE);
328: FND_MSG_PUB.ADD;
329: RAISE EXCP_USER_DEFINED;
330: WHEN OTHERS THEN
331: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
332: fnd_message.set_token('ERR_FIELD', 'p_header_id', FALSE);

Line 335: FND_MSG_PUB.ADD;

331: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
332: fnd_message.set_token('ERR_FIELD', 'p_header_id', FALSE);
333: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
334: fnd_message.set_token('TABLE', 'CSP_MOVEORDER_LINES', FALSE);
335: FND_MSG_PUB.ADD;
336: RAISE EXCP_USER_DEFINED;
337: END;
338: END IF;
339:

Line 350: FND_MSG_PUB.ADD;

346: EXCEPTION
347: WHEN NO_DATA_FOUND THEN
348: FND_MESSAGE.SET_NAME('JTF', 'JTF_TASK_INVALID_TASK_ID');
349: FND_MESSAGE.SET_TOKEN('P_TASK_ID', to_char(p_task_id), FALSE);
350: FND_MSG_PUB.ADD;
351: RAISE EXCP_USER_DEFINED;
352: WHEN OTHERS THEN
353: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
354: fnd_message.set_token('ERR_FIELD', 'p_task_id', FALSE);

Line 357: FND_MSG_PUB.ADD;

353: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
354: fnd_message.set_token('ERR_FIELD', 'p_task_id', FALSE);
355: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
356: fnd_message.set_token('TABLE', 'JTF_TASKS_TL', FALSE);
357: FND_MSG_PUB.ADD;
358: RAISE EXCP_USER_DEFINED;
359: END;
360:
361: IF nvl(p_task_assignment_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN

Line 377: FND_MSG_PUB.ADD;

373: WHEN NO_DATA_FOUND THEN
374: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_TASK_ASSIGNMENT');
375: FND_MESSAGE.SET_TOKEN('ASSIGNMENT_ID', to_char(l_task_assignment_id), FALSE);
376: FND_MESSAGE.SET_TOKEN('TASK_ID', to_char(l_task_id), FALSE);
377: FND_MSG_PUB.ADD;
378: RAISE EXCP_USER_DEFINED;
379: WHEN OTHERS THEN
380: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
381: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);

Line 384: FND_MSG_PUB.ADD;

380: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
381: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);
382: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
383: fnd_message.set_token('TABLE', 'JTF_TASK_ASSIGNMENTS', FALSE);
384: FND_MSG_PUB.ADD;
385: RAISE EXCP_USER_DEFINED;
386: END;
387: END IF;
388: END IF;

Line 411: FND_MSG_PUB.ADD;

407: WHEN NO_DATA_FOUND THEN
408: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_TASK_ASSIGNMENT');
409: FND_MESSAGE.SET_TOKEN('ASSIGNMENT_ID', to_char(p_task_assignment_id), FALSE);
410: FND_MESSAGE.SET_TOKEN('TASK_ID', to_char(l_task_id), FALSE);
411: FND_MSG_PUB.ADD;
412: RAISE EXCP_USER_DEFINED;
413: WHEN OTHERS THEN
414: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
415: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);

Line 418: FND_MSG_PUB.ADD;

414: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
415: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);
416: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
417: fnd_message.set_token('TABLE', 'JTF_TASK_ASSIGNMENTS', FALSE);
418: FND_MSG_PUB.ADD;
419: RAISE EXCP_USER_DEFINED;
420: END;
421: ELSE
422: BEGIN

Line 430: FND_MSG_PUB.ADD;

426: EXCEPTION
427: WHEN NO_DATA_FOUND THEN
428: FND_MESSAGE.SET_NAME('JTF', 'JTF_TASK_INV_TK_ASS');
429: FND_MESSAGE.SET_TOKEN('P_TASK_ASSIGNMENT_ID', to_char(p_task_assignment_id), FALSE);
430: FND_MSG_PUB.ADD;
431: RAISE EXCP_USER_DEFINED;
432: WHEN OTHERS THEN
433: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
434: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);

Line 437: FND_MSG_PUB.ADD;

433: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
434: fnd_message.set_token('ERR_FIELD', 'p_task_assignment_id', FALSE);
435: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
436: fnd_message.set_token('TABLE', 'JTF_TASK_ASSIGNMENTS', FALSE);
437: FND_MSG_PUB.ADD;
438: RAISE EXCP_USER_DEFINED;
439: END;
440: END IF;
441: END IF;

Line 453: FND_MSG_PUB.ADD;

449: EXCEPTION
450: WHEN NO_DATA_FOUND THEN
451: FND_MESSAGE.SET_NAME('CSP', 'CSP_INVALID_INCIDENT_ID');
452: FND_MESSAGE.SET_TOKEN('INCIDENT_ID', to_char(p_incident_id), FALSE);
453: FND_MSG_PUB.ADD;
454: RAISE EXCP_USER_DEFINED;
455: WHEN OTHERS THEN
456: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
457: fnd_message.set_token('ERR_FIELD', 'p_incident_id', FALSE);

Line 460: FND_MSG_PUB.ADD;

456: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
457: fnd_message.set_token('ERR_FIELD', 'p_incident_id', FALSE);
458: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
459: fnd_message.set_token('TABLE', 'CS_INCIDENTS_ALL', FALSE);
460: FND_MSG_PUB.ADD;
461: RAISE EXCP_USER_DEFINED;
462: END;
463: END IF;
464:

Line 475: FND_MSG_PUB.ADD;

471: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
472: fnd_message.set_token('ERR_FIELD', 'p_cretaion_date', FALSE);
473: fnd_message.set_token('ROUTINE', G_PKG_NAME||'.'||l_api_name, FALSE);
474: fnd_message.set_token('TABLE', 'CSP_MOVEORDER_LINES', FALSE);
475: FND_MSG_PUB.ADD;
476: RAISE EXCP_USER_DEFINED;
477: End if;
478: Close l_Get_Creation_Date_Csr;
479: End if;

Line 488: FND_MSG_PUB.ADD;

484: ELSE -- p_action_code = 2
485: IF nvl(p_line_id, fnd_api.g_miss_num) = fnd_api.g_miss_num THEN
486: FND_MESSAGE.SET_NAME ('CSP', 'CSP_MISSING_PARAMETERS');
487: FND_MESSAGE.SET_TOKEN ('PARAMETER', 'p_line_id', FALSE);
488: FND_MSG_PUB.ADD;
489: RAISE EXCP_USER_DEFINED;
490: ELSE
491: BEGIN
492: SELECT line_id INTO l_check_existence

Line 499: FND_MSG_PUB.ADD;

495: EXCEPTION
496: WHEN NO_DATA_FOUND THEN
497: FND_MESSAGE.SET_NAME('CSP', 'CSP_MOLINE_NO_EXIST');
498: FND_MESSAGE.SET_TOKEN('LINE_ID', to_char(p_line_id), FALSE);
499: FND_MSG_PUB.ADD;
500: RAISE EXCP_USER_DEFINED;
501: WHEN OTHERS THEN
502: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
503: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);

Line 506: FND_MSG_PUB.ADD;

502: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_ERRORS');
503: fnd_message.set_token('ERR_FIELD', 'p_line_id', FALSE);
504: fnd_message.set_token('ROUTINE', l_pkg_api_name, FALSE);
505: fnd_message.set_token('TABLE', 'CSP_MOVERDER_LINES', FALSE);
506: FND_MSG_PUB.ADD;
507: RAISE EXCP_USER_DEFINED;
508: END;
509: END IF;
510: END IF;

Line 593: fnd_msg_pub.count_and_get

589: EXCEPTION
590: WHEN EXCP_USER_DEFINED THEN
591: Rollback to Validate_And_Write_PUB;
592: x_return_status := FND_API.G_RET_STS_ERROR;
593: fnd_msg_pub.count_and_get
594: ( p_count => x_msg_count
595: , p_data => x_msg_data);
596: --for debugging purpose
597: --x_msg_data := l_msg_data;

Line 602: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR

598: WHEN FND_API.G_EXC_ERROR THEN
599: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
600: P_API_NAME => L_API_NAME
601: ,P_PKG_NAME => G_PKG_NAME
602: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_ERROR
603: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
604: ,X_MSG_COUNT => X_MSG_COUNT
605: ,X_MSG_DATA => X_MSG_DATA
606: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 611: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR

607: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
608: JTF_PLSQL_API.HANDLE_EXCEPTIONS(
609: P_API_NAME => L_API_NAME
610: ,P_PKG_NAME => G_PKG_NAME
611: ,P_EXCEPTION_LEVEL => FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR
612: ,P_PACKAGE_TYPE => JTF_PLSQL_API.G_PUB
613: ,X_MSG_COUNT => X_MSG_COUNT
614: ,X_MSG_DATA => X_MSG_DATA
615: ,X_RETURN_STATUS => X_RETURN_STATUS);

Line 621: fnd_msg_pub.add;

617: Rollback to Validate_And_Write_PUB;
618: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_EXEC_ERRORS');
619: fnd_message.set_token ('ROUTINE', l_pkg_api_name, FALSE);
620: fnd_message.set_token ('SQLERRM', sqlerrm, FALSE);
621: fnd_msg_pub.add;
622: fnd_msg_pub.count_and_get
623: ( p_count => x_msg_count
624: , p_data => x_msg_data);
625: x_return_status := fnd_api.g_ret_sts_error;

Line 622: fnd_msg_pub.count_and_get

618: fnd_message.set_name('CSP', 'CSP_UNEXPECTED_EXEC_ERRORS');
619: fnd_message.set_token ('ROUTINE', l_pkg_api_name, FALSE);
620: fnd_message.set_token ('SQLERRM', sqlerrm, FALSE);
621: fnd_msg_pub.add;
622: fnd_msg_pub.count_and_get
623: ( p_count => x_msg_count
624: , p_data => x_msg_data);
625: x_return_status := fnd_api.g_ret_sts_error;
626: