DBA Data[Home] [Help]

APPS.OZF_CLAIM_SETTLEMENT_PVT dependencies on FND_API

Line 43: x_return_status := FND_API.g_ret_sts_success;

39: OZF_Utility_PVT.debug_message(l_full_name||': start');
40: END IF;
41:
42: -------------------- initialize -----------------------
43: x_return_status := FND_API.g_ret_sts_success;
44:
45: ------------------------ start -------------------------
46: BEGIN
47: OZF_AR_SETTLEMENT_PVT.Start_Settlement(

Line 58: RAISE FND_API.g_exc_unexpected_error;

54: WHEN OTHERS THEN
55: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
56: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
57: FND_MSG_PUB.Add;
58: RAISE FND_API.g_exc_unexpected_error;
59: END;
60:
61: IF OZF_DEBUG_HIGH_ON THEN
62: OZF_Utility_PVT.debug_message(l_full_name||': end');

Line 65: WHEN FND_API.g_exc_unexpected_error THEN

61: IF OZF_DEBUG_HIGH_ON THEN
62: OZF_Utility_PVT.debug_message(l_full_name||': end');
63: END IF;
64: EXCEPTION
65: WHEN FND_API.g_exc_unexpected_error THEN
66: x_return_status := FND_API.g_ret_sts_unexp_error ;
67:
68: WHEN OTHERS THEN
69: x_return_status := FND_API.g_ret_sts_unexp_error ;

Line 66: x_return_status := FND_API.g_ret_sts_unexp_error ;

62: OZF_Utility_PVT.debug_message(l_full_name||': end');
63: END IF;
64: EXCEPTION
65: WHEN FND_API.g_exc_unexpected_error THEN
66: x_return_status := FND_API.g_ret_sts_unexp_error ;
67:
68: WHEN OTHERS THEN
69: x_return_status := FND_API.g_ret_sts_unexp_error ;
70: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 69: x_return_status := FND_API.g_ret_sts_unexp_error ;

65: WHEN FND_API.g_exc_unexpected_error THEN
66: x_return_status := FND_API.g_ret_sts_unexp_error ;
67:
68: WHEN OTHERS THEN
69: x_return_status := FND_API.g_ret_sts_unexp_error ;
70: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
71: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
72: END IF;
73:

Line 104: x_return_status := FND_API.g_ret_sts_success;

100: GROUP BY trx_number;
101:
102: BEGIN
103: -- Initialize API return status to sucess
104: x_return_status := FND_API.g_ret_sts_success;
105:
106: -- Check Claim Line number
107: OPEN csr_invoice_balance(p_customer_trx_id);
108: FETCH csr_invoice_balance INTO l_invoice_balance_due,l_trx_number;

Line 117: RAISE FND_API.G_EXC_ERROR;

113: FND_MESSAGE.set_name('OZF', 'OZF_SETL_INVOICE_BAL_ERR');
114: FND_MESSAGE.set_token('TRX_NUMBER', l_trx_number);
115: FND_MSG_PUB.add;
116: END IF;
117: RAISE FND_API.G_EXC_ERROR;
118: END IF;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN

Line 121: WHEN FND_API.G_EXC_ERROR THEN

117: RAISE FND_API.G_EXC_ERROR;
118: END IF;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN
122: x_return_status := FND_API.g_ret_sts_error;
123: WHEN OTHERS THEN
124: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
125: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CHK_TRANS_BAL_UERR');

Line 122: x_return_status := FND_API.g_ret_sts_error;

118: END IF;
119:
120: EXCEPTION
121: WHEN FND_API.G_EXC_ERROR THEN
122: x_return_status := FND_API.g_ret_sts_error;
123: WHEN OTHERS THEN
124: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
125: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CHK_TRANS_BAL_UERR');
126: FND_MSG_PUB.add;

Line 128: x_return_status := FND_API.g_ret_sts_unexp_error;

124: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
125: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CHK_TRANS_BAL_UERR');
126: FND_MSG_PUB.add;
127: END IF;
128: x_return_status := FND_API.g_ret_sts_unexp_error;
129: END Check_Transaction_Balance;
130:
131:
132:

Line 159: x_return_status := FND_API.g_ret_sts_success;

155: l_api_name CONSTANT VARCHAR2(30) := 'Reopen_Claim_for_Completion';
156:
157: BEGIN
158: -- Initialize API return status to sucess
159: x_return_status := FND_API.g_ret_sts_success;
160:
161: x_claim_rec := p_claim_rec;
162:
163: -- move amount_settled back to amount_remaining, and calculated acctd_amount_remaining also.

Line 181: IF l_return_status = FND_API.g_ret_sts_error THEN

177: X_RETURN_STATUS => l_return_status,
178: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
179: X_RATE => x_claim_rec.exchange_rate
180: );
181: IF l_return_status = FND_API.g_ret_sts_error THEN
182: RAISE FND_API.g_exc_error;
183: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
184: RAISE FND_API.g_exc_unexpected_error;
185: END IF;

Line 182: RAISE FND_API.g_exc_error;

178: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
179: X_RATE => x_claim_rec.exchange_rate
180: );
181: IF l_return_status = FND_API.g_ret_sts_error THEN
182: RAISE FND_API.g_exc_error;
183: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
184: RAISE FND_API.g_exc_unexpected_error;
185: END IF;
186:

Line 183: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

179: X_RATE => x_claim_rec.exchange_rate
180: );
181: IF l_return_status = FND_API.g_ret_sts_error THEN
182: RAISE FND_API.g_exc_error;
183: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
184: RAISE FND_API.g_exc_unexpected_error;
185: END IF;
186:
187: x_claim_rec.settled_by := NULL;

Line 184: RAISE FND_API.g_exc_unexpected_error;

180: );
181: IF l_return_status = FND_API.g_ret_sts_error THEN
182: RAISE FND_API.g_exc_error;
183: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
184: RAISE FND_API.g_exc_unexpected_error;
185: END IF;
186:
187: x_claim_rec.settled_by := NULL;
188: x_claim_rec.settled_date := NULL;

Line 196: WHEN FND_API.G_EXC_ERROR THEN

192:
193: x_claim_rec.payment_status := NULL;
194:
195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200: WHEN OTHERS THEN

Line 197: x_return_status := FND_API.G_RET_STS_ERROR;

193: x_claim_rec.payment_status := NULL;
194:
195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200: WHEN OTHERS THEN
201: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

194:
195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200: WHEN OTHERS THEN
201: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
202: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

195: EXCEPTION
196: WHEN FND_API.G_EXC_ERROR THEN
197: x_return_status := FND_API.G_RET_STS_ERROR;
198: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
199: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
200: WHEN OTHERS THEN
201: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
202: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
203: END IF;

Line 204: x_return_status := FND_API.g_ret_sts_unexp_error;

200: WHEN OTHERS THEN
201: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
202: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
203: END IF;
204: x_return_status := FND_API.g_ret_sts_unexp_error;
205:
206: END Reopen_Claim_for_Completion;
207:
208: ---------------------------------------------------------------------

Line 280: x_return_status := FND_API.g_ret_sts_success;

276: OZF_Utility_PVT.debug_message(l_full_name||' : start');
277: END IF;
278:
279: -- Initialize API return status to sucess
280: x_return_status := FND_API.g_ret_sts_success;
281:
282: OPEN cust_info_csr(p_claim_id);
283: FETCH cust_info_csr INTO l_payment_method
284: , l_cust_account_id

Line 316: p_init_msg_list => FND_API.G_FALSE,

312: l_trd_prfl.payment_method := l_payment_method;
313:
314: OZF_Trade_Profile_PVT.Create_Trade_Profile(
315: p_api_version_number => l_api_version,
316: p_init_msg_list => FND_API.G_FALSE,
317: p_commit => FND_API.G_FALSE,
318: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
319: x_return_status => l_return_status,
320: x_msg_count => l_msg_count,

Line 317: p_commit => FND_API.G_FALSE,

313:
314: OZF_Trade_Profile_PVT.Create_Trade_Profile(
315: p_api_version_number => l_api_version,
316: p_init_msg_list => FND_API.G_FALSE,
317: p_commit => FND_API.G_FALSE,
318: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
319: x_return_status => l_return_status,
320: x_msg_count => l_msg_count,
321: x_msg_data => l_msg_data,

Line 318: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

314: OZF_Trade_Profile_PVT.Create_Trade_Profile(
315: p_api_version_number => l_api_version,
316: p_init_msg_list => FND_API.G_FALSE,
317: p_commit => FND_API.G_FALSE,
318: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
319: x_return_status => l_return_status,
320: x_msg_count => l_msg_count,
321: x_msg_data => l_msg_data,
322: p_trade_profile_rec => l_trd_prfl,

Line 325: IF l_return_status = FND_API.g_ret_sts_error THEN

321: x_msg_data => l_msg_data,
322: p_trade_profile_rec => l_trd_prfl,
323: x_trade_profile_id => l_trade_profile_id
324: );
325: IF l_return_status = FND_API.g_ret_sts_error THEN
326: RAISE FND_API.g_exc_error;
327: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
328: RAISE FND_API.g_exc_unexpected_error;
329: END IF;

Line 326: RAISE FND_API.g_exc_error;

322: p_trade_profile_rec => l_trd_prfl,
323: x_trade_profile_id => l_trade_profile_id
324: );
325: IF l_return_status = FND_API.g_ret_sts_error THEN
326: RAISE FND_API.g_exc_error;
327: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
328: RAISE FND_API.g_exc_unexpected_error;
329: END IF;
330: END IF;

Line 327: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

323: x_trade_profile_id => l_trade_profile_id
324: );
325: IF l_return_status = FND_API.g_ret_sts_error THEN
326: RAISE FND_API.g_exc_error;
327: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
328: RAISE FND_API.g_exc_unexpected_error;
329: END IF;
330: END IF;
331: END IF;

Line 328: RAISE FND_API.g_exc_unexpected_error;

324: );
325: IF l_return_status = FND_API.g_ret_sts_error THEN
326: RAISE FND_API.g_exc_error;
327: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
328: RAISE FND_API.g_exc_unexpected_error;
329: END IF;
330: END IF;
331: END IF;
332:

Line 338: WHEN FND_API.G_EXC_ERROR THEN

334: OZF_Utility_PVT.debug_message(l_full_name||' : end');
335: END IF;
336:
337: EXCEPTION
338: WHEN FND_API.G_EXC_ERROR THEN
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: WHEN OTHERS THEN

Line 339: x_return_status := FND_API.G_RET_STS_ERROR;

335: END IF;
336:
337: EXCEPTION
338: WHEN FND_API.G_EXC_ERROR THEN
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: WHEN OTHERS THEN
343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

336:
337: EXCEPTION
338: WHEN FND_API.G_EXC_ERROR THEN
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: WHEN OTHERS THEN
343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
344: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

337: EXCEPTION
338: WHEN FND_API.G_EXC_ERROR THEN
339: x_return_status := FND_API.G_RET_STS_ERROR;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: WHEN OTHERS THEN
343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
344: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
345: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

339: x_return_status := FND_API.G_RET_STS_ERROR;
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: WHEN OTHERS THEN
343: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
344: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
345: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
346: END IF;
347:

Line 393: x_return_status := FND_API.g_ret_sts_success;

389: OZF_Utility_PVT.debug_message(l_full_name||' : start');
390: END IF;
391:
392: -- Initialize API return status to sucess
393: x_return_status := FND_API.g_ret_sts_success;
394:
395: OPEN csr_claim_line_asso(p_claim_id);
396: LOOP
397: FETCH csr_claim_line_asso INTO l_claim_line_asso(l_counter);

Line 415: ,p_init_msg_list => FND_API.g_false

411: l_claim_line_rec.earnings_associated_flag := 'F';
412:
413: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
414: p_api_version => l_api_version
415: ,p_init_msg_list => FND_API.g_false
416: ,p_commit => FND_API.g_false
417: ,p_validation_level => FND_API.g_valid_level_full
418: ,x_return_status => l_return_status
419: ,x_msg_count => x_msg_count --ninarasi fix for bug 14333514

Line 416: ,p_commit => FND_API.g_false

412:
413: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
414: p_api_version => l_api_version
415: ,p_init_msg_list => FND_API.g_false
416: ,p_commit => FND_API.g_false
417: ,p_validation_level => FND_API.g_valid_level_full
418: ,x_return_status => l_return_status
419: ,x_msg_count => x_msg_count --ninarasi fix for bug 14333514
420: ,x_msg_data => x_msg_data

Line 417: ,p_validation_level => FND_API.g_valid_level_full

413: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
414: p_api_version => l_api_version
415: ,p_init_msg_list => FND_API.g_false
416: ,p_commit => FND_API.g_false
417: ,p_validation_level => FND_API.g_valid_level_full
418: ,x_return_status => l_return_status
419: ,x_msg_count => x_msg_count --ninarasi fix for bug 14333514
420: ,x_msg_data => x_msg_data
421: ,p_claim_line_rec => l_claim_line_rec

Line 424: IF l_return_status = FND_API.g_ret_sts_error THEN

420: ,x_msg_data => x_msg_data
421: ,p_claim_line_rec => l_claim_line_rec
422: ,x_object_version => l_line_obj_ver
423: );
424: IF l_return_status = FND_API.g_ret_sts_error THEN
425: RAISE FND_API.g_exc_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
427: RAISE FND_API.g_exc_unexpected_error;
428: END IF;

Line 425: RAISE FND_API.g_exc_error;

421: ,p_claim_line_rec => l_claim_line_rec
422: ,x_object_version => l_line_obj_ver
423: );
424: IF l_return_status = FND_API.g_ret_sts_error THEN
425: RAISE FND_API.g_exc_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
427: RAISE FND_API.g_exc_unexpected_error;
428: END IF;
429: END LOOP;

Line 426: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

422: ,x_object_version => l_line_obj_ver
423: );
424: IF l_return_status = FND_API.g_ret_sts_error THEN
425: RAISE FND_API.g_exc_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
427: RAISE FND_API.g_exc_unexpected_error;
428: END IF;
429: END LOOP;
430: END IF;

Line 427: RAISE FND_API.g_exc_unexpected_error;

423: );
424: IF l_return_status = FND_API.g_ret_sts_error THEN
425: RAISE FND_API.g_exc_error;
426: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
427: RAISE FND_API.g_exc_unexpected_error;
428: END IF;
429: END LOOP;
430: END IF;
431:

Line 437: WHEN FND_API.G_EXC_ERROR THEN

433: OZF_Utility_PVT.debug_message(l_full_name||' : end');
434: END IF;
435:
436: EXCEPTION
437: WHEN FND_API.G_EXC_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_ERROR;
439: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: WHEN OTHERS THEN

Line 438: x_return_status := FND_API.G_RET_STS_ERROR;

434: END IF;
435:
436: EXCEPTION
437: WHEN FND_API.G_EXC_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_ERROR;
439: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: WHEN OTHERS THEN
442: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 439: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

435:
436: EXCEPTION
437: WHEN FND_API.G_EXC_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_ERROR;
439: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: WHEN OTHERS THEN
442: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
443: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

436: EXCEPTION
437: WHEN FND_API.G_EXC_ERROR THEN
438: x_return_status := FND_API.G_RET_STS_ERROR;
439: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
440: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
441: WHEN OTHERS THEN
442: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
443: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
444: END IF;

Line 445: x_return_status := FND_API.g_ret_sts_unexp_error;

441: WHEN OTHERS THEN
442: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
443: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
444: END IF;
445: x_return_status := FND_API.g_ret_sts_unexp_error;
446:
447: END Remove_Utilization;
448:
449:

Line 478: x_return_status := FND_API.g_ret_sts_success;

474: OZF_Utility_PVT.debug_message(l_full_name||' : start');
475: END IF;
476:
477: -- Initialize API return status to sucess
478: x_return_status := FND_API.g_ret_sts_success;
479:
480: Remove_Utilization (
481: x_return_status => l_return_status
482: ,x_msg_count => x_msg_count

Line 487: IF l_return_status = FND_API.g_ret_sts_error THEN

483: ,x_msg_data => x_msg_data
484: ,p_claim_id => p_claim_id
485:
486: );
487: IF l_return_status = FND_API.g_ret_sts_error THEN
488: RAISE FND_API.g_exc_error;
489: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
490: RAISE FND_API.g_exc_unexpected_error;
491: END IF;

Line 488: RAISE FND_API.g_exc_error;

484: ,p_claim_id => p_claim_id
485:
486: );
487: IF l_return_status = FND_API.g_ret_sts_error THEN
488: RAISE FND_API.g_exc_error;
489: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
490: RAISE FND_API.g_exc_unexpected_error;
491: END IF;
492:

Line 489: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

485:
486: );
487: IF l_return_status = FND_API.g_ret_sts_error THEN
488: RAISE FND_API.g_exc_error;
489: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
490: RAISE FND_API.g_exc_unexpected_error;
491: END IF;
492:
493: IF OZF_DEBUG_HIGH_ON THEN

Line 490: RAISE FND_API.g_exc_unexpected_error;

486: );
487: IF l_return_status = FND_API.g_ret_sts_error THEN
488: RAISE FND_API.g_exc_error;
489: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
490: RAISE FND_API.g_exc_unexpected_error;
491: END IF;
492:
493: IF OZF_DEBUG_HIGH_ON THEN
494: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 497: WHEN FND_API.G_EXC_ERROR THEN

493: IF OZF_DEBUG_HIGH_ON THEN
494: OZF_Utility_PVT.debug_message(l_full_name||' : end');
495: END IF;
496: EXCEPTION
497: WHEN FND_API.G_EXC_ERROR THEN
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
501: WHEN OTHERS THEN

Line 498: x_return_status := FND_API.G_RET_STS_ERROR;

494: OZF_Utility_PVT.debug_message(l_full_name||' : end');
495: END IF;
496: EXCEPTION
497: WHEN FND_API.G_EXC_ERROR THEN
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
501: WHEN OTHERS THEN
502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 499: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

495: END IF;
496: EXCEPTION
497: WHEN FND_API.G_EXC_ERROR THEN
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
501: WHEN OTHERS THEN
502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
503: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

496: EXCEPTION
497: WHEN FND_API.G_EXC_ERROR THEN
498: x_return_status := FND_API.G_RET_STS_ERROR;
499: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
500: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
501: WHEN OTHERS THEN
502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
503: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
504: END IF;

Line 505: x_return_status := FND_API.g_ret_sts_unexp_error;

501: WHEN OTHERS THEN
502: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
503: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
504: END IF;
505: x_return_status := FND_API.g_ret_sts_unexp_error;
506:
507: END Duplicate_Claim_for_Completion;
508:
509:

Line 538: x_return_status := FND_API.g_ret_sts_success;

534: OZF_Utility_PVT.debug_message(l_full_name||' : start');
535: END IF;
536:
537: -- Initialize API return status to sucess
538: x_return_status := FND_API.g_ret_sts_success;
539:
540: Remove_Utilization (
541: x_return_status => l_return_status
542: ,x_msg_count => x_msg_count

Line 547: IF l_return_status = FND_API.g_ret_sts_error THEN

543: ,x_msg_data => x_msg_data
544: ,p_claim_id => p_claim_id
545:
546: );
547: IF l_return_status = FND_API.g_ret_sts_error THEN
548: RAISE FND_API.g_exc_error;
549: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
550: RAISE FND_API.g_exc_unexpected_error;
551: END IF;

Line 548: RAISE FND_API.g_exc_error;

544: ,p_claim_id => p_claim_id
545:
546: );
547: IF l_return_status = FND_API.g_ret_sts_error THEN
548: RAISE FND_API.g_exc_error;
549: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
550: RAISE FND_API.g_exc_unexpected_error;
551: END IF;
552:

Line 549: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

545:
546: );
547: IF l_return_status = FND_API.g_ret_sts_error THEN
548: RAISE FND_API.g_exc_error;
549: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
550: RAISE FND_API.g_exc_unexpected_error;
551: END IF;
552:
553: IF OZF_DEBUG_HIGH_ON THEN

Line 550: RAISE FND_API.g_exc_unexpected_error;

546: );
547: IF l_return_status = FND_API.g_ret_sts_error THEN
548: RAISE FND_API.g_exc_error;
549: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
550: RAISE FND_API.g_exc_unexpected_error;
551: END IF;
552:
553: IF OZF_DEBUG_HIGH_ON THEN
554: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 557: WHEN FND_API.G_EXC_ERROR THEN

553: IF OZF_DEBUG_HIGH_ON THEN
554: OZF_Utility_PVT.debug_message(l_full_name||' : end');
555: END IF;
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: WHEN OTHERS THEN

Line 558: x_return_status := FND_API.G_RET_STS_ERROR;

554: OZF_Utility_PVT.debug_message(l_full_name||' : end');
555: END IF;
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: WHEN OTHERS THEN
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

555: END IF;
556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: WHEN OTHERS THEN
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
563: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

556: EXCEPTION
557: WHEN FND_API.G_EXC_ERROR THEN
558: x_return_status := FND_API.G_RET_STS_ERROR;
559: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
560: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
561: WHEN OTHERS THEN
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
563: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
564: END IF;

Line 565: x_return_status := FND_API.g_ret_sts_unexp_error;

561: WHEN OTHERS THEN
562: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
563: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
564: END IF;
565: x_return_status := FND_API.g_ret_sts_unexp_error;
566:
567: END Cancel_Claim_for_Completion;
568:
569:

Line 607: x_return_status := FND_API.g_ret_sts_success;

603: OZF_Utility_PVT.debug_message(l_full_name||' : start');
604: END IF;
605:
606: -- Initialize API return status to sucess
607: x_return_status := FND_API.g_ret_sts_success;
608: /*
609: OPEN csr_claim_class(p_claim_id);
610: FETCH csr_claim_class INTO l_claim_class;
611: CLOSE csr_claim_class;

Line 627: RAISE FND_API.g_exc_unexpected_error;

623: WHEN OTHERS THEN
624: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
625: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
626: FND_MSG_PUB.Add;
627: RAISE FND_API.g_exc_unexpected_error;
628: END;
629: END IF;
630: */
631: IF OZF_DEBUG_HIGH_ON THEN

Line 635: WHEN FND_API.G_EXC_ERROR THEN

631: IF OZF_DEBUG_HIGH_ON THEN
632: OZF_Utility_PVT.debug_message(l_full_name||' : end');
633: END IF;
634: EXCEPTION
635: WHEN FND_API.G_EXC_ERROR THEN
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: WHEN OTHERS THEN

Line 636: x_return_status := FND_API.G_RET_STS_ERROR;

632: OZF_Utility_PVT.debug_message(l_full_name||' : end');
633: END IF;
634: EXCEPTION
635: WHEN FND_API.G_EXC_ERROR THEN
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: WHEN OTHERS THEN
640: IF OZF_DEBUG_LOW_ON THEN

Line 637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

633: END IF;
634: EXCEPTION
635: WHEN FND_API.G_EXC_ERROR THEN
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: WHEN OTHERS THEN
640: IF OZF_DEBUG_LOW_ON THEN
641: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

634: EXCEPTION
635: WHEN FND_API.G_EXC_ERROR THEN
636: x_return_status := FND_API.G_RET_STS_ERROR;
637: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
638: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
639: WHEN OTHERS THEN
640: IF OZF_DEBUG_LOW_ON THEN
641: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
642: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');

Line 645: x_return_status := FND_API.g_ret_sts_unexp_error;

641: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
642: FND_MESSAGE.Set_Token('TEXT',l_full_name||' : Error');
643: FND_MSG_PUB.Add;
644: END IF;
645: x_return_status := FND_API.g_ret_sts_unexp_error;
646:
647: END Cancel_Claim_for_Settlement;
648:
649:

Line 682: x_return_status := FND_API.g_ret_sts_success;

678: OZF_Utility_PVT.debug_message(l_full_name||' : start');
679: END IF;
680:
681: -- Initialize API return status to sucess
682: x_return_status := FND_API.g_ret_sts_success;
683: x_claim_rec := p_claim_rec;
684:
685: -- move amount_settled back to amount_remaining, and calculated acctd_amount_remaining also.
686: x_claim_rec.amount_settled := 0;

Line 703: IF l_return_status = FND_API.g_ret_sts_error THEN

699: X_RETURN_STATUS => l_return_status,
700: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
701: X_RATE => x_claim_rec.exchange_rate
702: );
703: IF l_return_status = FND_API.g_ret_sts_error THEN
704: RAISE FND_API.g_exc_error;
705: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
706: RAISE FND_API.g_exc_unexpected_error;
707: END IF;

Line 704: RAISE FND_API.g_exc_error;

700: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
701: X_RATE => x_claim_rec.exchange_rate
702: );
703: IF l_return_status = FND_API.g_ret_sts_error THEN
704: RAISE FND_API.g_exc_error;
705: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
706: RAISE FND_API.g_exc_unexpected_error;
707: END IF;
708:

Line 705: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

701: X_RATE => x_claim_rec.exchange_rate
702: );
703: IF l_return_status = FND_API.g_ret_sts_error THEN
704: RAISE FND_API.g_exc_error;
705: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
706: RAISE FND_API.g_exc_unexpected_error;
707: END IF;
708:
709: IF OZF_DEBUG_HIGH_ON THEN

Line 706: RAISE FND_API.g_exc_unexpected_error;

702: );
703: IF l_return_status = FND_API.g_ret_sts_error THEN
704: RAISE FND_API.g_exc_error;
705: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
706: RAISE FND_API.g_exc_unexpected_error;
707: END IF;
708:
709: IF OZF_DEBUG_HIGH_ON THEN
710: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 713: WHEN FND_API.G_EXC_ERROR THEN

709: IF OZF_DEBUG_HIGH_ON THEN
710: OZF_Utility_PVT.debug_message(l_full_name||' : end');
711: END IF;
712: EXCEPTION
713: WHEN FND_API.G_EXC_ERROR THEN
714: x_return_status := FND_API.G_RET_STS_ERROR;
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: WHEN OTHERS THEN

Line 714: x_return_status := FND_API.G_RET_STS_ERROR;

710: OZF_Utility_PVT.debug_message(l_full_name||' : end');
711: END IF;
712: EXCEPTION
713: WHEN FND_API.G_EXC_ERROR THEN
714: x_return_status := FND_API.G_RET_STS_ERROR;
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: WHEN OTHERS THEN
718: x_return_status := FND_API.g_ret_sts_unexp_error;

Line 715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

711: END IF;
712: EXCEPTION
713: WHEN FND_API.G_EXC_ERROR THEN
714: x_return_status := FND_API.G_RET_STS_ERROR;
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: WHEN OTHERS THEN
718: x_return_status := FND_API.g_ret_sts_unexp_error;
719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

712: EXCEPTION
713: WHEN FND_API.G_EXC_ERROR THEN
714: x_return_status := FND_API.G_RET_STS_ERROR;
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: WHEN OTHERS THEN
718: x_return_status := FND_API.g_ret_sts_unexp_error;
719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
720: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 718: x_return_status := FND_API.g_ret_sts_unexp_error;

714: x_return_status := FND_API.G_RET_STS_ERROR;
715: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
717: WHEN OTHERS THEN
718: x_return_status := FND_API.g_ret_sts_unexp_error;
719: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
720: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
721: END IF;
722:

Line 763: x_return_status := FND_API.g_ret_sts_success;

759: OZF_Utility_PVT.debug_message(l_full_name||' : start');
760: END IF;
761:
762: -- Initialize API return status to sucess
763: x_return_status := FND_API.g_ret_sts_success;
764: /*
765: OPEN csr_claim_class(p_claim_id);
766: FETCH csr_claim_class INTO l_claim_class;
767: CLOSE csr_claim_class;

Line 783: RAISE FND_API.g_exc_unexpected_error;

779: WHEN OTHERS THEN
780: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
781: FND_MESSAGE.Set_Token('TEXT',sqlerrm);
782: FND_MSG_PUB.Add;
783: RAISE FND_API.g_exc_unexpected_error;
784: END;
785: END IF;
786: */
787: IF OZF_DEBUG_HIGH_ON THEN

Line 791: WHEN FND_API.G_EXC_ERROR THEN

787: IF OZF_DEBUG_HIGH_ON THEN
788: OZF_Utility_PVT.debug_message(l_full_name||' : end');
789: END IF;
790: EXCEPTION
791: WHEN FND_API.G_EXC_ERROR THEN
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: WHEN OTHERS THEN

Line 792: x_return_status := FND_API.G_RET_STS_ERROR;

788: OZF_Utility_PVT.debug_message(l_full_name||' : end');
789: END IF;
790: EXCEPTION
791: WHEN FND_API.G_EXC_ERROR THEN
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: WHEN OTHERS THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

789: END IF;
790: EXCEPTION
791: WHEN FND_API.G_EXC_ERROR THEN
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: WHEN OTHERS THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
797: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

790: EXCEPTION
791: WHEN FND_API.G_EXC_ERROR THEN
792: x_return_status := FND_API.G_RET_STS_ERROR;
793: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
794: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
795: WHEN OTHERS THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
797: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
798: END IF;

Line 799: x_return_status := FND_API.g_ret_sts_unexp_error;

795: WHEN OTHERS THEN
796: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
797: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
798: END IF;
799: x_return_status := FND_API.g_ret_sts_unexp_error;
800:
801: END Reject_Claim_for_Settlement;
802:
803:

Line 830: l_return_status VARCHAR2(1) := FND_API.g_ret_sts_success;

826: IS
827: l_api_version CONSTANT NUMBER := 1.0;
828: l_api_name CONSTANT VARCHAR2(30) := 'Complete_Claim_for_Completion';
829: l_full_name CONSTANT VARCHAR2(60) := G_PKG_NAME || '.' || l_api_name;
830: l_return_status VARCHAR2(1) := FND_API.g_ret_sts_success;
831:
832: BEGIN
833: IF OZF_DEBUG_HIGH_ON THEN
834: OZF_Utility_PVT.debug_message(l_full_name||' : start');

Line 838: x_return_status := FND_API.g_ret_sts_success;

834: OZF_Utility_PVT.debug_message(l_full_name||' : start');
835: END IF;
836:
837: -- Initialize API return status to sucess
838: x_return_status := FND_API.g_ret_sts_success;
839:
840: x_claim_rec := p_claim_rec;
841:
842: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim_Validation(

Line 844: ,p_init_msg_list => FND_API.g_false

840: x_claim_rec := p_claim_rec;
841:
842: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim_Validation(
843: p_api_version => l_api_version
844: ,p_init_msg_list => FND_API.g_false
845: ,p_validation_level => FND_API.g_valid_level_full
846: ,x_return_status => l_return_status
847: ,x_msg_data => x_msg_data
848: ,x_msg_count => x_msg_count

Line 845: ,p_validation_level => FND_API.g_valid_level_full

841:
842: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim_Validation(
843: p_api_version => l_api_version
844: ,p_init_msg_list => FND_API.g_false
845: ,p_validation_level => FND_API.g_valid_level_full
846: ,x_return_status => l_return_status
847: ,x_msg_data => x_msg_data
848: ,x_msg_count => x_msg_count
849: ,p_claim_rec => p_claim_rec

Line 852: IF l_return_status = FND_API.g_ret_sts_error THEN

848: ,x_msg_count => x_msg_count
849: ,p_claim_rec => p_claim_rec
850: ,x_claim_rec => x_claim_rec
851: );
852: IF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
855: RAISE FND_API.g_exc_unexpected_error;
856: END IF;

Line 853: RAISE FND_API.g_exc_error;

849: ,p_claim_rec => p_claim_rec
850: ,x_claim_rec => x_claim_rec
851: );
852: IF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
855: RAISE FND_API.g_exc_unexpected_error;
856: END IF;
857:

Line 854: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

850: ,x_claim_rec => x_claim_rec
851: );
852: IF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
855: RAISE FND_API.g_exc_unexpected_error;
856: END IF;
857:
858: IF OZF_DEBUG_HIGH_ON THEN

Line 855: RAISE FND_API.g_exc_unexpected_error;

851: );
852: IF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
855: RAISE FND_API.g_exc_unexpected_error;
856: END IF;
857:
858: IF OZF_DEBUG_HIGH_ON THEN
859: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 862: WHEN FND_API.G_EXC_ERROR THEN

858: IF OZF_DEBUG_HIGH_ON THEN
859: OZF_Utility_PVT.debug_message(l_full_name||' : end');
860: END IF;
861: EXCEPTION
862: WHEN FND_API.G_EXC_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_ERROR;
864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866: WHEN OTHERS THEN

Line 863: x_return_status := FND_API.G_RET_STS_ERROR;

859: OZF_Utility_PVT.debug_message(l_full_name||' : end');
860: END IF;
861: EXCEPTION
862: WHEN FND_API.G_EXC_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_ERROR;
864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866: WHEN OTHERS THEN
867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

860: END IF;
861: EXCEPTION
862: WHEN FND_API.G_EXC_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_ERROR;
864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866: WHEN OTHERS THEN
867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
868: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

861: EXCEPTION
862: WHEN FND_API.G_EXC_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_ERROR;
864: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
865: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
866: WHEN OTHERS THEN
867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
868: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
869: END IF;

Line 870: x_return_status := FND_API.g_ret_sts_unexp_error;

866: WHEN OTHERS THEN
867: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
868: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
869: END IF;
870: x_return_status := FND_API.g_ret_sts_unexp_error;
871:
872: END Complete_Claim_for_Completion;
873:
874:

Line 902: x_return_status := FND_API.g_ret_sts_success;

898: IF OZF_DEBUG_HIGH_ON THEN
899: OZF_Utility_PVT.debug_message(l_full_name||' : start');
900: END IF;
901: -- Initialize API return status to sucess
902: x_return_status := FND_API.g_ret_sts_success;
903:
904: -- create trade profile if need
905: Check_Create_Trd_Prfl (
906: p_claim_id => p_claim_id

Line 911: IF l_return_status = FND_API.g_ret_sts_error THEN

907: ,x_return_status => l_return_status
908: ,x_msg_count => x_msg_count
909: ,x_msg_data => x_msg_data
910: );
911: IF l_return_status = FND_API.g_ret_sts_error THEN
912: RAISE FND_API.g_exc_error;
913: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
914: RAISE FND_API.g_exc_unexpected_error;
915: END IF;

Line 912: RAISE FND_API.g_exc_error;

908: ,x_msg_count => x_msg_count
909: ,x_msg_data => x_msg_data
910: );
911: IF l_return_status = FND_API.g_ret_sts_error THEN
912: RAISE FND_API.g_exc_error;
913: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
914: RAISE FND_API.g_exc_unexpected_error;
915: END IF;
916:

Line 913: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

909: ,x_msg_data => x_msg_data
910: );
911: IF l_return_status = FND_API.g_ret_sts_error THEN
912: RAISE FND_API.g_exc_error;
913: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
914: RAISE FND_API.g_exc_unexpected_error;
915: END IF;
916:
917: IF OZF_DEBUG_HIGH_ON THEN

Line 914: RAISE FND_API.g_exc_unexpected_error;

910: );
911: IF l_return_status = FND_API.g_ret_sts_error THEN
912: RAISE FND_API.g_exc_error;
913: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
914: RAISE FND_API.g_exc_unexpected_error;
915: END IF;
916:
917: IF OZF_DEBUG_HIGH_ON THEN
918: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 922: WHEN FND_API.G_EXC_ERROR THEN

918: OZF_Utility_PVT.debug_message(l_full_name||' : end');
919: END IF;
920:
921: EXCEPTION
922: WHEN FND_API.G_EXC_ERROR THEN
923: x_return_status := FND_API.G_RET_STS_ERROR;
924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
926: WHEN OTHERS THEN

Line 923: x_return_status := FND_API.G_RET_STS_ERROR;

919: END IF;
920:
921: EXCEPTION
922: WHEN FND_API.G_EXC_ERROR THEN
923: x_return_status := FND_API.G_RET_STS_ERROR;
924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
926: WHEN OTHERS THEN
927: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

920:
921: EXCEPTION
922: WHEN FND_API.G_EXC_ERROR THEN
923: x_return_status := FND_API.G_RET_STS_ERROR;
924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
926: WHEN OTHERS THEN
927: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
928: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

921: EXCEPTION
922: WHEN FND_API.G_EXC_ERROR THEN
923: x_return_status := FND_API.G_RET_STS_ERROR;
924: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
925: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
926: WHEN OTHERS THEN
927: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
928: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
929: END IF;

Line 930: x_return_status := FND_API.g_ret_sts_unexp_error;

926: WHEN OTHERS THEN
927: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
928: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
929: END IF;
930: x_return_status := FND_API.g_ret_sts_unexp_error;
931:
932: END Complete_Claim_for_Settlement;
933:
934:

Line 991: x_return_status := FND_API.g_ret_sts_success;

987: IF OZF_DEBUG_HIGH_ON THEN
988: OZF_Utility_PVT.debug_message(l_full_name||' : start');
989: END IF;
990: -- Initialize API return status to sucess
991: x_return_status := FND_API.g_ret_sts_success;
992:
993: x_claim_rec := p_claim_rec;
994:
995: OPEN csr_claim_perf_appr_req(p_claim_rec.custom_setup_id);

Line 1005: RAISE FND_API.g_exc_error;

1001: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1002: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_PERF_APPR_REQ');
1003: FND_MSG_PUB.add;
1004: END IF;
1005: RAISE FND_API.g_exc_error;
1006: END IF;
1007:
1008: -- status_code/user_status_id : update claim_status to 'PENDING_APPROVAL'
1009: OPEN csr_user_status_id('PENDING_APPROVAL');

Line 1036: IF l_return_status = FND_API.g_ret_sts_error THEN

1032: X_RETURN_STATUS => l_return_status,
1033: X_ACC_AMOUNT => x_claim_rec.acctd_amount_settled,
1034: X_RATE => x_claim_rec.exchange_rate
1035: );
1036: IF l_return_status = FND_API.g_ret_sts_error THEN
1037: RAISE FND_API.g_exc_error;
1038: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1039: RAISE FND_API.g_exc_unexpected_error;
1040: END IF;

Line 1037: RAISE FND_API.g_exc_error;

1033: X_ACC_AMOUNT => x_claim_rec.acctd_amount_settled,
1034: X_RATE => x_claim_rec.exchange_rate
1035: );
1036: IF l_return_status = FND_API.g_ret_sts_error THEN
1037: RAISE FND_API.g_exc_error;
1038: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1039: RAISE FND_API.g_exc_unexpected_error;
1040: END IF;
1041:

Line 1038: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1034: X_RATE => x_claim_rec.exchange_rate
1035: );
1036: IF l_return_status = FND_API.g_ret_sts_error THEN
1037: RAISE FND_API.g_exc_error;
1038: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1039: RAISE FND_API.g_exc_unexpected_error;
1040: END IF;
1041:
1042: -- amount_remaining

Line 1039: RAISE FND_API.g_exc_unexpected_error;

1035: );
1036: IF l_return_status = FND_API.g_ret_sts_error THEN
1037: RAISE FND_API.g_exc_error;
1038: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1039: RAISE FND_API.g_exc_unexpected_error;
1040: END IF;
1041:
1042: -- amount_remaining
1043: x_claim_rec.amount_remaining := x_claim_rec.amount - x_claim_rec.amount_adjusted - x_claim_rec.amount_settled - NVL(x_claim_rec.tax_amount, 0);

Line 1057: IF l_return_status = FND_API.g_ret_sts_error THEN

1053: X_RETURN_STATUS => l_return_status,
1054: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
1055: X_RATE => x_claim_rec.exchange_rate
1056: );
1057: IF l_return_status = FND_API.g_ret_sts_error THEN
1058: RAISE FND_API.g_exc_error;
1059: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1060: RAISE FND_API.g_exc_unexpected_error;
1061: END IF;

Line 1058: RAISE FND_API.g_exc_error;

1054: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
1055: X_RATE => x_claim_rec.exchange_rate
1056: );
1057: IF l_return_status = FND_API.g_ret_sts_error THEN
1058: RAISE FND_API.g_exc_error;
1059: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1060: RAISE FND_API.g_exc_unexpected_error;
1061: END IF;
1062:

Line 1059: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1055: X_RATE => x_claim_rec.exchange_rate
1056: );
1057: IF l_return_status = FND_API.g_ret_sts_error THEN
1058: RAISE FND_API.g_exc_error;
1059: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1060: RAISE FND_API.g_exc_unexpected_error;
1061: END IF;
1062:
1063: ------- amount remaining checking --------

Line 1060: RAISE FND_API.g_exc_unexpected_error;

1056: );
1057: IF l_return_status = FND_API.g_ret_sts_error THEN
1058: RAISE FND_API.g_exc_error;
1059: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1060: RAISE FND_API.g_exc_unexpected_error;
1061: END IF;
1062:
1063: ------- amount remaining checking --------
1064: l_claim_amount_remaining := x_claim_rec.amount - x_claim_rec.amount_adjusted - x_claim_rec.amount_settled - NVL(x_claim_rec.tax_amount, 0);

Line 1073: RAISE FND_API.g_exc_error;

1069: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1070: FND_MESSAGE.set_name('OZF', 'OZF_SETL_AMT_ERR');
1071: FND_MSG_PUB.add;
1072: END IF;
1073: RAISE FND_API.g_exc_error;
1074: END IF;
1075: */
1076:
1077: -- settled_by / settled_date

Line 1085: WHEN FND_API.G_EXC_ERROR THEN

1081: IF OZF_DEBUG_HIGH_ON THEN
1082: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1083: END IF;
1084: EXCEPTION
1085: WHEN FND_API.G_EXC_ERROR THEN
1086: x_return_status := FND_API.G_RET_STS_ERROR;
1087: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1089: WHEN OTHERS THEN

Line 1086: x_return_status := FND_API.G_RET_STS_ERROR;

1082: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1083: END IF;
1084: EXCEPTION
1085: WHEN FND_API.G_EXC_ERROR THEN
1086: x_return_status := FND_API.G_RET_STS_ERROR;
1087: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1089: WHEN OTHERS THEN
1090: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1087: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1083: END IF;
1084: EXCEPTION
1085: WHEN FND_API.G_EXC_ERROR THEN
1086: x_return_status := FND_API.G_RET_STS_ERROR;
1087: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1089: WHEN OTHERS THEN
1090: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1091: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 1088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1084: EXCEPTION
1085: WHEN FND_API.G_EXC_ERROR THEN
1086: x_return_status := FND_API.G_RET_STS_ERROR;
1087: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1088: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1089: WHEN OTHERS THEN
1090: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1091: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1092: END IF;

Line 1093: x_return_status := FND_API.g_ret_sts_unexp_error;

1089: WHEN OTHERS THEN
1090: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1091: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1092: END IF;
1093: x_return_status := FND_API.g_ret_sts_unexp_error;
1094:
1095: END Approve_Claim_for_Completion;
1096:
1097:

Line 1150: x_return_status := FND_API.g_ret_sts_success;

1146: IF OZF_DEBUG_HIGH_ON THEN
1147: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1148: END IF;
1149: -- Initialize API return status to sucess
1150: x_return_status := FND_API.g_ret_sts_success;
1151:
1152: OPEN claim_rec_csr(p_claim_id);
1153: FETCH claim_rec_csr INTO l_object_version_number,
1154: --l_new_status_id,

Line 1173: IF OZF_Claim_Accrual_PVT.Earnings_Approval_Required(p_claim_id) = FND_API.g_true THEN

1169: l_reject_status_id := OZF_UTILITY_PVT.get_default_user_status(
1170: l_status_type
1171: ,l_reject_status_code
1172: );
1173: IF OZF_Claim_Accrual_PVT.Earnings_Approval_Required(p_claim_id) = FND_API.g_true THEN
1174: l_approval_type := 'EARNING';
1175: ELSIF OZF_Claim_Accrual_PVT.Perform_Approval_Required(p_claim_id) = FND_API.g_true THEN
1176: l_approval_type := 'PERFORMANCE';
1177: ELSE

Line 1175: ELSIF OZF_Claim_Accrual_PVT.Perform_Approval_Required(p_claim_id) = FND_API.g_true THEN

1171: ,l_reject_status_code
1172: );
1173: IF OZF_Claim_Accrual_PVT.Earnings_Approval_Required(p_claim_id) = FND_API.g_true THEN
1174: l_approval_type := 'EARNING';
1175: ELSIF OZF_Claim_Accrual_PVT.Perform_Approval_Required(p_claim_id) = FND_API.g_true THEN
1176: l_approval_type := 'PERFORMANCE';
1177: ELSE
1178: l_approval_type := 'CLAIM';
1179: END IF;

Line 1198: IF l_return_status = FND_API.g_ret_sts_error THEN

1194: ,p_notes_from_requester => l_comments
1195: ,p_workflowprocess => l_approval_workflow
1196: ,p_item_type => l_item_type
1197: );
1198: IF l_return_status = FND_API.g_ret_sts_error THEN
1199: RAISE FND_API.g_exc_error;
1200: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1201: RAISE FND_API.g_exc_unexpected_error;
1202: END IF;

Line 1199: RAISE FND_API.g_exc_error;

1195: ,p_workflowprocess => l_approval_workflow
1196: ,p_item_type => l_item_type
1197: );
1198: IF l_return_status = FND_API.g_ret_sts_error THEN
1199: RAISE FND_API.g_exc_error;
1200: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1201: RAISE FND_API.g_exc_unexpected_error;
1202: END IF;
1203:

Line 1200: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1196: ,p_item_type => l_item_type
1197: );
1198: IF l_return_status = FND_API.g_ret_sts_error THEN
1199: RAISE FND_API.g_exc_error;
1200: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1201: RAISE FND_API.g_exc_unexpected_error;
1202: END IF;
1203:
1204: IF OZF_DEBUG_HIGH_ON THEN

Line 1201: RAISE FND_API.g_exc_unexpected_error;

1197: );
1198: IF l_return_status = FND_API.g_ret_sts_error THEN
1199: RAISE FND_API.g_exc_error;
1200: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1201: RAISE FND_API.g_exc_unexpected_error;
1202: END IF;
1203:
1204: IF OZF_DEBUG_HIGH_ON THEN
1205: OZF_Utility_PVT.debug_message(l_full_name||' : end');

Line 1208: WHEN FND_API.G_EXC_ERROR THEN

1204: IF OZF_DEBUG_HIGH_ON THEN
1205: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1206: END IF;
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: WHEN OTHERS THEN

Line 1209: x_return_status := FND_API.G_RET_STS_ERROR;

1205: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1206: END IF;
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: WHEN OTHERS THEN
1213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1206: END IF;
1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: WHEN OTHERS THEN
1213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1214: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1207: EXCEPTION
1208: WHEN FND_API.G_EXC_ERROR THEN
1209: x_return_status := FND_API.G_RET_STS_ERROR;
1210: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1211: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1212: WHEN OTHERS THEN
1213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1214: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1215: END IF;

Line 1216: x_return_status := FND_API.g_ret_sts_unexp_error;

1212: WHEN OTHERS THEN
1213: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1214: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1215: END IF;
1216: x_return_status := FND_API.g_ret_sts_unexp_error;
1217:
1218: END Approve_Claim_for_Settlement;
1219:
1220:

Line 1301: x_return_status := FND_API.g_ret_sts_success;

1297: IF OZF_DEBUG_HIGH_ON THEN
1298: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1299: END IF;
1300: -- Initialize API return status to sucess
1301: x_return_status := FND_API.g_ret_sts_success;
1302:
1303: x_claim_rec := p_claim_rec;
1304:
1305: /*----------------------------------------------------------

Line 1343: IF l_return_status = FND_API.g_ret_sts_error THEN

1339: X_RETURN_STATUS => l_return_status,
1340: X_ACC_AMOUNT => x_claim_rec.acctd_amount_settled,
1341: X_RATE => x_claim_rec.exchange_rate
1342: );
1343: IF l_return_status = FND_API.g_ret_sts_error THEN
1344: RAISE FND_API.g_exc_error;
1345: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1346: RAISE FND_API.g_exc_unexpected_error;
1347: END IF;

Line 1344: RAISE FND_API.g_exc_error;

1340: X_ACC_AMOUNT => x_claim_rec.acctd_amount_settled,
1341: X_RATE => x_claim_rec.exchange_rate
1342: );
1343: IF l_return_status = FND_API.g_ret_sts_error THEN
1344: RAISE FND_API.g_exc_error;
1345: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1346: RAISE FND_API.g_exc_unexpected_error;
1347: END IF;
1348:

Line 1345: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1341: X_RATE => x_claim_rec.exchange_rate
1342: );
1343: IF l_return_status = FND_API.g_ret_sts_error THEN
1344: RAISE FND_API.g_exc_error;
1345: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1346: RAISE FND_API.g_exc_unexpected_error;
1347: END IF;
1348:
1349: -- update amount_remaining

Line 1346: RAISE FND_API.g_exc_unexpected_error;

1342: );
1343: IF l_return_status = FND_API.g_ret_sts_error THEN
1344: RAISE FND_API.g_exc_error;
1345: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1346: RAISE FND_API.g_exc_unexpected_error;
1347: END IF;
1348:
1349: -- update amount_remaining
1350: x_claim_rec.amount_remaining := x_claim_rec.amount

Line 1367: IF l_return_status = FND_API.g_ret_sts_error THEN

1363: X_RETURN_STATUS => l_return_status,
1364: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
1365: X_RATE => x_claim_rec.exchange_rate
1366: );
1367: IF l_return_status = FND_API.g_ret_sts_error THEN
1368: RAISE FND_API.g_exc_error;
1369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1370: RAISE FND_API.g_exc_unexpected_error;
1371: END IF;

Line 1368: RAISE FND_API.g_exc_error;

1364: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
1365: X_RATE => x_claim_rec.exchange_rate
1366: );
1367: IF l_return_status = FND_API.g_ret_sts_error THEN
1368: RAISE FND_API.g_exc_error;
1369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1370: RAISE FND_API.g_exc_unexpected_error;
1371: END IF;
1372:

Line 1369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1365: X_RATE => x_claim_rec.exchange_rate
1366: );
1367: IF l_return_status = FND_API.g_ret_sts_error THEN
1368: RAISE FND_API.g_exc_error;
1369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1370: RAISE FND_API.g_exc_unexpected_error;
1371: END IF;
1372:
1373: ------ check amount_remaining ------

Line 1370: RAISE FND_API.g_exc_unexpected_error;

1366: );
1367: IF l_return_status = FND_API.g_ret_sts_error THEN
1368: RAISE FND_API.g_exc_error;
1369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1370: RAISE FND_API.g_exc_unexpected_error;
1371: END IF;
1372:
1373: ------ check amount_remaining ------
1374: -- l_claim_amount_remaining should be >= 0 now

Line 1390: RAISE FND_API.g_exc_error;

1386: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1387: FND_MESSAGE.set_name('OZF', 'OZF_SETL_AMT_ERR');
1388: FND_MSG_PUB.add;
1389: END IF;
1390: RAISE FND_API.g_exc_error;
1391: END IF;
1392: */
1393:
1394: x_claim_rec.settled_by := OZF_Utility_PVT.get_resource_id(FND_GLOBAL.user_id);

Line 1427: ,p_init_msg_list => FND_API.g_false

1423: | 2. Raise Business Event for Referral Claim Approval
1424: *---------------------------------------------------------*/
1425: Raise_Business_Event(
1426: p_api_version => l_api_version
1427: ,p_init_msg_list => FND_API.g_false
1428: ,p_commit => FND_API.g_false
1429: ,p_validation_level => FND_API.g_valid_level_full
1430: ,x_return_status => l_return_status
1431: ,x_msg_data => x_msg_data

Line 1428: ,p_commit => FND_API.g_false

1424: *---------------------------------------------------------*/
1425: Raise_Business_Event(
1426: p_api_version => l_api_version
1427: ,p_init_msg_list => FND_API.g_false
1428: ,p_commit => FND_API.g_false
1429: ,p_validation_level => FND_API.g_valid_level_full
1430: ,x_return_status => l_return_status
1431: ,x_msg_data => x_msg_data
1432: ,x_msg_count => x_msg_count

Line 1429: ,p_validation_level => FND_API.g_valid_level_full

1425: Raise_Business_Event(
1426: p_api_version => l_api_version
1427: ,p_init_msg_list => FND_API.g_false
1428: ,p_commit => FND_API.g_false
1429: ,p_validation_level => FND_API.g_valid_level_full
1430: ,x_return_status => l_return_status
1431: ,x_msg_data => x_msg_data
1432: ,x_msg_count => x_msg_count
1433: ,p_claim_id => p_claim_rec.claim_id

Line 1438: IF l_return_status = FND_API.g_ret_sts_error THEN

1434: ,p_old_status => p_prev_status
1435: ,p_new_status => 'PENDING_APPROVAL'
1436: ,p_event_name => 'oracle.apps.ozf.claim.referralApproval'
1437: );
1438: IF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;

Line 1439: RAISE FND_API.g_exc_error;

1435: ,p_new_status => 'PENDING_APPROVAL'
1436: ,p_event_name => 'oracle.apps.ozf.claim.referralApproval'
1437: );
1438: IF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443:

Line 1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1436: ,p_event_name => 'oracle.apps.ozf.claim.referralApproval'
1437: );
1438: IF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443:
1444: x_claim_rec.status_code := 'PENDING_APPROVAL';

Line 1441: RAISE FND_API.g_exc_unexpected_error;

1437: );
1438: IF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443:
1444: x_claim_rec.status_code := 'PENDING_APPROVAL';
1445: x_claim_rec.payment_status := 'WAITING_ACCEPTANCE';

Line 1476: ,p_init_msg_list => FND_API.g_false

1472: | Adjust_Fund_Utilization is fully completed.
1473: *---------------------------------------------------------*/
1474: Ozf_Claim_Accrual_Pvt.Adjust_Fund_Utilization(
1475: p_api_version => l_api_version
1476: ,p_init_msg_list => FND_API.g_false
1477: ,p_commit => FND_API.g_false
1478: ,p_validation_level => FND_API.g_valid_level_full
1479: ,x_return_status => l_return_status
1480: ,x_msg_count => x_msg_count

Line 1477: ,p_commit => FND_API.g_false

1473: *---------------------------------------------------------*/
1474: Ozf_Claim_Accrual_Pvt.Adjust_Fund_Utilization(
1475: p_api_version => l_api_version
1476: ,p_init_msg_list => FND_API.g_false
1477: ,p_commit => FND_API.g_false
1478: ,p_validation_level => FND_API.g_valid_level_full
1479: ,x_return_status => l_return_status
1480: ,x_msg_count => x_msg_count
1481: ,x_msg_data => x_msg_data

Line 1478: ,p_validation_level => FND_API.g_valid_level_full

1474: Ozf_Claim_Accrual_Pvt.Adjust_Fund_Utilization(
1475: p_api_version => l_api_version
1476: ,p_init_msg_list => FND_API.g_false
1477: ,p_commit => FND_API.g_false
1478: ,p_validation_level => FND_API.g_valid_level_full
1479: ,x_return_status => l_return_status
1480: ,x_msg_count => x_msg_count
1481: ,x_msg_data => x_msg_data
1482: ,p_claim_id => p_claim_rec.claim_id

Line 1486: IF l_return_status = FND_API.g_ret_sts_error THEN

1482: ,p_claim_id => p_claim_rec.claim_id
1483: ,p_mode => 'ADJ_FUND'
1484: ,x_next_status => l_adj_util_result_status
1485: );
1486: IF l_return_status = FND_API.g_ret_sts_error THEN
1487: RAISE FND_API.g_exc_error;
1488: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1489: RAISE FND_API.g_exc_unexpected_error;
1490: END IF;

Line 1487: RAISE FND_API.g_exc_error;

1483: ,p_mode => 'ADJ_FUND'
1484: ,x_next_status => l_adj_util_result_status
1485: );
1486: IF l_return_status = FND_API.g_ret_sts_error THEN
1487: RAISE FND_API.g_exc_error;
1488: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1489: RAISE FND_API.g_exc_unexpected_error;
1490: END IF;
1491:

Line 1488: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1484: ,x_next_status => l_adj_util_result_status
1485: );
1486: IF l_return_status = FND_API.g_ret_sts_error THEN
1487: RAISE FND_API.g_exc_error;
1488: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1489: RAISE FND_API.g_exc_unexpected_error;
1490: END IF;
1491:
1492: IF l_adj_util_result_status = 'PENDING_APPROVAL' THEN

Line 1489: RAISE FND_API.g_exc_unexpected_error;

1485: );
1486: IF l_return_status = FND_API.g_ret_sts_error THEN
1487: RAISE FND_API.g_exc_error;
1488: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1489: RAISE FND_API.g_exc_unexpected_error;
1490: END IF;
1491:
1492: IF l_adj_util_result_status = 'PENDING_APPROVAL' THEN
1493: x_claim_rec.status_code := 'PENDING_APPROVAL';

Line 1525: RAISE FND_API.G_EXC_ERROR;

1521: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1522: FND_MESSAGE.set_name('OZF', 'OZF_PAY_REFERENCE_REQD');
1523: FND_MSG_PUB.add;
1524: END IF;
1525: RAISE FND_API.G_EXC_ERROR;
1526: ELSE
1527: OPEN csr_trx_balance(p_claim_rec.payment_reference_id);
1528: FETCH csr_trx_balance INTO l_trx_balance, l_trx_currency;
1529: CLOSE csr_trx_balance;

Line 1537: RAISE FND_API.G_EXC_ERROR;

1533: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1534: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CM_DM_OP_BAL_ERR');
1535: FND_MSG_PUB.add;
1536: END IF;
1537: RAISE FND_API.G_EXC_ERROR;
1538: END IF;
1539: END IF;
1540: END IF;
1541:

Line 1553: IF l_return_status = FND_API.g_ret_sts_error THEN

1549: OZF_AR_VALIDATION_PVT.Validate_CreditTo_Information(
1550: p_claim_rec => p_claim_rec
1551: ,x_return_status => l_return_status
1552: );
1553: IF l_return_status = FND_API.g_ret_sts_error THEN
1554: RAISE FND_API.g_exc_error;
1555: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1556: RAISE FND_API.g_exc_unexpected_error;
1557: END IF;

Line 1554: RAISE FND_API.g_exc_error;

1550: p_claim_rec => p_claim_rec
1551: ,x_return_status => l_return_status
1552: );
1553: IF l_return_status = FND_API.g_ret_sts_error THEN
1554: RAISE FND_API.g_exc_error;
1555: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1556: RAISE FND_API.g_exc_unexpected_error;
1557: END IF;
1558: END IF;

Line 1555: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1551: ,x_return_status => l_return_status
1552: );
1553: IF l_return_status = FND_API.g_ret_sts_error THEN
1554: RAISE FND_API.g_exc_error;
1555: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1556: RAISE FND_API.g_exc_unexpected_error;
1557: END IF;
1558: END IF;
1559: END IF;

Line 1556: RAISE FND_API.g_exc_unexpected_error;

1552: );
1553: IF l_return_status = FND_API.g_ret_sts_error THEN
1554: RAISE FND_API.g_exc_error;
1555: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1556: RAISE FND_API.g_exc_unexpected_error;
1557: END IF;
1558: END IF;
1559: END IF;
1560:

Line 1580: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1576: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1577: FND_MESSAGE.Set_Token('TEXT', 'Status return from OZF_CLAIM_LINE_PVT.Adjust_Fund_Utilization = '||l_adj_util_result_status);
1578: FND_MSG_PUB.Add;
1579: END IF;
1580: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1581: END IF; -- end of if l_adj_util_result_status
1582: END IF; -- enf of if referral claim approval
1583:
1584: -- Set returning user_status_id

Line 1593: WHEN FND_API.G_EXC_ERROR THEN

1589: IF OZF_DEBUG_HIGH_ON THEN
1590: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1591: END IF;
1592: EXCEPTION
1593: WHEN FND_API.G_EXC_ERROR THEN
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595:
1596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1594: x_return_status := FND_API.G_RET_STS_ERROR;

1590: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1591: END IF;
1592: EXCEPTION
1593: WHEN FND_API.G_EXC_ERROR THEN
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595:
1596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598:

Line 1596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1592: EXCEPTION
1593: WHEN FND_API.G_EXC_ERROR THEN
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595:
1596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598:
1599: WHEN OTHERS THEN
1600: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1593: WHEN FND_API.G_EXC_ERROR THEN
1594: x_return_status := FND_API.G_RET_STS_ERROR;
1595:
1596: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598:
1599: WHEN OTHERS THEN
1600: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1601: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 1603: x_return_status := FND_API.g_ret_sts_unexp_error;

1599: WHEN OTHERS THEN
1600: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1601: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1602: END IF;
1603: x_return_status := FND_API.g_ret_sts_unexp_error;
1604:
1605: END Create_Payment_for_Completion;
1606:
1607:

Line 1703: x_return_status := FND_API.g_ret_sts_success;

1699: OZF_Utility_PVT.debug_message(l_full_name||' : start');
1700: END IF;
1701:
1702: -- Initialize API return status to sucess
1703: x_return_status := FND_API.g_ret_sts_success;
1704:
1705: OPEN csr_claim_settle(p_claim_id);
1706: FETCH csr_claim_settle INTO l_claim_settle;
1707: CLOSE csr_claim_settle;

Line 1760: RAISE FND_API.g_exc_unexpected_error;

1756: WHEN OTHERS THEN
1757: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1758: FND_MESSAGE.Set_Token('TEXT','Promo Err: ' || sqlerrm);
1759: FND_MSG_PUB.Add;
1760: RAISE FND_API.g_exc_unexpected_error;
1761: END;
1762: ELSE -- non promotional claims
1763: /*---------------------------------------------------------*
1764: | CHECK (AP) |

Line 1785: IF l_return_status = FND_API.g_ret_sts_error THEN

1781: p_claim_id => p_claim_id,
1782: p_settlement_method => l_claim_settle.payment_method
1783: );
1784: END IF;
1785: IF l_return_status = FND_API.g_ret_sts_error THEN
1786: RAISE FND_API.g_exc_error;
1787: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1788: RAISE FND_API.g_exc_unexpected_error;
1789: END IF;

Line 1786: RAISE FND_API.g_exc_error;

1782: p_settlement_method => l_claim_settle.payment_method
1783: );
1784: END IF;
1785: IF l_return_status = FND_API.g_ret_sts_error THEN
1786: RAISE FND_API.g_exc_error;
1787: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1788: RAISE FND_API.g_exc_unexpected_error;
1789: END IF;
1790: IF OZF_DEBUG_HIGH_ON THEN

Line 1787: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1783: );
1784: END IF;
1785: IF l_return_status = FND_API.g_ret_sts_error THEN
1786: RAISE FND_API.g_exc_error;
1787: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1788: RAISE FND_API.g_exc_unexpected_error;
1789: END IF;
1790: IF OZF_DEBUG_HIGH_ON THEN
1791: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1788: RAISE FND_API.g_exc_unexpected_error;

1784: END IF;
1785: IF l_return_status = FND_API.g_ret_sts_error THEN
1786: RAISE FND_API.g_exc_error;
1787: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1788: RAISE FND_API.g_exc_unexpected_error;
1789: END IF;
1790: IF OZF_DEBUG_HIGH_ON THEN
1791: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1792: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1802: ,p_init_msg_list => FND_API.g_false

1798:
1799: -- create AP invoice
1800: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1801: p_api_version => l_api_version
1802: ,p_init_msg_list => FND_API.g_false
1803: ,p_commit => FND_API.g_false
1804: ,p_validation_level => FND_API.g_valid_level_full
1805: ,x_return_status => l_return_status
1806: ,x_msg_data => x_msg_data

Line 1803: ,p_commit => FND_API.g_false

1799: -- create AP invoice
1800: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1801: p_api_version => l_api_version
1802: ,p_init_msg_list => FND_API.g_false
1803: ,p_commit => FND_API.g_false
1804: ,p_validation_level => FND_API.g_valid_level_full
1805: ,x_return_status => l_return_status
1806: ,x_msg_data => x_msg_data
1807: ,x_msg_count => x_msg_count

Line 1804: ,p_validation_level => FND_API.g_valid_level_full

1800: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1801: p_api_version => l_api_version
1802: ,p_init_msg_list => FND_API.g_false
1803: ,p_commit => FND_API.g_false
1804: ,p_validation_level => FND_API.g_valid_level_full
1805: ,x_return_status => l_return_status
1806: ,x_msg_data => x_msg_data
1807: ,x_msg_count => x_msg_count
1808: ,p_claim_id => p_claim_id

Line 1810: IF l_return_status = FND_API.g_ret_sts_error THEN

1806: ,x_msg_data => x_msg_data
1807: ,x_msg_count => x_msg_count
1808: ,p_claim_id => p_claim_id
1809: );
1810: IF l_return_status = FND_API.g_ret_sts_error THEN
1811: RAISE FND_API.g_exc_error;
1812: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1813: RAISE FND_API.g_exc_unexpected_error;
1814: END IF;

Line 1811: RAISE FND_API.g_exc_error;

1807: ,x_msg_count => x_msg_count
1808: ,p_claim_id => p_claim_id
1809: );
1810: IF l_return_status = FND_API.g_ret_sts_error THEN
1811: RAISE FND_API.g_exc_error;
1812: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1813: RAISE FND_API.g_exc_unexpected_error;
1814: END IF;
1815:

Line 1812: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1808: ,p_claim_id => p_claim_id
1809: );
1810: IF l_return_status = FND_API.g_ret_sts_error THEN
1811: RAISE FND_API.g_exc_error;
1812: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1813: RAISE FND_API.g_exc_unexpected_error;
1814: END IF;
1815:
1816: /*---------------------------------------------------------*

Line 1813: RAISE FND_API.g_exc_unexpected_error;

1809: );
1810: IF l_return_status = FND_API.g_ret_sts_error THEN
1811: RAISE FND_API.g_exc_error;
1812: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1813: RAISE FND_API.g_exc_unexpected_error;
1814: END IF;
1815:
1816: /*---------------------------------------------------------*
1817: | AR Settlement

Line 1846: IF l_return_status = FND_API.g_ret_sts_error THEN

1842: p_claim_id => p_claim_id,
1843: p_settlement_method => l_claim_settle.payment_method
1844: );
1845: END IF;
1846: IF l_return_status = FND_API.g_ret_sts_error THEN
1847: RAISE FND_API.g_exc_error;
1848: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1849: RAISE FND_API.g_exc_unexpected_error;
1850: END IF;

Line 1847: RAISE FND_API.g_exc_error;

1843: p_settlement_method => l_claim_settle.payment_method
1844: );
1845: END IF;
1846: IF l_return_status = FND_API.g_ret_sts_error THEN
1847: RAISE FND_API.g_exc_error;
1848: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1849: RAISE FND_API.g_exc_unexpected_error;
1850: END IF;
1851: IF OZF_DEBUG_HIGH_ON THEN

Line 1848: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1844: );
1845: END IF;
1846: IF l_return_status = FND_API.g_ret_sts_error THEN
1847: RAISE FND_API.g_exc_error;
1848: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1849: RAISE FND_API.g_exc_unexpected_error;
1850: END IF;
1851: IF OZF_DEBUG_HIGH_ON THEN
1852: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1849: RAISE FND_API.g_exc_unexpected_error;

1845: END IF;
1846: IF l_return_status = FND_API.g_ret_sts_error THEN
1847: RAISE FND_API.g_exc_error;
1848: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1849: RAISE FND_API.g_exc_unexpected_error;
1850: END IF;
1851: IF OZF_DEBUG_HIGH_ON THEN
1852: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1853: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1863: ,p_init_msg_list => FND_API.g_false

1859: IF ((l_automate_settlement = 'Y') OR (l_claim_settle.payment_method = 'ACCOUNTING_ONLY'))
1860: THEN
1861: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1862: p_api_version => l_api_version
1863: ,p_init_msg_list => FND_API.g_false
1864: ,p_commit => FND_API.g_false
1865: ,p_validation_level => FND_API.g_valid_level_full
1866: ,x_return_status => l_return_status
1867: ,x_msg_data => x_msg_data

Line 1864: ,p_commit => FND_API.g_false

1860: THEN
1861: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1862: p_api_version => l_api_version
1863: ,p_init_msg_list => FND_API.g_false
1864: ,p_commit => FND_API.g_false
1865: ,p_validation_level => FND_API.g_valid_level_full
1866: ,x_return_status => l_return_status
1867: ,x_msg_data => x_msg_data
1868: ,x_msg_count => x_msg_count

Line 1865: ,p_validation_level => FND_API.g_valid_level_full

1861: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1862: p_api_version => l_api_version
1863: ,p_init_msg_list => FND_API.g_false
1864: ,p_commit => FND_API.g_false
1865: ,p_validation_level => FND_API.g_valid_level_full
1866: ,x_return_status => l_return_status
1867: ,x_msg_data => x_msg_data
1868: ,x_msg_count => x_msg_count
1869: ,p_claim_id => p_claim_id

Line 1871: IF l_return_status = FND_API.g_ret_sts_error THEN

1867: ,x_msg_data => x_msg_data
1868: ,x_msg_count => x_msg_count
1869: ,p_claim_id => p_claim_id
1870: );
1871: IF l_return_status = FND_API.g_ret_sts_error THEN
1872: RAISE FND_API.g_exc_error;
1873: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1874: RAISE FND_API.g_exc_unexpected_error;
1875: END IF;

Line 1872: RAISE FND_API.g_exc_error;

1868: ,x_msg_count => x_msg_count
1869: ,p_claim_id => p_claim_id
1870: );
1871: IF l_return_status = FND_API.g_ret_sts_error THEN
1872: RAISE FND_API.g_exc_error;
1873: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1874: RAISE FND_API.g_exc_unexpected_error;
1875: END IF;
1876: ELSE

Line 1873: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1869: ,p_claim_id => p_claim_id
1870: );
1871: IF l_return_status = FND_API.g_ret_sts_error THEN
1872: RAISE FND_API.g_exc_error;
1873: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1874: RAISE FND_API.g_exc_unexpected_error;
1875: END IF;
1876: ELSE
1877: Process_Settlement_WF(

Line 1874: RAISE FND_API.g_exc_unexpected_error;

1870: );
1871: IF l_return_status = FND_API.g_ret_sts_error THEN
1872: RAISE FND_API.g_exc_error;
1873: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1874: RAISE FND_API.g_exc_unexpected_error;
1875: END IF;
1876: ELSE
1877: Process_Settlement_WF(
1878: p_claim_id => p_claim_id

Line 1883: IF l_return_status = FND_API.g_ret_sts_error THEN

1879: ,x_return_status => l_return_status
1880: ,x_msg_data => x_msg_data
1881: ,x_msg_count => x_msg_count
1882: );
1883: IF l_return_status = FND_API.g_ret_sts_error THEN
1884: RAISE FND_API.g_exc_error;
1885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1886: RAISE FND_API.g_exc_unexpected_error;
1887: END IF;

Line 1884: RAISE FND_API.g_exc_error;

1880: ,x_msg_data => x_msg_data
1881: ,x_msg_count => x_msg_count
1882: );
1883: IF l_return_status = FND_API.g_ret_sts_error THEN
1884: RAISE FND_API.g_exc_error;
1885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1886: RAISE FND_API.g_exc_unexpected_error;
1887: END IF;
1888: END IF;

Line 1885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1881: ,x_msg_count => x_msg_count
1882: );
1883: IF l_return_status = FND_API.g_ret_sts_error THEN
1884: RAISE FND_API.g_exc_error;
1885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1886: RAISE FND_API.g_exc_unexpected_error;
1887: END IF;
1888: END IF;
1889:

Line 1886: RAISE FND_API.g_exc_unexpected_error;

1882: );
1883: IF l_return_status = FND_API.g_ret_sts_error THEN
1884: RAISE FND_API.g_exc_error;
1885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1886: RAISE FND_API.g_exc_unexpected_error;
1887: END IF;
1888: END IF;
1889:
1890: /*---------------------------------------------------------*

Line 1899: ,p_init_msg_list => FND_API.g_false

1895:
1896: IF l_automate_settlement = 'Y' THEN
1897: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1898: p_api_version => l_api_version
1899: ,p_init_msg_list => FND_API.g_false
1900: ,p_commit => FND_API.g_false
1901: ,p_validation_level => FND_API.g_valid_level_full
1902: ,x_return_status => l_return_status
1903: ,x_msg_data => x_msg_data

Line 1900: ,p_commit => FND_API.g_false

1896: IF l_automate_settlement = 'Y' THEN
1897: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1898: p_api_version => l_api_version
1899: ,p_init_msg_list => FND_API.g_false
1900: ,p_commit => FND_API.g_false
1901: ,p_validation_level => FND_API.g_valid_level_full
1902: ,x_return_status => l_return_status
1903: ,x_msg_data => x_msg_data
1904: ,x_msg_count => x_msg_count

Line 1901: ,p_validation_level => FND_API.g_valid_level_full

1897: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1898: p_api_version => l_api_version
1899: ,p_init_msg_list => FND_API.g_false
1900: ,p_commit => FND_API.g_false
1901: ,p_validation_level => FND_API.g_valid_level_full
1902: ,x_return_status => l_return_status
1903: ,x_msg_data => x_msg_data
1904: ,x_msg_count => x_msg_count
1905: ,p_claim_id => p_claim_id

Line 1907: IF l_return_status = FND_API.g_ret_sts_error THEN

1903: ,x_msg_data => x_msg_data
1904: ,x_msg_count => x_msg_count
1905: ,p_claim_id => p_claim_id
1906: );
1907: IF l_return_status = FND_API.g_ret_sts_error THEN
1908: RAISE FND_API.g_exc_error;
1909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1910: RAISE FND_API.g_exc_unexpected_error;
1911: END IF;

Line 1908: RAISE FND_API.g_exc_error;

1904: ,x_msg_count => x_msg_count
1905: ,p_claim_id => p_claim_id
1906: );
1907: IF l_return_status = FND_API.g_ret_sts_error THEN
1908: RAISE FND_API.g_exc_error;
1909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1910: RAISE FND_API.g_exc_unexpected_error;
1911: END IF;
1912: ELSE

Line 1909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1905: ,p_claim_id => p_claim_id
1906: );
1907: IF l_return_status = FND_API.g_ret_sts_error THEN
1908: RAISE FND_API.g_exc_error;
1909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1910: RAISE FND_API.g_exc_unexpected_error;
1911: END IF;
1912: ELSE
1913: Process_Settlement_WF(

Line 1910: RAISE FND_API.g_exc_unexpected_error;

1906: );
1907: IF l_return_status = FND_API.g_ret_sts_error THEN
1908: RAISE FND_API.g_exc_error;
1909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1910: RAISE FND_API.g_exc_unexpected_error;
1911: END IF;
1912: ELSE
1913: Process_Settlement_WF(
1914: p_claim_id => p_claim_id

Line 1919: IF l_return_status = FND_API.g_ret_sts_error THEN

1915: ,x_return_status => l_return_status
1916: ,x_msg_data => x_msg_data
1917: ,x_msg_count => x_msg_count
1918: );
1919: IF l_return_status = FND_API.g_ret_sts_error THEN
1920: RAISE FND_API.g_exc_error;
1921: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1922: RAISE FND_API.g_exc_unexpected_error;
1923: END IF;

Line 1920: RAISE FND_API.g_exc_error;

1916: ,x_msg_data => x_msg_data
1917: ,x_msg_count => x_msg_count
1918: );
1919: IF l_return_status = FND_API.g_ret_sts_error THEN
1920: RAISE FND_API.g_exc_error;
1921: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1922: RAISE FND_API.g_exc_unexpected_error;
1923: END IF;
1924: END IF;

Line 1921: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1917: ,x_msg_count => x_msg_count
1918: );
1919: IF l_return_status = FND_API.g_ret_sts_error THEN
1920: RAISE FND_API.g_exc_error;
1921: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1922: RAISE FND_API.g_exc_unexpected_error;
1923: END IF;
1924: END IF;
1925:

Line 1922: RAISE FND_API.g_exc_unexpected_error;

1918: );
1919: IF l_return_status = FND_API.g_ret_sts_error THEN
1920: RAISE FND_API.g_exc_error;
1921: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1922: RAISE FND_API.g_exc_unexpected_error;
1923: END IF;
1924: END IF;
1925:
1926: /*---------------------------------------------------------*

Line 1941: IF l_return_status = FND_API.g_ret_sts_error THEN

1937: x_msg_count => x_msg_count,
1938: p_claim_id => p_claim_id,
1939: p_settlement_method => l_claim_settle.payment_method
1940: );
1941: IF l_return_status = FND_API.g_ret_sts_error THEN
1942: RAISE FND_API.g_exc_error;
1943: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1944: RAISE FND_API.g_exc_unexpected_error;
1945: END IF;

Line 1942: RAISE FND_API.g_exc_error;

1938: p_claim_id => p_claim_id,
1939: p_settlement_method => l_claim_settle.payment_method
1940: );
1941: IF l_return_status = FND_API.g_ret_sts_error THEN
1942: RAISE FND_API.g_exc_error;
1943: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1944: RAISE FND_API.g_exc_unexpected_error;
1945: END IF;
1946: IF OZF_DEBUG_HIGH_ON THEN

Line 1943: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1939: p_settlement_method => l_claim_settle.payment_method
1940: );
1941: IF l_return_status = FND_API.g_ret_sts_error THEN
1942: RAISE FND_API.g_exc_error;
1943: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1944: RAISE FND_API.g_exc_unexpected_error;
1945: END IF;
1946: IF OZF_DEBUG_HIGH_ON THEN
1947: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1944: RAISE FND_API.g_exc_unexpected_error;

1940: );
1941: IF l_return_status = FND_API.g_ret_sts_error THEN
1942: RAISE FND_API.g_exc_error;
1943: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1944: RAISE FND_API.g_exc_unexpected_error;
1945: END IF;
1946: IF OZF_DEBUG_HIGH_ON THEN
1947: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1948: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1958: IF l_return_status = FND_API.g_ret_sts_error THEN

1954: ,x_return_status => l_return_status
1955: ,x_msg_data => x_msg_data
1956: ,x_msg_count => x_msg_count
1957: );
1958: IF l_return_status = FND_API.g_ret_sts_error THEN
1959: RAISE FND_API.g_exc_error;
1960: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1961: RAISE FND_API.g_exc_unexpected_error;
1962: END IF;

Line 1959: RAISE FND_API.g_exc_error;

1955: ,x_msg_data => x_msg_data
1956: ,x_msg_count => x_msg_count
1957: );
1958: IF l_return_status = FND_API.g_ret_sts_error THEN
1959: RAISE FND_API.g_exc_error;
1960: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1961: RAISE FND_API.g_exc_unexpected_error;
1962: END IF;
1963:

Line 1960: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1956: ,x_msg_count => x_msg_count
1957: );
1958: IF l_return_status = FND_API.g_ret_sts_error THEN
1959: RAISE FND_API.g_exc_error;
1960: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1961: RAISE FND_API.g_exc_unexpected_error;
1962: END IF;
1963:
1964: /*---------------------------------------------------------*

Line 1961: RAISE FND_API.g_exc_unexpected_error;

1957: );
1958: IF l_return_status = FND_API.g_ret_sts_error THEN
1959: RAISE FND_API.g_exc_error;
1960: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1961: RAISE FND_API.g_exc_unexpected_error;
1962: END IF;
1963:
1964: /*---------------------------------------------------------*
1965: | MASS_SETTLEMENT |

Line 1974: IF l_return_status = FND_API.g_ret_sts_error THEN

1970: ,x_return_status => l_return_status
1971: ,x_msg_data => x_msg_data
1972: ,x_msg_count => x_msg_count
1973: );
1974: IF l_return_status = FND_API.g_ret_sts_error THEN
1975: RAISE FND_API.g_exc_error;
1976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1977: RAISE FND_API.g_exc_unexpected_error;
1978: END IF;

Line 1975: RAISE FND_API.g_exc_error;

1971: ,x_msg_data => x_msg_data
1972: ,x_msg_count => x_msg_count
1973: );
1974: IF l_return_status = FND_API.g_ret_sts_error THEN
1975: RAISE FND_API.g_exc_error;
1976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1977: RAISE FND_API.g_exc_unexpected_error;
1978: END IF;
1979:

Line 1976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1972: ,x_msg_count => x_msg_count
1973: );
1974: IF l_return_status = FND_API.g_ret_sts_error THEN
1975: RAISE FND_API.g_exc_error;
1976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1977: RAISE FND_API.g_exc_unexpected_error;
1978: END IF;
1979:
1980: /*---------------------------------------------------------*

Line 1977: RAISE FND_API.g_exc_unexpected_error;

1973: );
1974: IF l_return_status = FND_API.g_ret_sts_error THEN
1975: RAISE FND_API.g_exc_error;
1976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1977: RAISE FND_API.g_exc_unexpected_error;
1978: END IF;
1979:
1980: /*---------------------------------------------------------*
1981: | Non-seeded payment_method |

Line 1991: IF l_return_status = FND_API.g_ret_sts_error THEN

1987: ,x_return_status => l_return_status
1988: ,x_msg_data => x_msg_data
1989: ,x_msg_count => x_msg_count
1990: );
1991: IF l_return_status = FND_API.g_ret_sts_error THEN
1992: RAISE FND_API.g_exc_error;
1993: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1994: RAISE FND_API.g_exc_unexpected_error;
1995: END IF;

Line 1992: RAISE FND_API.g_exc_error;

1988: ,x_msg_data => x_msg_data
1989: ,x_msg_count => x_msg_count
1990: );
1991: IF l_return_status = FND_API.g_ret_sts_error THEN
1992: RAISE FND_API.g_exc_error;
1993: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1994: RAISE FND_API.g_exc_unexpected_error;
1995: END IF;
1996:

Line 1993: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1989: ,x_msg_count => x_msg_count
1990: );
1991: IF l_return_status = FND_API.g_ret_sts_error THEN
1992: RAISE FND_API.g_exc_error;
1993: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1994: RAISE FND_API.g_exc_unexpected_error;
1995: END IF;
1996:
1997: END IF;

Line 1994: RAISE FND_API.g_exc_unexpected_error;

1990: );
1991: IF l_return_status = FND_API.g_ret_sts_error THEN
1992: RAISE FND_API.g_exc_error;
1993: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1994: RAISE FND_API.g_exc_unexpected_error;
1995: END IF;
1996:
1997: END IF;
1998:

Line 2005: WHEN FND_API.G_EXC_ERROR THEN

2001: IF OZF_DEBUG_HIGH_ON THEN
2002: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2003: END IF;
2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN
2006: x_return_status := FND_API.G_RET_STS_ERROR;
2007:
2008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2006: x_return_status := FND_API.G_RET_STS_ERROR;

2002: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2003: END IF;
2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN
2006: x_return_status := FND_API.G_RET_STS_ERROR;
2007:
2008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2010:

Line 2008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2004: EXCEPTION
2005: WHEN FND_API.G_EXC_ERROR THEN
2006: x_return_status := FND_API.G_RET_STS_ERROR;
2007:
2008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2010:
2011: WHEN OTHERS THEN
2012: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 2009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2005: WHEN FND_API.G_EXC_ERROR THEN
2006: x_return_status := FND_API.G_RET_STS_ERROR;
2007:
2008: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2009: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2010:
2011: WHEN OTHERS THEN
2012: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2013: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 2015: x_return_status := FND_API.g_ret_sts_unexp_error;

2011: WHEN OTHERS THEN
2012: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2013: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2014: END IF;
2015: x_return_status := FND_API.g_ret_sts_unexp_error;
2016:
2017: END Create_Payment_for_Settlement;
2018:
2019:

Line 2062: x_return_status := FND_API.g_ret_sts_success;

2058: IF OZF_DEBUG_HIGH_ON THEN
2059: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2060: END IF;
2061: -- Initialize API return status to sucess
2062: x_return_status := FND_API.g_ret_sts_success;
2063:
2064: x_claim_rec := p_claim_rec;
2065:
2066: /*

Line 2091: IF l_return_status = FND_API.g_ret_sts_error THEN

2087: X_RETURN_STATUS => l_return_status,
2088: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
2089: X_RATE => x_claim_rec.exchange_rate
2090: );
2091: IF l_return_status = FND_API.g_ret_sts_error THEN
2092: RAISE FND_API.g_exc_error;
2093: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2094: RAISE FND_API.g_exc_unexpected_error;
2095: END IF;

Line 2092: RAISE FND_API.g_exc_error;

2088: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
2089: X_RATE => x_claim_rec.exchange_rate
2090: );
2091: IF l_return_status = FND_API.g_ret_sts_error THEN
2092: RAISE FND_API.g_exc_error;
2093: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2094: RAISE FND_API.g_exc_unexpected_error;
2095: END IF;
2096: */

Line 2093: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2089: X_RATE => x_claim_rec.exchange_rate
2090: );
2091: IF l_return_status = FND_API.g_ret_sts_error THEN
2092: RAISE FND_API.g_exc_error;
2093: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2094: RAISE FND_API.g_exc_unexpected_error;
2095: END IF;
2096: */
2097:

Line 2094: RAISE FND_API.g_exc_unexpected_error;

2090: );
2091: IF l_return_status = FND_API.g_ret_sts_error THEN
2092: RAISE FND_API.g_exc_error;
2093: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2094: RAISE FND_API.g_exc_unexpected_error;
2095: END IF;
2096: */
2097:
2098: IF OZF_DEBUG_HIGH_ON THEN

Line 2102: WHEN FND_API.G_EXC_ERROR THEN

2098: IF OZF_DEBUG_HIGH_ON THEN
2099: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2100: END IF;
2101: EXCEPTION
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2106: WHEN OTHERS THEN

Line 2103: x_return_status := FND_API.G_RET_STS_ERROR;

2099: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2100: END IF;
2101: EXCEPTION
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2106: WHEN OTHERS THEN
2107: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 2104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2100: END IF;
2101: EXCEPTION
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2106: WHEN OTHERS THEN
2107: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2108: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 2105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2101: EXCEPTION
2102: WHEN FND_API.G_EXC_ERROR THEN
2103: x_return_status := FND_API.G_RET_STS_ERROR;
2104: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2105: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2106: WHEN OTHERS THEN
2107: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2108: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2109: END IF;

Line 2110: x_return_status := FND_API.g_ret_sts_unexp_error;

2106: WHEN OTHERS THEN
2107: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2108: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2109: END IF;
2110: x_return_status := FND_API.g_ret_sts_unexp_error;
2111:
2112: END Update_Claim_Remaining_Amount;
2113:
2114:

Line 2255: x_return_status := FND_API.g_ret_sts_unexp_error;

2251: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2252: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CHK_APPR_UNEXPERR');
2253: FND_MSG_PUB.add;
2254: END IF;
2255: x_return_status := FND_API.g_ret_sts_unexp_error;
2256: END Claim_Approval_Required;
2257:
2258:
2259: ---------------------------------------------------------------------

Line 2342: x_return_status := FND_API.g_ret_sts_success;

2338: OZF_Utility_PVT.debug_message('trunc(p_claim_exchange_date)' || trunc(p_claim_exchange_date));
2339: OZF_Utility_PVT.debug_message('p_claim_rate' || p_claim_rate);
2340: END IF;
2341:
2342: x_return_status := FND_API.g_ret_sts_success;
2343:
2344: l_claim_settled_date := p_settled_date;
2345:
2346: IF (trunc(p_settled_date) = trunc(p_claim_exchange_date)) THEN

Line 2413: IF l_return_status = FND_API.g_ret_sts_error THEN

2409: ,x_to_amount => l_lu_acctd_amount
2410: ,x_rate => l_claim_exc_rate
2411: );
2412:
2413: IF l_return_status = FND_API.g_ret_sts_error THEN
2414: RAISE FND_API.g_exc_error;
2415: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2416: RAISE FND_API.g_exc_unexpected_error;
2417: END IF;

Line 2414: RAISE FND_API.g_exc_error;

2410: ,x_rate => l_claim_exc_rate
2411: );
2412:
2413: IF l_return_status = FND_API.g_ret_sts_error THEN
2414: RAISE FND_API.g_exc_error;
2415: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2416: RAISE FND_API.g_exc_unexpected_error;
2417: END IF;
2418:

Line 2415: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2411: );
2412:
2413: IF l_return_status = FND_API.g_ret_sts_error THEN
2414: RAISE FND_API.g_exc_error;
2415: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2416: RAISE FND_API.g_exc_unexpected_error;
2417: END IF;
2418:
2419: OZF_UTILITY_PVT.Convert_Currency(

Line 2416: RAISE FND_API.g_exc_unexpected_error;

2412:
2413: IF l_return_status = FND_API.g_ret_sts_error THEN
2414: RAISE FND_API.g_exc_error;
2415: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2416: RAISE FND_API.g_exc_unexpected_error;
2417: END IF;
2418:
2419: OZF_UTILITY_PVT.Convert_Currency(
2420: p_from_currency => l_plan_currency_code

Line 2430: IF l_return_status = FND_API.g_ret_sts_error THEN

2426: ,x_to_amount => l_util_acctd_amount
2427: ,x_rate => l_fu_exc_rate
2428: );
2429:
2430: IF l_return_status = FND_API.g_ret_sts_error THEN
2431: RAISE FND_API.g_exc_error;
2432: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2433: RAISE FND_API.g_exc_unexpected_error;
2434: END IF;

Line 2431: RAISE FND_API.g_exc_error;

2427: ,x_rate => l_fu_exc_rate
2428: );
2429:
2430: IF l_return_status = FND_API.g_ret_sts_error THEN
2431: RAISE FND_API.g_exc_error;
2432: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2433: RAISE FND_API.g_exc_unexpected_error;
2434: END IF;
2435:

Line 2432: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2428: );
2429:
2430: IF l_return_status = FND_API.g_ret_sts_error THEN
2431: RAISE FND_API.g_exc_error;
2432: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2433: RAISE FND_API.g_exc_unexpected_error;
2434: END IF;
2435:
2436: l_fxgl_amount := l_lu_acctd_amount - l_util_acctd_amount;

Line 2433: RAISE FND_API.g_exc_unexpected_error;

2429:
2430: IF l_return_status = FND_API.g_ret_sts_error THEN
2431: RAISE FND_API.g_exc_error;
2432: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2433: RAISE FND_API.g_exc_unexpected_error;
2434: END IF;
2435:
2436: l_fxgl_amount := l_lu_acctd_amount - l_util_acctd_amount;
2437:

Line 2469: WHEN FND_API.G_EXC_ERROR THEN

2465: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2466: END IF;
2467:
2468: EXCEPTION
2469: WHEN FND_API.G_EXC_ERROR THEN
2470: x_return_status := FND_API.G_RET_STS_ERROR;
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 2470: x_return_status := FND_API.G_RET_STS_ERROR;

2466: END IF;
2467:
2468: EXCEPTION
2469: WHEN FND_API.G_EXC_ERROR THEN
2470: x_return_status := FND_API.G_RET_STS_ERROR;
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2474:

Line 2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2468: EXCEPTION
2469: WHEN FND_API.G_EXC_ERROR THEN
2470: x_return_status := FND_API.G_RET_STS_ERROR;
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2474:
2475: WHEN OTHERS THEN
2476: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2469: WHEN FND_API.G_EXC_ERROR THEN
2470: x_return_status := FND_API.G_RET_STS_ERROR;
2471:
2472: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2473: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2474:
2475: WHEN OTHERS THEN
2476: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2477: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 2479: x_return_status := FND_API.g_ret_sts_unexp_error;

2475: WHEN OTHERS THEN
2476: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2477: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2478: END IF;
2479: x_return_status := FND_API.g_ret_sts_unexp_error;
2480: END Recalculate_FXGL;
2481:
2482:
2483: ---------------------------------------------------------------------

Line 2494: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

2490: -- 03/22/2001 mchang Create.
2491: ---------------------------------------------------------------------
2492: PROCEDURE Complete_Settlement(
2493: p_api_version IN NUMBER
2494: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2495: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2496: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2497:
2498: ,x_return_status OUT NOCOPY VARCHAR2

Line 2495: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

2491: ---------------------------------------------------------------------
2492: PROCEDURE Complete_Settlement(
2493: p_api_version IN NUMBER
2494: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2495: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2496: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2497:
2498: ,x_return_status OUT NOCOPY VARCHAR2
2499: ,x_msg_data OUT NOCOPY VARCHAR2

Line 2496: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

2492: PROCEDURE Complete_Settlement(
2493: p_api_version IN NUMBER
2494: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2495: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2496: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2497:
2498: ,x_return_status OUT NOCOPY VARCHAR2
2499: ,x_msg_data OUT NOCOPY VARCHAR2
2500: ,x_msg_count OUT NOCOPY NUMBER

Line 2542: IF FND_API.to_boolean(p_init_msg_list) THEN

2538: IF OZF_DEBUG_HIGH_ON THEN
2539: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2540: END IF;
2541:
2542: IF FND_API.to_boolean(p_init_msg_list) THEN
2543: FND_MSG_PUB.initialize;
2544: END IF;
2545:
2546: IF NOT FND_API.compatible_api_call(

Line 2546: IF NOT FND_API.compatible_api_call(

2542: IF FND_API.to_boolean(p_init_msg_list) THEN
2543: FND_MSG_PUB.initialize;
2544: END IF;
2545:
2546: IF NOT FND_API.compatible_api_call(
2547: l_api_version,
2548: p_api_version,
2549: l_api_name,
2550: g_pkg_name

Line 2552: RAISE FND_API.g_exc_unexpected_error;

2548: p_api_version,
2549: l_api_name,
2550: g_pkg_name
2551: ) THEN
2552: RAISE FND_API.g_exc_unexpected_error;
2553: END IF;
2554:
2555: -- Initialize API return status to sucess
2556: x_return_status := FND_API.g_ret_sts_success;

Line 2556: x_return_status := FND_API.g_ret_sts_success;

2552: RAISE FND_API.g_exc_unexpected_error;
2553: END IF;
2554:
2555: -- Initialize API return status to sucess
2556: x_return_status := FND_API.g_ret_sts_success;
2557:
2558: OPEN csr_claim_prev_status(p_claim_rec.claim_id);
2559: FETCH csr_claim_prev_status INTO l_prev_status;
2560: CLOSE csr_claim_prev_status;

Line 2587: p_claim_rec.payment_method <> FND_API.G_MISS_CHAR THEN

2583: +-------------------------*/
2584: --nepanda : fix for bug # 9539273 - issue #3
2585: IF p_claim_rec.status_code IN ('NEW', 'OPEN') AND
2586: p_claim_rec.payment_method IS NOT NULL AND
2587: p_claim_rec.payment_method <> FND_API.G_MISS_CHAR THEN
2588: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim(
2589: p_api_version => l_api_version
2590: ,p_init_msg_list => FND_API.g_false
2591: ,p_validation_level => FND_API.g_valid_level_full

Line 2590: ,p_init_msg_list => FND_API.g_false

2586: p_claim_rec.payment_method IS NOT NULL AND
2587: p_claim_rec.payment_method <> FND_API.G_MISS_CHAR THEN
2588: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim(
2589: p_api_version => l_api_version
2590: ,p_init_msg_list => FND_API.g_false
2591: ,p_validation_level => FND_API.g_valid_level_full
2592: ,x_return_status => l_return_status
2593: ,x_msg_data => x_msg_data
2594: ,x_msg_count => x_msg_count

Line 2591: ,p_validation_level => FND_API.g_valid_level_full

2587: p_claim_rec.payment_method <> FND_API.G_MISS_CHAR THEN
2588: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim(
2589: p_api_version => l_api_version
2590: ,p_init_msg_list => FND_API.g_false
2591: ,p_validation_level => FND_API.g_valid_level_full
2592: ,x_return_status => l_return_status
2593: ,x_msg_data => x_msg_data
2594: ,x_msg_count => x_msg_count
2595: ,p_x_claim_rec => l_claim_rec

Line 2597: IF l_return_status = FND_API.g_ret_sts_error THEN

2593: ,x_msg_data => x_msg_data
2594: ,x_msg_count => x_msg_count
2595: ,p_x_claim_rec => l_claim_rec
2596: );
2597: IF l_return_status = FND_API.g_ret_sts_error THEN
2598: RAISE FND_API.g_exc_error;
2599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2600: RAISE FND_API.g_exc_unexpected_error;
2601: END IF;

Line 2598: RAISE FND_API.g_exc_error;

2594: ,x_msg_count => x_msg_count
2595: ,p_x_claim_rec => l_claim_rec
2596: );
2597: IF l_return_status = FND_API.g_ret_sts_error THEN
2598: RAISE FND_API.g_exc_error;
2599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2600: RAISE FND_API.g_exc_unexpected_error;
2601: END IF;
2602: END IF;

Line 2599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2595: ,p_x_claim_rec => l_claim_rec
2596: );
2597: IF l_return_status = FND_API.g_ret_sts_error THEN
2598: RAISE FND_API.g_exc_error;
2599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2600: RAISE FND_API.g_exc_unexpected_error;
2601: END IF;
2602: END IF;
2603:

Line 2600: RAISE FND_API.g_exc_unexpected_error;

2596: );
2597: IF l_return_status = FND_API.g_ret_sts_error THEN
2598: RAISE FND_API.g_exc_error;
2599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2600: RAISE FND_API.g_exc_unexpected_error;
2601: END IF;
2602: END IF;
2603:
2604: x_claim_rec := l_claim_rec;

Line 2626: IF l_return_status = FND_API.g_ret_sts_error THEN

2622: ,x_msg_count => x_msg_count
2623: ,x_msg_data => x_msg_data
2624: ,p_claim_id => l_claim_rec.claim_id
2625: );
2626: IF l_return_status = FND_API.g_ret_sts_error THEN
2627: RAISE FND_API.g_exc_error;
2628: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2629: RAISE FND_API.g_exc_unexpected_error;
2630: END IF;

Line 2627: RAISE FND_API.g_exc_error;

2623: ,x_msg_data => x_msg_data
2624: ,p_claim_id => l_claim_rec.claim_id
2625: );
2626: IF l_return_status = FND_API.g_ret_sts_error THEN
2627: RAISE FND_API.g_exc_error;
2628: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2629: RAISE FND_API.g_exc_unexpected_error;
2630: END IF;
2631: ELSE

Line 2628: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2624: ,p_claim_id => l_claim_rec.claim_id
2625: );
2626: IF l_return_status = FND_API.g_ret_sts_error THEN
2627: RAISE FND_API.g_exc_error;
2628: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2629: RAISE FND_API.g_exc_unexpected_error;
2630: END IF;
2631: ELSE
2632: Dispose_Invalid_Status_Order(

Line 2629: RAISE FND_API.g_exc_unexpected_error;

2625: );
2626: IF l_return_status = FND_API.g_ret_sts_error THEN
2627: RAISE FND_API.g_exc_error;
2628: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2629: RAISE FND_API.g_exc_unexpected_error;
2630: END IF;
2631: ELSE
2632: Dispose_Invalid_Status_Order(
2633: p_prev_status => l_prev_status

Line 2636: RAISE FND_API.g_exc_error;

2632: Dispose_Invalid_Status_Order(
2633: p_prev_status => l_prev_status
2634: ,p_curr_status => l_curr_status
2635: );
2636: RAISE FND_API.g_exc_error;
2637: END IF;
2638:
2639: -------- REJECTED --------
2640: -- NEW ---> REJECTED

Line 2653: IF l_return_status = FND_API.g_ret_sts_error THEN

2649: ,x_msg_data => x_msg_data
2650: ,p_claim_rec => l_claim_rec
2651: ,x_claim_rec => x_claim_rec
2652: );
2653: IF l_return_status = FND_API.g_ret_sts_error THEN
2654: RAISE FND_API.g_exc_error;
2655: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2656: RAISE FND_API.g_exc_unexpected_error;
2657: END IF;

Line 2654: RAISE FND_API.g_exc_error;

2650: ,p_claim_rec => l_claim_rec
2651: ,x_claim_rec => x_claim_rec
2652: );
2653: IF l_return_status = FND_API.g_ret_sts_error THEN
2654: RAISE FND_API.g_exc_error;
2655: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2656: RAISE FND_API.g_exc_unexpected_error;
2657: END IF;
2658: ELSE

Line 2655: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2651: ,x_claim_rec => x_claim_rec
2652: );
2653: IF l_return_status = FND_API.g_ret_sts_error THEN
2654: RAISE FND_API.g_exc_error;
2655: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2656: RAISE FND_API.g_exc_unexpected_error;
2657: END IF;
2658: ELSE
2659: Dispose_Invalid_Status_Order(

Line 2656: RAISE FND_API.g_exc_unexpected_error;

2652: );
2653: IF l_return_status = FND_API.g_ret_sts_error THEN
2654: RAISE FND_API.g_exc_error;
2655: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2656: RAISE FND_API.g_exc_unexpected_error;
2657: END IF;
2658: ELSE
2659: Dispose_Invalid_Status_Order(
2660: p_prev_status => l_prev_status

Line 2663: RAISE FND_API.g_exc_error;

2659: Dispose_Invalid_Status_Order(
2660: p_prev_status => l_prev_status
2661: ,p_curr_status => l_curr_status
2662: );
2663: RAISE FND_API.g_exc_error;
2664: END IF;
2665:
2666: -------- DUPLICATE --------
2667: -- NEW ---> DUPLICATE

Line 2677: IF l_return_status = FND_API.g_ret_sts_error THEN

2673: ,x_msg_count => x_msg_count
2674: ,x_msg_data => x_msg_data
2675: ,p_claim_id => l_claim_rec.claim_id
2676: );
2677: IF l_return_status = FND_API.g_ret_sts_error THEN
2678: RAISE FND_API.g_exc_error;
2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2680: RAISE FND_API.g_exc_unexpected_error;
2681: END IF;

Line 2678: RAISE FND_API.g_exc_error;

2674: ,x_msg_data => x_msg_data
2675: ,p_claim_id => l_claim_rec.claim_id
2676: );
2677: IF l_return_status = FND_API.g_ret_sts_error THEN
2678: RAISE FND_API.g_exc_error;
2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2680: RAISE FND_API.g_exc_unexpected_error;
2681: END IF;
2682: ELSE

Line 2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2675: ,p_claim_id => l_claim_rec.claim_id
2676: );
2677: IF l_return_status = FND_API.g_ret_sts_error THEN
2678: RAISE FND_API.g_exc_error;
2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2680: RAISE FND_API.g_exc_unexpected_error;
2681: END IF;
2682: ELSE
2683: Dispose_Invalid_Status_Order(

Line 2680: RAISE FND_API.g_exc_unexpected_error;

2676: );
2677: IF l_return_status = FND_API.g_ret_sts_error THEN
2678: RAISE FND_API.g_exc_error;
2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2680: RAISE FND_API.g_exc_unexpected_error;
2681: END IF;
2682: ELSE
2683: Dispose_Invalid_Status_Order(
2684: p_prev_status => l_prev_status

Line 2687: RAISE FND_API.g_exc_error;

2683: Dispose_Invalid_Status_Order(
2684: p_prev_status => l_prev_status
2685: ,p_curr_status => l_curr_status
2686: );
2687: RAISE FND_API.g_exc_error;
2688: END IF;
2689: -------- COMPLETE --------
2690: -- OPEN ---> COMPLETE
2691: ELSIF l_curr_status = 'COMPLETE' THEN

Line 2700: IF l_return_status = FND_API.g_ret_sts_error THEN

2696: ,x_msg_data => x_msg_data
2697: ,p_claim_rec => l_claim_rec
2698: ,x_claim_rec => x_claim_rec
2699: );
2700: IF l_return_status = FND_API.g_ret_sts_error THEN
2701: RAISE FND_API.g_exc_error;
2702: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2703: RAISE FND_API.g_exc_unexpected_error;
2704: END IF;

Line 2701: RAISE FND_API.g_exc_error;

2697: ,p_claim_rec => l_claim_rec
2698: ,x_claim_rec => x_claim_rec
2699: );
2700: IF l_return_status = FND_API.g_ret_sts_error THEN
2701: RAISE FND_API.g_exc_error;
2702: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2703: RAISE FND_API.g_exc_unexpected_error;
2704: END IF;
2705: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN

Line 2702: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2698: ,x_claim_rec => x_claim_rec
2699: );
2700: IF l_return_status = FND_API.g_ret_sts_error THEN
2701: RAISE FND_API.g_exc_error;
2702: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2703: RAISE FND_API.g_exc_unexpected_error;
2704: END IF;
2705: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN
2706: Dispose_Invalid_Status_Order(

Line 2703: RAISE FND_API.g_exc_unexpected_error;

2699: );
2700: IF l_return_status = FND_API.g_ret_sts_error THEN
2701: RAISE FND_API.g_exc_error;
2702: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2703: RAISE FND_API.g_exc_unexpected_error;
2704: END IF;
2705: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN
2706: Dispose_Invalid_Status_Order(
2707: p_prev_status => l_prev_status

Line 2710: RAISE FND_API.g_exc_error;

2706: Dispose_Invalid_Status_Order(
2707: p_prev_status => l_prev_status
2708: ,p_curr_status => l_curr_status
2709: );
2710: RAISE FND_API.g_exc_error;
2711: END IF;
2712:
2713: -------- CLOSED --------
2714: ELSIF l_curr_status = 'CLOSED' THEN

Line 2725: IF l_return_status = FND_API.g_ret_sts_error THEN

2721: ,x_msg_data => x_msg_data
2722: ,x_msg_count => x_msg_count
2723: ,x_approval_require => l_approval_require
2724: );
2725: IF l_return_status = FND_API.g_ret_sts_error THEN
2726: RAISE FND_API.g_exc_error;
2727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2728: RAISE FND_API.g_exc_unexpected_error;
2729: END IF;

Line 2726: RAISE FND_API.g_exc_error;

2722: ,x_msg_count => x_msg_count
2723: ,x_approval_require => l_approval_require
2724: );
2725: IF l_return_status = FND_API.g_ret_sts_error THEN
2726: RAISE FND_API.g_exc_error;
2727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2728: RAISE FND_API.g_exc_unexpected_error;
2729: END IF;
2730: ELSE

Line 2727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2723: ,x_approval_require => l_approval_require
2724: );
2725: IF l_return_status = FND_API.g_ret_sts_error THEN
2726: RAISE FND_API.g_exc_error;
2727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2728: RAISE FND_API.g_exc_unexpected_error;
2729: END IF;
2730: ELSE
2731: -- For Credit Match

Line 2728: RAISE FND_API.g_exc_unexpected_error;

2724: );
2725: IF l_return_status = FND_API.g_ret_sts_error THEN
2726: RAISE FND_API.g_exc_error;
2727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2728: RAISE FND_API.g_exc_unexpected_error;
2729: END IF;
2730: ELSE
2731: -- For Credit Match
2732: IF (p_claim_rec.payment_reference_number IS NOT NULL

Line 2754: IF l_return_status = FND_API.g_ret_sts_error THEN

2750: ,x_msg_data => x_msg_data
2751: ,p_claim_rec => l_claim_rec
2752: ,x_claim_rec => x_claim_rec
2753: );
2754: IF l_return_status = FND_API.g_ret_sts_error THEN
2755: RAISE FND_API.g_exc_error;
2756: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2757: RAISE FND_API.g_exc_unexpected_error;
2758: END IF;

Line 2755: RAISE FND_API.g_exc_error;

2751: ,p_claim_rec => l_claim_rec
2752: ,x_claim_rec => x_claim_rec
2753: );
2754: IF l_return_status = FND_API.g_ret_sts_error THEN
2755: RAISE FND_API.g_exc_error;
2756: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2757: RAISE FND_API.g_exc_unexpected_error;
2758: END IF;
2759: END IF;

Line 2756: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2752: ,x_claim_rec => x_claim_rec
2753: );
2754: IF l_return_status = FND_API.g_ret_sts_error THEN
2755: RAISE FND_API.g_exc_error;
2756: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2757: RAISE FND_API.g_exc_unexpected_error;
2758: END IF;
2759: END IF;
2760:

Line 2757: RAISE FND_API.g_exc_unexpected_error;

2753: );
2754: IF l_return_status = FND_API.g_ret_sts_error THEN
2755: RAISE FND_API.g_exc_error;
2756: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2757: RAISE FND_API.g_exc_unexpected_error;
2758: END IF;
2759: END IF;
2760:
2761: END IF;

Line 2774: IF l_return_status = FND_API.g_ret_sts_error THEN

2770: ,x_msg_data => x_msg_data
2771: ,p_claim_rec => l_claim_rec
2772: ,x_claim_rec => l_complete_claim_rec
2773: );
2774: IF l_return_status = FND_API.g_ret_sts_error THEN
2775: RAISE FND_API.g_exc_error;
2776: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2777: RAISE FND_API.g_exc_unexpected_error;
2778: END IF;

Line 2775: RAISE FND_API.g_exc_error;

2771: ,p_claim_rec => l_claim_rec
2772: ,x_claim_rec => l_complete_claim_rec
2773: );
2774: IF l_return_status = FND_API.g_ret_sts_error THEN
2775: RAISE FND_API.g_exc_error;
2776: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2777: RAISE FND_API.g_exc_unexpected_error;
2778: END IF;
2779:

Line 2776: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2772: ,x_claim_rec => l_complete_claim_rec
2773: );
2774: IF l_return_status = FND_API.g_ret_sts_error THEN
2775: RAISE FND_API.g_exc_error;
2776: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2777: RAISE FND_API.g_exc_unexpected_error;
2778: END IF;
2779:
2780: l_claim_rec := l_complete_claim_rec;

Line 2777: RAISE FND_API.g_exc_unexpected_error;

2773: );
2774: IF l_return_status = FND_API.g_ret_sts_error THEN
2775: RAISE FND_API.g_exc_error;
2776: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2777: RAISE FND_API.g_exc_unexpected_error;
2778: END IF;
2779:
2780: l_claim_rec := l_complete_claim_rec;
2781:

Line 2791: IF l_return_status = FND_API.g_ret_sts_error THEN

2787: ,x_msg_data => x_msg_data
2788: ,p_claim_rec => l_claim_rec
2789: ,x_claim_rec => x_claim_rec
2790: );
2791: IF l_return_status = FND_API.g_ret_sts_error THEN
2792: RAISE FND_API.g_exc_error;
2793: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2794: RAISE FND_API.g_exc_unexpected_error;
2795: END IF;

Line 2792: RAISE FND_API.g_exc_error;

2788: ,p_claim_rec => l_claim_rec
2789: ,x_claim_rec => x_claim_rec
2790: );
2791: IF l_return_status = FND_API.g_ret_sts_error THEN
2792: RAISE FND_API.g_exc_error;
2793: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2794: RAISE FND_API.g_exc_unexpected_error;
2795: END IF;
2796: ELSE -- skip approval workflow

Line 2793: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2789: ,x_claim_rec => x_claim_rec
2790: );
2791: IF l_return_status = FND_API.g_ret_sts_error THEN
2792: RAISE FND_API.g_exc_error;
2793: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2794: RAISE FND_API.g_exc_unexpected_error;
2795: END IF;
2796: ELSE -- skip approval workflow
2797: Create_Payment_for_Completion (

Line 2794: RAISE FND_API.g_exc_unexpected_error;

2790: );
2791: IF l_return_status = FND_API.g_ret_sts_error THEN
2792: RAISE FND_API.g_exc_error;
2793: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2794: RAISE FND_API.g_exc_unexpected_error;
2795: END IF;
2796: ELSE -- skip approval workflow
2797: Create_Payment_for_Completion (
2798: x_return_status => l_return_status

Line 2807: IF l_return_status = FND_API.g_ret_sts_error THEN

2803: ,p_prev_status => l_prev_status
2804: ,p_curr_status => l_curr_status
2805: ,x_claim_rec => x_claim_rec
2806: );
2807: IF l_return_status = FND_API.g_ret_sts_error THEN
2808: RAISE FND_API.g_exc_error;
2809: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2810: RAISE FND_API.g_exc_unexpected_error;
2811: END IF;

Line 2808: RAISE FND_API.g_exc_error;

2804: ,p_curr_status => l_curr_status
2805: ,x_claim_rec => x_claim_rec
2806: );
2807: IF l_return_status = FND_API.g_ret_sts_error THEN
2808: RAISE FND_API.g_exc_error;
2809: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2810: RAISE FND_API.g_exc_unexpected_error;
2811: END IF;
2812: END IF;

Line 2809: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2805: ,x_claim_rec => x_claim_rec
2806: );
2807: IF l_return_status = FND_API.g_ret_sts_error THEN
2808: RAISE FND_API.g_exc_error;
2809: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2810: RAISE FND_API.g_exc_unexpected_error;
2811: END IF;
2812: END IF;
2813:

Line 2810: RAISE FND_API.g_exc_unexpected_error;

2806: );
2807: IF l_return_status = FND_API.g_ret_sts_error THEN
2808: RAISE FND_API.g_exc_error;
2809: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2810: RAISE FND_API.g_exc_unexpected_error;
2811: END IF;
2812: END IF;
2813:
2814: /*-----------------------------------*

Line 2826: IF l_return_status = FND_API.g_ret_sts_error THEN

2822: ,x_msg_data => x_msg_data
2823: ,p_claim_rec => l_claim_rec
2824: ,x_claim_rec => x_claim_rec
2825: );
2826: IF l_return_status = FND_API.g_ret_sts_error THEN
2827: RAISE FND_API.g_exc_error;
2828: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2829: RAISE FND_API.g_exc_unexpected_error;
2830: END IF;

Line 2827: RAISE FND_API.g_exc_error;

2823: ,p_claim_rec => l_claim_rec
2824: ,x_claim_rec => x_claim_rec
2825: );
2826: IF l_return_status = FND_API.g_ret_sts_error THEN
2827: RAISE FND_API.g_exc_error;
2828: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2829: RAISE FND_API.g_exc_unexpected_error;
2830: END IF;
2831: ELSE -- skip approval workflow

Line 2828: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2824: ,x_claim_rec => x_claim_rec
2825: );
2826: IF l_return_status = FND_API.g_ret_sts_error THEN
2827: RAISE FND_API.g_exc_error;
2828: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2829: RAISE FND_API.g_exc_unexpected_error;
2830: END IF;
2831: ELSE -- skip approval workflow
2832: Create_Payment_for_Completion (

Line 2829: RAISE FND_API.g_exc_unexpected_error;

2825: );
2826: IF l_return_status = FND_API.g_ret_sts_error THEN
2827: RAISE FND_API.g_exc_error;
2828: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2829: RAISE FND_API.g_exc_unexpected_error;
2830: END IF;
2831: ELSE -- skip approval workflow
2832: Create_Payment_for_Completion (
2833: x_return_status => l_return_status

Line 2842: IF l_return_status = FND_API.g_ret_sts_error THEN

2838: ,p_prev_status => l_prev_status
2839: ,p_curr_status => l_curr_status
2840: ,x_claim_rec => x_claim_rec
2841: );
2842: IF l_return_status = FND_API.g_ret_sts_error THEN
2843: RAISE FND_API.g_exc_error;
2844: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2845: RAISE FND_API.g_exc_unexpected_error;
2846: END IF;

Line 2843: RAISE FND_API.g_exc_error;

2839: ,p_curr_status => l_curr_status
2840: ,x_claim_rec => x_claim_rec
2841: );
2842: IF l_return_status = FND_API.g_ret_sts_error THEN
2843: RAISE FND_API.g_exc_error;
2844: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2845: RAISE FND_API.g_exc_unexpected_error;
2846: END IF;
2847: END IF;

Line 2844: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2840: ,x_claim_rec => x_claim_rec
2841: );
2842: IF l_return_status = FND_API.g_ret_sts_error THEN
2843: RAISE FND_API.g_exc_error;
2844: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2845: RAISE FND_API.g_exc_unexpected_error;
2846: END IF;
2847: END IF;
2848:

Line 2845: RAISE FND_API.g_exc_unexpected_error;

2841: );
2842: IF l_return_status = FND_API.g_ret_sts_error THEN
2843: RAISE FND_API.g_exc_error;
2844: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2845: RAISE FND_API.g_exc_unexpected_error;
2846: END IF;
2847: END IF;
2848:
2849: /*----------------------------------------------------*

Line 2864: IF l_return_status = FND_API.g_ret_sts_error THEN

2860: ,p_prev_status => l_prev_status
2861: ,p_curr_status => l_curr_status
2862: ,x_claim_rec => x_claim_rec
2863: );
2864: IF l_return_status = FND_API.g_ret_sts_error THEN
2865: RAISE FND_API.g_exc_error;
2866: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2867: RAISE FND_API.g_exc_unexpected_error;
2868: END IF;

Line 2865: RAISE FND_API.g_exc_error;

2861: ,p_curr_status => l_curr_status
2862: ,x_claim_rec => x_claim_rec
2863: );
2864: IF l_return_status = FND_API.g_ret_sts_error THEN
2865: RAISE FND_API.g_exc_error;
2866: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2867: RAISE FND_API.g_exc_unexpected_error;
2868: END IF;
2869:

Line 2866: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2862: ,x_claim_rec => x_claim_rec
2863: );
2864: IF l_return_status = FND_API.g_ret_sts_error THEN
2865: RAISE FND_API.g_exc_error;
2866: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2867: RAISE FND_API.g_exc_unexpected_error;
2868: END IF;
2869:
2870: /*----------------------------------------*

Line 2867: RAISE FND_API.g_exc_unexpected_error;

2863: );
2864: IF l_return_status = FND_API.g_ret_sts_error THEN
2865: RAISE FND_API.g_exc_error;
2866: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2867: RAISE FND_API.g_exc_unexpected_error;
2868: END IF;
2869:
2870: /*----------------------------------------*
2871: | PENDING_CLOSE --> CLOSED :Completion

Line 2881: IF l_return_status = FND_API.g_ret_sts_error THEN

2877: ,x_msg_data => x_msg_data
2878: ,p_claim_rec => l_claim_rec
2879: ,x_claim_rec => x_claim_rec
2880: );
2881: IF l_return_status = FND_API.g_ret_sts_error THEN
2882: RAISE FND_API.g_exc_error;
2883: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2884: RAISE FND_API.g_exc_unexpected_error;
2885: END IF;

Line 2882: RAISE FND_API.g_exc_error;

2878: ,p_claim_rec => l_claim_rec
2879: ,x_claim_rec => x_claim_rec
2880: );
2881: IF l_return_status = FND_API.g_ret_sts_error THEN
2882: RAISE FND_API.g_exc_error;
2883: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2884: RAISE FND_API.g_exc_unexpected_error;
2885: END IF;
2886:

Line 2883: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2879: ,x_claim_rec => x_claim_rec
2880: );
2881: IF l_return_status = FND_API.g_ret_sts_error THEN
2882: RAISE FND_API.g_exc_error;
2883: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2884: RAISE FND_API.g_exc_unexpected_error;
2885: END IF;
2886:
2887: ELSE

Line 2884: RAISE FND_API.g_exc_unexpected_error;

2880: );
2881: IF l_return_status = FND_API.g_ret_sts_error THEN
2882: RAISE FND_API.g_exc_error;
2883: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2884: RAISE FND_API.g_exc_unexpected_error;
2885: END IF;
2886:
2887: ELSE
2888: IF l_prev_status <> 'PENDING_CLOSE' THEN

Line 2893: RAISE FND_API.g_exc_error;

2889: Dispose_Invalid_Status_Order(
2890: p_prev_status => l_prev_status
2891: ,p_curr_status => l_curr_status
2892: );
2893: RAISE FND_API.g_exc_error;
2894: END IF;
2895: END IF;
2896:
2897: -------- PENDING_APPROVAL (for Mass Settlement) --------

Line 2907: IF l_return_status = FND_API.g_ret_sts_error THEN

2903: ,x_msg_data => x_msg_data
2904: ,p_claim_rec => l_claim_rec
2905: ,x_claim_rec => x_claim_rec
2906: );
2907: IF l_return_status = FND_API.g_ret_sts_error THEN
2908: RAISE FND_API.g_exc_error;
2909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2910: RAISE FND_API.g_exc_unexpected_error;
2911: END IF;

Line 2908: RAISE FND_API.g_exc_error;

2904: ,p_claim_rec => l_claim_rec
2905: ,x_claim_rec => x_claim_rec
2906: );
2907: IF l_return_status = FND_API.g_ret_sts_error THEN
2908: RAISE FND_API.g_exc_error;
2909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2910: RAISE FND_API.g_exc_unexpected_error;
2911: END IF;
2912: END IF;

Line 2909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2905: ,x_claim_rec => x_claim_rec
2906: );
2907: IF l_return_status = FND_API.g_ret_sts_error THEN
2908: RAISE FND_API.g_exc_error;
2909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2910: RAISE FND_API.g_exc_unexpected_error;
2911: END IF;
2912: END IF;
2913:

Line 2910: RAISE FND_API.g_exc_unexpected_error;

2906: );
2907: IF l_return_status = FND_API.g_ret_sts_error THEN
2908: RAISE FND_API.g_exc_error;
2909: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2910: RAISE FND_API.g_exc_unexpected_error;
2911: END IF;
2912: END IF;
2913:
2914: /*

Line 2933: RAISE FND_API.g_exc_error;

2929: Dispose_Invalid_Status_Order(
2930: p_prev_status => l_prev_status
2931: ,p_curr_status => l_curr_status
2932: );
2933: RAISE FND_API.g_exc_error;
2934: END IF;
2935: -------- ARCHIVED --------
2936: ELSIF l_curr_status = 'ARCHIVED' THEN
2937: IF l_prev_status IN ( 'NEW'

Line 2948: RAISE FND_API.g_exc_error;

2944: Dispose_Invalid_Status_Order(
2945: p_prev_status => l_prev_status
2946: ,p_curr_status => l_curr_status
2947: );
2948: RAISE FND_API.g_exc_error;
2949: END IF;
2950: -------- OPEN --------
2951: ELSIF l_curr_status = 'OPEN' THEN
2952: IF l_prev_status IN ( --'COMPLETE'

Line 2961: RAISE FND_API.g_exc_error;

2957: Dispose_Invalid_Status_Order(
2958: p_prev_status => l_prev_status
2959: ,p_curr_status => l_curr_status
2960: );
2961: RAISE FND_API.g_exc_error;
2962: /*---------------------------*
2963: | PENDING_APPROVAL --> OPEN
2964: | PENDING_CLOSE --> OPEN
2965: *---------------------------*/

Line 2974: IF l_return_status = FND_API.g_ret_sts_error THEN

2970: ,x_msg_data => x_msg_data
2971: ,p_claim_rec => l_claim_rec
2972: ,x_claim_rec => x_claim_rec
2973: );
2974: IF l_return_status = FND_API.g_ret_sts_error THEN
2975: RAISE FND_API.g_exc_error;
2976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2977: RAISE FND_API.g_exc_unexpected_error;
2978: END IF;

Line 2975: RAISE FND_API.g_exc_error;

2971: ,p_claim_rec => l_claim_rec
2972: ,x_claim_rec => x_claim_rec
2973: );
2974: IF l_return_status = FND_API.g_ret_sts_error THEN
2975: RAISE FND_API.g_exc_error;
2976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2977: RAISE FND_API.g_exc_unexpected_error;
2978: END IF;
2979: END IF;

Line 2976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2972: ,x_claim_rec => x_claim_rec
2973: );
2974: IF l_return_status = FND_API.g_ret_sts_error THEN
2975: RAISE FND_API.g_exc_error;
2976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2977: RAISE FND_API.g_exc_unexpected_error;
2978: END IF;
2979: END IF;
2980:

Line 2977: RAISE FND_API.g_exc_unexpected_error;

2973: );
2974: IF l_return_status = FND_API.g_ret_sts_error THEN
2975: RAISE FND_API.g_exc_error;
2976: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2977: RAISE FND_API.g_exc_unexpected_error;
2978: END IF;
2979: END IF;
2980:
2981: -------- PENDING_CLOSED --------

Line 2996: RAISE FND_API.g_exc_error;

2992: Dispose_Invalid_Status_Order(
2993: p_prev_status => l_prev_status
2994: ,p_curr_status => l_curr_status
2995: );
2996: RAISE FND_API.g_exc_error;
2997: END IF;
2998: END IF;
2999: --Printing the values for Claim Multi Currency
3000:

Line 3023: IF l_return_status = FND_API.g_ret_sts_error THEN

3019: IF OZF_DEBUG_HIGH_ON THEN
3020: OZF_Utility_PVT.debug_message('l_return_status' ||l_return_status);
3021: END IF;
3022:
3023: IF l_return_status = FND_API.g_ret_sts_error THEN
3024: RAISE FND_API.g_exc_error;
3025: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3026: RAISE FND_API.g_exc_unexpected_error;
3027: END IF;

Line 3024: RAISE FND_API.g_exc_error;

3020: OZF_Utility_PVT.debug_message('l_return_status' ||l_return_status);
3021: END IF;
3022:
3023: IF l_return_status = FND_API.g_ret_sts_error THEN
3024: RAISE FND_API.g_exc_error;
3025: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3026: RAISE FND_API.g_exc_unexpected_error;
3027: END IF;
3028:

Line 3025: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3021: END IF;
3022:
3023: IF l_return_status = FND_API.g_ret_sts_error THEN
3024: RAISE FND_API.g_exc_error;
3025: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3026: RAISE FND_API.g_exc_unexpected_error;
3027: END IF;
3028:
3029: END IF;

Line 3026: RAISE FND_API.g_exc_unexpected_error;

3022:
3023: IF l_return_status = FND_API.g_ret_sts_error THEN
3024: RAISE FND_API.g_exc_error;
3025: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3026: RAISE FND_API.g_exc_unexpected_error;
3027: END IF;
3028:
3029: END IF;
3030: END IF; -- end of complete settlement

Line 3035: IF FND_API.to_boolean(p_commit) THEN

3031:
3032: ------------------------- finish -------------------------------
3033: /*
3034: -- Check for commit
3035: IF FND_API.to_boolean(p_commit) THEN
3036: COMMIT;
3037: END IF;
3038: */
3039:

Line 3041: p_encoded => FND_API.g_false,

3037: END IF;
3038: */
3039:
3040: FND_MSG_PUB.count_and_get(
3041: p_encoded => FND_API.g_false,
3042: p_count => x_msg_count,
3043: p_data => x_msg_data
3044: );
3045:

Line 3051: WHEN FND_API.g_exc_error THEN

3047: OZF_Utility_PVT.debug_message(l_full_name ||': end');
3048: END IF;
3049:
3050: EXCEPTION
3051: WHEN FND_API.g_exc_error THEN
3052: ROLLBACK TO Complete_Settlement;
3053: x_return_status := FND_API.g_ret_sts_error;
3054: FND_MSG_PUB.count_and_get (
3055: p_encoded => FND_API.g_false,

Line 3053: x_return_status := FND_API.g_ret_sts_error;

3049:
3050: EXCEPTION
3051: WHEN FND_API.g_exc_error THEN
3052: ROLLBACK TO Complete_Settlement;
3053: x_return_status := FND_API.g_ret_sts_error;
3054: FND_MSG_PUB.count_and_get (
3055: p_encoded => FND_API.g_false,
3056: p_count => x_msg_count,
3057: p_data => x_msg_data

Line 3055: p_encoded => FND_API.g_false,

3051: WHEN FND_API.g_exc_error THEN
3052: ROLLBACK TO Complete_Settlement;
3053: x_return_status := FND_API.g_ret_sts_error;
3054: FND_MSG_PUB.count_and_get (
3055: p_encoded => FND_API.g_false,
3056: p_count => x_msg_count,
3057: p_data => x_msg_data
3058: );
3059: WHEN FND_API.g_exc_unexpected_error THEN

Line 3059: WHEN FND_API.g_exc_unexpected_error THEN

3055: p_encoded => FND_API.g_false,
3056: p_count => x_msg_count,
3057: p_data => x_msg_data
3058: );
3059: WHEN FND_API.g_exc_unexpected_error THEN
3060: ROLLBACK TO Complete_Settlement;
3061: x_return_status := FND_API.g_ret_sts_unexp_error ;
3062: FND_MSG_PUB.count_and_get (
3063: p_encoded => FND_API.g_false,

Line 3061: x_return_status := FND_API.g_ret_sts_unexp_error ;

3057: p_data => x_msg_data
3058: );
3059: WHEN FND_API.g_exc_unexpected_error THEN
3060: ROLLBACK TO Complete_Settlement;
3061: x_return_status := FND_API.g_ret_sts_unexp_error ;
3062: FND_MSG_PUB.count_and_get (
3063: p_encoded => FND_API.g_false,
3064: p_count => x_msg_count,
3065: p_data => x_msg_data

Line 3063: p_encoded => FND_API.g_false,

3059: WHEN FND_API.g_exc_unexpected_error THEN
3060: ROLLBACK TO Complete_Settlement;
3061: x_return_status := FND_API.g_ret_sts_unexp_error ;
3062: FND_MSG_PUB.count_and_get (
3063: p_encoded => FND_API.g_false,
3064: p_count => x_msg_count,
3065: p_data => x_msg_data
3066: );
3067: WHEN OTHERS THEN

Line 3069: x_return_status := FND_API.g_ret_sts_unexp_error ;

3065: p_data => x_msg_data
3066: );
3067: WHEN OTHERS THEN
3068: ROLLBACK TO Complete_Settlement;
3069: x_return_status := FND_API.g_ret_sts_unexp_error ;
3070: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3071: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3072: END IF;
3073: FND_MSG_PUB.count_and_get (

Line 3074: p_encoded => FND_API.g_false,

3070: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3071: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3072: END IF;
3073: FND_MSG_PUB.count_and_get (
3074: p_encoded => FND_API.g_false,
3075: p_count => x_msg_count,
3076: p_data => x_msg_data
3077: );
3078:

Line 3093: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

3089: -- 10-AUG-2001 mchang Create.
3090: ---------------------------------------------------------------------
3091: PROCEDURE Settle_Claim(
3092: p_api_version IN NUMBER
3093: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3094: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3095: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3096:
3097: ,x_return_status OUT NOCOPY VARCHAR2

Line 3094: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

3090: ---------------------------------------------------------------------
3091: PROCEDURE Settle_Claim(
3092: p_api_version IN NUMBER
3093: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3094: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3095: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3096:
3097: ,x_return_status OUT NOCOPY VARCHAR2
3098: ,x_msg_data OUT NOCOPY VARCHAR2

Line 3095: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

3091: PROCEDURE Settle_Claim(
3092: p_api_version IN NUMBER
3093: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3094: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3095: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3096:
3097: ,x_return_status OUT NOCOPY VARCHAR2
3098: ,x_msg_data OUT NOCOPY VARCHAR2
3099: ,x_msg_count OUT NOCOPY NUMBER

Line 3147: IF FND_API.to_boolean(p_init_msg_list) THEN

3143: IF OZF_DEBUG_HIGH_ON THEN
3144: OZF_Utility_PVT.debug_message(l_full_name||' : start');
3145: END IF;
3146:
3147: IF FND_API.to_boolean(p_init_msg_list) THEN
3148: FND_MSG_PUB.initialize;
3149: END IF;
3150:
3151: IF NOT FND_API.compatible_api_call(

Line 3151: IF NOT FND_API.compatible_api_call(

3147: IF FND_API.to_boolean(p_init_msg_list) THEN
3148: FND_MSG_PUB.initialize;
3149: END IF;
3150:
3151: IF NOT FND_API.compatible_api_call(
3152: l_api_version,
3153: p_api_version,
3154: l_api_name,
3155: g_pkg_name

Line 3157: RAISE FND_API.g_exc_unexpected_error;

3153: p_api_version,
3154: l_api_name,
3155: g_pkg_name
3156: ) THEN
3157: RAISE FND_API.g_exc_unexpected_error;
3158: END IF;
3159:
3160: -- Initialize API return status to sucess
3161: x_return_status := FND_API.g_ret_sts_success;

Line 3161: x_return_status := FND_API.g_ret_sts_success;

3157: RAISE FND_API.g_exc_unexpected_error;
3158: END IF;
3159:
3160: -- Initialize API return status to sucess
3161: x_return_status := FND_API.g_ret_sts_success;
3162:
3163: --------------------- Start -----------------------
3164: IF p_curr_status = 'CANCELLED' THEN
3165: Cancel_Claim_for_Settlement (

Line 3173: IF l_return_status = FND_API.g_ret_sts_error THEN

3169: ,p_claim_id => p_claim_id
3170: ,p_prev_status => p_prev_status
3171: ,p_curr_status => p_curr_status
3172: );
3173: IF l_return_status = FND_API.g_ret_sts_error THEN
3174: RAISE FND_API.g_exc_error;
3175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3176: RAISE FND_API.g_exc_unexpected_error;
3177: END IF;

Line 3174: RAISE FND_API.g_exc_error;

3170: ,p_prev_status => p_prev_status
3171: ,p_curr_status => p_curr_status
3172: );
3173: IF l_return_status = FND_API.g_ret_sts_error THEN
3174: RAISE FND_API.g_exc_error;
3175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3176: RAISE FND_API.g_exc_unexpected_error;
3177: END IF;
3178:

Line 3175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3171: ,p_curr_status => p_curr_status
3172: );
3173: IF l_return_status = FND_API.g_ret_sts_error THEN
3174: RAISE FND_API.g_exc_error;
3175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3176: RAISE FND_API.g_exc_unexpected_error;
3177: END IF;
3178:
3179: ELSIF p_curr_status = 'REJECTED' THEN

Line 3176: RAISE FND_API.g_exc_unexpected_error;

3172: );
3173: IF l_return_status = FND_API.g_ret_sts_error THEN
3174: RAISE FND_API.g_exc_error;
3175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3176: RAISE FND_API.g_exc_unexpected_error;
3177: END IF;
3178:
3179: ELSIF p_curr_status = 'REJECTED' THEN
3180: Reject_Claim_for_Settlement (

Line 3188: IF l_return_status = FND_API.g_ret_sts_error THEN

3184: ,p_claim_id => p_claim_id
3185: ,p_prev_status => p_prev_status
3186: ,p_curr_status => p_curr_status
3187: );
3188: IF l_return_status = FND_API.g_ret_sts_error THEN
3189: RAISE FND_API.g_exc_error;
3190: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3191: RAISE FND_API.g_exc_unexpected_error;
3192: END IF;

Line 3189: RAISE FND_API.g_exc_error;

3185: ,p_prev_status => p_prev_status
3186: ,p_curr_status => p_curr_status
3187: );
3188: IF l_return_status = FND_API.g_ret_sts_error THEN
3189: RAISE FND_API.g_exc_error;
3190: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3191: RAISE FND_API.g_exc_unexpected_error;
3192: END IF;
3193:

Line 3190: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3186: ,p_curr_status => p_curr_status
3187: );
3188: IF l_return_status = FND_API.g_ret_sts_error THEN
3189: RAISE FND_API.g_exc_error;
3190: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3191: RAISE FND_API.g_exc_unexpected_error;
3192: END IF;
3193:
3194: ELSIF p_curr_status = 'DUPLICATE' THEN

Line 3191: RAISE FND_API.g_exc_unexpected_error;

3187: );
3188: IF l_return_status = FND_API.g_ret_sts_error THEN
3189: RAISE FND_API.g_exc_error;
3190: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3191: RAISE FND_API.g_exc_unexpected_error;
3192: END IF;
3193:
3194: ELSIF p_curr_status = 'DUPLICATE' THEN
3195: /* empty implementation */

Line 3196: l_return_status := FND_API.g_ret_sts_success;

3192: END IF;
3193:
3194: ELSIF p_curr_status = 'DUPLICATE' THEN
3195: /* empty implementation */
3196: l_return_status := FND_API.g_ret_sts_success;
3197:
3198: ELSIF p_curr_status = 'COMPLETE' THEN
3199: Complete_Claim_for_Settlement (
3200: x_return_status => l_return_status

Line 3205: IF l_return_status = FND_API.g_ret_sts_error THEN

3201: ,x_msg_count => x_msg_count
3202: ,x_msg_data => x_msg_data
3203: ,p_claim_id => p_claim_id
3204: );
3205: IF l_return_status = FND_API.g_ret_sts_error THEN
3206: RAISE FND_API.g_exc_error;
3207: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3208: RAISE FND_API.g_exc_unexpected_error;
3209: END IF;

Line 3206: RAISE FND_API.g_exc_error;

3202: ,x_msg_data => x_msg_data
3203: ,p_claim_id => p_claim_id
3204: );
3205: IF l_return_status = FND_API.g_ret_sts_error THEN
3206: RAISE FND_API.g_exc_error;
3207: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3208: RAISE FND_API.g_exc_unexpected_error;
3209: END IF;
3210:

Line 3207: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3203: ,p_claim_id => p_claim_id
3204: );
3205: IF l_return_status = FND_API.g_ret_sts_error THEN
3206: RAISE FND_API.g_exc_error;
3207: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3208: RAISE FND_API.g_exc_unexpected_error;
3209: END IF;
3210:
3211: ELSIF p_curr_status = 'CLOSED' THEN

Line 3208: RAISE FND_API.g_exc_unexpected_error;

3204: );
3205: IF l_return_status = FND_API.g_ret_sts_error THEN
3206: RAISE FND_API.g_exc_error;
3207: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3208: RAISE FND_API.g_exc_unexpected_error;
3209: END IF;
3210:
3211: ELSIF p_curr_status = 'CLOSED' THEN
3212: -- Added For Rule Based Settlement ER

Line 3246: IF l_return_status = FND_API.g_ret_sts_error THEN

3242: ,x_msg_data => x_msg_data
3243: ,x_msg_count => x_msg_count
3244: ,x_approval_require => l_approval_require
3245: );
3246: IF l_return_status = FND_API.g_ret_sts_error THEN
3247: RAISE FND_API.g_exc_error;
3248: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3249: RAISE FND_API.g_exc_unexpected_error;
3250: END IF;

Line 3247: RAISE FND_API.g_exc_error;

3243: ,x_msg_count => x_msg_count
3244: ,x_approval_require => l_approval_require
3245: );
3246: IF l_return_status = FND_API.g_ret_sts_error THEN
3247: RAISE FND_API.g_exc_error;
3248: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3249: RAISE FND_API.g_exc_unexpected_error;
3250: END IF;
3251: ELSE

Line 3248: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3244: ,x_approval_require => l_approval_require
3245: );
3246: IF l_return_status = FND_API.g_ret_sts_error THEN
3247: RAISE FND_API.g_exc_error;
3248: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3249: RAISE FND_API.g_exc_unexpected_error;
3250: END IF;
3251: ELSE
3252: -- For Credit Match

Line 3249: RAISE FND_API.g_exc_unexpected_error;

3245: );
3246: IF l_return_status = FND_API.g_ret_sts_error THEN
3247: RAISE FND_API.g_exc_error;
3248: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3249: RAISE FND_API.g_exc_unexpected_error;
3250: END IF;
3251: ELSE
3252: -- For Credit Match
3253: IF (l_claim_approval_attr.payment_reference_number IS NOT NULL

Line 3276: IF l_return_status = FND_API.g_ret_sts_error THEN

3272: ,x_msg_count => x_msg_count
3273: ,x_msg_data => x_msg_data
3274: ,p_claim_id => p_claim_id
3275: );
3276: IF l_return_status = FND_API.g_ret_sts_error THEN
3277: RAISE FND_API.g_exc_error;
3278: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3279: RAISE FND_API.g_exc_unexpected_error;
3280: END IF;

Line 3277: RAISE FND_API.g_exc_error;

3273: ,x_msg_data => x_msg_data
3274: ,p_claim_id => p_claim_id
3275: );
3276: IF l_return_status = FND_API.g_ret_sts_error THEN
3277: RAISE FND_API.g_exc_error;
3278: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3279: RAISE FND_API.g_exc_unexpected_error;
3280: END IF;
3281:

Line 3278: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3274: ,p_claim_id => p_claim_id
3275: );
3276: IF l_return_status = FND_API.g_ret_sts_error THEN
3277: RAISE FND_API.g_exc_error;
3278: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3279: RAISE FND_API.g_exc_unexpected_error;
3280: END IF;
3281:
3282: IF l_approval_require = 'Y' THEN

Line 3279: RAISE FND_API.g_exc_unexpected_error;

3275: );
3276: IF l_return_status = FND_API.g_ret_sts_error THEN
3277: RAISE FND_API.g_exc_error;
3278: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3279: RAISE FND_API.g_exc_unexpected_error;
3280: END IF;
3281:
3282: IF l_approval_require = 'Y' THEN
3283: -- call marketing general approval workflow

Line 3292: IF l_return_status = FND_API.g_ret_sts_error THEN

3288: ,p_claim_id => p_claim_id
3289: ,p_prev_status => p_prev_status
3290: ,p_curr_status => p_curr_status
3291: );
3292: IF l_return_status = FND_API.g_ret_sts_error THEN
3293: RAISE FND_API.g_exc_error;
3294: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3295: RAISE FND_API.g_exc_unexpected_error;
3296: END IF;

Line 3293: RAISE FND_API.g_exc_error;

3289: ,p_prev_status => p_prev_status
3290: ,p_curr_status => p_curr_status
3291: );
3292: IF l_return_status = FND_API.g_ret_sts_error THEN
3293: RAISE FND_API.g_exc_error;
3294: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3295: RAISE FND_API.g_exc_unexpected_error;
3296: END IF;
3297: ELSE -- skip approval workflow and create payment directly

Line 3294: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3290: ,p_curr_status => p_curr_status
3291: );
3292: IF l_return_status = FND_API.g_ret_sts_error THEN
3293: RAISE FND_API.g_exc_error;
3294: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3295: RAISE FND_API.g_exc_unexpected_error;
3296: END IF;
3297: ELSE -- skip approval workflow and create payment directly
3298: -- payment process won't start if claim will go for referral approval.

Line 3295: RAISE FND_API.g_exc_unexpected_error;

3291: );
3292: IF l_return_status = FND_API.g_ret_sts_error THEN
3293: RAISE FND_API.g_exc_error;
3294: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3295: RAISE FND_API.g_exc_unexpected_error;
3296: END IF;
3297: ELSE -- skip approval workflow and create payment directly
3298: -- payment process won't start if claim will go for referral approval.
3299: IF l_claim_approval_attr.status_code <> 'PENDING_APPROVAL' THEN

Line 3308: IF l_return_status = FND_API.g_ret_sts_error THEN

3304: ,p_claim_id => p_claim_id
3305: ,p_prev_status => p_prev_status
3306: ,p_curr_status => p_curr_status
3307: );
3308: IF l_return_status = FND_API.g_ret_sts_error THEN
3309: RAISE FND_API.g_exc_error;
3310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3311: RAISE FND_API.g_exc_unexpected_error;
3312: END IF;

Line 3309: RAISE FND_API.g_exc_error;

3305: ,p_prev_status => p_prev_status
3306: ,p_curr_status => p_curr_status
3307: );
3308: IF l_return_status = FND_API.g_ret_sts_error THEN
3309: RAISE FND_API.g_exc_error;
3310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3311: RAISE FND_API.g_exc_unexpected_error;
3312: END IF;
3313: END IF;

Line 3310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3306: ,p_curr_status => p_curr_status
3307: );
3308: IF l_return_status = FND_API.g_ret_sts_error THEN
3309: RAISE FND_API.g_exc_error;
3310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3311: RAISE FND_API.g_exc_unexpected_error;
3312: END IF;
3313: END IF;
3314: END IF;

Line 3311: RAISE FND_API.g_exc_unexpected_error;

3307: );
3308: IF l_return_status = FND_API.g_ret_sts_error THEN
3309: RAISE FND_API.g_exc_error;
3310: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3311: RAISE FND_API.g_exc_unexpected_error;
3312: END IF;
3313: END IF;
3314: END IF;
3315:

Line 3330: IF l_return_status = FND_API.g_ret_sts_error THEN

3326: ,p_claim_id => p_claim_id
3327: ,p_prev_status => p_prev_status
3328: ,p_curr_status => p_curr_status
3329: );
3330: IF l_return_status = FND_API.g_ret_sts_error THEN
3331: RAISE FND_API.g_exc_error;
3332: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3333: RAISE FND_API.g_exc_unexpected_error;
3334: END IF;

Line 3331: RAISE FND_API.g_exc_error;

3327: ,p_prev_status => p_prev_status
3328: ,p_curr_status => p_curr_status
3329: );
3330: IF l_return_status = FND_API.g_ret_sts_error THEN
3331: RAISE FND_API.g_exc_error;
3332: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3333: RAISE FND_API.g_exc_unexpected_error;
3334: END IF;
3335: ELSE -- skip approval workflow and create payment directly

Line 3332: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3328: ,p_curr_status => p_curr_status
3329: );
3330: IF l_return_status = FND_API.g_ret_sts_error THEN
3331: RAISE FND_API.g_exc_error;
3332: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3333: RAISE FND_API.g_exc_unexpected_error;
3334: END IF;
3335: ELSE -- skip approval workflow and create payment directly
3336: -- payment process won't start if claim will go for referral approval.

Line 3333: RAISE FND_API.g_exc_unexpected_error;

3329: );
3330: IF l_return_status = FND_API.g_ret_sts_error THEN
3331: RAISE FND_API.g_exc_error;
3332: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3333: RAISE FND_API.g_exc_unexpected_error;
3334: END IF;
3335: ELSE -- skip approval workflow and create payment directly
3336: -- payment process won't start if claim will go for referral approval.
3337: IF l_claim_approval_attr.status_code <> 'PENDING_APPROVAL' THEN

Line 3346: IF l_return_status = FND_API.g_ret_sts_error THEN

3342: ,p_claim_id => p_claim_id
3343: ,p_prev_status => p_prev_status
3344: ,p_curr_status => p_curr_status
3345: );
3346: IF l_return_status = FND_API.g_ret_sts_error THEN
3347: RAISE FND_API.g_exc_error;
3348: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3349: RAISE FND_API.g_exc_unexpected_error;
3350: END IF;

Line 3347: RAISE FND_API.g_exc_error;

3343: ,p_prev_status => p_prev_status
3344: ,p_curr_status => p_curr_status
3345: );
3346: IF l_return_status = FND_API.g_ret_sts_error THEN
3347: RAISE FND_API.g_exc_error;
3348: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3349: RAISE FND_API.g_exc_unexpected_error;
3350: END IF;
3351: END IF;

Line 3348: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3344: ,p_curr_status => p_curr_status
3345: );
3346: IF l_return_status = FND_API.g_ret_sts_error THEN
3347: RAISE FND_API.g_exc_error;
3348: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3349: RAISE FND_API.g_exc_unexpected_error;
3350: END IF;
3351: END IF;
3352: END IF;

Line 3349: RAISE FND_API.g_exc_unexpected_error;

3345: );
3346: IF l_return_status = FND_API.g_ret_sts_error THEN
3347: RAISE FND_API.g_exc_error;
3348: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3349: RAISE FND_API.g_exc_unexpected_error;
3350: END IF;
3351: END IF;
3352: END IF;
3353:

Line 3367: IF l_return_status = FND_API.g_ret_sts_error THEN

3363: ,p_claim_id => p_claim_id
3364: ,p_prev_status => p_prev_status
3365: ,p_curr_status => p_curr_status
3366: );
3367: IF l_return_status = FND_API.g_ret_sts_error THEN
3368: RAISE FND_API.g_exc_error;
3369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3370: RAISE FND_API.g_exc_unexpected_error;
3371: END IF;

Line 3368: RAISE FND_API.g_exc_error;

3364: ,p_prev_status => p_prev_status
3365: ,p_curr_status => p_curr_status
3366: );
3367: IF l_return_status = FND_API.g_ret_sts_error THEN
3368: RAISE FND_API.g_exc_error;
3369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3370: RAISE FND_API.g_exc_unexpected_error;
3371: END IF;
3372: END IF;

Line 3369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3365: ,p_curr_status => p_curr_status
3366: );
3367: IF l_return_status = FND_API.g_ret_sts_error THEN
3368: RAISE FND_API.g_exc_error;
3369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3370: RAISE FND_API.g_exc_unexpected_error;
3371: END IF;
3372: END IF;
3373: ELSIF p_curr_status = 'OPEN' THEN

Line 3370: RAISE FND_API.g_exc_unexpected_error;

3366: );
3367: IF l_return_status = FND_API.g_ret_sts_error THEN
3368: RAISE FND_API.g_exc_error;
3369: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3370: RAISE FND_API.g_exc_unexpected_error;
3371: END IF;
3372: END IF;
3373: ELSIF p_curr_status = 'OPEN' THEN
3374: /* mchang fix for 1159

Line 3378: IF l_return_status = FND_API.g_ret_sts_error THEN

3374: /* mchang fix for 1159
3375: IF p_prev_status = 'COMPLETE' AND
3376: payment_method= 'RMA' THEN
3377: -- Delete RMA Order
3378: IF l_return_status = FND_API.g_ret_sts_error THEN
3379: RAISE FND_API.g_exc_error;
3380: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3381: RAISE FND_API.g_exc_unexpected_error;
3382: END IF;

Line 3379: RAISE FND_API.g_exc_error;

3375: IF p_prev_status = 'COMPLETE' AND
3376: payment_method= 'RMA' THEN
3377: -- Delete RMA Order
3378: IF l_return_status = FND_API.g_ret_sts_error THEN
3379: RAISE FND_API.g_exc_error;
3380: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3381: RAISE FND_API.g_exc_unexpected_error;
3382: END IF;
3383: */

Line 3380: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3376: payment_method= 'RMA' THEN
3377: -- Delete RMA Order
3378: IF l_return_status = FND_API.g_ret_sts_error THEN
3379: RAISE FND_API.g_exc_error;
3380: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3381: RAISE FND_API.g_exc_unexpected_error;
3382: END IF;
3383: */
3384: NULL;

Line 3381: RAISE FND_API.g_exc_unexpected_error;

3377: -- Delete RMA Order
3378: IF l_return_status = FND_API.g_ret_sts_error THEN
3379: RAISE FND_API.g_exc_error;
3380: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3381: RAISE FND_API.g_exc_unexpected_error;
3382: END IF;
3383: */
3384: NULL;
3385: END IF;

Line 3390: IF FND_API.to_boolean(p_commit) THEN

3386:
3387: ------------------------- finish -------------------------------
3388: /*
3389: -- Check for commit
3390: IF FND_API.to_boolean(p_commit) THEN
3391: COMMIT;
3392: END IF;
3393: */
3394:

Line 3396: p_encoded => FND_API.g_false,

3392: END IF;
3393: */
3394:
3395: FND_MSG_PUB.count_and_get(
3396: p_encoded => FND_API.g_false,
3397: p_count => x_msg_count,
3398: p_data => x_msg_data
3399: );
3400:

Line 3406: WHEN FND_API.g_exc_error THEN

3402: OZF_Utility_PVT.debug_message(l_full_name ||': end');
3403: END IF;
3404:
3405: EXCEPTION
3406: WHEN FND_API.g_exc_error THEN
3407: ROLLBACK TO Settle_Claim;
3408: x_return_status := FND_API.g_ret_sts_error;
3409: FND_MSG_PUB.count_and_get (
3410: p_encoded => FND_API.g_false,

Line 3408: x_return_status := FND_API.g_ret_sts_error;

3404:
3405: EXCEPTION
3406: WHEN FND_API.g_exc_error THEN
3407: ROLLBACK TO Settle_Claim;
3408: x_return_status := FND_API.g_ret_sts_error;
3409: FND_MSG_PUB.count_and_get (
3410: p_encoded => FND_API.g_false,
3411: p_count => x_msg_count,
3412: p_data => x_msg_data

Line 3410: p_encoded => FND_API.g_false,

3406: WHEN FND_API.g_exc_error THEN
3407: ROLLBACK TO Settle_Claim;
3408: x_return_status := FND_API.g_ret_sts_error;
3409: FND_MSG_PUB.count_and_get (
3410: p_encoded => FND_API.g_false,
3411: p_count => x_msg_count,
3412: p_data => x_msg_data
3413: );
3414: WHEN FND_API.g_exc_unexpected_error THEN

Line 3414: WHEN FND_API.g_exc_unexpected_error THEN

3410: p_encoded => FND_API.g_false,
3411: p_count => x_msg_count,
3412: p_data => x_msg_data
3413: );
3414: WHEN FND_API.g_exc_unexpected_error THEN
3415: ROLLBACK TO Settle_Claim;
3416: x_return_status := FND_API.g_ret_sts_unexp_error ;
3417: FND_MSG_PUB.count_and_get (
3418: p_encoded => FND_API.g_false,

Line 3416: x_return_status := FND_API.g_ret_sts_unexp_error ;

3412: p_data => x_msg_data
3413: );
3414: WHEN FND_API.g_exc_unexpected_error THEN
3415: ROLLBACK TO Settle_Claim;
3416: x_return_status := FND_API.g_ret_sts_unexp_error ;
3417: FND_MSG_PUB.count_and_get (
3418: p_encoded => FND_API.g_false,
3419: p_count => x_msg_count,
3420: p_data => x_msg_data

Line 3418: p_encoded => FND_API.g_false,

3414: WHEN FND_API.g_exc_unexpected_error THEN
3415: ROLLBACK TO Settle_Claim;
3416: x_return_status := FND_API.g_ret_sts_unexp_error ;
3417: FND_MSG_PUB.count_and_get (
3418: p_encoded => FND_API.g_false,
3419: p_count => x_msg_count,
3420: p_data => x_msg_data
3421: );
3422: WHEN OTHERS THEN

Line 3424: x_return_status := FND_API.g_ret_sts_unexp_error ;

3420: p_data => x_msg_data
3421: );
3422: WHEN OTHERS THEN
3423: ROLLBACK TO Settle_Claim;
3424: x_return_status := FND_API.g_ret_sts_unexp_error ;
3425: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3426: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3427: END IF;
3428: FND_MSG_PUB.count_and_get (

Line 3429: p_encoded => FND_API.g_false,

3425: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3426: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3427: END IF;
3428: FND_MSG_PUB.count_and_get (
3429: p_encoded => FND_API.g_false,
3430: p_count => x_msg_count,
3431: p_data => x_msg_data
3432: );
3433:

Line 3448: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE

3444: -- 10-OCT-2003 mchang Create.
3445: ---------------------------------------------------------------------
3446: PROCEDURE Raise_Business_Event(
3447: p_api_version IN NUMBER
3448: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3449: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3450: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3451:
3452: ,x_return_status OUT NOCOPY VARCHAR2

Line 3449: ,p_commit IN VARCHAR2 := FND_API.G_FALSE

3445: ---------------------------------------------------------------------
3446: PROCEDURE Raise_Business_Event(
3447: p_api_version IN NUMBER
3448: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3449: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3450: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3451:
3452: ,x_return_status OUT NOCOPY VARCHAR2
3453: ,x_msg_data OUT NOCOPY VARCHAR2

Line 3450: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL

3446: PROCEDURE Raise_Business_Event(
3447: p_api_version IN NUMBER
3448: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3449: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3450: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3451:
3452: ,x_return_status OUT NOCOPY VARCHAR2
3453: ,x_msg_data OUT NOCOPY VARCHAR2
3454: ,x_msg_count OUT NOCOPY NUMBER

Line 3488: IF FND_API.to_boolean(p_init_msg_list) THEN

3484: OZF_Utility_PVT.debug_message(l_full_name||' : start');
3485: OZF_Utility_PVT.debug_message(l_full_name||' : event = '||p_event_name);
3486: END IF;
3487:
3488: IF FND_API.to_boolean(p_init_msg_list) THEN
3489: FND_MSG_PUB.initialize;
3490: END IF;
3491:
3492: IF NOT FND_API.compatible_api_call(

Line 3492: IF NOT FND_API.compatible_api_call(

3488: IF FND_API.to_boolean(p_init_msg_list) THEN
3489: FND_MSG_PUB.initialize;
3490: END IF;
3491:
3492: IF NOT FND_API.compatible_api_call(
3493: l_api_version,
3494: p_api_version,
3495: l_api_name,
3496: g_pkg_name

Line 3498: RAISE FND_API.g_exc_unexpected_error;

3494: p_api_version,
3495: l_api_name,
3496: g_pkg_name
3497: ) THEN
3498: RAISE FND_API.g_exc_unexpected_error;
3499: END IF;
3500:
3501: -- Initialize API return status to sucess
3502: x_return_status := FND_API.g_ret_sts_success;

Line 3502: x_return_status := FND_API.g_ret_sts_success;

3498: RAISE FND_API.g_exc_unexpected_error;
3499: END IF;
3500:
3501: -- Initialize API return status to sucess
3502: x_return_status := FND_API.g_ret_sts_success;
3503:
3504: --------------------- Start -----------------------
3505: l_new_item_key := p_claim_id||'_'||TO_CHAR(SYSDATE,'DDMMRRRRHH24MISS');
3506:

Line 3537: IF FND_API.to_boolean(p_commit) THEN

3533: );
3534:
3535: ------------------------- finish -------------------------------
3536: -- Check for commit
3537: IF FND_API.to_boolean(p_commit) THEN
3538: COMMIT;
3539: END IF;
3540:
3541: FND_MSG_PUB.count_and_get(

Line 3542: p_encoded => FND_API.g_false,

3538: COMMIT;
3539: END IF;
3540:
3541: FND_MSG_PUB.count_and_get(
3542: p_encoded => FND_API.g_false,
3543: p_count => x_msg_count,
3544: p_data => x_msg_data
3545: );
3546:

Line 3552: WHEN FND_API.g_exc_error THEN

3548: OZF_Utility_PVT.debug_message(l_full_name ||': end');
3549: END IF;
3550:
3551: EXCEPTION
3552: WHEN FND_API.g_exc_error THEN
3553: ROLLBACK TO Raise_Business_Event;
3554: x_return_status := FND_API.g_ret_sts_error;
3555: FND_MSG_PUB.count_and_get (
3556: p_encoded => FND_API.g_false,

Line 3554: x_return_status := FND_API.g_ret_sts_error;

3550:
3551: EXCEPTION
3552: WHEN FND_API.g_exc_error THEN
3553: ROLLBACK TO Raise_Business_Event;
3554: x_return_status := FND_API.g_ret_sts_error;
3555: FND_MSG_PUB.count_and_get (
3556: p_encoded => FND_API.g_false,
3557: p_count => x_msg_count,
3558: p_data => x_msg_data

Line 3556: p_encoded => FND_API.g_false,

3552: WHEN FND_API.g_exc_error THEN
3553: ROLLBACK TO Raise_Business_Event;
3554: x_return_status := FND_API.g_ret_sts_error;
3555: FND_MSG_PUB.count_and_get (
3556: p_encoded => FND_API.g_false,
3557: p_count => x_msg_count,
3558: p_data => x_msg_data
3559: );
3560: WHEN FND_API.g_exc_unexpected_error THEN

Line 3560: WHEN FND_API.g_exc_unexpected_error THEN

3556: p_encoded => FND_API.g_false,
3557: p_count => x_msg_count,
3558: p_data => x_msg_data
3559: );
3560: WHEN FND_API.g_exc_unexpected_error THEN
3561: ROLLBACK TO Raise_Business_Event;
3562: x_return_status := FND_API.g_ret_sts_unexp_error ;
3563: FND_MSG_PUB.count_and_get (
3564: p_encoded => FND_API.g_false,

Line 3562: x_return_status := FND_API.g_ret_sts_unexp_error ;

3558: p_data => x_msg_data
3559: );
3560: WHEN FND_API.g_exc_unexpected_error THEN
3561: ROLLBACK TO Raise_Business_Event;
3562: x_return_status := FND_API.g_ret_sts_unexp_error ;
3563: FND_MSG_PUB.count_and_get (
3564: p_encoded => FND_API.g_false,
3565: p_count => x_msg_count,
3566: p_data => x_msg_data

Line 3564: p_encoded => FND_API.g_false,

3560: WHEN FND_API.g_exc_unexpected_error THEN
3561: ROLLBACK TO Raise_Business_Event;
3562: x_return_status := FND_API.g_ret_sts_unexp_error ;
3563: FND_MSG_PUB.count_and_get (
3564: p_encoded => FND_API.g_false,
3565: p_count => x_msg_count,
3566: p_data => x_msg_data
3567: );
3568: WHEN OTHERS THEN

Line 3570: x_return_status := FND_API.g_ret_sts_unexp_error ;

3566: p_data => x_msg_data
3567: );
3568: WHEN OTHERS THEN
3569: ROLLBACK TO Raise_Business_Event;
3570: x_return_status := FND_API.g_ret_sts_unexp_error ;
3571: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3572: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3573: END IF;
3574: FND_MSG_PUB.count_and_get (

Line 3575: p_encoded => FND_API.g_false,

3571: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3572: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3573: END IF;
3574: FND_MSG_PUB.count_and_get (
3575: p_encoded => FND_API.g_false,
3576: p_count => x_msg_count,
3577: p_data => x_msg_data
3578: );
3579: