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 121: x_return_status := FND_API.G_RET_STS_SUCCESS;

117: FND_MSG_PUB.Add;
118: END IF;
119:
120: -- Initialize API return status to sucess
121: x_return_status := FND_API.G_RET_STS_SUCCESS;
122:
123: -- Start Creation.
124: -- setup the data for claim and then call create_claim package.
125: -- get the parent claim record

Line 260: P_Init_Msg_List => FND_API.G_FALSE,

256:
257:
258: OZF_claim_PVT.Create_Claim(
259: P_Api_Version => 1.0,
260: P_Init_Msg_List => FND_API.G_FALSE,
261: P_Commit => FND_API.G_FALSE,
262: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
263: X_Return_Status => l_return_status,
264: X_Msg_Count => l_msg_count,

Line 261: P_Commit => FND_API.G_FALSE,

257:
258: OZF_claim_PVT.Create_Claim(
259: P_Api_Version => 1.0,
260: P_Init_Msg_List => FND_API.G_FALSE,
261: P_Commit => FND_API.G_FALSE,
262: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
263: X_Return_Status => l_return_status,
264: X_Msg_Count => l_msg_count,
265: X_Msg_Data => l_msg_data,

Line 262: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,

258: OZF_claim_PVT.Create_Claim(
259: P_Api_Version => 1.0,
260: P_Init_Msg_List => FND_API.G_FALSE,
261: P_Commit => FND_API.G_FALSE,
262: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
263: X_Return_Status => l_return_status,
264: X_Msg_Count => l_msg_count,
265: X_Msg_Data => l_msg_data,
266: P_claim => l_child_claim,

Line 270: IF l_return_status = FND_API.g_ret_sts_error THEN

266: P_claim => l_child_claim,
267: X_CLAIM_ID => l_claim_id
268: );
269:
270: IF l_return_status = FND_API.g_ret_sts_error THEN
271: RAISE FND_API.g_exc_error;
272: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
273: RAISE FND_API.g_exc_unexpected_error;
274: END IF;

Line 271: RAISE FND_API.g_exc_error;

267: X_CLAIM_ID => l_claim_id
268: );
269:
270: IF l_return_status = FND_API.g_ret_sts_error THEN
271: RAISE FND_API.g_exc_error;
272: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
273: RAISE FND_API.g_exc_unexpected_error;
274: END IF;
275:

Line 272: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

268: );
269:
270: IF l_return_status = FND_API.g_ret_sts_error THEN
271: RAISE FND_API.g_exc_error;
272: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
273: RAISE FND_API.g_exc_unexpected_error;
274: END IF;
275:
276: x_child_claim_id := l_claim_id;

Line 273: RAISE FND_API.g_exc_unexpected_error;

269:
270: IF l_return_status = FND_API.g_ret_sts_error THEN
271: RAISE FND_API.g_exc_error;
272: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
273: RAISE FND_API.g_exc_unexpected_error;
274: END IF;
275:
276: x_child_claim_id := l_claim_id;
277:

Line 292: ,p_init_msg_list => FND_API.g_false

288: l_claim_line.claim_id := l_claim_id;
289:
290: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
291: p_api_version => l_api_version
292: ,p_init_msg_list => FND_API.g_false
293: ,p_commit => FND_API.g_false
294: ,p_validation_level => FND_API.g_valid_level_full
295: ,x_return_status => l_return_status
296: ,x_msg_count => l_msg_count

Line 293: ,p_commit => FND_API.g_false

289:
290: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
291: p_api_version => l_api_version
292: ,p_init_msg_list => FND_API.g_false
293: ,p_commit => FND_API.g_false
294: ,p_validation_level => FND_API.g_valid_level_full
295: ,x_return_status => l_return_status
296: ,x_msg_count => l_msg_count
297: ,x_msg_data => l_msg_data

Line 294: ,p_validation_level => FND_API.g_valid_level_full

290: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
291: p_api_version => l_api_version
292: ,p_init_msg_list => FND_API.g_false
293: ,p_commit => FND_API.g_false
294: ,p_validation_level => FND_API.g_valid_level_full
295: ,x_return_status => l_return_status
296: ,x_msg_count => l_msg_count
297: ,x_msg_data => l_msg_data
298: ,p_claim_line_rec => l_claim_line

Line 303: IF l_return_status = FND_API.g_ret_sts_error THEN

299: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
300: ,x_object_version => l_line_obj_num
301: );
302:
303: IF l_return_status = FND_API.g_ret_sts_error THEN
304: RAISE FND_API.g_exc_error;
305: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
306: RAISE FND_API.g_exc_unexpected_error;
307: END IF;

Line 304: RAISE FND_API.g_exc_error;

300: ,x_object_version => l_line_obj_num
301: );
302:
303: IF l_return_status = FND_API.g_ret_sts_error THEN
304: RAISE FND_API.g_exc_error;
305: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
306: RAISE FND_API.g_exc_unexpected_error;
307: END IF;
308: END LOOP;

Line 305: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

301: );
302:
303: IF l_return_status = FND_API.g_ret_sts_error THEN
304: RAISE FND_API.g_exc_error;
305: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
306: RAISE FND_API.g_exc_unexpected_error;
307: END IF;
308: END LOOP;
309:

Line 306: RAISE FND_API.g_exc_unexpected_error;

302:
303: IF l_return_status = FND_API.g_ret_sts_error THEN
304: RAISE FND_API.g_exc_error;
305: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
306: RAISE FND_API.g_exc_unexpected_error;
307: END IF;
308: END LOOP;
309:
310:

Line 329: ,p_init_msg_list => FND_API.G_FALSE

325: IF l_access_list_tbl.COUNT > 0 THEN
326: FOR i IN 1..l_access_list_tbl.LAST LOOP
327: AMS_ACCESS_PVT.Create_Access(
328: p_api_version => l_api_version
329: ,p_init_msg_list => FND_API.G_FALSE
330: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
331: ,x_return_status => l_return_status
332: ,x_msg_count => l_msg_count
333: ,x_msg_data => l_msg_data

Line 330: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

326: FOR i IN 1..l_access_list_tbl.LAST LOOP
327: AMS_ACCESS_PVT.Create_Access(
328: p_api_version => l_api_version
329: ,p_init_msg_list => FND_API.G_FALSE
330: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
331: ,x_return_status => l_return_status
332: ,x_msg_count => l_msg_count
333: ,x_msg_data => l_msg_data
334: ,p_commit => FND_API.G_FALSE

Line 334: ,p_commit => FND_API.G_FALSE

330: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
331: ,x_return_status => l_return_status
332: ,x_msg_count => l_msg_count
333: ,x_msg_data => l_msg_data
334: ,p_commit => FND_API.G_FALSE
335: ,p_access_rec => l_access_list_tbl(i)
336: ,x_access_id => l_access_id
337: );
338: IF l_return_status = fnd_api.g_ret_sts_error THEN

Line 338: IF l_return_status = fnd_api.g_ret_sts_error THEN

334: ,p_commit => FND_API.G_FALSE
335: ,p_access_rec => l_access_list_tbl(i)
336: ,x_access_id => l_access_id
337: );
338: IF l_return_status = fnd_api.g_ret_sts_error THEN
339: RAISE fnd_api.g_exc_error;
340: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
341: RAISE fnd_api.g_exc_unexpected_error;
342: END IF;

Line 339: RAISE fnd_api.g_exc_error;

335: ,p_access_rec => l_access_list_tbl(i)
336: ,x_access_id => l_access_id
337: );
338: IF l_return_status = fnd_api.g_ret_sts_error THEN
339: RAISE fnd_api.g_exc_error;
340: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
341: RAISE fnd_api.g_exc_unexpected_error;
342: END IF;
343: END LOOP;

Line 340: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

336: ,x_access_id => l_access_id
337: );
338: IF l_return_status = fnd_api.g_ret_sts_error THEN
339: RAISE fnd_api.g_exc_error;
340: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
341: RAISE fnd_api.g_exc_unexpected_error;
342: END IF;
343: END LOOP;
344: END IF;

Line 341: RAISE fnd_api.g_exc_unexpected_error;

337: );
338: IF l_return_status = fnd_api.g_ret_sts_error THEN
339: RAISE fnd_api.g_exc_error;
340: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
341: RAISE fnd_api.g_exc_unexpected_error;
342: END IF;
343: END LOOP;
344: END IF;
345: -- [END OF BUG 3473501 FIXING]

Line 355: WHEN FND_API.G_EXC_ERROR THEN

351: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
352: FND_MSG_PUB.Add;
353: END IF;
354: EXCEPTION
355: WHEN FND_API.G_EXC_ERROR THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357:
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 356: x_return_status := FND_API.G_RET_STS_ERROR;

352: FND_MSG_PUB.Add;
353: END IF;
354: EXCEPTION
355: WHEN FND_API.G_EXC_ERROR THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357:
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
360:

Line 358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

354: EXCEPTION
355: WHEN FND_API.G_EXC_ERROR THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357:
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
360:
361: WHEN OTHERS THEN
362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

355: WHEN FND_API.G_EXC_ERROR THEN
356: x_return_status := FND_API.G_RET_STS_ERROR;
357:
358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
360:
361: WHEN OTHERS THEN
362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
363: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

358: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
359: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
360:
361: WHEN OTHERS THEN
362: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
363: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
364: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
365: END IF;
366: END create_child_claim;

Line 430: x_return_status := FND_API.G_RET_STS_SUCCESS;

426: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
427: FND_MSG_PUB.Add;
428: END IF;
429: -- Initialize API return status to sucess
430: x_return_status := FND_API.G_RET_STS_SUCCESS;
431:
432: OPEN version_csr(p_claim.claim_id);
433: FETCH version_csr INTO l_object_version_number;
434: CLOSE version_csr;

Line 463: ,p_init_msg_list => FND_API.G_FALSE

459: END IF;
460:
461: OZF_claim_PVT.Update_Claim (
462: p_api_version => l_api_version
463: ,p_init_msg_list => FND_API.G_FALSE
464: ,p_commit => FND_API.G_FALSE
465: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
466: ,x_return_status => l_return_status
467: ,x_msg_data => l_msg_data

Line 464: ,p_commit => FND_API.G_FALSE

460:
461: OZF_claim_PVT.Update_Claim (
462: p_api_version => l_api_version
463: ,p_init_msg_list => FND_API.G_FALSE
464: ,p_commit => FND_API.G_FALSE
465: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
466: ,x_return_status => l_return_status
467: ,x_msg_data => l_msg_data
468: ,x_msg_count => l_msg_count

Line 465: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

461: OZF_claim_PVT.Update_Claim (
462: p_api_version => l_api_version
463: ,p_init_msg_list => FND_API.G_FALSE
464: ,p_commit => FND_API.G_FALSE
465: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
466: ,x_return_status => l_return_status
467: ,x_msg_data => l_msg_data
468: ,x_msg_count => l_msg_count
469: ,p_claim => l_child_claim

Line 474: IF l_return_status = FND_API.g_ret_sts_error THEN

470: ,p_event => G_UPDATE_EVENT
471: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
472: ,x_object_version_number => l_object_version_number
473: );
474: IF l_return_status = FND_API.g_ret_sts_error THEN
475: RAISE FND_API.g_exc_error;
476: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
477: RAISE FND_API.g_exc_unexpected_error;
478: END IF;

Line 475: RAISE FND_API.g_exc_error;

471: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
472: ,x_object_version_number => l_object_version_number
473: );
474: IF l_return_status = FND_API.g_ret_sts_error THEN
475: RAISE FND_API.g_exc_error;
476: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
477: RAISE FND_API.g_exc_unexpected_error;
478: END IF;
479: x_new_claim_amount := l_child_claim.amount;

Line 476: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

472: ,x_object_version_number => l_object_version_number
473: );
474: IF l_return_status = FND_API.g_ret_sts_error THEN
475: RAISE FND_API.g_exc_error;
476: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
477: RAISE FND_API.g_exc_unexpected_error;
478: END IF;
479: x_new_claim_amount := l_child_claim.amount;
480:

Line 477: RAISE FND_API.g_exc_unexpected_error;

473: );
474: IF l_return_status = FND_API.g_ret_sts_error THEN
475: RAISE FND_API.g_exc_error;
476: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
477: RAISE FND_API.g_exc_unexpected_error;
478: END IF;
479: x_new_claim_amount := l_child_claim.amount;
480:
481: -- Now update the lines.

Line 492: ,p_init_msg_list => FND_API.g_false

488: l_claim_line.claim_id := p_claim.claim_id;
489:
490: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
491: p_api_version => l_api_version
492: ,p_init_msg_list => FND_API.g_false
493: ,p_commit => FND_API.g_false
494: ,p_validation_level => FND_API.g_valid_level_full
495: ,x_return_status => l_return_status
496: ,x_msg_count => l_msg_count

Line 493: ,p_commit => FND_API.g_false

489:
490: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
491: p_api_version => l_api_version
492: ,p_init_msg_list => FND_API.g_false
493: ,p_commit => FND_API.g_false
494: ,p_validation_level => FND_API.g_valid_level_full
495: ,x_return_status => l_return_status
496: ,x_msg_count => l_msg_count
497: ,x_msg_data => l_msg_data

Line 494: ,p_validation_level => FND_API.g_valid_level_full

490: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
491: p_api_version => l_api_version
492: ,p_init_msg_list => FND_API.g_false
493: ,p_commit => FND_API.g_false
494: ,p_validation_level => FND_API.g_valid_level_full
495: ,x_return_status => l_return_status
496: ,x_msg_count => l_msg_count
497: ,x_msg_data => l_msg_data
498: ,p_claim_line_rec => l_claim_line

Line 503: IF l_return_status = FND_API.g_ret_sts_error THEN

499: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
500: ,x_object_version => l_line_obj_num
501: );
502:
503: IF l_return_status = FND_API.g_ret_sts_error THEN
504: RAISE FND_API.g_exc_error;
505: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
506: RAISE FND_API.g_exc_unexpected_error;
507: END IF;

Line 504: RAISE FND_API.g_exc_error;

500: ,x_object_version => l_line_obj_num
501: );
502:
503: IF l_return_status = FND_API.g_ret_sts_error THEN
504: RAISE FND_API.g_exc_error;
505: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
506: RAISE FND_API.g_exc_unexpected_error;
507: END IF;
508: END LOOP;

Line 505: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

501: );
502:
503: IF l_return_status = FND_API.g_ret_sts_error THEN
504: RAISE FND_API.g_exc_error;
505: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
506: RAISE FND_API.g_exc_unexpected_error;
507: END IF;
508: END LOOP;
509: ELSE

Line 506: RAISE FND_API.g_exc_unexpected_error;

502:
503: IF l_return_status = FND_API.g_ret_sts_error THEN
504: RAISE FND_API.g_exc_error;
505: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
506: RAISE FND_API.g_exc_unexpected_error;
507: END IF;
508: END LOOP;
509: ELSE
510: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN

Line 514: RAISE FND_API.g_exc_unexpected_error;

510: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
511: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
512: FND_MSG_PUB.ADD;
513: END IF;
514: RAISE FND_API.g_exc_unexpected_error;
515: END IF;
516:
517: EXCEPTION
518: WHEN OTHERS THEN

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_API_RECORD_NOT_FOUND');
521: FND_MSG_PUB.add;
522: END IF;
523: RAISE FND_API.g_exc_error;
524: END;
525: ELSE
526: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
527: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');

Line 530: RAISE FND_API.g_exc_error;

526: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
527: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
528: FND_MSG_PUB.add;
529: END IF;
530: RAISE FND_API.g_exc_error;
531: END IF;
532: -- Debug Message
533: IF OZF_DEBUG_LOW_ON THEN
534: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 539: WHEN FND_API.G_EXC_ERROR THEN

535: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
536: FND_MSG_PUB.Add;
537: END IF;
538: EXCEPTION
539: WHEN FND_API.G_EXC_ERROR THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: WHEN OTHERS THEN

Line 540: x_return_status := FND_API.G_RET_STS_ERROR;

536: FND_MSG_PUB.Add;
537: END IF;
538: EXCEPTION
539: WHEN FND_API.G_EXC_ERROR THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: WHEN OTHERS THEN
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

537: END IF;
538: EXCEPTION
539: WHEN FND_API.G_EXC_ERROR THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: WHEN OTHERS THEN
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
545: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

538: EXCEPTION
539: WHEN FND_API.G_EXC_ERROR THEN
540: x_return_status := FND_API.G_RET_STS_ERROR;
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: WHEN OTHERS THEN
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
545: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
546: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

540: x_return_status := FND_API.G_RET_STS_ERROR;
541: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
542: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
543: WHEN OTHERS THEN
544: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
545: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
546: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
547: END IF;
548: END update_child_claim;

Line 606: x_return_status := FND_API.G_RET_STS_SUCCESS;

602: ozf_utility_pvt.debug_message('start update parent');
603: END IF;
604:
605: -- Initialize API return status to sucess
606: x_return_status := FND_API.G_RET_STS_SUCCESS;
607:
608: OPEN claim_info_csr(p_claim.claim_id);
609: FETCH claim_info_csr INTO l_object_version_number, l_status_code
610: , l_amount_adjusted, l_amount_remaining, l_currency_code, l_reason_code_id;

Line 642: RAISE FND_API.G_EXC_ERROR;

638: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
639: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLT_NG_NOPM');
640: FND_MSG_PUB.Add;
641: END IF;
642: RAISE FND_API.G_EXC_ERROR;
643: END IF;
644:
645: IF ((l_amount_remaining < 0) and
646: (l_amount_remaining - OZF_UTILITY_PVT.CurrRound(p_claim.amount_adjusted, l_currency_code) > 0)) THEN

Line 651: RAISE FND_API.G_EXC_ERROR;

647: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
648: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SPLIT_PO_OPM');
649: FND_MSG_PUB.Add;
650: END IF;
651: RAISE FND_API.G_EXC_ERROR;
652: END IF;
653:
654: OZF_claim_PVT.Update_Claim (
655: p_api_version => l_api_version

Line 656: ,p_init_msg_list => FND_API.G_FALSE

652: END IF;
653:
654: OZF_claim_PVT.Update_Claim (
655: p_api_version => l_api_version
656: ,p_init_msg_list => FND_API.G_FALSE
657: ,p_commit => FND_API.G_FALSE
658: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
659: ,x_return_status => l_return_status
660: ,x_msg_data => l_msg_data

Line 657: ,p_commit => FND_API.G_FALSE

653:
654: OZF_claim_PVT.Update_Claim (
655: p_api_version => l_api_version
656: ,p_init_msg_list => FND_API.G_FALSE
657: ,p_commit => FND_API.G_FALSE
658: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
659: ,x_return_status => l_return_status
660: ,x_msg_data => l_msg_data
661: ,x_msg_count => l_msg_count

Line 658: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

654: OZF_claim_PVT.Update_Claim (
655: p_api_version => l_api_version
656: ,p_init_msg_list => FND_API.G_FALSE
657: ,p_commit => FND_API.G_FALSE
658: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
659: ,x_return_status => l_return_status
660: ,x_msg_data => l_msg_data
661: ,x_msg_count => l_msg_count
662: ,p_claim => l_claim

Line 668: IF l_return_status = FND_API.g_ret_sts_error THEN

664: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
665: ,x_object_version_number => l_object_version_number
666: );
667:
668: IF l_return_status = FND_API.g_ret_sts_error THEN
669: RAISE FND_API.g_exc_error;
670: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
671: RAISE FND_API.g_exc_unexpected_error;
672: END IF;

Line 669: RAISE FND_API.g_exc_error;

665: ,x_object_version_number => l_object_version_number
666: );
667:
668: IF l_return_status = FND_API.g_ret_sts_error THEN
669: RAISE FND_API.g_exc_error;
670: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
671: RAISE FND_API.g_exc_unexpected_error;
672: END IF;
673: ELSE

Line 670: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

666: );
667:
668: IF l_return_status = FND_API.g_ret_sts_error THEN
669: RAISE FND_API.g_exc_error;
670: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
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

Line 671: RAISE FND_API.g_exc_unexpected_error;

667:
668: IF l_return_status = FND_API.g_ret_sts_error THEN
669: RAISE FND_API.g_exc_error;
670: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
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_CLAIM_WRONG_SPLIT_STATUS');

Line 678: RAISE FND_API.g_exc_unexpected_error;

674: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
675: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_WRONG_SPLIT_STATUS');
676: FND_MSG_PUB.ADD;
677: END IF;
678: RAISE FND_API.g_exc_unexpected_error;
679: END IF;
680: ELSE
681: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
682: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');

Line 685: RAISE FND_API.g_exc_error;

681: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
682: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
683: FND_MSG_PUB.add;
684: END IF;
685: RAISE FND_API.g_exc_error;
686: END IF;
687:
688: -- Debug Message
689: IF OZF_DEBUG_LOW_ON THEN

Line 695: WHEN FND_API.G_EXC_ERROR THEN

691: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');
692: FND_MSG_PUB.Add;
693: END IF;
694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696: x_return_status := FND_API.G_RET_STS_ERROR;
697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
699: WHEN OTHERS THEN

Line 696: x_return_status := FND_API.G_RET_STS_ERROR;

692: FND_MSG_PUB.Add;
693: END IF;
694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696: x_return_status := FND_API.G_RET_STS_ERROR;
697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

693: END IF;
694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696: x_return_status := FND_API.G_RET_STS_ERROR;
697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

694: EXCEPTION
695: WHEN FND_API.G_EXC_ERROR THEN
696: x_return_status := FND_API.G_RET_STS_ERROR;
697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
702: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

696: x_return_status := FND_API.G_RET_STS_ERROR;
697: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
698: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
699: WHEN OTHERS THEN
700: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
701: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
702: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
703: END IF;
704: END update_parent_claim;

Line 765: x_return_status := FND_API.G_RET_STS_SUCCESS;

761: i number := 1;
762: BEGIN
763:
764: -- Initialize API return status to sucess
765: x_return_status := FND_API.G_RET_STS_SUCCESS;
766: -- Debug Message
767: IF OZF_DEBUG_LOW_ON THEN
768: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
769: FND_MESSAGE.Set_Token('TEXT',l_full_name||': End');

Line 810: RAISE FND_API.g_exc_error;

806: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
807: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_SPLIT_TOO_BIG');
808: FND_MSG_PUB.ADD;
809: END IF;
810: RAISE FND_API.g_exc_error;
811: END IF;
812:
813: -- Debug Message
814: IF OZF_DEBUG_LOW_ON THEN

Line 821: WHEN FND_API.G_EXC_ERROR THEN

817: FND_MSG_PUB.Add;
818: END IF;
819:
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: WHEN OTHERS THEN

Line 822: x_return_status := FND_API.G_RET_STS_ERROR;

818: END IF;
819:
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: WHEN OTHERS THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

819:
820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: WHEN OTHERS THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

820: EXCEPTION
821: WHEN FND_API.G_EXC_ERROR THEN
822: x_return_status := FND_API.G_RET_STS_ERROR;
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: WHEN OTHERS THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
828: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

822: x_return_status := FND_API.G_RET_STS_ERROR;
823: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
824: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
825: WHEN OTHERS THEN
826: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
827: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
828: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
829: END IF;
830: END Check_Split_Condition;

Line 874: x_return_status := FND_API.G_RET_STS_SUCCESS;

870: --Bug# 7699177 fixed by ateotia(-)
871:
872: BEGIN
873: -- Initialize API return status to sucess
874: x_return_status := FND_API.G_RET_STS_SUCCESS;
875:
876: --Bug# 7699177 fixed by ateotia(+)
877: /*-- split (claim_line_id, object_version_number) pair
878: l_index := INSTR(l_line_string, ',', 1, 2);

Line 900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

896: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
897: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_STR_WRG');
898: FND_MSG_PUB.add;
899: END IF;
900: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
901: ELSE
902: x_line_table(i).claim_line_id := TO_NUMBER(SUBSTR(l_line_string,1, l_temp_index -1));
903: x_line_table(i).object_version_number := TO_NUMBER(SUBSTR(l_line_string, l_temp_index +1));
904: END IF;*/

Line 926: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

922: x_line_table(i).object_version_number := l_object_version_number;
923: --Bug# 7699177 fixed by ateotia(-)
924:
925: EXCEPTION
926: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: WHEN OTHERS THEN
929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
930: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

923: --Bug# 7699177 fixed by ateotia(-)
924:
925: EXCEPTION
926: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: WHEN OTHERS THEN
929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
930: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
931: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');

Line 929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

925: EXCEPTION
926: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
927: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
928: WHEN OTHERS THEN
929: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
930: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
931: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLT_LINE_TBL_ERR');
932: FND_MSG_PUB.add;
933: END IF;

Line 1005: x_return_status := FND_API.G_RET_STS_SUCCESS;

1001: l_line_obj_num number;
1002: BEGIN
1003:
1004: -- Initialize API return status to sucess
1005: x_return_status := FND_API.G_RET_STS_SUCCESS;
1006:
1007: -- Under the following condition, I will create lines with the child amount for the parents.
1008: -- These line information will be stored in the line_table for the child claim.
1009: -- These new lines will be moved to the child claims in a later stage

Line 1073: IF (l_claim_line.quantity is not null AND l_claim_line.quantity <> FND_API.G_MISS_NUM)

1069: l_parent_line.claim_id := l_claim_line.claim_id;
1070: l_parent_line.claim_currency_amount := l_parent_amount_remaining - l_new_split_amount;
1071:
1072: --Bug Fix 3405910
1073: IF (l_claim_line.quantity is not null AND l_claim_line.quantity <> FND_API.G_MISS_NUM)
1074: AND (l_claim_line.rate is not null AND l_claim_line.rate <> FND_API.G_MISS_NUM) THEN
1075: IF mod(l_parent_line.claim_currency_amount , l_claim_line.rate) = 0 THEN
1076: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1077: ELSE

Line 1074: AND (l_claim_line.rate is not null AND l_claim_line.rate <> FND_API.G_MISS_NUM) THEN

1070: l_parent_line.claim_currency_amount := l_parent_amount_remaining - l_new_split_amount;
1071:
1072: --Bug Fix 3405910
1073: IF (l_claim_line.quantity is not null AND l_claim_line.quantity <> FND_API.G_MISS_NUM)
1074: AND (l_claim_line.rate is not null AND l_claim_line.rate <> FND_API.G_MISS_NUM) THEN
1075: IF mod(l_parent_line.claim_currency_amount , l_claim_line.rate) = 0 THEN
1076: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1077: ELSE
1078: --If not a whole number, then clear the parent lines values.

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

1075: IF mod(l_parent_line.claim_currency_amount , l_claim_line.rate) = 0 THEN
1076: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1077: ELSE
1078: --If not a whole number, then clear the parent lines values.
1079: l_parent_line.quantity := fnd_api.g_miss_num;
1080: l_parent_line.rate := fnd_api.g_miss_num;
1081: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1082: END IF;
1083: END IF;

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

1076: l_parent_line.quantity := l_parent_line.claim_currency_amount/l_claim_line.rate;
1077: ELSE
1078: --If not a whole number, then clear the parent lines values.
1079: l_parent_line.quantity := fnd_api.g_miss_num;
1080: l_parent_line.rate := fnd_api.g_miss_num;
1081: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1082: END IF;
1083: END IF;
1084: --End of Bug Fix 3405910

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

1077: ELSE
1078: --If not a whole number, then clear the parent lines values.
1079: l_parent_line.quantity := fnd_api.g_miss_num;
1080: l_parent_line.rate := fnd_api.g_miss_num;
1081: l_parent_line.quantity_uom := fnd_api.g_miss_char;
1082: END IF;
1083: END IF;
1084: --End of Bug Fix 3405910
1085:

Line 1088: ,p_init_msg_list => FND_API.g_false

1084: --End of Bug Fix 3405910
1085:
1086: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1087: p_api_version => 1.0
1088: ,p_init_msg_list => FND_API.g_false
1089: ,p_commit => FND_API.g_false
1090: ,p_validation_level => FND_API.g_valid_level_full
1091: ,x_return_status => l_return_status
1092: ,x_msg_count => l_msg_count

Line 1089: ,p_commit => FND_API.g_false

1085:
1086: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1087: p_api_version => 1.0
1088: ,p_init_msg_list => FND_API.g_false
1089: ,p_commit => FND_API.g_false
1090: ,p_validation_level => FND_API.g_valid_level_full
1091: ,x_return_status => l_return_status
1092: ,x_msg_count => l_msg_count
1093: ,x_msg_data => l_msg_data

Line 1090: ,p_validation_level => FND_API.g_valid_level_full

1086: OZF_CLAIM_LINE_PVT.Update_Claim_Line(
1087: p_api_version => 1.0
1088: ,p_init_msg_list => FND_API.g_false
1089: ,p_commit => FND_API.g_false
1090: ,p_validation_level => FND_API.g_valid_level_full
1091: ,x_return_status => l_return_status
1092: ,x_msg_count => l_msg_count
1093: ,x_msg_data => l_msg_data
1094: ,p_claim_line_rec => l_parent_line

Line 1099: IF l_return_status = FND_API.g_ret_sts_error THEN

1095: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1096: ,x_object_version => l_line_obj_num
1097: );
1098:
1099: IF l_return_status = FND_API.g_ret_sts_error THEN
1100: RAISE FND_API.g_exc_error;
1101: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1102: RAISE FND_API.g_exc_unexpected_error;
1103: END IF;

Line 1100: RAISE FND_API.g_exc_error;

1096: ,x_object_version => l_line_obj_num
1097: );
1098:
1099: IF l_return_status = FND_API.g_ret_sts_error THEN
1100: RAISE FND_API.g_exc_error;
1101: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1102: RAISE FND_API.g_exc_unexpected_error;
1103: END IF;
1104: /*

Line 1101: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1097: );
1098:
1099: IF l_return_status = FND_API.g_ret_sts_error THEN
1100: RAISE FND_API.g_exc_error;
1101: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1102: RAISE FND_API.g_exc_unexpected_error;
1103: END IF;
1104: /*
1105: update ozf_claim_lines_all

Line 1102: RAISE FND_API.g_exc_unexpected_error;

1098:
1099: IF l_return_status = FND_API.g_ret_sts_error THEN
1100: RAISE FND_API.g_exc_error;
1101: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1102: RAISE FND_API.g_exc_unexpected_error;
1103: END IF;
1104: /*
1105: update ozf_claim_lines_all
1106: set claim_currency_amount = l_parent_amount_remaining - l_new_split_amount,

Line 1184: , p_init_msg_list => FND_API.g_false

1180: l_pvt_claim_line.item_type := l_claim_line.item_type;
1181:
1182: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1183: p_api_version => 1.0
1184: , p_init_msg_list => FND_API.g_false
1185: , p_commit => FND_API.g_false
1186: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1187: , x_return_status => l_return_status
1188: , x_msg_data => l_msg_data

Line 1185: , p_commit => FND_API.g_false

1181:
1182: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1183: p_api_version => 1.0
1184: , p_init_msg_list => FND_API.g_false
1185: , p_commit => FND_API.g_false
1186: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1187: , x_return_status => l_return_status
1188: , x_msg_data => l_msg_data
1189: , x_msg_count => l_msg_count

Line 1186: , p_validation_level => FND_API.G_VALID_LEVEL_FULL

1182: Ozf_Claim_Line_Pvt.Create_Claim_Line(
1183: p_api_version => 1.0
1184: , p_init_msg_list => FND_API.g_false
1185: , p_commit => FND_API.g_false
1186: , p_validation_level => FND_API.G_VALID_LEVEL_FULL
1187: , x_return_status => l_return_status
1188: , x_msg_data => l_msg_data
1189: , x_msg_count => l_msg_count
1190: , p_claim_line_rec => l_pvt_claim_line

Line 1194: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1190: , p_claim_line_rec => l_pvt_claim_line
1191: , p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1192: , x_claim_line_id => l_claim_line_id
1193: );
1194: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1195: RAISE FND_API.g_exc_unexpected_error;
1196: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1197: RAISE FND_API.g_exc_unexpected_error;
1198: END IF;

Line 1195: RAISE FND_API.g_exc_unexpected_error;

1191: , p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
1192: , x_claim_line_id => l_claim_line_id
1193: );
1194: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1195: RAISE FND_API.g_exc_unexpected_error;
1196: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1197: RAISE FND_API.g_exc_unexpected_error;
1198: END IF;
1199:

Line 1196: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1192: , x_claim_line_id => l_claim_line_id
1193: );
1194: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1195: RAISE FND_API.g_exc_unexpected_error;
1196: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1197: RAISE FND_API.g_exc_unexpected_error;
1198: END IF;
1199:
1200: --update the l_child_claim_tbl record

Line 1197: RAISE FND_API.g_exc_unexpected_error;

1193: );
1194: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1195: RAISE FND_API.g_exc_unexpected_error;
1196: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1197: RAISE FND_API.g_exc_unexpected_error;
1198: END IF;
1199:
1200: --update the l_child_claim_tbl record
1201: -- line_amount_sum := amount

Line 1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1216:
1217: x_child_claim_tbl := l_child_claim_tbl;
1218:
1219: EXCEPTION
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1222: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1223: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1224: FND_MSG_PUB.add;

Line 1221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1217: x_child_claim_tbl := l_child_claim_tbl;
1218:
1219: EXCEPTION
1220: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1221: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1222: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1223: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1224: FND_MSG_PUB.add;
1225: END IF;

Line 1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1223: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1224: FND_MSG_PUB.add;
1225: END IF;
1226: WHEN OTHERS THEN
1227: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1228: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1229: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AUTSPLT_LINE_ERR');
1230: FND_MSG_PUB.add;
1231: END IF;

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

1249: -- IN OUT and modified the code accordingly.
1250: ----------------------------------------------------------------------
1251: PROCEDURE create_child_claim_tbl (
1252: p_api_version IN NUMBER
1253: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1254: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1255: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1256: ,x_return_status OUT NOCOPY VARCHAR2
1257: ,x_msg_data OUT NOCOPY VARCHAR2

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

1250: ----------------------------------------------------------------------
1251: PROCEDURE create_child_claim_tbl (
1252: p_api_version IN NUMBER
1253: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1254: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1255: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1256: ,x_return_status OUT NOCOPY VARCHAR2
1257: ,x_msg_data OUT NOCOPY VARCHAR2
1258: ,x_msg_count OUT NOCOPY NUMBER

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

1251: PROCEDURE create_child_claim_tbl (
1252: p_api_version IN NUMBER
1253: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1254: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1255: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1256: ,x_return_status OUT NOCOPY VARCHAR2
1257: ,x_msg_data OUT NOCOPY VARCHAR2
1258: ,x_msg_count OUT NOCOPY NUMBER
1259: ,px_child_claim_tbl IN OUT NOCOPY Child_Claim_tbl_type

Line 1296: IF NOT FND_API.Compatible_API_Call (

1292: -- Standard begin of API savepoint
1293: SAVEPOINT Create_Child_Tbl_PVT;
1294:
1295: -- Standard call to check for call compatibility.
1296: IF NOT FND_API.Compatible_API_Call (
1297: l_api_version,
1298: p_api_version,
1299: l_api_name,
1300: G_PKG_NAME)

Line 1302: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1298: p_api_version,
1299: l_api_name,
1300: G_PKG_NAME)
1301: THEN
1302: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1303: END IF;
1304: -- Debug Message
1305: IF OZF_DEBUG_LOW_ON THEN
1306: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 1311: IF FND_API.To_Boolean (p_init_msg_list) THEN

1307: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1308: FND_MSG_PUB.Add;
1309: END IF;
1310: --Initialize message list if p_init_msg_list is TRUE.
1311: IF FND_API.To_Boolean (p_init_msg_list) THEN
1312: FND_MSG_PUB.initialize;
1313: END IF;
1314:
1315:

Line 1317: x_return_status := FND_API.G_RET_STS_SUCCESS;

1313: END IF;
1314:
1315:
1316: -- Initialize API return status to sucess
1317: x_return_status := FND_API.G_RET_STS_SUCCESS;
1318: IF p_mode = 'MANU' THEN
1319: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1320: P_Api_Version_Number => 1.0,
1321: P_Init_Msg_List => FND_API.G_FALSE,

Line 1321: P_Init_Msg_List => FND_API.G_FALSE,

1317: x_return_status := FND_API.G_RET_STS_SUCCESS;
1318: IF p_mode = 'MANU' THEN
1319: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1320: P_Api_Version_Number => 1.0,
1321: P_Init_Msg_List => FND_API.G_FALSE,
1322: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1323: P_Commit => FND_API.G_FALSE,
1324: P_object_id => px_child_claim_tbl(px_child_claim_tbl.count).parent_claim_id,
1325: P_object_type => G_CLAIM_OBJECT_TYPE,

Line 1322: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1318: IF p_mode = 'MANU' THEN
1319: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1320: P_Api_Version_Number => 1.0,
1321: P_Init_Msg_List => FND_API.G_FALSE,
1322: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1323: P_Commit => FND_API.G_FALSE,
1324: P_object_id => px_child_claim_tbl(px_child_claim_tbl.count).parent_claim_id,
1325: P_object_type => G_CLAIM_OBJECT_TYPE,
1326: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

Line 1323: P_Commit => FND_API.G_FALSE,

1319: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1320: P_Api_Version_Number => 1.0,
1321: P_Init_Msg_List => FND_API.G_FALSE,
1322: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1323: P_Commit => FND_API.G_FALSE,
1324: P_object_id => px_child_claim_tbl(px_child_claim_tbl.count).parent_claim_id,
1325: P_object_type => G_CLAIM_OBJECT_TYPE,
1326: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),
1327: X_Return_Status => l_return_status,

Line 1337: RAISE FND_API.G_EXC_ERROR;

1333: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1334: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1335: FND_MSG_PUB.Add;
1336: END IF;
1337: RAISE FND_API.G_EXC_ERROR;
1338: END IF;
1339: END IF;
1340:
1341:

Line 1360: RAISE FND_API.g_exc_error;

1356: THEN
1357: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_POS_AMT_ERR');
1358: FND_MSG_PUB.add;
1359: END IF;
1360: RAISE FND_API.g_exc_error;
1361: END IF;
1362: ELSIF l_claim_class = 'CHARGE'
1363: OR l_claim_class = 'OVERPAYMENT'
1364: THEN

Line 1372: RAISE FND_API.g_exc_error;

1368: THEN
1369: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SPLIT_NEG_AMT_ERR');
1370: FND_MSG_PUB.add;
1371: END IF;
1372: RAISE FND_API.g_exc_error;
1373: END IF;
1374: END IF;
1375: --End of claim amount check.
1376: END LOOP;

Line 1383: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1379: -- automatically split a claim line for the parent, if needed, based on the child information
1380: autosplit_line(p_child_claim_tbl => px_child_claim_tbl,
1381: x_child_claim_tbl => l_x_child_claim_tbl,
1382: x_return_status => l_return_status);
1383: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1384: RAISE FND_API.g_exc_unexpected_error;
1385: END IF;
1386: px_child_claim_tbl := l_x_child_claim_tbl;
1387:

Line 1384: RAISE FND_API.g_exc_unexpected_error;

1380: autosplit_line(p_child_claim_tbl => px_child_claim_tbl,
1381: x_child_claim_tbl => l_x_child_claim_tbl,
1382: x_return_status => l_return_status);
1383: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1384: RAISE FND_API.g_exc_unexpected_error;
1385: END IF;
1386: px_child_claim_tbl := l_x_child_claim_tbl;
1387:
1388: l_new_split_amount := 0;

Line 1399: px_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN

1395: l_child_claim.reason_code_id := px_child_claim_tbl(i).reason_code_id;
1396: l_child_claim.parent_claim_id := px_child_claim_tbl(i).parent_claim_id;
1397:
1398: IF px_child_claim_tbl(i).line_table is not null AND
1399: px_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN
1400: get_line_table (p_line_string => px_child_claim_tbl(i).line_table,
1401: x_line_table => l_line_tbl,
1402: x_return_status => l_return_status
1403: );

Line 1404: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1400: get_line_table (p_line_string => px_child_claim_tbl(i).line_table,
1401: x_line_table => l_line_tbl,
1402: x_return_status => l_return_status
1403: );
1404: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1405: RAISE FND_API.g_exc_unexpected_error;
1406: END IF;
1407: END IF;
1408:

Line 1405: RAISE FND_API.g_exc_unexpected_error;

1401: x_line_table => l_line_tbl,
1402: x_return_status => l_return_status
1403: );
1404: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1405: RAISE FND_API.g_exc_unexpected_error;
1406: END IF;
1407: END IF;
1408:
1409: create_child_claim (

Line 1415: IF l_return_status = FND_API.g_ret_sts_error THEN

1411: ,p_line_tbl => l_line_tbl
1412: ,x_return_status => l_return_status
1413: ,x_child_claim_id => px_child_claim_tbl(i).child_claim_id
1414: );
1415: IF l_return_status = FND_API.g_ret_sts_error THEN
1416: RAISE FND_API.g_exc_error;
1417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1418: RAISE FND_API.g_exc_unexpected_error;
1419: END IF;

Line 1416: RAISE FND_API.g_exc_error;

1412: ,x_return_status => l_return_status
1413: ,x_child_claim_id => px_child_claim_tbl(i).child_claim_id
1414: );
1415: IF l_return_status = FND_API.g_ret_sts_error THEN
1416: RAISE FND_API.g_exc_error;
1417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1418: RAISE FND_API.g_exc_unexpected_error;
1419: END IF;
1420:

Line 1417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1413: ,x_child_claim_id => px_child_claim_tbl(i).child_claim_id
1414: );
1415: IF l_return_status = FND_API.g_ret_sts_error THEN
1416: RAISE FND_API.g_exc_error;
1417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1418: RAISE FND_API.g_exc_unexpected_error;
1419: END IF;
1420:
1421: -- create_child_claim sucessful.

Line 1418: RAISE FND_API.g_exc_unexpected_error;

1414: );
1415: IF l_return_status = FND_API.g_ret_sts_error THEN
1416: RAISE FND_API.g_exc_error;
1417: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1418: RAISE FND_API.g_exc_unexpected_error;
1419: END IF;
1420:
1421: -- create_child_claim sucessful.
1422: -- Reinitialize line table is needed.

Line 1444: IF l_return_status = FND_API.g_ret_sts_error THEN

1440: p_claim => l_parent_claim
1441: ,p_mode => p_mode
1442: ,x_return_status => l_return_status
1443: );
1444: IF l_return_status = FND_API.g_ret_sts_error THEN
1445: RAISE FND_API.g_exc_error;
1446: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1447: RAISE FND_API.g_exc_unexpected_error;
1448: END IF;

Line 1445: RAISE FND_API.g_exc_error;

1441: ,p_mode => p_mode
1442: ,x_return_status => l_return_status
1443: );
1444: IF l_return_status = FND_API.g_ret_sts_error THEN
1445: RAISE FND_API.g_exc_error;
1446: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1447: RAISE FND_API.g_exc_unexpected_error;
1448: END IF;
1449:

Line 1446: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1442: ,x_return_status => l_return_status
1443: );
1444: IF l_return_status = FND_API.g_ret_sts_error THEN
1445: RAISE FND_API.g_exc_error;
1446: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1447: RAISE FND_API.g_exc_unexpected_error;
1448: END IF;
1449:
1450:

Line 1447: RAISE FND_API.g_exc_unexpected_error;

1443: );
1444: IF l_return_status = FND_API.g_ret_sts_error THEN
1445: RAISE FND_API.g_exc_error;
1446: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1447: RAISE FND_API.g_exc_unexpected_error;
1448: END IF;
1449:
1450:
1451: --bug 335704

Line 1459: ,p_init_msg_list => FND_API.G_FALSE

1455: l_temp_claim_rec.object_version_number := px_child_claim_tbl(px_child_claim_tbl.count).parent_object_ver_num;
1456:
1457: OZF_CLAIM_PVT.Create_Claim_History (
1458: p_api_version => l_api_version
1459: ,p_init_msg_list => FND_API.G_FALSE
1460: ,p_commit => FND_API.G_FALSE
1461: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1462: ,x_return_status => l_return_status
1463: ,x_msg_data => l_msg_data

Line 1460: ,p_commit => FND_API.G_FALSE

1456:
1457: OZF_CLAIM_PVT.Create_Claim_History (
1458: p_api_version => l_api_version
1459: ,p_init_msg_list => FND_API.G_FALSE
1460: ,p_commit => FND_API.G_FALSE
1461: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1462: ,x_return_status => l_return_status
1463: ,x_msg_data => l_msg_data
1464: ,x_msg_count => l_msg_count

Line 1461: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

1457: OZF_CLAIM_PVT.Create_Claim_History (
1458: p_api_version => l_api_version
1459: ,p_init_msg_list => FND_API.G_FALSE
1460: ,p_commit => FND_API.G_FALSE
1461: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1462: ,x_return_status => l_return_status
1463: ,x_msg_data => l_msg_data
1464: ,x_msg_count => l_msg_count
1465: ,p_claim => l_temp_claim_rec

Line 1470: IF l_return_status = FND_API.g_ret_sts_error THEN

1466: ,p_event => G_SPLIT_EVENT
1467: ,x_need_to_create => l_temp_need_to_create
1468: ,x_claim_history_id => l_temp_clm_history_id
1469: );
1470: IF l_return_status = FND_API.g_ret_sts_error THEN
1471: RAISE FND_API.g_exc_error;
1472: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1473: RAISE FND_API.g_exc_unexpected_error;
1474: END IF;

Line 1471: RAISE FND_API.g_exc_error;

1467: ,x_need_to_create => l_temp_need_to_create
1468: ,x_claim_history_id => l_temp_clm_history_id
1469: );
1470: IF l_return_status = FND_API.g_ret_sts_error THEN
1471: RAISE FND_API.g_exc_error;
1472: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1473: RAISE FND_API.g_exc_unexpected_error;
1474: END IF;
1475: ELSE

Line 1472: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1468: ,x_claim_history_id => l_temp_clm_history_id
1469: );
1470: IF l_return_status = FND_API.g_ret_sts_error THEN
1471: RAISE FND_API.g_exc_error;
1472: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1473: RAISE FND_API.g_exc_unexpected_error;
1474: END IF;
1475: ELSE
1476: g_history_created := false;

Line 1473: RAISE FND_API.g_exc_unexpected_error;

1469: );
1470: IF l_return_status = FND_API.g_ret_sts_error THEN
1471: RAISE FND_API.g_exc_error;
1472: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1473: RAISE FND_API.g_exc_unexpected_error;
1474: END IF;
1475: ELSE
1476: g_history_created := false;
1477: END IF;

Line 1479: IF FND_API.To_Boolean ( p_commit ) THEN

1475: ELSE
1476: g_history_created := false;
1477: END IF;
1478: --Standard check of commit
1479: IF FND_API.To_Boolean ( p_commit ) THEN
1480: COMMIT WORK;
1481: END IF;
1482:
1483: -- Debug Message

Line 1492: p_encoded => FND_API.G_FALSE,

1488: END IF;
1489:
1490: --Standard call to get message count and if count=1, get the message
1491: FND_MSG_PUB.Count_And_Get (
1492: p_encoded => FND_API.G_FALSE,
1493: p_count => x_msg_count,
1494: p_data => x_msg_data
1495: );
1496: EXCEPTION

Line 1497: WHEN FND_API.G_EXC_ERROR THEN

1493: p_count => x_msg_count,
1494: p_data => x_msg_data
1495: );
1496: EXCEPTION
1497: WHEN FND_API.G_EXC_ERROR THEN
1498: ROLLBACK TO Create_Child_Tbl_PVT;
1499: x_return_status := FND_API.G_RET_STS_ERROR;
1500: -- Standard call to get message count and if count=1, get the message
1501: FND_MSG_PUB.Count_And_Get (

Line 1499: x_return_status := FND_API.G_RET_STS_ERROR;

1495: );
1496: EXCEPTION
1497: WHEN FND_API.G_EXC_ERROR THEN
1498: ROLLBACK TO Create_Child_Tbl_PVT;
1499: x_return_status := FND_API.G_RET_STS_ERROR;
1500: -- Standard call to get message count and if count=1, get the message
1501: FND_MSG_PUB.Count_And_Get (
1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,

Line 1502: p_encoded => FND_API.G_FALSE,

1498: ROLLBACK TO Create_Child_Tbl_PVT;
1499: x_return_status := FND_API.G_RET_STS_ERROR;
1500: -- Standard call to get message count and if count=1, get the message
1501: FND_MSG_PUB.Count_And_Get (
1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data
1505: );
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1502: p_encoded => FND_API.G_FALSE,
1503: p_count => x_msg_count,
1504: p_data => x_msg_data
1505: );
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507: ROLLBACK TO Create_Child_Tbl_PVT;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: -- Standard call to get message count and if count=1, get the message
1510: FND_MSG_PUB.Count_And_Get (

Line 1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1504: p_data => x_msg_data
1505: );
1506: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1507: ROLLBACK TO Create_Child_Tbl_PVT;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: -- Standard call to get message count and if count=1, get the message
1510: FND_MSG_PUB.Count_And_Get (
1511: p_encoded => FND_API.G_FALSE,
1512: p_count => x_msg_count,

Line 1511: p_encoded => FND_API.G_FALSE,

1507: ROLLBACK TO Create_Child_Tbl_PVT;
1508: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1509: -- Standard call to get message count and if count=1, get the message
1510: FND_MSG_PUB.Count_And_Get (
1511: p_encoded => FND_API.G_FALSE,
1512: p_count => x_msg_count,
1513: p_data => x_msg_data
1514: );
1515: WHEN OTHERS THEN

Line 1517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1513: p_data => x_msg_data
1514: );
1515: WHEN OTHERS THEN
1516: ROLLBACK TO Create_Child_Tbl_PVT;
1517: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1518: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1519: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1520: END IF;
1521: -- Standard call to get message count and if count=1, get the message

Line 1523: p_encoded => FND_API.G_FALSE,

1519: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1520: END IF;
1521: -- Standard call to get message count and if count=1, get the message
1522: FND_MSG_PUB.Count_And_Get (
1523: p_encoded => FND_API.G_FALSE,
1524: p_count => x_msg_count,
1525: p_data => x_msg_data
1526: );
1527: END create_child_claim_tbl;

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

1540: -- NOTES
1541: ----------------------------------------------------------------------
1542: PROCEDURE update_child_claim_tbl (
1543: p_api_version IN NUMBER
1544: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1545: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1546: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1547: ,x_return_status OUT NOCOPY VARCHAR2
1548: ,x_msg_data OUT NOCOPY VARCHAR2

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

1541: ----------------------------------------------------------------------
1542: PROCEDURE update_child_claim_tbl (
1543: p_api_version IN NUMBER
1544: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1545: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1546: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1547: ,x_return_status OUT NOCOPY VARCHAR2
1548: ,x_msg_data OUT NOCOPY VARCHAR2
1549: ,x_msg_count OUT NOCOPY NUMBER

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

1542: PROCEDURE update_child_claim_tbl (
1543: p_api_version IN NUMBER
1544: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
1545: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
1546: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
1547: ,x_return_status OUT NOCOPY VARCHAR2
1548: ,x_msg_data OUT NOCOPY VARCHAR2
1549: ,x_msg_count OUT NOCOPY NUMBER
1550: ,p_child_claim_tbl IN Child_Claim_tbl_type

Line 1578: IF NOT FND_API.Compatible_API_Call (

1574: -- Standard begin of API savepoint
1575: SAVEPOINT Update_Child_Tbl_PVT;
1576:
1577: -- Standard call to check for call compatibility.
1578: IF NOT FND_API.Compatible_API_Call (
1579: l_api_version,
1580: p_api_version,
1581: l_api_name,
1582: G_PKG_NAME)

Line 1584: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1580: p_api_version,
1581: l_api_name,
1582: G_PKG_NAME)
1583: THEN
1584: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1585: END IF;
1586: -- Debug Message
1587: IF OZF_DEBUG_LOW_ON THEN
1588: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 1593: IF FND_API.To_Boolean (p_init_msg_list) THEN

1589: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
1590: FND_MSG_PUB.Add;
1591: END IF;
1592: --Initialize message list if p_init_msg_list is TRUE.
1593: IF FND_API.To_Boolean (p_init_msg_list) THEN
1594: FND_MSG_PUB.initialize;
1595: END IF;
1596:
1597: -- Initialize API return status to sucess

Line 1598: x_return_status := FND_API.G_RET_STS_SUCCESS;

1594: FND_MSG_PUB.initialize;
1595: END IF;
1596:
1597: -- Initialize API return status to sucess
1598: x_return_status := FND_API.G_RET_STS_SUCCESS;
1599:
1600: IF p_mode = 'MANU' THEN
1601: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1602: P_Api_Version_Number => 1.0,

Line 1603: P_Init_Msg_List => FND_API.G_FALSE,

1599:
1600: IF p_mode = 'MANU' THEN
1601: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1602: P_Api_Version_Number => 1.0,
1603: P_Init_Msg_List => FND_API.G_FALSE,
1604: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1605: P_Commit => FND_API.G_FALSE,
1606: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1607: P_object_type => G_CLAIM_OBJECT_TYPE,

Line 1604: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1600: IF p_mode = 'MANU' THEN
1601: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1602: P_Api_Version_Number => 1.0,
1603: P_Init_Msg_List => FND_API.G_FALSE,
1604: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1605: P_Commit => FND_API.G_FALSE,
1606: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1607: P_object_type => G_CLAIM_OBJECT_TYPE,
1608: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

Line 1605: P_Commit => FND_API.G_FALSE,

1601: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
1602: P_Api_Version_Number => 1.0,
1603: P_Init_Msg_List => FND_API.G_FALSE,
1604: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1605: P_Commit => FND_API.G_FALSE,
1606: P_object_id => p_child_claim_tbl(p_child_claim_tbl.count).parent_claim_id,
1607: P_object_type => G_CLAIM_OBJECT_TYPE,
1608: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),
1609: X_Return_Status => l_return_status,

Line 1619: RAISE FND_API.G_EXC_ERROR;

1615: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
1616: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
1617: FND_MSG_PUB.Add;
1618: END IF;
1619: RAISE FND_API.G_EXC_ERROR;
1620: END IF;
1621: END IF;
1622:
1623:

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

1630: l_child_claim.reason_code_id := p_child_claim_tbl(i).reason_code_id;
1631: l_child_claim.parent_claim_id := p_child_claim_tbl(i).parent_claim_id;
1632:
1633: IF p_child_claim_tbl(i).line_table is not null AND
1634: p_child_claim_tbl(i).line_table <> FND_API.G_MISS_CHAR THEN
1635: get_line_table (p_line_string => p_child_claim_tbl(i).line_table,
1636: x_line_table => l_line_tbl,
1637: x_return_status => l_return_status
1638: );

Line 1639: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1635: get_line_table (p_line_string => p_child_claim_tbl(i).line_table,
1636: x_line_table => l_line_tbl,
1637: x_return_status => l_return_status
1638: );
1639: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1640: RAISE FND_API.g_exc_unexpected_error;
1641: END IF;
1642: END IF;
1643: update_child_claim (

Line 1640: RAISE FND_API.g_exc_unexpected_error;

1636: x_line_table => l_line_tbl,
1637: x_return_status => l_return_status
1638: );
1639: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1640: RAISE FND_API.g_exc_unexpected_error;
1641: END IF;
1642: END IF;
1643: update_child_claim (
1644: p_claim => l_child_claim

Line 1649: IF l_return_status = FND_API.g_ret_sts_error THEN

1645: ,p_line_tbl => l_line_tbl
1646: ,x_return_status => l_return_status
1647: ,x_new_claim_amount => l_new_child_claim_amount
1648: );
1649: IF l_return_status = FND_API.g_ret_sts_error THEN
1650: RAISE FND_API.g_exc_error;
1651: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;

Line 1650: RAISE FND_API.g_exc_error;

1646: ,x_return_status => l_return_status
1647: ,x_new_claim_amount => l_new_child_claim_amount
1648: );
1649: IF l_return_status = FND_API.g_ret_sts_error THEN
1650: RAISE FND_API.g_exc_error;
1651: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;
1654:

Line 1651: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1647: ,x_new_claim_amount => l_new_child_claim_amount
1648: );
1649: IF l_return_status = FND_API.g_ret_sts_error THEN
1650: RAISE FND_API.g_exc_error;
1651: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;
1654:
1655: -- create_child_claim sucessful.

Line 1652: RAISE FND_API.g_exc_unexpected_error;

1648: );
1649: IF l_return_status = FND_API.g_ret_sts_error THEN
1650: RAISE FND_API.g_exc_error;
1651: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1652: RAISE FND_API.g_exc_unexpected_error;
1653: END IF;
1654:
1655: -- create_child_claim sucessful.
1656:

Line 1676: IF l_return_status = FND_API.g_ret_sts_error THEN

1672: p_claim => l_parent_claim
1673: ,p_mode => p_mode
1674: ,x_return_status => l_return_status
1675: );
1676: IF l_return_status = FND_API.g_ret_sts_error THEN
1677: RAISE FND_API.g_exc_error;
1678: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1679: RAISE FND_API.g_exc_unexpected_error;
1680: END IF;

Line 1677: RAISE FND_API.g_exc_error;

1673: ,p_mode => p_mode
1674: ,x_return_status => l_return_status
1675: );
1676: IF l_return_status = FND_API.g_ret_sts_error THEN
1677: RAISE FND_API.g_exc_error;
1678: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1679: RAISE FND_API.g_exc_unexpected_error;
1680: END IF;
1681:

Line 1678: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1674: ,x_return_status => l_return_status
1675: );
1676: IF l_return_status = FND_API.g_ret_sts_error THEN
1677: RAISE FND_API.g_exc_error;
1678: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1679: RAISE FND_API.g_exc_unexpected_error;
1680: END IF;
1681:
1682: --bug 3357204

Line 1679: RAISE FND_API.g_exc_unexpected_error;

1675: );
1676: IF l_return_status = FND_API.g_ret_sts_error THEN
1677: RAISE FND_API.g_exc_error;
1678: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1679: RAISE FND_API.g_exc_unexpected_error;
1680: END IF;
1681:
1682: --bug 3357204
1683: -- create claim history if needed

Line 1690: ,p_init_msg_list => FND_API.G_FALSE

1686: l_temp_claim_rec.object_version_number := p_child_claim_tbl(p_child_claim_tbl.count).parent_object_ver_num;
1687:
1688: OZF_CLAIM_PVT.Create_Claim_History (
1689: p_api_version => l_api_version
1690: ,p_init_msg_list => FND_API.G_FALSE
1691: ,p_commit => FND_API.G_FALSE
1692: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1693: ,x_return_status => l_return_status
1694: ,x_msg_data => l_msg_data

Line 1691: ,p_commit => FND_API.G_FALSE

1687:
1688: OZF_CLAIM_PVT.Create_Claim_History (
1689: p_api_version => l_api_version
1690: ,p_init_msg_list => FND_API.G_FALSE
1691: ,p_commit => FND_API.G_FALSE
1692: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1693: ,x_return_status => l_return_status
1694: ,x_msg_data => l_msg_data
1695: ,x_msg_count => l_msg_count

Line 1692: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

1688: OZF_CLAIM_PVT.Create_Claim_History (
1689: p_api_version => l_api_version
1690: ,p_init_msg_list => FND_API.G_FALSE
1691: ,p_commit => FND_API.G_FALSE
1692: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
1693: ,x_return_status => l_return_status
1694: ,x_msg_data => l_msg_data
1695: ,x_msg_count => l_msg_count
1696: ,p_claim => l_temp_claim_rec

Line 1705: IF FND_API.To_Boolean ( p_commit ) THEN

1701: g_history_created := true;
1702: END IF;
1703:
1704: --Standard check of commit
1705: IF FND_API.To_Boolean ( p_commit ) THEN
1706: COMMIT WORK;
1707: END IF;
1708:
1709: -- Debug Message

Line 1718: p_encoded => FND_API.G_FALSE,

1714: END IF;
1715:
1716: --Standard call to get message count and if count=1, get the message
1717: FND_MSG_PUB.Count_And_Get (
1718: p_encoded => FND_API.G_FALSE,
1719: p_count => x_msg_count,
1720: p_data => x_msg_data
1721: );
1722: EXCEPTION

Line 1723: WHEN FND_API.G_EXC_ERROR THEN

1719: p_count => x_msg_count,
1720: p_data => x_msg_data
1721: );
1722: EXCEPTION
1723: WHEN FND_API.G_EXC_ERROR THEN
1724: ROLLBACK TO Update_Child_Tbl_PVT;
1725: x_return_status := FND_API.G_RET_STS_ERROR;
1726: -- Standard call to get message count and if count=1, get the message
1727: FND_MSG_PUB.Count_And_Get (

Line 1725: x_return_status := FND_API.G_RET_STS_ERROR;

1721: );
1722: EXCEPTION
1723: WHEN FND_API.G_EXC_ERROR THEN
1724: ROLLBACK TO Update_Child_Tbl_PVT;
1725: x_return_status := FND_API.G_RET_STS_ERROR;
1726: -- Standard call to get message count and if count=1, get the message
1727: FND_MSG_PUB.Count_And_Get (
1728: p_encoded => FND_API.G_FALSE,
1729: p_count => x_msg_count,

Line 1728: p_encoded => FND_API.G_FALSE,

1724: ROLLBACK TO Update_Child_Tbl_PVT;
1725: x_return_status := FND_API.G_RET_STS_ERROR;
1726: -- Standard call to get message count and if count=1, get the message
1727: FND_MSG_PUB.Count_And_Get (
1728: p_encoded => FND_API.G_FALSE,
1729: p_count => x_msg_count,
1730: p_data => x_msg_data
1731: );
1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1728: p_encoded => FND_API.G_FALSE,
1729: p_count => x_msg_count,
1730: p_data => x_msg_data
1731: );
1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1733: ROLLBACK TO Update_Child_Tbl_PVT;
1734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1735: -- Standard call to get message count and if count=1, get the message
1736: FND_MSG_PUB.Count_And_Get (

Line 1734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1730: p_data => x_msg_data
1731: );
1732: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1733: ROLLBACK TO Update_Child_Tbl_PVT;
1734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1735: -- Standard call to get message count and if count=1, get the message
1736: FND_MSG_PUB.Count_And_Get (
1737: p_encoded => FND_API.G_FALSE,
1738: p_count => x_msg_count,

Line 1737: p_encoded => FND_API.G_FALSE,

1733: ROLLBACK TO Update_Child_Tbl_PVT;
1734: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1735: -- Standard call to get message count and if count=1, get the message
1736: FND_MSG_PUB.Count_And_Get (
1737: p_encoded => FND_API.G_FALSE,
1738: p_count => x_msg_count,
1739: p_data => x_msg_data
1740: );
1741: WHEN OTHERS THEN

Line 1743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1739: p_data => x_msg_data
1740: );
1741: WHEN OTHERS THEN
1742: ROLLBACK TO Update_Child_Tbl_PVT;
1743: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1744: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1745: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1746: END IF;
1747: -- Standard call to get message count and if count=1, get the message

Line 1749: p_encoded => FND_API.G_FALSE,

1745: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
1746: END IF;
1747: -- Standard call to get message count and if count=1, get the message
1748: FND_MSG_PUB.Count_And_Get (
1749: p_encoded => FND_API.G_FALSE,
1750: p_count => x_msg_count,
1751: p_data => x_msg_data
1752: );
1753: END update_child_claim_tbl;