52: x_msg_data => l_msg_data,
53: p_send_rec => lp_send_rec,
54: x_send_rec => lx_send_rec);
55:
56: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
57: RAISE FND_API.G_EXC_ERROR;
58: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
53: p_send_rec => lp_send_rec,
54: x_send_rec => lx_send_rec);
55:
56: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
57: RAISE FND_API.G_EXC_ERROR;
58: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
54: x_send_rec => lx_send_rec);
55:
56: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
57: RAISE FND_API.G_EXC_ERROR;
58: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
62: -- Set IN as OUT
55:
56: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
57: RAISE FND_API.G_EXC_ERROR;
58: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
59: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
60: END IF;
61:
62: -- Set IN as OUT
63: lp_send_rec := lx_send_rec;
71: x_send_rec := lx_send_rec;
72:
73: EXCEPTION
74:
75: WHEN FND_API.G_EXC_ERROR THEN
76: ROLLBACK TO trx_send_fulfillment;
77: x_return_status := FND_API.G_RET_STS_ERROR;
78: x_msg_count := l_msg_count ;
79: x_msg_data := l_msg_data ;
73: EXCEPTION
74:
75: WHEN FND_API.G_EXC_ERROR THEN
76: ROLLBACK TO trx_send_fulfillment;
77: x_return_status := FND_API.G_RET_STS_ERROR;
78: x_msg_count := l_msg_count ;
79: x_msg_data := l_msg_data ;
80: FND_MSG_PUB.count_and_get(
81: p_count => x_msg_count,
80: FND_MSG_PUB.count_and_get(
81: p_count => x_msg_count,
82: p_data => x_msg_data);
83:
84: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
85: ROLLBACK TO trx_send_fulfillment;
86: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
87: x_msg_count := l_msg_count ;
88: x_msg_data := l_msg_data ;
82: p_data => x_msg_data);
83:
84: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
85: ROLLBACK TO trx_send_fulfillment;
86: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
87: x_msg_count := l_msg_count ;
88: x_msg_data := l_msg_data ;
89: FND_MSG_PUB.count_and_get(
90: p_count => x_msg_count,
91: p_data => x_msg_data);
92:
93: WHEN OTHERS THEN
94: ROLLBACK TO trx_send_fulfillment;
95: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
96: x_msg_count := l_msg_count ;
97: x_msg_data := l_msg_data ;
98: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_fulfillment');
99: FND_MSG_PUB.count_and_get(
153: x_msg_data => l_msg_data,
154: p_send_tbl => lp_send_tbl,
155: x_send_tbl => lx_send_tbl);
156:
157: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
158: RAISE FND_API.G_EXC_ERROR;
159: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
154: p_send_tbl => lp_send_tbl,
155: x_send_tbl => lx_send_tbl);
156:
157: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
158: RAISE FND_API.G_EXC_ERROR;
159: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
162:
155: x_send_tbl => lx_send_tbl);
156:
157: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
158: RAISE FND_API.G_EXC_ERROR;
159: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
162:
163: -- Set IN as OUT
156:
157: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
158: RAISE FND_API.G_EXC_ERROR;
159: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
160: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
161: END IF;
162:
163: -- Set IN as OUT
164: lp_send_tbl := lx_send_tbl;
172: x_send_tbl := lx_send_tbl;
173:
174: EXCEPTION
175:
176: WHEN FND_API.G_EXC_ERROR THEN
177: ROLLBACK TO trx_send_fulfillment;
178: x_return_status := FND_API.G_RET_STS_ERROR;
179: x_msg_count := l_msg_count ;
180: x_msg_data := l_msg_data ;
174: EXCEPTION
175:
176: WHEN FND_API.G_EXC_ERROR THEN
177: ROLLBACK TO trx_send_fulfillment;
178: x_return_status := FND_API.G_RET_STS_ERROR;
179: x_msg_count := l_msg_count ;
180: x_msg_data := l_msg_data ;
181: FND_MSG_PUB.count_and_get(
182: p_count => x_msg_count,
181: FND_MSG_PUB.count_and_get(
182: p_count => x_msg_count,
183: p_data => x_msg_data);
184:
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO trx_send_fulfillment;
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
188: x_msg_count := l_msg_count ;
189: x_msg_data := l_msg_data ;
183: p_data => x_msg_data);
184:
185: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
186: ROLLBACK TO trx_send_fulfillment;
187: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
188: x_msg_count := l_msg_count ;
189: x_msg_data := l_msg_data ;
190: FND_MSG_PUB.count_and_get(
191: p_count => x_msg_count,
192: p_data => x_msg_data);
193:
194: WHEN OTHERS THEN
195: ROLLBACK TO trx_send_fulfillment;
196: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
197: x_msg_count := l_msg_count ;
198: x_msg_data := l_msg_data ;
199: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_fulfillment');
200: FND_MSG_PUB.count_and_get(
262: x_send_tbl => lx_send_tbl,
263: p_qtev_rec => lp_qtev_rec,
264: x_qtev_rec => lx_qtev_rec);
265:
266: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
267: RAISE FND_API.G_EXC_ERROR;
268: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
263: p_qtev_rec => lp_qtev_rec,
264: x_qtev_rec => lx_qtev_rec);
265:
266: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
267: RAISE FND_API.G_EXC_ERROR;
268: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271:
264: x_qtev_rec => lx_qtev_rec);
265:
266: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
267: RAISE FND_API.G_EXC_ERROR;
268: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271:
272: -- Set IN from OUT
265:
266: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
267: RAISE FND_API.G_EXC_ERROR;
268: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
269: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
270: END IF;
271:
272: -- Set IN from OUT
273: lp_qtev_rec := lx_qtev_rec;
283: x_send_tbl := lx_send_tbl;
284:
285: EXCEPTION
286:
287: WHEN FND_API.G_EXC_ERROR THEN
288: ROLLBACK TO trx_send_repurchase_quote;
289: x_return_status := FND_API.G_RET_STS_ERROR;
290: x_msg_count := l_msg_count ;
291: x_msg_data := l_msg_data ;
285: EXCEPTION
286:
287: WHEN FND_API.G_EXC_ERROR THEN
288: ROLLBACK TO trx_send_repurchase_quote;
289: x_return_status := FND_API.G_RET_STS_ERROR;
290: x_msg_count := l_msg_count ;
291: x_msg_data := l_msg_data ;
292: FND_MSG_PUB.count_and_get(
293: p_count => x_msg_count,
292: FND_MSG_PUB.count_and_get(
293: p_count => x_msg_count,
294: p_data => x_msg_data);
295:
296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
297: ROLLBACK TO trx_send_repurchase_quote;
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: x_msg_count := l_msg_count ;
300: x_msg_data := l_msg_data ;
294: p_data => x_msg_data);
295:
296: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
297: ROLLBACK TO trx_send_repurchase_quote;
298: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
299: x_msg_count := l_msg_count ;
300: x_msg_data := l_msg_data ;
301: FND_MSG_PUB.count_and_get(
302: p_count => x_msg_count,
303: p_data => x_msg_data);
304:
305: WHEN OTHERS THEN
306: ROLLBACK TO trx_send_repurchase_quote;
307: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
308: x_msg_count := l_msg_count ;
309: x_msg_data := l_msg_data ;
310: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_repurchase_quote');
311: FND_MSG_PUB.count_and_get(
372: x_party_tbl => lx_party_tbl,
373: p_qtev_rec => lp_qtev_rec,
374: x_qtev_rec => lx_qtev_rec);
375:
376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
377: RAISE FND_API.G_EXC_ERROR;
378: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
373: p_qtev_rec => lp_qtev_rec,
374: x_qtev_rec => lx_qtev_rec);
375:
376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
377: RAISE FND_API.G_EXC_ERROR;
378: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
374: x_qtev_rec => lx_qtev_rec);
375:
376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
377: RAISE FND_API.G_EXC_ERROR;
378: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
382: -- Set IN from OUT
375:
376: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
377: RAISE FND_API.G_EXC_ERROR;
378: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
379: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
380: END IF;
381:
382: -- Set IN from OUT
383: lp_qtev_rec := lx_qtev_rec;
393: x_party_tbl := lx_party_tbl;
394:
395: EXCEPTION
396:
397: WHEN FND_API.G_EXC_ERROR THEN
398: ROLLBACK TO trx_send_terminate_quote;
399: x_return_status := FND_API.G_RET_STS_ERROR;
400: x_msg_count := l_msg_count ;
401: x_msg_data := l_msg_data ;
395: EXCEPTION
396:
397: WHEN FND_API.G_EXC_ERROR THEN
398: ROLLBACK TO trx_send_terminate_quote;
399: x_return_status := FND_API.G_RET_STS_ERROR;
400: x_msg_count := l_msg_count ;
401: x_msg_data := l_msg_data ;
402: FND_MSG_PUB.count_and_get(
403: p_count => x_msg_count,
402: FND_MSG_PUB.count_and_get(
403: p_count => x_msg_count,
404: p_data => x_msg_data);
405:
406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: ROLLBACK TO trx_send_terminate_quote;
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409: x_msg_count := l_msg_count ;
410: x_msg_data := l_msg_data ;
404: p_data => x_msg_data);
405:
406: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
407: ROLLBACK TO trx_send_terminate_quote;
408: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
409: x_msg_count := l_msg_count ;
410: x_msg_data := l_msg_data ;
411: FND_MSG_PUB.count_and_get(
412: p_count => x_msg_count,
413: p_data => x_msg_data);
414:
415: WHEN OTHERS THEN
416: ROLLBACK TO trx_send_terminate_quote;
417: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
418: x_msg_count := l_msg_count ;
419: x_msg_data := l_msg_data ;
420: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_terminate_quote');
421: FND_MSG_PUB.count_and_get(
482: x_send_tbl => lx_send_tbl,
483: p_qtev_rec => lp_qtev_rec,
484: x_qtev_rec => lx_qtev_rec);
485:
486: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
487: RAISE FND_API.G_EXC_ERROR;
488: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END IF;
483: p_qtev_rec => lp_qtev_rec,
484: x_qtev_rec => lx_qtev_rec);
485:
486: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
487: RAISE FND_API.G_EXC_ERROR;
488: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END IF;
491:
484: x_qtev_rec => lx_qtev_rec);
485:
486: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
487: RAISE FND_API.G_EXC_ERROR;
488: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END IF;
491:
492: -- Set IN from OUT
485:
486: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
487: RAISE FND_API.G_EXC_ERROR;
488: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
489: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
490: END IF;
491:
492: -- Set IN from OUT
493: lp_qtev_rec := lx_qtev_rec;
503: x_send_tbl := lx_send_tbl;
504:
505: EXCEPTION
506:
507: WHEN FND_API.G_EXC_ERROR THEN
508: ROLLBACK TO trx_send_restructure_quote;
509: x_return_status := FND_API.G_RET_STS_ERROR;
510: x_msg_count := l_msg_count ;
511: x_msg_data := l_msg_data ;
505: EXCEPTION
506:
507: WHEN FND_API.G_EXC_ERROR THEN
508: ROLLBACK TO trx_send_restructure_quote;
509: x_return_status := FND_API.G_RET_STS_ERROR;
510: x_msg_count := l_msg_count ;
511: x_msg_data := l_msg_data ;
512: FND_MSG_PUB.count_and_get(
513: p_count => x_msg_count,
512: FND_MSG_PUB.count_and_get(
513: p_count => x_msg_count,
514: p_data => x_msg_data);
515:
516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
517: ROLLBACK TO trx_send_restructure_quote;
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: x_msg_count := l_msg_count ;
520: x_msg_data := l_msg_data ;
514: p_data => x_msg_data);
515:
516: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
517: ROLLBACK TO trx_send_restructure_quote;
518: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
519: x_msg_count := l_msg_count ;
520: x_msg_data := l_msg_data ;
521: FND_MSG_PUB.count_and_get(
522: p_count => x_msg_count,
523: p_data => x_msg_data);
524:
525: WHEN OTHERS THEN
526: ROLLBACK TO trx_send_restructure_quote;
527: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
528: x_msg_count := l_msg_count ;
529: x_msg_data := l_msg_data ;
530: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_restructure_quote');
531: FND_MSG_PUB.count_and_get(
593: x_send_tbl => lx_send_tbl,
594: p_qtev_rec => lp_qtev_rec,
595: x_qtev_rec => lx_qtev_rec);
596:
597: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
598: RAISE FND_API.G_EXC_ERROR;
599: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;
594: p_qtev_rec => lp_qtev_rec,
595: x_qtev_rec => lx_qtev_rec);
596:
597: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
598: RAISE FND_API.G_EXC_ERROR;
599: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;
602:
595: x_qtev_rec => lx_qtev_rec);
596:
597: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
598: RAISE FND_API.G_EXC_ERROR;
599: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;
602:
603: -- Set IN from OUT
596:
597: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
598: RAISE FND_API.G_EXC_ERROR;
599: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
601: END IF;
602:
603: -- Set IN from OUT
604: lp_qtev_rec := lx_qtev_rec;
614: x_send_tbl := lx_send_tbl;
615:
616: EXCEPTION
617:
618: WHEN FND_API.G_EXC_ERROR THEN
619: ROLLBACK TO trx_send_consolidate_quote;
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: x_msg_count := l_msg_count ;
622: x_msg_data := l_msg_data ;
616: EXCEPTION
617:
618: WHEN FND_API.G_EXC_ERROR THEN
619: ROLLBACK TO trx_send_consolidate_quote;
620: x_return_status := FND_API.G_RET_STS_ERROR;
621: x_msg_count := l_msg_count ;
622: x_msg_data := l_msg_data ;
623: FND_MSG_PUB.count_and_get(
624: p_count => x_msg_count,
623: FND_MSG_PUB.count_and_get(
624: p_count => x_msg_count,
625: p_data => x_msg_data);
626:
627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
628: ROLLBACK TO trx_send_consolidate_quote;
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630: x_msg_count := l_msg_count ;
631: x_msg_data := l_msg_data ;
625: p_data => x_msg_data);
626:
627: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
628: ROLLBACK TO trx_send_consolidate_quote;
629: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
630: x_msg_count := l_msg_count ;
631: x_msg_data := l_msg_data ;
632: FND_MSG_PUB.count_and_get(
633: p_count => x_msg_count,
634: p_data => x_msg_data);
635:
636: WHEN OTHERS THEN
637: ROLLBACK TO trx_send_consolidate_quote;
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: x_msg_count := l_msg_count ;
640: x_msg_data := l_msg_data ;
641: FND_MSG_PUB.ADD_EXC_MSG('OKL_AM_SEND_FULFILLMENT_PUB','send_consolidate_quote');
642: FND_MSG_PUB.count_and_get(