DBA Data[Home] [Help]

APPS.OKL_CURE_RECON_PVT dependencies on FND_API

Line 123: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);

119:
120: BEGIN
121: FOR l_count in 1..p_message_count LOOP
122:
123: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_true);
124: fnd_message.parse_encoded(l_temp_msg, l_appl_short_name, l_message_name);
125: OPEN Get_Appl_Id (l_appl_short_name);
126: FETCH Get_Appl_Id into l_id;
127: CLOSE Get_Appl_Id;

Line 138: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);

134: FETCH Get_Message_Num into l_message_num;
135: CLOSE Get_Message_Num;
136: END IF;
137:
138: l_temp_msg := fnd_msg_pub.get(fnd_msg_pub.g_previous, fnd_api.g_true);
139:
140: IF NVL(l_message_num, 0) <> 0
141: THEN
142: l_temp_msg := 'APP-' || to_char(l_message_num) || ': ';

Line 150: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);

146:
147: IF l_count = 1
148: THEN
149: l_msg_list := l_msg_list || l_temp_msg ||
150: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
151: ELSE
152: l_msg_list := l_msg_list || l_temp_msg ||
153: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
154: END IF;

Line 153: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);

149: l_msg_list := l_msg_list || l_temp_msg ||
150: fnd_msg_pub.get(fnd_msg_pub.g_first, fnd_api.g_false);
151: ELSE
152: l_msg_list := l_msg_list || l_temp_msg ||
153: fnd_msg_pub.get(fnd_msg_pub.g_next, fnd_api.g_false);
154: END IF;
155:
156: l_msg_list := l_msg_list || '';
157:

Line 172: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

168: x_msg_count OUT NOCOPY NUMBER,
169: x_msg_data OUT NOCOPY VARCHAR2)
170: IS
171:
172: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
173: l_msg_count NUMBER ;
174: l_msg_data VARCHAR2(32627);
175: l_message VARCHAR2(32627);
176: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_CRT';

Line 202: x_return_status := FND_API.G_RET_STS_SUCCESS;

198: THEN
199: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start update_cure_reports');
200: END IF;
201:
202: x_return_status := FND_API.G_RET_STS_SUCCESS;
203:
204: -- update Cure reports table set error message,so this will be prefixed before
205: -- the actual message, so it makes more sense than displaying an OKL message.
206: AddfailMsg(

Line 221: ,p_init_msg_list =>FND_API.G_FALSE

217: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CRT : lp_crtv_rec.approval_status : '||lp_crtv_rec.approval_status);
218:
219: okl_cure_reports_pub.update_cure_reports(
220: p_api_version =>1.0
221: ,p_init_msg_list =>FND_API.G_FALSE
222: ,x_return_status =>l_return_status
223: ,x_msg_count =>l_msg_count
224: ,x_msg_data =>l_msg_data
225: ,p_crtv_rec =>lp_crtv_rec

Line 230: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

226: ,x_crtv_rec =>xp_crtv_rec);
227:
228: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CRT : okl_cure_reports_pub.update_cure_reports : '||l_return_status);
229:
230: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
231: THEN
232: Get_Messages (l_msg_count,l_message);
233: IF (G_IS_DEBUG_STATEMENT_ON = true)
234: THEN

Line 237: raise FND_API.G_EXC_ERROR;

233: IF (G_IS_DEBUG_STATEMENT_ON = true)
234: THEN
235: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error is :' ||l_message);
236: END IF;
237: raise FND_API.G_EXC_ERROR;
238: ELSE
239: IF (G_IS_DEBUG_STATEMENT_ON = true)
240: THEN
241: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Updated cure reports table ');

Line 261: WHEN Fnd_Api.G_EXC_ERROR THEN

257:
258: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CRT : END ');
259:
260: EXCEPTION
261: WHEN Fnd_Api.G_EXC_ERROR THEN
262: ROLLBACK TO UPDATE_CRT;
263: x_return_status := Fnd_Api.G_RET_STS_ERROR;
264: x_msg_count := l_msg_count ;
265: x_msg_data := l_msg_data ;

Line 263: x_return_status := Fnd_Api.G_RET_STS_ERROR;

259:
260: EXCEPTION
261: WHEN Fnd_Api.G_EXC_ERROR THEN
262: ROLLBACK TO UPDATE_CRT;
263: x_return_status := Fnd_Api.G_RET_STS_ERROR;
264: x_msg_count := l_msg_count ;
265: x_msg_data := l_msg_data ;
266: Fnd_Msg_Pub.count_and_get(
267: p_count => x_msg_count

Line 269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

265: x_msg_data := l_msg_data ;
266: Fnd_Msg_Pub.count_and_get(
267: p_count => x_msg_count
268: ,p_data => x_msg_data);
269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
270: ROLLBACK TO UPDATE_CRT;
271: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
272: x_msg_count := l_msg_count ;
273: x_msg_data := l_msg_data ;

Line 271: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

267: p_count => x_msg_count
268: ,p_data => x_msg_data);
269: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
270: ROLLBACK TO UPDATE_CRT;
271: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
272: x_msg_count := l_msg_count ;
273: x_msg_data := l_msg_data ;
274: Fnd_Msg_Pub.count_and_get(
275: p_count => x_msg_count

Line 279: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

275: p_count => x_msg_count
276: ,p_data => x_msg_data);
277: WHEN OTHERS THEN
278: ROLLBACK TO UPDATE_CRT;
279: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
280: x_msg_count := l_msg_count ;
281: x_msg_data := l_msg_data ;
282: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','UPDATE_CRT');
283: Fnd_Msg_Pub.count_and_get(

Line 296: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

292: x_msg_count OUT NOCOPY NUMBER,
293: x_msg_data OUT NOCOPY VARCHAR2)
294: IS
295:
296: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
297: l_msg_count NUMBER ;
298: l_msg_data VARCHAR2(32627);
299: l_message VARCHAR2(32627);
300: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_CAM';

Line 335: x_return_status := FND_API.G_RET_STS_SUCCESS;

331: IF (G_IS_DEBUG_STATEMENT_ON = true)
332: THEN
333: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start update_cure amounts');
334: END IF;
335: x_return_status := FND_API.G_RET_STS_SUCCESS;
336:
337: -- update Cure amounts table set error message,so this will be prefixed before
338: -- the actual message, so it makes more sense than displaying an OKL message.
339: AddfailMsg(

Line 364: IF l_return_status =FND_Api.G_RET_STS_SUCCESS

360: ,x_value => l_rule_value);
361:
362: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CAM : okl_contract_info.get_rule_value : '||l_return_status);
363:
364: IF l_return_status =FND_Api.G_RET_STS_SUCCESS
365: THEN
366: IF (l_rule_value = 'Yes')
367: THEN
368: IF (G_IS_DEBUG_STATEMENT_ON = true)

Line 407: ,p_init_msg_list =>FND_API.G_FALSE

403: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CAM : lp_camv_rec.process : '||lp_camv_rec.process);
404:
405: okl_cure_amounts_pub.update_cure_amounts(
406: p_api_version =>1.0
407: ,p_init_msg_list =>FND_API.G_FALSE
408: ,x_return_status =>l_return_status
409: ,x_msg_count =>l_msg_count
410: ,x_msg_data =>l_msg_data
411: ,p_camv_rec =>lp_camv_rec

Line 416: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

412: ,x_camv_rec =>xp_camv_rec);
413:
414: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CAM : okl_cure_amounts_pub.update_cure_amounts : '||l_return_status);
415:
416: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
417: THEN
418: Get_Messages (l_msg_count,l_message);
419: IF (G_IS_DEBUG_STATEMENT_ON = true)
420: THEN

Line 423: raise FND_API.G_EXC_ERROR;

419: IF (G_IS_DEBUG_STATEMENT_ON = true)
420: THEN
421: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error is :' ||l_message);
422: END IF;
423: raise FND_API.G_EXC_ERROR;
424: ELSE
425: IF (G_IS_DEBUG_STATEMENT_ON = true)
426: THEN
427: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Updated cure amounts table ');

Line 449: WHEN Fnd_Api.G_EXC_ERROR THEN

445:
446: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CAM : END ');
447:
448: EXCEPTION
449: WHEN Fnd_Api.G_EXC_ERROR THEN
450: ROLLBACK TO UPDATE_CAM;
451: x_return_status := Fnd_Api.G_RET_STS_ERROR;
452: x_msg_count := l_msg_count ;
453: x_msg_data := l_msg_data ;

Line 451: x_return_status := Fnd_Api.G_RET_STS_ERROR;

447:
448: EXCEPTION
449: WHEN Fnd_Api.G_EXC_ERROR THEN
450: ROLLBACK TO UPDATE_CAM;
451: x_return_status := Fnd_Api.G_RET_STS_ERROR;
452: x_msg_count := l_msg_count ;
453: x_msg_data := l_msg_data ;
454: Fnd_Msg_Pub.count_and_get(
455: p_count => x_msg_count

Line 457: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

453: x_msg_data := l_msg_data ;
454: Fnd_Msg_Pub.count_and_get(
455: p_count => x_msg_count
456: ,p_data => x_msg_data);
457: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
458: ROLLBACK TO UPDATE_CAM;
459: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
460: x_msg_count := l_msg_count ;
461: x_msg_data := l_msg_data ;

Line 459: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

455: p_count => x_msg_count
456: ,p_data => x_msg_data);
457: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
458: ROLLBACK TO UPDATE_CAM;
459: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
460: x_msg_count := l_msg_count ;
461: x_msg_data := l_msg_data ;
462: Fnd_Msg_Pub.count_and_get(
463: p_count => x_msg_count

Line 467: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

463: p_count => x_msg_count
464: ,p_data => x_msg_data);
465: WHEN OTHERS THEN
466: ROLLBACK TO UPDATE_CAM;
467: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
468: x_msg_count := l_msg_count ;
469: x_msg_data := l_msg_data ;
470: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','UPDATE_CAM');
471: Fnd_Msg_Pub.count_and_get(

Line 486: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

482: x_return_status OUT NOCOPY VARCHAR2,
483: x_msg_count OUT NOCOPY NUMBER,
484: x_msg_data OUT NOCOPY VARCHAR2) IS
485:
486: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
487: l_msg_count NUMBER ;
488: l_msg_data VARCHAR2(32627);
489: l_message VARCHAR2(32627);
490: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_INVOICE_HDR_LINES';

Line 535: x_return_status := FND_API.G_RET_STS_SUCCESS;

531: OKL_DEBUG_PUB.LOG_DEBUG( FND_LOG.LEVEL_STATEMENT
532: , G_MODULE
533: , 'start UPDATE_INVOICE_HDR_LINES');
534: END IF;
535: x_return_status := FND_API.G_RET_STS_SUCCESS;
536:
537: -- update okl_trx__ar_invoices_b set error message,so this will be prefixed before
538: -- the actual message, so it makes more sense than displaying an OKL message.
539: AddfailMsg(

Line 572: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

568: x_taiv_rec => xp_taiv_rec);
569:
570: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_INVOICE_HDR_LINES : okl_trx_ar_invoices_pub.update_trx_ar_invoices : '||l_return_status);
571:
572: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
573: THEN
574: Get_Messages (l_msg_count,l_message);
575: IF (G_IS_DEBUG_STATEMENT_ON = true)
576: THEN

Line 581: raise FND_API.G_EXC_ERROR;

577: OKL_DEBUG_PUB.LOG_DEBUG( FND_LOG.LEVEL_STATEMENT
578: , G_MODULE
579: ,'Error in updating okl_trx_ar_invoices_b '||l_message);
580: END IF;
581: raise FND_API.G_EXC_ERROR;
582: ELSE
583: FND_MSG_PUB.initialize;
584: -- update okl_txl_ar_inv_lns set error message,so this will be prefixed before
585: -- the actual message, so it makes more sense than displaying an OKL message.

Line 610: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

606: x_tilv_rec => xp_tilv_rec);
607:
608: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_INVOICE_HDR_LINES : okl_txl_ar_inv_lns_pub.update_txl_ar_inv_lns : '||l_return_status);
609:
610: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
611: THEN
612: Get_Messages (l_msg_count,l_message);
613: IF (G_IS_DEBUG_STATEMENT_ON = true)
614: THEN

Line 619: raise FND_API.G_EXC_ERROR;

615: OKL_DEBUG_PUB.LOG_DEBUG( FND_LOG.LEVEL_STATEMENT
616: , G_MODULE
617: ,'Error in updating okl_txl_ar_inv_lns '||l_message);
618: END IF;
619: raise FND_API.G_EXC_ERROR;
620: ELSE
621: FND_MSG_PUB.initialize;
622: -- R12 CHANGE- START
623: AddfailMsg(

Line 652: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

648: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR)
649: THEN
650: x_return_status := l_return_status;
651: END IF;
652: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
653: ELSE
654: FND_MSG_PUB.initialize;
655: END IF; -- for okl_tld_pvt
656:

Line 678: WHEN Fnd_Api.G_EXC_ERROR

674:
675: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_INVOICE_HDR_LINES : END ');
676:
677: EXCEPTION
678: WHEN Fnd_Api.G_EXC_ERROR
679: THEN
680: ROLLBACK TO UPDATE_INVOICE_HDR_LINES;
681: x_return_status := Fnd_Api.G_RET_STS_ERROR;
682: x_msg_count := l_msg_count ;

Line 681: x_return_status := Fnd_Api.G_RET_STS_ERROR;

677: EXCEPTION
678: WHEN Fnd_Api.G_EXC_ERROR
679: THEN
680: ROLLBACK TO UPDATE_INVOICE_HDR_LINES;
681: x_return_status := Fnd_Api.G_RET_STS_ERROR;
682: x_msg_count := l_msg_count ;
683: x_msg_data := l_msg_data ;
684: Fnd_Msg_Pub.count_and_get(
685: p_count => x_msg_count

Line 687: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR

683: x_msg_data := l_msg_data ;
684: Fnd_Msg_Pub.count_and_get(
685: p_count => x_msg_count
686: ,p_data => x_msg_data);
687: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR
688: THEN
689: ROLLBACK TO UPDATE_INVOICE_HDR_LINES;
690: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
691: x_msg_count := l_msg_count ;

Line 690: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

686: ,p_data => x_msg_data);
687: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR
688: THEN
689: ROLLBACK TO UPDATE_INVOICE_HDR_LINES;
690: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
691: x_msg_count := l_msg_count ;
692: x_msg_data := l_msg_data ;
693: Fnd_Msg_Pub.count_and_get(
694: p_count => x_msg_count

Line 699: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

695: ,p_data => x_msg_data);
696: WHEN OTHERS
697: THEN
698: ROLLBACK TO UPDATE_INVOICE_HDR_LINES;
699: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
700: x_msg_count := l_msg_count ;
701: x_msg_data := l_msg_data ;
702: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','UPDATE_INVOICE_HDR_LINES');
703: Fnd_Msg_Pub.count_and_get(

Line 767: IF (NOT FND_API.Compatible_API_Call (l_api_version,

763: IF (G_IS_DEBUG_STATEMENT_ON = true) THEN
764: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'p_tldv_rec.id :'||p_tldv_rec.id);
765: END IF;
766: -- Check for call compatibility
767: IF (NOT FND_API.Compatible_API_Call (l_api_version,
768: p_api_version,
769: l_api_name,
770: G_PKG_NAME ))
771: THEN

Line 776: IF (FND_API.to_Boolean(p_init_msg_list))

772: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
773: END IF;
774:
775: -- Initialize message list if requested
776: IF (FND_API.to_Boolean(p_init_msg_list))
777: THEN
778: FND_MSG_PUB.initialize;
779: END IF;
780:

Line 888: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

884: x_return_status OUT NOCOPY VARCHAR2,
885: x_msg_count OUT NOCOPY NUMBER,
886: x_msg_data OUT NOCOPY VARCHAR2) IS
887:
888: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
889: l_msg_count NUMBER ;
890: l_msg_data VARCHAR2(32627);
891: l_message VARCHAR2(32627);
892: l_api_name CONSTANT VARCHAR2(50) := 'INSERT_INVOICE_HDR_LINES';

Line 1024: x_return_status := FND_API.G_RET_STS_SUCCESS;

1020: OKL_DEBUG_PUB.LOG_DEBUG( FND_LOG.LEVEL_STATEMENT
1021: , G_MODULE
1022: , 'start INSERT_INVOICE_HDR_LINES');
1023: END IF;
1024: x_return_status := FND_API.G_RET_STS_SUCCESS;
1025:
1026: --INSERT okl_trx_ar_invoices_b set error message,so this will be prefixed before
1027: --the actual message, so it makes more sense than displaying an OKL message.
1028: AddfailMsg(

Line 1087: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1083: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1084: p_msg_name => G_REQUIRED_VALUE,
1085: p_token1 => 'COL_NAME',
1086: p_token1_value => 'Contract Id');
1087: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1088: END IF;
1089:
1090: OPEN get_trx_id;
1091: FETCH get_trx_id INTO lp_taiv_rec.try_id;

Line 1107: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1103: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1104: p_msg_name => G_REQUIRED_VALUE,
1105: p_token1 => 'COL_NAME',
1106: p_token1_value => 'Transaction Type');
1107: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1108: END IF;
1109:
1110: l_khr_id := lp_taiv_rec.khr_id;
1111:

Line 1133: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1129: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1130: p_msg_name => G_REQUIRED_VALUE,
1131: p_token1 => 'COL_NAME',
1132: p_token1_value => 'Sty Id');
1133: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1134: END IF;
1135:
1136: -- need to populate 4 fields. so that cure invoice gets generated for vendor
1137: -- and not for the customer ibt_id,ixx_id,irm_id,irt_id get cust_account from

Line 1152: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1148: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1149: p_msg_name => G_REQUIRED_VALUE,
1150: p_token1 => 'COL_NAME',
1151: p_token1_value => 'Vendor Program');
1152: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1153: END IF;
1154:
1155: IF (G_IS_DEBUG_STATEMENT_ON = true)
1156: THEN

Line 1203: IF lp_taiv_rec.irt_id IS NULL OR lp_taiv_rec.irt_id = FND_API.G_MISS_NUM

1199: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : lp_taiv_rec.ibt_id : '||lp_taiv_rec.ibt_id);
1200: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : lp_taiv_rec.ixx_id : '||lp_taiv_rec.ixx_id);
1201: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : lp_taiv_rec.irt_id : '||lp_taiv_rec.irt_id);
1202:
1203: IF lp_taiv_rec.irt_id IS NULL OR lp_taiv_rec.irt_id = FND_API.G_MISS_NUM
1204: THEN
1205: IF (G_IS_DEBUG_STATEMENT_ON = true)
1206: THEN
1207: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'value of irt' ||lp_taiv_rec.irt_id);

Line 1216: IF lp_taiv_rec.ixx_id IS NULL OR lp_taiv_rec.ixx_id = FND_API.G_MISS_NUM

1212: INTO lp_taiv_rec.irt_id;
1213: CLOSE l_std_terms_csr;
1214: END IF;
1215:
1216: IF lp_taiv_rec.ixx_id IS NULL OR lp_taiv_rec.ixx_id = FND_API.G_MISS_NUM
1217: THEN
1218: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1219: p_msg_name => G_REQUIRED_VALUE,
1220: p_token1 => 'COL_NAME',

Line 1222: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1218: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1219: p_msg_name => G_REQUIRED_VALUE,
1220: p_token1 => 'COL_NAME',
1221: p_token1_value => 'Customer Account Id');
1222: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1223: END IF;
1224:
1225: IF lp_taiv_rec.ibt_id IS NULL OR lp_taiv_rec.ibt_id = FND_API.G_MISS_NUM
1226: THEN

Line 1225: IF lp_taiv_rec.ibt_id IS NULL OR lp_taiv_rec.ibt_id = FND_API.G_MISS_NUM

1221: p_token1_value => 'Customer Account Id');
1222: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1223: END IF;
1224:
1225: IF lp_taiv_rec.ibt_id IS NULL OR lp_taiv_rec.ibt_id = FND_API.G_MISS_NUM
1226: THEN
1227: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1228: p_msg_name => G_REQUIRED_VALUE,
1229: p_token1 => 'COL_NAME',

Line 1231: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1227: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1228: p_msg_name => G_REQUIRED_VALUE,
1229: p_token1 => 'COL_NAME',
1230: p_token1_value => 'Bill To Address Id');
1231: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1232: END IF;
1233:
1234: IF (G_IS_DEBUG_STATEMENT_ON = true)
1235: THEN

Line 1239: IF lp_taiv_rec.irt_id IS NULL OR lp_taiv_rec.irt_id = FND_API.G_MISS_NUM

1235: THEN
1236: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'value of irt--->' ||lp_taiv_rec.irt_id);
1237: END IF;
1238:
1239: IF lp_taiv_rec.irt_id IS NULL OR lp_taiv_rec.irt_id = FND_API.G_MISS_NUM
1240: THEN
1241: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1242: p_msg_name => G_REQUIRED_VALUE,
1243: p_token1 => 'COL_NAME',

Line 1245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1241: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1242: p_msg_name => G_REQUIRED_VALUE,
1243: p_token1 => 'COL_NAME',
1244: p_token1_value => 'Payment Term Id');
1245: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1246: END IF;
1247:
1248: l_rule_value := NULL;
1249: l_id1 := NULL;

Line 1261: IF l_return_status =FND_Api.G_RET_STS_SUCCESS AND l_id1 IS NOT NULL

1257: ,x_id1 => l_id1
1258: ,x_id2 => l_id2
1259: ,x_value => l_rule_value);
1260:
1261: IF l_return_status =FND_Api.G_RET_STS_SUCCESS AND l_id1 IS NOT NULL
1262: THEN
1263: lp_taiv_rec.irm_id :=l_id1;
1264: IF (G_IS_DEBUG_STATEMENT_ON = true)
1265: THEN

Line 1277: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1273: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1274: p_msg_name => 'OKL_REQUIRED_VALUE',
1275: p_token1 => 'COL_NAME',
1276: p_token1_value => 'Payment Method ');
1277: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1278: END IF;
1279:
1280: OPEN l_rcpt_mthd_csr (l_id1);
1281: FETCH l_rcpt_mthd_csr INTO lp_taiv_rec.irm_id;

Line 1286: IF lp_taiv_rec.irm_id IS NULL OR lp_taiv_rec.irm_id = FND_API.G_MISS_NUM

1282: CLOSE l_rcpt_mthd_csr;
1283:
1284: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : lp_taiv_rec.irm_id : '||lp_taiv_rec.irm_id);
1285:
1286: IF lp_taiv_rec.irm_id IS NULL OR lp_taiv_rec.irm_id = FND_API.G_MISS_NUM
1287: THEN
1288: IF (G_IS_DEBUG_STATEMENT_ON = true)
1289: THEN
1290: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'receipt method id is not found');

Line 1296: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1292: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
1293: p_msg_name => 'OKL_REQUIRED_VALUE',
1294: p_token1 => 'COL_NAME',
1295: p_token1_value => 'receipt method id ');
1296: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1297: END IF;
1298:
1299: lp_taiv_rec.object_version_number :=1;
1300: lp_taiv_rec.date_entered :=SYSDATE;

Line 1348: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1344: x_taiv_rec => xp_taiv_rec);
1345:
1346: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : okl_trx_ar_invoices_pub.INSERT_trx_ar_invoices : '||l_return_status);
1347:
1348: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1349: THEN
1350: Get_Messages (l_msg_count,l_message);
1351: IF (G_IS_DEBUG_STATEMENT_ON = true)
1352: THEN

Line 1357: raise FND_API.G_EXC_ERROR;

1353: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1354: G_MODULE,
1355: 'Error in updating okl_trx_ar_invoices_b '||l_message);
1356: END IF;
1357: raise FND_API.G_EXC_ERROR;
1358: ELSE
1359: FND_MSG_PUB.initialize;
1360:
1361: --INSERT okl_txl_ar_inv_lns set error message,so this will be prefixed before

Line 1397: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1393: x_tilv_rec => xp_tilv_rec);
1394:
1395: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : okl_txl_ar_inv_lns_pub.insert_txl_ar_inv_lns : '||l_return_status);
1396:
1397: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1398: THEN
1399: Get_Messages (l_msg_count,l_message);
1400: IF (G_IS_DEBUG_STATEMENT_ON = true)
1401: THEN

Line 1406: raise FND_API.G_EXC_ERROR;

1402: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1403: G_MODULE,
1404: 'Error in updating okl_txl_ar_inv_lns '||l_message);
1405: END IF;
1406: raise FND_API.G_EXC_ERROR;
1407: ELSE
1408: FND_MSG_PUB.initialize;
1409:
1410: -- R12 Change - START

Line 1441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1437: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : okl_internal_billing_pvt.Get_Invoice_format : '||l_return_status);
1438:
1439: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR)
1440: THEN
1441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1442: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR)
1443: THEN
1444: RAISE Fnd_Api.G_EXC_ERROR;
1445: END IF;

Line 1444: RAISE Fnd_Api.G_EXC_ERROR;

1440: THEN
1441: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1442: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR)
1443: THEN
1444: RAISE Fnd_Api.G_EXC_ERROR;
1445: END IF;
1446:
1447: additional_tld_attr(
1448: p_api_version => 1.0,

Line 1466: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1462: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR)
1463: THEN
1464: x_return_status := l_return_status;
1465: END IF;
1466: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1467: END IF;
1468:
1469: okl_tld_pvt.insert_row(
1470: p_api_version => 1.0,

Line 1486: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;

1482: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR)
1483: THEN
1484: x_return_status := l_return_status;
1485: END IF;
1486: RAISE Fnd_Api.G_EXC_UNEXPECTED_ERROR;
1487: ELSE
1488: FND_MSG_PUB.initialize;
1489: END IF; -- for okl_tld_pvt
1490: -- R12 Change - END

Line 1509: WHEN Fnd_Api.G_EXC_ERROR THEN

1505: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : INSERT_INVOICE_HDR_LINES : END ');
1506:
1507: EXCEPTION
1508:
1509: WHEN Fnd_Api.G_EXC_ERROR THEN
1510: ROLLBACK TO INSERT_INVOICE_HDR_LINES;
1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1512: x_msg_count := l_msg_count ;
1513: x_msg_data := l_msg_data ;

Line 1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1507: EXCEPTION
1508:
1509: WHEN Fnd_Api.G_EXC_ERROR THEN
1510: ROLLBACK TO INSERT_INVOICE_HDR_LINES;
1511: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1512: x_msg_count := l_msg_count ;
1513: x_msg_data := l_msg_data ;
1514: Fnd_Msg_Pub.count_and_get(
1515: p_count => x_msg_count

Line 1518: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1514: Fnd_Msg_Pub.count_and_get(
1515: p_count => x_msg_count
1516: ,p_data => x_msg_data);
1517:
1518: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1519: ROLLBACK TO INSERT_INVOICE_HDR_LINES;
1520: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1521: x_msg_count := l_msg_count ;
1522: x_msg_data := l_msg_data ;

Line 1520: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1516: ,p_data => x_msg_data);
1517:
1518: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1519: ROLLBACK TO INSERT_INVOICE_HDR_LINES;
1520: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1521: x_msg_count := l_msg_count ;
1522: x_msg_data := l_msg_data ;
1523: Fnd_Msg_Pub.count_and_get(
1524: p_count => x_msg_count

Line 1529: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1525: ,p_data => x_msg_data);
1526:
1527: WHEN OTHERS THEN
1528: ROLLBACK TO INSERT_INVOICE_HDR_LINES;
1529: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1530: x_msg_count := l_msg_count ;
1531: x_msg_data := l_msg_data ;
1532: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','INSERT_INVOICE_HDR_LINES');
1533: Fnd_Msg_Pub.count_and_get(

Line 1546: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1542: x_return_status OUT NOCOPY VARCHAR2,
1543: x_msg_count OUT NOCOPY NUMBER,
1544: x_msg_data OUT NOCOPY VARCHAR2) IS
1545:
1546: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1547: l_msg_count NUMBER ;
1548: l_msg_data VARCHAR2(32627);
1549: l_message VARCHAR2(32627);
1550: l_api_name CONSTANT VARCHAR2(50) := 'TERMINATE_QUOTE';

Line 1573: x_return_status := FND_API.G_RET_STS_SUCCESS;

1569: IF (G_IS_DEBUG_STATEMENT_ON = true)
1570: THEN
1571: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start TERMINATE_QUOTE');
1572: END IF;
1573: x_return_status := FND_API.G_RET_STS_SUCCESS;
1574:
1575: --set error message,so this will be prefixed before the actual message, so it
1576: --makes more sense than displaying an OKL message.
1577: AddfailMsg( p_object => 'RECORD IN OKL_TRX_QUOTE_B ',

Line 1600: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1596: ,x_err_msg => l_err_msg);
1597:
1598: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : TERMINATE_QUOTE : OKL_AM_TERMNT_QUOTE_PUB.TERMINATE_QUOTE : '||l_return_status);
1599:
1600: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1601: THEN
1602: Get_Messages (l_msg_count,l_message);
1603: IF (G_IS_DEBUG_STATEMENT_ON = true)
1604: THEN

Line 1612: raise FND_API.G_EXC_ERROR;

1608: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1609: G_MODULE,
1610: 'Error from the API : ' ||l_err_msg);
1611: END IF;
1612: raise FND_API.G_EXC_ERROR;
1613: END IF;
1614:
1615: FND_MSG_PUB.Count_And_Get ( p_count => x_msg_count,
1616: p_data => x_msg_data );

Line 1627: WHEN Fnd_Api.G_EXC_ERROR THEN

1623:
1624: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : TERMINATE_QUOTE : END ');
1625:
1626: EXCEPTION
1627: WHEN Fnd_Api.G_EXC_ERROR THEN
1628: ROLLBACK TO TERMINATE_QUOTE;
1629: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1630: x_msg_count := l_msg_count ;
1631: x_msg_data := l_msg_data ;

Line 1629: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1625:
1626: EXCEPTION
1627: WHEN Fnd_Api.G_EXC_ERROR THEN
1628: ROLLBACK TO TERMINATE_QUOTE;
1629: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1630: x_msg_count := l_msg_count ;
1631: x_msg_data := l_msg_data ;
1632: Fnd_Msg_Pub.count_and_get(
1633: p_count => x_msg_count

Line 1635: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1631: x_msg_data := l_msg_data ;
1632: Fnd_Msg_Pub.count_and_get(
1633: p_count => x_msg_count
1634: ,p_data => x_msg_data);
1635: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1636: ROLLBACK TO TERMINATE_QUOTE;
1637: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1638: x_msg_count := l_msg_count ;
1639: x_msg_data := l_msg_data ;

Line 1637: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1633: p_count => x_msg_count
1634: ,p_data => x_msg_data);
1635: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1636: ROLLBACK TO TERMINATE_QUOTE;
1637: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1638: x_msg_count := l_msg_count ;
1639: x_msg_data := l_msg_data ;
1640: Fnd_Msg_Pub.count_and_get(
1641: p_count => x_msg_count

Line 1645: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1641: p_count => x_msg_count
1642: ,p_data => x_msg_data);
1643: WHEN OTHERS THEN
1644: ROLLBACK TO TERMINATE_QUOTE;
1645: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1646: x_msg_count := l_msg_count ;
1647: x_msg_data := l_msg_data ;
1648: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','TERMINATE_QUOTE');
1649: Fnd_Msg_Pub.count_and_get(

Line 1662: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1658: x_return_status OUT NOCOPY VARCHAR2,
1659: x_msg_count OUT NOCOPY NUMBER,
1660: x_msg_data OUT NOCOPY VARCHAR2) IS
1661:
1662: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1663: l_msg_count NUMBER ;
1664: l_msg_data VARCHAR2(32627);
1665: l_message VARCHAR2(32627);
1666: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_TAI_TIL';

Line 1691: x_return_status := FND_API.G_RET_STS_SUCCESS;

1687: IF (G_IS_DEBUG_STATEMENT_ON = true)
1688: THEN
1689: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start UPDATE_TAI_TIL');
1690: END IF;
1691: x_return_status := FND_API.G_RET_STS_SUCCESS;
1692:
1693: -- if cpy_id is populated then we will update the TAI tables
1694: -- else do an insert in tai
1695: --09/24/03 -- Do the above only if the process ='CURE'

Line 1747: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1743: END IF;
1744:
1745: -- ASHIM CHANGE - END
1746:
1747: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1748: THEN
1749: Get_Messages (l_msg_count,l_message);
1750: IF (G_IS_DEBUG_STATEMENT_ON = true)
1751: THEN

Line 1756: raise FND_API.G_EXC_ERROR;

1752: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1753: G_MODULE,
1754: 'Error in update tai_til :' ||l_message);
1755: END IF;
1756: raise FND_API.G_EXC_ERROR;
1757: END IF;
1758:
1759: --if process is 'REPURCHASE
1760: --and if p_trx_status ='SUBMITTED' that means the action from the UI

Line 1770: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1766: x_return_status =>l_return_status,
1767: x_msg_count =>l_msg_count,
1768: x_msg_data =>l_msg_data);
1769:
1770: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1771: THEN
1772: Get_Messages (l_msg_count,l_message);
1773: IF (G_IS_DEBUG_STATEMENT_ON = true)
1774: THEN

Line 1779: raise FND_API.G_EXC_ERROR;

1775: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1776: G_MODULE,
1777: 'Error in Termination of Quote :' ||l_message);
1778: END IF;
1779: raise FND_API.G_EXC_ERROR;
1780: END IF;
1781:
1782: END IF; --if process is CURE
1783:

Line 1799: WHEN Fnd_Api.G_EXC_ERROR THEN

1795:
1796: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_TAI_TIL : END ');
1797:
1798: EXCEPTION
1799: WHEN Fnd_Api.G_EXC_ERROR THEN
1800: ROLLBACK TO UPDATE_TAI_TIL;
1801: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1802: x_msg_count := l_msg_count ;
1803: x_msg_data := l_msg_data ;

Line 1801: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1797:
1798: EXCEPTION
1799: WHEN Fnd_Api.G_EXC_ERROR THEN
1800: ROLLBACK TO UPDATE_TAI_TIL;
1801: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1802: x_msg_count := l_msg_count ;
1803: x_msg_data := l_msg_data ;
1804: Fnd_Msg_Pub.count_and_get(
1805: p_count => x_msg_count

Line 1807: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1803: x_msg_data := l_msg_data ;
1804: Fnd_Msg_Pub.count_and_get(
1805: p_count => x_msg_count
1806: ,p_data => x_msg_data);
1807: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1808: ROLLBACK TO UPDATE_TAI_TIL;
1809: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1810: x_msg_count := l_msg_count ;
1811: x_msg_data := l_msg_data ;

Line 1809: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1805: p_count => x_msg_count
1806: ,p_data => x_msg_data);
1807: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1808: ROLLBACK TO UPDATE_TAI_TIL;
1809: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1810: x_msg_count := l_msg_count ;
1811: x_msg_data := l_msg_data ;
1812: Fnd_Msg_Pub.count_and_get(
1813: p_count => x_msg_count

Line 1817: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1813: p_count => x_msg_count
1814: ,p_data => x_msg_data);
1815: WHEN OTHERS THEN
1816: ROLLBACK TO UPDATE_TAI_TIL;
1817: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1818: x_msg_count := l_msg_count ;
1819: x_msg_data := l_msg_data ;
1820: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','UPDATE_TAI_TIL');
1821: Fnd_Msg_Pub.count_and_get(

Line 1833: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

1829: p_invoice_date IN DATE,
1830: x_return_status OUT NOCOPY VARCHAR2,
1831: x_msg_count OUT NOCOPY NUMBER,
1832: x_msg_data OUT NOCOPY VARCHAR2) IS
1833: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
1834: l_msg_count NUMBER ;
1835: l_msg_data VARCHAR2(32627);
1836: l_message VARCHAR2(32627);
1837: l_api_name CONSTANT VARCHAR2(50) := 'UPDATE_INVOICES';

Line 1865: x_return_status := FND_API.G_RET_STS_SUCCESS;

1861: IF (G_IS_DEBUG_STATEMENT_ON = true)
1862: THEN
1863: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start UPDATE_INVOICES');
1864: END IF;
1865: x_return_status := FND_API.G_RET_STS_SUCCESS;
1866:
1867: UPDATE_TAI_TIL(p_cam_tbl =>p_cam_tbl,
1868: p_invoice_date =>p_invoice_date,
1869: p_trx_status =>'WORKING',

Line 1874: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1870: x_return_status =>l_return_status,
1871: x_msg_count =>l_msg_count,
1872: x_msg_data =>l_msg_data);
1873:
1874: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1875: THEN
1876: Get_Messages (l_msg_count,l_message);
1877: IF (G_IS_DEBUG_STATEMENT_ON = true)
1878: THEN

Line 1883: raise FND_API.G_EXC_ERROR;

1879: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1880: G_MODULE,
1881: 'Error in updating cure amounts:'||l_message);
1882: END IF;
1883: raise FND_API.G_EXC_ERROR;
1884: END IF;
1885:
1886: UPDATE_CAM (p_cam_tbl =>p_cam_tbl,
1887: p_report_id =>p_report_id,

Line 1892: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1888: x_return_status =>l_return_status,
1889: x_msg_count =>l_msg_count,
1890: x_msg_data =>l_msg_data);
1891:
1892: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1893: THEN
1894: Get_Messages (l_msg_count,l_message);
1895: IF (G_IS_DEBUG_STATEMENT_ON = true)
1896: THEN

Line 1901: raise FND_API.G_EXC_ERROR;

1897: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
1898: G_MODULE,
1899: 'Error in updating cure amounts:'||l_message);
1900: END IF;
1901: raise FND_API.G_EXC_ERROR;
1902: END IF;
1903:
1904: UPDATE_CRT (p_report_id =>p_report_id,
1905: p_status =>'ACCEPTANCE_IN_PROGRESS',

Line 1910: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

1906: x_return_status =>l_return_status,
1907: x_msg_count =>l_msg_count,
1908: x_msg_data =>l_msg_data);
1909:
1910: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
1911: THEN
1912: Get_Messages (l_msg_count,l_message);
1913: IF (G_IS_DEBUG_STATEMENT_ON = true)
1914: THEN

Line 1917: raise FND_API.G_EXC_ERROR;

1913: IF (G_IS_DEBUG_STATEMENT_ON = true)
1914: THEN
1915: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error is :' ||l_message);
1916: END IF;
1917: raise FND_API.G_EXC_ERROR;
1918: ELSE
1919: IF (G_IS_DEBUG_STATEMENT_ON = true)
1920: THEN
1921: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Updated cure reports table ');

Line 1938: WHEN Fnd_Api.G_EXC_ERROR THEN

1934:
1935: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_INVOICES : END ');
1936:
1937: EXCEPTION
1938: WHEN Fnd_Api.G_EXC_ERROR THEN
1939: ROLLBACK TO UPDATE_INVOICES;
1940: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1941: x_msg_count := l_msg_count ;
1942: x_msg_data := l_msg_data ;

Line 1940: x_return_status := Fnd_Api.G_RET_STS_ERROR;

1936:
1937: EXCEPTION
1938: WHEN Fnd_Api.G_EXC_ERROR THEN
1939: ROLLBACK TO UPDATE_INVOICES;
1940: x_return_status := Fnd_Api.G_RET_STS_ERROR;
1941: x_msg_count := l_msg_count ;
1942: x_msg_data := l_msg_data ;
1943: Fnd_Msg_Pub.count_and_get(
1944: p_count => x_msg_count

Line 1946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

1942: x_msg_data := l_msg_data ;
1943: Fnd_Msg_Pub.count_and_get(
1944: p_count => x_msg_count
1945: ,p_data => x_msg_data);
1946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1947: ROLLBACK TO UPDATE_INVOICES;
1948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1949: x_msg_count := l_msg_count ;
1950: x_msg_data := l_msg_data ;

Line 1948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1944: p_count => x_msg_count
1945: ,p_data => x_msg_data);
1946: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
1947: ROLLBACK TO UPDATE_INVOICES;
1948: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1949: x_msg_count := l_msg_count ;
1950: x_msg_data := l_msg_data ;
1951: Fnd_Msg_Pub.count_and_get(
1952: p_count => x_msg_count

Line 1956: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1952: p_count => x_msg_count
1953: ,p_data => x_msg_data);
1954: WHEN OTHERS THEN
1955: ROLLBACK TO UPDATE_INVOICES;
1956: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1957: x_msg_count := l_msg_count ;
1958: x_msg_data := l_msg_data ;
1959: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','UPDATE_INVOICES');
1960: Fnd_Msg_Pub.count_and_get(

Line 2102: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2098:
2099: l_factoring_synd VARCHAR2(30);
2100: l_syndication_code VARCHAR2(30) DEFAULT NULL;
2101: l_factoring_code VARCHAR2(30) DEFAULT NULL;
2102: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2103: l_msg_count NUMBER ;
2104: l_msg_data VARCHAR2(32627);
2105: l_message VARCHAR2(32627);
2106: l_api_name CONSTANT VARCHAR2(50) := 'CREATE_ACCOUNTING';

Line 2132: x_return_status := FND_API.G_RET_STS_SUCCESS;

2128: IF (G_IS_DEBUG_STATEMENT_ON = true)
2129: THEN
2130: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start submit_cure_invoices');
2131: END IF;
2132: x_return_status := FND_API.G_RET_STS_SUCCESS;
2133:
2134: FOR i in p_cam_tbl.FIRST..p_cam_tbl.LAST
2135: LOOP
2136: --11/26/03 if process is cure, the html screen does not

Line 2164: raise FND_API.G_EXC_ERROR;

2160: IF l_tmpl_identify_tbl(1).product_id IS NULL
2161: THEN
2162: OKL_API.SET_MESSAGE (p_app_name => 'OKL',
2163: p_msg_name => 'OKL_NO_PRODUCT_FOUND');
2164: raise FND_API.G_EXC_ERROR;
2165: END IF;
2166:
2167: l_factoring_synd := get_factor_synd(l_khr_id);
2168: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : CREATE_ACCOUNTING : l_factoring_synd : '||l_factoring_synd);

Line 2271: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2267: p_contract_line_id => NULL,
2268: x_acc_gen_tbl => l_acc_gen_primary_key_tbl,
2269: x_return_status => l_return_status );
2270:
2271: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2272: THEN
2273: raise FND_API.G_EXC_ERROR;
2274: ELSE
2275: IF (G_IS_DEBUG_STATEMENT_ON = true)

Line 2273: raise FND_API.G_EXC_ERROR;

2269: x_return_status => l_return_status );
2270:
2271: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2272: THEN
2273: raise FND_API.G_EXC_ERROR;
2274: ELSE
2275: IF (G_IS_DEBUG_STATEMENT_ON = true)
2276: THEN
2277: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,

Line 2406: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2402: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : CREATE_ACCOUNTING : okl_account_dist_pvt.create_accounting_dist : '||l_return_status);
2403:
2404: -- R12 CHANGE - END
2405:
2406: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2407: THEN
2408: Get_Messages (l_msg_count,l_message);
2409: IF (G_IS_DEBUG_STATEMENT_ON = true)
2410: THEN

Line 2413: raise FND_API.G_EXC_ERROR;

2409: IF (G_IS_DEBUG_STATEMENT_ON = true)
2410: THEN
2411: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error' ||l_message);
2412: END IF;
2413: raise FND_API.G_EXC_ERROR;
2414: ELSE
2415: IF (G_IS_DEBUG_STATEMENT_ON = true)
2416: THEN
2417: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'count of l_template_tbl'||l_template_tbl.count);

Line 2444: WHEN Fnd_Api.G_EXC_ERROR THEN

2440:
2441: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : CREATE_ACCOUNTING : END ');
2442:
2443: EXCEPTION
2444: WHEN Fnd_Api.G_EXC_ERROR THEN
2445: ROLLBACK TO CREATE_ACCOUNTING;
2446: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2447: x_msg_count := l_msg_count ;
2448: x_msg_data := l_msg_data ;

Line 2446: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2442:
2443: EXCEPTION
2444: WHEN Fnd_Api.G_EXC_ERROR THEN
2445: ROLLBACK TO CREATE_ACCOUNTING;
2446: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2447: x_msg_count := l_msg_count ;
2448: x_msg_data := l_msg_data ;
2449: Fnd_Msg_Pub.count_and_get(
2450: p_count => x_msg_count

Line 2452: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2448: x_msg_data := l_msg_data ;
2449: Fnd_Msg_Pub.count_and_get(
2450: p_count => x_msg_count
2451: ,p_data => x_msg_data);
2452: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2453: ROLLBACK TO CREATE_ACCOUNTING;
2454: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2455: x_msg_count := l_msg_count ;
2456: x_msg_data := l_msg_data ;

Line 2454: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2450: p_count => x_msg_count
2451: ,p_data => x_msg_data);
2452: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2453: ROLLBACK TO CREATE_ACCOUNTING;
2454: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2455: x_msg_count := l_msg_count ;
2456: x_msg_data := l_msg_data ;
2457: Fnd_Msg_Pub.count_and_get(
2458: p_count => x_msg_count

Line 2462: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2458: p_count => x_msg_count
2459: ,p_data => x_msg_data);
2460: WHEN OTHERS THEN
2461: ROLLBACK TO CREATE_ACCOUNTING;
2462: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2463: x_msg_count := l_msg_count ;
2464: x_msg_data := l_msg_data ;
2465: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','CREATE_ACCOUNTING');
2466: Fnd_Msg_Pub.count_and_get(

Line 2480: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2476: x_msg_count OUT NOCOPY NUMBER,
2477: x_msg_data OUT NOCOPY VARCHAR2)
2478: IS
2479:
2480: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2481: l_msg_count NUMBER ;
2482: l_msg_data VARCHAR2(32627);
2483: l_message VARCHAR2(32627);
2484: l_api_name CONSTANT VARCHAR2(50) := 'SUBMIT_INVOICES';

Line 2500: x_return_status := FND_API.G_RET_STS_SUCCESS;

2496: IF (G_IS_DEBUG_STATEMENT_ON = true)
2497: THEN
2498: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE, 'start submit_cure_invoices');
2499: END IF;
2500: x_return_status := FND_API.G_RET_STS_SUCCESS;
2501:
2502: UPDATE_TAI_TIL(p_cam_tbl =>p_cam_tbl,
2503: p_invoice_date =>p_invoice_date,
2504: p_trx_status =>'SUBMITTED',

Line 2511: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2507: x_msg_data =>l_msg_data);
2508:
2509: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : SUBMIT_INVOICES : UPDATE_TAI_TIL : '||l_return_status);
2510:
2511: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2512: THEN
2513: Get_Messages (l_msg_count,l_message);
2514: IF (G_IS_DEBUG_STATEMENT_ON = true)
2515: THEN

Line 2520: raise FND_API.G_EXC_ERROR;

2516: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
2517: G_MODULE,
2518: 'Error in updating cure amounts:'||l_message);
2519: END IF;
2520: raise FND_API.G_EXC_ERROR;
2521: END IF;
2522:
2523: CREATE_ACCOUNTING(p_cam_tbl =>p_cam_tbl,
2524: x_return_status =>l_return_status,

Line 2530: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2526: x_msg_data =>l_msg_data);
2527:
2528: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : SUBMIT_INVOICES : CREATE_ACCOUNTING : '||l_return_status);
2529:
2530: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2531: THEN
2532: Get_Messages (l_msg_count,l_message);
2533: IF (G_IS_DEBUG_STATEMENT_ON = true)
2534: THEN

Line 2539: raise FND_API.G_EXC_ERROR;

2535: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
2536: G_MODULE,
2537: 'Error in Creating distributions'||l_message);
2538: END IF;
2539: raise FND_API.G_EXC_ERROR;
2540: END IF;
2541:
2542: UPDATE_CAM (p_cam_tbl =>p_cam_tbl,
2543: p_report_id =>p_report_id,

Line 2550: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2546: x_msg_data =>l_msg_data);
2547:
2548: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : SUBMIT_INVOICES : UPDATE_CAM : '||l_return_status);
2549:
2550: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2551: THEN
2552: Get_Messages (l_msg_count,l_message);
2553: IF (G_IS_DEBUG_STATEMENT_ON = true)
2554: THEN

Line 2559: raise FND_API.G_EXC_ERROR;

2555: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT,
2556: G_MODULE,
2557: 'Error in updating cure amounts:'||l_message);
2558: END IF;
2559: raise FND_API.G_EXC_ERROR;
2560: END IF;
2561:
2562: UPDATE_CRT (p_report_id =>p_report_id,
2563: p_status =>'ACCEPTANCE_COMPLETED',

Line 2570: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2566: x_msg_data =>l_msg_data);
2567:
2568: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : SUBMIT_INVOICES : UPDATE_CRT : '||l_return_status);
2569:
2570: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2571: THEN
2572: Get_Messages (l_msg_count,l_message);
2573: IF (G_IS_DEBUG_STATEMENT_ON = true)
2574: THEN

Line 2577: raise FND_API.G_EXC_ERROR;

2573: IF (G_IS_DEBUG_STATEMENT_ON = true)
2574: THEN
2575: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error is :' ||l_message);
2576: END IF;
2577: raise FND_API.G_EXC_ERROR;
2578: ELSE
2579: IF (G_IS_DEBUG_STATEMENT_ON = true)
2580: THEN
2581: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Updated cure reports table ');

Line 2599: WHEN Fnd_Api.G_EXC_ERROR THEN

2595:
2596: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : SUBMIT_INVOICES : END ');
2597:
2598: EXCEPTION
2599: WHEN Fnd_Api.G_EXC_ERROR THEN
2600: ROLLBACK TO SUBMIT_INVOICES;
2601: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2602: x_msg_count := l_msg_count ;
2603: x_msg_data := l_msg_data ;

Line 2601: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2597:
2598: EXCEPTION
2599: WHEN Fnd_Api.G_EXC_ERROR THEN
2600: ROLLBACK TO SUBMIT_INVOICES;
2601: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2602: x_msg_count := l_msg_count ;
2603: x_msg_data := l_msg_data ;
2604: Fnd_Msg_Pub.count_and_get(
2605: p_count => x_msg_count

Line 2607: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2603: x_msg_data := l_msg_data ;
2604: Fnd_Msg_Pub.count_and_get(
2605: p_count => x_msg_count
2606: ,p_data => x_msg_data);
2607: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2608: ROLLBACK TO SUBMIT_INVOICES;
2609: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2610: x_msg_count := l_msg_count ;
2611: x_msg_data := l_msg_data ;

Line 2609: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2605: p_count => x_msg_count
2606: ,p_data => x_msg_data);
2607: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2608: ROLLBACK TO SUBMIT_INVOICES;
2609: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2610: x_msg_count := l_msg_count ;
2611: x_msg_data := l_msg_data ;
2612: Fnd_Msg_Pub.count_and_get(
2613: p_count => x_msg_count

Line 2617: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2613: p_count => x_msg_count
2614: ,p_data => x_msg_data);
2615: WHEN OTHERS THEN
2616: ROLLBACK TO SUBMIT_INVOICES;
2617: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2618: x_msg_count := l_msg_count ;
2619: x_msg_data := l_msg_data ;
2620: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_RECON_PVT','SUBMIT_INVOICES');
2621: Fnd_Msg_Pub.count_and_get(

Line 2629: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.G_FALSE,

2625: END SUBMIT_INVOICES;
2626:
2627: PROCEDURE UPDATE_CURE_INVOICE (
2628: p_api_version IN NUMBER,
2629: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.G_FALSE,
2630: p_commit IN VARCHAR2 DEFAULT fnd_api.G_FALSE,
2631: p_report_id IN NUMBER,
2632: p_invoice_date IN DATE,
2633: p_cam_tbl IN cure_amount_tbl,

Line 2630: p_commit IN VARCHAR2 DEFAULT fnd_api.G_FALSE,

2626:
2627: PROCEDURE UPDATE_CURE_INVOICE (
2628: p_api_version IN NUMBER,
2629: p_init_msg_list IN VARCHAR2 DEFAULT fnd_api.G_FALSE,
2630: p_commit IN VARCHAR2 DEFAULT fnd_api.G_FALSE,
2631: p_report_id IN NUMBER,
2632: p_invoice_date IN DATE,
2633: p_cam_tbl IN cure_amount_tbl,
2634: p_operation IN VARCHAR2,

Line 2639: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;

2635: x_return_status OUT NOCOPY VARCHAR2,
2636: x_msg_count OUT NOCOPY NUMBER,
2637: x_msg_data OUT NOCOPY VARCHAR2) IS
2638:
2639: l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
2640: l_msg_count NUMBER;
2641: l_msg_data VARCHAR2(32627);
2642: l_message VARCHAR2(32627);
2643:

Line 2654: x_return_status := FND_API.G_RET_STS_SUCCESS;

2650: G_IS_DEBUG_STATEMENT_ON := OKL_DEBUG_PUB.CHECK_LOG_ON(G_MODULE, FND_LOG.LEVEL_STATEMENT);
2651: END IF;
2652:
2653: SAVEPOINT UPDATE_CURE_INVOICE_PVT;
2654: x_return_status := FND_API.G_RET_STS_SUCCESS;
2655:
2656: IF p_operation ='UPDATE'
2657: THEN
2658: IF (G_IS_DEBUG_STATEMENT_ON = true)

Line 2687: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)

2683:
2684: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CURE_INVOICE : submit_invoices : '||l_return_status);
2685: END IF;
2686:
2687: IF ( l_return_status <> FND_API.G_RET_STS_SUCCESS)
2688: THEN
2689: Get_Messages (l_msg_count,l_message);
2690: IF (G_IS_DEBUG_STATEMENT_ON = true)
2691: THEN

Line 2694: raise FND_API.G_EXC_ERROR;

2690: IF (G_IS_DEBUG_STATEMENT_ON = true)
2691: THEN
2692: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Error is :' ||l_message);
2693: END IF;
2694: raise FND_API.G_EXC_ERROR;
2695: ELSE
2696: IF (G_IS_DEBUG_STATEMENT_ON = true)
2697: THEN
2698: OKL_DEBUG_PUB.LOG_DEBUG(FND_LOG.LEVEL_STATEMENT, G_MODULE,'Invoices updated');

Line 2715: WHEN Fnd_Api.G_EXC_ERROR THEN

2711:
2712: okl_debug_pub.logmessage('OKL_CURE_RECON_PVT : UPDATE_CURE_INVOICE : END ');
2713:
2714: EXCEPTION
2715: WHEN Fnd_Api.G_EXC_ERROR THEN
2716: ROLLBACK TO UPDATE_CURE_INVOICE_PVT;
2717: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2718: x_msg_count := l_msg_count ;
2719: x_msg_data := l_msg_data ;

Line 2717: x_return_status := Fnd_Api.G_RET_STS_ERROR;

2713:
2714: EXCEPTION
2715: WHEN Fnd_Api.G_EXC_ERROR THEN
2716: ROLLBACK TO UPDATE_CURE_INVOICE_PVT;
2717: x_return_status := Fnd_Api.G_RET_STS_ERROR;
2718: x_msg_count := l_msg_count ;
2719: x_msg_data := l_msg_data ;
2720: Fnd_Msg_Pub.count_and_get(
2721: p_count => x_msg_count

Line 2723: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN

2719: x_msg_data := l_msg_data ;
2720: Fnd_Msg_Pub.count_and_get(
2721: p_count => x_msg_count
2722: ,p_data => x_msg_data);
2723: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2724: ROLLBACK TO UPDATE_CURE_INVOICE_PVT;
2725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2726: x_msg_count := l_msg_count ;
2727: x_msg_data := l_msg_data ;

Line 2725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2721: p_count => x_msg_count
2722: ,p_data => x_msg_data);
2723: WHEN Fnd_Api.G_EXC_UNEXPECTED_ERROR THEN
2724: ROLLBACK TO UPDATE_CURE_INVOICE_PVT;
2725: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2726: x_msg_count := l_msg_count ;
2727: x_msg_data := l_msg_data ;
2728: Fnd_Msg_Pub.count_and_get(
2729: p_count => x_msg_count

Line 2733: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

2729: p_count => x_msg_count
2730: ,p_data => x_msg_data);
2731: WHEN OTHERS THEN
2732: ROLLBACK TO UPDATE_CURE_INVOICE_PVT;
2733: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
2734: x_msg_count := l_msg_count ;
2735: x_msg_data := l_msg_data ;
2736: Fnd_Msg_Pub.ADD_EXC_MSG('OKL_CURE_RECON_PVT','UPDATE_CURE_INVOICE');
2737: Fnd_Msg_Pub.count_and_get(