eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

[Home] [Help]

APPS.OZF_SPLIT_CLAIM_PVT dependencies on FND_API

Line 116: x_return_status := FND_API.G_RET_STS_SUCCESS;

112: FND_MSG_PUB.Add;
113: END IF;
114:
115: -- Initialize API return status to sucess
116: x_return_status := FND_API.G_RET_STS_SUCCESS;
117:
118: -- Start Creation.
119: -- setup the data for claim and then call create_claim package.
120: -- get the parent claim record

Line 255: P_Init_Msg_List => FND_API.G_FALSE,

251:
252:
253: OZF_claim_PVT.Create_Claim(
254: P_Api_Version => 1.0,
255: P_Init_Msg_List => FND_API.G_FALSE,
256: P_Commit => FND_API.G_FALSE,
257: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
258: X_Return_Status => l_return_status,
259: X_Msg_Count => l_msg_count,

Line 256: P_Commit => FND_API.G_FALSE,

252:
253: OZF_claim_PVT.Create_Claim(
254: P_Api_Version => 1.0,
255: P_Init_Msg_List => FND_API.G_FALSE,
256: P_Commit => FND_API.G_FALSE,
257: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
258: X_Return_Status => l_return_status,
259: X_Msg_Count => l_msg_count,
260: X_Msg_Data => l_msg_data,

Line 257: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,

253: OZF_claim_PVT.Create_Claim(
254: P_Api_Version => 1.0,
255: P_Init_Msg_List => FND_API.G_FALSE,
256: P_Commit => FND_API.G_FALSE,
257: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
258: X_Return_Status => l_return_status,
259: X_Msg_Count => l_msg_count,
260: X_Msg_Data => l_msg_data,
261: P_claim => l_child_claim,

Line 265: IF l_return_status = FND_API.g_ret_sts_error THEN

261: P_claim => l_child_claim,
262: X_CLAIM_ID => l_claim_id
263: );
264:
265: IF l_return_status = FND_API.g_ret_sts_error THEN
266: RAISE FND_API.g_exc_error;
267: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
268: RAISE FND_API.g_exc_unexpected_error;
269: END IF;

Line 266: RAISE FND_API.g_exc_error;

262: X_CLAIM_ID => l_claim_id
263: );
264:
265: IF l_return_status = FND_API.g_ret_sts_error THEN
266: RAISE FND_API.g_exc_error;
267: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
268: RAISE FND_API.g_exc_unexpected_error;
269: END IF;
270:

Line 267: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

263: );
264:
265: IF l_return_status = FND_API.g_ret_sts_error THEN
266: RAISE FND_API.g_exc_error;
267: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
268: RAISE FND_API.g_exc_unexpected_error;
269: END IF;
270:
271: IF OZF_DEBUG_HIGH_ON THEN

Line 268: RAISE FND_API.g_exc_unexpected_error;

264:
265: IF l_return_status = FND_API.g_ret_sts_error THEN
266: RAISE FND_API.g_exc_error;
267: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
268: RAISE FND_API.g_exc_unexpected_error;
269: END IF;
270:
271: IF OZF_DEBUG_HIGH_ON THEN
272: ozf_utility_PVT.debug_message('new claim id '|| l_claim_id);

Line 285: ,p_init_msg_list => FND_API.g_false

281: l_claim_line.claim_id := l_claim_id;
282:
283: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
284: p_api_version => l_api_version
285: ,p_init_msg_list => FND_API.g_false
286: ,p_commit => FND_API.g_false
287: ,p_validation_level => FND_API.g_valid_level_full
288: ,x_return_status => l_return_status
289: ,x_msg_count => l_msg_count

Line 286: ,p_commit => FND_API.g_false

282:
283: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
284: p_api_version => l_api_version
285: ,p_init_msg_list => FND_API.g_false
286: ,p_commit => FND_API.g_false
287: ,p_validation_level => FND_API.g_valid_level_full
288: ,x_return_status => l_return_status
289: ,x_msg_count => l_msg_count
290: ,x_msg_data => l_msg_data

Line 287: ,p_validation_level => FND_API.g_valid_level_full

283: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
284: p_api_version => l_api_version
285: ,p_init_msg_list => FND_API.g_false
286: ,p_commit => FND_API.g_false
287: ,p_validation_level => FND_API.g_valid_level_full
288: ,x_return_status => l_return_status
289: ,x_msg_count => l_msg_count
290: ,x_msg_data => l_msg_data
291: ,p_claim_line_rec => l_claim_line

Line 296: IF l_return_status = FND_API.g_ret_sts_error THEN

292: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
293: ,x_object_version => l_line_obj_num
294: );
295:
296: IF l_return_status = FND_API.g_ret_sts_error THEN
297: RAISE FND_API.g_exc_error;
298: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
299: RAISE FND_API.g_exc_unexpected_error;
300: END IF;

Line 297: RAISE FND_API.g_exc_error;

293: ,x_object_version => l_line_obj_num
294: );
295:
296: IF l_return_status = FND_API.g_ret_sts_error THEN
297: RAISE FND_API.g_exc_error;
298: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
299: RAISE FND_API.g_exc_unexpected_error;
300: END IF;
301: END LOOP;

Line 298: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

294: );
295:
296: IF l_return_status = FND_API.g_ret_sts_error THEN
297: RAISE FND_API.g_exc_error;
298: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
299: RAISE FND_API.g_exc_unexpected_error;
300: END IF;
301: END LOOP;
302:

Line 299: RAISE FND_API.g_exc_unexpected_error;

295:
296: IF l_return_status = FND_API.g_ret_sts_error THEN
297: RAISE FND_API.g_exc_error;
298: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
299: RAISE FND_API.g_exc_unexpected_error;
300: END IF;
301: END LOOP;
302:
303:

Line 322: ,p_init_msg_list => FND_API.G_FALSE

318: IF l_access_list_tbl.COUNT > 0 THEN
319: FOR i IN 1..l_access_list_tbl.LAST LOOP
320: AMS_ACCESS_PVT.Create_Access(
321: p_api_version => l_api_version
322: ,p_init_msg_list => FND_API.G_FALSE
323: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
324: ,x_return_status => l_return_status
325: ,x_msg_count => l_msg_count
326: ,x_msg_data => l_msg_data

Line 323: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

319: FOR i IN 1..l_access_list_tbl.LAST LOOP
320: AMS_ACCESS_PVT.Create_Access(
321: p_api_version => l_api_version
322: ,p_init_msg_list => FND_API.G_FALSE
323: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
324: ,x_return_status => l_return_status
325: ,x_msg_count => l_msg_count
326: ,x_msg_data => l_msg_data
327: ,p_commit => FND_API.G_FALSE

Line 327: ,p_commit => FND_API.G_FALSE

323: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
324: ,x_return_status => l_return_status
325: ,x_msg_count => l_msg_count
326: ,x_msg_data => l_msg_data
327: ,p_commit => FND_API.G_FALSE
328: ,p_access_rec => l_access_list_tbl(i)
329: ,x_access_id => l_access_id
330: );
331: IF l_return_status = fnd_api.g_ret_sts_error THEN

Line 331: IF l_return_status = fnd_api.g_ret_sts_error THEN

327: ,p_commit => FND_API.G_FALSE
328: ,p_access_rec => l_access_list_tbl(i)
329: ,x_access_id => l_access_id
330: );
331: IF l_return_status = fnd_api.g_ret_sts_error THEN
332: RAISE fnd_api.g_exc_error;
333: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
334: RAISE fnd_api.g_exc_unexpected_error;
335: END IF;

Line 332: RAISE fnd_api.g_exc_error;

328: ,p_access_rec => l_access_list_tbl(i)
329: ,x_access_id => l_access_id
330: );
331: IF l_return_status = fnd_api.g_ret_sts_error THEN
332: RAISE fnd_api.g_exc_error;
333: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
334: RAISE fnd_api.g_exc_unexpected_error;
335: END IF;
336: END LOOP;

Line 333: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

329: ,x_access_id => l_access_id
330: );
331: IF l_return_status = fnd_api.g_ret_sts_error THEN
332: RAISE fnd_api.g_exc_error;
333: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
334: RAISE fnd_api.g_exc_unexpected_error;
335: END IF;
336: END LOOP;
337: END IF;

Line 334: RAISE fnd_api.g_exc_unexpected_error;

330: );
331: IF l_return_status = fnd_api.g_ret_sts_error THEN
332: RAISE fnd_api.g_exc_error;
333: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
334: RAISE fnd_api.g_exc_unexpected_error;
335: END IF;
336: END LOOP;
337: END IF;
338: -- [END OF BUG 3473501 FIXING]

Line 348: WHEN FND_API.G_EXC_ERROR THEN

344: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
345: FND_MSG_PUB.Add;
346: END IF;
347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 349: x_return_status := FND_API.G_RET_STS_ERROR;

345: FND_MSG_PUB.Add;
346: END IF;
347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353:

Line 351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

347: EXCEPTION
348: WHEN FND_API.G_EXC_ERROR THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353:
354: WHEN OTHERS THEN
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

348: WHEN FND_API.G_EXC_ERROR THEN
349: x_return_status := FND_API.G_RET_STS_ERROR;
350:
351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353:
354: WHEN OTHERS THEN
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
356: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

351: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
352: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353:
354: WHEN OTHERS THEN
355: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
356: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
357: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
358: END IF;
359: END create_child_claim;

Line 423: x_return_status := FND_API.G_RET_STS_SUCCESS;

419: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
420: FND_MSG_PUB.Add;
421: END IF;
422: -- Initialize API return status to sucess
423: x_return_status := FND_API.G_RET_STS_SUCCESS;
424:
425: OPEN version_csr(p_claim.claim_id);
426: FETCH version_csr INTO l_object_version_number;
427: CLOSE version_csr;

Line 456: ,p_init_msg_list => FND_API.G_FALSE

452: END IF;
453:
454: OZF_claim_PVT.Update_Claim (
455: p_api_version => l_api_version
456: ,p_init_msg_list => FND_API.G_FALSE
457: ,p_commit => FND_API.G_FALSE
458: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
459: ,x_return_status => l_return_status
460: ,x_msg_data => l_msg_data

Line 457: ,p_commit => FND_API.G_FALSE

453:
454: OZF_claim_PVT.Update_Claim (
455: p_api_version => l_api_version
456: ,p_init_msg_list => FND_API.G_FALSE
457: ,p_commit => FND_API.G_FALSE
458: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
459: ,x_return_status => l_return_status
460: ,x_msg_data => l_msg_data
461: ,x_msg_count => l_msg_count

Line 458: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

454: OZF_claim_PVT.Update_Claim (
455: p_api_version => l_api_version
456: ,p_init_msg_list => FND_API.G_FALSE
457: ,p_commit => FND_API.G_FALSE
458: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
459: ,x_return_status => l_return_status
460: ,x_msg_data => l_msg_data
461: ,x_msg_count => l_msg_count
462: ,p_claim => l_child_claim

Line 467: IF l_return_status = FND_API.g_ret_sts_error THEN

463: ,p_event => G_UPDATE_EVENT
464: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
465: ,x_object_version_number => l_object_version_number
466: );
467: IF l_return_status = FND_API.g_ret_sts_error THEN
468: RAISE FND_API.g_exc_error;
469: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
470: RAISE FND_API.g_exc_unexpected_error;
471: END IF;

Line 468: RAISE FND_API.g_exc_error;

464: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
465: ,x_object_version_number => l_object_version_number
466: );
467: IF l_return_status = FND_API.g_ret_sts_error THEN
468: RAISE FND_API.g_exc_error;
469: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
470: RAISE FND_API.g_exc_unexpected_error;
471: END IF;
472: x_new_claim_amount := l_child_claim.amount;

Line 469: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

465: ,x_object_version_number => l_object_version_number
466: );
467: IF l_return_status = FND_API.g_ret_sts_error THEN
468: RAISE FND_API.g_exc_error;
469: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
470: RAISE FND_API.g_exc_unexpected_error;
471: END IF;
472: x_new_claim_amount := l_child_claim.amount;
473:

Line 470: RAISE FND_API.g_exc_unexpected_error;

466: );
467: IF l_return_status = FND_API.g_ret_sts_error THEN
468: RAISE FND_API.g_exc_error;
469: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
470: RAISE FND_API.g_exc_unexpected_error;
471: END IF;
472: x_new_claim_amount := l_child_claim.amount;
473:
474: -- Now update the lines.

Line 485: ,p_init_msg_list => FND_API.g_false

481: l_claim_line.claim_id := p_claim.claim_id;
482:
483: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
484: p_api_version => l_api_version
485: ,p_init_msg_list => FND_API.g_false
486: ,p_commit => FND_API.g_false
487: ,p_validation_level => FND_API.g_valid_level_full
488: ,x_return_status => l_return_status
489: ,x_msg_count => l_msg_count

Line 486: ,p_commit => FND_API.g_false

482:
483: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
484: p_api_version => l_api_version
485: ,p_init_msg_list => FND_API.g_false
486: ,p_commit => FND_API.g_false
487: ,p_validation_level => FND_API.g_valid_level_full
488: ,x_return_status => l_return_status
489: ,x_msg_count => l_msg_count
490: ,x_msg_data => l_msg_data

Line 487: ,p_validation_level => FND_API.g_valid_level_full

483: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
484: p_api_version => l_api_version
485: ,p_init_msg_list => FND_API.g_false
486: ,p_commit => FND_API.g_false
487: ,p_validation_level => FND_API.g_valid_level_full
488: ,x_return_status => l_return_status
489: ,x_msg_count => l_msg_count
490: ,x_msg_data => l_msg_data
491: ,p_claim_line_rec => l_claim_line

Line 496: IF l_return_status = FND_API.g_ret_sts_error THEN

492: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
493: ,x_object_version => l_line_obj_num
494: );
495:
496: IF l_return_status = FND_API.g_ret_sts_error THEN
497: RAISE FND_API.g_exc_error;
498: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
499: RAISE FND_API.g_exc_unexpected_error;
500: END IF;

Line 497: RAISE FND_API.g_exc_error;

493: ,x_object_version => l_line_obj_num
494: );
495:
496: IF l_return_status = FND_API.g_ret_sts_error THEN
497: RAISE FND_API.g_exc_error;
498: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
499: RAISE FND_API.g_exc_unexpected_error;
500: END IF;
501: END LOOP;

Line 498: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

494: );
495:
496: IF l_return_status = FND_API.g_ret_sts_error THEN
497: RAISE FND_API.g_exc_error;
498: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
499: RAISE FND_API.g_exc_unexpected_error;
500: END IF;
501: END LOOP;
502: ELSE

Line 499: RAISE FND_API.g_exc_unexpected_error;

495:
496: IF l_return_status = FND_API.g_ret_sts_error THEN
497: RAISE FND_API.g_exc_error;
498: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
499: RAISE FND_API.g_exc_unexpected_error;
500: END IF;
501: END LOOP;
502: ELSE
503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 507: RAISE FND_API.g_exc_unexpected_error;

503: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
504: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
505: FND_MSG_PUB.ADD;
506: END IF;
507: RAISE FND_API.g_exc_unexpected_error;
508: END IF;
509:
510: EXCEPTION
511: WHEN OTHERS THEN

Line 516: RAISE FND_API.g_exc_error;

512: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
513: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
514: FND_MSG_PUB.add;
515: END IF;
516: RAISE FND_API.g_exc_error;
517: END;
518: ELSE
519: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
520: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');

Line 523: RAISE FND_API.g_exc_error;

519: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
520: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
521: FND_MSG_PUB.add;
522: END IF;
523: RAISE FND_API.g_exc_error;
524: END IF;
525: -- Debug Message
526: IF OZF_DEBUG_LOW_ON THEN
527: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 532: WHEN FND_API.G_EXC_ERROR THEN

528: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
529: FND_MSG_PUB.Add;
530: END IF;
531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: x_return_status := FND_API.G_RET_STS_ERROR;
534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN

Line 533: x_return_status := FND_API.G_RET_STS_ERROR;

529: FND_MSG_PUB.Add;
530: END IF;
531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: x_return_status := FND_API.G_RET_STS_ERROR;
534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

530: END IF;
531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: x_return_status := FND_API.G_RET_STS_ERROR;
534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

531: EXCEPTION
532: WHEN FND_API.G_EXC_ERROR THEN
533: x_return_status := FND_API.G_RET_STS_ERROR;
534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

533: x_return_status := FND_API.G_RET_STS_ERROR;
534: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
535: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
536: WHEN OTHERS THEN
537: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
538: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
539: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
540: END IF;
541: END update_child_claim;

Line 599: x_return_status := FND_API.G_RET_STS_SUCCESS;

595: ozf_utility_pvt.debug_message('start update parent');
596: END IF;
597:
598: -- Initialize API return status to sucess
599: x_return_status := FND_API.G_RET_STS_SUCCESS;
600:
601: OPEN claim_info_csr(p_claim.claim_id);
602: FETCH claim_info_csr INTO l_object_version_number, l_status_code
603: , l_amount_adjusted, l_amount_remaining, l_currency_code, l_reason_code_id;

Line 635: RAISE FND_API.G_EXC_ERROR;

631: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
632: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLT_NG_NOPM');
633: FND_MSG_PUB.Add;
634: END IF;
635: RAISE FND_API.G_EXC_ERROR;
636: END IF;
637:
638: IF ((l_amount_remaining < 0) and
639: (l_amount_remaining - OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code) > 0)) THEN

Line 644: RAISE FND_API.G_EXC_ERROR;

640: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
641: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLIT_PO_OPM');
642: FND_MSG_PUB.Add;
643: END IF;
644: RAISE FND_API.G_EXC_ERROR;
645: END IF;
646:
647: OZF_claim_PVT.Update_Claim (
648: p_api_version => l_api_version

Line 649: ,p_init_msg_list => FND_API.G_FALSE

645: END IF;
646:
647: OZF_claim_PVT.Update_Claim (
648: p_api_version => l_api_version
649: ,p_init_msg_list => FND_API.G_FALSE
650: ,p_commit => FND_API.G_FALSE
651: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
652: ,x_return_status => l_return_status
653: ,x_msg_data => l_msg_data

Line 650: ,p_commit => FND_API.G_FALSE

646:
647: OZF_claim_PVT.Update_Claim (
648: p_api_version => l_api_version
649: ,p_init_msg_list => FND_API.G_FALSE
650: ,p_commit => FND_API.G_FALSE
651: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
652: ,x_return_status => l_return_status
653: ,x_msg_data => l_msg_data
654: ,x_msg_count => l_msg_count

Line 651: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

647: OZF_claim_PVT.Update_Claim (
648: p_api_version => l_api_version
649: ,p_init_msg_list => FND_API.G_FALSE
650: ,p_commit => FND_API.G_FALSE
651: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
652: ,x_return_status => l_return_status
653: ,x_msg_data => l_msg_data
654: ,x_msg_count => l_msg_count
655: ,p_claim => l_claim

Line 661: IF l_return_status = FND_API.g_ret_sts_error THEN

657: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
658: ,x_object_version_number => l_object_version_number
659: );
660:
661: IF l_return_status = FND_API.g_ret_sts_error THEN
662: RAISE FND_API.g_exc_error;
663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
664: RAISE FND_API.g_exc_unexpected_error;
665: END IF;

Line 662: RAISE FND_API.g_exc_error;

658: ,x_object_version_number => l_object_version_number
659: );
660:
661: IF l_return_status = FND_API.g_ret_sts_error THEN
662: RAISE FND_API.g_exc_error;
663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
664: RAISE FND_API.g_exc_unexpected_error;
665: END IF;
666: ELSE

Line 663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

659: );
660:
661: IF l_return_status = FND_API.g_ret_sts_error THEN
662: RAISE FND_API.g_exc_error;
663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
664: RAISE FND_API.g_exc_unexpected_error;
665: END IF;
666: ELSE
667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 664: RAISE FND_API.g_exc_unexpected_error;

660:
661: IF l_return_status = FND_API.g_ret_sts_error THEN
662: RAISE FND_API.g_exc_error;
663: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
664: RAISE FND_API.g_exc_unexpected_error;
665: END IF;
666: ELSE
667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
668: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');

Line 671: RAISE FND_API.g_exc_unexpected_error;

667: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
668: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
669: FND_MSG_PUB.ADD;
670: END IF;
671: RAISE FND_API.g_exc_unexpected_error;
672: END IF;
673: ELSE
674: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
675: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');

Line 678: RAISE FND_API.g_exc_error;

674: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
675: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
676: FND_MSG_PUB.add;
677: END IF;
678: RAISE FND_API.g_exc_error;
679: END IF;
680:
681: -- Debug Message
682: IF OZF_DEBUG_LOW_ON THEN

Line 688: WHEN FND_API.G_EXC_ERROR THEN

684: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
685: FND_MSG_PUB.Add;
686: END IF;
687: EXCEPTION
688: WHEN FND_API.G_EXC_ERROR THEN
689: x_return_status := FND_API.G_RET_STS_ERROR;
690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN

Line 689: x_return_status := FND_API.G_RET_STS_ERROR;

685: FND_MSG_PUB.Add;
686: END IF;
687: EXCEPTION
688: WHEN FND_API.G_EXC_ERROR THEN
689: x_return_status := FND_API.G_RET_STS_ERROR;
690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

686: END IF;
687: EXCEPTION
688: WHEN FND_API.G_EXC_ERROR THEN
689: x_return_status := FND_API.G_RET_STS_ERROR;
690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

687: EXCEPTION
688: WHEN FND_API.G_EXC_ERROR THEN
689: x_return_status := FND_API.G_RET_STS_ERROR;
690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

689: x_return_status := FND_API.G_RET_STS_ERROR;
690: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
692: WHEN OTHERS THEN
693: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
694: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
695: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
696: END IF;
697: END update_parent_claim;

Line 758: x_return_status := FND_API.G_RET_STS_SUCCESS;

754: i number := 1;
755: BEGIN
756:
757: -- Initialize API return status to sucess
758: x_return_status := FND_API.G_RET_STS_SUCCESS;
759: -- Debug Message
760: IF OZF_DEBUG_LOW_ON THEN
761: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
762: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');

Line 803: RAISE FND_API.g_exc_error;

799: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
800: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_SPLIT_TOO_BIG');
801: FND_MSG_PUB.ADD;
802: END IF;
803: RAISE FND_API.g_exc_error;
804: END IF;
805:
806: -- Debug Message
807: IF OZF_DEBUG_LOW_ON THEN

Line 814: WHEN FND_API.G_EXC_ERROR THEN

810: FND_MSG_PUB.Add;
811: END IF;
812:
813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN

Line 815: x_return_status := FND_API.G_RET_STS_ERROR;

811: END IF;
812:
813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

812:
813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

813: EXCEPTION
814: WHEN FND_API.G_EXC_ERROR THEN
815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

815: x_return_status := FND_API.G_RET_STS_ERROR;
816: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
817: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
818: WHEN OTHERS THEN
819: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
820: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
821: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
822: END IF;
823: END Check_Split_Condition;

Line 852: x_return_status := FND_API.G_RET_STS_SUCCESS;

848: l_temp_index NUMBER;
849: i number:=1; -- line table index start from 1
850: BEGIN
851: -- Initialize API return status to sucess
852: x_return_status := FND_API.G_RET_STS_SUCCESS;
853:
854: -- split (claim_line_id, object_version_number) pair
855: l_index := INSTR(l_line_string, ',', 1, 2);
856: WHILE (l_index >0)LOOP

Line 877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

873: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
874: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_STR_WRG');
875: FND_MSG_PUB.add;
876: END IF;
877: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
878: ELSE
879: x_line_table(i).claim_line_id := TO_NUMBER(SUBSTR(l_line_string,1, l_temp_index -1));
880: x_line_table(i).object_version_number := TO_NUMBER(SUBSTR(l_line_string, l_temp_index +1));
881: END IF;

Line 884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

880: x_line_table(i).object_version_number := TO_NUMBER(SUBSTR(l_line_string, l_temp_index +1));
881: END IF;
882:
883: EXCEPTION
884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
886: WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

881: END IF;
882:
883: EXCEPTION
884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
886: WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
889: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');

Line 887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

883: EXCEPTION
884: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
885: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
886: WHEN OTHERS THEN
887: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
888: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
889: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');
890: FND_MSG_PUB.add;
891: END IF;

Line 958: x_return_status := FND_API.G_RET_STS_SUCCESS;

954: l_line_obj_num number;
955: BEGIN
956:
957: -- Initialize API return status to sucess
958: x_return_status := FND_API.G_RET_STS_SUCCESS;
959:
960: -- Under the following condition, I will create lines with the child amount for the parents.
961: -- These line information will be stored in the line_table for the child claim.
962: -- These new lines will be moved to the child claims in a later stage

Line 1030: AND l_claim_line.quantity <> FND_API.G_MISS_NUM)

1026:
1027:
1028: --Bug Fix 3405910
1029: IF (l_claim_line.quantity is not null
1030: AND l_claim_line.quantity <> FND_API.G_MISS_NUM)
1031: AND
1032: (l_claim_line.rate is not null
1033: AND l_claim_line.rate <> FND_API.G_MISS_NUM)
1034: THEN

Line 1033: AND l_claim_line.rate <> FND_API.G_MISS_NUM)

1029: IF (l_claim_line.quantity is not null
1030: AND l_claim_line.quantity <> FND_API.G_MISS_NUM)
1031: AND
1032: (l_claim_line.rate is not null
1033: AND l_claim_line.rate <> FND_API.G_MISS_NUM)
1034: THEN
1035: IF mod(l_parent_line.claim_currency_amount , l_claim_line.rate) = 0 THEN
1036: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1037: ELSE

Line 1039: l_parent_line.quantity := fnd_api.g_miss_num;

1035: IF mod(l_parent_line.claim_currency_amount , l_claim_line.rate) = 0 THEN
1036: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1037: ELSE
1038: --If not a whole number, then clear the parent lines values.
1039: l_parent_line.quantity := fnd_api.g_miss_num;
1040: l_parent_line.rate := fnd_api.g_miss_num;
1041: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1042: END IF;
1043: END IF;

Line 1040: l_parent_line.rate := fnd_api.g_miss_num;

1036: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1037: ELSE
1038: --If not a whole number, then clear the parent lines values.
1039: l_parent_line.quantity := fnd_api.g_miss_num;
1040: l_parent_line.rate := fnd_api.g_miss_num;
1041: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1042: END IF;
1043: END IF;
1044: --End of Bug Fix 3405910

Line 1041: l_parent_line.quantity_uom := fnd_api.g_miss_char;

1037: ELSE
1038: --If not a whole number, then clear the parent lines values.
1039: l_parent_line.quantity := fnd_api.g_miss_num;
1040: l_parent_line.rate := fnd_api.g_miss_num;
1041: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1042: END IF;
1043: END IF;
1044: --End of Bug Fix 3405910
1045:

Line 1049: ,p_init_msg_list => FND_API.g_false

1045:
1046:
1047: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1048: p_api_version => 1.0
1049: ,p_init_msg_list => FND_API.g_false
1050: ,p_commit => FND_API.g_false
1051: ,p_validation_level => FND_API.g_valid_level_full
1052: ,x_return_status => l_return_status
1053: ,x_msg_count => l_msg_count

Line 1050: ,p_commit => FND_API.g_false

1046:
1047: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1048: p_api_version => 1.0
1049: ,p_init_msg_list => FND_API.g_false
1050: ,p_commit => FND_API.g_false
1051: ,p_validation_level => FND_API.g_valid_level_full
1052: ,x_return_status => l_return_status
1053: ,x_msg_count => l_msg_count
1054: ,x_msg_data => l_msg_data

Line 1051: ,p_validation_level => FND_API.g_valid_level_full

1047: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1048: p_api_version => 1.0
1049: ,p_init_msg_list => FND_API.g_false
1050: ,p_commit => FND_API.g_false
1051: ,p_validation_level => FND_API.g_valid_level_full
1052: ,x_return_status => l_return_status
1053: ,x_msg_count => l_msg_count
1054: ,x_msg_data => l_msg_data
1055: ,p_claim_line_rec => l_parent_line

Line 1060: IF l_return_status = FND_API.g_ret_sts_error THEN

1056: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1057: ,x_object_version => l_line_obj_num
1058: );
1059:
1060: IF l_return_status = FND_API.g_ret_sts_error THEN
1061: RAISE FND_API.g_exc_error;
1062: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1063: RAISE FND_API.g_exc_unexpected_error;
1064: END IF;

Line 1061: RAISE FND_API.g_exc_error;

1057: ,x_object_version => l_line_obj_num
1058: );
1059:
1060: IF l_return_status = FND_API.g_ret_sts_error THEN
1061: RAISE FND_API.g_exc_error;
1062: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1063: RAISE FND_API.g_exc_unexpected_error;
1064: END IF;
1065: /*

Line 1062: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1058: );
1059:
1060: IF l_return_status = FND_API.g_ret_sts_error THEN
1061: RAISE FND_API.g_exc_error;
1062: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1063: RAISE FND_API.g_exc_unexpected_error;
1064: END IF;
1065: /*
1066: update ozf_claim_lines_all

Line 1063: RAISE FND_API.g_exc_unexpected_error;

1059:
1060: IF l_return_status = FND_API.g_ret_sts_error THEN
1061: RAISE FND_API.g_exc_error;
1062: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1063: RAISE FND_API.g_exc_unexpected_error;
1064: END IF;
1065: /*
1066: update ozf_claim_lines_all
1067: set claim_currency_amount = l_parent_amount_remaining - l_new_split_amount,

Line 1145: , p_init_msg_list => FND_API.g_false

1141:
1142:
1143: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1144: p_api_version => 1.0
1145: , p_init_msg_list => FND_API.g_false
1146: , p_commit => FND_API.g_false
1147: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1148: , x_return_status => l_return_status
1149: , x_msg_data => l_msg_data

Line 1146: , p_commit => FND_API.g_false

1142:
1143: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1144: p_api_version => 1.0
1145: , p_init_msg_list => FND_API.g_false
1146: , p_commit => FND_API.g_false
1147: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1148: , x_return_status => l_return_status
1149: , x_msg_data => l_msg_data
1150: , x_msg_count => l_msg_count

Line 1147: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1143: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1144: p_api_version => 1.0
1145: , p_init_msg_list => FND_API.g_false
1146: , p_commit => FND_API.g_false
1147: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1148: , x_return_status => l_return_status
1149: , x_msg_data => l_msg_data
1150: , x_msg_count => l_msg_count
1151: , p_claim_line_rec => l_pvt_claim_line

Line 1155: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1151: , p_claim_line_rec => l_pvt_claim_line
1152: , p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1153: , x_claim_line_id => l_claim_line_id
1154: );
1155: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1156: RAISE FND_API.g_exc_unexpected_error;
1157: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1158: RAISE FND_API.g_exc_unexpected_error;
1159: END IF;

Line 1156: RAISE FND_API.g_exc_unexpected_error;

1152: , p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1153: , x_claim_line_id => l_claim_line_id
1154: );
1155: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1156: RAISE FND_API.g_exc_unexpected_error;
1157: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1158: RAISE FND_API.g_exc_unexpected_error;
1159: END IF;
1160:

Line 1157: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1153: , x_claim_line_id => l_claim_line_id
1154: );
1155: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1156: RAISE FND_API.g_exc_unexpected_error;
1157: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1158: RAISE FND_API.g_exc_unexpected_error;
1159: END IF;
1160:
1161: --update the l_child_claim_tbl record

Line 1158: RAISE FND_API.g_exc_unexpected_error;

1154: );
1155: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1156: RAISE FND_API.g_exc_unexpected_error;
1157: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1158: RAISE FND_API.g_exc_unexpected_error;
1159: END IF;
1160:
1161: --update the l_child_claim_tbl record
1162: -- line_amount_sum := amount

Line 1174: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1170: null;
1171: END IF;
1172: x_child_claim_tbl := l_child_claim_tbl;
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1177: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1178: FND_MSG_PUB.add;

Line 1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1171: END IF;
1172: x_child_claim_tbl := l_child_claim_tbl;
1173: EXCEPTION
1174: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1175: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1176: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1177: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1178: FND_MSG_PUB.add;
1179: END IF;

Line 1181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1177: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1178: FND_MSG_PUB.add;
1179: END IF;
1180: WHEN OTHERS THEN
1181: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1182: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1183: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1184: FND_MSG_PUB.add;
1185: END IF;

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

1199: -- NOTES
1200: ----------------------------------------------------------------------
1201: PROCEDURE create_child_claim_tbl (
1202: p_api_version IN NUMBER
1203: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1204: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1205: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1206: ,x_return_status OUT NOCOPY VARCHAR2
1207: ,x_msg_data OUT NOCOPY VARCHAR2

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

1200: ----------------------------------------------------------------------
1201: PROCEDURE create_child_claim_tbl (
1202: p_api_version IN NUMBER
1203: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1204: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1205: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1206: ,x_return_status OUT NOCOPY VARCHAR2
1207: ,x_msg_data OUT NOCOPY VARCHAR2
1208: ,x_msg_count OUT NOCOPY NUMBER

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

1201: PROCEDURE create_child_claim_tbl (
1202: p_api_version IN NUMBER
1203: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1204: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1205: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1206: ,x_return_status OUT NOCOPY VARCHAR2
1207: ,x_msg_data OUT NOCOPY VARCHAR2
1208: ,x_msg_count OUT NOCOPY NUMBER
1209: ,p_child_claim_tbl IN Child_Claim_tbl_type

Line 1245: IF NOT FND_API.Compatible_API_Call (

1241: -- Standard begin of API savepoint
1242: SAVEPOINT Create_Child_Tbl_PVT;
1243:
1244: -- Standard call to check for call compatibility.
1245: IF NOT FND_API.Compatible_API_Call (
1246: l_api_version,
1247: p_api_version,
1248: l_api_name,
1249: G_PKG_NAME)

Line 1251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1247: p_api_version,
1248: l_api_name,
1249: G_PKG_NAME)
1250: THEN
1251: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1252: END IF;
1253: -- Debug Message
1254: IF OZF_DEBUG_LOW_ON THEN
1255: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 1260: IF FND_API.To_Boolean (p_init_msg_list) THEN

1256: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1257: FND_MSG_PUB.Add;
1258: END IF;
1259: --Initialize message list if p_init_msg_list is TRUE.
1260: IF FND_API.To_Boolean (p_init_msg_list) THEN
1261: FND_MSG_PUB.initialize;
1262: END IF;
1263:
1264:

Line 1266: x_return_status := FND_API.G_RET_STS_SUCCESS;

1262: END IF;
1263:
1264:
1265: -- Initialize API return status to sucess
1266: x_return_status := FND_API.G_RET_STS_SUCCESS;
1267: IF p_mode = 'MANU' THEN
1268: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1269: P_Api_Version_Number => 1.0,
1270: P_Init_Msg_List => FND_API.G_FALSE,

Line 1270: P_Init_Msg_List => FND_API.G_FALSE,

1266: x_return_status := FND_API.G_RET_STS_SUCCESS;
1267: IF p_mode = 'MANU' THEN
1268: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1269: P_Api_Version_Number => 1.0,
1270: P_Init_Msg_List => FND_API.G_FALSE,
1271: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1272: P_Commit => FND_API.G_FALSE,
1273: P_object_id => l_child_claim_tbl(l_child_claim_tbl.count).parent_claim_id,
1274: P_object_type => G_CLAIM_OBJECT_TYPE,

Line 1271: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1267: IF p_mode = 'MANU' THEN
1268: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1269: P_Api_Version_Number => 1.0,
1270: P_Init_Msg_List => FND_API.G_FALSE,
1271: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1272: P_Commit => FND_API.G_FALSE,
1273: P_object_id => l_child_claim_tbl(l_child_claim_tbl.count).parent_claim_id,
1274: P_object_type => G_CLAIM_OBJECT_TYPE,
1275: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

Line 1272: P_Commit => FND_API.G_FALSE,

1268: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1269: P_Api_Version_Number => 1.0,
1270: P_Init_Msg_List => FND_API.G_FALSE,
1271: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1272: P_Commit => FND_API.G_FALSE,
1273: P_object_id => l_child_claim_tbl(l_child_claim_tbl.count).parent_claim_id,
1274: P_object_type => G_CLAIM_OBJECT_TYPE,
1275: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),
1276: X_Return_Status => l_return_status,

Line 1286: RAISE FND_API.G_EXC_ERROR;

1282: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1283: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1284: FND_MSG_PUB.Add;
1285: END IF;
1286: RAISE FND_API.G_EXC_ERROR;
1287: END IF;
1288: END IF;
1289:
1290:

Line 1309: RAISE FND_API.g_exc_error;

1305: THEN
1306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_POS_AMT_ERR');
1307: FND_MSG_PUB.add;
1308: END IF;
1309: RAISE FND_API.g_exc_error;
1310: END IF;
1311: ELSIF l_claim_class = 'CHARGE'
1312: OR l_claim_class = 'OVERPAYMENT'
1313: THEN

Line 1321: RAISE FND_API.g_exc_error;

1317: THEN
1318: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_NEG_AMT_ERR');
1319: FND_MSG_PUB.add;
1320: END IF;
1321: RAISE FND_API.g_exc_error;
1322: END IF;
1323: END IF;
1324: --End of claim amount check.
1325: END LOOP;

Line 1332: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1328: -- automatically split a claim line for the parent, if needed, based on the child information
1329: autosplit_line(p_child_claim_tbl => l_child_claim_tbl,
1330: x_child_claim_tbl => l_x_child_claim_tbl,
1331: x_return_status => l_return_status);
1332: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1333: RAISE FND_API.g_exc_unexpected_error;
1334: END IF;
1335: l_child_claim_tbl := l_x_child_claim_tbl;
1336:

Line 1333: RAISE FND_API.g_exc_unexpected_error;

1329: autosplit_line(p_child_claim_tbl => l_child_claim_tbl,
1330: x_child_claim_tbl => l_x_child_claim_tbl,
1331: x_return_status => l_return_status);
1332: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1333: RAISE FND_API.g_exc_unexpected_error;
1334: END IF;
1335: l_child_claim_tbl := l_x_child_claim_tbl;
1336:
1337: l_new_split_amount := 0;

Line 1348: l_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN

1344: l_child_claim.reason_code_id := l_child_claim_tbl(i).reason_code_id;
1345: l_child_claim.parent_claim_id := l_child_claim_tbl(i).parent_claim_id;
1346:
1347: IF l_child_claim_tbl(i).line_table is not null AND
1348: l_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN
1349: get_line_table (p_line_string => l_child_claim_tbl(i).line_table,
1350: x_line_table => l_line_tbl,
1351: x_return_status => l_return_status
1352: );

Line 1353: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1349: get_line_table (p_line_string => l_child_claim_tbl(i).line_table,
1350: x_line_table => l_line_tbl,
1351: x_return_status => l_return_status
1352: );
1353: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1354: RAISE FND_API.g_exc_unexpected_error;
1355: END IF;
1356: END IF;
1357:

Line 1354: RAISE FND_API.g_exc_unexpected_error;

1350: x_line_table => l_line_tbl,
1351: x_return_status => l_return_status
1352: );
1353: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1354: RAISE FND_API.g_exc_unexpected_error;
1355: END IF;
1356: END IF;
1357:
1358: create_child_claim (

Line 1363: IF l_return_status = FND_API.g_ret_sts_error THEN

1359: p_claim => l_child_claim
1360: ,p_line_tbl => l_line_tbl
1361: ,x_return_status => l_return_status
1362: );
1363: IF l_return_status = FND_API.g_ret_sts_error THEN
1364: RAISE FND_API.g_exc_error;
1365: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1366: RAISE FND_API.g_exc_unexpected_error;
1367: END IF;

Line 1364: RAISE FND_API.g_exc_error;

1360: ,p_line_tbl => l_line_tbl
1361: ,x_return_status => l_return_status
1362: );
1363: IF l_return_status = FND_API.g_ret_sts_error THEN
1364: RAISE FND_API.g_exc_error;
1365: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1366: RAISE FND_API.g_exc_unexpected_error;
1367: END IF;
1368:

Line 1365: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1361: ,x_return_status => l_return_status
1362: );
1363: IF l_return_status = FND_API.g_ret_sts_error THEN
1364: RAISE FND_API.g_exc_error;
1365: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1366: RAISE FND_API.g_exc_unexpected_error;
1367: END IF;
1368:
1369: -- create_child_claim sucessful.

Line 1366: RAISE FND_API.g_exc_unexpected_error;

1362: );
1363: IF l_return_status = FND_API.g_ret_sts_error THEN
1364: RAISE FND_API.g_exc_error;
1365: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1366: RAISE FND_API.g_exc_unexpected_error;
1367: END IF;
1368:
1369: -- create_child_claim sucessful.
1370: -- Reinitialize line table is needed.

Line 1392: IF l_return_status = FND_API.g_ret_sts_error THEN

1388: p_claim => l_parent_claim
1389: ,p_mode => p_mode
1390: ,x_return_status => l_return_status
1391: );
1392: IF l_return_status = FND_API.g_ret_sts_error THEN
1393: RAISE FND_API.g_exc_error;
1394: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1395: RAISE FND_API.g_exc_unexpected_error;
1396: END IF;

Line 1393: RAISE FND_API.g_exc_error;

1389: ,p_mode => p_mode
1390: ,x_return_status => l_return_status
1391: );
1392: IF l_return_status = FND_API.g_ret_sts_error THEN
1393: RAISE FND_API.g_exc_error;
1394: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1395: RAISE FND_API.g_exc_unexpected_error;
1396: END IF;
1397:

Line 1394: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1390: ,x_return_status => l_return_status
1391: );
1392: IF l_return_status = FND_API.g_ret_sts_error THEN
1393: RAISE FND_API.g_exc_error;
1394: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1395: RAISE FND_API.g_exc_unexpected_error;
1396: END IF;
1397:
1398:

Line 1395: RAISE FND_API.g_exc_unexpected_error;

1391: );
1392: IF l_return_status = FND_API.g_ret_sts_error THEN
1393: RAISE FND_API.g_exc_error;
1394: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1395: RAISE FND_API.g_exc_unexpected_error;
1396: END IF;
1397:
1398:
1399: --bug 335704

Line 1407: ,p_init_msg_list => FND_API.G_FALSE

1403: l_temp_claim_rec.object_version_number := l_child_claim_tbl(l_child_claim_tbl.count).parent_object_ver_num;
1404:
1405: OZF_CLAIM_PVT.Create_Claim_History (
1406: p_api_version => l_api_version
1407: ,p_init_msg_list => FND_API.G_FALSE
1408: ,p_commit => FND_API.G_FALSE
1409: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1410: ,x_return_status => l_return_status
1411: ,x_msg_data => l_msg_data

Line 1408: ,p_commit => FND_API.G_FALSE

1404:
1405: OZF_CLAIM_PVT.Create_Claim_History (
1406: p_api_version => l_api_version
1407: ,p_init_msg_list => FND_API.G_FALSE
1408: ,p_commit => FND_API.G_FALSE
1409: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1410: ,x_return_status => l_return_status
1411: ,x_msg_data => l_msg_data
1412: ,x_msg_count => l_msg_count

Line 1409: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

1405: OZF_CLAIM_PVT.Create_Claim_History (
1406: p_api_version => l_api_version
1407: ,p_init_msg_list => FND_API.G_FALSE
1408: ,p_commit => FND_API.G_FALSE
1409: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1410: ,x_return_status => l_return_status
1411: ,x_msg_data => l_msg_data
1412: ,x_msg_count => l_msg_count
1413: ,p_claim => l_temp_claim_rec

Line 1418: IF l_return_status = FND_API.g_ret_sts_error THEN

1414: ,p_event => G_SPLIT_EVENT
1415: ,x_need_to_create => l_temp_need_to_create
1416: ,x_claim_history_id => l_temp_clm_history_id
1417: );
1418: IF l_return_status = FND_API.g_ret_sts_error THEN
1419: RAISE FND_API.g_exc_error;
1420: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1421: RAISE FND_API.g_exc_unexpected_error;
1422: END IF;

Line 1419: RAISE FND_API.g_exc_error;

1415: ,x_need_to_create => l_temp_need_to_create
1416: ,x_claim_history_id => l_temp_clm_history_id
1417: );
1418: IF l_return_status = FND_API.g_ret_sts_error THEN
1419: RAISE FND_API.g_exc_error;
1420: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1421: RAISE FND_API.g_exc_unexpected_error;
1422: END IF;
1423: ELSE

Line 1420: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1416: ,x_claim_history_id => l_temp_clm_history_id
1417: );
1418: IF l_return_status = FND_API.g_ret_sts_error THEN
1419: RAISE FND_API.g_exc_error;
1420: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1421: RAISE FND_API.g_exc_unexpected_error;
1422: END IF;
1423: ELSE
1424: g_history_created := false;

Line 1421: RAISE FND_API.g_exc_unexpected_error;

1417: );
1418: IF l_return_status = FND_API.g_ret_sts_error THEN
1419: RAISE FND_API.g_exc_error;
1420: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1421: RAISE FND_API.g_exc_unexpected_error;
1422: END IF;
1423: ELSE
1424: g_history_created := false;
1425: END IF;

Line 1427: IF FND_API.To_Boolean ( p_commit ) THEN

1423: ELSE
1424: g_history_created := false;
1425: END IF;
1426: --Standard check of commit
1427: IF FND_API.To_Boolean ( p_commit ) THEN
1428: COMMIT WORK;
1429: END IF;
1430:
1431: -- Debug Message

Line 1440: p_encoded => FND_API.G_FALSE,

1436: END IF;
1437:
1438: --Standard call to get message count and if count=1, get the message
1439: FND_MSG_PUB.Count_And_Get (
1440: p_encoded => FND_API.G_FALSE,
1441: p_count => x_msg_count,
1442: p_data => x_msg_data
1443: );
1444: EXCEPTION

Line 1445: WHEN FND_API.G_EXC_ERROR THEN

1441: p_count => x_msg_count,
1442: p_data => x_msg_data
1443: );
1444: EXCEPTION
1445: WHEN FND_API.G_EXC_ERROR THEN
1446: ROLLBACK TO Create_Child_Tbl_PVT;
1447: x_return_status := FND_API.G_RET_STS_ERROR;
1448: -- Standard call to get message count and if count=1, get the message
1449: FND_MSG_PUB.Count_And_Get (

Line 1447: x_return_status := FND_API.G_RET_STS_ERROR;

1443: );
1444: EXCEPTION
1445: WHEN FND_API.G_EXC_ERROR THEN
1446: ROLLBACK TO Create_Child_Tbl_PVT;
1447: x_return_status := FND_API.G_RET_STS_ERROR;
1448: -- Standard call to get message count and if count=1, get the message
1449: FND_MSG_PUB.Count_And_Get (
1450: p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,

Line 1450: p_encoded => FND_API.G_FALSE,

1446: ROLLBACK TO Create_Child_Tbl_PVT;
1447: x_return_status := FND_API.G_RET_STS_ERROR;
1448: -- Standard call to get message count and if count=1, get the message
1449: FND_MSG_PUB.Count_And_Get (
1450: p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data
1453: );
1454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1450: p_encoded => FND_API.G_FALSE,
1451: p_count => x_msg_count,
1452: p_data => x_msg_data
1453: );
1454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1455: ROLLBACK TO Create_Child_Tbl_PVT;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: -- Standard call to get message count and if count=1, get the message
1458: FND_MSG_PUB.Count_And_Get (

Line 1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1452: p_data => x_msg_data
1453: );
1454: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1455: ROLLBACK TO Create_Child_Tbl_PVT;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: -- Standard call to get message count and if count=1, get the message
1458: FND_MSG_PUB.Count_And_Get (
1459: p_encoded => FND_API.G_FALSE,
1460: p_count => x_msg_count,

Line 1459: p_encoded => FND_API.G_FALSE,

1455: ROLLBACK TO Create_Child_Tbl_PVT;
1456: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1457: -- Standard call to get message count and if count=1, get the message
1458: FND_MSG_PUB.Count_And_Get (
1459: p_encoded => FND_API.G_FALSE,
1460: p_count => x_msg_count,
1461: p_data => x_msg_data
1462: );
1463: WHEN OTHERS THEN

Line 1465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1461: p_data => x_msg_data
1462: );
1463: WHEN OTHERS THEN
1464: ROLLBACK TO Create_Child_Tbl_PVT;
1465: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1466: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1468: END IF;
1469: -- Standard call to get message count and if count=1, get the message

Line 1471: p_encoded => FND_API.G_FALSE,

1467: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1468: END IF;
1469: -- Standard call to get message count and if count=1, get the message
1470: FND_MSG_PUB.Count_And_Get (
1471: p_encoded => FND_API.G_FALSE,
1472: p_count => x_msg_count,
1473: p_data => x_msg_data
1474: );
1475: END create_child_claim_tbl;

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

1488: -- NOTES
1489: ----------------------------------------------------------------------
1490: PROCEDURE update_child_claim_tbl (
1491: p_api_version IN NUMBER
1492: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1493: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1494: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1495: ,x_return_status OUT NOCOPY VARCHAR2
1496: ,x_msg_data OUT NOCOPY VARCHAR2

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

1489: ----------------------------------------------------------------------
1490: PROCEDURE update_child_claim_tbl (
1491: p_api_version IN NUMBER
1492: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1493: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1494: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1495: ,x_return_status OUT NOCOPY VARCHAR2
1496: ,x_msg_data OUT NOCOPY VARCHAR2
1497: ,x_msg_count OUT NOCOPY NUMBER

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

1490: PROCEDURE update_child_claim_tbl (
1491: p_api_version IN NUMBER
1492: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1493: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1494: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1495: ,x_return_status OUT NOCOPY VARCHAR2
1496: ,x_msg_data OUT NOCOPY VARCHAR2
1497: ,x_msg_count OUT NOCOPY NUMBER
1498: ,p_child_claim_tbl IN Child_Claim_tbl_type

Line 1526: IF NOT FND_API.Compatible_API_Call (

1522: -- Standard begin of API savepoint
1523: SAVEPOINT Update_Child_Tbl_PVT;
1524:
1525: -- Standard call to check for call compatibility.
1526: IF NOT FND_API.Compatible_API_Call (
1527: l_api_version,
1528: p_api_version,
1529: l_api_name,
1530: G_PKG_NAME)

Line 1532: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1528: p_api_version,
1529: l_api_name,
1530: G_PKG_NAME)
1531: THEN
1532: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1533: END IF;
1534: -- Debug Message
1535: IF OZF_DEBUG_LOW_ON THEN
1536: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 1541: IF FND_API.To_Boolean (p_init_msg_list) THEN

1537: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1538: FND_MSG_PUB.Add;
1539: END IF;
1540: --Initialize message list if p_init_msg_list is TRUE.
1541: IF FND_API.To_Boolean (p_init_msg_list) THEN
1542: FND_MSG_PUB.initialize;
1543: END IF;
1544:
1545: -- Initialize API return status to sucess

Line 1546: x_return_status := FND_API.G_RET_STS_SUCCESS;

1542: FND_MSG_PUB.initialize;
1543: END IF;
1544:
1545: -- Initialize API return status to sucess
1546: x_return_status := FND_API.G_RET_STS_SUCCESS;
1547:
1548: IF p_mode = 'MANU' THEN
1549: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1550: P_Api_Version_Number => 1.0,

Line 1551: P_Init_Msg_List => FND_API.G_FALSE,

1547:
1548: IF p_mode = 'MANU' THEN
1549: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1550: P_Api_Version_Number => 1.0,
1551: P_Init_Msg_List => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: P_Commit => FND_API.G_FALSE,
1554: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1555: P_object_type => G_CLAIM_OBJECT_TYPE,

Line 1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1548: IF p_mode = 'MANU' THEN
1549: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1550: P_Api_Version_Number => 1.0,
1551: P_Init_Msg_List => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: P_Commit => FND_API.G_FALSE,
1554: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1555: P_object_type => G_CLAIM_OBJECT_TYPE,
1556: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

Line 1553: P_Commit => FND_API.G_FALSE,

1549: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1550: P_Api_Version_Number => 1.0,
1551: P_Init_Msg_List => FND_API.G_FALSE,
1552: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1553: P_Commit => FND_API.G_FALSE,
1554: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1555: P_object_type => G_CLAIM_OBJECT_TYPE,
1556: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),
1557: X_Return_Status => l_return_status,

Line 1567: RAISE FND_API.G_EXC_ERROR;

1563: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1564: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1565: FND_MSG_PUB.Add;
1566: END IF;
1567: RAISE FND_API.G_EXC_ERROR;
1568: END IF;
1569: END IF;
1570:
1571:

Line 1582: p_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN

1578: l_child_claim.reason_code_id := p_child_claim_tbl(i).reason_code_id;
1579: l_child_claim.parent_claim_id := p_child_claim_tbl(i).parent_claim_id;
1580:
1581: IF p_child_claim_tbl(i).line_table is not null AND
1582: p_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN
1583: get_line_table (p_line_string => p_child_claim_tbl(i).line_table,
1584: x_line_table => l_line_tbl,
1585: x_return_status => l_return_status
1586: );

Line 1587: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1583: get_line_table (p_line_string => p_child_claim_tbl(i).line_table,
1584: x_line_table => l_line_tbl,
1585: x_return_status => l_return_status
1586: );
1587: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1588: RAISE FND_API.g_exc_unexpected_error;
1589: END IF;
1590: END IF;
1591: update_child_claim (

Line 1588: RAISE FND_API.g_exc_unexpected_error;

1584: x_line_table => l_line_tbl,
1585: x_return_status => l_return_status
1586: );
1587: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1588: RAISE FND_API.g_exc_unexpected_error;
1589: END IF;
1590: END IF;
1591: update_child_claim (
1592: p_claim => l_child_claim

Line 1597: IF l_return_status = FND_API.g_ret_sts_error THEN

1593: ,p_line_tbl => l_line_tbl
1594: ,x_return_status => l_return_status
1595: ,x_new_claim_amount => l_new_child_claim_amount
1596: );
1597: IF l_return_status = FND_API.g_ret_sts_error THEN
1598: RAISE FND_API.g_exc_error;
1599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1600: RAISE FND_API.g_exc_unexpected_error;
1601: END IF;

Line 1598: RAISE FND_API.g_exc_error;

1594: ,x_return_status => l_return_status
1595: ,x_new_claim_amount => l_new_child_claim_amount
1596: );
1597: IF l_return_status = FND_API.g_ret_sts_error THEN
1598: RAISE FND_API.g_exc_error;
1599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1600: RAISE FND_API.g_exc_unexpected_error;
1601: END IF;
1602:

Line 1599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1595: ,x_new_claim_amount => l_new_child_claim_amount
1596: );
1597: IF l_return_status = FND_API.g_ret_sts_error THEN
1598: RAISE FND_API.g_exc_error;
1599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1600: RAISE FND_API.g_exc_unexpected_error;
1601: END IF;
1602:
1603: -- create_child_claim sucessful.

Line 1600: RAISE FND_API.g_exc_unexpected_error;

1596: );
1597: IF l_return_status = FND_API.g_ret_sts_error THEN
1598: RAISE FND_API.g_exc_error;
1599: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1600: RAISE FND_API.g_exc_unexpected_error;
1601: END IF;
1602:
1603: -- create_child_claim sucessful.
1604:

Line 1624: IF l_return_status = FND_API.g_ret_sts_error THEN

1620: p_claim => l_parent_claim
1621: ,p_mode => p_mode
1622: ,x_return_status => l_return_status
1623: );
1624: IF l_return_status = FND_API.g_ret_sts_error THEN
1625: RAISE FND_API.g_exc_error;
1626: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1627: RAISE FND_API.g_exc_unexpected_error;
1628: END IF;

Line 1625: RAISE FND_API.g_exc_error;

1621: ,p_mode => p_mode
1622: ,x_return_status => l_return_status
1623: );
1624: IF l_return_status = FND_API.g_ret_sts_error THEN
1625: RAISE FND_API.g_exc_error;
1626: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1627: RAISE FND_API.g_exc_unexpected_error;
1628: END IF;
1629:

Line 1626: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1622: ,x_return_status => l_return_status
1623: );
1624: IF l_return_status = FND_API.g_ret_sts_error THEN
1625: RAISE FND_API.g_exc_error;
1626: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1627: RAISE FND_API.g_exc_unexpected_error;
1628: END IF;
1629:
1630: --bug 3357204

Line 1627: RAISE FND_API.g_exc_unexpected_error;

1623: );
1624: IF l_return_status = FND_API.g_ret_sts_error THEN
1625: RAISE FND_API.g_exc_error;
1626: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1627: RAISE FND_API.g_exc_unexpected_error;
1628: END IF;
1629:
1630: --bug 3357204
1631: -- create claim history if needed

Line 1638: ,p_init_msg_list => FND_API.G_FALSE

1634: l_temp_claim_rec.object_version_number := p_child_claim_tbl(p_child_claim_tbl.count).parent_object_ver_num;
1635:
1636: OZF_CLAIM_PVT.Create_Claim_History (
1637: p_api_version => l_api_version
1638: ,p_init_msg_list => FND_API.G_FALSE
1639: ,p_commit => FND_API.G_FALSE
1640: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1641: ,x_return_status => l_return_status
1642: ,x_msg_data => l_msg_data

Line 1639: ,p_commit => FND_API.G_FALSE

1635:
1636: OZF_CLAIM_PVT.Create_Claim_History (
1637: p_api_version => l_api_version
1638: ,p_init_msg_list => FND_API.G_FALSE
1639: ,p_commit => FND_API.G_FALSE
1640: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1641: ,x_return_status => l_return_status
1642: ,x_msg_data => l_msg_data
1643: ,x_msg_count => l_msg_count

Line 1640: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

1636: OZF_CLAIM_PVT.Create_Claim_History (
1637: p_api_version => l_api_version
1638: ,p_init_msg_list => FND_API.G_FALSE
1639: ,p_commit => FND_API.G_FALSE
1640: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1641: ,x_return_status => l_return_status
1642: ,x_msg_data => l_msg_data
1643: ,x_msg_count => l_msg_count
1644: ,p_claim => l_temp_claim_rec

Line 1653: IF FND_API.To_Boolean ( p_commit ) THEN

1649: g_history_created := true;
1650: END IF;
1651:
1652: --Standard check of commit
1653: IF FND_API.To_Boolean ( p_commit ) THEN
1654: COMMIT WORK;
1655: END IF;
1656:
1657: -- Debug Message

Line 1666: p_encoded => FND_API.G_FALSE,

1662: END IF;
1663:
1664: --Standard call to get message count and if count=1, get the message
1665: FND_MSG_PUB.Count_And_Get (
1666: p_encoded => FND_API.G_FALSE,
1667: p_count => x_msg_count,
1668: p_data => x_msg_data
1669: );
1670: EXCEPTION

Line 1671: WHEN FND_API.G_EXC_ERROR THEN

1667: p_count => x_msg_count,
1668: p_data => x_msg_data
1669: );
1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: ROLLBACK TO Update_Child_Tbl_PVT;
1673: x_return_status := FND_API.G_RET_STS_ERROR;
1674: -- Standard call to get message count and if count=1, get the message
1675: FND_MSG_PUB.Count_And_Get (

Line 1673: x_return_status := FND_API.G_RET_STS_ERROR;

1669: );
1670: EXCEPTION
1671: WHEN FND_API.G_EXC_ERROR THEN
1672: ROLLBACK TO Update_Child_Tbl_PVT;
1673: x_return_status := FND_API.G_RET_STS_ERROR;
1674: -- Standard call to get message count and if count=1, get the message
1675: FND_MSG_PUB.Count_And_Get (
1676: p_encoded => FND_API.G_FALSE,
1677: p_count => x_msg_count,

Line 1676: p_encoded => FND_API.G_FALSE,

1672: ROLLBACK TO Update_Child_Tbl_PVT;
1673: x_return_status := FND_API.G_RET_STS_ERROR;
1674: -- Standard call to get message count and if count=1, get the message
1675: FND_MSG_PUB.Count_And_Get (
1676: p_encoded => FND_API.G_FALSE,
1677: p_count => x_msg_count,
1678: p_data => x_msg_data
1679: );
1680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1676: p_encoded => FND_API.G_FALSE,
1677: p_count => x_msg_count,
1678: p_data => x_msg_data
1679: );
1680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1681: ROLLBACK TO Update_Child_Tbl_PVT;
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: -- Standard call to get message count and if count=1, get the message
1684: FND_MSG_PUB.Count_And_Get (

Line 1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1678: p_data => x_msg_data
1679: );
1680: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1681: ROLLBACK TO Update_Child_Tbl_PVT;
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: -- Standard call to get message count and if count=1, get the message
1684: FND_MSG_PUB.Count_And_Get (
1685: p_encoded => FND_API.G_FALSE,
1686: p_count => x_msg_count,

Line 1685: p_encoded => FND_API.G_FALSE,

1681: ROLLBACK TO Update_Child_Tbl_PVT;
1682: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1683: -- Standard call to get message count and if count=1, get the message
1684: FND_MSG_PUB.Count_And_Get (
1685: p_encoded => FND_API.G_FALSE,
1686: p_count => x_msg_count,
1687: p_data => x_msg_data
1688: );
1689: WHEN OTHERS THEN

Line 1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1687: p_data => x_msg_data
1688: );
1689: WHEN OTHERS THEN
1690: ROLLBACK TO Update_Child_Tbl_PVT;
1691: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1692: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1694: END IF;
1695: -- Standard call to get message count and if count=1, get the message

Line 1697: p_encoded => FND_API.G_FALSE,

1693: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1694: END IF;
1695: -- Standard call to get message count and if count=1, get the message
1696: FND_MSG_PUB.Count_And_Get (
1697: p_encoded => FND_API.G_FALSE,
1698: p_count => x_msg_count,
1699: p_data => x_msg_data
1700: );
1701: END update_child_claim_tbl;