75: l_request_id
76: );
77:
78:
79: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
80: RAISE FND_API.G_EXC_ERROR;
81: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
76: );
77:
78:
79: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
80: RAISE FND_API.G_EXC_ERROR;
81: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84: --Assign value to OUT variables
77:
78:
79: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
80: RAISE FND_API.G_EXC_ERROR;
81: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84: --Assign value to OUT variables
85: x_return_status := l_return_status ;
78:
79: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
80: RAISE FND_API.G_EXC_ERROR;
81: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
82: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
83: END IF;
84: --Assign value to OUT variables
85: x_return_status := l_return_status ;
86: x_msg_count := l_msg_count ;
86: x_msg_count := l_msg_count ;
87: x_msg_data := l_msg_data ;
88: x_request_id :=l_request_id ;
89: EXCEPTION
90: WHEN FND_API.G_EXC_ERROR THEN
91: ROLLBACK TO insert_ap_request;
92: x_return_status := FND_API.G_RET_STS_ERROR;
93: x_msg_count := l_msg_count ;
94: x_msg_data := l_msg_data ;
88: x_request_id :=l_request_id ;
89: EXCEPTION
90: WHEN FND_API.G_EXC_ERROR THEN
91: ROLLBACK TO insert_ap_request;
92: x_return_status := FND_API.G_RET_STS_ERROR;
93: x_msg_count := l_msg_count ;
94: x_msg_data := l_msg_data ;
95: FND_MSG_PUB.count_and_get(
96: p_count => x_msg_count
94: x_msg_data := l_msg_data ;
95: FND_MSG_PUB.count_and_get(
96: p_count => x_msg_count
97: ,p_data => x_msg_data);
98: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
99: ROLLBACK TO insert_ap_request;
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: x_msg_count := l_msg_count ;
102: x_msg_data := l_msg_data ;
96: p_count => x_msg_count
97: ,p_data => x_msg_data);
98: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
99: ROLLBACK TO insert_ap_request;
100: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
101: x_msg_count := l_msg_count ;
102: x_msg_data := l_msg_data ;
103: FND_MSG_PUB.count_and_get(
104: p_count => x_msg_count
104: p_count => x_msg_count
105: ,p_data => x_msg_data);
106: WHEN OTHERS THEN
107: ROLLBACK TO insert_ap_request;
108: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
109: x_msg_count := l_msg_count ;
110: x_msg_data := l_msg_data ;
111: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'insert_ap_request');
112: FND_MSG_PUB.count_and_get(
179: l_trx_id
180: );
181:
182:
183: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
180: );
181:
182:
183: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188: --Assign value to OUT variables
181:
182:
183: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188: --Assign value to OUT variables
189: x_return_status := l_return_status ;
182:
183: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
184: RAISE FND_API.G_EXC_ERROR;
185: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
186: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
187: END IF;
188: --Assign value to OUT variables
189: x_return_status := l_return_status ;
190: x_msg_count := l_msg_count ;
189: x_return_status := l_return_status ;
190: x_msg_count := l_msg_count ;
191: x_msg_data := l_msg_data ;
192: EXCEPTION
193: WHEN FND_API.G_EXC_ERROR THEN
194: ROLLBACK TO insert_ap_request;
195: x_return_status := FND_API.G_RET_STS_ERROR;
196: x_msg_count := l_msg_count ;
197: x_msg_data := l_msg_data ;
191: x_msg_data := l_msg_data ;
192: EXCEPTION
193: WHEN FND_API.G_EXC_ERROR THEN
194: ROLLBACK TO insert_ap_request;
195: x_return_status := FND_API.G_RET_STS_ERROR;
196: x_msg_count := l_msg_count ;
197: x_msg_data := l_msg_data ;
198: FND_MSG_PUB.count_and_get(
199: p_count => x_msg_count
197: x_msg_data := l_msg_data ;
198: FND_MSG_PUB.count_and_get(
199: p_count => x_msg_count
200: ,p_data => x_msg_data);
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO insert_ap_request;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: x_msg_count := l_msg_count ;
205: x_msg_data := l_msg_data ;
199: p_count => x_msg_count
200: ,p_data => x_msg_data);
201: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
202: ROLLBACK TO insert_ap_request;
203: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
204: x_msg_count := l_msg_count ;
205: x_msg_data := l_msg_data ;
206: FND_MSG_PUB.count_and_get(
207: p_count => x_msg_count
207: p_count => x_msg_count
208: ,p_data => x_msg_data);
209: WHEN OTHERS THEN
210: ROLLBACK TO insert_ap_request;
211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
212: x_msg_count := l_msg_count ;
213: x_msg_data := l_msg_data ;
214: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'insert_ap_request' );
215: FND_MSG_PUB.count_and_get(
261: l_msg_count ,
262: l_msg_data ,
263: l_ipyv_rec ,
264: lx_ipyv_rec );
265: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
266: RAISE FND_API.G_EXC_ERROR;
267: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
269: END IF;
262: l_msg_data ,
263: l_ipyv_rec ,
264: lx_ipyv_rec );
265: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
266: RAISE FND_API.G_EXC_ERROR;
267: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
269: END IF;
270: --Assign value to OUT variables
263: l_ipyv_rec ,
264: lx_ipyv_rec );
265: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
266: RAISE FND_API.G_EXC_ERROR;
267: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
269: END IF;
270: --Assign value to OUT variables
271: x_return_status := l_return_status ;
264: lx_ipyv_rec );
265: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
266: RAISE FND_API.G_EXC_ERROR;
267: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
268: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
269: END IF;
270: --Assign value to OUT variables
271: x_return_status := l_return_status ;
272: x_msg_count := l_msg_count ;
272: x_msg_count := l_msg_count ;
273: x_msg_data := l_msg_data ;
274: x_ipyv_rec := lx_ipyv_rec ;
275: EXCEPTION
276: WHEN FND_API.G_EXC_ERROR THEN
277: ROLLBACK TO ins_cancel_policy;
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: x_msg_count := l_msg_count ;
280: x_msg_data := l_msg_data ;
274: x_ipyv_rec := lx_ipyv_rec ;
275: EXCEPTION
276: WHEN FND_API.G_EXC_ERROR THEN
277: ROLLBACK TO ins_cancel_policy;
278: x_return_status := FND_API.G_RET_STS_ERROR;
279: x_msg_count := l_msg_count ;
280: x_msg_data := l_msg_data ;
281: FND_MSG_PUB.count_and_get(
282: p_count => x_msg_count
280: x_msg_data := l_msg_data ;
281: FND_MSG_PUB.count_and_get(
282: p_count => x_msg_count
283: ,p_data => x_msg_data);
284: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
285: ROLLBACK TO ins_cancel_policy;
286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
287: x_msg_count := l_msg_count ;
288: x_msg_data := l_msg_data ;
282: p_count => x_msg_count
283: ,p_data => x_msg_data);
284: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
285: ROLLBACK TO ins_cancel_policy;
286: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
287: x_msg_count := l_msg_count ;
288: x_msg_data := l_msg_data ;
289: FND_MSG_PUB.count_and_get(
290: p_count => x_msg_count
290: p_count => x_msg_count
291: ,p_data => x_msg_data);
292: WHEN OTHERS THEN
293: ROLLBACK TO ins_cancel_policy;
294: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
295: x_msg_count := l_msg_count ;
296: x_msg_data := l_msg_data ;
297: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'cancel_policy' );
298: FND_MSG_PUB.count_and_get(
335: l_msg_count ,
336: l_msg_data ,
337: l_ipyv_rec ,
338: lx_ipyv_rec );
339: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
340: RAISE FND_API.G_EXC_ERROR;
341: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: END IF;
336: l_msg_data ,
337: l_ipyv_rec ,
338: lx_ipyv_rec );
339: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
340: RAISE FND_API.G_EXC_ERROR;
341: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: END IF;
344: --Assign value to OUT variables
337: l_ipyv_rec ,
338: lx_ipyv_rec );
339: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
340: RAISE FND_API.G_EXC_ERROR;
341: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: END IF;
344: --Assign value to OUT variables
345: x_return_status := l_return_status ;
338: lx_ipyv_rec );
339: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
340: RAISE FND_API.G_EXC_ERROR;
341: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
342: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
343: END IF;
344: --Assign value to OUT variables
345: x_return_status := l_return_status ;
346: x_msg_count := l_msg_count ;
346: x_msg_count := l_msg_count ;
347: x_msg_data := l_msg_data ;
348: x_ipyv_rec := lx_ipyv_rec ;
349: EXCEPTION
350: WHEN FND_API.G_EXC_ERROR THEN
351: ROLLBACK TO ins_delete_policy;
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: x_msg_count := l_msg_count ;
354: x_msg_data := l_msg_data ;
348: x_ipyv_rec := lx_ipyv_rec ;
349: EXCEPTION
350: WHEN FND_API.G_EXC_ERROR THEN
351: ROLLBACK TO ins_delete_policy;
352: x_return_status := FND_API.G_RET_STS_ERROR;
353: x_msg_count := l_msg_count ;
354: x_msg_data := l_msg_data ;
355: FND_MSG_PUB.count_and_get(
356: p_count => x_msg_count
354: x_msg_data := l_msg_data ;
355: FND_MSG_PUB.count_and_get(
356: p_count => x_msg_count
357: ,p_data => x_msg_data);
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: ROLLBACK TO ins_delete_policy;
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
361: x_msg_count := l_msg_count ;
362: x_msg_data := l_msg_data ;
356: p_count => x_msg_count
357: ,p_data => x_msg_data);
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: ROLLBACK TO ins_delete_policy;
360: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
361: x_msg_count := l_msg_count ;
362: x_msg_data := l_msg_data ;
363: FND_MSG_PUB.count_and_get(
364: p_count => x_msg_count
364: p_count => x_msg_count
365: ,p_data => x_msg_data);
366: WHEN OTHERS THEN
367: ROLLBACK TO ins_delete_policy;
368: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
369: x_msg_count := l_msg_count ;
370: x_msg_data := l_msg_data ;
371: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'delete_policy' );
372: FND_MSG_PUB.count_and_get(
423: l_crx_code, --+++ Eff Quote Date Modification +++----
424: l_transaction_id,
425: l_ignore_flag); -- 3945995
426:
427: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
428: RAISE FND_API.G_EXC_ERROR;
429: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
424: l_transaction_id,
425: l_ignore_flag); -- 3945995
426:
427: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
428: RAISE FND_API.G_EXC_ERROR;
429: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432: --Assign value to OUT variables
425: l_ignore_flag); -- 3945995
426:
427: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
428: RAISE FND_API.G_EXC_ERROR;
429: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432: --Assign value to OUT variables
433:
426:
427: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
428: RAISE FND_API.G_EXC_ERROR;
429: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
430: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
431: END IF;
432: --Assign value to OUT variables
433:
434: x_return_status := l_return_status ;
435: x_msg_count := l_msg_count ;
436: x_msg_data := l_msg_data ;
437:
438: EXCEPTION
439: WHEN FND_API.G_EXC_ERROR THEN
440: ROLLBACK TO ins_cancel_policies;
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: x_msg_count := l_msg_count ;
443: x_msg_data := l_msg_data ;
437:
438: EXCEPTION
439: WHEN FND_API.G_EXC_ERROR THEN
440: ROLLBACK TO ins_cancel_policies;
441: x_return_status := FND_API.G_RET_STS_ERROR;
442: x_msg_count := l_msg_count ;
443: x_msg_data := l_msg_data ;
444: FND_MSG_PUB.count_and_get(
445: p_count => x_msg_count
443: x_msg_data := l_msg_data ;
444: FND_MSG_PUB.count_and_get(
445: p_count => x_msg_count
446: ,p_data => x_msg_data);
447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
448: ROLLBACK TO ins_cancel_policies;
449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
450: x_msg_count := l_msg_count ;
451: x_msg_data := l_msg_data ;
445: p_count => x_msg_count
446: ,p_data => x_msg_data);
447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
448: ROLLBACK TO ins_cancel_policies;
449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
450: x_msg_count := l_msg_count ;
451: x_msg_data := l_msg_data ;
452: FND_MSG_PUB.count_and_get(
453: p_count => x_msg_count
453: p_count => x_msg_count
454: ,p_data => x_msg_data);
455: WHEN OTHERS THEN
456: ROLLBACK TO ins_cancel_policies;
457: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
458: x_msg_count := l_msg_count ;
459: x_msg_data := l_msg_data ;
460: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , l_api_name);
461: FND_MSG_PUB.count_and_get(
523: x_msg_count := l_msg_count ;
524: x_msg_data := l_msg_data ;
525: x_ignore_flag := l_ignore_flag ;
526:
527: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
528: RAISE FND_API.G_EXC_ERROR;
529: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
524: x_msg_data := l_msg_data ;
525: x_ignore_flag := l_ignore_flag ;
526:
527: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
528: RAISE FND_API.G_EXC_ERROR;
529: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532:
525: x_ignore_flag := l_ignore_flag ;
526:
527: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
528: RAISE FND_API.G_EXC_ERROR;
529: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532:
533:
526:
527: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
528: RAISE FND_API.G_EXC_ERROR;
529: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
530: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
531: END IF;
532:
533:
534:
536:
537:
538:
539: EXCEPTION
540: WHEN FND_API.G_EXC_ERROR THEN
541:
542:
543: IF (x_ignore_flag = Okc_Api.G_TRUE) THEN
544: x_return_status := l_return_status ;
545:
546: ELSE
547:
548: ROLLBACK TO cancel_create_policies;
549: x_return_status := FND_API.G_RET_STS_ERROR;
550: x_msg_count := l_msg_count ;
551: x_msg_data := l_msg_data ;
552: FND_MSG_PUB.count_and_get(
553: p_count => x_msg_count
555: END IF;
556:
557:
558:
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: ROLLBACK TO cancel_create_policies;
561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
562: x_msg_count := l_msg_count ;
563: x_msg_data := l_msg_data ;
557:
558:
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: ROLLBACK TO cancel_create_policies;
561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
562: x_msg_count := l_msg_count ;
563: x_msg_data := l_msg_data ;
564: FND_MSG_PUB.count_and_get(
565: p_count => x_msg_count
565: p_count => x_msg_count
566: ,p_data => x_msg_data);
567: WHEN OTHERS THEN
568: ROLLBACK TO cancel_create_policies;
569: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
570: x_msg_count := l_msg_count ;
571: x_msg_data := l_msg_data ;
572: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , l_api_name );
573: FND_MSG_PUB.count_and_get(
618: l_contract_id ,
619: l_cancellation_date ,
620: l_crx_code );--Effective Dated Term Change ++---
621:
622: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
623: RAISE FND_API.G_EXC_ERROR;
624: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626: END IF;
619: l_cancellation_date ,
620: l_crx_code );--Effective Dated Term Change ++---
621:
622: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
623: RAISE FND_API.G_EXC_ERROR;
624: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626: END IF;
627: --Assign value to OUT variables
620: l_crx_code );--Effective Dated Term Change ++---
621:
622: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
623: RAISE FND_API.G_EXC_ERROR;
624: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626: END IF;
627: --Assign value to OUT variables
628: x_return_status := l_return_status ;
621:
622: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
623: RAISE FND_API.G_EXC_ERROR;
624: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
625: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
626: END IF;
627: --Assign value to OUT variables
628: x_return_status := l_return_status ;
629: x_msg_count := l_msg_count ;
629: x_msg_count := l_msg_count ;
630: x_msg_data := l_msg_data ;
631:
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: ROLLBACK TO ins_cancel_policies;
635: x_return_status := FND_API.G_RET_STS_ERROR;
636: x_msg_count := l_msg_count ;
637: x_msg_data := l_msg_data ;
631:
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: ROLLBACK TO ins_cancel_policies;
635: x_return_status := FND_API.G_RET_STS_ERROR;
636: x_msg_count := l_msg_count ;
637: x_msg_data := l_msg_data ;
638: FND_MSG_PUB.count_and_get(
639: p_count => x_msg_count
637: x_msg_data := l_msg_data ;
638: FND_MSG_PUB.count_and_get(
639: p_count => x_msg_count
640: ,p_data => x_msg_data);
641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
642: ROLLBACK TO ins_cancel_policies;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: x_msg_count := l_msg_count ;
645: x_msg_data := l_msg_data ;
639: p_count => x_msg_count
640: ,p_data => x_msg_data);
641: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
642: ROLLBACK TO ins_cancel_policies;
643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
644: x_msg_count := l_msg_count ;
645: x_msg_data := l_msg_data ;
646: FND_MSG_PUB.count_and_get(
647: p_count => x_msg_count
647: p_count => x_msg_count
648: ,p_data => x_msg_data);
649: WHEN OTHERS THEN
650: ROLLBACK TO ins_cancel_policies;
651: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
652: x_msg_count := l_msg_count ;
653: x_msg_data := l_msg_data ;
654: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'cancel_policies' );
655: FND_MSG_PUB.count_and_get(
696: l_msg_data ,
697: l_clm_exist ,
698: l_khr_id ,
699: l_trx_date );
700: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
701: RAISE FND_API.G_EXC_ERROR;
702: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
704: END IF;
697: l_clm_exist ,
698: l_khr_id ,
699: l_trx_date );
700: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
701: RAISE FND_API.G_EXC_ERROR;
702: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
704: END IF;
705: x_return_status := l_return_status ;
698: l_khr_id ,
699: l_trx_date );
700: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
701: RAISE FND_API.G_EXC_ERROR;
702: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
704: END IF;
705: x_return_status := l_return_status ;
706: x_msg_count := l_msg_count ;
699: l_trx_date );
700: IF ( l_return_status = FND_API.G_RET_STS_ERROR ) THEN
701: RAISE FND_API.G_EXC_ERROR;
702: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR ) THEN
703: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
704: END IF;
705: x_return_status := l_return_status ;
706: x_msg_count := l_msg_count ;
707: x_msg_data := l_msg_data ;
705: x_return_status := l_return_status ;
706: x_msg_count := l_msg_count ;
707: x_msg_data := l_msg_data ;
708: EXCEPTION
709: WHEN FND_API.G_EXC_ERROR THEN
710: ROLLBACK TO check_claims;
711: x_return_status := FND_API.G_RET_STS_ERROR;
712: x_msg_count := l_msg_count ;
713: x_msg_data := l_msg_data ;
707: x_msg_data := l_msg_data ;
708: EXCEPTION
709: WHEN FND_API.G_EXC_ERROR THEN
710: ROLLBACK TO check_claims;
711: x_return_status := FND_API.G_RET_STS_ERROR;
712: x_msg_count := l_msg_count ;
713: x_msg_data := l_msg_data ;
714: FND_MSG_PUB.count_and_get(
715: p_count => x_msg_count
713: x_msg_data := l_msg_data ;
714: FND_MSG_PUB.count_and_get(
715: p_count => x_msg_count
716: ,p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO check_Claims;
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720: x_msg_count := l_msg_count ;
721: x_msg_data := l_msg_data ;
715: p_count => x_msg_count
716: ,p_data => x_msg_data);
717: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
718: ROLLBACK TO check_Claims;
719: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
720: x_msg_count := l_msg_count ;
721: x_msg_data := l_msg_data ;
722: FND_MSG_PUB.count_and_get(
723: p_count => x_msg_count
723: p_count => x_msg_count
724: ,p_data => x_msg_data);
725: WHEN OTHERS THEN
726: ROLLBACK TO check_claims;
727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
728: x_msg_count := l_msg_count ;
729: x_msg_data := l_msg_data ;
730: FND_MSG_PUB.ADD_EXC_MSG( G_PKG_NAME , 'check_claims' );
731: FND_MSG_PUB.count_and_get(