116: x_return_status => l_return_status,
117: x_msg_count => l_msg_count,
118: x_msg_data => l_msg_data);
119:
120: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
117: x_msg_count => l_msg_count,
118: x_msg_data => l_msg_data);
119:
120: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
125:
118: x_msg_data => l_msg_data);
119:
120: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
125:
126: --Copy value of OUT NOCOPY variable in the IN record type
119:
120: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
121: RAISE FND_API.G_EXC_ERROR;
122: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
123: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
124: END IF;
125:
126: --Copy value of OUT NOCOPY variable in the IN record type
127: lp_oinv_rec := lx_oinv_rec;
151: x_return_status => l_return_status,
152: x_msg_count => l_msg_count,
153: x_msg_data => l_msg_data);
154:
155: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
156: RAISE FND_API.G_EXC_ERROR;
157: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: END IF;
152: x_msg_count => l_msg_count,
153: x_msg_data => l_msg_data);
154:
155: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
156: RAISE FND_API.G_EXC_ERROR;
157: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: END IF;
160:
153: x_msg_data => l_msg_data);
154:
155: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
156: RAISE FND_API.G_EXC_ERROR;
157: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: END IF;
160:
161: --Copy value of OUT NOCOPY variable in the IN record type
154:
155: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
156: RAISE FND_API.G_EXC_ERROR;
157: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
158: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
159: END IF;
160:
161: --Copy value of OUT NOCOPY variable in the IN record type
162: lp_iohv_rec := lx_iohv_rec;
168: x_msg_count := l_msg_count ;
169: x_msg_data := l_msg_data ;
170:
171: EXCEPTION
172: WHEN FND_API.G_EXC_ERROR THEN
173: ROLLBACK TO insert_pending;
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: x_msg_count := l_msg_count ;
176: x_msg_data := l_msg_data ;
170:
171: EXCEPTION
172: WHEN FND_API.G_EXC_ERROR THEN
173: ROLLBACK TO insert_pending;
174: x_return_status := FND_API.G_RET_STS_ERROR;
175: x_msg_count := l_msg_count ;
176: x_msg_data := l_msg_data ;
177: FND_MSG_PUB.count_and_get(
178: p_count => x_msg_count
176: x_msg_data := l_msg_data ;
177: FND_MSG_PUB.count_and_get(
178: p_count => x_msg_count
179: ,p_data => x_msg_data);
180: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
181: ROLLBACK TO insert_pending;
182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
183: x_msg_count := l_msg_count ;
184: x_msg_data := l_msg_data ;
178: p_count => x_msg_count
179: ,p_data => x_msg_data);
180: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
181: ROLLBACK TO insert_pending;
182: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
183: x_msg_count := l_msg_count ;
184: x_msg_data := l_msg_data ;
185: FND_MSG_PUB.count_and_get(
186: p_count => x_msg_count
186: p_count => x_msg_count
187: ,p_data => x_msg_data);
188: WHEN OTHERS THEN
189: ROLLBACK TO insert_pending;
190: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
191: x_msg_count := l_msg_count ;
192: x_msg_data := l_msg_data ;
193: FND_MSG_PUB.ADD_EXC_MSG('IEX_OPEN_INTERFACE_PUB','insert_pending_int');
194: FND_MSG_PUB.count_and_get(
274: x_return_status => l_return_status,
275: x_msg_count => l_msg_count,
276: x_msg_data => l_msg_data);
277:
278: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
279: RAISE FND_API.G_EXC_ERROR;
280: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
282: END IF;
275: x_msg_count => l_msg_count,
276: x_msg_data => l_msg_data);
277:
278: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
279: RAISE FND_API.G_EXC_ERROR;
280: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
282: END IF;
283:
276: x_msg_data => l_msg_data);
277:
278: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
279: RAISE FND_API.G_EXC_ERROR;
280: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
282: END IF;
283:
284:
277:
278: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
279: RAISE FND_API.G_EXC_ERROR;
280: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
281: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
282: END IF;
283:
284:
285: --Assign value to OUT NOCOPY variables
287: x_msg_count := l_msg_count ;
288: x_msg_data := l_msg_data ;
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: ROLLBACK TO complete_report_cb;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: x_msg_count := l_msg_count ;
295: x_msg_data := l_msg_data ;
289:
290: EXCEPTION
291: WHEN FND_API.G_EXC_ERROR THEN
292: ROLLBACK TO complete_report_cb;
293: x_return_status := FND_API.G_RET_STS_ERROR;
294: x_msg_count := l_msg_count ;
295: x_msg_data := l_msg_data ;
296: FND_MSG_PUB.count_and_get(
297: p_count => x_msg_count
295: x_msg_data := l_msg_data ;
296: FND_MSG_PUB.count_and_get(
297: p_count => x_msg_count
298: ,p_data => x_msg_data);
299: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
300: ROLLBACK TO complete_report_cb;
301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
302: x_msg_count := l_msg_count ;
303: x_msg_data := l_msg_data ;
297: p_count => x_msg_count
298: ,p_data => x_msg_data);
299: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
300: ROLLBACK TO complete_report_cb;
301: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
302: x_msg_count := l_msg_count ;
303: x_msg_data := l_msg_data ;
304: FND_MSG_PUB.count_and_get(
305: p_count => x_msg_count
305: p_count => x_msg_count
306: ,p_data => x_msg_data);
307: WHEN OTHERS THEN
308: ROLLBACK TO complete_report_cb;
309: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
310: x_msg_count := l_msg_count ;
311: x_msg_data := l_msg_data ;
312: FND_MSG_PUB.ADD_EXC_MSG('IEX_OPEN_INTERFACE_PUB','complete_report_cb');
313: FND_MSG_PUB.count_and_get(
359: x_return_status => l_return_status,
360: x_msg_count => l_msg_count,
361: x_msg_data => l_msg_data);
362:
363: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
364: RAISE FND_API.G_EXC_ERROR;
365: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
367: END IF;
360: x_msg_count => l_msg_count,
361: x_msg_data => l_msg_data);
362:
363: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
364: RAISE FND_API.G_EXC_ERROR;
365: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
367: END IF;
368:
361: x_msg_data => l_msg_data);
362:
363: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
364: RAISE FND_API.G_EXC_ERROR;
365: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
367: END IF;
368:
369:
362:
363: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
364: RAISE FND_API.G_EXC_ERROR;
365: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
366: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
367: END IF;
368:
369:
370: --Assign value to OUT NOCOPY variables
372: x_msg_count := l_msg_count ;
373: x_msg_data := l_msg_data ;
374:
375: EXCEPTION
376: WHEN FND_API.G_EXC_ERROR THEN
377: ROLLBACK TO complete_transfer;
378: x_return_status := FND_API.G_RET_STS_ERROR;
379: x_msg_count := l_msg_count ;
380: x_msg_data := l_msg_data ;
374:
375: EXCEPTION
376: WHEN FND_API.G_EXC_ERROR THEN
377: ROLLBACK TO complete_transfer;
378: x_return_status := FND_API.G_RET_STS_ERROR;
379: x_msg_count := l_msg_count ;
380: x_msg_data := l_msg_data ;
381: FND_MSG_PUB.count_and_get(
382: p_count => x_msg_count
380: x_msg_data := l_msg_data ;
381: FND_MSG_PUB.count_and_get(
382: p_count => x_msg_count
383: ,p_data => x_msg_data);
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: ROLLBACK TO complete_transfer;
386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
387: x_msg_count := l_msg_count ;
388: x_msg_data := l_msg_data ;
382: p_count => x_msg_count
383: ,p_data => x_msg_data);
384: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
385: ROLLBACK TO complete_transfer;
386: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
387: x_msg_count := l_msg_count ;
388: x_msg_data := l_msg_data ;
389: FND_MSG_PUB.count_and_get(
390: p_count => x_msg_count
390: p_count => x_msg_count
391: ,p_data => x_msg_data);
392: WHEN OTHERS THEN
393: ROLLBACK TO complete_transfer;
394: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
395: x_msg_count := l_msg_count ;
396: x_msg_data := l_msg_data ;
397: FND_MSG_PUB.ADD_EXC_MSG('IEX_OPEN_INTERFACE_PUB','complete_transfer');
398: FND_MSG_PUB.count_and_get(
447: x_return_status => l_return_status,
448: x_msg_count => l_msg_count,
449: x_msg_data => l_msg_count);
450:
451: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
452: RAISE FND_API.G_EXC_ERROR;
453: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
455: END IF;
448: x_msg_count => l_msg_count,
449: x_msg_data => l_msg_count);
450:
451: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
452: RAISE FND_API.G_EXC_ERROR;
453: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
455: END IF;
456:
449: x_msg_data => l_msg_count);
450:
451: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
452: RAISE FND_API.G_EXC_ERROR;
453: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
455: END IF;
456:
457:
450:
451: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
452: RAISE FND_API.G_EXC_ERROR;
453: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
454: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
455: END IF;
456:
457:
458: --Assign value to OUT NOCOPY variables
460: x_msg_count := l_msg_count ;
461: x_msg_data := l_msg_data ;
462:
463: EXCEPTION
464: WHEN FND_API.G_EXC_ERROR THEN
465: ROLLBACK TO recall_transfer;
466: x_return_status := FND_API.G_RET_STS_ERROR;
467: x_msg_count := l_msg_count ;
468: x_msg_data := l_msg_data ;
462:
463: EXCEPTION
464: WHEN FND_API.G_EXC_ERROR THEN
465: ROLLBACK TO recall_transfer;
466: x_return_status := FND_API.G_RET_STS_ERROR;
467: x_msg_count := l_msg_count ;
468: x_msg_data := l_msg_data ;
469: FND_MSG_PUB.count_and_get(
470: p_count => x_msg_count
468: x_msg_data := l_msg_data ;
469: FND_MSG_PUB.count_and_get(
470: p_count => x_msg_count
471: ,p_data => x_msg_data);
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: ROLLBACK TO recall_transfer;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: x_msg_count := l_msg_count ;
476: x_msg_data := l_msg_data ;
470: p_count => x_msg_count
471: ,p_data => x_msg_data);
472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
473: ROLLBACK TO recall_transfer;
474: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
475: x_msg_count := l_msg_count ;
476: x_msg_data := l_msg_data ;
477: FND_MSG_PUB.count_and_get(
478: p_count => x_msg_count
478: p_count => x_msg_count
479: ,p_data => x_msg_data);
480: WHEN OTHERS THEN
481: ROLLBACK TO recall_transfer;
482: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
483: x_msg_count := l_msg_count ;
484: x_msg_data := l_msg_data ;
485: FND_MSG_PUB.ADD_EXC_MSG('IEX_OPEN_INTERFACE_PUB','recall_transfer');
486: FND_MSG_PUB.count_and_get(
533: x_return_status => l_return_status,
534: x_msg_count => lx_msg_count,
535: x_msg_data => lx_msg_data);
536:
537: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
538: RAISE FND_API.G_EXC_ERROR;
539: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
534: x_msg_count => lx_msg_count,
535: x_msg_data => lx_msg_data);
536:
537: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
538: RAISE FND_API.G_EXC_ERROR;
539: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
535: x_msg_data => lx_msg_data);
536:
537: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
538: RAISE FND_API.G_EXC_ERROR;
539: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
543:
536:
537: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
538: RAISE FND_API.G_EXC_ERROR;
539: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
540: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
541: END IF;
542:
543:
544: --Assign value to OUT NOCOPY variables
548: x_msg_count := lx_msg_count ;
549: x_msg_data := lx_msg_data ;
550:
551: EXCEPTION
552: WHEN FND_API.G_EXC_ERROR THEN
553: ROLLBACK TO recall_transfer;
554: x_return_status := FND_API.G_RET_STS_ERROR;
555: x_msg_count := lx_msg_count ;
556: x_msg_data := lx_msg_data ;
550:
551: EXCEPTION
552: WHEN FND_API.G_EXC_ERROR THEN
553: ROLLBACK TO recall_transfer;
554: x_return_status := FND_API.G_RET_STS_ERROR;
555: x_msg_count := lx_msg_count ;
556: x_msg_data := lx_msg_data ;
557: FND_MSG_PUB.count_and_get(
558: p_count => x_msg_count
556: x_msg_data := lx_msg_data ;
557: FND_MSG_PUB.count_and_get(
558: p_count => x_msg_count
559: ,p_data => x_msg_data);
560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
561: ROLLBACK TO recall_transfer;
562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
563: x_msg_count := lx_msg_count ;
564: x_msg_data := lx_msg_data ;
558: p_count => x_msg_count
559: ,p_data => x_msg_data);
560: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
561: ROLLBACK TO recall_transfer;
562: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
563: x_msg_count := lx_msg_count ;
564: x_msg_data := lx_msg_data ;
565: FND_MSG_PUB.count_and_get(
566: p_count => x_msg_count
566: p_count => x_msg_count
567: ,p_data => x_msg_data);
568: WHEN OTHERS THEN
569: ROLLBACK TO recall_transfer;
570: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
571: x_msg_count := lx_msg_count ;
572: x_msg_data := lx_msg_data ;
573: FND_MSG_PUB.ADD_EXC_MSG('IEX_OPEN_INTERFACE_PUB','review_transfer');
574: FND_MSG_PUB.count_and_get(