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.

APPS.OZF_CLAIM_GRP dependencies on FND_API

Line 263: x_return_status := FND_API.G_RET_STS_SUCCESS;

259: l_tot_child_amt NUMBER;
260: BEGIN
261: Write_Log(l_full_name, 'start');
262:
263: x_return_status := FND_API.G_RET_STS_SUCCESS;
264: -- Now sync the amount_adjusted for each parent
265: FOR ref_parent_claim IN parent_claim_csr(l_deduction_rec.claim_id)
266: LOOP
267: OPEN child_claim_csr(ref_parent_claim.claim_id);

Line 292: p_init_msg_list => FND_API.G_FALSE,

288:
289: --Call Update_Claim to reflect the changes.
290: OZF_claim_PVT.Update_claim(
291: p_api_version => 1.0,
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 => x_msg_count,

Line 293: p_commit => FND_API.G_FALSE,

289: --Call Update_Claim to reflect the changes.
290: OZF_claim_PVT.Update_claim(
291: p_api_version => 1.0,
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 => x_msg_count,
297: x_msg_data => x_msg_data,

Line 294: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

290: OZF_claim_PVT.Update_claim(
291: p_api_version => 1.0,
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 => x_msg_count,
297: x_msg_data => x_msg_data,
298: p_claim => l_pvt_claim_Rec,

Line 303: IF l_return_status = FND_API.G_RET_STS_ERROR then

299: p_event => G_SUBSEQUENT_APPLY_EVENT, --G_UPDATE_EVENT
300: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
301: x_object_version_number => l_object_version_number
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: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
301: x_object_version_number => l_object_version_number
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:

Line 305: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

301: x_object_version_number => l_object_version_number
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:
309: Write_log(l_full_name,l_notes);

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:
309: Write_log(l_full_name,l_notes);
310: JTF_NOTES_PUB.create_note(

Line 332: WHEN FND_API.G_EXC_ERROR THEN

328: END IF;
329: END LOOP; -- Now sync the amount_adjusted for each parent
330: Write_Log(l_full_name, 'end');
331: EXCEPTION
332: WHEN FND_API.G_EXC_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_ERROR;
334: -- Standard call to get message count and if count=1, get the message
335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
336: ,p_count => x_msg_count

Line 333: x_return_status := FND_API.G_RET_STS_ERROR;

329: END LOOP; -- Now sync the amount_adjusted for each parent
330: Write_Log(l_full_name, 'end');
331: EXCEPTION
332: WHEN FND_API.G_EXC_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_ERROR;
334: -- Standard call to get message count and if count=1, get the message
335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
336: ,p_count => x_msg_count
337: ,p_data => x_msg_data

Line 335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

331: EXCEPTION
332: WHEN FND_API.G_EXC_ERROR THEN
333: x_return_status := FND_API.G_RET_STS_ERROR;
334: -- Standard call to get message count and if count=1, get the message
335: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
336: ,p_count => x_msg_count
337: ,p_data => x_msg_data
338: );
339:

Line 340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

336: ,p_count => x_msg_count
337: ,p_data => x_msg_data
338: );
339:
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: -- Standard call to get message count and if count=1, get the message
343: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
344: ,p_count => x_msg_count

Line 341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

337: ,p_data => x_msg_data
338: );
339:
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: -- Standard call to get message count and if count=1, get the message
343: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
344: ,p_count => x_msg_count
345: ,p_data => x_msg_data

Line 343: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

339:
340: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
341: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
342: -- Standard call to get message count and if count=1, get the message
343: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
344: ,p_count => x_msg_count
345: ,p_data => x_msg_data
346: );
347:

Line 349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

345: ,p_data => x_msg_data
346: );
347:
348: WHEN OTHERS THEN
349: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
350: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
351: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
352: FND_MSG_PUB.add;
353: END IF;

Line 355: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

351: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
352: FND_MSG_PUB.add;
353: END IF;
354: -- Standard call to get message count and if count=1, get the message
355: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
356: ,p_count => x_msg_count
357: ,p_data => x_msg_data
358: );
359: END update_parent_amounts;

Line 371: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

367:
368: -- PARAMETERS:
369: -- IN:
370: -- p_api_version_number IN NUMBER Required
371: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
372: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
373: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
374: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
375: --

Line 372: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

368: -- PARAMETERS:
369: -- IN:
370: -- p_api_version_number IN NUMBER Required
371: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
372: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
373: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
374: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
375: --
376: -- OUT:

Line 373: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

369: -- IN:
370: -- p_api_version_number IN NUMBER Required
371: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
372: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
373: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
374: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
375: --
376: -- OUT:
377: -- x_return_status OUT VARCHAR2

Line 406: x_return_status := FND_API.G_RET_STS_SUCCESS;

402: x_claim_reason_name VARCHAR2(80);
403:
404: BEGIN
405: -- Initialize API return status to SUCCESS
406: x_return_status := FND_API.G_RET_STS_SUCCESS;
407:
408: OZF_CLAIM_GRP.Create_Deduction(
409: p_api_version_number,
410: p_init_msg_list,

Line 425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

421: );
422:
423: EXCEPTION
424: WHEN OTHERS THEN
425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
426: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
427: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
428: FND_MSG_PUB.add;
429: END IF;

Line 432: p_encoded => FND_API.G_FALSE,

428: FND_MSG_PUB.add;
429: END IF;
430: -- Standard call to get message count and if count=1, get the message
431: FND_MSG_PUB.Count_And_Get (
432: p_encoded => FND_API.G_FALSE,
433: p_count => x_msg_count,
434: p_data => x_msg_data
435: );
436: End Create_Deduction;

Line 453: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

449: --
450: -- PARAMETERS:
451: -- IN
452: -- p_api_version_number IN NUMBER Required
453: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
454: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
455: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
456: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
457: --

Line 454: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

450: -- PARAMETERS:
451: -- IN
452: -- p_api_version_number IN NUMBER Required
453: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
454: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
455: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
456: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
457: --
458: -- OUT:

Line 455: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

451: -- IN
452: -- p_api_version_number IN NUMBER Required
453: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
454: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
455: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
456: -- P_deduction_Rec IN DEDUCTION_REC_TYPE Required
457: --
458: -- OUT:
459: -- x_return_status OUT NOCOPY VARCHAR2

Line 534: IF NOT FND_API.Compatible_API_Call ( l_api_version,

530:
531: Write_Log(l_full_name, 'start');
532:
533: -- Standard call to check for call compatibility.
534: IF NOT FND_API.Compatible_API_Call ( l_api_version,
535: p_api_version_number,
536: l_api_name,
537: G_PKG_NAME)
538: THEN

Line 539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

535: p_api_version_number,
536: l_api_name,
537: G_PKG_NAME)
538: THEN
539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541:
542: -- Initialize message list if p_init_msg_list is set to TRUE.
543: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 543: IF FND_API.to_Boolean( p_init_msg_list ) THEN

539: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
540: END IF;
541:
542: -- Initialize message list if p_init_msg_list is set to TRUE.
543: IF FND_API.to_Boolean( p_init_msg_list ) THEN
544: FND_MSG_PUB.initialize;
545: END IF;
546:
547: -- Initialize API return status to SUCCESS

Line 548: x_return_status := FND_API.G_RET_STS_SUCCESS;

544: FND_MSG_PUB.initialize;
545: END IF;
546:
547: -- Initialize API return status to SUCCESS
548: x_return_status := FND_API.G_RET_STS_SUCCESS;
549:
550: ------------------------- start -------------------------------
551:
552: -----------------------------

Line 610: p_init_msg_list => FND_API.G_FALSE,

606:
607: -- Get default value of assignment manager for a deduction record
608: OZF_ASSIGNMENT_QUALIFIER_PUB.Get_Deduction_Value(
609: p_api_version_number => l_api_version,
610: p_init_msg_list => FND_API.G_FALSE,
611: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
612: p_commit => FND_API.G_FALSE,
613: x_return_status => l_return_status,
614: x_msg_count => x_msg_count,

Line 611: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

607: -- Get default value of assignment manager for a deduction record
608: OZF_ASSIGNMENT_QUALIFIER_PUB.Get_Deduction_Value(
609: p_api_version_number => l_api_version,
610: p_init_msg_list => FND_API.G_FALSE,
611: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
612: p_commit => FND_API.G_FALSE,
613: x_return_status => l_return_status,
614: x_msg_count => x_msg_count,
615: x_msg_data => x_msg_data,

Line 612: p_commit => FND_API.G_FALSE,

608: OZF_ASSIGNMENT_QUALIFIER_PUB.Get_Deduction_Value(
609: p_api_version_number => l_api_version,
610: p_init_msg_list => FND_API.G_FALSE,
611: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
612: p_commit => FND_API.G_FALSE,
613: x_return_status => l_return_status,
614: x_msg_count => x_msg_count,
615: x_msg_data => x_msg_data,
616: p_deduction => l_qual_deduction_rec,

Line 619: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

615: x_msg_data => x_msg_data,
616: p_deduction => l_qual_deduction_rec,
617: x_qualifier => l_qualifier
618: );
619: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;

Line 620: RAISE FND_API.G_EXC_ERROR;

616: p_deduction => l_qual_deduction_rec,
617: x_qualifier => l_qualifier
618: );
619: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:

Line 621: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

617: x_qualifier => l_qualifier
618: );
619: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:
625: -- assigned the changed values.

Line 622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

618: );
619: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
620: RAISE FND_API.G_EXC_ERROR;
621: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
622: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
623: END IF;
624:
625: -- assigned the changed values.
626: l_deduction_rec.claim_date := l_qualifier.claim_date;

Line 660: RAISE FND_API.g_exc_error;

656: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
657: FND_MESSAGE.Set_Name('OZF','OZF_REQUIRED_FIELDS_MISSING');
658: FND_MSG_PUB.Add;
659: END IF;
660: RAISE FND_API.g_exc_error;
661: ELSIF l_deduction_rec.source_object_id IS NOT NULL AND
662: l_deduction_rec.source_object_type_id IS NULL THEN
663: -- source_object_type_id is required for transaction-related deduction.
664: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

Line 668: RAISE FND_API.g_exc_error;

664: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
665: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SRC_INFO_MISSING');
666: FND_MSG_PUB.add;
667: END IF;
668: RAISE FND_API.g_exc_error;
669: END IF;
670:
671: ------------------------------------------
672: -- 3. Default and derive column valude --

Line 786: p_init_msg_list => FND_API.g_false,

782: -- 5. Check claim common element thought private api --
783: -------------------------------------------------------
784: OZF_CLAIM_PVT.Check_Claim_Common_Element (
785: p_api_version => l_api_version,
786: p_init_msg_list => FND_API.g_false,
787: p_validation_level => FND_API.g_valid_level_full,
788: x_return_status => l_return_status,
789: x_msg_count => x_msg_count,
790: x_msg_data => x_msg_data,

Line 787: p_validation_level => FND_API.g_valid_level_full,

783: -------------------------------------------------------
784: OZF_CLAIM_PVT.Check_Claim_Common_Element (
785: p_api_version => l_api_version,
786: p_init_msg_list => FND_API.g_false,
787: p_validation_level => FND_API.g_valid_level_full,
788: x_return_status => l_return_status,
789: x_msg_count => x_msg_count,
790: x_msg_data => x_msg_data,
791: p_claim => l_pvt_claim_rec,

Line 794: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

790: x_msg_data => x_msg_data,
791: p_claim => l_pvt_claim_rec,
792: x_claim => l_cre_claim_rec
793: );
794: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;

Line 795: RAISE FND_API.G_EXC_ERROR;

791: p_claim => l_pvt_claim_rec,
792: x_claim => l_cre_claim_rec
793: );
794: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:

Line 796: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

792: x_claim => l_cre_claim_rec
793: );
794: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
800: -------------------------------------------------------

Line 797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

793: );
794: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
795: RAISE FND_API.G_EXC_ERROR;
796: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
797: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
798: END IF;
799:
800: -------------------------------------------------------
801: -- 6. Create claim

Line 805: p_init_msg_list => FND_API.g_false,

801: -- 6. Create claim
802: -------------------------------------------------------
803: OZF_CLAIM_PVT.Create_Claim(
804: p_api_version => l_api_version,
805: p_init_msg_list => FND_API.g_false,
806: p_commit => FND_API.g_false,
807: p_validation_level => FND_API.g_valid_level_full,
808: x_return_status => l_return_status,
809: x_msg_count => x_msg_count,

Line 806: p_commit => FND_API.g_false,

802: -------------------------------------------------------
803: OZF_CLAIM_PVT.Create_Claim(
804: p_api_version => l_api_version,
805: p_init_msg_list => FND_API.g_false,
806: p_commit => FND_API.g_false,
807: p_validation_level => FND_API.g_valid_level_full,
808: x_return_status => l_return_status,
809: x_msg_count => x_msg_count,
810: x_msg_data => x_msg_data,

Line 807: p_validation_level => FND_API.g_valid_level_full,

803: OZF_CLAIM_PVT.Create_Claim(
804: p_api_version => l_api_version,
805: p_init_msg_list => FND_API.g_false,
806: p_commit => FND_API.g_false,
807: p_validation_level => FND_API.g_valid_level_full,
808: x_return_status => l_return_status,
809: x_msg_count => x_msg_count,
810: x_msg_data => x_msg_data,
811: p_claim => l_cre_claim_rec,

Line 815: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

811: p_claim => l_cre_claim_rec,
812: x_claim_id => x_claim_id
813: );
814: -- Check return status from the above procedure call
815: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
816: RAISE FND_API.G_EXC_ERROR;
817: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
818: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
819: END IF;

Line 816: RAISE FND_API.G_EXC_ERROR;

812: x_claim_id => x_claim_id
813: );
814: -- Check return status from the above procedure call
815: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
816: RAISE FND_API.G_EXC_ERROR;
817: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
818: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
819: END IF;
820:

Line 817: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

813: );
814: -- Check return status from the above procedure call
815: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
816: RAISE FND_API.G_EXC_ERROR;
817: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
818: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
819: END IF;
820:
821: -------------------------------------------------------

Line 818: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

814: -- Check return status from the above procedure call
815: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
816: RAISE FND_API.G_EXC_ERROR;
817: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
818: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
819: END IF;
820:
821: -------------------------------------------------------
822: -- 7. Assign value to OUT parameters

Line 852: p_init_msg_list => FND_API.g_false,

848: -- 9. Create claim line
849: -------------------------------------------------------
850: OZF_CLAIM_Line_PVT.Create_Claim_Line(
851: p_api_version => l_api_version,
852: p_init_msg_list => FND_API.g_false,
853: p_commit => FND_API.g_false,
854: p_validation_level => FND_API.g_valid_level_full,
855: x_return_status => l_return_status,
856: x_msg_count => x_msg_count,

Line 853: p_commit => FND_API.g_false,

849: -------------------------------------------------------
850: OZF_CLAIM_Line_PVT.Create_Claim_Line(
851: p_api_version => l_api_version,
852: p_init_msg_list => FND_API.g_false,
853: p_commit => FND_API.g_false,
854: p_validation_level => FND_API.g_valid_level_full,
855: x_return_status => l_return_status,
856: x_msg_count => x_msg_count,
857: x_msg_data => x_msg_data,

Line 854: p_validation_level => FND_API.g_valid_level_full,

850: OZF_CLAIM_Line_PVT.Create_Claim_Line(
851: p_api_version => l_api_version,
852: p_init_msg_list => FND_API.g_false,
853: p_commit => FND_API.g_false,
854: p_validation_level => FND_API.g_valid_level_full,
855: x_return_status => l_return_status,
856: x_msg_count => x_msg_count,
857: x_msg_data => x_msg_data,
858: p_claim_line_rec => l_claim_line_rec,

Line 861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

857: x_msg_data => x_msg_data,
858: p_claim_line_rec => l_claim_line_rec,
859: x_claim_line_id => l_dummy_number
860: );
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: END IF;

Line 862: RAISE FND_API.G_EXC_ERROR;

858: p_claim_line_rec => l_claim_line_rec,
859: x_claim_line_id => l_dummy_number
860: );
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: END IF;
866:

Line 863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

859: x_claim_line_id => l_dummy_number
860: );
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: END IF;
866:
867: ------------------------- finish -------------------------------

Line 864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

860: );
861: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
862: RAISE FND_API.G_EXC_ERROR;
863: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
864: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
865: END IF;
866:
867: ------------------------- finish -------------------------------
868: Write_Log(l_full_name, 'end');

Line 872: IF FND_API.to_Boolean(p_commit) THEN

868: Write_Log(l_full_name, 'end');
869:
870:
871: -- Standard check for p_commit
872: IF FND_API.to_Boolean(p_commit) THEN
873: COMMIT WORK;
874: END IF;
875:
876: -- Debug Message

Line 890: WHEN FND_API.G_EXC_ERROR THEN

886: p_data => x_msg_data
887: );
888:
889: EXCEPTION
890: WHEN FND_API.G_EXC_ERROR THEN
891: ROLLBACK TO CREATE_CLAIM_GRP;
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: FND_MSG_PUB.Count_And_Get (
894: p_encoded => FND_API.G_FALSE,

Line 892: x_return_status := FND_API.G_RET_STS_ERROR;

888:
889: EXCEPTION
890: WHEN FND_API.G_EXC_ERROR THEN
891: ROLLBACK TO CREATE_CLAIM_GRP;
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: FND_MSG_PUB.Count_And_Get (
894: p_encoded => FND_API.G_FALSE,
895: p_count => x_msg_count,
896: p_data => x_msg_data

Line 894: p_encoded => FND_API.G_FALSE,

890: WHEN FND_API.G_EXC_ERROR THEN
891: ROLLBACK TO CREATE_CLAIM_GRP;
892: x_return_status := FND_API.G_RET_STS_ERROR;
893: FND_MSG_PUB.Count_And_Get (
894: p_encoded => FND_API.G_FALSE,
895: p_count => x_msg_count,
896: p_data => x_msg_data
897: );
898:

Line 899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

895: p_count => x_msg_count,
896: p_data => x_msg_data
897: );
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: ROLLBACK TO CREATE_CLAIM_GRP;
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
902: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
903: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');

Line 901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

897: );
898:
899: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
900: ROLLBACK TO CREATE_CLAIM_GRP;
901: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
902: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
903: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
904: FND_MSG_PUB.add;
905: END IF;

Line 907: p_encoded => FND_API.G_FALSE,

903: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
904: FND_MSG_PUB.add;
905: END IF;
906: FND_MSG_PUB.Count_And_Get (
907: p_encoded => FND_API.G_FALSE,
908: p_count => x_msg_count,
909: p_data => x_msg_data
910: );
911:

Line 914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

910: );
911:
912: WHEN OTHERS THEN
913: ROLLBACK TO CREATE_CLAIM_GRP;
914: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
915: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
916: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
917: FND_MSG_PUB.add;
918: END IF;

Line 920: p_encoded => FND_API.G_FALSE,

916: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CRE_DEDU_ERR');
917: FND_MSG_PUB.add;
918: END IF;
919: FND_MSG_PUB.Count_And_Get (
920: p_encoded => FND_API.G_FALSE,
921: p_count => x_msg_count,
922: p_data => x_msg_data
923: );
924:

Line 993: x_return_status := FND_API.G_RET_STS_SUCCESS;

989: BEGIN
990: --------------------- initialize -----------------------
991: Write_Log(l_full_name, 'start');
992:
993: x_return_status := FND_API.G_RET_STS_SUCCESS;
994:
995:
996:
997: l_ar_receipt_amount := l_deduction_rec.amount_applied;

Line 1074: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN

1070: END IF; --- l_root_amount > 0
1071:
1072:
1073: IF l_deduction_rec.source_object_id IS NOT NULL AND
1074: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN
1075: -- Build Notes :for transaction releated deduction
1076:
1077: IF l_deduction_rec.receipt_number <> ref_split_claim_csr.receipt_number THEN
1078: l_notes := l_notes||' Receipt Reference is Changed '||

Line 1153: WHEN FND_API.G_EXC_ERROR THEN

1149:
1150: Write_Log(l_full_name, 'end');
1151:
1152: EXCEPTION
1153: WHEN FND_API.G_EXC_ERROR THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155: WHEN OTHERS THEN
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157: FND_MESSAGE.set_name('OZF', 'OZF_API_DEBUG_MESSAGE');

Line 1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1150: Write_Log(l_full_name, 'end');
1151:
1152: EXCEPTION
1153: WHEN FND_API.G_EXC_ERROR THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155: WHEN OTHERS THEN
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157: FND_MESSAGE.set_name('OZF', 'OZF_API_DEBUG_MESSAGE');
1158: FND_MESSAGE.set_token('TEXT', l_full_name||'An error happened in '||l_full_name);

Line 1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1152: EXCEPTION
1153: WHEN FND_API.G_EXC_ERROR THEN
1154: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1155: WHEN OTHERS THEN
1156: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1157: FND_MESSAGE.set_name('OZF', 'OZF_API_DEBUG_MESSAGE');
1158: FND_MESSAGE.set_token('TEXT', l_full_name||'An error happened in '||l_full_name);
1159: FND_MSG_PUB.add;
1160:

Line 1174: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

1170: --
1171: -- PARAMETERS:
1172: -- IN:
1173: -- p_api_version_number IN NUMBER Required
1174: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1175: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1176: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1177: -- P_deduction IN DEDUCTION_REC_TYPE Required
1178: --

Line 1175: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

1171: -- PARAMETERS:
1172: -- IN:
1173: -- p_api_version_number IN NUMBER Required
1174: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1175: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1176: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1177: -- P_deduction IN DEDUCTION_REC_TYPE Required
1178: --
1179: -- OUT:

Line 1176: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

1172: -- IN:
1173: -- p_api_version_number IN NUMBER Required
1174: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1175: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1176: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1177: -- P_deduction IN DEDUCTION_REC_TYPE Required
1178: --
1179: -- OUT:
1180: -- x_return_status OUT VARCHAR2

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

1186: --
1187: ----------------------------------------------------------------------------------------------
1188: PROCEDURE Perform_Subsequent_Apply(
1189: p_api_version IN NUMBER,
1190: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1191: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1192:
1193: x_return_status OUT NOCOPY VARCHAR2,
1194: x_msg_count OUT NOCOPY NUMBER,

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

1187: ----------------------------------------------------------------------------------------------
1188: PROCEDURE Perform_Subsequent_Apply(
1189: p_api_version IN NUMBER,
1190: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1191: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1192:
1193: x_return_status OUT NOCOPY VARCHAR2,
1194: x_msg_count OUT NOCOPY NUMBER,
1195: x_msg_data OUT NOCOPY VARCHAR2,

Line 1289: x_return_status := FND_API.G_RET_STS_SUCCESS;

1285: BEGIN
1286: --------------------- initialize -----------------------
1287: Write_Log(l_full_name, 'start');
1288:
1289: x_return_status := FND_API.G_RET_STS_SUCCESS;
1290:
1291: -- Check if the claim has any splits.
1292: OPEN get_claim_count_csr(l_deduction_rec.claim_id);
1293: FETCH get_claim_count_csr INTO l_claim_count;

Line 1321: (l_source_object_id IS NULL OR l_source_object_id = FND_API.g_miss_num) THEN

1317: l_deduction_rec.amount := l_deduction_rec.amount * -1;
1318: l_deduction_rec.amount_applied := l_deduction_rec.amount_applied * -1;
1319: END IF;
1320: ELSIF l_claim_class = 'DEDUCTION' AND
1321: (l_source_object_id IS NULL OR l_source_object_id = FND_API.g_miss_num) THEN
1322: IF l_deduction_rec.amount < 0 THEN
1323: l_deduction_rec.amount := l_deduction_rec.amount * -1;
1324: END IF;
1325: END IF;

Line 1344: RAISE FND_API.G_EXC_ERROR;

1340: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1341: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_STATUS_PENDING_CLOSE');
1342: FND_MSG_PUB.add;
1343: END IF;
1344: RAISE FND_API.G_EXC_ERROR;
1345: END IF;
1346:
1347: -- ---------------------
1348: -- Fully Apply

Line 1431: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN

1427: --//Bug fix 10194954
1428: l_pvt_claim_rec.reason_code_id := l_deduction_rec.reason_code_id;
1429:
1430: IF l_deduction_rec.source_object_id IS NOT NULL AND
1431: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN
1432: --Transaction 8/22/2005Releated deduction
1433: l_pvt_claim_rec.receipt_id := l_deduction_rec.receipt_id;
1434: l_pvt_claim_rec.receipt_number := l_deduction_rec.receipt_number;
1435:

Line 1472: p_init_msg_list => FND_API.G_FALSE,

1468:
1469: -- Call Update_Claim to reflect the changes.
1470: OZF_claim_PVT.Update_claim(
1471: p_api_version => 1.0,
1472: p_init_msg_list => FND_API.G_FALSE,
1473: p_commit => FND_API.G_FALSE,
1474: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1475: x_return_status => l_return_status,
1476: x_msg_count => x_msg_count,

Line 1473: p_commit => FND_API.G_FALSE,

1469: -- Call Update_Claim to reflect the changes.
1470: OZF_claim_PVT.Update_claim(
1471: p_api_version => 1.0,
1472: p_init_msg_list => FND_API.G_FALSE,
1473: p_commit => FND_API.G_FALSE,
1474: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1475: x_return_status => l_return_status,
1476: x_msg_count => x_msg_count,
1477: x_msg_data => x_msg_data,

Line 1474: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1470: OZF_claim_PVT.Update_claim(
1471: p_api_version => 1.0,
1472: p_init_msg_list => FND_API.G_FALSE,
1473: p_commit => FND_API.G_FALSE,
1474: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1475: x_return_status => l_return_status,
1476: x_msg_count => x_msg_count,
1477: x_msg_data => x_msg_data,
1478: p_claim => l_pvt_claim_rec,

Line 1483: IF l_return_status = FND_API.G_RET_STS_ERROR then

1479: p_event => g_subsequent_apply_event, --g_update_event
1480: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1481: x_object_version_number => l_object_version_number
1482: );
1483: IF l_return_status = FND_API.G_RET_STS_ERROR then
1484: RAISE FND_API.G_EXC_ERROR;
1485: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1487: END IF;

Line 1484: RAISE FND_API.G_EXC_ERROR;

1480: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1481: x_object_version_number => l_object_version_number
1482: );
1483: IF l_return_status = FND_API.G_RET_STS_ERROR then
1484: RAISE FND_API.G_EXC_ERROR;
1485: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1487: END IF;
1488:

Line 1485: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1481: x_object_version_number => l_object_version_number
1482: );
1483: IF l_return_status = FND_API.G_RET_STS_ERROR then
1484: RAISE FND_API.G_EXC_ERROR;
1485: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1487: END IF;
1488:
1489: ELSE

Line 1486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1482: );
1483: IF l_return_status = FND_API.G_RET_STS_ERROR then
1484: RAISE FND_API.G_EXC_ERROR;
1485: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1486: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1487: END IF;
1488:
1489: ELSE
1490: --Build Notes. (34)

Line 1537: RAISE FND_API.G_EXC_ERROR;

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

Line 1591: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN

1587: --//Bug fix 10194954
1588: l_pvt_claim_rec.reason_code_id := l_deduction_rec.reason_code_id;
1589:
1590: IF l_deduction_rec.source_object_id IS NOT NULL AND
1591: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN
1592: --Transaction Releated deduction
1593: l_pvt_claim_rec.receipt_id := l_deduction_rec.receipt_id;
1594: l_pvt_claim_rec.receipt_number := l_deduction_rec.receipt_number;
1595:

Line 1636: p_init_msg_list => FND_API.G_FALSE,

1632:
1633: --Call Update_Claim to reflect the changes.
1634: OZF_claim_PVT.Update_claim(
1635: p_api_version => 1.0,
1636: p_init_msg_list => FND_API.G_FALSE,
1637: p_commit => FND_API.G_FALSE,
1638: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1639: x_return_status => l_return_status,
1640: x_msg_count => x_msg_count,

Line 1637: p_commit => FND_API.G_FALSE,

1633: --Call Update_Claim to reflect the changes.
1634: OZF_claim_PVT.Update_claim(
1635: p_api_version => 1.0,
1636: p_init_msg_list => FND_API.G_FALSE,
1637: p_commit => FND_API.G_FALSE,
1638: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1639: x_return_status => l_return_status,
1640: x_msg_count => x_msg_count,
1641: x_msg_data => x_msg_data,

Line 1638: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1634: OZF_claim_PVT.Update_claim(
1635: p_api_version => 1.0,
1636: p_init_msg_list => FND_API.G_FALSE,
1637: p_commit => FND_API.G_FALSE,
1638: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1639: x_return_status => l_return_status,
1640: x_msg_count => x_msg_count,
1641: x_msg_data => x_msg_data,
1642: p_claim => l_pvt_claim_Rec,

Line 1647: IF l_return_status = FND_API.G_RET_STS_ERROR then

1643: p_event => G_SUBSEQUENT_APPLY_EVENT, --G_UPDATE_EVENT
1644: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1645: x_object_version_number => l_object_version_number
1646: );
1647: IF l_return_status = FND_API.G_RET_STS_ERROR then
1648: RAISE FND_API.G_EXC_ERROR;
1649: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1651: END IF;

Line 1648: RAISE FND_API.G_EXC_ERROR;

1644: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1645: x_object_version_number => l_object_version_number
1646: );
1647: IF l_return_status = FND_API.G_RET_STS_ERROR then
1648: RAISE FND_API.G_EXC_ERROR;
1649: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1651: END IF;
1652:

Line 1649: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1645: x_object_version_number => l_object_version_number
1646: );
1647: IF l_return_status = FND_API.G_RET_STS_ERROR then
1648: RAISE FND_API.G_EXC_ERROR;
1649: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1651: END IF;
1652:
1653:

Line 1650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1646: );
1647: IF l_return_status = FND_API.G_RET_STS_ERROR then
1648: RAISE FND_API.G_EXC_ERROR;
1649: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1650: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1651: END IF;
1652:
1653:
1654: --Call Create Notes API.

Line 1688: IF l_return_status = FND_API.G_RET_STS_ERROR then

1684: ,x_notes_tbl => l_notes_tbl
1685: ,x_update_allowed_flag => l_update_allowed_flag
1686: ,x_return_status => l_return_status
1687: );
1688: IF l_return_status = FND_API.G_RET_STS_ERROR then
1689: RAISE FND_API.G_EXC_ERROR;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1692: END IF;

Line 1689: RAISE FND_API.G_EXC_ERROR;

1685: ,x_update_allowed_flag => l_update_allowed_flag
1686: ,x_return_status => l_return_status
1687: );
1688: IF l_return_status = FND_API.G_RET_STS_ERROR then
1689: RAISE FND_API.G_EXC_ERROR;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1692: END IF;
1693:

Line 1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1686: ,x_return_status => l_return_status
1687: );
1688: IF l_return_status = FND_API.G_RET_STS_ERROR then
1689: RAISE FND_API.G_EXC_ERROR;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1692: END IF;
1693:
1694: write_log(l_full_name, l_applicable_claims_tbl.count);

Line 1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1687: );
1688: IF l_return_status = FND_API.G_RET_STS_ERROR then
1689: RAISE FND_API.G_EXC_ERROR;
1690: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1691: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1692: END IF;
1693:
1694: write_log(l_full_name, l_applicable_claims_tbl.count);
1695: FOR i in 1..l_applicable_claims_tbl.count LOOP

Line 1734: p_init_msg_list => FND_API.G_FALSE,

1730:
1731: --Call Update_Claim to reflect the changes.
1732: OZF_claim_PVT.Update_claim(
1733: p_api_version => 1.0,
1734: p_init_msg_list => FND_API.G_FALSE,
1735: p_commit => FND_API.G_FALSE,
1736: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1737: x_return_status => l_return_status,
1738: x_msg_count => x_msg_count,

Line 1735: p_commit => FND_API.G_FALSE,

1731: --Call Update_Claim to reflect the changes.
1732: OZF_claim_PVT.Update_claim(
1733: p_api_version => 1.0,
1734: p_init_msg_list => FND_API.G_FALSE,
1735: p_commit => FND_API.G_FALSE,
1736: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1737: x_return_status => l_return_status,
1738: x_msg_count => x_msg_count,
1739: x_msg_data => x_msg_data,

Line 1736: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

1732: OZF_claim_PVT.Update_claim(
1733: p_api_version => 1.0,
1734: p_init_msg_list => FND_API.G_FALSE,
1735: p_commit => FND_API.G_FALSE,
1736: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
1737: x_return_status => l_return_status,
1738: x_msg_count => x_msg_count,
1739: x_msg_data => x_msg_data,
1740: p_claim => l_pvt_claim_Rec,

Line 1745: IF l_return_status = FND_API.G_RET_STS_ERROR then

1741: p_event => G_SUBSEQUENT_APPLY_EVENT, --G_UPDATE_EVENT
1742: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1743: x_object_version_number => l_object_version_number
1744: );
1745: IF l_return_status = FND_API.G_RET_STS_ERROR then
1746: RAISE FND_API.G_EXC_ERROR;
1747: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1749: END IF;

Line 1746: RAISE FND_API.G_EXC_ERROR;

1742: p_mode => OZF_CLAIM_UTILITY_PVT.G_AUTO_MODE,
1743: x_object_version_number => l_object_version_number
1744: );
1745: IF l_return_status = FND_API.G_RET_STS_ERROR then
1746: RAISE FND_API.G_EXC_ERROR;
1747: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1749: END IF;
1750:

Line 1747: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1743: x_object_version_number => l_object_version_number
1744: );
1745: IF l_return_status = FND_API.G_RET_STS_ERROR then
1746: RAISE FND_API.G_EXC_ERROR;
1747: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1749: END IF;
1750:
1751: IF i <= l_notes_tbl.COUNT THEN

Line 1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1744: );
1745: IF l_return_status = FND_API.G_RET_STS_ERROR then
1746: RAISE FND_API.G_EXC_ERROR;
1747: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1748: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1749: END IF;
1750:
1751: IF i <= l_notes_tbl.COUNT THEN
1752: --Call Create Notes API.

Line 1780: IF l_return_status = FND_API.G_RET_STS_ERROR then

1776: x_return_status => l_return_status
1777: ,x_msg_count => x_msg_count
1778: ,x_msg_data => x_msg_data
1779: ,p_deduction_rec => l_deduction_rec);
1780: IF l_return_status = FND_API.G_RET_STS_ERROR then
1781: RAISE FND_API.G_EXC_ERROR;
1782: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: END IF;

Line 1781: RAISE FND_API.G_EXC_ERROR;

1777: ,x_msg_count => x_msg_count
1778: ,x_msg_data => x_msg_data
1779: ,p_deduction_rec => l_deduction_rec);
1780: IF l_return_status = FND_API.G_RET_STS_ERROR then
1781: RAISE FND_API.G_EXC_ERROR;
1782: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: END IF;
1785:

Line 1782: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

1778: ,x_msg_data => x_msg_data
1779: ,p_deduction_rec => l_deduction_rec);
1780: IF l_return_status = FND_API.G_RET_STS_ERROR then
1781: RAISE FND_API.G_EXC_ERROR;
1782: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: END IF;
1785:
1786: ELSE

Line 1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

1779: ,p_deduction_rec => l_deduction_rec);
1780: IF l_return_status = FND_API.G_RET_STS_ERROR then
1781: RAISE FND_API.G_EXC_ERROR;
1782: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
1783: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
1784: END IF;
1785:
1786: ELSE
1787: l_notes := l_notes|| Build_Note('OZF_CLAM_NOTES_CLAIM_CLOSED');

Line 1795: p_encoded => FND_API.g_false,

1791: END IF; --IF l_split_flag = 'YES' THEN
1792:
1793:
1794: FND_MSG_PUB.count_and_get(
1795: p_encoded => FND_API.g_false,
1796: p_count => x_msg_count,
1797: p_data => x_msg_data
1798: );
1799:

Line 1804: WHEN FND_API.G_EXC_ERROR THEN

1800: Write_Log(l_full_name, 'end');
1801:
1802:
1803: EXCEPTION
1804: WHEN FND_API.G_EXC_ERROR THEN
1805: x_return_status := FND_API.G_RET_STS_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1808: ,p_count => x_msg_count

Line 1805: x_return_status := FND_API.G_RET_STS_ERROR;

1801:
1802:
1803: EXCEPTION
1804: WHEN FND_API.G_EXC_ERROR THEN
1805: x_return_status := FND_API.G_RET_STS_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1808: ,p_count => x_msg_count
1809: ,p_data => x_msg_data

Line 1807: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

1803: EXCEPTION
1804: WHEN FND_API.G_EXC_ERROR THEN
1805: x_return_status := FND_API.G_RET_STS_ERROR;
1806: -- Standard call to get message count and if count=1, get the message
1807: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1808: ,p_count => x_msg_count
1809: ,p_data => x_msg_data
1810: );
1811:

Line 1812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1808: ,p_count => x_msg_count
1809: ,p_data => x_msg_data
1810: );
1811:
1812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1814: -- Standard call to get message count and if count=1, get the message
1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1816: ,p_count => x_msg_count

Line 1813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1809: ,p_data => x_msg_data
1810: );
1811:
1812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1814: -- Standard call to get message count and if count=1, get the message
1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1816: ,p_count => x_msg_count
1817: ,p_data => x_msg_data

Line 1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

1811:
1812: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1813: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1814: -- Standard call to get message count and if count=1, get the message
1815: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1816: ,p_count => x_msg_count
1817: ,p_data => x_msg_data
1818: );
1819:

Line 1821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1817: ,p_data => x_msg_data
1818: );
1819:
1820: WHEN OTHERS THEN
1821: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1822: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1823: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
1824: FND_MSG_PUB.add;
1825: END IF;

Line 1827: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

1823: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
1824: FND_MSG_PUB.add;
1825: END IF;
1826: -- Standard call to get message count and if count=1, get the message
1827: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
1828: ,p_count => x_msg_count
1829: ,p_data => x_msg_data
1830: );
1831:

Line 1845: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

1841: --
1842: -- PARAMETERS:
1843: -- IN:
1844: -- p_api_version_number IN NUMBER Required
1845: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1846: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1847: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1848: -- P_deduction IN DEDUCTION_REC_TYPE Required
1849: --

Line 1846: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

1842: -- PARAMETERS:
1843: -- IN:
1844: -- p_api_version_number IN NUMBER Required
1845: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1846: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1847: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1848: -- P_deduction IN DEDUCTION_REC_TYPE Required
1849: --
1850: -- OUT:

Line 1847: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

1843: -- IN:
1844: -- p_api_version_number IN NUMBER Required
1845: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
1846: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
1847: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
1848: -- P_deduction IN DEDUCTION_REC_TYPE Required
1849: --
1850: -- OUT:
1851: -- x_return_status OUT VARCHAR2

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

1857: --
1858: ----------------------------------------------------------------------------------------------
1859: PROCEDURE Perform_Subsequent_Unapply(
1860: p_api_version IN NUMBER,
1861: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1863:
1864: x_return_status OUT NOCOPY VARCHAR2,
1865: x_msg_count OUT NOCOPY NUMBER,

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

1858: ----------------------------------------------------------------------------------------------
1859: PROCEDURE Perform_Subsequent_Unapply(
1860: p_api_version IN NUMBER,
1861: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
1862: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
1863:
1864: x_return_status OUT NOCOPY VARCHAR2,
1865: x_msg_count OUT NOCOPY NUMBER,
1866: x_msg_data OUT NOCOPY VARCHAR2,

Line 1900: l_claim_type_id NUMBER:=FND_API.g_miss_num;

1896: l_split_claim_id NUMBER;
1897: l_split_claim_number VARCHAR2(30);
1898: l_x_note_id NUMBER;
1899: l_amount_remaining NUMBER:=0;
1900: l_claim_type_id NUMBER:=FND_API.g_miss_num;
1901: l_source_object_id NUMBER;
1902: l_invoice_amount_due NUMBER:=0; --Added on 21-Apr-2003 (aadhawad)
1903:
1904: -- get Count for given claim_id

Line 2000: x_return_status := FND_API.G_RET_STS_SUCCESS;

1996: BEGIN
1997: --------------------- initialize -----------------------
1998: Write_Log(l_full_name, 'start');
1999:
2000: x_return_status := FND_API.G_RET_STS_SUCCESS;
2001:
2002:
2003: -- Check if the claim has any splits.
2004: OPEN get_claim_count_csr(l_deduction_rec.claim_id);

Line 2056: (l_source_object_id is NULL or l_source_object_id = FND_API.g_miss_num)) THEN

2052: END IF;
2053:
2054: --Fixed:Date:12-Mar-2003. Partial application for claim investigation.
2055: IF ( l_claim_class = 'DEDUCTION' and
2056: (l_source_object_id is NULL or l_source_object_id = FND_API.g_miss_num)) THEN
2057: IF l_deduction_rec.AMOUNT < 0 THEN
2058: l_deduction_rec.AMOUNT := l_deduction_rec.AMOUNT * -1;
2059: --l_deduction_rec.AMOUNT_APPLIED := l_deduction_rec.AMOUNT_APPLIED * -1;
2060: END IF;

Line 2068: RAISE FND_API.G_EXC_ERROR;

2064: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2065: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_STATUS_PENDING_CLOSE');
2066: FND_MSG_PUB.add;
2067: END IF;
2068: RAISE FND_API.G_EXC_ERROR;
2069: END IF;
2070:
2071: --- BUG 4157743 FIXING
2072: IF l_status_code <> 'CLOSED' THEN

Line 2122: l_deduction_rec.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM THEN

2118: END IF;
2119:
2120: --Check for Transaction Related Claim.
2121: IF l_deduction_rec.SOURCE_OBJECT_ID is NOT NULL AND
2122: l_deduction_rec.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM THEN
2123: --Transaction Related Claim.
2124: l_pvt_claim_Rec.RECEIPT_ID := l_deduction_rec.RECEIPT_ID;
2125: l_pvt_claim_Rec.RECEIPT_NUMBER := nvl(l_deduction_rec.RECEIPT_NUMBER,l_receipt_number);
2126:

Line 2167: P_Init_Msg_List => FND_API.G_FALSE,

2163:
2164: --Call Update_Claim to reflect the changes.
2165: OZF_claim_PVT.Update_claim(
2166: P_Api_Version => 1.0,
2167: P_Init_Msg_List => FND_API.G_FALSE,
2168: P_Commit => FND_API.G_FALSE,
2169: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2170: X_Return_Status => x_return_status,
2171: X_Msg_Count => x_msg_count,

Line 2168: P_Commit => FND_API.G_FALSE,

2164: --Call Update_Claim to reflect the changes.
2165: OZF_claim_PVT.Update_claim(
2166: P_Api_Version => 1.0,
2167: P_Init_Msg_List => FND_API.G_FALSE,
2168: P_Commit => FND_API.G_FALSE,
2169: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2170: X_Return_Status => x_return_status,
2171: X_Msg_Count => x_msg_count,
2172: X_Msg_Data => x_msg_data,

Line 2169: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,

2165: OZF_claim_PVT.Update_claim(
2166: P_Api_Version => 1.0,
2167: P_Init_Msg_List => FND_API.G_FALSE,
2168: P_Commit => FND_API.G_FALSE,
2169: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2170: X_Return_Status => x_return_status,
2171: X_Msg_Count => x_msg_count,
2172: X_Msg_Data => x_msg_data,
2173: P_claim => l_pvt_claim_Rec,

Line 2179: IF x_return_status = FND_API.G_RET_STS_ERROR then

2175: p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE,
2176: X_Object_Version_Number => l_object_version_number );
2177:
2178: -- Check return status from the above procedure call
2179: IF x_return_status = FND_API.G_RET_STS_ERROR then
2180: raise FND_API.G_EXC_ERROR;
2181: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2182: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2183: END IF;

Line 2180: raise FND_API.G_EXC_ERROR;

2176: X_Object_Version_Number => l_object_version_number );
2177:
2178: -- Check return status from the above procedure call
2179: IF x_return_status = FND_API.G_RET_STS_ERROR then
2180: raise FND_API.G_EXC_ERROR;
2181: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2182: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2183: END IF;
2184: ELSE

Line 2181: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2177:
2178: -- Check return status from the above procedure call
2179: IF x_return_status = FND_API.G_RET_STS_ERROR then
2180: raise FND_API.G_EXC_ERROR;
2181: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2182: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2183: END IF;
2184: ELSE
2185: --Build Notes.(44)

Line 2182: raise FND_API.G_EXC_UNEXPECTED_ERROR;

2178: -- Check return status from the above procedure call
2179: IF x_return_status = FND_API.G_RET_STS_ERROR then
2180: raise FND_API.G_EXC_ERROR;
2181: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2182: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2183: END IF;
2184: ELSE
2185: --Build Notes.(44)
2186: --l_notes := '[Claim:'||l_deduction_rec.CLAIM_NUMBER||' Remark:';

Line 2246: (l_source_object_id is NULL or l_source_object_id = FND_API.g_miss_num)) THEN

2242: Write_Log(l_full_name, 'Cancel All ? ' || l_cancel_all_claim );
2243:
2244: --Fixed:Date:12-Mar-2003. Partial application for claim investigation.
2245: IF ( l_claim_class = 'DEDUCTION' and
2246: (l_source_object_id is NULL or l_source_object_id = FND_API.g_miss_num)) THEN
2247: IF l_deduction_rec.AMOUNT < 0 THEN
2248: l_deduction_rec.AMOUNT := l_deduction_rec.AMOUNT * -1;
2249: --l_deduction_rec.AMOUNT_APPLIED := l_deduction_rec.AMOUNT_APPLIED * -1;
2250: END IF;

Line 2273: RAISE FND_API.G_EXC_ERROR;

2269: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2270: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_STATUS_PENDING_CLOSE');
2271: FND_MSG_PUB.add;
2272: END IF;
2273: RAISE FND_API.G_EXC_ERROR;
2274: END IF;
2275:
2276: FOR ref_split_claim_csr in split_claim_csr(l_deduction_rec.CLAIM_ID) LOOP
2277: -- If cancel all claim flag is Y, then cancel all non closed claims

Line 2306: p_init_msg_list => FND_API.G_FALSE,

2302:
2303: --Call Update_Claim to reflect the changes.
2304: OZF_claim_PVT.Update_claim(
2305: p_api_version => 1.0,
2306: p_init_msg_list => FND_API.G_FALSE,
2307: p_commit => FND_API.G_FALSE,
2308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2309: x_return_status => x_return_status,
2310: x_msg_count => x_msg_count,

Line 2307: p_commit => FND_API.G_FALSE,

2303: --Call Update_Claim to reflect the changes.
2304: OZF_claim_PVT.Update_claim(
2305: p_api_version => 1.0,
2306: p_init_msg_list => FND_API.G_FALSE,
2307: p_commit => FND_API.G_FALSE,
2308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2309: x_return_status => x_return_status,
2310: x_msg_count => x_msg_count,
2311: x_msg_data => x_msg_data,

Line 2308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

2304: OZF_claim_PVT.Update_claim(
2305: p_api_version => 1.0,
2306: p_init_msg_list => FND_API.G_FALSE,
2307: p_commit => FND_API.G_FALSE,
2308: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
2309: x_return_status => x_return_status,
2310: x_msg_count => x_msg_count,
2311: x_msg_data => x_msg_data,
2312: p_claim => l_pvt_claim_Rec,

Line 2318: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

2314: p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE,
2315: x_object_version_number => l_object_version_number
2316: );
2317: -- Check return status from the above procedure call
2318: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2319: RAISE FND_API.G_EXC_ERROR;
2320: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2322: END IF;

Line 2319: RAISE FND_API.G_EXC_ERROR;

2315: x_object_version_number => l_object_version_number
2316: );
2317: -- Check return status from the above procedure call
2318: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2319: RAISE FND_API.G_EXC_ERROR;
2320: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2322: END IF;
2323:

Line 2320: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2316: );
2317: -- Check return status from the above procedure call
2318: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2319: RAISE FND_API.G_EXC_ERROR;
2320: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2322: END IF;
2323:
2324: --Call Create Notes API.

Line 2321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2317: -- Check return status from the above procedure call
2318: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2319: RAISE FND_API.G_EXC_ERROR;
2320: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2321: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2322: END IF;
2323:
2324: --Call Create Notes API.
2325: Write_log(l_full_name,l_notes);

Line 2401: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN

2397: l_pvt_claim_Rec.EXCHANGE_RATE := l_deduction_rec.EXCHANGE_RATE;
2398:
2399:
2400: IF l_deduction_rec.source_object_id IS NOT NULL AND
2401: l_deduction_rec.source_object_id <> FND_API.G_MISS_NUM THEN
2402: -- Build Notes :for transaction releated deduction
2403:
2404: IF l_deduction_rec.receipt_number <> ref_split_claim_csr.receipt_number THEN
2405: l_notes := l_notes|| Build_Note('OZF_CLAM_NOTES_RCPT_CHANGE', TO_CHAR(ref_split_claim_csr.RECEIPT_NUMBER), TO_CHAR(l_deduction_rec.RECEIPT_NUMBER));

Line 2425: P_Init_Msg_List => FND_API.G_FALSE,

2421:
2422: --Call Update_Claim to reflect the changes.
2423: OZF_claim_PVT.Update_claim(
2424: P_Api_Version => 1.0,
2425: P_Init_Msg_List => FND_API.G_FALSE,
2426: P_Commit => FND_API.G_FALSE,
2427: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2428: X_Return_Status => x_return_status,
2429: X_Msg_Count => x_msg_count,

Line 2426: P_Commit => FND_API.G_FALSE,

2422: --Call Update_Claim to reflect the changes.
2423: OZF_claim_PVT.Update_claim(
2424: P_Api_Version => 1.0,
2425: P_Init_Msg_List => FND_API.G_FALSE,
2426: P_Commit => FND_API.G_FALSE,
2427: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2428: X_Return_Status => x_return_status,
2429: X_Msg_Count => x_msg_count,
2430: X_Msg_Data => x_msg_data,

Line 2427: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,

2423: OZF_claim_PVT.Update_claim(
2424: P_Api_Version => 1.0,
2425: P_Init_Msg_List => FND_API.G_FALSE,
2426: P_Commit => FND_API.G_FALSE,
2427: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
2428: X_Return_Status => x_return_status,
2429: X_Msg_Count => x_msg_count,
2430: X_Msg_Data => x_msg_data,
2431: P_claim => l_pvt_claim_Rec,

Line 2437: IF x_return_status = FND_API.G_RET_STS_ERROR then

2433: p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE,
2434: X_Object_Version_Number => l_object_version_number );
2435:
2436: -- Check return status from the above procedure call
2437: IF x_return_status = FND_API.G_RET_STS_ERROR then
2438: raise FND_API.G_EXC_ERROR;
2439: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2441: END IF;

Line 2438: raise FND_API.G_EXC_ERROR;

2434: X_Object_Version_Number => l_object_version_number );
2435:
2436: -- Check return status from the above procedure call
2437: IF x_return_status = FND_API.G_RET_STS_ERROR then
2438: raise FND_API.G_EXC_ERROR;
2439: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2441: END IF;
2442:

Line 2439: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2435:
2436: -- Check return status from the above procedure call
2437: IF x_return_status = FND_API.G_RET_STS_ERROR then
2438: raise FND_API.G_EXC_ERROR;
2439: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2441: END IF;
2442:
2443: --Call Create Notes API.

Line 2440: raise FND_API.G_EXC_UNEXPECTED_ERROR;

2436: -- Check return status from the above procedure call
2437: IF x_return_status = FND_API.G_RET_STS_ERROR then
2438: raise FND_API.G_EXC_ERROR;
2439: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2440: raise FND_API.G_EXC_UNEXPECTED_ERROR;
2441: END IF;
2442:
2443: --Call Create Notes API.
2444: Write_log(l_full_name,l_notes);

Line 2469: IF l_return_status = FND_API.G_RET_STS_ERROR then

2465: x_return_status => l_return_status
2466: ,x_msg_count => x_msg_count
2467: ,x_msg_data => x_msg_data
2468: ,p_deduction_rec => l_deduction_rec);
2469: IF l_return_status = FND_API.G_RET_STS_ERROR then
2470: RAISE FND_API.G_EXC_ERROR;
2471: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2473: END IF;

Line 2470: RAISE FND_API.G_EXC_ERROR;

2466: ,x_msg_count => x_msg_count
2467: ,x_msg_data => x_msg_data
2468: ,p_deduction_rec => l_deduction_rec);
2469: IF l_return_status = FND_API.G_RET_STS_ERROR then
2470: RAISE FND_API.G_EXC_ERROR;
2471: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2473: END IF;
2474:

Line 2471: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then

2467: ,x_msg_data => x_msg_data
2468: ,p_deduction_rec => l_deduction_rec);
2469: IF l_return_status = FND_API.G_RET_STS_ERROR then
2470: RAISE FND_API.G_EXC_ERROR;
2471: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2473: END IF;
2474:
2475: EXIT; -- Work is done !

Line 2472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2468: ,p_deduction_rec => l_deduction_rec);
2469: IF l_return_status = FND_API.G_RET_STS_ERROR then
2470: RAISE FND_API.G_EXC_ERROR;
2471: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR then
2472: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2473: END IF;
2474:
2475: EXIT; -- Work is done !
2476: END IF; -- Is claim open/complete/pending_approval?

Line 2496: WHEN FND_API.G_EXC_ERROR THEN

2492:
2493: Write_Log(l_full_name, 'end');
2494:
2495: EXCEPTION
2496: WHEN FND_API.G_EXC_ERROR THEN
2497: x_return_status := FND_API.G_RET_STS_ERROR;
2498: -- Standard call to get message count and if count=1, get the message
2499: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2500: ,p_count => x_msg_count

Line 2497: x_return_status := FND_API.G_RET_STS_ERROR;

2493: Write_Log(l_full_name, 'end');
2494:
2495: EXCEPTION
2496: WHEN FND_API.G_EXC_ERROR THEN
2497: x_return_status := FND_API.G_RET_STS_ERROR;
2498: -- Standard call to get message count and if count=1, get the message
2499: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2500: ,p_count => x_msg_count
2501: ,p_data => x_msg_data

Line 2499: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

2495: EXCEPTION
2496: WHEN FND_API.G_EXC_ERROR THEN
2497: x_return_status := FND_API.G_RET_STS_ERROR;
2498: -- Standard call to get message count and if count=1, get the message
2499: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2500: ,p_count => x_msg_count
2501: ,p_data => x_msg_data
2502: );
2503:

Line 2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

2500: ,p_count => x_msg_count
2501: ,p_data => x_msg_data
2502: );
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: -- Standard call to get message count and if count=1, get the message
2507: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2508: ,p_count => x_msg_count

Line 2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2501: ,p_data => x_msg_data
2502: );
2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: -- Standard call to get message count and if count=1, get the message
2507: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2508: ,p_count => x_msg_count
2509: ,p_data => x_msg_data

Line 2507: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

2503:
2504: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
2505: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2506: -- Standard call to get message count and if count=1, get the message
2507: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2508: ,p_count => x_msg_count
2509: ,p_data => x_msg_data
2510: );
2511: WHEN OTHERS THEN

Line 2512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2508: ,p_count => x_msg_count
2509: ,p_data => x_msg_data
2510: );
2511: WHEN OTHERS THEN
2512: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2513: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2514: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
2515: FND_MSG_PUB.add;
2516: END IF;

Line 2518: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE

2514: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
2515: FND_MSG_PUB.add;
2516: END IF;
2517: -- Standard call to get message count and if count=1, get the message
2518: FND_MSG_PUB.Count_And_Get(p_encoded => FND_API.G_FALSE
2519: ,p_count => x_msg_count
2520: ,p_data => x_msg_data
2521: );
2522:

Line 2535: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

2531: --
2532: -- PARAMETERS:
2533: -- IN
2534: -- p_api_version_number IN NUMBER Required
2535: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2536: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2537: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2538: -- P_deduction IN DEDUCTION_REC_TYPE Required
2539: --

Line 2536: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

2532: -- PARAMETERS:
2533: -- IN
2534: -- p_api_version_number IN NUMBER Required
2535: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2536: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2537: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2538: -- P_deduction IN DEDUCTION_REC_TYPE Required
2539: --
2540: -- OUT:

Line 2537: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

2533: -- IN
2534: -- p_api_version_number IN NUMBER Required
2535: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2536: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2537: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2538: -- P_deduction IN DEDUCTION_REC_TYPE Required
2539: --
2540: -- OUT:
2541: -- x_return_status OUT VARCHAR2

Line 2570: x_return_status := FND_API.G_RET_STS_SUCCESS;

2566: x_claim_number VARCHAR2(30);
2567:
2568: BEGIN
2569: -- Initialize API return status to SUCCESS
2570: x_return_status := FND_API.G_RET_STS_SUCCESS;
2571:
2572: OZF_Claim_GRP.Update_Deduction(
2573: p_api_version_number,
2574: p_init_msg_list,

Line 2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2586: );
2587:
2588: EXCEPTION
2589: WHEN OTHERS THEN
2590: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2591: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
2592: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
2593: FND_MSG_PUB.add;
2594: END IF;

Line 2596: p_encoded => FND_API.G_FALSE,

2592: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
2593: FND_MSG_PUB.add;
2594: END IF;
2595: FND_MSG_PUB.Count_And_Get (
2596: p_encoded => FND_API.G_FALSE,
2597: p_count => x_msg_count,
2598: p_data => x_msg_data
2599: );
2600: End Update_Deduction;

Line 2612: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE

2608: --
2609: -- PARAMETERS:
2610: -- IN:
2611: -- p_api_version_number IN NUMBER Required
2612: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2613: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2614: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2615: -- P_deduction IN DEDUCTION_REC_TYPE Required
2616: --

Line 2613: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL

2609: -- PARAMETERS:
2610: -- IN:
2611: -- p_api_version_number IN NUMBER Required
2612: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2613: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2614: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2615: -- P_deduction IN DEDUCTION_REC_TYPE Required
2616: --
2617: -- OUT:

Line 2614: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE

2610: -- IN:
2611: -- p_api_version_number IN NUMBER Required
2612: -- p_init_msg_list IN VARCHAR2 Optional Default = FND_API_G_FALSE
2613: -- p_validation_level IN NUMBER Optional Default = FND_API.G_VALID_LEVEL_FULL
2614: -- p_commit IN VARCHAR2 Optional Default = FND_API.G_FALSE
2615: -- P_deduction IN DEDUCTION_REC_TYPE Required
2616: --
2617: -- OUT:
2618: -- x_return_status OUT NOCOPY VARCHAR2

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

2628: --
2629: ---------------------------------------------------------------------
2630: PROCEDURE Update_Deduction(
2631: p_api_version_number IN NUMBER,
2632: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2634: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2635:
2636: x_return_status OUT NOCOPY VARCHAR2,

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

2629: ---------------------------------------------------------------------
2630: PROCEDURE Update_Deduction(
2631: p_api_version_number IN NUMBER,
2632: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2634: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2635:
2636: x_return_status OUT NOCOPY VARCHAR2,
2637: x_msg_count OUT NOCOPY NUMBER,

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

2630: PROCEDURE Update_Deduction(
2631: p_api_version_number IN NUMBER,
2632: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
2633: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
2634: p_commit IN VARCHAR2 := FND_API.G_FALSE,
2635:
2636: x_return_status OUT NOCOPY VARCHAR2,
2637: x_msg_count OUT NOCOPY NUMBER,
2638: x_msg_data OUT NOCOPY VARCHAR2,

Line 2700: l_user_status_id NUMBER :=FND_API.G_MISS_NUM;

2696: WHERE claim_id = cv_claim_id;
2697:
2698: l_object_version_number NUMBER;
2699: l_pvt_claim_rec OZF_CLAIM_PVT.claim_Rec_Type;
2700: l_user_status_id NUMBER :=FND_API.G_MISS_NUM;
2701: l_custom_setup_id NUMBER;
2702: l_claim_obj_ver_num NUMBER;
2703:
2704: -- Fix for 5182492

Line 2773: IF NOT FND_API.Compatible_API_Call ( l_api_version,

2769:
2770: Write_Log(l_full_name, 'start');
2771:
2772: -- Standard call to check for call compatibility.
2773: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2774: p_api_version_number,
2775: l_api_name,
2776: G_PKG_NAME ) THEN
2777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

Line 2777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2773: IF NOT FND_API.Compatible_API_Call ( l_api_version,
2774: p_api_version_number,
2775: l_api_name,
2776: G_PKG_NAME ) THEN
2777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2778: END IF;
2779:
2780: -- Initialize message list if p_init_msg_list is set to TRUE.
2781: IF FND_API.to_Boolean( p_init_msg_list ) THEN

Line 2781: IF FND_API.to_Boolean( p_init_msg_list ) THEN

2777: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2778: END IF;
2779:
2780: -- Initialize message list if p_init_msg_list is set to TRUE.
2781: IF FND_API.to_Boolean( p_init_msg_list ) THEN
2782: FND_MSG_PUB.initialize;
2783: END IF;
2784:
2785: -- Initialize API return status to SUCCESS

Line 2786: x_return_status := FND_API.G_RET_STS_SUCCESS;

2782: FND_MSG_PUB.initialize;
2783: END IF;
2784:
2785: -- Initialize API return status to SUCCESS
2786: x_return_status := FND_API.G_RET_STS_SUCCESS;
2787:
2788: -----------------------------------------
2789: -- 1. Minimum required fields checking --
2790: -----------------------------------------

Line 2798: RAISE FND_API.G_EXC_ERROR;

2794: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2795: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUFFICIENT_VAL');
2796: FND_MSG_PUB.add;
2797: END IF;
2798: RAISE FND_API.G_EXC_ERROR;
2799: END IF;
2800:
2801: IF l_deduction_rec.applied_action_type IS NULL OR
2802: l_deduction_rec.applied_action_type NOT IN ('A','U') THEN

Line 2807: RAISE FND_API.G_EXC_ERROR;

2803: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2804: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_ACTION');
2805: FND_MSG_PUB.add;
2806: END IF;
2807: RAISE FND_API.G_EXC_ERROR;
2808: ELSE
2809: IF l_deduction_rec.applied_action_type = 'A' THEN
2810: IF l_deduction_rec.amount IS NULL OR
2811: l_deduction_rec.receipt_id IS NULL THEN

Line 2816: RAISE FND_API.G_EXC_ERROR;

2812: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2813: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_INSUFFICIENT_VAL_A');
2814: FND_MSG_PUB.add;
2815: END IF;
2816: RAISE FND_API.G_EXC_ERROR;
2817: END IF;
2818: ELSIF l_deduction_rec.applied_action_type = 'U' THEN
2819: IF l_deduction_rec.amount IS NULL OR
2820: l_deduction_rec.amount_applied IS NULL OR

Line 2826: RAISE FND_API.G_EXC_ERROR;

2822: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2823: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_INSUFFICIENT_VAL_U');
2824: FND_MSG_PUB.add;
2825: END IF;
2826: RAISE FND_API.G_EXC_ERROR;
2827: END IF;
2828: END IF;
2829: END IF;
2830:

Line 2882: l_deduction_rec.claim_id = FND_API.G_MISS_NUM

2878: ----------------------------------------------------------
2879: -- 3. Required Fields checking for Apply or Unapply Action
2880: ----------------------------------------------------------
2881: IF (l_deduction_rec.claim_id IS NULL OR
2882: l_deduction_rec.claim_id = FND_API.G_MISS_NUM
2883: ) OR
2884: (l_deduction_rec.amount IS NULL OR
2885: l_deduction_rec.amount = FND_API.G_MISS_NUM
2886: ) THEN

Line 2885: l_deduction_rec.amount = FND_API.G_MISS_NUM

2881: IF (l_deduction_rec.claim_id IS NULL OR
2882: l_deduction_rec.claim_id = FND_API.G_MISS_NUM
2883: ) OR
2884: (l_deduction_rec.amount IS NULL OR
2885: l_deduction_rec.amount = FND_API.G_MISS_NUM
2886: ) THEN
2887: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2888: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2889: FND_MSG_PUB.add;

Line 2891: RAISE FND_API.G_EXC_ERROR;

2887: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2888: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2889: FND_MSG_PUB.add;
2890: END IF;
2891: RAISE FND_API.G_EXC_ERROR;
2892: ELSE
2893: IF l_deduction_rec.applied_action_type = 'A' THEN
2894: IF (l_deduction_rec.amount_applied IS NULL OR
2895: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM

Line 2895: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM

2891: RAISE FND_API.G_EXC_ERROR;
2892: ELSE
2893: IF l_deduction_rec.applied_action_type = 'A' THEN
2894: IF (l_deduction_rec.amount_applied IS NULL OR
2895: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM
2896: ) OR
2897: (l_deduction_rec.applied_receipt_id IS NULL OR
2898: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM
2899: ) THEN

Line 2898: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM

2894: IF (l_deduction_rec.amount_applied IS NULL OR
2895: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM
2896: ) OR
2897: (l_deduction_rec.applied_receipt_id IS NULL OR
2898: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM
2899: ) THEN
2900: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2901: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2902: FND_MSG_PUB.add;

Line 2904: RAISE FND_API.G_EXC_ERROR;

2900: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2901: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2902: FND_MSG_PUB.add;
2903: END IF;
2904: RAISE FND_API.G_EXC_ERROR;
2905: END IF;
2906: ELSIF l_deduction_rec.applied_action_type = 'U' THEN
2907: IF (l_deduction_rec.amount_applied IS NULL OR
2908: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM

Line 2908: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM

2904: RAISE FND_API.G_EXC_ERROR;
2905: END IF;
2906: ELSIF l_deduction_rec.applied_action_type = 'U' THEN
2907: IF (l_deduction_rec.amount_applied IS NULL OR
2908: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM
2909: ) OR
2910: (l_deduction_rec.applied_receipt_id IS NULL OR
2911: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM
2912: ) THEN

Line 2911: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM

2907: IF (l_deduction_rec.amount_applied IS NULL OR
2908: l_deduction_rec.amount_applied = FND_API.G_MISS_NUM
2909: ) OR
2910: (l_deduction_rec.applied_receipt_id IS NULL OR
2911: l_deduction_rec.applied_receipt_id = FND_API.G_MISS_NUM
2912: ) THEN
2913: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2914: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2915: FND_MSG_PUB.add;

Line 2917: RAISE FND_API.G_EXC_ERROR;

2913: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2914: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INSUF_VAL_UPD');
2915: FND_MSG_PUB.add;
2916: END IF;
2917: RAISE FND_API.G_EXC_ERROR;
2918: END IF;
2919: ELSE
2920: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2921: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_ACTION_UPD');

Line 2924: RAISE FND_API.G_EXC_ERROR;

2920: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2921: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_ACTION_UPD');
2922: FND_MSG_PUB.add;
2923: END IF;
2924: RAISE FND_API.G_EXC_ERROR;
2925: END IF;
2926: END IF;
2927:
2928: IF l_deduction_rec.applied_action_type = 'A' THEN

Line 2953: l_deduction_rec.claim_id := FND_API.G_MISS_NUM;

2949: IF SIGN(l_deduction_rec.amount) <> SIGN(l_claim_old_amount * -1) THEN
2950:
2951: Write_Log(l_full_name, 'Creating a new Claim');
2952: l_perform_subs_apply := FALSE;
2953: l_deduction_rec.claim_id := FND_API.G_MISS_NUM;
2954: l_deduction_rec.claim_number := FND_API.G_MISS_CHAR;
2955: l_deduction_rec.claim_date := l_claim_old_date;
2956: l_deduction_rec.due_date := l_claim_old_duedate;
2957: l_deduction_rec.claim_type_id := l_claim_old_typeId;

Line 2954: l_deduction_rec.claim_number := FND_API.G_MISS_CHAR;

2950:
2951: Write_Log(l_full_name, 'Creating a new Claim');
2952: l_perform_subs_apply := FALSE;
2953: l_deduction_rec.claim_id := FND_API.G_MISS_NUM;
2954: l_deduction_rec.claim_number := FND_API.G_MISS_CHAR;
2955: l_deduction_rec.claim_date := l_claim_old_date;
2956: l_deduction_rec.due_date := l_claim_old_duedate;
2957: l_deduction_rec.claim_type_id := l_claim_old_typeId;
2958: l_deduction_rec.reason_code_id := l_claim_old_reasonId;

Line 2964: p_init_msg_list => FND_API.g_false,

2960: l_deduction_rec.cust_account_id := l_claim_old_accId;
2961:
2962: Create_Deduction(
2963: p_api_version_number => 1.0,
2964: p_init_msg_list => FND_API.g_false,
2965: p_validation_level => FND_API.g_valid_level_full,
2966: p_commit => FND_API.g_false,
2967: x_return_status => x_return_status,
2968: x_msg_count => x_msg_count,

Line 2965: p_validation_level => FND_API.g_valid_level_full,

2961:
2962: Create_Deduction(
2963: p_api_version_number => 1.0,
2964: p_init_msg_list => FND_API.g_false,
2965: p_validation_level => FND_API.g_valid_level_full,
2966: p_commit => FND_API.g_false,
2967: x_return_status => x_return_status,
2968: x_msg_count => x_msg_count,
2969: x_msg_data => x_msg_data,

Line 2966: p_commit => FND_API.g_false,

2962: Create_Deduction(
2963: p_api_version_number => 1.0,
2964: p_init_msg_list => FND_API.g_false,
2965: p_validation_level => FND_API.g_valid_level_full,
2966: p_commit => FND_API.g_false,
2967: x_return_status => x_return_status,
2968: x_msg_count => x_msg_count,
2969: x_msg_data => x_msg_data,
2970: p_deduction => l_deduction_rec,

Line 2976: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

2972: x_claim_number => x_claim_number,
2973: x_claim_reason_code_id => x_claim_reason_code_id,
2974: x_claim_reason_name => x_claim_reason_name
2975: );
2976: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2977: RAISE FND_API.G_EXC_ERROR;
2978: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2980: END IF;

Line 2977: RAISE FND_API.G_EXC_ERROR;

2973: x_claim_reason_code_id => x_claim_reason_code_id,
2974: x_claim_reason_name => x_claim_reason_name
2975: );
2976: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2977: RAISE FND_API.G_EXC_ERROR;
2978: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2980: END IF;
2981: END IF; -- amount sign has changed

Line 2978: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2974: x_claim_reason_name => x_claim_reason_name
2975: );
2976: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2977: RAISE FND_API.G_EXC_ERROR;
2978: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2980: END IF;
2981: END IF; -- amount sign has changed
2982: END IF ; -- is inv deduction

Line 2979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2975: );
2976: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
2977: RAISE FND_API.G_EXC_ERROR;
2978: ELSIF x_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2979: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2980: END IF;
2981: END IF; -- amount sign has changed
2982: END IF ; -- is inv deduction
2983:

Line 2987: ,p_init_msg_list => FND_API.g_false

2983:
2984: IF l_perform_subs_apply THEN
2985: Perform_Subsequent_Apply(
2986: p_api_version => l_api_version
2987: ,p_init_msg_list => FND_API.g_false
2988: ,p_validation_level => FND_API.g_valid_level_full
2989: ,x_return_status => l_return_status
2990: ,x_msg_count => x_msg_count
2991: ,x_msg_data => x_msg_data

Line 2988: ,p_validation_level => FND_API.g_valid_level_full

2984: IF l_perform_subs_apply THEN
2985: Perform_Subsequent_Apply(
2986: p_api_version => l_api_version
2987: ,p_init_msg_list => FND_API.g_false
2988: ,p_validation_level => FND_API.g_valid_level_full
2989: ,x_return_status => l_return_status
2990: ,x_msg_count => x_msg_count
2991: ,x_msg_data => x_msg_data
2992: ,p_deduction => l_deduction_rec

Line 2994: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

2990: ,x_msg_count => x_msg_count
2991: ,x_msg_data => x_msg_data
2992: ,p_deduction => l_deduction_rec
2993: );
2994: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2995: RAISE FND_API.G_EXC_ERROR;
2996: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;

Line 2995: RAISE FND_API.G_EXC_ERROR;

2991: ,x_msg_data => x_msg_data
2992: ,p_deduction => l_deduction_rec
2993: );
2994: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2995: RAISE FND_API.G_EXC_ERROR;
2996: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;
2999: END IF;

Line 2996: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

2992: ,p_deduction => l_deduction_rec
2993: );
2994: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2995: RAISE FND_API.G_EXC_ERROR;
2996: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;
2999: END IF;
3000:

Line 2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2993: );
2994: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
2995: RAISE FND_API.G_EXC_ERROR;
2996: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
2997: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2998: END IF;
2999: END IF;
3000:
3001: ELSIF l_deduction_rec.applied_action_type = 'U' THEN

Line 3007: ,p_init_msg_list => FND_API.g_false

3003: -- 4.2. Unpply --
3004: -----------------
3005: Perform_Subsequent_Unapply(
3006: p_api_version => l_api_version
3007: ,p_init_msg_list => FND_API.g_false
3008: ,p_validation_level => FND_API.g_valid_level_full
3009: ,x_return_status => l_return_status
3010: ,x_msg_count => x_msg_count
3011: ,x_msg_data => x_msg_data

Line 3008: ,p_validation_level => FND_API.g_valid_level_full

3004: -----------------
3005: Perform_Subsequent_Unapply(
3006: p_api_version => l_api_version
3007: ,p_init_msg_list => FND_API.g_false
3008: ,p_validation_level => FND_API.g_valid_level_full
3009: ,x_return_status => l_return_status
3010: ,x_msg_count => x_msg_count
3011: ,x_msg_data => x_msg_data
3012: ,p_deduction => l_deduction_rec

Line 3014: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

3010: ,x_msg_count => x_msg_count
3011: ,x_msg_data => x_msg_data
3012: ,p_deduction => l_deduction_rec
3013: );
3014: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3015: RAISE FND_API.G_EXC_ERROR;
3016: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3018: END IF;

Line 3015: RAISE FND_API.G_EXC_ERROR;

3011: ,x_msg_data => x_msg_data
3012: ,p_deduction => l_deduction_rec
3013: );
3014: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3015: RAISE FND_API.G_EXC_ERROR;
3016: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3018: END IF;
3019: END IF;

Line 3016: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3012: ,p_deduction => l_deduction_rec
3013: );
3014: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3015: RAISE FND_API.G_EXC_ERROR;
3016: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3018: END IF;
3019: END IF;
3020:

Line 3017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3013: );
3014: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3015: RAISE FND_API.G_EXC_ERROR;
3016: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3017: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3018: END IF;
3019: END IF;
3020:
3021: ---------------------------------------

Line 3041: IF FND_API.to_Boolean(p_commit) THEN

3037:
3038: Write_Log(l_full_name, 'end');
3039:
3040: -- Standard check for p_commit
3041: IF FND_API.to_Boolean(p_commit) THEN
3042: COMMIT WORK;
3043: END IF;
3044:
3045: -- Standard call to get message count and if count is 1, get message info.

Line 3052: WHEN FND_API.G_EXC_ERROR THEN

3048: p_data => x_msg_data
3049: );
3050:
3051: EXCEPTION
3052: WHEN FND_API.G_EXC_ERROR THEN
3053: ROLLBACK TO UPDATE_CLAIM_GRP;
3054: x_return_status := FND_API.G_RET_STS_ERROR;
3055: FND_MSG_PUB.Count_And_Get (
3056: p_encoded => FND_API.G_FALSE,

Line 3054: x_return_status := FND_API.G_RET_STS_ERROR;

3050:
3051: EXCEPTION
3052: WHEN FND_API.G_EXC_ERROR THEN
3053: ROLLBACK TO UPDATE_CLAIM_GRP;
3054: x_return_status := FND_API.G_RET_STS_ERROR;
3055: FND_MSG_PUB.Count_And_Get (
3056: p_encoded => FND_API.G_FALSE,
3057: p_count => x_msg_count,
3058: p_data => x_msg_data

Line 3056: p_encoded => FND_API.G_FALSE,

3052: WHEN FND_API.G_EXC_ERROR THEN
3053: ROLLBACK TO UPDATE_CLAIM_GRP;
3054: x_return_status := FND_API.G_RET_STS_ERROR;
3055: FND_MSG_PUB.Count_And_Get (
3056: p_encoded => FND_API.G_FALSE,
3057: p_count => x_msg_count,
3058: p_data => x_msg_data
3059: );
3060:

Line 3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

3057: p_count => x_msg_count,
3058: p_data => x_msg_data
3059: );
3060:
3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3062: ROLLBACK TO UPDATE_CLAIM_GRP;
3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3064: FND_MSG_PUB.Count_And_Get (
3065: p_encoded => FND_API.G_FALSE,

Line 3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3059: );
3060:
3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3062: ROLLBACK TO UPDATE_CLAIM_GRP;
3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3064: FND_MSG_PUB.Count_And_Get (
3065: p_encoded => FND_API.G_FALSE,
3066: p_count => x_msg_count,
3067: p_data => x_msg_data

Line 3065: p_encoded => FND_API.G_FALSE,

3061: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
3062: ROLLBACK TO UPDATE_CLAIM_GRP;
3063: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3064: FND_MSG_PUB.Count_And_Get (
3065: p_encoded => FND_API.G_FALSE,
3066: p_count => x_msg_count,
3067: p_data => x_msg_data
3068: );
3069:

Line 3072: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3068: );
3069:
3070: WHEN OTHERS THEN
3071: ROLLBACK TO UPDATE_claim_GRP;
3072: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3073: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
3074: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
3075: FND_MSG_PUB.add;
3076: END IF;

Line 3078: p_encoded => FND_API.G_FALSE,

3074: FND_MESSAGE.set_name('AMS', 'AMS_CLAIM_UPD_DEDU_ERR');
3075: FND_MSG_PUB.add;
3076: END IF;
3077: FND_MSG_PUB.Count_And_Get (
3078: p_encoded => FND_API.G_FALSE,
3079: p_count => x_msg_count,
3080: p_data => x_msg_data
3081: );
3082: