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 278: x_return_status := FND_API.g_ret_sts_success;

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

Line 314: p_init_msg_list => FND_API.G_FALSE,

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

Line 315: p_commit => FND_API.G_FALSE,

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

Line 316: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

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

Line 323: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 324: RAISE FND_API.g_exc_error;

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

Line 325: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 326: RAISE FND_API.g_exc_unexpected_error;

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

Line 336: WHEN FND_API.G_EXC_ERROR THEN

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

Line 337: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 338: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 339: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 391: x_return_status := FND_API.g_ret_sts_success;

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

Line 413: ,p_init_msg_list => FND_API.g_false

409: l_claim_line_rec.earnings_associated_flag := 'F';
410:
411: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
412: p_api_version => l_api_version
413: ,p_init_msg_list => FND_API.g_false
414: ,p_commit => FND_API.g_false
415: ,p_validation_level => FND_API.g_valid_level_full
416: ,x_return_status => l_return_status
417: ,x_msg_count => x_msg_data

Line 414: ,p_commit => FND_API.g_false

410:
411: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
412: p_api_version => l_api_version
413: ,p_init_msg_list => FND_API.g_false
414: ,p_commit => FND_API.g_false
415: ,p_validation_level => FND_API.g_valid_level_full
416: ,x_return_status => l_return_status
417: ,x_msg_count => x_msg_data
418: ,x_msg_data => x_msg_count

Line 415: ,p_validation_level => FND_API.g_valid_level_full

411: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
412: p_api_version => l_api_version
413: ,p_init_msg_list => FND_API.g_false
414: ,p_commit => FND_API.g_false
415: ,p_validation_level => FND_API.g_valid_level_full
416: ,x_return_status => l_return_status
417: ,x_msg_count => x_msg_data
418: ,x_msg_data => x_msg_count
419: ,p_claim_line_rec => l_claim_line_rec

Line 422: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 423: RAISE FND_API.g_exc_error;

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

Line 424: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 425: RAISE FND_API.g_exc_unexpected_error;

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

Line 435: WHEN FND_API.G_EXC_ERROR THEN

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

Line 436: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 437: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 438: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 443: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 476: x_return_status := FND_API.g_ret_sts_success;

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

Line 485: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 486: RAISE FND_API.g_exc_error;

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

Line 487: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 488: RAISE FND_API.g_exc_unexpected_error;

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

Line 495: WHEN FND_API.G_EXC_ERROR THEN

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

Line 496: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 497: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 498: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 503: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 536: x_return_status := FND_API.g_ret_sts_success;

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

Line 545: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 546: RAISE FND_API.g_exc_error;

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

Line 547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 548: RAISE FND_API.g_exc_unexpected_error;

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

Line 555: WHEN FND_API.G_EXC_ERROR THEN

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

Line 556: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 557: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 558: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 563: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 605: x_return_status := FND_API.g_ret_sts_success;

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

Line 625: RAISE FND_API.g_exc_unexpected_error;

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

Line 633: WHEN FND_API.G_EXC_ERROR THEN

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

Line 634: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 635: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 643: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 680: x_return_status := FND_API.g_ret_sts_success;

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

Line 701: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 702: RAISE FND_API.g_exc_error;

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

Line 703: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 704: RAISE FND_API.g_exc_unexpected_error;

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

Line 711: WHEN FND_API.G_EXC_ERROR THEN

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

Line 712: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 713: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 714: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 716: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 761: x_return_status := FND_API.g_ret_sts_success;

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

Line 781: RAISE FND_API.g_exc_unexpected_error;

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

Line 789: WHEN FND_API.G_EXC_ERROR THEN

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

Line 790: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 791: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 792: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 797: x_return_status := FND_API.g_ret_sts_unexp_error;

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

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

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

Line 836: x_return_status := FND_API.g_ret_sts_success;

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

Line 842: ,p_init_msg_list => FND_API.g_false

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

Line 843: ,p_validation_level => FND_API.g_valid_level_full

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

Line 850: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 851: RAISE FND_API.g_exc_error;

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

Line 852: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 853: RAISE FND_API.g_exc_unexpected_error;

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

Line 860: WHEN FND_API.G_EXC_ERROR THEN

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

Line 861: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 868: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 900: x_return_status := FND_API.g_ret_sts_success;

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

Line 909: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 910: RAISE FND_API.g_exc_error;

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

Line 911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 912: RAISE FND_API.g_exc_unexpected_error;

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

Line 920: WHEN FND_API.G_EXC_ERROR THEN

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

Line 921: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 922: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 923: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 928: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 989: x_return_status := FND_API.g_ret_sts_success;

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

Line 1003: RAISE FND_API.g_exc_error;

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

Line 1034: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1035: RAISE FND_API.g_exc_error;

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

Line 1036: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1037: RAISE FND_API.g_exc_unexpected_error;

1033: );
1034: IF l_return_status = FND_API.g_ret_sts_error THEN
1035: RAISE FND_API.g_exc_error;
1036: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1037: RAISE FND_API.g_exc_unexpected_error;
1038: END IF;
1039:
1040: -- amount_remaining
1041: 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 1055: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1056: RAISE FND_API.g_exc_error;

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

Line 1057: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1058: RAISE FND_API.g_exc_unexpected_error;

1054: );
1055: IF l_return_status = FND_API.g_ret_sts_error THEN
1056: RAISE FND_API.g_exc_error;
1057: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1058: RAISE FND_API.g_exc_unexpected_error;
1059: END IF;
1060:
1061: ------- amount remaining checking --------
1062: 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 1071: RAISE FND_API.g_exc_error;

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

Line 1083: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1084: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 1085: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 1086: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 1091: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 1148: x_return_status := FND_API.g_ret_sts_success;

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

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

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

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

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

Line 1196: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1197: RAISE FND_API.g_exc_error;

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

Line 1198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1199: RAISE FND_API.g_exc_unexpected_error;

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

Line 1206: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1207: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 1208: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 1209: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 1214: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 1299: x_return_status := FND_API.g_ret_sts_success;

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

Line 1341: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1342: RAISE FND_API.g_exc_error;

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

Line 1343: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1344: RAISE FND_API.g_exc_unexpected_error;

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

Line 1365: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1366: RAISE FND_API.g_exc_error;

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

Line 1367: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1368: RAISE FND_API.g_exc_unexpected_error;

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

Line 1388: RAISE FND_API.g_exc_error;

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

Line 1425: ,p_init_msg_list => FND_API.g_false

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

Line 1426: ,p_commit => FND_API.g_false

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

Line 1427: ,p_validation_level => FND_API.g_valid_level_full

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

Line 1436: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1437: RAISE FND_API.g_exc_error;

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

Line 1438: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1439: RAISE FND_API.g_exc_unexpected_error;

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

Line 1474: ,p_init_msg_list => FND_API.g_false

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

Line 1475: ,p_commit => FND_API.g_false

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

Line 1476: ,p_validation_level => FND_API.g_valid_level_full

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

Line 1484: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1485: RAISE FND_API.g_exc_error;

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

Line 1486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1487: RAISE FND_API.g_exc_unexpected_error;

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

Line 1523: RAISE FND_API.G_EXC_ERROR;

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

Line 1535: RAISE FND_API.G_EXC_ERROR;

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

Line 1551: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1552: RAISE FND_API.g_exc_error;

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

Line 1553: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1554: RAISE FND_API.g_exc_unexpected_error;

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

Line 1578: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

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

Line 1591: WHEN FND_API.G_EXC_ERROR THEN

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

Line 1592: x_return_status := FND_API.G_RET_STS_ERROR;

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

Line 1594: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

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

Line 1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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

Line 1601: x_return_status := FND_API.g_ret_sts_unexp_error;

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

Line 1701: x_return_status := FND_API.g_ret_sts_success;

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

Line 1744: RAISE FND_API.g_exc_unexpected_error;

1740: WHEN OTHERS THEN
1741: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1742: FND_MESSAGE.Set_Token('TEXT','Promo Err: ' || sqlerrm);
1743: FND_MSG_PUB.Add;
1744: RAISE FND_API.g_exc_unexpected_error;
1745: END;
1746: ELSE -- non promotional claims
1747: /*---------------------------------------------------------*
1748: | CHECK (AP) |

Line 1770: IF l_return_status = FND_API.g_ret_sts_error THEN

1766: x_event_id => l_event_id,
1767: x_clear_code_combination_id => l_ccid
1768: );
1769: END IF;
1770: IF l_return_status = FND_API.g_ret_sts_error THEN
1771: RAISE FND_API.g_exc_error;
1772: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1773: RAISE FND_API.g_exc_unexpected_error;
1774: END IF;

Line 1771: RAISE FND_API.g_exc_error;

1767: x_clear_code_combination_id => l_ccid
1768: );
1769: END IF;
1770: IF l_return_status = FND_API.g_ret_sts_error THEN
1771: RAISE FND_API.g_exc_error;
1772: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1773: RAISE FND_API.g_exc_unexpected_error;
1774: END IF;
1775: IF OZF_DEBUG_HIGH_ON THEN

Line 1772: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1768: );
1769: END IF;
1770: IF l_return_status = FND_API.g_ret_sts_error THEN
1771: RAISE FND_API.g_exc_error;
1772: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1773: RAISE FND_API.g_exc_unexpected_error;
1774: END IF;
1775: IF OZF_DEBUG_HIGH_ON THEN
1776: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1773: RAISE FND_API.g_exc_unexpected_error;

1769: END IF;
1770: IF l_return_status = FND_API.g_ret_sts_error THEN
1771: RAISE FND_API.g_exc_error;
1772: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1773: RAISE FND_API.g_exc_unexpected_error;
1774: END IF;
1775: IF OZF_DEBUG_HIGH_ON THEN
1776: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1777: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1787: ,p_init_msg_list => FND_API.g_false

1783:
1784: -- create AP invoice
1785: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1786: p_api_version => l_api_version
1787: ,p_init_msg_list => FND_API.g_false
1788: ,p_commit => FND_API.g_false
1789: ,p_validation_level => FND_API.g_valid_level_full
1790: ,x_return_status => l_return_status
1791: ,x_msg_data => x_msg_data

Line 1788: ,p_commit => FND_API.g_false

1784: -- create AP invoice
1785: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1786: p_api_version => l_api_version
1787: ,p_init_msg_list => FND_API.g_false
1788: ,p_commit => FND_API.g_false
1789: ,p_validation_level => FND_API.g_valid_level_full
1790: ,x_return_status => l_return_status
1791: ,x_msg_data => x_msg_data
1792: ,x_msg_count => x_msg_count

Line 1789: ,p_validation_level => FND_API.g_valid_level_full

1785: OZF_AP_INTERFACE_PVT.Create_AP_Invoice (
1786: p_api_version => l_api_version
1787: ,p_init_msg_list => FND_API.g_false
1788: ,p_commit => FND_API.g_false
1789: ,p_validation_level => FND_API.g_valid_level_full
1790: ,x_return_status => l_return_status
1791: ,x_msg_data => x_msg_data
1792: ,x_msg_count => x_msg_count
1793: ,p_claim_id => p_claim_id

Line 1795: IF l_return_status = FND_API.g_ret_sts_error THEN

1791: ,x_msg_data => x_msg_data
1792: ,x_msg_count => x_msg_count
1793: ,p_claim_id => p_claim_id
1794: );
1795: IF l_return_status = FND_API.g_ret_sts_error THEN
1796: RAISE FND_API.g_exc_error;
1797: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1798: RAISE FND_API.g_exc_unexpected_error;
1799: END IF;

Line 1796: RAISE FND_API.g_exc_error;

1792: ,x_msg_count => x_msg_count
1793: ,p_claim_id => p_claim_id
1794: );
1795: IF l_return_status = FND_API.g_ret_sts_error THEN
1796: RAISE FND_API.g_exc_error;
1797: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1798: RAISE FND_API.g_exc_unexpected_error;
1799: END IF;
1800:

Line 1797: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1793: ,p_claim_id => p_claim_id
1794: );
1795: IF l_return_status = FND_API.g_ret_sts_error THEN
1796: RAISE FND_API.g_exc_error;
1797: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1798: RAISE FND_API.g_exc_unexpected_error;
1799: END IF;
1800:
1801: /*---------------------------------------------------------*

Line 1798: RAISE FND_API.g_exc_unexpected_error;

1794: );
1795: IF l_return_status = FND_API.g_ret_sts_error THEN
1796: RAISE FND_API.g_exc_error;
1797: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1798: RAISE FND_API.g_exc_unexpected_error;
1799: END IF;
1800:
1801: /*---------------------------------------------------------*
1802: | AR Settlement

Line 1832: IF l_return_status = FND_API.g_ret_sts_error THEN

1828: x_event_id => l_event_id,
1829: x_clear_code_combination_id => l_ccid
1830: );
1831: END IF;
1832: IF l_return_status = FND_API.g_ret_sts_error THEN
1833: RAISE FND_API.g_exc_error;
1834: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1835: RAISE FND_API.g_exc_unexpected_error;
1836: END IF;

Line 1833: RAISE FND_API.g_exc_error;

1829: x_clear_code_combination_id => l_ccid
1830: );
1831: END IF;
1832: IF l_return_status = FND_API.g_ret_sts_error THEN
1833: RAISE FND_API.g_exc_error;
1834: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1835: RAISE FND_API.g_exc_unexpected_error;
1836: END IF;
1837: IF OZF_DEBUG_HIGH_ON THEN

Line 1834: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1830: );
1831: END IF;
1832: IF l_return_status = FND_API.g_ret_sts_error THEN
1833: RAISE FND_API.g_exc_error;
1834: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1835: RAISE FND_API.g_exc_unexpected_error;
1836: END IF;
1837: IF OZF_DEBUG_HIGH_ON THEN
1838: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1835: RAISE FND_API.g_exc_unexpected_error;

1831: END IF;
1832: IF l_return_status = FND_API.g_ret_sts_error THEN
1833: RAISE FND_API.g_exc_error;
1834: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1835: RAISE FND_API.g_exc_unexpected_error;
1836: END IF;
1837: IF OZF_DEBUG_HIGH_ON THEN
1838: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1839: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1849: ,p_init_msg_list => FND_API.g_false

1845: IF ((l_automate_settlement = 'Y') OR (l_claim_settle.payment_method = 'ACCOUNTING_ONLY'))
1846: THEN
1847: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1848: p_api_version => l_api_version
1849: ,p_init_msg_list => FND_API.g_false
1850: ,p_commit => FND_API.g_false
1851: ,p_validation_level => FND_API.g_valid_level_full
1852: ,x_return_status => l_return_status
1853: ,x_msg_data => x_msg_data

Line 1850: ,p_commit => FND_API.g_false

1846: THEN
1847: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1848: p_api_version => l_api_version
1849: ,p_init_msg_list => FND_API.g_false
1850: ,p_commit => FND_API.g_false
1851: ,p_validation_level => FND_API.g_valid_level_full
1852: ,x_return_status => l_return_status
1853: ,x_msg_data => x_msg_data
1854: ,x_msg_count => x_msg_count

Line 1851: ,p_validation_level => FND_API.g_valid_level_full

1847: OZF_AR_PAYMENT_PVT.Create_AR_Payment(
1848: p_api_version => l_api_version
1849: ,p_init_msg_list => FND_API.g_false
1850: ,p_commit => FND_API.g_false
1851: ,p_validation_level => FND_API.g_valid_level_full
1852: ,x_return_status => l_return_status
1853: ,x_msg_data => x_msg_data
1854: ,x_msg_count => x_msg_count
1855: ,p_claim_id => p_claim_id

Line 1857: IF l_return_status = FND_API.g_ret_sts_error THEN

1853: ,x_msg_data => x_msg_data
1854: ,x_msg_count => x_msg_count
1855: ,p_claim_id => p_claim_id
1856: );
1857: IF l_return_status = FND_API.g_ret_sts_error THEN
1858: RAISE FND_API.g_exc_error;
1859: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1860: RAISE FND_API.g_exc_unexpected_error;
1861: END IF;

Line 1858: RAISE FND_API.g_exc_error;

1854: ,x_msg_count => x_msg_count
1855: ,p_claim_id => p_claim_id
1856: );
1857: IF l_return_status = FND_API.g_ret_sts_error THEN
1858: RAISE FND_API.g_exc_error;
1859: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1860: RAISE FND_API.g_exc_unexpected_error;
1861: END IF;
1862: ELSE

Line 1859: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1855: ,p_claim_id => p_claim_id
1856: );
1857: IF l_return_status = FND_API.g_ret_sts_error THEN
1858: RAISE FND_API.g_exc_error;
1859: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1860: RAISE FND_API.g_exc_unexpected_error;
1861: END IF;
1862: ELSE
1863: Process_Settlement_WF(

Line 1860: RAISE FND_API.g_exc_unexpected_error;

1856: );
1857: IF l_return_status = FND_API.g_ret_sts_error THEN
1858: RAISE FND_API.g_exc_error;
1859: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1860: RAISE FND_API.g_exc_unexpected_error;
1861: END IF;
1862: ELSE
1863: Process_Settlement_WF(
1864: p_claim_id => p_claim_id

Line 1869: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1870: RAISE FND_API.g_exc_error;

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

Line 1871: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1872: RAISE FND_API.g_exc_unexpected_error;

1868: );
1869: IF l_return_status = FND_API.g_ret_sts_error THEN
1870: RAISE FND_API.g_exc_error;
1871: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1872: RAISE FND_API.g_exc_unexpected_error;
1873: END IF;
1874: END IF;
1875:
1876: /*---------------------------------------------------------*

Line 1885: ,p_init_msg_list => FND_API.g_false

1881:
1882: IF l_automate_settlement = 'Y' THEN
1883: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1884: p_api_version => l_api_version
1885: ,p_init_msg_list => FND_API.g_false
1886: ,p_commit => FND_API.g_false
1887: ,p_validation_level => FND_API.g_valid_level_full
1888: ,x_return_status => l_return_status
1889: ,x_msg_data => x_msg_data

Line 1886: ,p_commit => FND_API.g_false

1882: IF l_automate_settlement = 'Y' THEN
1883: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1884: p_api_version => l_api_version
1885: ,p_init_msg_list => FND_API.g_false
1886: ,p_commit => FND_API.g_false
1887: ,p_validation_level => FND_API.g_valid_level_full
1888: ,x_return_status => l_return_status
1889: ,x_msg_data => x_msg_data
1890: ,x_msg_count => x_msg_count

Line 1887: ,p_validation_level => FND_API.g_valid_level_full

1883: OZF_OM_PAYMENT_PVT.Create_OM_Payment(
1884: p_api_version => l_api_version
1885: ,p_init_msg_list => FND_API.g_false
1886: ,p_commit => FND_API.g_false
1887: ,p_validation_level => FND_API.g_valid_level_full
1888: ,x_return_status => l_return_status
1889: ,x_msg_data => x_msg_data
1890: ,x_msg_count => x_msg_count
1891: ,p_claim_id => p_claim_id

Line 1893: IF l_return_status = FND_API.g_ret_sts_error THEN

1889: ,x_msg_data => x_msg_data
1890: ,x_msg_count => x_msg_count
1891: ,p_claim_id => p_claim_id
1892: );
1893: IF l_return_status = FND_API.g_ret_sts_error THEN
1894: RAISE FND_API.g_exc_error;
1895: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1896: RAISE FND_API.g_exc_unexpected_error;
1897: END IF;

Line 1894: RAISE FND_API.g_exc_error;

1890: ,x_msg_count => x_msg_count
1891: ,p_claim_id => p_claim_id
1892: );
1893: IF l_return_status = FND_API.g_ret_sts_error THEN
1894: RAISE FND_API.g_exc_error;
1895: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1896: RAISE FND_API.g_exc_unexpected_error;
1897: END IF;
1898: ELSE

Line 1895: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1891: ,p_claim_id => p_claim_id
1892: );
1893: IF l_return_status = FND_API.g_ret_sts_error THEN
1894: RAISE FND_API.g_exc_error;
1895: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1896: RAISE FND_API.g_exc_unexpected_error;
1897: END IF;
1898: ELSE
1899: Process_Settlement_WF(

Line 1896: RAISE FND_API.g_exc_unexpected_error;

1892: );
1893: IF l_return_status = FND_API.g_ret_sts_error THEN
1894: RAISE FND_API.g_exc_error;
1895: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1896: RAISE FND_API.g_exc_unexpected_error;
1897: END IF;
1898: ELSE
1899: Process_Settlement_WF(
1900: p_claim_id => p_claim_id

Line 1905: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1906: RAISE FND_API.g_exc_error;

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

Line 1907: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1908: RAISE FND_API.g_exc_unexpected_error;

1904: );
1905: IF l_return_status = FND_API.g_ret_sts_error THEN
1906: RAISE FND_API.g_exc_error;
1907: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1908: RAISE FND_API.g_exc_unexpected_error;
1909: END IF;
1910: END IF;
1911:
1912: /*---------------------------------------------------------*

Line 1928: IF l_return_status = FND_API.g_ret_sts_error THEN

1924: p_settlement_method => l_claim_settle.payment_method,
1925: x_event_id => l_event_id,
1926: x_clear_code_combination_id => l_ccid
1927: );
1928: IF l_return_status = FND_API.g_ret_sts_error THEN
1929: RAISE FND_API.g_exc_error;
1930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1931: RAISE FND_API.g_exc_unexpected_error;
1932: END IF;

Line 1929: RAISE FND_API.g_exc_error;

1925: x_event_id => l_event_id,
1926: x_clear_code_combination_id => l_ccid
1927: );
1928: IF l_return_status = FND_API.g_ret_sts_error THEN
1929: RAISE FND_API.g_exc_error;
1930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1931: RAISE FND_API.g_exc_unexpected_error;
1932: END IF;
1933: IF OZF_DEBUG_HIGH_ON THEN

Line 1930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1926: x_clear_code_combination_id => l_ccid
1927: );
1928: IF l_return_status = FND_API.g_ret_sts_error THEN
1929: RAISE FND_API.g_exc_error;
1930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1931: RAISE FND_API.g_exc_unexpected_error;
1932: END IF;
1933: IF OZF_DEBUG_HIGH_ON THEN
1934: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );

Line 1931: RAISE FND_API.g_exc_unexpected_error;

1927: );
1928: IF l_return_status = FND_API.g_ret_sts_error THEN
1929: RAISE FND_API.g_exc_error;
1930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1931: RAISE FND_API.g_exc_unexpected_error;
1932: END IF;
1933: IF OZF_DEBUG_HIGH_ON THEN
1934: OZF_Utility_PVT.debug_message('Accounting Event Id :'||l_event_id );
1935: OZF_Utility_PVT.debug_message('Code Combination Id :'||l_ccid );

Line 1945: IF l_return_status = FND_API.g_ret_sts_error THEN

1941: ,x_return_status => l_return_status
1942: ,x_msg_data => x_msg_data
1943: ,x_msg_count => x_msg_count
1944: );
1945: IF l_return_status = FND_API.g_ret_sts_error THEN
1946: RAISE FND_API.g_exc_error;
1947: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1948: RAISE FND_API.g_exc_unexpected_error;
1949: END IF;

Line 1946: RAISE FND_API.g_exc_error;

1942: ,x_msg_data => x_msg_data
1943: ,x_msg_count => x_msg_count
1944: );
1945: IF l_return_status = FND_API.g_ret_sts_error THEN
1946: RAISE FND_API.g_exc_error;
1947: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1948: RAISE FND_API.g_exc_unexpected_error;
1949: END IF;
1950:

Line 1947: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1943: ,x_msg_count => x_msg_count
1944: );
1945: IF l_return_status = FND_API.g_ret_sts_error THEN
1946: RAISE FND_API.g_exc_error;
1947: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1948: RAISE FND_API.g_exc_unexpected_error;
1949: END IF;
1950:
1951: /*---------------------------------------------------------*

Line 1948: RAISE FND_API.g_exc_unexpected_error;

1944: );
1945: IF l_return_status = FND_API.g_ret_sts_error THEN
1946: RAISE FND_API.g_exc_error;
1947: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1948: RAISE FND_API.g_exc_unexpected_error;
1949: END IF;
1950:
1951: /*---------------------------------------------------------*
1952: | MASS_SETTLEMENT |

Line 1961: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 1962: RAISE FND_API.g_exc_error;

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

Line 1963: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

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

Line 1964: RAISE FND_API.g_exc_unexpected_error;

1960: );
1961: IF l_return_status = FND_API.g_ret_sts_error THEN
1962: RAISE FND_API.g_exc_error;
1963: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1964: RAISE FND_API.g_exc_unexpected_error;
1965: END IF;
1966:
1967: /*---------------------------------------------------------*
1968: | Non-seeded payment_method |

Line 1978: IF l_return_status = FND_API.g_ret_sts_error THEN

1974: ,x_return_status => l_return_status
1975: ,x_msg_data => x_msg_data
1976: ,x_msg_count => x_msg_count
1977: );
1978: IF l_return_status = FND_API.g_ret_sts_error THEN
1979: RAISE FND_API.g_exc_error;
1980: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1981: RAISE FND_API.g_exc_unexpected_error;
1982: END IF;

Line 1979: RAISE FND_API.g_exc_error;

1975: ,x_msg_data => x_msg_data
1976: ,x_msg_count => x_msg_count
1977: );
1978: IF l_return_status = FND_API.g_ret_sts_error THEN
1979: RAISE FND_API.g_exc_error;
1980: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1981: RAISE FND_API.g_exc_unexpected_error;
1982: END IF;
1983:

Line 1980: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1976: ,x_msg_count => x_msg_count
1977: );
1978: IF l_return_status = FND_API.g_ret_sts_error THEN
1979: RAISE FND_API.g_exc_error;
1980: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1981: RAISE FND_API.g_exc_unexpected_error;
1982: END IF;
1983:
1984: END IF;

Line 1981: RAISE FND_API.g_exc_unexpected_error;

1977: );
1978: IF l_return_status = FND_API.g_ret_sts_error THEN
1979: RAISE FND_API.g_exc_error;
1980: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1981: RAISE FND_API.g_exc_unexpected_error;
1982: END IF;
1983:
1984: END IF;
1985:

Line 1992: WHEN FND_API.G_EXC_ERROR THEN

1988: IF OZF_DEBUG_HIGH_ON THEN
1989: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1990: END IF;
1991: EXCEPTION
1992: WHEN FND_API.G_EXC_ERROR THEN
1993: x_return_status := FND_API.G_RET_STS_ERROR;
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1993: x_return_status := FND_API.G_RET_STS_ERROR;

1989: OZF_Utility_PVT.debug_message(l_full_name||' : end');
1990: END IF;
1991: EXCEPTION
1992: WHEN FND_API.G_EXC_ERROR THEN
1993: x_return_status := FND_API.G_RET_STS_ERROR;
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1997:

Line 1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1991: EXCEPTION
1992: WHEN FND_API.G_EXC_ERROR THEN
1993: x_return_status := FND_API.G_RET_STS_ERROR;
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1997:
1998: WHEN OTHERS THEN
1999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1992: WHEN FND_API.G_EXC_ERROR THEN
1993: x_return_status := FND_API.G_RET_STS_ERROR;
1994:
1995: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1996: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1997:
1998: WHEN OTHERS THEN
1999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2000: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 2002: x_return_status := FND_API.g_ret_sts_unexp_error;

1998: WHEN OTHERS THEN
1999: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2000: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2001: END IF;
2002: x_return_status := FND_API.g_ret_sts_unexp_error;
2003:
2004: END Create_Payment_for_Settlement;
2005:
2006:

Line 2049: x_return_status := FND_API.g_ret_sts_success;

2045: IF OZF_DEBUG_HIGH_ON THEN
2046: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2047: END IF;
2048: -- Initialize API return status to sucess
2049: x_return_status := FND_API.g_ret_sts_success;
2050:
2051: x_claim_rec := p_claim_rec;
2052:
2053: /*

Line 2078: IF l_return_status = FND_API.g_ret_sts_error THEN

2074: X_RETURN_STATUS => l_return_status,
2075: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
2076: X_RATE => x_claim_rec.exchange_rate
2077: );
2078: IF l_return_status = FND_API.g_ret_sts_error THEN
2079: RAISE FND_API.g_exc_error;
2080: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2081: RAISE FND_API.g_exc_unexpected_error;
2082: END IF;

Line 2079: RAISE FND_API.g_exc_error;

2075: X_ACC_AMOUNT => x_claim_rec.acctd_amount_remaining,
2076: X_RATE => x_claim_rec.exchange_rate
2077: );
2078: IF l_return_status = FND_API.g_ret_sts_error THEN
2079: RAISE FND_API.g_exc_error;
2080: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2081: RAISE FND_API.g_exc_unexpected_error;
2082: END IF;
2083: */

Line 2080: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2076: X_RATE => x_claim_rec.exchange_rate
2077: );
2078: IF l_return_status = FND_API.g_ret_sts_error THEN
2079: RAISE FND_API.g_exc_error;
2080: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2081: RAISE FND_API.g_exc_unexpected_error;
2082: END IF;
2083: */
2084:

Line 2081: RAISE FND_API.g_exc_unexpected_error;

2077: );
2078: IF l_return_status = FND_API.g_ret_sts_error THEN
2079: RAISE FND_API.g_exc_error;
2080: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2081: RAISE FND_API.g_exc_unexpected_error;
2082: END IF;
2083: */
2084:
2085: IF OZF_DEBUG_HIGH_ON THEN

Line 2089: WHEN FND_API.G_EXC_ERROR THEN

2085: IF OZF_DEBUG_HIGH_ON THEN
2086: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2087: END IF;
2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: x_return_status := FND_API.G_RET_STS_ERROR;
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2093: WHEN OTHERS THEN

Line 2090: x_return_status := FND_API.G_RET_STS_ERROR;

2086: OZF_Utility_PVT.debug_message(l_full_name||' : end');
2087: END IF;
2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: x_return_status := FND_API.G_RET_STS_ERROR;
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2093: WHEN OTHERS THEN
2094: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2087: END IF;
2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: x_return_status := FND_API.G_RET_STS_ERROR;
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2093: WHEN OTHERS THEN
2094: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2095: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);

Line 2092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2088: EXCEPTION
2089: WHEN FND_API.G_EXC_ERROR THEN
2090: x_return_status := FND_API.G_RET_STS_ERROR;
2091: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2092: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2093: WHEN OTHERS THEN
2094: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2095: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2096: END IF;

Line 2097: x_return_status := FND_API.g_ret_sts_unexp_error;

2093: WHEN OTHERS THEN
2094: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2095: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
2096: END IF;
2097: x_return_status := FND_API.g_ret_sts_unexp_error;
2098:
2099: END Update_Claim_Remaining_Amount;
2100:
2101:

Line 2242: x_return_status := FND_API.g_ret_sts_unexp_error;

2238: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2239: FND_MESSAGE.set_name('OZF', 'OZF_SETL_CHK_APPR_UNEXPERR');
2240: FND_MSG_PUB.add;
2241: END IF;
2242: x_return_status := FND_API.g_ret_sts_unexp_error;
2243: END Claim_Approval_Required;
2244:
2245:
2246:

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

2255: -- 03/22/2001 mchang Create.
2256: ---------------------------------------------------------------------
2257: PROCEDURE Complete_Settlement(
2258: p_api_version IN NUMBER
2259: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2260: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2261: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2262:
2263: ,x_return_status OUT NOCOPY VARCHAR2

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

2256: ---------------------------------------------------------------------
2257: PROCEDURE Complete_Settlement(
2258: p_api_version IN NUMBER
2259: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2260: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2261: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2262:
2263: ,x_return_status OUT NOCOPY VARCHAR2
2264: ,x_msg_data OUT NOCOPY VARCHAR2

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

2257: PROCEDURE Complete_Settlement(
2258: p_api_version IN NUMBER
2259: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2260: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2261: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2262:
2263: ,x_return_status OUT NOCOPY VARCHAR2
2264: ,x_msg_data OUT NOCOPY VARCHAR2
2265: ,x_msg_count OUT NOCOPY NUMBER

Line 2296: IF FND_API.to_boolean(p_init_msg_list) THEN

2292: IF OZF_DEBUG_HIGH_ON THEN
2293: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2294: END IF;
2295:
2296: IF FND_API.to_boolean(p_init_msg_list) THEN
2297: FND_MSG_PUB.initialize;
2298: END IF;
2299:
2300: IF NOT FND_API.compatible_api_call(

Line 2300: IF NOT FND_API.compatible_api_call(

2296: IF FND_API.to_boolean(p_init_msg_list) THEN
2297: FND_MSG_PUB.initialize;
2298: END IF;
2299:
2300: IF NOT FND_API.compatible_api_call(
2301: l_api_version,
2302: p_api_version,
2303: l_api_name,
2304: g_pkg_name

Line 2306: RAISE FND_API.g_exc_unexpected_error;

2302: p_api_version,
2303: l_api_name,
2304: g_pkg_name
2305: ) THEN
2306: RAISE FND_API.g_exc_unexpected_error;
2307: END IF;
2308:
2309: -- Initialize API return status to sucess
2310: x_return_status := FND_API.g_ret_sts_success;

Line 2310: x_return_status := FND_API.g_ret_sts_success;

2306: RAISE FND_API.g_exc_unexpected_error;
2307: END IF;
2308:
2309: -- Initialize API return status to sucess
2310: x_return_status := FND_API.g_ret_sts_success;
2311:
2312: OPEN csr_claim_prev_status(p_claim_rec.claim_id);
2313: FETCH csr_claim_prev_status INTO l_prev_status;
2314: CLOSE csr_claim_prev_status;

Line 2328: ,p_init_msg_list => FND_API.g_false

2324: IF p_claim_rec.status_code IN ('NEW', 'OPEN') AND
2325: p_claim_rec.payment_method IS NOT NULL THEN
2326: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim(
2327: p_api_version => l_api_version
2328: ,p_init_msg_list => FND_API.g_false
2329: ,p_validation_level => FND_API.g_valid_level_full
2330: ,x_return_status => l_return_status
2331: ,x_msg_data => x_msg_data
2332: ,x_msg_count => x_msg_count

Line 2329: ,p_validation_level => FND_API.g_valid_level_full

2325: p_claim_rec.payment_method IS NOT NULL THEN
2326: OZF_CLAIM_SETTLEMENT_VAL_PVT.Complete_Claim(
2327: p_api_version => l_api_version
2328: ,p_init_msg_list => FND_API.g_false
2329: ,p_validation_level => FND_API.g_valid_level_full
2330: ,x_return_status => l_return_status
2331: ,x_msg_data => x_msg_data
2332: ,x_msg_count => x_msg_count
2333: ,p_x_claim_rec => l_claim_rec

Line 2335: IF l_return_status = FND_API.g_ret_sts_error THEN

2331: ,x_msg_data => x_msg_data
2332: ,x_msg_count => x_msg_count
2333: ,p_x_claim_rec => l_claim_rec
2334: );
2335: IF l_return_status = FND_API.g_ret_sts_error THEN
2336: RAISE FND_API.g_exc_error;
2337: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2338: RAISE FND_API.g_exc_unexpected_error;
2339: END IF;

Line 2336: RAISE FND_API.g_exc_error;

2332: ,x_msg_count => x_msg_count
2333: ,p_x_claim_rec => l_claim_rec
2334: );
2335: IF l_return_status = FND_API.g_ret_sts_error THEN
2336: RAISE FND_API.g_exc_error;
2337: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2338: RAISE FND_API.g_exc_unexpected_error;
2339: END IF;
2340: END IF;

Line 2337: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2333: ,p_x_claim_rec => l_claim_rec
2334: );
2335: IF l_return_status = FND_API.g_ret_sts_error THEN
2336: RAISE FND_API.g_exc_error;
2337: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2338: RAISE FND_API.g_exc_unexpected_error;
2339: END IF;
2340: END IF;
2341:

Line 2338: RAISE FND_API.g_exc_unexpected_error;

2334: );
2335: IF l_return_status = FND_API.g_ret_sts_error THEN
2336: RAISE FND_API.g_exc_error;
2337: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2338: RAISE FND_API.g_exc_unexpected_error;
2339: END IF;
2340: END IF;
2341:
2342: x_claim_rec := l_claim_rec;

Line 2364: IF l_return_status = FND_API.g_ret_sts_error THEN

2360: ,x_msg_count => x_msg_count
2361: ,x_msg_data => x_msg_data
2362: ,p_claim_id => l_claim_rec.claim_id
2363: );
2364: IF l_return_status = FND_API.g_ret_sts_error THEN
2365: RAISE FND_API.g_exc_error;
2366: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2367: RAISE FND_API.g_exc_unexpected_error;
2368: END IF;

Line 2365: RAISE FND_API.g_exc_error;

2361: ,x_msg_data => x_msg_data
2362: ,p_claim_id => l_claim_rec.claim_id
2363: );
2364: IF l_return_status = FND_API.g_ret_sts_error THEN
2365: RAISE FND_API.g_exc_error;
2366: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2367: RAISE FND_API.g_exc_unexpected_error;
2368: END IF;
2369: ELSE

Line 2366: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2362: ,p_claim_id => l_claim_rec.claim_id
2363: );
2364: IF l_return_status = FND_API.g_ret_sts_error THEN
2365: RAISE FND_API.g_exc_error;
2366: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2367: RAISE FND_API.g_exc_unexpected_error;
2368: END IF;
2369: ELSE
2370: Dispose_Invalid_Status_Order(

Line 2367: RAISE FND_API.g_exc_unexpected_error;

2363: );
2364: IF l_return_status = FND_API.g_ret_sts_error THEN
2365: RAISE FND_API.g_exc_error;
2366: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2367: RAISE FND_API.g_exc_unexpected_error;
2368: END IF;
2369: ELSE
2370: Dispose_Invalid_Status_Order(
2371: p_prev_status => l_prev_status

Line 2374: RAISE FND_API.g_exc_error;

2370: Dispose_Invalid_Status_Order(
2371: p_prev_status => l_prev_status
2372: ,p_curr_status => l_curr_status
2373: );
2374: RAISE FND_API.g_exc_error;
2375: END IF;
2376:
2377: -------- REJECTED --------
2378: -- NEW ---> REJECTED

Line 2391: IF l_return_status = FND_API.g_ret_sts_error THEN

2387: ,x_msg_data => x_msg_data
2388: ,p_claim_rec => l_claim_rec
2389: ,x_claim_rec => x_claim_rec
2390: );
2391: IF l_return_status = FND_API.g_ret_sts_error THEN
2392: RAISE FND_API.g_exc_error;
2393: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2394: RAISE FND_API.g_exc_unexpected_error;
2395: END IF;

Line 2392: RAISE FND_API.g_exc_error;

2388: ,p_claim_rec => l_claim_rec
2389: ,x_claim_rec => x_claim_rec
2390: );
2391: IF l_return_status = FND_API.g_ret_sts_error THEN
2392: RAISE FND_API.g_exc_error;
2393: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2394: RAISE FND_API.g_exc_unexpected_error;
2395: END IF;
2396: ELSE

Line 2393: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2389: ,x_claim_rec => x_claim_rec
2390: );
2391: IF l_return_status = FND_API.g_ret_sts_error THEN
2392: RAISE FND_API.g_exc_error;
2393: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2394: RAISE FND_API.g_exc_unexpected_error;
2395: END IF;
2396: ELSE
2397: Dispose_Invalid_Status_Order(

Line 2394: RAISE FND_API.g_exc_unexpected_error;

2390: );
2391: IF l_return_status = FND_API.g_ret_sts_error THEN
2392: RAISE FND_API.g_exc_error;
2393: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2394: RAISE FND_API.g_exc_unexpected_error;
2395: END IF;
2396: ELSE
2397: Dispose_Invalid_Status_Order(
2398: p_prev_status => l_prev_status

Line 2401: RAISE FND_API.g_exc_error;

2397: Dispose_Invalid_Status_Order(
2398: p_prev_status => l_prev_status
2399: ,p_curr_status => l_curr_status
2400: );
2401: RAISE FND_API.g_exc_error;
2402: END IF;
2403:
2404: -------- DUPLICATE --------
2405: -- NEW ---> DUPLICATE

Line 2415: IF l_return_status = FND_API.g_ret_sts_error THEN

2411: ,x_msg_count => x_msg_count
2412: ,x_msg_data => x_msg_data
2413: ,p_claim_id => l_claim_rec.claim_id
2414: );
2415: IF l_return_status = FND_API.g_ret_sts_error THEN
2416: RAISE FND_API.g_exc_error;
2417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2418: RAISE FND_API.g_exc_unexpected_error;
2419: END IF;

Line 2416: RAISE FND_API.g_exc_error;

2412: ,x_msg_data => x_msg_data
2413: ,p_claim_id => l_claim_rec.claim_id
2414: );
2415: IF l_return_status = FND_API.g_ret_sts_error THEN
2416: RAISE FND_API.g_exc_error;
2417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2418: RAISE FND_API.g_exc_unexpected_error;
2419: END IF;
2420: ELSE

Line 2417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2413: ,p_claim_id => l_claim_rec.claim_id
2414: );
2415: IF l_return_status = FND_API.g_ret_sts_error THEN
2416: RAISE FND_API.g_exc_error;
2417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2418: RAISE FND_API.g_exc_unexpected_error;
2419: END IF;
2420: ELSE
2421: Dispose_Invalid_Status_Order(

Line 2418: RAISE FND_API.g_exc_unexpected_error;

2414: );
2415: IF l_return_status = FND_API.g_ret_sts_error THEN
2416: RAISE FND_API.g_exc_error;
2417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2418: RAISE FND_API.g_exc_unexpected_error;
2419: END IF;
2420: ELSE
2421: Dispose_Invalid_Status_Order(
2422: p_prev_status => l_prev_status

Line 2425: RAISE FND_API.g_exc_error;

2421: Dispose_Invalid_Status_Order(
2422: p_prev_status => l_prev_status
2423: ,p_curr_status => l_curr_status
2424: );
2425: RAISE FND_API.g_exc_error;
2426: END IF;
2427: -------- COMPLETE --------
2428: -- OPEN ---> COMPLETE
2429: ELSIF l_curr_status = 'COMPLETE' THEN

Line 2438: IF l_return_status = FND_API.g_ret_sts_error THEN

2434: ,x_msg_data => x_msg_data
2435: ,p_claim_rec => l_claim_rec
2436: ,x_claim_rec => x_claim_rec
2437: );
2438: IF l_return_status = FND_API.g_ret_sts_error THEN
2439: RAISE FND_API.g_exc_error;
2440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2441: RAISE FND_API.g_exc_unexpected_error;
2442: END IF;

Line 2439: RAISE FND_API.g_exc_error;

2435: ,p_claim_rec => l_claim_rec
2436: ,x_claim_rec => x_claim_rec
2437: );
2438: IF l_return_status = FND_API.g_ret_sts_error THEN
2439: RAISE FND_API.g_exc_error;
2440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2441: RAISE FND_API.g_exc_unexpected_error;
2442: END IF;
2443: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN

Line 2440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2436: ,x_claim_rec => x_claim_rec
2437: );
2438: IF l_return_status = FND_API.g_ret_sts_error THEN
2439: RAISE FND_API.g_exc_error;
2440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2441: RAISE FND_API.g_exc_unexpected_error;
2442: END IF;
2443: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN
2444: Dispose_Invalid_Status_Order(

Line 2441: RAISE FND_API.g_exc_unexpected_error;

2437: );
2438: IF l_return_status = FND_API.g_ret_sts_error THEN
2439: RAISE FND_API.g_exc_error;
2440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2441: RAISE FND_API.g_exc_unexpected_error;
2442: END IF;
2443: ELSIF l_prev_status <> 'PENDING_APPROVAL' THEN
2444: Dispose_Invalid_Status_Order(
2445: p_prev_status => l_prev_status

Line 2448: RAISE FND_API.g_exc_error;

2444: Dispose_Invalid_Status_Order(
2445: p_prev_status => l_prev_status
2446: ,p_curr_status => l_curr_status
2447: );
2448: RAISE FND_API.g_exc_error;
2449: END IF;
2450:
2451: -------- CLOSED --------
2452: ELSIF l_curr_status = 'CLOSED' THEN

Line 2460: IF l_return_status = FND_API.g_ret_sts_error THEN

2456: ,x_msg_data => x_msg_data
2457: ,x_msg_count => x_msg_count
2458: ,x_approval_require => l_approval_require
2459: );
2460: IF l_return_status = FND_API.g_ret_sts_error THEN
2461: RAISE FND_API.g_exc_error;
2462: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2463: RAISE FND_API.g_exc_unexpected_error;
2464: END IF;

Line 2461: RAISE FND_API.g_exc_error;

2457: ,x_msg_count => x_msg_count
2458: ,x_approval_require => l_approval_require
2459: );
2460: IF l_return_status = FND_API.g_ret_sts_error THEN
2461: RAISE FND_API.g_exc_error;
2462: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2463: RAISE FND_API.g_exc_unexpected_error;
2464: END IF;
2465:

Line 2462: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2458: ,x_approval_require => l_approval_require
2459: );
2460: IF l_return_status = FND_API.g_ret_sts_error THEN
2461: RAISE FND_API.g_exc_error;
2462: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2463: RAISE FND_API.g_exc_unexpected_error;
2464: END IF;
2465:
2466: /*-------------------------------*

Line 2463: RAISE FND_API.g_exc_unexpected_error;

2459: );
2460: IF l_return_status = FND_API.g_ret_sts_error THEN
2461: RAISE FND_API.g_exc_error;
2462: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2463: RAISE FND_API.g_exc_unexpected_error;
2464: END IF;
2465:
2466: /*-------------------------------*
2467: | OPEN --> CLOSED :Completion

Line 2477: IF l_return_status = FND_API.g_ret_sts_error THEN

2473: ,x_msg_data => x_msg_data
2474: ,p_claim_rec => l_claim_rec
2475: ,x_claim_rec => l_complete_claim_rec
2476: );
2477: IF l_return_status = FND_API.g_ret_sts_error THEN
2478: RAISE FND_API.g_exc_error;
2479: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2480: RAISE FND_API.g_exc_unexpected_error;
2481: END IF;

Line 2478: RAISE FND_API.g_exc_error;

2474: ,p_claim_rec => l_claim_rec
2475: ,x_claim_rec => l_complete_claim_rec
2476: );
2477: IF l_return_status = FND_API.g_ret_sts_error THEN
2478: RAISE FND_API.g_exc_error;
2479: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2480: RAISE FND_API.g_exc_unexpected_error;
2481: END IF;
2482:

Line 2479: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2475: ,x_claim_rec => l_complete_claim_rec
2476: );
2477: IF l_return_status = FND_API.g_ret_sts_error THEN
2478: RAISE FND_API.g_exc_error;
2479: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2480: RAISE FND_API.g_exc_unexpected_error;
2481: END IF;
2482:
2483: l_claim_rec := l_complete_claim_rec;

Line 2480: RAISE FND_API.g_exc_unexpected_error;

2476: );
2477: IF l_return_status = FND_API.g_ret_sts_error THEN
2478: RAISE FND_API.g_exc_error;
2479: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2480: RAISE FND_API.g_exc_unexpected_error;
2481: END IF;
2482:
2483: l_claim_rec := l_complete_claim_rec;
2484:

Line 2494: IF l_return_status = FND_API.g_ret_sts_error THEN

2490: ,x_msg_data => x_msg_data
2491: ,p_claim_rec => l_claim_rec
2492: ,x_claim_rec => x_claim_rec
2493: );
2494: IF l_return_status = FND_API.g_ret_sts_error THEN
2495: RAISE FND_API.g_exc_error;
2496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2497: RAISE FND_API.g_exc_unexpected_error;
2498: END IF;

Line 2495: RAISE FND_API.g_exc_error;

2491: ,p_claim_rec => l_claim_rec
2492: ,x_claim_rec => x_claim_rec
2493: );
2494: IF l_return_status = FND_API.g_ret_sts_error THEN
2495: RAISE FND_API.g_exc_error;
2496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2497: RAISE FND_API.g_exc_unexpected_error;
2498: END IF;
2499: ELSE -- skip approval workflow

Line 2496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2492: ,x_claim_rec => x_claim_rec
2493: );
2494: IF l_return_status = FND_API.g_ret_sts_error THEN
2495: RAISE FND_API.g_exc_error;
2496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2497: RAISE FND_API.g_exc_unexpected_error;
2498: END IF;
2499: ELSE -- skip approval workflow
2500: Create_Payment_for_Completion (

Line 2497: RAISE FND_API.g_exc_unexpected_error;

2493: );
2494: IF l_return_status = FND_API.g_ret_sts_error THEN
2495: RAISE FND_API.g_exc_error;
2496: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2497: RAISE FND_API.g_exc_unexpected_error;
2498: END IF;
2499: ELSE -- skip approval workflow
2500: Create_Payment_for_Completion (
2501: x_return_status => l_return_status

Line 2510: IF l_return_status = FND_API.g_ret_sts_error THEN

2506: ,p_prev_status => l_prev_status
2507: ,p_curr_status => l_curr_status
2508: ,x_claim_rec => x_claim_rec
2509: );
2510: IF l_return_status = FND_API.g_ret_sts_error THEN
2511: RAISE FND_API.g_exc_error;
2512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2513: RAISE FND_API.g_exc_unexpected_error;
2514: END IF;

Line 2511: RAISE FND_API.g_exc_error;

2507: ,p_curr_status => l_curr_status
2508: ,x_claim_rec => x_claim_rec
2509: );
2510: IF l_return_status = FND_API.g_ret_sts_error THEN
2511: RAISE FND_API.g_exc_error;
2512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2513: RAISE FND_API.g_exc_unexpected_error;
2514: END IF;
2515: END IF;

Line 2512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2508: ,x_claim_rec => x_claim_rec
2509: );
2510: IF l_return_status = FND_API.g_ret_sts_error THEN
2511: RAISE FND_API.g_exc_error;
2512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2513: RAISE FND_API.g_exc_unexpected_error;
2514: END IF;
2515: END IF;
2516:

Line 2513: RAISE FND_API.g_exc_unexpected_error;

2509: );
2510: IF l_return_status = FND_API.g_ret_sts_error THEN
2511: RAISE FND_API.g_exc_error;
2512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2513: RAISE FND_API.g_exc_unexpected_error;
2514: END IF;
2515: END IF;
2516:
2517: /*-----------------------------------*

Line 2529: IF l_return_status = FND_API.g_ret_sts_error THEN

2525: ,x_msg_data => x_msg_data
2526: ,p_claim_rec => l_claim_rec
2527: ,x_claim_rec => x_claim_rec
2528: );
2529: IF l_return_status = FND_API.g_ret_sts_error THEN
2530: RAISE FND_API.g_exc_error;
2531: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2532: RAISE FND_API.g_exc_unexpected_error;
2533: END IF;

Line 2530: RAISE FND_API.g_exc_error;

2526: ,p_claim_rec => l_claim_rec
2527: ,x_claim_rec => x_claim_rec
2528: );
2529: IF l_return_status = FND_API.g_ret_sts_error THEN
2530: RAISE FND_API.g_exc_error;
2531: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2532: RAISE FND_API.g_exc_unexpected_error;
2533: END IF;
2534: ELSE -- skip approval workflow

Line 2531: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2527: ,x_claim_rec => x_claim_rec
2528: );
2529: IF l_return_status = FND_API.g_ret_sts_error THEN
2530: RAISE FND_API.g_exc_error;
2531: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2532: RAISE FND_API.g_exc_unexpected_error;
2533: END IF;
2534: ELSE -- skip approval workflow
2535: Create_Payment_for_Completion (

Line 2532: RAISE FND_API.g_exc_unexpected_error;

2528: );
2529: IF l_return_status = FND_API.g_ret_sts_error THEN
2530: RAISE FND_API.g_exc_error;
2531: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2532: RAISE FND_API.g_exc_unexpected_error;
2533: END IF;
2534: ELSE -- skip approval workflow
2535: Create_Payment_for_Completion (
2536: x_return_status => l_return_status

Line 2545: IF l_return_status = FND_API.g_ret_sts_error THEN

2541: ,p_prev_status => l_prev_status
2542: ,p_curr_status => l_curr_status
2543: ,x_claim_rec => x_claim_rec
2544: );
2545: IF l_return_status = FND_API.g_ret_sts_error THEN
2546: RAISE FND_API.g_exc_error;
2547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2548: RAISE FND_API.g_exc_unexpected_error;
2549: END IF;

Line 2546: RAISE FND_API.g_exc_error;

2542: ,p_curr_status => l_curr_status
2543: ,x_claim_rec => x_claim_rec
2544: );
2545: IF l_return_status = FND_API.g_ret_sts_error THEN
2546: RAISE FND_API.g_exc_error;
2547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2548: RAISE FND_API.g_exc_unexpected_error;
2549: END IF;
2550: END IF;

Line 2547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2543: ,x_claim_rec => x_claim_rec
2544: );
2545: IF l_return_status = FND_API.g_ret_sts_error THEN
2546: RAISE FND_API.g_exc_error;
2547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2548: RAISE FND_API.g_exc_unexpected_error;
2549: END IF;
2550: END IF;
2551:

Line 2548: RAISE FND_API.g_exc_unexpected_error;

2544: );
2545: IF l_return_status = FND_API.g_ret_sts_error THEN
2546: RAISE FND_API.g_exc_error;
2547: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2548: RAISE FND_API.g_exc_unexpected_error;
2549: END IF;
2550: END IF;
2551:
2552: /*----------------------------------------------------*

Line 2567: IF l_return_status = FND_API.g_ret_sts_error THEN

2563: ,p_prev_status => l_prev_status
2564: ,p_curr_status => l_curr_status
2565: ,x_claim_rec => x_claim_rec
2566: );
2567: IF l_return_status = FND_API.g_ret_sts_error THEN
2568: RAISE FND_API.g_exc_error;
2569: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2570: RAISE FND_API.g_exc_unexpected_error;
2571: END IF;

Line 2568: RAISE FND_API.g_exc_error;

2564: ,p_curr_status => l_curr_status
2565: ,x_claim_rec => x_claim_rec
2566: );
2567: IF l_return_status = FND_API.g_ret_sts_error THEN
2568: RAISE FND_API.g_exc_error;
2569: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2570: RAISE FND_API.g_exc_unexpected_error;
2571: END IF;
2572:

Line 2569: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2565: ,x_claim_rec => x_claim_rec
2566: );
2567: IF l_return_status = FND_API.g_ret_sts_error THEN
2568: RAISE FND_API.g_exc_error;
2569: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2570: RAISE FND_API.g_exc_unexpected_error;
2571: END IF;
2572:
2573: /*----------------------------------------*

Line 2570: RAISE FND_API.g_exc_unexpected_error;

2566: );
2567: IF l_return_status = FND_API.g_ret_sts_error THEN
2568: RAISE FND_API.g_exc_error;
2569: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2570: RAISE FND_API.g_exc_unexpected_error;
2571: END IF;
2572:
2573: /*----------------------------------------*
2574: | PENDING_CLOSE --> CLOSED :Completion

Line 2584: IF l_return_status = FND_API.g_ret_sts_error THEN

2580: ,x_msg_data => x_msg_data
2581: ,p_claim_rec => l_claim_rec
2582: ,x_claim_rec => x_claim_rec
2583: );
2584: IF l_return_status = FND_API.g_ret_sts_error THEN
2585: RAISE FND_API.g_exc_error;
2586: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2587: RAISE FND_API.g_exc_unexpected_error;
2588: END IF;

Line 2585: RAISE FND_API.g_exc_error;

2581: ,p_claim_rec => l_claim_rec
2582: ,x_claim_rec => x_claim_rec
2583: );
2584: IF l_return_status = FND_API.g_ret_sts_error THEN
2585: RAISE FND_API.g_exc_error;
2586: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2587: RAISE FND_API.g_exc_unexpected_error;
2588: END IF;
2589:

Line 2586: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2582: ,x_claim_rec => x_claim_rec
2583: );
2584: IF l_return_status = FND_API.g_ret_sts_error THEN
2585: RAISE FND_API.g_exc_error;
2586: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2587: RAISE FND_API.g_exc_unexpected_error;
2588: END IF;
2589:
2590: ELSE

Line 2587: RAISE FND_API.g_exc_unexpected_error;

2583: );
2584: IF l_return_status = FND_API.g_ret_sts_error THEN
2585: RAISE FND_API.g_exc_error;
2586: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2587: RAISE FND_API.g_exc_unexpected_error;
2588: END IF;
2589:
2590: ELSE
2591: IF l_prev_status <> 'PENDING_CLOSE' THEN

Line 2596: RAISE FND_API.g_exc_error;

2592: Dispose_Invalid_Status_Order(
2593: p_prev_status => l_prev_status
2594: ,p_curr_status => l_curr_status
2595: );
2596: RAISE FND_API.g_exc_error;
2597: END IF;
2598: END IF;
2599:
2600: -------- PENDING_APPROVAL (for Mass Settlement) --------

Line 2610: IF l_return_status = FND_API.g_ret_sts_error THEN

2606: ,x_msg_data => x_msg_data
2607: ,p_claim_rec => l_claim_rec
2608: ,x_claim_rec => x_claim_rec
2609: );
2610: IF l_return_status = FND_API.g_ret_sts_error THEN
2611: RAISE FND_API.g_exc_error;
2612: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2613: RAISE FND_API.g_exc_unexpected_error;
2614: END IF;

Line 2611: RAISE FND_API.g_exc_error;

2607: ,p_claim_rec => l_claim_rec
2608: ,x_claim_rec => x_claim_rec
2609: );
2610: IF l_return_status = FND_API.g_ret_sts_error THEN
2611: RAISE FND_API.g_exc_error;
2612: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2613: RAISE FND_API.g_exc_unexpected_error;
2614: END IF;
2615: END IF;

Line 2612: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2608: ,x_claim_rec => x_claim_rec
2609: );
2610: IF l_return_status = FND_API.g_ret_sts_error THEN
2611: RAISE FND_API.g_exc_error;
2612: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2613: RAISE FND_API.g_exc_unexpected_error;
2614: END IF;
2615: END IF;
2616:

Line 2613: RAISE FND_API.g_exc_unexpected_error;

2609: );
2610: IF l_return_status = FND_API.g_ret_sts_error THEN
2611: RAISE FND_API.g_exc_error;
2612: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2613: RAISE FND_API.g_exc_unexpected_error;
2614: END IF;
2615: END IF;
2616:
2617: /*

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: -------- ARCHIVED --------
2639: ELSIF l_curr_status = 'ARCHIVED' THEN
2640: IF l_prev_status IN ( 'NEW'

Line 2651: RAISE FND_API.g_exc_error;

2647: Dispose_Invalid_Status_Order(
2648: p_prev_status => l_prev_status
2649: ,p_curr_status => l_curr_status
2650: );
2651: RAISE FND_API.g_exc_error;
2652: END IF;
2653: -------- OPEN --------
2654: ELSIF l_curr_status = 'OPEN' THEN
2655: IF l_prev_status IN ( --'COMPLETE'

Line 2664: RAISE FND_API.g_exc_error;

2660: Dispose_Invalid_Status_Order(
2661: p_prev_status => l_prev_status
2662: ,p_curr_status => l_curr_status
2663: );
2664: RAISE FND_API.g_exc_error;
2665: /*---------------------------*
2666: | PENDING_APPROVAL --> OPEN
2667: | PENDING_CLOSE --> OPEN
2668: *---------------------------*/

Line 2677: IF l_return_status = FND_API.g_ret_sts_error THEN

2673: ,x_msg_data => x_msg_data
2674: ,p_claim_rec => l_claim_rec
2675: ,x_claim_rec => x_claim_rec
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: ,p_claim_rec => l_claim_rec
2675: ,x_claim_rec => x_claim_rec
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: END IF;

Line 2679: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2675: ,x_claim_rec => x_claim_rec
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: END IF;
2683:

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: END IF;
2683:
2684: -------- PENDING_CLOSED --------

Line 2699: RAISE FND_API.g_exc_error;

2695: Dispose_Invalid_Status_Order(
2696: p_prev_status => l_prev_status
2697: ,p_curr_status => l_curr_status
2698: );
2699: RAISE FND_API.g_exc_error;
2700: END IF;
2701: END IF;
2702: END IF; -- end of complete settlement
2703:

Line 2707: IF FND_API.to_boolean(p_commit) THEN

2703:
2704: ------------------------- finish -------------------------------
2705: /*
2706: -- Check for commit
2707: IF FND_API.to_boolean(p_commit) THEN
2708: COMMIT;
2709: END IF;
2710: */
2711:

Line 2713: p_encoded => FND_API.g_false,

2709: END IF;
2710: */
2711:
2712: FND_MSG_PUB.count_and_get(
2713: p_encoded => FND_API.g_false,
2714: p_count => x_msg_count,
2715: p_data => x_msg_data
2716: );
2717:

Line 2723: WHEN FND_API.g_exc_error THEN

2719: OZF_Utility_PVT.debug_message(l_full_name ||': end');
2720: END IF;
2721:
2722: EXCEPTION
2723: WHEN FND_API.g_exc_error THEN
2724: ROLLBACK TO Complete_Settlement;
2725: x_return_status := FND_API.g_ret_sts_error;
2726: FND_MSG_PUB.count_and_get (
2727: p_encoded => FND_API.g_false,

Line 2725: x_return_status := FND_API.g_ret_sts_error;

2721:
2722: EXCEPTION
2723: WHEN FND_API.g_exc_error THEN
2724: ROLLBACK TO Complete_Settlement;
2725: x_return_status := FND_API.g_ret_sts_error;
2726: FND_MSG_PUB.count_and_get (
2727: p_encoded => FND_API.g_false,
2728: p_count => x_msg_count,
2729: p_data => x_msg_data

Line 2727: p_encoded => FND_API.g_false,

2723: WHEN FND_API.g_exc_error THEN
2724: ROLLBACK TO Complete_Settlement;
2725: x_return_status := FND_API.g_ret_sts_error;
2726: FND_MSG_PUB.count_and_get (
2727: p_encoded => FND_API.g_false,
2728: p_count => x_msg_count,
2729: p_data => x_msg_data
2730: );
2731: WHEN FND_API.g_exc_unexpected_error THEN

Line 2731: WHEN FND_API.g_exc_unexpected_error THEN

2727: p_encoded => FND_API.g_false,
2728: p_count => x_msg_count,
2729: p_data => x_msg_data
2730: );
2731: WHEN FND_API.g_exc_unexpected_error THEN
2732: ROLLBACK TO Complete_Settlement;
2733: x_return_status := FND_API.g_ret_sts_unexp_error ;
2734: FND_MSG_PUB.count_and_get (
2735: p_encoded => FND_API.g_false,

Line 2733: x_return_status := FND_API.g_ret_sts_unexp_error ;

2729: p_data => x_msg_data
2730: );
2731: WHEN FND_API.g_exc_unexpected_error THEN
2732: ROLLBACK TO Complete_Settlement;
2733: x_return_status := FND_API.g_ret_sts_unexp_error ;
2734: FND_MSG_PUB.count_and_get (
2735: p_encoded => FND_API.g_false,
2736: p_count => x_msg_count,
2737: p_data => x_msg_data

Line 2735: p_encoded => FND_API.g_false,

2731: WHEN FND_API.g_exc_unexpected_error THEN
2732: ROLLBACK TO Complete_Settlement;
2733: x_return_status := FND_API.g_ret_sts_unexp_error ;
2734: FND_MSG_PUB.count_and_get (
2735: p_encoded => FND_API.g_false,
2736: p_count => x_msg_count,
2737: p_data => x_msg_data
2738: );
2739: WHEN OTHERS THEN

Line 2741: x_return_status := FND_API.g_ret_sts_unexp_error ;

2737: p_data => x_msg_data
2738: );
2739: WHEN OTHERS THEN
2740: ROLLBACK TO Complete_Settlement;
2741: x_return_status := FND_API.g_ret_sts_unexp_error ;
2742: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2743: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2744: END IF;
2745: FND_MSG_PUB.count_and_get (

Line 2746: p_encoded => FND_API.g_false,

2742: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2743: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
2744: END IF;
2745: FND_MSG_PUB.count_and_get (
2746: p_encoded => FND_API.g_false,
2747: p_count => x_msg_count,
2748: p_data => x_msg_data
2749: );
2750:

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

2761: -- 10-AUG-2001 mchang Create.
2762: ---------------------------------------------------------------------
2763: PROCEDURE Settle_Claim(
2764: p_api_version IN NUMBER
2765: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2766: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2767: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2768:
2769: ,x_return_status OUT NOCOPY VARCHAR2

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

2762: ---------------------------------------------------------------------
2763: PROCEDURE Settle_Claim(
2764: p_api_version IN NUMBER
2765: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2766: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2767: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2768:
2769: ,x_return_status OUT NOCOPY VARCHAR2
2770: ,x_msg_data OUT NOCOPY VARCHAR2

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

2763: PROCEDURE Settle_Claim(
2764: p_api_version IN NUMBER
2765: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
2766: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
2767: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
2768:
2769: ,x_return_status OUT NOCOPY VARCHAR2
2770: ,x_msg_data OUT NOCOPY VARCHAR2
2771: ,x_msg_count OUT NOCOPY NUMBER

Line 2803: IF FND_API.to_boolean(p_init_msg_list) THEN

2799: IF OZF_DEBUG_HIGH_ON THEN
2800: OZF_Utility_PVT.debug_message(l_full_name||' : start');
2801: END IF;
2802:
2803: IF FND_API.to_boolean(p_init_msg_list) THEN
2804: FND_MSG_PUB.initialize;
2805: END IF;
2806:
2807: IF NOT FND_API.compatible_api_call(

Line 2807: IF NOT FND_API.compatible_api_call(

2803: IF FND_API.to_boolean(p_init_msg_list) THEN
2804: FND_MSG_PUB.initialize;
2805: END IF;
2806:
2807: IF NOT FND_API.compatible_api_call(
2808: l_api_version,
2809: p_api_version,
2810: l_api_name,
2811: g_pkg_name

Line 2813: RAISE FND_API.g_exc_unexpected_error;

2809: p_api_version,
2810: l_api_name,
2811: g_pkg_name
2812: ) THEN
2813: RAISE FND_API.g_exc_unexpected_error;
2814: END IF;
2815:
2816: -- Initialize API return status to sucess
2817: x_return_status := FND_API.g_ret_sts_success;

Line 2817: x_return_status := FND_API.g_ret_sts_success;

2813: RAISE FND_API.g_exc_unexpected_error;
2814: END IF;
2815:
2816: -- Initialize API return status to sucess
2817: x_return_status := FND_API.g_ret_sts_success;
2818:
2819: --------------------- Start -----------------------
2820: IF p_curr_status = 'CANCELLED' THEN
2821: Cancel_Claim_for_Settlement (

Line 2829: IF l_return_status = FND_API.g_ret_sts_error THEN

2825: ,p_claim_id => p_claim_id
2826: ,p_prev_status => p_prev_status
2827: ,p_curr_status => p_curr_status
2828: );
2829: IF l_return_status = FND_API.g_ret_sts_error THEN
2830: RAISE FND_API.g_exc_error;
2831: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2832: RAISE FND_API.g_exc_unexpected_error;
2833: END IF;

Line 2830: RAISE FND_API.g_exc_error;

2826: ,p_prev_status => p_prev_status
2827: ,p_curr_status => p_curr_status
2828: );
2829: IF l_return_status = FND_API.g_ret_sts_error THEN
2830: RAISE FND_API.g_exc_error;
2831: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2832: RAISE FND_API.g_exc_unexpected_error;
2833: END IF;
2834:

Line 2831: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2827: ,p_curr_status => p_curr_status
2828: );
2829: IF l_return_status = FND_API.g_ret_sts_error THEN
2830: RAISE FND_API.g_exc_error;
2831: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2832: RAISE FND_API.g_exc_unexpected_error;
2833: END IF;
2834:
2835: ELSIF p_curr_status = 'REJECTED' THEN

Line 2832: RAISE FND_API.g_exc_unexpected_error;

2828: );
2829: IF l_return_status = FND_API.g_ret_sts_error THEN
2830: RAISE FND_API.g_exc_error;
2831: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2832: RAISE FND_API.g_exc_unexpected_error;
2833: END IF;
2834:
2835: ELSIF p_curr_status = 'REJECTED' THEN
2836: Reject_Claim_for_Settlement (

Line 2844: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 2845: RAISE FND_API.g_exc_error;

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

Line 2846: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2842: ,p_curr_status => p_curr_status
2843: );
2844: IF l_return_status = FND_API.g_ret_sts_error THEN
2845: RAISE FND_API.g_exc_error;
2846: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2847: RAISE FND_API.g_exc_unexpected_error;
2848: END IF;
2849:
2850: ELSIF p_curr_status = 'DUPLICATE' THEN

Line 2847: RAISE FND_API.g_exc_unexpected_error;

2843: );
2844: IF l_return_status = FND_API.g_ret_sts_error THEN
2845: RAISE FND_API.g_exc_error;
2846: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2847: RAISE FND_API.g_exc_unexpected_error;
2848: END IF;
2849:
2850: ELSIF p_curr_status = 'DUPLICATE' THEN
2851: /* empty implementation */

Line 2852: l_return_status := FND_API.g_ret_sts_success;

2848: END IF;
2849:
2850: ELSIF p_curr_status = 'DUPLICATE' THEN
2851: /* empty implementation */
2852: l_return_status := FND_API.g_ret_sts_success;
2853:
2854: ELSIF p_curr_status = 'COMPLETE' THEN
2855: Complete_Claim_for_Settlement (
2856: x_return_status => l_return_status

Line 2861: IF l_return_status = FND_API.g_ret_sts_error THEN

2857: ,x_msg_count => x_msg_count
2858: ,x_msg_data => x_msg_data
2859: ,p_claim_id => p_claim_id
2860: );
2861: IF l_return_status = FND_API.g_ret_sts_error THEN
2862: RAISE FND_API.g_exc_error;
2863: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2864: RAISE FND_API.g_exc_unexpected_error;
2865: END IF;

Line 2862: RAISE FND_API.g_exc_error;

2858: ,x_msg_data => x_msg_data
2859: ,p_claim_id => p_claim_id
2860: );
2861: IF l_return_status = FND_API.g_ret_sts_error THEN
2862: RAISE FND_API.g_exc_error;
2863: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2864: RAISE FND_API.g_exc_unexpected_error;
2865: END IF;
2866:

Line 2863: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2859: ,p_claim_id => p_claim_id
2860: );
2861: IF l_return_status = FND_API.g_ret_sts_error THEN
2862: RAISE FND_API.g_exc_error;
2863: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2864: RAISE FND_API.g_exc_unexpected_error;
2865: END IF;
2866:
2867: ELSIF p_curr_status = 'CLOSED' THEN

Line 2864: RAISE FND_API.g_exc_unexpected_error;

2860: );
2861: IF l_return_status = FND_API.g_ret_sts_error THEN
2862: RAISE FND_API.g_exc_error;
2863: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2864: RAISE FND_API.g_exc_unexpected_error;
2865: END IF;
2866:
2867: ELSIF p_curr_status = 'CLOSED' THEN
2868: OPEN csr_claim_approval_attr(p_claim_id);

Line 2883: IF l_return_status = FND_API.g_ret_sts_error THEN

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

Line 2884: RAISE FND_API.g_exc_error;

2880: ,x_msg_count => x_msg_count
2881: ,x_approval_require => l_approval_require
2882: );
2883: IF l_return_status = FND_API.g_ret_sts_error THEN
2884: RAISE FND_API.g_exc_error;
2885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2886: RAISE FND_API.g_exc_unexpected_error;
2887: END IF;
2888:

Line 2885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2881: ,x_approval_require => l_approval_require
2882: );
2883: IF l_return_status = FND_API.g_ret_sts_error THEN
2884: RAISE FND_API.g_exc_error;
2885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2886: RAISE FND_API.g_exc_unexpected_error;
2887: END IF;
2888:
2889: /*-------------------------------*

Line 2886: RAISE FND_API.g_exc_unexpected_error;

2882: );
2883: IF l_return_status = FND_API.g_ret_sts_error THEN
2884: RAISE FND_API.g_exc_error;
2885: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2886: RAISE FND_API.g_exc_unexpected_error;
2887: END IF;
2888:
2889: /*-------------------------------*
2890: | OPEN --> CLOSED :Settlement

Line 2899: IF l_return_status = FND_API.g_ret_sts_error THEN

2895: ,x_msg_count => x_msg_count
2896: ,x_msg_data => x_msg_data
2897: ,p_claim_id => p_claim_id
2898: );
2899: IF l_return_status = FND_API.g_ret_sts_error THEN
2900: RAISE FND_API.g_exc_error;
2901: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2902: RAISE FND_API.g_exc_unexpected_error;
2903: END IF;

Line 2900: RAISE FND_API.g_exc_error;

2896: ,x_msg_data => x_msg_data
2897: ,p_claim_id => p_claim_id
2898: );
2899: IF l_return_status = FND_API.g_ret_sts_error THEN
2900: RAISE FND_API.g_exc_error;
2901: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2902: RAISE FND_API.g_exc_unexpected_error;
2903: END IF;
2904:

Line 2901: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2897: ,p_claim_id => p_claim_id
2898: );
2899: IF l_return_status = FND_API.g_ret_sts_error THEN
2900: RAISE FND_API.g_exc_error;
2901: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2902: RAISE FND_API.g_exc_unexpected_error;
2903: END IF;
2904:
2905: IF l_approval_require = 'Y' THEN

Line 2902: RAISE FND_API.g_exc_unexpected_error;

2898: );
2899: IF l_return_status = FND_API.g_ret_sts_error THEN
2900: RAISE FND_API.g_exc_error;
2901: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2902: RAISE FND_API.g_exc_unexpected_error;
2903: END IF;
2904:
2905: IF l_approval_require = 'Y' THEN
2906: -- call marketing general approval workflow

Line 2915: IF l_return_status = FND_API.g_ret_sts_error THEN

2911: ,p_claim_id => p_claim_id
2912: ,p_prev_status => p_prev_status
2913: ,p_curr_status => p_curr_status
2914: );
2915: IF l_return_status = FND_API.g_ret_sts_error THEN
2916: RAISE FND_API.g_exc_error;
2917: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2918: RAISE FND_API.g_exc_unexpected_error;
2919: END IF;

Line 2916: RAISE FND_API.g_exc_error;

2912: ,p_prev_status => p_prev_status
2913: ,p_curr_status => p_curr_status
2914: );
2915: IF l_return_status = FND_API.g_ret_sts_error THEN
2916: RAISE FND_API.g_exc_error;
2917: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2918: RAISE FND_API.g_exc_unexpected_error;
2919: END IF;
2920: ELSE -- skip approval workflow and create payment directly

Line 2917: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2913: ,p_curr_status => p_curr_status
2914: );
2915: IF l_return_status = FND_API.g_ret_sts_error THEN
2916: RAISE FND_API.g_exc_error;
2917: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2918: RAISE FND_API.g_exc_unexpected_error;
2919: END IF;
2920: ELSE -- skip approval workflow and create payment directly
2921: -- payment process won't start if claim will go for referral approval.

Line 2918: RAISE FND_API.g_exc_unexpected_error;

2914: );
2915: IF l_return_status = FND_API.g_ret_sts_error THEN
2916: RAISE FND_API.g_exc_error;
2917: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2918: RAISE FND_API.g_exc_unexpected_error;
2919: END IF;
2920: ELSE -- skip approval workflow and create payment directly
2921: -- payment process won't start if claim will go for referral approval.
2922: IF l_claim_approval_attr.status_code <> 'PENDING_APPROVAL' THEN

Line 2931: IF l_return_status = FND_API.g_ret_sts_error THEN

2927: ,p_claim_id => p_claim_id
2928: ,p_prev_status => p_prev_status
2929: ,p_curr_status => p_curr_status
2930: );
2931: IF l_return_status = FND_API.g_ret_sts_error THEN
2932: RAISE FND_API.g_exc_error;
2933: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2934: RAISE FND_API.g_exc_unexpected_error;
2935: END IF;

Line 2932: RAISE FND_API.g_exc_error;

2928: ,p_prev_status => p_prev_status
2929: ,p_curr_status => p_curr_status
2930: );
2931: IF l_return_status = FND_API.g_ret_sts_error THEN
2932: RAISE FND_API.g_exc_error;
2933: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2934: RAISE FND_API.g_exc_unexpected_error;
2935: END IF;
2936: END IF;

Line 2933: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2929: ,p_curr_status => p_curr_status
2930: );
2931: IF l_return_status = FND_API.g_ret_sts_error THEN
2932: RAISE FND_API.g_exc_error;
2933: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2934: RAISE FND_API.g_exc_unexpected_error;
2935: END IF;
2936: END IF;
2937: END IF;

Line 2934: RAISE FND_API.g_exc_unexpected_error;

2930: );
2931: IF l_return_status = FND_API.g_ret_sts_error THEN
2932: RAISE FND_API.g_exc_error;
2933: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2934: RAISE FND_API.g_exc_unexpected_error;
2935: END IF;
2936: END IF;
2937: END IF;
2938:

Line 2953: IF l_return_status = FND_API.g_ret_sts_error THEN

2949: ,p_claim_id => p_claim_id
2950: ,p_prev_status => p_prev_status
2951: ,p_curr_status => p_curr_status
2952: );
2953: IF l_return_status = FND_API.g_ret_sts_error THEN
2954: RAISE FND_API.g_exc_error;
2955: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2956: RAISE FND_API.g_exc_unexpected_error;
2957: END IF;

Line 2954: RAISE FND_API.g_exc_error;

2950: ,p_prev_status => p_prev_status
2951: ,p_curr_status => p_curr_status
2952: );
2953: IF l_return_status = FND_API.g_ret_sts_error THEN
2954: RAISE FND_API.g_exc_error;
2955: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2956: RAISE FND_API.g_exc_unexpected_error;
2957: END IF;
2958: ELSE -- skip approval workflow and create payment directly

Line 2955: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2951: ,p_curr_status => p_curr_status
2952: );
2953: IF l_return_status = FND_API.g_ret_sts_error THEN
2954: RAISE FND_API.g_exc_error;
2955: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2956: RAISE FND_API.g_exc_unexpected_error;
2957: END IF;
2958: ELSE -- skip approval workflow and create payment directly
2959: -- payment process won't start if claim will go for referral approval.

Line 2956: RAISE FND_API.g_exc_unexpected_error;

2952: );
2953: IF l_return_status = FND_API.g_ret_sts_error THEN
2954: RAISE FND_API.g_exc_error;
2955: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2956: RAISE FND_API.g_exc_unexpected_error;
2957: END IF;
2958: ELSE -- skip approval workflow and create payment directly
2959: -- payment process won't start if claim will go for referral approval.
2960: IF l_claim_approval_attr.status_code <> 'PENDING_APPROVAL' THEN

Line 2969: IF l_return_status = FND_API.g_ret_sts_error THEN

2965: ,p_claim_id => p_claim_id
2966: ,p_prev_status => p_prev_status
2967: ,p_curr_status => p_curr_status
2968: );
2969: IF l_return_status = FND_API.g_ret_sts_error THEN
2970: RAISE FND_API.g_exc_error;
2971: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2972: RAISE FND_API.g_exc_unexpected_error;
2973: END IF;

Line 2970: RAISE FND_API.g_exc_error;

2966: ,p_prev_status => p_prev_status
2967: ,p_curr_status => p_curr_status
2968: );
2969: IF l_return_status = FND_API.g_ret_sts_error THEN
2970: RAISE FND_API.g_exc_error;
2971: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2972: RAISE FND_API.g_exc_unexpected_error;
2973: END IF;
2974: END IF;

Line 2971: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2967: ,p_curr_status => p_curr_status
2968: );
2969: IF l_return_status = FND_API.g_ret_sts_error THEN
2970: RAISE FND_API.g_exc_error;
2971: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2972: RAISE FND_API.g_exc_unexpected_error;
2973: END IF;
2974: END IF;
2975: END IF;

Line 2972: RAISE FND_API.g_exc_unexpected_error;

2968: );
2969: IF l_return_status = FND_API.g_ret_sts_error THEN
2970: RAISE FND_API.g_exc_error;
2971: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2972: RAISE FND_API.g_exc_unexpected_error;
2973: END IF;
2974: END IF;
2975: END IF;
2976:

Line 2990: IF l_return_status = FND_API.g_ret_sts_error THEN

2986: ,p_claim_id => p_claim_id
2987: ,p_prev_status => p_prev_status
2988: ,p_curr_status => p_curr_status
2989: );
2990: IF l_return_status = FND_API.g_ret_sts_error THEN
2991: RAISE FND_API.g_exc_error;
2992: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2993: RAISE FND_API.g_exc_unexpected_error;
2994: END IF;

Line 2991: RAISE FND_API.g_exc_error;

2987: ,p_prev_status => p_prev_status
2988: ,p_curr_status => p_curr_status
2989: );
2990: IF l_return_status = FND_API.g_ret_sts_error THEN
2991: RAISE FND_API.g_exc_error;
2992: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2993: RAISE FND_API.g_exc_unexpected_error;
2994: END IF;
2995: END IF;

Line 2992: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2988: ,p_curr_status => p_curr_status
2989: );
2990: IF l_return_status = FND_API.g_ret_sts_error THEN
2991: RAISE FND_API.g_exc_error;
2992: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2993: RAISE FND_API.g_exc_unexpected_error;
2994: END IF;
2995: END IF;
2996: ELSIF p_curr_status = 'OPEN' THEN

Line 2993: RAISE FND_API.g_exc_unexpected_error;

2989: );
2990: IF l_return_status = FND_API.g_ret_sts_error THEN
2991: RAISE FND_API.g_exc_error;
2992: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
2993: RAISE FND_API.g_exc_unexpected_error;
2994: END IF;
2995: END IF;
2996: ELSIF p_curr_status = 'OPEN' THEN
2997: /* mchang fix for 1159

Line 3001: IF l_return_status = FND_API.g_ret_sts_error THEN

2997: /* mchang fix for 1159
2998: IF p_prev_status = 'COMPLETE' AND
2999: payment_method= 'RMA' THEN
3000: -- Delete RMA Order
3001: IF l_return_status = FND_API.g_ret_sts_error THEN
3002: RAISE FND_API.g_exc_error;
3003: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3004: RAISE FND_API.g_exc_unexpected_error;
3005: END IF;

Line 3002: RAISE FND_API.g_exc_error;

2998: IF p_prev_status = 'COMPLETE' AND
2999: payment_method= 'RMA' THEN
3000: -- Delete RMA Order
3001: IF l_return_status = FND_API.g_ret_sts_error THEN
3002: RAISE FND_API.g_exc_error;
3003: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3004: RAISE FND_API.g_exc_unexpected_error;
3005: END IF;
3006: */

Line 3003: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

2999: payment_method= 'RMA' THEN
3000: -- Delete RMA Order
3001: IF l_return_status = FND_API.g_ret_sts_error THEN
3002: RAISE FND_API.g_exc_error;
3003: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3004: RAISE FND_API.g_exc_unexpected_error;
3005: END IF;
3006: */
3007: NULL;

Line 3004: RAISE FND_API.g_exc_unexpected_error;

3000: -- Delete RMA Order
3001: IF l_return_status = FND_API.g_ret_sts_error THEN
3002: RAISE FND_API.g_exc_error;
3003: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3004: RAISE FND_API.g_exc_unexpected_error;
3005: END IF;
3006: */
3007: NULL;
3008: END IF;

Line 3013: IF FND_API.to_boolean(p_commit) THEN

3009:
3010: ------------------------- finish -------------------------------
3011: /*
3012: -- Check for commit
3013: IF FND_API.to_boolean(p_commit) THEN
3014: COMMIT;
3015: END IF;
3016: */
3017:

Line 3019: p_encoded => FND_API.g_false,

3015: END IF;
3016: */
3017:
3018: FND_MSG_PUB.count_and_get(
3019: p_encoded => FND_API.g_false,
3020: p_count => x_msg_count,
3021: p_data => x_msg_data
3022: );
3023:

Line 3029: WHEN FND_API.g_exc_error THEN

3025: OZF_Utility_PVT.debug_message(l_full_name ||': end');
3026: END IF;
3027:
3028: EXCEPTION
3029: WHEN FND_API.g_exc_error THEN
3030: ROLLBACK TO Settle_Claim;
3031: x_return_status := FND_API.g_ret_sts_error;
3032: FND_MSG_PUB.count_and_get (
3033: p_encoded => FND_API.g_false,

Line 3031: x_return_status := FND_API.g_ret_sts_error;

3027:
3028: EXCEPTION
3029: WHEN FND_API.g_exc_error THEN
3030: ROLLBACK TO Settle_Claim;
3031: x_return_status := FND_API.g_ret_sts_error;
3032: FND_MSG_PUB.count_and_get (
3033: p_encoded => FND_API.g_false,
3034: p_count => x_msg_count,
3035: p_data => x_msg_data

Line 3033: p_encoded => FND_API.g_false,

3029: WHEN FND_API.g_exc_error THEN
3030: ROLLBACK TO Settle_Claim;
3031: x_return_status := FND_API.g_ret_sts_error;
3032: FND_MSG_PUB.count_and_get (
3033: p_encoded => FND_API.g_false,
3034: p_count => x_msg_count,
3035: p_data => x_msg_data
3036: );
3037: WHEN FND_API.g_exc_unexpected_error THEN

Line 3037: WHEN FND_API.g_exc_unexpected_error THEN

3033: p_encoded => FND_API.g_false,
3034: p_count => x_msg_count,
3035: p_data => x_msg_data
3036: );
3037: WHEN FND_API.g_exc_unexpected_error THEN
3038: ROLLBACK TO Settle_Claim;
3039: x_return_status := FND_API.g_ret_sts_unexp_error ;
3040: FND_MSG_PUB.count_and_get (
3041: p_encoded => FND_API.g_false,

Line 3039: x_return_status := FND_API.g_ret_sts_unexp_error ;

3035: p_data => x_msg_data
3036: );
3037: WHEN FND_API.g_exc_unexpected_error THEN
3038: ROLLBACK TO Settle_Claim;
3039: x_return_status := FND_API.g_ret_sts_unexp_error ;
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

Line 3041: p_encoded => FND_API.g_false,

3037: WHEN FND_API.g_exc_unexpected_error THEN
3038: ROLLBACK TO Settle_Claim;
3039: x_return_status := FND_API.g_ret_sts_unexp_error ;
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: WHEN OTHERS THEN

Line 3047: x_return_status := FND_API.g_ret_sts_unexp_error ;

3043: p_data => x_msg_data
3044: );
3045: WHEN OTHERS THEN
3046: ROLLBACK TO Settle_Claim;
3047: x_return_status := FND_API.g_ret_sts_unexp_error ;
3048: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3049: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3050: END IF;
3051: FND_MSG_PUB.count_and_get (

Line 3052: p_encoded => FND_API.g_false,

3048: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3049: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3050: END IF;
3051: FND_MSG_PUB.count_and_get (
3052: p_encoded => FND_API.g_false,
3053: p_count => x_msg_count,
3054: p_data => x_msg_data
3055: );
3056:

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

3067: -- 10-OCT-2003 mchang Create.
3068: ---------------------------------------------------------------------
3069: PROCEDURE Raise_Business_Event(
3070: p_api_version IN NUMBER
3071: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3072: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3073: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3074:
3075: ,x_return_status OUT NOCOPY VARCHAR2

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

3068: ---------------------------------------------------------------------
3069: PROCEDURE Raise_Business_Event(
3070: p_api_version IN NUMBER
3071: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3072: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3073: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3074:
3075: ,x_return_status OUT NOCOPY VARCHAR2
3076: ,x_msg_data OUT NOCOPY VARCHAR2

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

3069: PROCEDURE Raise_Business_Event(
3070: p_api_version IN NUMBER
3071: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3072: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3073: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3074:
3075: ,x_return_status OUT NOCOPY VARCHAR2
3076: ,x_msg_data OUT NOCOPY VARCHAR2
3077: ,x_msg_count OUT NOCOPY NUMBER

Line 3111: IF FND_API.to_boolean(p_init_msg_list) THEN

3107: OZF_Utility_PVT.debug_message(l_full_name||' : start');
3108: OZF_Utility_PVT.debug_message(l_full_name||' : event = '||p_event_name);
3109: END IF;
3110:
3111: IF FND_API.to_boolean(p_init_msg_list) THEN
3112: FND_MSG_PUB.initialize;
3113: END IF;
3114:
3115: IF NOT FND_API.compatible_api_call(

Line 3115: IF NOT FND_API.compatible_api_call(

3111: IF FND_API.to_boolean(p_init_msg_list) THEN
3112: FND_MSG_PUB.initialize;
3113: END IF;
3114:
3115: IF NOT FND_API.compatible_api_call(
3116: l_api_version,
3117: p_api_version,
3118: l_api_name,
3119: g_pkg_name

Line 3121: RAISE FND_API.g_exc_unexpected_error;

3117: p_api_version,
3118: l_api_name,
3119: g_pkg_name
3120: ) THEN
3121: RAISE FND_API.g_exc_unexpected_error;
3122: END IF;
3123:
3124: -- Initialize API return status to sucess
3125: x_return_status := FND_API.g_ret_sts_success;

Line 3125: x_return_status := FND_API.g_ret_sts_success;

3121: RAISE FND_API.g_exc_unexpected_error;
3122: END IF;
3123:
3124: -- Initialize API return status to sucess
3125: x_return_status := FND_API.g_ret_sts_success;
3126:
3127: --------------------- Start -----------------------
3128: l_new_item_key := p_claim_id||'_'||TO_CHAR(SYSDATE,'DDMMRRRRHH24MISS');
3129:

Line 3160: IF FND_API.to_boolean(p_commit) THEN

3156: );
3157:
3158: ------------------------- finish -------------------------------
3159: -- Check for commit
3160: IF FND_API.to_boolean(p_commit) THEN
3161: COMMIT;
3162: END IF;
3163:
3164: FND_MSG_PUB.count_and_get(

Line 3165: p_encoded => FND_API.g_false,

3161: COMMIT;
3162: END IF;
3163:
3164: FND_MSG_PUB.count_and_get(
3165: p_encoded => FND_API.g_false,
3166: p_count => x_msg_count,
3167: p_data => x_msg_data
3168: );
3169:

Line 3175: WHEN FND_API.g_exc_error THEN

3171: OZF_Utility_PVT.debug_message(l_full_name ||': end');
3172: END IF;
3173:
3174: EXCEPTION
3175: WHEN FND_API.g_exc_error THEN
3176: ROLLBACK TO Raise_Business_Event;
3177: x_return_status := FND_API.g_ret_sts_error;
3178: FND_MSG_PUB.count_and_get (
3179: p_encoded => FND_API.g_false,

Line 3177: x_return_status := FND_API.g_ret_sts_error;

3173:
3174: EXCEPTION
3175: WHEN FND_API.g_exc_error THEN
3176: ROLLBACK TO Raise_Business_Event;
3177: x_return_status := FND_API.g_ret_sts_error;
3178: FND_MSG_PUB.count_and_get (
3179: p_encoded => FND_API.g_false,
3180: p_count => x_msg_count,
3181: p_data => x_msg_data

Line 3179: p_encoded => FND_API.g_false,

3175: WHEN FND_API.g_exc_error THEN
3176: ROLLBACK TO Raise_Business_Event;
3177: x_return_status := FND_API.g_ret_sts_error;
3178: FND_MSG_PUB.count_and_get (
3179: p_encoded => FND_API.g_false,
3180: p_count => x_msg_count,
3181: p_data => x_msg_data
3182: );
3183: WHEN FND_API.g_exc_unexpected_error THEN

Line 3183: WHEN FND_API.g_exc_unexpected_error THEN

3179: p_encoded => FND_API.g_false,
3180: p_count => x_msg_count,
3181: p_data => x_msg_data
3182: );
3183: WHEN FND_API.g_exc_unexpected_error THEN
3184: ROLLBACK TO Raise_Business_Event;
3185: x_return_status := FND_API.g_ret_sts_unexp_error ;
3186: FND_MSG_PUB.count_and_get (
3187: p_encoded => FND_API.g_false,

Line 3185: x_return_status := FND_API.g_ret_sts_unexp_error ;

3181: p_data => x_msg_data
3182: );
3183: WHEN FND_API.g_exc_unexpected_error THEN
3184: ROLLBACK TO Raise_Business_Event;
3185: x_return_status := FND_API.g_ret_sts_unexp_error ;
3186: FND_MSG_PUB.count_and_get (
3187: p_encoded => FND_API.g_false,
3188: p_count => x_msg_count,
3189: p_data => x_msg_data

Line 3187: p_encoded => FND_API.g_false,

3183: WHEN FND_API.g_exc_unexpected_error THEN
3184: ROLLBACK TO Raise_Business_Event;
3185: x_return_status := FND_API.g_ret_sts_unexp_error ;
3186: FND_MSG_PUB.count_and_get (
3187: p_encoded => FND_API.g_false,
3188: p_count => x_msg_count,
3189: p_data => x_msg_data
3190: );
3191: WHEN OTHERS THEN

Line 3193: x_return_status := FND_API.g_ret_sts_unexp_error ;

3189: p_data => x_msg_data
3190: );
3191: WHEN OTHERS THEN
3192: ROLLBACK TO Raise_Business_Event;
3193: x_return_status := FND_API.g_ret_sts_unexp_error ;
3194: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3195: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3196: END IF;
3197: FND_MSG_PUB.count_and_get (

Line 3198: p_encoded => FND_API.g_false,

3194: IF FND_MSG_PUB.check_msg_level (FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3195: FND_MSG_PUB.add_exc_msg (g_pkg_name, l_api_name);
3196: END IF;
3197: FND_MSG_PUB.count_and_get (
3198: p_encoded => FND_API.g_false,
3199: p_count => x_msg_count,
3200: p_data => x_msg_data
3201: );
3202: