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_PVT dependencies on FND_API

Line 113: x_return_status := FND_API.G_RET_STS_SUCCESS;

109: AND user_status_id = p_user_status_id;
110:
111: BEGIN
112: -- Initialize API return status to sucess
113: x_return_status := FND_API.G_RET_STS_SUCCESS;
114:
115: OPEN system_status_csr(p_user_status_id, p_status_type);
116: FETCH system_status_csr INTO x_system_status;
117: CLOSE system_status_csr;

Line 121: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

117: CLOSE system_status_csr;
118:
119: EXCEPTION
120: WHEN OTHERS THEN
121: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
122: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
123: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_STATUS_CODE');
124: FND_MSG_PUB.add;
125: END IF;

Line 128: p_encoded => FND_API.G_FALSE,

124: FND_MSG_PUB.add;
125: END IF;
126: -- Standard call to get message count and if count=1, get the message
127: FND_MSG_PUB.Count_And_Get (
128: p_encoded => FND_API.G_FALSE,
129: p_count => x_msg_count,
130: p_data => x_msg_data
131: );
132: END Get_System_Status;

Line 162: x_return_status := FND_API.G_RET_STS_SUCCESS;

158: AND seeded_flag = 'Y';
159:
160: BEGIN
161: -- Initialize API return status to sucess
162: x_return_status := FND_API.G_RET_STS_SUCCESS;
163:
164: OPEN Get_Status_csr;
165: FETCH Get_Status_csr INTO x_user_status_id;
166: CLOSE Get_Status_csr;

Line 169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

165: FETCH Get_Status_csr INTO x_user_status_id;
166: CLOSE Get_Status_csr;
167: EXCEPTION
168: WHEN OTHERS THEN
169: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
170: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
171: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_USER_STATUS');
172: FND_MSG_PUB.add;
173: END IF;

Line 237: x_return_status := FND_API.G_RET_STS_SUCCESS;

233: l_claim_number_length NUMBER;
234:
235: BEGIN
236: -- Initialize API return status to sucess
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238:
239: IF (p_split_from_claim_id is null OR
240: p_split_from_claim_id = FND_API.G_MISS_NUM) THEN
241:

Line 240: p_split_from_claim_id = FND_API.G_MISS_NUM) THEN

236: -- Initialize API return status to sucess
237: x_return_status := FND_API.G_RET_STS_SUCCESS;
238:
239: IF (p_split_from_claim_id is null OR
240: p_split_from_claim_id = FND_API.G_MISS_NUM) THEN
241:
242: OPEN prefix_csr(p_custom_setup_id);
243: FETCH prefix_csr INTO l_prefix;
244: CLOSE prefix_csr;

Line 251: RAISE FND_API.G_EXC_ERROR;

247: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
248: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SUFFIX_NOT_FOUND');
249: FND_MSG_PUB.add;
250: END IF;
251: RAISE FND_API.G_EXC_ERROR;
252: END IF;
253:
254: OPEN c_seq_csr;
255: FETCH c_seq_csr INTO l_seq;

Line 293: RAISE FND_API.G_EXC_ERROR;

289: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
290: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NUMBER_TOO_LARGE');
291: FND_MSG_PUB.add;
292: END IF;
293: RAISE FND_API.G_EXC_ERROR;
294: END IF;
295: --Bug fix 3354592
296: l_claim_number := l_parent_claim_number || '_' || l_number_of_split_claim;
297: END IF;

Line 301: WHEN FND_API.G_EXC_ERROR THEN

297: END IF;
298: x_claim_number := l_claim_number;
299:
300: EXCEPTION
301: WHEN FND_API.G_EXC_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: WHEN OTHERS THEN
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
305: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

298: x_claim_number := l_claim_number;
299:
300: EXCEPTION
301: WHEN FND_API.G_EXC_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: WHEN OTHERS THEN
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
305: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NO_CLAIM_NUMBER');

Line 304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

300: EXCEPTION
301: WHEN FND_API.G_EXC_ERROR THEN
302: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
303: WHEN OTHERS THEN
304: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
305: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NO_CLAIM_NUMBER');
307: FND_MSG_PUB.add;
308: END IF;

Line 310: p_encoded => FND_API.G_FALSE,

306: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NO_CLAIM_NUMBER');
307: FND_MSG_PUB.add;
308: END IF;
309: FND_MSG_PUB.Count_And_Get (
310: p_encoded => FND_API.G_FALSE,
311: p_count => x_msg_count,
312: p_data => x_msg_data
313: );
314: END Get_Claim_Number;

Line 422: x_return_status := FND_API.G_RET_STS_SUCCESS;

418:
419: BEGIN
420:
421: -- Initialize API return status to sucess
422: x_return_status := FND_API.G_RET_STS_SUCCESS;
423:
424: -- Get customer info
425: OPEN cust_info_csr (l_claim.cust_account_id);
426: FETCH cust_info_csr INTO l_bill_to_id, l_pseudo_contact_id;

Line 438: l_claim.ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN

434: -- default it to cust_account_id if not a source deduction
435: -- end if
436: -- end if
437: IF (l_claim.ship_to_cust_account_id IS NULL OR
438: l_claim.ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
439: IF (l_claim.cust_shipto_acct_site_id is not null AND
440: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN
441: OPEN shipto_cust_account_id_csr(l_claim.cust_shipto_acct_site_id);
442: FETCH shipto_cust_account_id_csr INTO l_claim.ship_to_cust_account_id;

Line 440: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN

436: -- end if
437: IF (l_claim.ship_to_cust_account_id IS NULL OR
438: l_claim.ship_to_cust_account_id = FND_API.G_MISS_NUM) THEN
439: IF (l_claim.cust_shipto_acct_site_id is not null AND
440: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN
441: OPEN shipto_cust_account_id_csr(l_claim.cust_shipto_acct_site_id);
442: FETCH shipto_cust_account_id_csr INTO l_claim.ship_to_cust_account_id;
443: CLOSE shipto_cust_account_id_csr;
444: ELSE

Line 446: l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM) THEN

442: FETCH shipto_cust_account_id_csr INTO l_claim.ship_to_cust_account_id;
443: CLOSE shipto_cust_account_id_csr;
444: ELSE
445: IF (l_claim.SOURCE_OBJECT_ID IS NULL OR
446: l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM) THEN
447: l_claim.ship_to_cust_account_id := l_claim.cust_account_id;
448: ELSE -- Added the condition for 6338281
449: IF ((l_claim.SOURCE_OBJECT_ID IS NOT NULL OR
450: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) AND l_claim.cust_shipto_acct_site_id is null

Line 450: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) AND l_claim.cust_shipto_acct_site_id is null

446: l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM) THEN
447: l_claim.ship_to_cust_account_id := l_claim.cust_account_id;
448: ELSE -- Added the condition for 6338281
449: IF ((l_claim.SOURCE_OBJECT_ID IS NOT NULL OR
450: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) AND l_claim.cust_shipto_acct_site_id is null
451: OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM ) THEN
452: l_claim.ship_to_cust_account_id := l_claim.cust_account_id;
453: END IF;
454: END IF;

Line 451: OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM ) THEN

447: l_claim.ship_to_cust_account_id := l_claim.cust_account_id;
448: ELSE -- Added the condition for 6338281
449: IF ((l_claim.SOURCE_OBJECT_ID IS NOT NULL OR
450: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) AND l_claim.cust_shipto_acct_site_id is null
451: OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM ) THEN
452: l_claim.ship_to_cust_account_id := l_claim.cust_account_id;
453: END IF;
454: END IF;
455: END IF;

Line 463: IF (l_claim.cust_shipto_acct_site_id is null OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM)

459: -- if ship to site info is null then
460: -- default to primary ship to of shipto_cust_account_id if not a source deduction
461: -- end if
462: -- Added the souce_object_class check for 6338281
463: IF (l_claim.cust_shipto_acct_site_id is null OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM)
464: AND (l_claim.SOURCE_OBJECT_ID IS NULL OR l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM OR
465: l_claim.SOURCE_OBJECT_CLASS IN ('BATCH','SOFT_FUND','SPECIAL_PRICE')) THEN
466: OPEN cust_shipinfo_csr (l_claim.ship_to_cust_account_id);
467: FETCH cust_shipinfo_csr INTO l_claim.cust_shipto_acct_site_id;

Line 464: AND (l_claim.SOURCE_OBJECT_ID IS NULL OR l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM OR

460: -- default to primary ship to of shipto_cust_account_id if not a source deduction
461: -- end if
462: -- Added the souce_object_class check for 6338281
463: IF (l_claim.cust_shipto_acct_site_id is null OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM)
464: AND (l_claim.SOURCE_OBJECT_ID IS NULL OR l_claim.SOURCE_OBJECT_ID = FND_API.G_MISS_NUM OR
465: l_claim.SOURCE_OBJECT_CLASS IN ('BATCH','SOFT_FUND','SPECIAL_PRICE')) THEN
466: OPEN cust_shipinfo_csr (l_claim.ship_to_cust_account_id);
467: FETCH cust_shipinfo_csr INTO l_claim.cust_shipto_acct_site_id;
468: CLOSE cust_shipinfo_csr;

Line 472: IF (l_claim.cust_shipto_acct_site_id is null OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM)

468: CLOSE cust_shipinfo_csr;
469: END IF;
470:
471:
472: IF (l_claim.cust_shipto_acct_site_id is null OR l_claim.cust_shipto_acct_site_id = FND_API.G_MISS_NUM)
473: THEN
474: l_claim.ship_to_cust_account_id := NULL;
475: END IF;
476:

Line 485: l_claim.cust_billto_acct_site_id = FND_API.G_MISS_NUM) THEN

481: -- if still null then
482: -- default bill_to site based on the cust_account_id
483: -- end if;
484: IF (l_claim.cust_billto_acct_site_id is null OR
485: l_claim.cust_billto_acct_site_id = FND_API.G_MISS_NUM) THEN
486: IF l_claim.cust_shipto_acct_site_id IS NOT NULL AND l_claim.ship_to_cust_account_id = l_claim.cust_account_id THEN
487: OPEN bill_to_bsd_ship_to_csr (l_claim.cust_shipto_acct_site_id);
488: FETCH bill_to_bsd_ship_to_csr INTO l_claim.cust_billto_acct_site_id;
489: CLOSE bill_to_bsd_ship_to_csr;

Line 504: l_claim.sales_rep_id = FND_API.G_MISS_NUM) THEN

500: -- elsif bill_to site is not null
501: -- default salesrep_id based on the bill_to site
502: -- end if;
503: IF (l_claim.sales_rep_id is null OR
504: l_claim.sales_rep_id = FND_API.G_MISS_NUM) THEN
505:
506: -- If this is a deduction, we will try to get the salesrep_id from the transaction.
507: -- If we can't, we will try to default it based on shipto, billto and cust_acct_id.
508: --//Bug Fix: 7378832

Line 511: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) THEN

507: -- If we can't, we will try to default it based on shipto, billto and cust_acct_id.
508: --//Bug Fix: 7378832
509: IF l_claim.SOURCE_OBJECT_CLASS IN ('INVOICE','DM') THEN
510: IF (l_claim.SOURCE_OBJECT_ID is not NULL AND
511: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) THEN
512: OPEN PRM_SALES_REP_CSR (l_claim.source_object_id);
513: FETCH PRM_SALES_REP_CSR INTO l_claim.sales_rep_id;
514: CLOSE PRM_SALES_REP_CSR;
515: END IF;

Line 520: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM AND

516: END IF;
517:
518: IF (l_claim.sales_rep_id is null) THEN
519: IF l_claim.cust_shipto_acct_site_id is not null AND
520: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM AND
521: l_shipto_cust_account_id is not null AND
522: l_shipto_cust_account_id = l_claim.cust_account_id THEN
523:
524: OPEN salesrep_csr(l_claim.cust_shipto_acct_site_id);

Line 532: l_claim.cust_billto_acct_site_id <> FND_API.G_MISS_NUM) THEN

528:
529: -- Try billto_acct_site_id if salesrep id is still null
530: IF (l_claim.sales_rep_id is null AND
531: l_claim.cust_billto_acct_site_id is not null AND
532: l_claim.cust_billto_acct_site_id <> FND_API.G_MISS_NUM) THEN
533:
534: OPEN salesrep_csr(l_claim.cust_billto_acct_site_id);
535: FETCH salesrep_csr INTO l_claim.sales_rep_id;
536: CLOSE salesrep_csr;

Line 546: l_claim.contact_id = FND_API.G_MISS_NUM) THEN

542: -- if pseudo_contact_id is not null
543: -- default contact_id based on pseudo_contact_id and cust_account_id
544: -- end if;
545: IF (l_claim.CONTACT_ID is null OR
546: l_claim.contact_id = FND_API.G_MISS_NUM) THEN
547:
548: -- If this is a deduction, we will try to get the salesrep_id from the transaction.
549: -- If we can't, we will try to default it based on shipto, billto and cust_acct_id.
550: IF (l_claim.SOURCE_OBJECT_ID is not NULL AND

Line 551: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) THEN

547:
548: -- If this is a deduction, we will try to get the salesrep_id from the transaction.
549: -- If we can't, we will try to default it based on shipto, billto and cust_acct_id.
550: IF (l_claim.SOURCE_OBJECT_ID is not NULL AND
551: l_claim.SOURCE_OBJECT_ID <> FND_API.G_MISS_NUM) THEN
552: OPEN billto_contact_CSR (l_claim.source_object_id);
553: FETCH billto_contact_CSR INTO l_contact_id;
554: CLOSE billto_contact_CSR;
555:

Line 573: WHEN FND_API.G_EXC_ERROR THEN

569: END IF;
570:
571: x_claim := l_claim;
572: EXCEPTION
573: WHEN FND_API.G_EXC_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
577: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

570:
571: x_claim := l_claim;
572: EXCEPTION
573: WHEN FND_API.G_EXC_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
577: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
578: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CUSTOMER_INFO_ERR');

Line 576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

572: EXCEPTION
573: WHEN FND_API.G_EXC_ERROR THEN
574: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
575: WHEN OTHERS THEN
576: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
577: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
578: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CUSTOMER_INFO_ERR');
579: FND_MSG_PUB.add;
580: END IF;

Line 615: x_return_status := FND_API.G_RET_STS_SUCCESS;

611: l_days_due number;
612: BEGIN
613:
614: -- Initialize API return status to sucess
615: x_return_status := FND_API.G_RET_STS_SUCCESS;
616:
617: -- get customer info from trade profile
618: OPEN days_due_csr(p_cust_accout_id);
619: FETCH days_due_csr into l_days_due;

Line 633: WHEN FND_API.G_EXC_ERROR THEN

629: END IF;
630: END IF;
631: x_days_due:= l_days_due;
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: WHEN OTHERS THEN
636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
637: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

630: END IF;
631: x_days_due:= l_days_due;
632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: WHEN OTHERS THEN
636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
637: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
638: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DAYS_DUE_ERR');

Line 636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

632: EXCEPTION
633: WHEN FND_API.G_EXC_ERROR THEN
634: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
635: WHEN OTHERS THEN
636: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
637: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
638: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DAYS_DUE_ERR');
639: FND_MSG_PUB.add;
640: END IF;

Line 745: x_return_status := FND_API.G_RET_STS_SUCCESS;

741: WHERE location_id = p_location_id;
742:
743: BEGIN
744: -- Initialize API return status to sucess
745: x_return_status := FND_API.G_RET_STS_SUCCESS;
746:
747: -- get account_code
748: IF p_shipto_site_id is not null THEN
749: OPEN account_code_csr(p_shipto_site_id);

Line 844: WHEN FND_API.G_EXC_ERROR THEN

840: x_account_classification := l_account_classification;
841: x_account_hierarchy := l_account_hierarchy;
842:
843: EXCEPTION
844: WHEN FND_API.G_EXC_ERROR THEN
845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
846: WHEN OTHERS THEN
847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

841: x_account_hierarchy := l_account_hierarchy;
842:
843: EXCEPTION
844: WHEN FND_API.G_EXC_ERROR THEN
845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
846: WHEN OTHERS THEN
847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
849: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_OFF_QUAL_ERR');

Line 847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

843: EXCEPTION
844: WHEN FND_API.G_EXC_ERROR THEN
845: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
846: WHEN OTHERS THEN
847: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
848: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
849: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_OFF_QUAL_ERR');
850: FND_MSG_PUB.add;
851: END IF;

Line 934: x_return_status := FND_API.G_RET_STS_SUCCESS;

930: l_access_list_index number;
931: BEGIN
932:
933: -- Initialize API return status to sucess
934: x_return_status := FND_API.G_RET_STS_SUCCESS;
935:
936: x_owner_id := null;
937:
938: get_offer_qualifiers(

Line 959: IF x_return_status = FND_API.g_ret_sts_error THEN

955: x_account_classification => l_account_classification,
956: x_account_hierarchy => l_account_hierarchy,
957: x_return_status => x_return_status
958: );
959: IF x_return_status = FND_API.g_ret_sts_error THEN
960: RAISE FND_API.g_exc_error;
961: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
962: RAISE FND_API.g_exc_error;
963: END IF;

Line 960: RAISE FND_API.g_exc_error;

956: x_account_hierarchy => l_account_hierarchy,
957: x_return_status => x_return_status
958: );
959: IF x_return_status = FND_API.g_ret_sts_error THEN
960: RAISE FND_API.g_exc_error;
961: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
962: RAISE FND_API.g_exc_error;
963: END IF;
964:

Line 961: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN

957: x_return_status => x_return_status
958: );
959: IF x_return_status = FND_API.g_ret_sts_error THEN
960: RAISE FND_API.g_exc_error;
961: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
962: RAISE FND_API.g_exc_error;
963: END IF;
964:
965: -- bulk_trans_rec_type instantiation

Line 962: RAISE FND_API.g_exc_error;

958: );
959: IF x_return_status = FND_API.g_ret_sts_error THEN
960: RAISE FND_API.g_exc_error;
961: ELSIF x_return_status = FND_API.g_ret_sts_unexp_error THEN
962: RAISE FND_API.g_exc_error;
963: END IF;
964:
965: -- bulk_trans_rec_type instantiation
966: -- logic control properties

Line 1182: p_init_msg_list => FND_API.G_FALSE,

1178: -- source_id : TM :-1003
1179: -- trasns_id : -1007 : offer, -1302: claim
1180: JTF_TERR_ASSIGN_PUB.get_winners
1181: ( p_api_version_number => 1.0,
1182: p_init_msg_list => FND_API.G_FALSE,
1183:
1184: p_use_type => l_use_type,
1185: p_source_id => -1003,
1186: p_trans_id => -1302,

Line 1189: p_resource_type => FND_API.G_MISS_CHAR,

1185: p_source_id => -1003,
1186: p_trans_id => -1302,
1187: p_trans_rec => lp_gen_bulk_rec,
1188:
1189: p_resource_type => FND_API.G_MISS_CHAR,
1190: p_role => FND_API.G_MISS_CHAR,
1191: p_top_level_terr_id => FND_API.G_MISS_NUM,
1192: p_num_winners => FND_API.G_MISS_NUM,
1193:

Line 1190: p_role => FND_API.G_MISS_CHAR,

1186: p_trans_id => -1302,
1187: p_trans_rec => lp_gen_bulk_rec,
1188:
1189: p_resource_type => FND_API.G_MISS_CHAR,
1190: p_role => FND_API.G_MISS_CHAR,
1191: p_top_level_terr_id => FND_API.G_MISS_NUM,
1192: p_num_winners => FND_API.G_MISS_NUM,
1193:
1194: x_return_status => l_return_status,

Line 1191: p_top_level_terr_id => FND_API.G_MISS_NUM,

1187: p_trans_rec => lp_gen_bulk_rec,
1188:
1189: p_resource_type => FND_API.G_MISS_CHAR,
1190: p_role => FND_API.G_MISS_CHAR,
1191: p_top_level_terr_id => FND_API.G_MISS_NUM,
1192: p_num_winners => FND_API.G_MISS_NUM,
1193:
1194: x_return_status => l_return_status,
1195: x_msg_count => l_msg_count,

Line 1192: p_num_winners => FND_API.G_MISS_NUM,

1188:
1189: p_resource_type => FND_API.G_MISS_CHAR,
1190: p_role => FND_API.G_MISS_CHAR,
1191: p_top_level_terr_id => FND_API.G_MISS_NUM,
1192: p_num_winners => FND_API.G_MISS_NUM,
1193:
1194: x_return_status => l_return_status,
1195: x_msg_count => l_msg_count,
1196: x_msg_data => l_msg_data,

Line 1199: IF l_return_status = FND_API.g_ret_sts_error THEN

1195: x_msg_count => l_msg_count,
1196: x_msg_data => l_msg_data,
1197: x_winners_rec => l_gen_return_rec
1198: );
1199: IF l_return_status = FND_API.g_ret_sts_error THEN
1200: RAISE FND_API.g_exc_error;
1201: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1202: RAISE FND_API.g_exc_unexpected_error;
1203: END IF;

Line 1200: RAISE FND_API.g_exc_error;

1196: x_msg_data => l_msg_data,
1197: x_winners_rec => l_gen_return_rec
1198: );
1199: IF l_return_status = FND_API.g_ret_sts_error THEN
1200: RAISE FND_API.g_exc_error;
1201: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1202: RAISE FND_API.g_exc_unexpected_error;
1203: END IF;
1204:

Line 1201: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1197: x_winners_rec => l_gen_return_rec
1198: );
1199: IF l_return_status = FND_API.g_ret_sts_error THEN
1200: RAISE FND_API.g_exc_error;
1201: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1202: RAISE FND_API.g_exc_unexpected_error;
1203: END IF;
1204:
1205: IF OZF_DEBUG_HIGH_ON THEN

Line 1202: RAISE FND_API.g_exc_unexpected_error;

1198: );
1199: IF l_return_status = FND_API.g_ret_sts_error THEN
1200: RAISE FND_API.g_exc_error;
1201: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1202: RAISE FND_API.g_exc_unexpected_error;
1203: END IF;
1204:
1205: IF OZF_DEBUG_HIGH_ON THEN
1206: ozf_utility_PVT.debug_message('winner count:' || l_gen_return_Rec.terr_id.count );

Line 1328: WHEN FND_API.G_EXC_ERROR THEN

1324: END IF;
1325: x_access_list := l_access_list;
1326:
1327: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1332: WHEN OTHERS THEN

Line 1329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1325: x_access_list := l_access_list;
1326:
1327: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1332: WHEN OTHERS THEN
1333: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1326:
1327: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1332: WHEN OTHERS THEN
1333: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1334: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,'Get_owner');

Line 1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1327: EXCEPTION
1328: WHEN FND_API.G_EXC_ERROR THEN
1329: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1330: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1331: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1332: WHEN OTHERS THEN
1333: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1334: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,'Get_owner');
1335: END IF;

Line 1336: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1332: WHEN OTHERS THEN
1333: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1334: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,'Get_owner');
1335: END IF;
1336: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1337: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1338: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_GET_OWNER_ERR');
1339: FND_MSG_PUB.add;
1340: END IF;

Line 1383: x_return_status := FND_API.G_RET_STS_SUCCESS;

1379: WHERE task_id = p_task_id;
1380:
1381: BEGIN
1382: -- Initialize API return status to sucess
1383: x_return_status := FND_API.G_RET_STS_SUCCESS;
1384:
1385: IF OZF_DEBUG_LOW_ON THEN
1386: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
1387: FND_MESSAGE.Set_Token('TEXT','create task from template');

Line 1394: ,p_init_msg_list => FND_API.g_false

1390:
1391: -- Generate taks template
1392: JTF_TASKS_PUB.create_task_from_template(
1393: p_api_version => l_api_version
1394: ,p_init_msg_list => FND_API.g_false
1395: ,p_commit => FND_API.g_false
1396: ,x_return_status => l_return_status
1397: ,x_msg_count => l_msg_count
1398: ,x_msg_data => l_msg_data

Line 1395: ,p_commit => FND_API.g_false

1391: -- Generate taks template
1392: JTF_TASKS_PUB.create_task_from_template(
1393: p_api_version => l_api_version
1394: ,p_init_msg_list => FND_API.g_false
1395: ,p_commit => FND_API.g_false
1396: ,x_return_status => l_return_status
1397: ,x_msg_count => l_msg_count
1398: ,x_msg_data => l_msg_data
1399: ,p_task_template_group_id => p_task_template_group_id

Line 1406: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN

1402: ,p_source_object_id => l_claim_id
1403: ,p_source_object_name=> p_claim_number
1404: ,x_task_details_tbl => l_task_details_tbl
1405: );
1406: IF l_return_status = FND_API.G_RET_STS_SUCCESS THEN
1407: -- Generate tasks
1408: FOR i in 1..l_task_details_tbl.count LOOP
1409:
1410: OPEN task_status_csr(l_task_details_tbl(i).task_id);

Line 1431: IF l_return_status = FND_API.g_ret_sts_error THEN

1427: x_msg_count => l_msg_count ,
1428: x_msg_data => l_msg_data,
1429: X_TASK_ASSIGNMENT_ID => l_task_assignment_id
1430: );
1431: IF l_return_status = FND_API.g_ret_sts_error THEN
1432: RAISE FND_API.g_exc_error;
1433: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1434: RAISE FND_API.g_exc_unexpected_error;
1435: END IF;

Line 1432: RAISE FND_API.g_exc_error;

1428: x_msg_data => l_msg_data,
1429: X_TASK_ASSIGNMENT_ID => l_task_assignment_id
1430: );
1431: IF l_return_status = FND_API.g_ret_sts_error THEN
1432: RAISE FND_API.g_exc_error;
1433: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1434: RAISE FND_API.g_exc_unexpected_error;
1435: END IF;
1436:

Line 1433: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1429: X_TASK_ASSIGNMENT_ID => l_task_assignment_id
1430: );
1431: IF l_return_status = FND_API.g_ret_sts_error THEN
1432: RAISE FND_API.g_exc_error;
1433: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1434: RAISE FND_API.g_exc_unexpected_error;
1435: END IF;
1436:
1437: END LOOP;

Line 1434: RAISE FND_API.g_exc_unexpected_error;

1430: );
1431: IF l_return_status = FND_API.g_ret_sts_error THEN
1432: RAISE FND_API.g_exc_error;
1433: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1434: RAISE FND_API.g_exc_unexpected_error;
1435: END IF;
1436:
1437: END LOOP;
1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN

Line 1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN

1434: RAISE FND_API.g_exc_unexpected_error;
1435: END IF;
1436:
1437: END LOOP;
1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;

Line 1439: RAISE FND_API.g_exc_error;

1435: END IF;
1436:
1437: END LOOP;
1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443: EXCEPTION

Line 1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1436:
1437: END LOOP;
1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN

Line 1441: RAISE FND_API.g_exc_unexpected_error;

1437: END LOOP;
1438: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1439: RAISE FND_API.g_exc_error;
1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN
1445: x_return_status := FND_API.G_RET_STS_ERROR;

Line 1444: WHEN FND_API.G_EXC_ERROR THEN

1440: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN
1445: x_return_status := FND_API.G_RET_STS_ERROR;
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1448: WHEN OTHERS THEN

Line 1445: x_return_status := FND_API.G_RET_STS_ERROR;

1441: RAISE FND_API.g_exc_unexpected_error;
1442: END IF;
1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN
1445: x_return_status := FND_API.G_RET_STS_ERROR;
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1448: WHEN OTHERS THEN
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1442: END IF;
1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN
1445: x_return_status := FND_API.G_RET_STS_ERROR;
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1448: WHEN OTHERS THEN
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1443: EXCEPTION
1444: WHEN FND_API.G_EXC_ERROR THEN
1445: x_return_status := FND_API.G_RET_STS_ERROR;
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1448: WHEN OTHERS THEN
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1451: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TASK_API_ERR');

Line 1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1445: x_return_status := FND_API.G_RET_STS_ERROR;
1446: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1447: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1448: WHEN OTHERS THEN
1449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1450: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
1451: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_TASK_API_ERR');
1452: FND_MSG_PUB.add;
1453: END IF;

Line 1532: x_return_status := FND_API.G_RET_STS_SUCCESS;

1528: WHERE org_id = MO_GLOBAL.GET_CURRENT_ORG_ID();
1529:
1530: BEGIN
1531:
1532: x_return_status := FND_API.G_RET_STS_SUCCESS;
1533:
1534: IF (l_cust_account_id IS NOT NULL)
1535: OR (l_cust_account_id <> FND_API.G_MISS_NUM)
1536: THEN

Line 1535: OR (l_cust_account_id <> FND_API.G_MISS_NUM)

1531:
1532: x_return_status := FND_API.G_RET_STS_SUCCESS;
1533:
1534: IF (l_cust_account_id IS NOT NULL)
1535: OR (l_cust_account_id <> FND_API.G_MISS_NUM)
1536: THEN
1537: --Get the thresholds from customer trade profile based on account id
1538: OPEN get_cst_trd_prfl_wo_thr_csr(l_cust_account_id);
1539: FETCH get_cst_trd_prfl_wo_thr_csr

Line 1544: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)

1540: INTO l_ded_pos_write_off_threshold, l_opy_neg_write_off_threshold;
1541: CLOSE get_cst_trd_prfl_wo_thr_csr;
1542:
1543: --START 1
1544: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)
1545: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)
1546: THEN
1547:
1548: --Get the customers party_id

Line 1545: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)

1541: CLOSE get_cst_trd_prfl_wo_thr_csr;
1542:
1543: --START 1
1544: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)
1545: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)
1546: THEN
1547:
1548: --Get the customers party_id
1549: OPEN get_party_id_csr(l_cust_account_id);

Line 1553: IF (l_party_id IS NOT NULL AND l_party_id <> FND_API.G_MISS_NUM)

1549: OPEN get_party_id_csr(l_cust_account_id);
1550: FETCH get_party_id_csr INTO l_party_id;
1551: CLOSE get_party_id_csr;
1552:
1553: IF (l_party_id IS NOT NULL AND l_party_id <> FND_API.G_MISS_NUM)
1554: THEN
1555: --Get the thresholds from customer trade profile based on party id
1556: OPEN get_prt_trd_prfl_wo_thr_csr(l_party_id);
1557: FETCH get_prt_trd_prfl_wo_thr_csr

Line 1561: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)

1557: FETCH get_prt_trd_prfl_wo_thr_csr
1558: INTO l_ded_pos_write_off_threshold, l_opy_neg_write_off_threshold;
1559: CLOSE get_prt_trd_prfl_wo_thr_csr;
1560:
1561: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)
1562: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)
1563: THEN
1564: --if the thresholds are null then get from the system paramters.
1565: l_get_thr_frm_sysparam := true;

Line 1562: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)

1558: INTO l_ded_pos_write_off_threshold, l_opy_neg_write_off_threshold;
1559: CLOSE get_prt_trd_prfl_wo_thr_csr;
1560:
1561: IF (l_ded_pos_write_off_threshold IS NULL OR l_ded_pos_write_off_threshold = FND_API.G_MISS_NUM)
1562: AND(l_opy_neg_write_off_threshold IS NULL OR l_opy_neg_write_off_threshold = FND_API.G_MISS_NUM)
1563: THEN
1564: --if the thresholds are null then get from the system paramters.
1565: l_get_thr_frm_sysparam := true;
1566: END IF;

Line 1594: WHEN FND_API.G_EXC_ERROR THEN

1590: x_ded_pos_write_off_threshold := l_ded_pos_write_off_threshold;
1591: x_opy_neg_write_off_threshold := l_opy_neg_write_off_threshold;
1592:
1593: EXCEPTION
1594: WHEN FND_API.G_EXC_ERROR THEN
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1596: WHEN OTHERS THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1591: x_opy_neg_write_off_threshold := l_opy_neg_write_off_threshold;
1592:
1593: EXCEPTION
1594: WHEN FND_API.G_EXC_ERROR THEN
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1596: WHEN OTHERS THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1599: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_WO_THRESHOLD_ERROR');

Line 1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1593: EXCEPTION
1594: WHEN FND_API.G_EXC_ERROR THEN
1595: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1596: WHEN OTHERS THEN
1597: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1598: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1599: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_WO_THRESHOLD_ERROR');
1600: FND_MSG_PUB.ADD;
1601: END IF;

Line 1672: x_return_status := FND_API.G_RET_STS_SUCCESS;

1668: WHERE org_id = MO_GLOBAL.GET_CURRENT_ORG_ID();
1669:
1670: BEGIN
1671:
1672: x_return_status := FND_API.G_RET_STS_SUCCESS;
1673:
1674: --Get the write-off thresholds
1675: get_write_off_threshold( p_cust_account_id => l_cust_account_id
1676: , x_ded_pos_write_off_threshold => l_ded_pos_threshold_amount

Line 1681: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN

1677: , x_opy_neg_write_off_threshold => l_opy_neg_threshold_amount
1678: , x_return_status => l_return_status
1679: );
1680:
1681: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1682: RAISE FND_API.g_exc_error;
1683: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1684: RAISE FND_API.g_exc_unexpected_error;
1685: END IF;

Line 1682: RAISE FND_API.g_exc_error;

1678: , x_return_status => l_return_status
1679: );
1680:
1681: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1682: RAISE FND_API.g_exc_error;
1683: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1684: RAISE FND_API.g_exc_unexpected_error;
1685: END IF;
1686:

Line 1683: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN

1679: );
1680:
1681: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1682: RAISE FND_API.g_exc_error;
1683: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1684: RAISE FND_API.g_exc_unexpected_error;
1685: END IF;
1686:
1687: --Get the functional currency code

Line 1684: RAISE FND_API.g_exc_unexpected_error;

1680:
1681: IF (l_return_status = FND_API.G_RET_STS_ERROR) THEN
1682: RAISE FND_API.g_exc_error;
1683: ELSIF (l_return_status = FND_API.G_RET_STS_UNEXP_ERROR) THEN
1684: RAISE FND_API.g_exc_unexpected_error;
1685: END IF;
1686:
1687: --Get the functional currency code
1688: OPEN gp_func_currency_cd_csr;

Line 1695: OR l_currency_code = FND_API.G_MISS_CHAR) THEN

1691:
1692: --Default the transaction currency code to functional currency
1693: -- if the transaction currency code is null
1694: IF (l_currency_code IS NULL
1695: OR l_currency_code = FND_API.G_MISS_CHAR) THEN
1696: l_currency_code := l_functional_currency_code;
1697: END IF;
1698:
1699: --If the transaction currency code is different from the functional currency code

Line 1703: OR l_exchange_rate_type = FND_API.G_MISS_CHAR) THEN

1699: --If the transaction currency code is different from the functional currency code
1700: -- ensure that the exchange type is not null.
1701: IF (l_currency_code <> l_functional_currency_code) THEN
1702: IF (l_exchange_rate_type IS NULL
1703: OR l_exchange_rate_type = FND_API.G_MISS_CHAR) THEN
1704: --Get the default exchange rate type
1705: OPEN get_exchange_rate_type_csr;
1706: FETCH get_exchange_rate_type_csr INTO l_exchange_rate_type;
1707: CLOSE get_exchange_rate_type_csr;

Line 1712: OR l_exchange_rate_type = FND_API.G_MISS_CHAR) THEN

1708:
1709:
1710: --If the exchange rate type is null then raise an error
1711: IF (l_exchange_rate_type IS NULL
1712: OR l_exchange_rate_type = FND_API.G_MISS_CHAR) THEN
1713: IF FND_MSG_PUB.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1714: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
1715: FND_MSG_PUB.add;
1716: END IF;

Line 1717: RAISE FND_API.G_EXC_ERROR;

1713: IF FND_MSG_PUB.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
1714: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
1715: FND_MSG_PUB.add;
1716: END IF;
1717: RAISE FND_API.G_EXC_ERROR;
1718: END IF;
1719: END IF;
1720:
1721: --Check the exchange rate date.

Line 1723: OR l_exchange_rate_date = FND_API.G_MISS_DATE) THEN

1719: END IF;
1720:
1721: --Check the exchange rate date.
1722: IF (l_exchange_rate_date IS NULL
1723: OR l_exchange_rate_date = FND_API.G_MISS_DATE) THEN
1724: l_exchange_rate_date := SYSDATE;
1725: END IF;
1726:
1727: IF OZF_DEBUG_HIGH_ON THEN

Line 1742: IF (l_return_status = FND_API.g_ret_sts_error) THEN

1738: P_AMOUNT => l_amount,
1739: X_RETURN_STATUS => l_return_status,
1740: X_ACC_AMOUNT => l_acc_amount,
1741: X_RATE => l_rate);
1742: IF (l_return_status = FND_API.g_ret_sts_error) THEN
1743: RAISE FND_API.g_exc_error;
1744: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1745: RAISE FND_API.g_exc_unexpected_error;
1746: END IF;

Line 1743: RAISE FND_API.g_exc_error;

1739: X_RETURN_STATUS => l_return_status,
1740: X_ACC_AMOUNT => l_acc_amount,
1741: X_RATE => l_rate);
1742: IF (l_return_status = FND_API.g_ret_sts_error) THEN
1743: RAISE FND_API.g_exc_error;
1744: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1745: RAISE FND_API.g_exc_unexpected_error;
1746: END IF;
1747:

Line 1744: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN

1740: X_ACC_AMOUNT => l_acc_amount,
1741: X_RATE => l_rate);
1742: IF (l_return_status = FND_API.g_ret_sts_error) THEN
1743: RAISE FND_API.g_exc_error;
1744: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1745: RAISE FND_API.g_exc_unexpected_error;
1746: END IF;
1747:
1748: l_exchange_rate := l_rate;

Line 1745: RAISE FND_API.g_exc_unexpected_error;

1741: X_RATE => l_rate);
1742: IF (l_return_status = FND_API.g_ret_sts_error) THEN
1743: RAISE FND_API.g_exc_error;
1744: ELSIF (l_return_status = FND_API.g_ret_sts_unexp_error) THEN
1745: RAISE FND_API.g_exc_unexpected_error;
1746: END IF;
1747:
1748: l_exchange_rate := l_rate;
1749: l_acctd_amount := l_acc_amount;

Line 1806: WHEN FND_API.G_EXC_ERROR THEN

1802: px_acctd_amount_remaining := l_acctd_amount_remaining;
1803:
1804:
1805: EXCEPTION
1806: WHEN FND_API.G_EXC_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: WHEN OTHERS THEN
1809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1810: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN

Line 1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1803:
1804:
1805: EXCEPTION
1806: WHEN FND_API.G_EXC_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: WHEN OTHERS THEN
1809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1810: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1811: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_WRITE_OFF_SETUP_ERR');

Line 1809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1805: EXCEPTION
1806: WHEN FND_API.G_EXC_ERROR THEN
1807: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1808: WHEN OTHERS THEN
1809: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1810: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
1811: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_WRITE_OFF_SETUP_ERR');
1812: FND_MSG_PUB.add;
1813: END IF;

Line 1866: x_return_status := FND_API.g_ret_sts_success;

1862: WHERE h.cust_account_id = p_cust_id;
1863:
1864: BEGIN
1865:
1866: x_return_status := FND_API.g_ret_sts_success;
1867:
1868: OPEN c_party_id(l_cust_account_id);
1869: FETCH c_party_id INTO l_party_id;
1870: CLOSE c_party_id;

Line 1872: IF (l_customer_reason is not NULL or l_customer_reason <> FND_API.G_MISS_CHAR) AND

1868: OPEN c_party_id(l_cust_account_id);
1869: FETCH c_party_id INTO l_party_id;
1870: CLOSE c_party_id;
1871:
1872: IF (l_customer_reason is not NULL or l_customer_reason <> FND_API.G_MISS_CHAR) AND
1873: (l_reason_code_id is NULL or l_reason_code_id = FND_API.G_MISS_NUM) THEN
1874: -- ----------------------------------------------------------------------------
1875: -- Call OZF_CODE_CONVERSION_PVT.convert_code.
1876: -- ----------------------------------------------------------------------------

Line 1873: (l_reason_code_id is NULL or l_reason_code_id = FND_API.G_MISS_NUM) THEN

1869: FETCH c_party_id INTO l_party_id;
1870: CLOSE c_party_id;
1871:
1872: IF (l_customer_reason is not NULL or l_customer_reason <> FND_API.G_MISS_CHAR) AND
1873: (l_reason_code_id is NULL or l_reason_code_id = FND_API.G_MISS_NUM) THEN
1874: -- ----------------------------------------------------------------------------
1875: -- Call OZF_CODE_CONVERSION_PVT.convert_code.
1876: -- ----------------------------------------------------------------------------
1877: OZF_CODE_CONVERSION_PVT.convert_code(

Line 1887: IF l_return_status = FND_API.g_ret_sts_error THEN

1883: X_Return_Status => l_return_status,
1884: X_Msg_Count => l_msg_count,
1885: X_Msg_Data => l_msg_data );
1886:
1887: IF l_return_status = FND_API.g_ret_sts_error THEN
1888: RAISE FND_API.g_exc_error;
1889: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1890: RAISE FND_API.g_exc_unexpected_error;
1891: END IF;

Line 1888: RAISE FND_API.g_exc_error;

1884: X_Msg_Count => l_msg_count,
1885: X_Msg_Data => l_msg_data );
1886:
1887: IF l_return_status = FND_API.g_ret_sts_error THEN
1888: RAISE FND_API.g_exc_error;
1889: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1890: RAISE FND_API.g_exc_unexpected_error;
1891: END IF;
1892:

Line 1889: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

1885: X_Msg_Data => l_msg_data );
1886:
1887: IF l_return_status = FND_API.g_ret_sts_error THEN
1888: RAISE FND_API.g_exc_error;
1889: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1890: RAISE FND_API.g_exc_unexpected_error;
1891: END IF;
1892:
1893: IF l_internal_code is not null THEN

Line 1890: RAISE FND_API.g_exc_unexpected_error;

1886:
1887: IF l_return_status = FND_API.g_ret_sts_error THEN
1888: RAISE FND_API.g_exc_error;
1889: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1890: RAISE FND_API.g_exc_unexpected_error;
1891: END IF;
1892:
1893: IF l_internal_code is not null THEN
1894: l_claim_reason_code_id := to_number(l_internal_code);

Line 1906: RAISE FND_API.G_EXC_ERROR;

1902: THEN
1903: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NO_REASON_MAPPING');
1904: FND_MSG_PUB.add;
1905: END IF;
1906: RAISE FND_API.G_EXC_ERROR;
1907: END IF;
1908: END IF;
1909:
1910: px_reason_code_id := l_reason_code_id;

Line 1912: WHEN FND_API.G_EXC_ERROR THEN

1908: END IF;
1909:
1910: px_reason_code_id := l_reason_code_id;
1911: EXCEPTION
1912: WHEN FND_API.G_EXC_ERROR THEN
1913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1914: WHEN OTHERS THEN
1915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1916: END Get_Customer_Reason;

Line 1913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1909:
1910: px_reason_code_id := l_reason_code_id;
1911: EXCEPTION
1912: WHEN FND_API.G_EXC_ERROR THEN
1913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1914: WHEN OTHERS THEN
1915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1916: END Get_Customer_Reason;
1917:

Line 1915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1911: EXCEPTION
1912: WHEN FND_API.G_EXC_ERROR THEN
1913: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1914: WHEN OTHERS THEN
1915: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1916: END Get_Customer_Reason;
1917:
1918:
1919:

Line 1965: x_return_status := FND_API.G_RET_STS_SUCCESS;

1961:
1962: BEGIN
1963:
1964: -- Initialize API return status to sucess
1965: x_return_status := FND_API.G_RET_STS_SUCCESS;
1966: x_pass := true;
1967:
1968: OPEN amount_csr(p_claim.claim_id);
1969: FETCH amount_csr into l_info;

Line 2060: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2056: (p_claim.exchange_rate <> l_info.exchange_rate));
2057:
2058: EXCEPTION
2059: WHEN OTHERS THEN
2060: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2061: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2062: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AMOUNT_CHANGE_ERR');
2063: FND_MSG_PUB.add;
2064: END IF;

Line 2107: x_return_status := FND_API.G_RET_STS_SUCCESS;

2103:
2104: l_count number:=0;
2105: BEGIN
2106: -- Initialize API return status to sucess
2107: x_return_status := FND_API.G_RET_STS_SUCCESS;
2108:
2109: IF ((p_claim_number is null) OR
2110: (p_claim_number = FND_API.G_MISS_CHAR)) THEN
2111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

Line 2110: (p_claim_number = FND_API.G_MISS_CHAR)) THEN

2106: -- Initialize API return status to sucess
2107: x_return_status := FND_API.G_RET_STS_SUCCESS;
2108:
2109: IF ((p_claim_number is null) OR
2110: (p_claim_number = FND_API.G_MISS_CHAR)) THEN
2111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2112: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_MISSING_CLAIM_NUM');
2113: FND_MSG_PUB.add;
2114: END IF;

Line 2115: x_return_status := FND_API.g_ret_sts_error;

2111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2112: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_MISSING_CLAIM_NUM');
2113: FND_MSG_PUB.add;
2114: END IF;
2115: x_return_status := FND_API.g_ret_sts_error;
2116: ELSE
2117: -- claim_id will never be not null at this point.
2118: -- so we first check whether this is a new claim or not.
2119: l_count := 0;

Line 2137: x_return_status := FND_API.g_ret_sts_error;

2133: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2134: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUP_CLAIM_NUM_NEW');
2135: FND_MSG_PUB.add;
2136: END IF;
2137: x_return_status := FND_API.g_ret_sts_error;
2138: END IF;
2139: ELSE
2140: -- check claim_number for an old claim. Here claim_number and claim_id should match
2141: -- and claim_number should be unique.

Line 2152: x_return_status := FND_API.g_ret_sts_error;

2148: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2149: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_ID_NUM_MISS');
2150: FND_MSG_PUB.add;
2151: END IF;
2152: x_return_status := FND_API.g_ret_sts_error;
2153: ELSE
2154: l_count := 0;
2155: OPEN get_claim_id_num_csr(p_claim_number);
2156: FETCH get_claim_id_num_csr INTO l_count;

Line 2164: x_return_status := FND_API.g_ret_sts_error;

2160: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
2161: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUP_CLAIM_NUM');
2162: FND_MSG_PUB.add;
2163: END IF;
2164: x_return_status := FND_API.g_ret_sts_error;
2165: END IF;
2166: END IF;
2167: END IF;
2168: END IF;

Line 2176: x_return_status := FND_API.g_ret_sts_unexp_error;

2172: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2173: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_NUM_CHECK_ERROR');
2174: FND_MSG_PUB.add;
2175: END IF;
2176: x_return_status := FND_API.g_ret_sts_unexp_error;
2177: END check_claim_number;
2178:
2179: ---------------------------------------------------------------------
2180: -- PROCEDURE

Line 2202: x_return_status := FND_API.G_RET_STS_SUCCESS;

2198: IS
2199: l_return_status varchar2(30);
2200: BEGIN
2201: -- Initialize API return status to sucess
2202: x_return_status := FND_API.G_RET_STS_SUCCESS;
2203:
2204: -- check for duplicate claim numbers
2205: check_claim_number(
2206: p_claim_id => p_claim_rec.claim_id,

Line 2246: p_reason_code_id <> FND_API.G_MISS_NUM) THEN

2242: l_default_action_id number;
2243: BEGIN
2244:
2245: If (p_reason_code_id is not null and
2246: p_reason_code_id <> FND_API.G_MISS_NUM) THEN
2247: OPEN default_action_id_csr(p_reason_code_id);
2248: FETCH default_action_id_csr into l_default_action_id;
2249: CLOSE default_action_id_csr;
2250:

Line 2293: x_return_status := FND_API.G_RET_STS_SUCCESS;

2289:
2290: BEGIN
2291:
2292: -- Initialize API return status to sucess
2293: x_return_status := FND_API.G_RET_STS_SUCCESS;
2294: x_pass := true;
2295:
2296: OPEN deduction_info_csr(p_claim.claim_id);
2297: FETCH deduction_info_csr into l_deduction_info;

Line 2330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2326: END IF;
2327:
2328: EXCEPTION
2329: WHEN OTHERS THEN
2330: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2331: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
2332: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DED_CHK_ERR');
2333: FND_MSG_PUB.add;
2334: END IF;

Line 2343: -- FND_API.g_miss_char/num/date if the user doesn't want to

2339: -- Complete_Claim_Rec
2340: --
2341: -- PURPOSE
2342: -- For Update_Claim, some attributes may be passed in as
2343: -- FND_API.g_miss_char/num/date if the user doesn't want to
2344: -- update those attributes. This procedure will replace the
2345: -- "g_miss" attributes with current database values.
2346: --
2347: -- PARAMETERS

Line 2349: -- FND_API.g_miss_char/num/date

2345: -- "g_miss" attributes with current database values.
2346: --
2347: -- PARAMETERS
2348: -- p_claim_rec : the record which may contain attributes as
2349: -- FND_API.g_miss_char/num/date
2350: -- x_complete_rec: the complete record after all "g_miss" items
2351: -- have been replaced by current database values
2352: ---------------------------------------------------------------------
2353: PROCEDURE Complete_Claim_Rec (

Line 2368: x_return_status := FND_API.G_RET_STS_SUCCESS;

2364:
2365: BEGIN
2366:
2367: -- Initialize API return status to sucess
2368: x_return_status := FND_API.G_RET_STS_SUCCESS;
2369:
2370: x_complete_rec := p_claim_rec;
2371:
2372: OPEN c_claim(p_claim_rec.claim_id);

Line 2380: RAISE FND_API.g_exc_error;

2376: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
2377: FND_MESSAGE.set_name('OZF','OZF_API_RECORD_NOT_FOUND');
2378: FND_MSG_PUB.add;
2379: END IF;
2380: RAISE FND_API.g_exc_error;
2381: END IF;
2382: CLOSE c_claim;
2383:
2384: IF p_claim_rec.claim_id = FND_API.G_MISS_NUM THEN

Line 2384: IF p_claim_rec.claim_id = FND_API.G_MISS_NUM THEN

2380: RAISE FND_API.g_exc_error;
2381: END IF;
2382: CLOSE c_claim;
2383:
2384: IF p_claim_rec.claim_id = FND_API.G_MISS_NUM THEN
2385: x_complete_rec.claim_id := NULL;
2386: END IF;
2387: IF p_claim_rec.claim_id IS NULL THEN
2388: x_complete_rec.claim_id := l_claim_rec.claim_id;

Line 2390: IF p_claim_rec.batch_id = FND_API.G_MISS_NUM THEN

2386: END IF;
2387: IF p_claim_rec.claim_id IS NULL THEN
2388: x_complete_rec.claim_id := l_claim_rec.claim_id;
2389: END IF;
2390: IF p_claim_rec.batch_id = FND_API.G_MISS_NUM THEN
2391: x_complete_rec.batch_id := NULL;
2392: END IF;
2393: IF p_claim_rec.batch_id IS NULL THEN
2394: x_complete_rec.batch_id := l_claim_rec.batch_id;

Line 2396: IF p_claim_rec.claim_number = FND_API.G_MISS_CHAR THEN

2392: END IF;
2393: IF p_claim_rec.batch_id IS NULL THEN
2394: x_complete_rec.batch_id := l_claim_rec.batch_id;
2395: END IF;
2396: IF p_claim_rec.claim_number = FND_API.G_MISS_CHAR THEN
2397: x_complete_rec.claim_number := NULL;
2398: END IF;
2399: IF p_claim_rec.claim_number IS NULL THEN
2400: x_complete_rec.claim_number := l_claim_rec.claim_number;

Line 2402: IF p_claim_rec.claim_type_id = FND_API.G_MISS_NUM THEN

2398: END IF;
2399: IF p_claim_rec.claim_number IS NULL THEN
2400: x_complete_rec.claim_number := l_claim_rec.claim_number;
2401: END IF;
2402: IF p_claim_rec.claim_type_id = FND_API.G_MISS_NUM THEN
2403: x_complete_rec.claim_type_id := NULL;
2404: END IF;
2405: IF p_claim_rec.claim_type_id IS NULL THEN
2406: x_complete_rec.claim_type_id := l_claim_rec.claim_type_id;

Line 2408: IF p_claim_rec.claim_class = FND_API.G_MISS_CHAR THEN

2404: END IF;
2405: IF p_claim_rec.claim_type_id IS NULL THEN
2406: x_complete_rec.claim_type_id := l_claim_rec.claim_type_id;
2407: END IF;
2408: IF p_claim_rec.claim_class = FND_API.G_MISS_CHAR THEN
2409: x_complete_rec.claim_class := NULL;
2410: END IF;
2411: IF p_claim_rec.claim_class IS NULL THEN
2412: x_complete_rec.claim_class := l_claim_rec.claim_class;

Line 2414: IF p_claim_rec.claim_date = FND_API.G_MISS_DATE THEN

2410: END IF;
2411: IF p_claim_rec.claim_class IS NULL THEN
2412: x_complete_rec.claim_class := l_claim_rec.claim_class;
2413: END IF;
2414: IF p_claim_rec.claim_date = FND_API.G_MISS_DATE THEN
2415: x_complete_rec.claim_date := NULL;
2416: END IF;
2417: IF p_claim_rec.claim_date IS NULL THEN
2418: x_complete_rec.claim_date := l_claim_rec.claim_date;

Line 2420: IF p_claim_rec.due_date = FND_API.G_MISS_DATE THEN

2416: END IF;
2417: IF p_claim_rec.claim_date IS NULL THEN
2418: x_complete_rec.claim_date := l_claim_rec.claim_date;
2419: END IF;
2420: IF p_claim_rec.due_date = FND_API.G_MISS_DATE THEN
2421: x_complete_rec.due_date := NULL;
2422: END IF;
2423: IF p_claim_rec.due_date IS NULL THEN
2424: x_complete_rec.due_date := l_claim_rec.due_date;

Line 2426: IF p_claim_rec.owner_id = FND_API.G_MISS_NUM THEN

2422: END IF;
2423: IF p_claim_rec.due_date IS NULL THEN
2424: x_complete_rec.due_date := l_claim_rec.due_date;
2425: END IF;
2426: IF p_claim_rec.owner_id = FND_API.G_MISS_NUM THEN
2427: x_complete_rec.owner_id := NULL;
2428: END IF;
2429: IF p_claim_rec.owner_id IS NULL THEN
2430: x_complete_rec.owner_id := l_claim_rec.owner_id;

Line 2432: IF p_claim_rec.history_event = FND_API.G_MISS_CHAR THEN

2428: END IF;
2429: IF p_claim_rec.owner_id IS NULL THEN
2430: x_complete_rec.owner_id := l_claim_rec.owner_id;
2431: END IF;
2432: IF p_claim_rec.history_event = FND_API.G_MISS_CHAR THEN
2433: x_complete_rec.history_event := NULL;
2434: END IF;
2435: IF p_claim_rec.history_event IS NULL THEN
2436: x_complete_rec.history_event := l_claim_rec.history_event;

Line 2438: IF p_claim_rec.history_event_date = FND_API.G_MISS_DATE THEN

2434: END IF;
2435: IF p_claim_rec.history_event IS NULL THEN
2436: x_complete_rec.history_event := l_claim_rec.history_event;
2437: END IF;
2438: IF p_claim_rec.history_event_date = FND_API.G_MISS_DATE THEN
2439: x_complete_rec.history_event_date := NULL;
2440: END IF;
2441: IF p_claim_rec.history_event_date IS NULL THEN
2442: x_complete_rec.history_event_date := l_claim_rec.history_event_date;

Line 2444: IF p_claim_rec.history_event_description = FND_API.G_MISS_CHAR THEN

2440: END IF;
2441: IF p_claim_rec.history_event_date IS NULL THEN
2442: x_complete_rec.history_event_date := l_claim_rec.history_event_date;
2443: END IF;
2444: IF p_claim_rec.history_event_description = FND_API.G_MISS_CHAR THEN
2445: x_complete_rec.history_event_description := NULL;
2446: END IF;
2447: IF p_claim_rec.history_event_description IS NULL THEN
2448: x_complete_rec.history_event_description := l_claim_rec.history_event_description;

Line 2450: IF p_claim_rec.split_from_claim_id = FND_API.G_MISS_NUM THEN

2446: END IF;
2447: IF p_claim_rec.history_event_description IS NULL THEN
2448: x_complete_rec.history_event_description := l_claim_rec.history_event_description;
2449: END IF;
2450: IF p_claim_rec.split_from_claim_id = FND_API.G_MISS_NUM THEN
2451: x_complete_rec.split_from_claim_id := NULL;
2452: END IF;
2453: IF p_claim_rec.split_from_claim_id IS NULL THEN
2454: x_complete_rec.split_from_claim_id := l_claim_rec.split_from_claim_id;

Line 2456: IF p_claim_rec.duplicate_claim_id = FND_API.G_MISS_NUM THEN

2452: END IF;
2453: IF p_claim_rec.split_from_claim_id IS NULL THEN
2454: x_complete_rec.split_from_claim_id := l_claim_rec.split_from_claim_id;
2455: END IF;
2456: IF p_claim_rec.duplicate_claim_id = FND_API.G_MISS_NUM THEN
2457: x_complete_rec.duplicate_claim_id := NULL;
2458: END IF;
2459: IF p_claim_rec.duplicate_claim_id IS NULL THEN
2460: x_complete_rec.duplicate_claim_id := l_claim_rec.duplicate_claim_id;

Line 2462: IF p_claim_rec.split_date = FND_API.G_MISS_DATE THEN

2458: END IF;
2459: IF p_claim_rec.duplicate_claim_id IS NULL THEN
2460: x_complete_rec.duplicate_claim_id := l_claim_rec.duplicate_claim_id;
2461: END IF;
2462: IF p_claim_rec.split_date = FND_API.G_MISS_DATE THEN
2463: x_complete_rec.split_date := NULL;
2464: END IF;
2465: IF p_claim_rec.split_date IS NULL THEN
2466: x_complete_rec.split_date := l_claim_rec.split_date;

Line 2469: IF p_claim_rec.root_claim_id = FND_API.G_MISS_NUM THEN

2465: IF p_claim_rec.split_date IS NULL THEN
2466: x_complete_rec.split_date := l_claim_rec.split_date;
2467: END IF;
2468:
2469: IF p_claim_rec.root_claim_id = FND_API.G_MISS_NUM THEN
2470: x_complete_rec.root_claim_id := NULL;
2471: END IF;
2472: IF p_claim_rec.root_claim_id IS NULL THEN
2473: x_complete_rec.root_claim_id := l_claim_rec.root_claim_id;

Line 2475: IF p_claim_rec.amount = FND_API.G_MISS_NUM THEN

2471: END IF;
2472: IF p_claim_rec.root_claim_id IS NULL THEN
2473: x_complete_rec.root_claim_id := l_claim_rec.root_claim_id;
2474: END IF;
2475: IF p_claim_rec.amount = FND_API.G_MISS_NUM THEN
2476: x_complete_rec.amount := NULL;
2477: END IF;
2478: IF p_claim_rec.amount IS NULL THEN
2479: x_complete_rec.amount := l_claim_rec.amount;

Line 2481: IF p_claim_rec.amount_adjusted = FND_API.G_MISS_NUM THEN

2477: END IF;
2478: IF p_claim_rec.amount IS NULL THEN
2479: x_complete_rec.amount := l_claim_rec.amount;
2480: END IF;
2481: IF p_claim_rec.amount_adjusted = FND_API.G_MISS_NUM THEN
2482: x_complete_rec.amount_adjusted := NULL;
2483: END IF;
2484: IF p_claim_rec.amount_adjusted IS NULL THEN
2485: x_complete_rec.amount_adjusted := l_claim_rec.amount_adjusted;

Line 2487: IF p_claim_rec.amount_remaining = FND_API.G_MISS_NUM THEN

2483: END IF;
2484: IF p_claim_rec.amount_adjusted IS NULL THEN
2485: x_complete_rec.amount_adjusted := l_claim_rec.amount_adjusted;
2486: END IF;
2487: IF p_claim_rec.amount_remaining = FND_API.G_MISS_NUM THEN
2488: x_complete_rec.amount_remaining := NULL;
2489: END IF;
2490: IF p_claim_rec.amount_remaining IS NULL THEN
2491: x_complete_rec.amount_remaining := l_claim_rec.amount_remaining;

Line 2493: IF p_claim_rec.amount_settled = FND_API.G_MISS_NUM THEN

2489: END IF;
2490: IF p_claim_rec.amount_remaining IS NULL THEN
2491: x_complete_rec.amount_remaining := l_claim_rec.amount_remaining;
2492: END IF;
2493: IF p_claim_rec.amount_settled = FND_API.G_MISS_NUM THEN
2494: x_complete_rec.amount_settled := NULL;
2495: END IF;
2496: IF p_claim_rec.amount_settled IS NULL THEN
2497: x_complete_rec.amount_settled := l_claim_rec.amount_settled;

Line 2499: IF p_claim_rec.acctd_amount = FND_API.G_MISS_NUM THEN

2495: END IF;
2496: IF p_claim_rec.amount_settled IS NULL THEN
2497: x_complete_rec.amount_settled := l_claim_rec.amount_settled;
2498: END IF;
2499: IF p_claim_rec.acctd_amount = FND_API.G_MISS_NUM THEN
2500: x_complete_rec.acctd_amount := NULL;
2501: END IF;
2502: IF p_claim_rec.acctd_amount IS NULL THEN
2503: x_complete_rec.acctd_amount := l_claim_rec.acctd_amount;

Line 2505: IF p_claim_rec.acctd_amount_remaining = FND_API.G_MISS_NUM THEN

2501: END IF;
2502: IF p_claim_rec.acctd_amount IS NULL THEN
2503: x_complete_rec.acctd_amount := l_claim_rec.acctd_amount;
2504: END IF;
2505: IF p_claim_rec.acctd_amount_remaining = FND_API.G_MISS_NUM THEN
2506: x_complete_rec.acctd_amount_remaining := NULL;
2507: END IF;
2508: IF p_claim_rec.acctd_amount_remaining IS NULL THEN
2509: x_complete_rec.acctd_amount_remaining := l_claim_rec.acctd_amount_remaining ;

Line 2511: IF p_claim_rec.acctd_amount_adjusted = FND_API.G_MISS_NUM THEN

2507: END IF;
2508: IF p_claim_rec.acctd_amount_remaining IS NULL THEN
2509: x_complete_rec.acctd_amount_remaining := l_claim_rec.acctd_amount_remaining ;
2510: END IF;
2511: IF p_claim_rec.acctd_amount_adjusted = FND_API.G_MISS_NUM THEN
2512: x_complete_rec.acctd_amount_adjusted := NULL;
2513: END IF;
2514: IF p_claim_rec.acctd_amount_adjusted IS NULL THEN
2515: x_complete_rec.acctd_amount_adjusted := l_claim_rec.acctd_amount_adjusted;

Line 2517: IF p_claim_rec.acctd_amount_settled = FND_API.G_MISS_NUM THEN

2513: END IF;
2514: IF p_claim_rec.acctd_amount_adjusted IS NULL THEN
2515: x_complete_rec.acctd_amount_adjusted := l_claim_rec.acctd_amount_adjusted;
2516: END IF;
2517: IF p_claim_rec.acctd_amount_settled = FND_API.G_MISS_NUM THEN
2518: x_complete_rec.acctd_amount_settled := NULL;
2519: END IF;
2520: IF p_claim_rec.acctd_amount_settled IS NULL THEN
2521: x_complete_rec.acctd_amount_settled := l_claim_rec.acctd_amount_settled;

Line 2523: IF p_claim_rec.tax_amount = FND_API.G_MISS_NUM THEN

2519: END IF;
2520: IF p_claim_rec.acctd_amount_settled IS NULL THEN
2521: x_complete_rec.acctd_amount_settled := l_claim_rec.acctd_amount_settled;
2522: END IF;
2523: IF p_claim_rec.tax_amount = FND_API.G_MISS_NUM THEN
2524: x_complete_rec.tax_amount := NULL;
2525: END IF;
2526: IF p_claim_rec.tax_amount IS NULL THEN
2527: x_complete_rec.tax_amount := l_claim_rec.tax_amount ;

Line 2529: IF p_claim_rec.tax_code = FND_API.G_MISS_CHAR THEN

2525: END IF;
2526: IF p_claim_rec.tax_amount IS NULL THEN
2527: x_complete_rec.tax_amount := l_claim_rec.tax_amount ;
2528: END IF;
2529: IF p_claim_rec.tax_code = FND_API.G_MISS_CHAR THEN
2530: x_complete_rec.tax_code := NULL;
2531: END IF;
2532: IF p_claim_rec.tax_code IS NULL THEN
2533: x_complete_rec.tax_code := l_claim_rec.tax_code ;

Line 2535: IF p_claim_rec.tax_calculation_flag = FND_API.G_MISS_CHAR THEN

2531: END IF;
2532: IF p_claim_rec.tax_code IS NULL THEN
2533: x_complete_rec.tax_code := l_claim_rec.tax_code ;
2534: END IF;
2535: IF p_claim_rec.tax_calculation_flag = FND_API.G_MISS_CHAR THEN
2536: x_complete_rec.tax_calculation_flag := NULL;
2537: END IF;
2538: IF p_claim_rec.tax_calculation_flag IS NULL THEN
2539: x_complete_rec.tax_calculation_flag := l_claim_rec.tax_calculation_flag ;

Line 2541: IF p_claim_rec.currency_code = FND_API.G_MISS_CHAR THEN

2537: END IF;
2538: IF p_claim_rec.tax_calculation_flag IS NULL THEN
2539: x_complete_rec.tax_calculation_flag := l_claim_rec.tax_calculation_flag ;
2540: END IF;
2541: IF p_claim_rec.currency_code = FND_API.G_MISS_CHAR THEN
2542: x_complete_rec.currency_code := NULL;
2543: END IF;
2544: IF p_claim_rec.currency_code IS NULL THEN
2545: x_complete_rec.currency_code := l_claim_rec.currency_code;

Line 2547: IF p_claim_rec.exchange_rate_type = FND_API.G_MISS_CHAR THEN

2543: END IF;
2544: IF p_claim_rec.currency_code IS NULL THEN
2545: x_complete_rec.currency_code := l_claim_rec.currency_code;
2546: END IF;
2547: IF p_claim_rec.exchange_rate_type = FND_API.G_MISS_CHAR THEN
2548: x_complete_rec.exchange_rate_type := NULL;
2549: END IF;
2550: IF p_claim_rec.exchange_rate_type IS NULL THEN
2551: x_complete_rec.exchange_rate_type := l_claim_rec.exchange_rate_type;

Line 2553: IF p_claim_rec.exchange_rate_date = FND_API.G_MISS_DATE THEN

2549: END IF;
2550: IF p_claim_rec.exchange_rate_type IS NULL THEN
2551: x_complete_rec.exchange_rate_type := l_claim_rec.exchange_rate_type;
2552: END IF;
2553: IF p_claim_rec.exchange_rate_date = FND_API.G_MISS_DATE THEN
2554: x_complete_rec.exchange_rate_date := NULL;
2555: END IF;
2556: IF p_claim_rec.exchange_rate_date IS NULL THEN
2557: x_complete_rec.exchange_rate_date := l_claim_rec.exchange_rate_date;

Line 2559: IF p_claim_rec.exchange_rate = FND_API.G_MISS_NUM THEN

2555: END IF;
2556: IF p_claim_rec.exchange_rate_date IS NULL THEN
2557: x_complete_rec.exchange_rate_date := l_claim_rec.exchange_rate_date;
2558: END IF;
2559: IF p_claim_rec.exchange_rate = FND_API.G_MISS_NUM THEN
2560: x_complete_rec.exchange_rate := NULL;
2561: END IF;
2562: IF p_claim_rec.exchange_rate IS NULL THEN
2563: x_complete_rec.exchange_rate := l_claim_rec.exchange_rate;

Line 2565: IF p_claim_rec.set_of_books_id = FND_API.G_MISS_NUM THEN

2561: END IF;
2562: IF p_claim_rec.exchange_rate IS NULL THEN
2563: x_complete_rec.exchange_rate := l_claim_rec.exchange_rate;
2564: END IF;
2565: IF p_claim_rec.set_of_books_id = FND_API.G_MISS_NUM THEN
2566: x_complete_rec.set_of_books_id := NULL;
2567: END IF;
2568: IF p_claim_rec.set_of_books_id IS NULL THEN
2569: x_complete_rec.set_of_books_id := l_claim_rec.set_of_books_id;

Line 2571: IF p_claim_rec.original_claim_date = FND_API.G_MISS_DATE THEN

2567: END IF;
2568: IF p_claim_rec.set_of_books_id IS NULL THEN
2569: x_complete_rec.set_of_books_id := l_claim_rec.set_of_books_id;
2570: END IF;
2571: IF p_claim_rec.original_claim_date = FND_API.G_MISS_DATE THEN
2572: x_complete_rec.original_claim_date := NULL;
2573: END IF;
2574: IF p_claim_rec.original_claim_date IS NULL THEN
2575: x_complete_rec.original_claim_date := l_claim_rec.original_claim_date;

Line 2577: IF p_claim_rec.source_object_id = FND_API.G_MISS_NUM THEN

2573: END IF;
2574: IF p_claim_rec.original_claim_date IS NULL THEN
2575: x_complete_rec.original_claim_date := l_claim_rec.original_claim_date;
2576: END IF;
2577: IF p_claim_rec.source_object_id = FND_API.G_MISS_NUM THEN
2578: x_complete_rec.source_object_id := NULL;
2579: END IF;
2580: IF p_claim_rec.source_object_id IS NULL THEN
2581: x_complete_rec.source_object_id := l_claim_rec.source_object_id;

Line 2583: IF p_claim_rec.source_object_class = FND_API.G_MISS_CHAR THEN

2579: END IF;
2580: IF p_claim_rec.source_object_id IS NULL THEN
2581: x_complete_rec.source_object_id := l_claim_rec.source_object_id;
2582: END IF;
2583: IF p_claim_rec.source_object_class = FND_API.G_MISS_CHAR THEN
2584: x_complete_rec.source_object_class := NULL;
2585: END IF;
2586: IF p_claim_rec.source_object_class IS NULL THEN
2587: x_complete_rec.source_object_class := l_claim_rec.source_object_class;

Line 2589: IF p_claim_rec.source_object_type_id = FND_API.G_MISS_NUM THEN

2585: END IF;
2586: IF p_claim_rec.source_object_class IS NULL THEN
2587: x_complete_rec.source_object_class := l_claim_rec.source_object_class;
2588: END IF;
2589: IF p_claim_rec.source_object_type_id = FND_API.G_MISS_NUM THEN
2590: x_complete_rec.source_object_type_id := NULL;
2591: END IF;
2592: IF p_claim_rec.source_object_type_id IS NULL THEN
2593: x_complete_rec.source_object_type_id := l_claim_rec.source_object_type_id;

Line 2595: IF p_claim_rec.source_object_number = FND_API.G_MISS_CHAR THEN

2591: END IF;
2592: IF p_claim_rec.source_object_type_id IS NULL THEN
2593: x_complete_rec.source_object_type_id := l_claim_rec.source_object_type_id;
2594: END IF;
2595: IF p_claim_rec.source_object_number = FND_API.G_MISS_CHAR THEN
2596: x_complete_rec.source_object_number := NULL;
2597: END IF;
2598: IF p_claim_rec.source_object_number IS NULL THEN
2599: x_complete_rec.source_object_number := l_claim_rec.source_object_number;

Line 2601: IF p_claim_rec.cust_account_id = FND_API.G_MISS_NUM THEN

2597: END IF;
2598: IF p_claim_rec.source_object_number IS NULL THEN
2599: x_complete_rec.source_object_number := l_claim_rec.source_object_number;
2600: END IF;
2601: IF p_claim_rec.cust_account_id = FND_API.G_MISS_NUM THEN
2602: x_complete_rec.cust_account_id := NULL;
2603: END IF;
2604: IF p_claim_rec.cust_account_id IS NULL THEN
2605: x_complete_rec.cust_account_id := l_claim_rec.cust_account_id;

Line 2607: IF p_claim_rec.cust_billto_acct_site_id = FND_API.G_MISS_NUM THEN

2603: END IF;
2604: IF p_claim_rec.cust_account_id IS NULL THEN
2605: x_complete_rec.cust_account_id := l_claim_rec.cust_account_id;
2606: END IF;
2607: IF p_claim_rec.cust_billto_acct_site_id = FND_API.G_MISS_NUM THEN
2608: x_complete_rec.cust_billto_acct_site_id := NULL;
2609: END IF;
2610: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
2611: x_complete_rec.cust_billto_acct_site_id := l_claim_rec.cust_billto_acct_site_id;

Line 2613: IF p_claim_rec.cust_shipto_acct_site_id = FND_API.G_MISS_NUM THEN

2609: END IF;
2610: IF p_claim_rec.cust_billto_acct_site_id IS NULL THEN
2611: x_complete_rec.cust_billto_acct_site_id := l_claim_rec.cust_billto_acct_site_id;
2612: END IF;
2613: IF p_claim_rec.cust_shipto_acct_site_id = FND_API.G_MISS_NUM THEN
2614: x_complete_rec.cust_shipto_acct_site_id := NULL;
2615: END IF;
2616: IF p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
2617: x_complete_rec.cust_shipto_acct_site_id := l_claim_rec.cust_shipto_acct_site_id;

Line 2619: IF p_claim_rec.location_id = FND_API.G_MISS_NUM THEN

2615: END IF;
2616: IF p_claim_rec.cust_shipto_acct_site_id IS NULL THEN
2617: x_complete_rec.cust_shipto_acct_site_id := l_claim_rec.cust_shipto_acct_site_id;
2618: END IF;
2619: IF p_claim_rec.location_id = FND_API.G_MISS_NUM THEN
2620: x_complete_rec.location_id := NULL;
2621: END IF;
2622: IF p_claim_rec.location_id IS NULL THEN
2623: x_complete_rec.location_id := l_claim_rec.location_id;

Line 2625: IF p_claim_rec.pay_related_account_flag = FND_API.G_MISS_CHAR THEN

2621: END IF;
2622: IF p_claim_rec.location_id IS NULL THEN
2623: x_complete_rec.location_id := l_claim_rec.location_id;
2624: END IF;
2625: IF p_claim_rec.pay_related_account_flag = FND_API.G_MISS_CHAR THEN
2626: x_complete_rec.pay_related_account_flag := NULL;
2627: END IF;
2628: IF p_claim_rec.pay_related_account_flag IS NULL THEN
2629: x_complete_rec.pay_related_account_flag := l_claim_rec.pay_related_account_flag;

Line 2631: IF p_claim_rec.related_cust_account_id = FND_API.G_MISS_NUM THEN

2627: END IF;
2628: IF p_claim_rec.pay_related_account_flag IS NULL THEN
2629: x_complete_rec.pay_related_account_flag := l_claim_rec.pay_related_account_flag;
2630: END IF;
2631: IF p_claim_rec.related_cust_account_id = FND_API.G_MISS_NUM THEN
2632: x_complete_rec.related_cust_account_id := NULL;
2633: END IF;
2634: IF p_claim_rec.related_cust_account_id IS NULL THEN
2635: x_complete_rec.related_cust_account_id := l_claim_rec.related_cust_account_id;

Line 2637: IF p_claim_rec.related_site_use_id = FND_API.G_MISS_NUM THEN

2633: END IF;
2634: IF p_claim_rec.related_cust_account_id IS NULL THEN
2635: x_complete_rec.related_cust_account_id := l_claim_rec.related_cust_account_id;
2636: END IF;
2637: IF p_claim_rec.related_site_use_id = FND_API.G_MISS_NUM THEN
2638: x_complete_rec.related_site_use_id := NULL;
2639: END IF;
2640: IF p_claim_rec.related_site_use_id IS NULL THEN
2641: x_complete_rec.related_site_use_id := l_claim_rec.related_site_use_id;

Line 2643: IF p_claim_rec.relationship_type = FND_API.G_MISS_CHAR THEN

2639: END IF;
2640: IF p_claim_rec.related_site_use_id IS NULL THEN
2641: x_complete_rec.related_site_use_id := l_claim_rec.related_site_use_id;
2642: END IF;
2643: IF p_claim_rec.relationship_type = FND_API.G_MISS_CHAR THEN
2644: x_complete_rec.relationship_type := NULL;
2645: END IF;
2646: IF p_claim_rec.relationship_type IS NULL THEN
2647: x_complete_rec.relationship_type := l_claim_rec.relationship_type;

Line 2649: IF p_claim_rec.vendor_id = FND_API.G_MISS_NUM THEN

2645: END IF;
2646: IF p_claim_rec.relationship_type IS NULL THEN
2647: x_complete_rec.relationship_type := l_claim_rec.relationship_type;
2648: END IF;
2649: IF p_claim_rec.vendor_id = FND_API.G_MISS_NUM THEN
2650: x_complete_rec.vendor_id := NULL;
2651: END IF;
2652: IF p_claim_rec.vendor_id IS NULL THEN
2653: x_complete_rec.vendor_id := l_claim_rec.vendor_id;

Line 2655: IF p_claim_rec.vendor_site_id = FND_API.G_MISS_NUM THEN

2651: END IF;
2652: IF p_claim_rec.vendor_id IS NULL THEN
2653: x_complete_rec.vendor_id := l_claim_rec.vendor_id;
2654: END IF;
2655: IF p_claim_rec.vendor_site_id = FND_API.G_MISS_NUM THEN
2656: x_complete_rec.vendor_site_id := NULL;
2657: END IF;
2658: IF p_claim_rec.vendor_site_id IS NULL THEN
2659: x_complete_rec.vendor_site_id := l_claim_rec.vendor_site_id;

Line 2661: IF p_claim_rec.reason_type = FND_API.G_MISS_CHAR THEN

2657: END IF;
2658: IF p_claim_rec.vendor_site_id IS NULL THEN
2659: x_complete_rec.vendor_site_id := l_claim_rec.vendor_site_id;
2660: END IF;
2661: IF p_claim_rec.reason_type = FND_API.G_MISS_CHAR THEN
2662: x_complete_rec.reason_type := NULL;
2663: END IF;
2664: IF p_claim_rec.reason_type IS NULL THEN
2665: x_complete_rec.reason_type := l_claim_rec.reason_type;

Line 2667: IF p_claim_rec.reason_code_id = FND_API.G_MISS_NUM THEN

2663: END IF;
2664: IF p_claim_rec.reason_type IS NULL THEN
2665: x_complete_rec.reason_type := l_claim_rec.reason_type;
2666: END IF;
2667: IF p_claim_rec.reason_code_id = FND_API.G_MISS_NUM THEN
2668: x_complete_rec.reason_code_id := NULL;
2669: END IF;
2670: IF p_claim_rec.reason_code_id IS NULL THEN
2671: x_complete_rec.reason_code_id := l_claim_rec.reason_code_id;

Line 2673: IF p_claim_rec.task_template_group_id = FND_API.G_MISS_NUM THEN

2669: END IF;
2670: IF p_claim_rec.reason_code_id IS NULL THEN
2671: x_complete_rec.reason_code_id := l_claim_rec.reason_code_id;
2672: END IF;
2673: IF p_claim_rec.task_template_group_id = FND_API.G_MISS_NUM THEN
2674: x_complete_rec.task_template_group_id := NULL;
2675: END IF;
2676: IF p_claim_rec.task_template_group_id IS NULL THEN
2677: x_complete_rec.task_template_group_id := l_claim_rec.task_template_group_id;

Line 2679: IF p_claim_rec.status_code = FND_API.G_MISS_CHAR THEN

2675: END IF;
2676: IF p_claim_rec.task_template_group_id IS NULL THEN
2677: x_complete_rec.task_template_group_id := l_claim_rec.task_template_group_id;
2678: END IF;
2679: IF p_claim_rec.status_code = FND_API.G_MISS_CHAR THEN
2680: x_complete_rec.status_code := NULL;
2681: END IF;
2682: IF p_claim_rec.status_code IS NULL THEN
2683: x_complete_rec.status_code := l_claim_rec.status_code;

Line 2685: IF p_claim_rec.user_status_id = FND_API.G_MISS_NUM THEN

2681: END IF;
2682: IF p_claim_rec.status_code IS NULL THEN
2683: x_complete_rec.status_code := l_claim_rec.status_code;
2684: END IF;
2685: IF p_claim_rec.user_status_id = FND_API.G_MISS_NUM THEN
2686: x_complete_rec.user_status_id := NULL;
2687: END IF;
2688: IF p_claim_rec.user_status_id IS NULL THEN
2689: x_complete_rec.user_status_id := l_claim_rec.user_status_id;

Line 2691: IF p_claim_rec.sales_rep_id = FND_API.G_MISS_NUM THEN

2687: END IF;
2688: IF p_claim_rec.user_status_id IS NULL THEN
2689: x_complete_rec.user_status_id := l_claim_rec.user_status_id;
2690: END IF;
2691: IF p_claim_rec.sales_rep_id = FND_API.G_MISS_NUM THEN
2692: x_complete_rec.sales_rep_id := NULL;
2693: END IF;
2694: IF p_claim_rec.close_status_id = FND_API.G_MISS_NUM THEN
2695: x_complete_rec.close_status_id := NULL;

Line 2694: IF p_claim_rec.close_status_id = FND_API.G_MISS_NUM THEN

2690: END IF;
2691: IF p_claim_rec.sales_rep_id = FND_API.G_MISS_NUM THEN
2692: x_complete_rec.sales_rep_id := NULL;
2693: END IF;
2694: IF p_claim_rec.close_status_id = FND_API.G_MISS_NUM THEN
2695: x_complete_rec.close_status_id := NULL;
2696: END IF;
2697: IF p_claim_rec.close_status_id IS NULL THEN
2698: x_complete_rec.close_status_id := l_claim_rec.close_status_id;

Line 2700: IF p_claim_rec.open_status_id = FND_API.G_MISS_NUM THEN

2696: END IF;
2697: IF p_claim_rec.close_status_id IS NULL THEN
2698: x_complete_rec.close_status_id := l_claim_rec.close_status_id;
2699: END IF;
2700: IF p_claim_rec.open_status_id = FND_API.G_MISS_NUM THEN
2701: x_complete_rec.open_status_id := NULL;
2702: END IF;
2703: IF p_claim_rec.open_status_id IS NULL THEN
2704: x_complete_rec.open_status_id := l_claim_rec.open_status_id;

Line 2709: IF p_claim_rec.collector_id = FND_API.G_MISS_NUM THEN

2705: END IF;
2706: IF p_claim_rec.sales_rep_id IS NULL THEN
2707: x_complete_rec.sales_rep_id := l_claim_rec.sales_rep_id;
2708: END IF;
2709: IF p_claim_rec.collector_id = FND_API.G_MISS_NUM THEN
2710: x_complete_rec.collector_id := NULL;
2711: END IF;
2712: IF p_claim_rec.collector_id IS NULL THEN
2713: x_complete_rec.collector_id := l_claim_rec.collector_id;

Line 2715: IF p_claim_rec.contact_id = FND_API.G_MISS_NUM THEN

2711: END IF;
2712: IF p_claim_rec.collector_id IS NULL THEN
2713: x_complete_rec.collector_id := l_claim_rec.collector_id;
2714: END IF;
2715: IF p_claim_rec.contact_id = FND_API.G_MISS_NUM THEN
2716: x_complete_rec.contact_id := NULL;
2717: END IF;
2718: IF p_claim_rec.contact_id IS NULL THEN
2719: x_complete_rec.contact_id := l_claim_rec.contact_id;

Line 2721: IF p_claim_rec.broker_id = FND_API.G_MISS_NUM THEN

2717: END IF;
2718: IF p_claim_rec.contact_id IS NULL THEN
2719: x_complete_rec.contact_id := l_claim_rec.contact_id;
2720: END IF;
2721: IF p_claim_rec.broker_id = FND_API.G_MISS_NUM THEN
2722: x_complete_rec.broker_id := NULL;
2723: END IF;
2724: IF p_claim_rec.broker_id IS NULL THEN
2725: x_complete_rec.broker_id := l_claim_rec.broker_id;

Line 2727: IF p_claim_rec.territory_id = FND_API.G_MISS_NUM THEN

2723: END IF;
2724: IF p_claim_rec.broker_id IS NULL THEN
2725: x_complete_rec.broker_id := l_claim_rec.broker_id;
2726: END IF;
2727: IF p_claim_rec.territory_id = FND_API.G_MISS_NUM THEN
2728: x_complete_rec.territory_id := NULL;
2729: END IF;
2730: IF p_claim_rec.territory_id IS NULL THEN
2731: x_complete_rec.territory_id := l_claim_rec.territory_id;

Line 2733: IF p_claim_rec.customer_ref_date = FND_API.G_MISS_DATE THEN

2729: END IF;
2730: IF p_claim_rec.territory_id IS NULL THEN
2731: x_complete_rec.territory_id := l_claim_rec.territory_id;
2732: END IF;
2733: IF p_claim_rec.customer_ref_date = FND_API.G_MISS_DATE THEN
2734: x_complete_rec.customer_ref_date := NULL;
2735: END IF;
2736: IF p_claim_rec.customer_ref_date IS NULL THEN
2737: x_complete_rec.customer_ref_date := l_claim_rec.customer_ref_date;

Line 2739: IF p_claim_rec.customer_ref_number = FND_API.G_MISS_CHAR THEN

2735: END IF;
2736: IF p_claim_rec.customer_ref_date IS NULL THEN
2737: x_complete_rec.customer_ref_date := l_claim_rec.customer_ref_date;
2738: END IF;
2739: IF p_claim_rec.customer_ref_number = FND_API.G_MISS_CHAR THEN
2740: x_complete_rec.customer_ref_number := NULL;
2741: END IF;
2742: IF p_claim_rec.customer_ref_number IS NULL THEN
2743: x_complete_rec.customer_ref_number := l_claim_rec.customer_ref_number;

Line 2745: IF p_claim_rec.receipt_id = FND_API.G_MISS_NUM THEN

2741: END IF;
2742: IF p_claim_rec.customer_ref_number IS NULL THEN
2743: x_complete_rec.customer_ref_number := l_claim_rec.customer_ref_number;
2744: END IF;
2745: IF p_claim_rec.receipt_id = FND_API.G_MISS_NUM THEN
2746: x_complete_rec.receipt_id := NULL;
2747: END IF;
2748: IF p_claim_rec.receipt_id IS NULL THEN
2749: x_complete_rec.receipt_id := l_claim_rec.receipt_id;

Line 2751: IF p_claim_rec.receipt_number = FND_API.G_MISS_CHAR THEN

2747: END IF;
2748: IF p_claim_rec.receipt_id IS NULL THEN
2749: x_complete_rec.receipt_id := l_claim_rec.receipt_id;
2750: END IF;
2751: IF p_claim_rec.receipt_number = FND_API.G_MISS_CHAR THEN
2752: x_complete_rec.receipt_number := NULL;
2753: END IF;
2754: IF p_claim_rec.receipt_number IS NULL THEN
2755: x_complete_rec.receipt_number := l_claim_rec.receipt_number;

Line 2757: IF p_claim_rec.doc_sequence_id = FND_API.G_MISS_NUM THEN

2753: END IF;
2754: IF p_claim_rec.receipt_number IS NULL THEN
2755: x_complete_rec.receipt_number := l_claim_rec.receipt_number;
2756: END IF;
2757: IF p_claim_rec.doc_sequence_id = FND_API.G_MISS_NUM THEN
2758: x_complete_rec.doc_sequence_id := NULL;
2759: END IF;
2760: IF p_claim_rec.doc_sequence_id IS NULL THEN
2761: x_complete_rec.doc_sequence_id := l_claim_rec.doc_sequence_id;

Line 2763: IF p_claim_rec.doc_sequence_value = FND_API.G_MISS_NUM THEN

2759: END IF;
2760: IF p_claim_rec.doc_sequence_id IS NULL THEN
2761: x_complete_rec.doc_sequence_id := l_claim_rec.doc_sequence_id;
2762: END IF;
2763: IF p_claim_rec.doc_sequence_value = FND_API.G_MISS_NUM THEN
2764: x_complete_rec.doc_sequence_value := NULL;
2765: END IF;
2766: IF p_claim_rec.doc_sequence_value IS NULL THEN
2767: x_complete_rec.doc_sequence_value := l_claim_rec.doc_sequence_value;

Line 2769: IF p_claim_rec.gl_date = FND_API.G_MISS_DATE THEN

2765: END IF;
2766: IF p_claim_rec.doc_sequence_value IS NULL THEN
2767: x_complete_rec.doc_sequence_value := l_claim_rec.doc_sequence_value;
2768: END IF;
2769: IF p_claim_rec.gl_date = FND_API.G_MISS_DATE THEN
2770: x_complete_rec.gl_date := NULL;
2771: END IF;
2772: IF p_claim_rec.gl_date IS NULL THEN
2773: x_complete_rec.gl_date := l_claim_rec.gl_date;

Line 2775: IF p_claim_rec.payment_method = FND_API.G_MISS_CHAR THEN

2771: END IF;
2772: IF p_claim_rec.gl_date IS NULL THEN
2773: x_complete_rec.gl_date := l_claim_rec.gl_date;
2774: END IF;
2775: IF p_claim_rec.payment_method = FND_API.G_MISS_CHAR THEN
2776: x_complete_rec.payment_method := NULL;
2777: END IF;
2778: IF p_claim_rec.payment_method IS NULL THEN
2779: x_complete_rec.payment_method := l_claim_rec.payment_method;

Line 2781: IF p_claim_rec.voucher_id = FND_API.G_MISS_NUM THEN

2777: END IF;
2778: IF p_claim_rec.payment_method IS NULL THEN
2779: x_complete_rec.payment_method := l_claim_rec.payment_method;
2780: END IF;
2781: IF p_claim_rec.voucher_id = FND_API.G_MISS_NUM THEN
2782: x_complete_rec.voucher_id := NULL;
2783: END IF;
2784: IF p_claim_rec.voucher_id IS NULL THEN
2785: x_complete_rec.voucher_id := l_claim_rec.voucher_id;

Line 2787: IF p_claim_rec.voucher_number = FND_API.G_MISS_CHAR THEN

2783: END IF;
2784: IF p_claim_rec.voucher_id IS NULL THEN
2785: x_complete_rec.voucher_id := l_claim_rec.voucher_id;
2786: END IF;
2787: IF p_claim_rec.voucher_number = FND_API.G_MISS_CHAR THEN
2788: x_complete_rec.voucher_number := NULL;
2789: END IF;
2790: IF p_claim_rec.voucher_number IS NULL THEN
2791: x_complete_rec.voucher_number := l_claim_rec.voucher_number;

Line 2793: IF p_claim_rec.payment_reference_id = FND_API.G_MISS_NUM THEN

2789: END IF;
2790: IF p_claim_rec.voucher_number IS NULL THEN
2791: x_complete_rec.voucher_number := l_claim_rec.voucher_number;
2792: END IF;
2793: IF p_claim_rec.payment_reference_id = FND_API.G_MISS_NUM THEN
2794: x_complete_rec.payment_reference_id := NULL;
2795: END IF;
2796: IF p_claim_rec.payment_reference_id IS NULL THEN
2797: x_complete_rec.payment_reference_id := l_claim_rec.payment_reference_id;

Line 2799: IF p_claim_rec.payment_reference_number = FND_API.G_MISS_CHAR THEN

2795: END IF;
2796: IF p_claim_rec.payment_reference_id IS NULL THEN
2797: x_complete_rec.payment_reference_id := l_claim_rec.payment_reference_id;
2798: END IF;
2799: IF p_claim_rec.payment_reference_number = FND_API.G_MISS_CHAR THEN
2800: x_complete_rec.payment_reference_number := NULL;
2801: END IF;
2802: IF p_claim_rec.payment_reference_number IS NULL THEN
2803: x_complete_rec.payment_reference_number := l_claim_rec.payment_reference_number;

Line 2805: IF p_claim_rec.payment_reference_date = FND_API.G_MISS_DATE THEN

2801: END IF;
2802: IF p_claim_rec.payment_reference_number IS NULL THEN
2803: x_complete_rec.payment_reference_number := l_claim_rec.payment_reference_number;
2804: END IF;
2805: IF p_claim_rec.payment_reference_date = FND_API.G_MISS_DATE THEN
2806: x_complete_rec.payment_reference_date := NULL;
2807: END IF;
2808: IF p_claim_rec.payment_reference_date IS NULL THEN
2809: x_complete_rec.payment_reference_date := l_claim_rec.payment_reference_date;

Line 2811: IF p_claim_rec.payment_status = FND_API.G_MISS_CHAR THEN

2807: END IF;
2808: IF p_claim_rec.payment_reference_date IS NULL THEN
2809: x_complete_rec.payment_reference_date := l_claim_rec.payment_reference_date;
2810: END IF;
2811: IF p_claim_rec.payment_status = FND_API.G_MISS_CHAR THEN
2812: x_complete_rec.payment_status := NULL;
2813: END IF;
2814: IF p_claim_rec.payment_status IS NULL THEN
2815: x_complete_rec.payment_status := l_claim_rec.payment_status;

Line 2817: IF p_claim_rec.approved_flag = FND_API.G_MISS_CHAR THEN

2813: END IF;
2814: IF p_claim_rec.payment_status IS NULL THEN
2815: x_complete_rec.payment_status := l_claim_rec.payment_status;
2816: END IF;
2817: IF p_claim_rec.approved_flag = FND_API.G_MISS_CHAR THEN
2818: x_complete_rec.approved_flag := NULL;
2819: END IF;
2820: IF p_claim_rec.approved_flag IS NULL THEN
2821: x_complete_rec.approved_flag := l_claim_rec.approved_flag;

Line 2823: IF p_claim_rec.approved_date = FND_API.G_MISS_DATE THEN

2819: END IF;
2820: IF p_claim_rec.approved_flag IS NULL THEN
2821: x_complete_rec.approved_flag := l_claim_rec.approved_flag;
2822: END IF;
2823: IF p_claim_rec.approved_date = FND_API.G_MISS_DATE THEN
2824: x_complete_rec.approved_date := NULL;
2825: END IF;
2826: IF p_claim_rec.approved_date IS NULL THEN
2827: x_complete_rec.approved_date := l_claim_rec.approved_date;

Line 2829: IF p_claim_rec.approved_by = FND_API.G_MISS_NUM THEN

2825: END IF;
2826: IF p_claim_rec.approved_date IS NULL THEN
2827: x_complete_rec.approved_date := l_claim_rec.approved_date;
2828: END IF;
2829: IF p_claim_rec.approved_by = FND_API.G_MISS_NUM THEN
2830: x_complete_rec.approved_by := NULL;
2831: END IF;
2832: IF p_claim_rec.approved_by IS NULL THEN
2833: x_complete_rec.approved_by := l_claim_rec.approved_by;

Line 2835: IF p_claim_rec.settled_date = FND_API.G_MISS_DATE THEN

2831: END IF;
2832: IF p_claim_rec.approved_by IS NULL THEN
2833: x_complete_rec.approved_by := l_claim_rec.approved_by;
2834: END IF;
2835: IF p_claim_rec.settled_date = FND_API.G_MISS_DATE THEN
2836: x_complete_rec.settled_date := NULL;
2837: END IF;
2838: IF p_claim_rec.settled_date IS NULL THEN
2839: x_complete_rec.settled_date := l_claim_rec.settled_date;

Line 2841: IF p_claim_rec.settled_by = FND_API.G_MISS_NUM THEN

2837: END IF;
2838: IF p_claim_rec.settled_date IS NULL THEN
2839: x_complete_rec.settled_date := l_claim_rec.settled_date;
2840: END IF;
2841: IF p_claim_rec.settled_by = FND_API.G_MISS_NUM THEN
2842: x_complete_rec.settled_by := NULL;
2843: END IF;
2844: IF p_claim_rec.settled_by IS NULL THEN
2845: x_complete_rec.settled_by := l_claim_rec.settled_by;

Line 2847: IF p_claim_rec.effective_date = FND_API.G_MISS_DATE THEN

2843: END IF;
2844: IF p_claim_rec.settled_by IS NULL THEN
2845: x_complete_rec.settled_by := l_claim_rec.settled_by;
2846: END IF;
2847: IF p_claim_rec.effective_date = FND_API.G_MISS_DATE THEN
2848: x_complete_rec.effective_date := NULL;
2849: END IF;
2850: IF p_claim_rec.effective_date IS NULL THEN
2851: x_complete_rec.effective_date := l_claim_rec.effective_date;

Line 2853: IF p_claim_rec.custom_setup_id = FND_API.G_MISS_NUM THEN

2849: END IF;
2850: IF p_claim_rec.effective_date IS NULL THEN
2851: x_complete_rec.effective_date := l_claim_rec.effective_date;
2852: END IF;
2853: IF p_claim_rec.custom_setup_id = FND_API.G_MISS_NUM THEN
2854: x_complete_rec.custom_setup_id := NULL;
2855: END IF;
2856: IF p_claim_rec.custom_setup_id IS NULL THEN
2857: x_complete_rec.custom_setup_id := l_claim_rec.custom_setup_id;

Line 2859: IF p_claim_rec.task_id = FND_API.G_MISS_NUM THEN

2855: END IF;
2856: IF p_claim_rec.custom_setup_id IS NULL THEN
2857: x_complete_rec.custom_setup_id := l_claim_rec.custom_setup_id;
2858: END IF;
2859: IF p_claim_rec.task_id = FND_API.G_MISS_NUM THEN
2860: x_complete_rec.task_id := NULL;
2861: END IF;
2862: IF p_claim_rec.task_id IS NULL THEN
2863: x_complete_rec.task_id := l_claim_rec.task_id;

Line 2865: IF p_claim_rec.country_id = FND_API.G_MISS_NUM THEN

2861: END IF;
2862: IF p_claim_rec.task_id IS NULL THEN
2863: x_complete_rec.task_id := l_claim_rec.task_id;
2864: END IF;
2865: IF p_claim_rec.country_id = FND_API.G_MISS_NUM THEN
2866: x_complete_rec.country_id := NULL;
2867: END IF;
2868: IF p_claim_rec.country_id IS NULL THEN
2869: x_complete_rec.country_id := l_claim_rec.country_id;

Line 2871: IF p_claim_rec.order_type_id = FND_API.G_MISS_NUM THEN

2867: END IF;
2868: IF p_claim_rec.country_id IS NULL THEN
2869: x_complete_rec.country_id := l_claim_rec.country_id;
2870: END IF;
2871: IF p_claim_rec.order_type_id = FND_API.G_MISS_NUM THEN
2872: x_complete_rec.order_type_id := NULL;
2873: END IF;
2874: IF p_claim_rec.order_type_id IS NULL THEN
2875: x_complete_rec.order_type_id := l_claim_rec.order_type_id;

Line 2877: IF p_claim_rec.comments = FND_API.G_MISS_CHAR THEN

2873: END IF;
2874: IF p_claim_rec.order_type_id IS NULL THEN
2875: x_complete_rec.order_type_id := l_claim_rec.order_type_id;
2876: END IF;
2877: IF p_claim_rec.comments = FND_API.G_MISS_CHAR THEN
2878: x_complete_rec.comments := NULL;
2879: END IF;
2880: IF p_claim_rec.comments IS NULL THEN
2881: x_complete_rec.comments := l_claim_rec.comments;

Line 2883: IF p_claim_rec.attribute_category = FND_API.G_MISS_CHAR THEN

2879: END IF;
2880: IF p_claim_rec.comments IS NULL THEN
2881: x_complete_rec.comments := l_claim_rec.comments;
2882: END IF;
2883: IF p_claim_rec.attribute_category = FND_API.G_MISS_CHAR THEN
2884: x_complete_rec.attribute_category := NULL;
2885: END IF;
2886: IF p_claim_rec.attribute_category IS NULL THEN
2887: x_complete_rec.attribute_category := l_claim_rec.attribute_category;

Line 2889: IF p_claim_rec.attribute1 = FND_API.G_MISS_CHAR THEN

2885: END IF;
2886: IF p_claim_rec.attribute_category IS NULL THEN
2887: x_complete_rec.attribute_category := l_claim_rec.attribute_category;
2888: END IF;
2889: IF p_claim_rec.attribute1 = FND_API.G_MISS_CHAR THEN
2890: x_complete_rec.attribute1 := NULL;
2891: END IF;
2892: IF p_claim_rec.attribute1 IS NULL THEN
2893: x_complete_rec.attribute1 := l_claim_rec.attribute1;

Line 2895: IF p_claim_rec.attribute2 = FND_API.G_MISS_CHAR THEN

2891: END IF;
2892: IF p_claim_rec.attribute1 IS NULL THEN
2893: x_complete_rec.attribute1 := l_claim_rec.attribute1;
2894: END IF;
2895: IF p_claim_rec.attribute2 = FND_API.G_MISS_CHAR THEN
2896: x_complete_rec.attribute2 := NULL;
2897: END IF;
2898: IF p_claim_rec.attribute2 IS NULL THEN
2899: x_complete_rec.attribute2 := l_claim_rec.attribute2;

Line 2901: IF p_claim_rec.attribute3 = FND_API.G_MISS_CHAR THEN

2897: END IF;
2898: IF p_claim_rec.attribute2 IS NULL THEN
2899: x_complete_rec.attribute2 := l_claim_rec.attribute2;
2900: END IF;
2901: IF p_claim_rec.attribute3 = FND_API.G_MISS_CHAR THEN
2902: x_complete_rec.attribute3 := NULL;
2903: END IF;
2904: IF p_claim_rec.attribute3 IS NULL THEN
2905: x_complete_rec.attribute3 := l_claim_rec.attribute3;

Line 2907: IF p_claim_rec.attribute4 = FND_API.G_MISS_CHAR THEN

2903: END IF;
2904: IF p_claim_rec.attribute3 IS NULL THEN
2905: x_complete_rec.attribute3 := l_claim_rec.attribute3;
2906: END IF;
2907: IF p_claim_rec.attribute4 = FND_API.G_MISS_CHAR THEN
2908: x_complete_rec.attribute4 := NULL;
2909: END IF;
2910: IF p_claim_rec.attribute4 IS NULL THEN
2911: x_complete_rec.attribute4 := l_claim_rec.attribute4;

Line 2913: IF p_claim_rec.attribute5 = FND_API.G_MISS_CHAR THEN

2909: END IF;
2910: IF p_claim_rec.attribute4 IS NULL THEN
2911: x_complete_rec.attribute4 := l_claim_rec.attribute4;
2912: END IF;
2913: IF p_claim_rec.attribute5 = FND_API.G_MISS_CHAR THEN
2914: x_complete_rec.attribute5 := NULL;
2915: END IF;
2916: IF p_claim_rec.attribute5 IS NULL THEN
2917: x_complete_rec.attribute5 := l_claim_rec.attribute5;

Line 2919: IF p_claim_rec.attribute6 = FND_API.G_MISS_CHAR THEN

2915: END IF;
2916: IF p_claim_rec.attribute5 IS NULL THEN
2917: x_complete_rec.attribute5 := l_claim_rec.attribute5;
2918: END IF;
2919: IF p_claim_rec.attribute6 = FND_API.G_MISS_CHAR THEN
2920: x_complete_rec.attribute6 := NULL;
2921: END IF;
2922: IF p_claim_rec.attribute6 IS NULL THEN
2923: x_complete_rec.attribute6 := l_claim_rec.attribute6;

Line 2925: IF p_claim_rec.attribute7 = FND_API.G_MISS_CHAR THEN

2921: END IF;
2922: IF p_claim_rec.attribute6 IS NULL THEN
2923: x_complete_rec.attribute6 := l_claim_rec.attribute6;
2924: END IF;
2925: IF p_claim_rec.attribute7 = FND_API.G_MISS_CHAR THEN
2926: x_complete_rec.attribute7 := NULL;
2927: END IF;
2928: IF p_claim_rec.attribute7 IS NULL THEN
2929: x_complete_rec.attribute7 := l_claim_rec.attribute7;

Line 2931: IF p_claim_rec.attribute8 = FND_API.G_MISS_CHAR THEN

2927: END IF;
2928: IF p_claim_rec.attribute7 IS NULL THEN
2929: x_complete_rec.attribute7 := l_claim_rec.attribute7;
2930: END IF;
2931: IF p_claim_rec.attribute8 = FND_API.G_MISS_CHAR THEN
2932: x_complete_rec.attribute8 := NULL;
2933: END IF;
2934: IF p_claim_rec.attribute8 IS NULL THEN
2935: x_complete_rec.attribute8 := l_claim_rec.attribute8;

Line 2937: IF p_claim_rec.attribute9 = FND_API.G_MISS_CHAR THEN

2933: END IF;
2934: IF p_claim_rec.attribute8 IS NULL THEN
2935: x_complete_rec.attribute8 := l_claim_rec.attribute8;
2936: END IF;
2937: IF p_claim_rec.attribute9 = FND_API.G_MISS_CHAR THEN
2938: x_complete_rec.attribute9 := NULL;
2939: END IF;
2940: IF p_claim_rec.attribute9 IS NULL THEN
2941: x_complete_rec.attribute9 := l_claim_rec.attribute9;

Line 2943: IF p_claim_rec.attribute10 = FND_API.G_MISS_CHAR THEN

2939: END IF;
2940: IF p_claim_rec.attribute9 IS NULL THEN
2941: x_complete_rec.attribute9 := l_claim_rec.attribute9;
2942: END IF;
2943: IF p_claim_rec.attribute10 = FND_API.G_MISS_CHAR THEN
2944: x_complete_rec.attribute10 := NULL;
2945: END IF;
2946: IF p_claim_rec.attribute10 IS NULL THEN
2947: x_complete_rec.attribute10 := l_claim_rec.attribute10;

Line 2949: IF p_claim_rec.attribute11 = FND_API.G_MISS_CHAR THEN

2945: END IF;
2946: IF p_claim_rec.attribute10 IS NULL THEN
2947: x_complete_rec.attribute10 := l_claim_rec.attribute10;
2948: END IF;
2949: IF p_claim_rec.attribute11 = FND_API.G_MISS_CHAR THEN
2950: x_complete_rec.attribute11 := NULL;
2951: END IF;
2952: IF p_claim_rec.attribute11 IS NULL THEN
2953: x_complete_rec.attribute11 := l_claim_rec.attribute11;

Line 2955: IF p_claim_rec.attribute12 = FND_API.G_MISS_CHAR THEN

2951: END IF;
2952: IF p_claim_rec.attribute11 IS NULL THEN
2953: x_complete_rec.attribute11 := l_claim_rec.attribute11;
2954: END IF;
2955: IF p_claim_rec.attribute12 = FND_API.G_MISS_CHAR THEN
2956: x_complete_rec.attribute12 := NULL;
2957: END IF;
2958: IF p_claim_rec.attribute12 IS NULL THEN
2959: x_complete_rec.attribute12 := l_claim_rec.attribute12;

Line 2961: IF p_claim_rec.attribute13 = FND_API.G_MISS_CHAR THEN

2957: END IF;
2958: IF p_claim_rec.attribute12 IS NULL THEN
2959: x_complete_rec.attribute12 := l_claim_rec.attribute12;
2960: END IF;
2961: IF p_claim_rec.attribute13 = FND_API.G_MISS_CHAR THEN
2962: x_complete_rec.attribute13 := NULL;
2963: END IF;
2964: IF p_claim_rec.attribute13 IS NULL THEN
2965: x_complete_rec.attribute13 := l_claim_rec.attribute13;

Line 2967: IF p_claim_rec.attribute14 = FND_API.G_MISS_CHAR THEN

2963: END IF;
2964: IF p_claim_rec.attribute13 IS NULL THEN
2965: x_complete_rec.attribute13 := l_claim_rec.attribute13;
2966: END IF;
2967: IF p_claim_rec.attribute14 = FND_API.G_MISS_CHAR THEN
2968: x_complete_rec.attribute14 := NULL;
2969: END IF;
2970: IF p_claim_rec.attribute14 IS NULL THEN
2971: x_complete_rec.attribute14 := l_claim_rec.attribute14;

Line 2973: IF p_claim_rec.attribute15 = FND_API.G_MISS_CHAR THEN

2969: END IF;
2970: IF p_claim_rec.attribute14 IS NULL THEN
2971: x_complete_rec.attribute14 := l_claim_rec.attribute14;
2972: END IF;
2973: IF p_claim_rec.attribute15 = FND_API.G_MISS_CHAR THEN
2974: x_complete_rec.attribute15 := NULL;
2975: END IF;
2976: IF p_claim_rec.attribute15 IS NULL THEN
2977: x_complete_rec.attribute15 := l_claim_rec.attribute15;

Line 2979: IF p_claim_rec.deduction_attribute_category = FND_API.G_MISS_CHAR THEN

2975: END IF;
2976: IF p_claim_rec.attribute15 IS NULL THEN
2977: x_complete_rec.attribute15 := l_claim_rec.attribute15;
2978: END IF;
2979: IF p_claim_rec.deduction_attribute_category = FND_API.G_MISS_CHAR THEN
2980: x_complete_rec.deduction_attribute_category := NULL;
2981: END IF;
2982: IF p_claim_rec.deduction_attribute_category IS NULL THEN
2983: x_complete_rec.deduction_attribute_category := l_claim_rec.deduction_attribute_category;

Line 2985: IF p_claim_rec.deduction_attribute1 = FND_API.G_MISS_CHAR THEN

2981: END IF;
2982: IF p_claim_rec.deduction_attribute_category IS NULL THEN
2983: x_complete_rec.deduction_attribute_category := l_claim_rec.deduction_attribute_category;
2984: END IF;
2985: IF p_claim_rec.deduction_attribute1 = FND_API.G_MISS_CHAR THEN
2986: x_complete_rec.deduction_attribute1 := NULL;
2987: END IF;
2988: IF p_claim_rec.deduction_attribute1 IS NULL THEN
2989: x_complete_rec.deduction_attribute1 := l_claim_rec.deduction_attribute1;

Line 2991: IF p_claim_rec.deduction_attribute2 = FND_API.G_MISS_CHAR THEN

2987: END IF;
2988: IF p_claim_rec.deduction_attribute1 IS NULL THEN
2989: x_complete_rec.deduction_attribute1 := l_claim_rec.deduction_attribute1;
2990: END IF;
2991: IF p_claim_rec.deduction_attribute2 = FND_API.G_MISS_CHAR THEN
2992: x_complete_rec.deduction_attribute2 := NULL;
2993: END IF;
2994: IF p_claim_rec.deduction_attribute2 IS NULL THEN
2995: x_complete_rec.deduction_attribute2 := l_claim_rec.deduction_attribute2;

Line 2997: IF p_claim_rec.deduction_attribute3 = FND_API.G_MISS_CHAR THEN

2993: END IF;
2994: IF p_claim_rec.deduction_attribute2 IS NULL THEN
2995: x_complete_rec.deduction_attribute2 := l_claim_rec.deduction_attribute2;
2996: END IF;
2997: IF p_claim_rec.deduction_attribute3 = FND_API.G_MISS_CHAR THEN
2998: x_complete_rec.deduction_attribute3 := NULL;
2999: END IF;
3000: IF p_claim_rec.deduction_attribute3 IS NULL THEN
3001: x_complete_rec.deduction_attribute3 := l_claim_rec.deduction_attribute3;

Line 3003: IF p_claim_rec.deduction_attribute4 = FND_API.G_MISS_CHAR THEN

2999: END IF;
3000: IF p_claim_rec.deduction_attribute3 IS NULL THEN
3001: x_complete_rec.deduction_attribute3 := l_claim_rec.deduction_attribute3;
3002: END IF;
3003: IF p_claim_rec.deduction_attribute4 = FND_API.G_MISS_CHAR THEN
3004: x_complete_rec.deduction_attribute4 := NULL;
3005: END IF;
3006: IF p_claim_rec.deduction_attribute4 IS NULL THEN
3007: x_complete_rec.deduction_attribute4 := l_claim_rec.deduction_attribute4;

Line 3009: IF p_claim_rec.deduction_attribute5 = FND_API.G_MISS_CHAR THEN

3005: END IF;
3006: IF p_claim_rec.deduction_attribute4 IS NULL THEN
3007: x_complete_rec.deduction_attribute4 := l_claim_rec.deduction_attribute4;
3008: END IF;
3009: IF p_claim_rec.deduction_attribute5 = FND_API.G_MISS_CHAR THEN
3010: x_complete_rec.deduction_attribute5 := NULL;
3011: END IF;
3012: IF p_claim_rec.deduction_attribute5 IS NULL THEN
3013: x_complete_rec.deduction_attribute5 := l_claim_rec.deduction_attribute5;

Line 3015: IF p_claim_rec.attribute6 = FND_API.G_MISS_CHAR THEN

3011: END IF;
3012: IF p_claim_rec.deduction_attribute5 IS NULL THEN
3013: x_complete_rec.deduction_attribute5 := l_claim_rec.deduction_attribute5;
3014: END IF;
3015: IF p_claim_rec.attribute6 = FND_API.G_MISS_CHAR THEN
3016: x_complete_rec.deduction_attribute6 := NULL;
3017: END IF;
3018: IF p_claim_rec.attribute6 IS NULL THEN
3019: x_complete_rec.deduction_attribute6 := l_claim_rec.deduction_attribute6;

Line 3021: IF p_claim_rec.deduction_attribute7 = FND_API.G_MISS_CHAR THEN

3017: END IF;
3018: IF p_claim_rec.attribute6 IS NULL THEN
3019: x_complete_rec.deduction_attribute6 := l_claim_rec.deduction_attribute6;
3020: END IF;
3021: IF p_claim_rec.deduction_attribute7 = FND_API.G_MISS_CHAR THEN
3022: x_complete_rec.deduction_attribute7 := NULL;
3023: END IF;
3024: IF p_claim_rec.deduction_attribute7 IS NULL THEN
3025: x_complete_rec.deduction_attribute7 := l_claim_rec.deduction_attribute7;

Line 3027: IF p_claim_rec.deduction_attribute8 = FND_API.G_MISS_CHAR THEN

3023: END IF;
3024: IF p_claim_rec.deduction_attribute7 IS NULL THEN
3025: x_complete_rec.deduction_attribute7 := l_claim_rec.deduction_attribute7;
3026: END IF;
3027: IF p_claim_rec.deduction_attribute8 = FND_API.G_MISS_CHAR THEN
3028: x_complete_rec.deduction_attribute8 := NULL;
3029: END IF;
3030: IF p_claim_rec.deduction_attribute8 IS NULL THEN
3031: x_complete_rec.deduction_attribute8 := l_claim_rec.deduction_attribute8;

Line 3033: IF p_claim_rec.deduction_attribute9 = FND_API.G_MISS_CHAR THEN

3029: END IF;
3030: IF p_claim_rec.deduction_attribute8 IS NULL THEN
3031: x_complete_rec.deduction_attribute8 := l_claim_rec.deduction_attribute8;
3032: END IF;
3033: IF p_claim_rec.deduction_attribute9 = FND_API.G_MISS_CHAR THEN
3034: x_complete_rec.deduction_attribute9 := NULL;
3035: END IF;
3036: IF p_claim_rec.deduction_attribute9 IS NULL THEN
3037: x_complete_rec.deduction_attribute9 := l_claim_rec.deduction_attribute9;

Line 3039: IF p_claim_rec.deduction_attribute10 = FND_API.G_MISS_CHAR THEN

3035: END IF;
3036: IF p_claim_rec.deduction_attribute9 IS NULL THEN
3037: x_complete_rec.deduction_attribute9 := l_claim_rec.deduction_attribute9;
3038: END IF;
3039: IF p_claim_rec.deduction_attribute10 = FND_API.G_MISS_CHAR THEN
3040: x_complete_rec.deduction_attribute10 := NULL;
3041: END IF;
3042: IF p_claim_rec.deduction_attribute10 IS NULL THEN
3043: x_complete_rec.deduction_attribute10 := l_claim_rec.deduction_attribute10;

Line 3045: IF p_claim_rec.deduction_attribute11 = FND_API.G_MISS_CHAR THEN

3041: END IF;
3042: IF p_claim_rec.deduction_attribute10 IS NULL THEN
3043: x_complete_rec.deduction_attribute10 := l_claim_rec.deduction_attribute10;
3044: END IF;
3045: IF p_claim_rec.deduction_attribute11 = FND_API.G_MISS_CHAR THEN
3046: x_complete_rec.deduction_attribute11 := NULL;
3047: END IF;
3048: IF p_claim_rec.deduction_attribute11 IS NULL THEN
3049: x_complete_rec.deduction_attribute11 := l_claim_rec.deduction_attribute11;

Line 3051: IF p_claim_rec.deduction_attribute12 = FND_API.G_MISS_CHAR THEN

3047: END IF;
3048: IF p_claim_rec.deduction_attribute11 IS NULL THEN
3049: x_complete_rec.deduction_attribute11 := l_claim_rec.deduction_attribute11;
3050: END IF;
3051: IF p_claim_rec.deduction_attribute12 = FND_API.G_MISS_CHAR THEN
3052: x_complete_rec.deduction_attribute12 := NULL;
3053: END IF;
3054: IF p_claim_rec.deduction_attribute12 IS NULL THEN
3055: x_complete_rec.deduction_attribute12 := l_claim_rec.deduction_attribute12;

Line 3057: IF p_claim_rec.deduction_attribute13 = FND_API.G_MISS_CHAR THEN

3053: END IF;
3054: IF p_claim_rec.deduction_attribute12 IS NULL THEN
3055: x_complete_rec.deduction_attribute12 := l_claim_rec.deduction_attribute12;
3056: END IF;
3057: IF p_claim_rec.deduction_attribute13 = FND_API.G_MISS_CHAR THEN
3058: x_complete_rec.deduction_attribute13 := NULL;
3059: END IF;
3060: IF p_claim_rec.deduction_attribute13 IS NULL THEN
3061: x_complete_rec.deduction_attribute13 := l_claim_rec.deduction_attribute13;

Line 3063: IF p_claim_rec.deduction_attribute14 = FND_API.G_MISS_CHAR THEN

3059: END IF;
3060: IF p_claim_rec.deduction_attribute13 IS NULL THEN
3061: x_complete_rec.deduction_attribute13 := l_claim_rec.deduction_attribute13;
3062: END IF;
3063: IF p_claim_rec.deduction_attribute14 = FND_API.G_MISS_CHAR THEN
3064: x_complete_rec.deduction_attribute14 := NULL;
3065: END IF;
3066: IF p_claim_rec.deduction_attribute14 IS NULL THEN
3067: x_complete_rec.deduction_attribute14 := l_claim_rec.deduction_attribute14;

Line 3069: IF p_claim_rec.deduction_attribute15 = FND_API.G_MISS_CHAR THEN

3065: END IF;
3066: IF p_claim_rec.deduction_attribute14 IS NULL THEN
3067: x_complete_rec.deduction_attribute14 := l_claim_rec.deduction_attribute14;
3068: END IF;
3069: IF p_claim_rec.deduction_attribute15 = FND_API.G_MISS_CHAR THEN
3070: x_complete_rec.deduction_attribute15 := NULL;
3071: END IF;
3072: IF p_claim_rec.deduction_attribute15 IS NULL THEN
3073: x_complete_rec.deduction_attribute15 := l_claim_rec.deduction_attribute15;

Line 3075: IF p_claim_rec.org_id = FND_API.G_MISS_NUM THEN

3071: END IF;
3072: IF p_claim_rec.deduction_attribute15 IS NULL THEN
3073: x_complete_rec.deduction_attribute15 := l_claim_rec.deduction_attribute15;
3074: END IF;
3075: IF p_claim_rec.org_id = FND_API.G_MISS_NUM THEN
3076: x_complete_rec.org_id := NULL;
3077: END IF;
3078: IF p_claim_rec.org_id IS NULL THEN
3079: x_complete_rec.org_id := l_claim_rec.org_id;

Line 3082: IF p_claim_rec.legal_entity_id = FND_API.G_MISS_NUM THEN

3078: IF p_claim_rec.org_id IS NULL THEN
3079: x_complete_rec.org_id := l_claim_rec.org_id;
3080: END IF;
3081: -- Added by Kishore
3082: IF p_claim_rec.legal_entity_id = FND_API.G_MISS_NUM THEN
3083: x_complete_rec.legal_entity_id := NULL;
3084: END IF;
3085: IF p_claim_rec.legal_entity_id IS NULL THEN
3086: x_complete_rec.legal_entity_id := l_claim_rec.legal_entity_id;

Line 3089: IF p_claim_rec.write_off_flag = FND_API.G_MISS_CHAR THEN

3085: IF p_claim_rec.legal_entity_id IS NULL THEN
3086: x_complete_rec.legal_entity_id := l_claim_rec.legal_entity_id;
3087: END IF;
3088: --Auto Write-off changes (Added by Uday Poluri)
3089: IF p_claim_rec.write_off_flag = FND_API.G_MISS_CHAR THEN
3090: x_complete_rec.write_off_flag := NULL;
3091: END IF;
3092: IF p_claim_rec.write_off_flag IS NULL THEN
3093: x_complete_rec.write_off_flag := l_claim_rec.write_off_flag;

Line 3096: IF p_claim_rec.write_off_threshold_amount = FND_API.G_MISS_NUM THEN

3092: IF p_claim_rec.write_off_flag IS NULL THEN
3093: x_complete_rec.write_off_flag := l_claim_rec.write_off_flag;
3094: END IF;
3095:
3096: IF p_claim_rec.write_off_threshold_amount = FND_API.G_MISS_NUM THEN
3097: x_complete_rec.write_off_threshold_amount := NULL;
3098: END IF;
3099: IF p_claim_rec.write_off_threshold_amount IS NULL THEN
3100: x_complete_rec.write_off_threshold_amount := l_claim_rec.write_off_threshold_amount;

Line 3103: IF p_claim_rec.under_write_off_threshold = FND_API.G_MISS_CHAR THEN

3099: IF p_claim_rec.write_off_threshold_amount IS NULL THEN
3100: x_complete_rec.write_off_threshold_amount := l_claim_rec.write_off_threshold_amount;
3101: END IF;
3102:
3103: IF p_claim_rec.under_write_off_threshold = FND_API.G_MISS_CHAR THEN
3104: x_complete_rec.under_write_off_threshold := NULL;
3105: END IF;
3106: IF p_claim_rec.under_write_off_threshold IS NULL THEN
3107: x_complete_rec.under_write_off_threshold := l_claim_rec.under_write_off_threshold;

Line 3110: IF p_claim_rec.customer_reason = FND_API.G_MISS_CHAR THEN

3106: IF p_claim_rec.under_write_off_threshold IS NULL THEN
3107: x_complete_rec.under_write_off_threshold := l_claim_rec.under_write_off_threshold;
3108: END IF;
3109:
3110: IF p_claim_rec.customer_reason = FND_API.G_MISS_CHAR THEN
3111: x_complete_rec.customer_reason := NULL;
3112: END IF;
3113: IF p_claim_rec.customer_reason IS NULL THEN
3114: x_complete_rec.customer_reason := l_claim_rec.customer_reason;

Line 3117: IF p_claim_rec.ship_to_cust_account_id = FND_API.G_MISS_NUM THEN

3113: IF p_claim_rec.customer_reason IS NULL THEN
3114: x_complete_rec.customer_reason := l_claim_rec.customer_reason;
3115: END IF;
3116:
3117: IF p_claim_rec.ship_to_cust_account_id = FND_API.G_MISS_NUM THEN
3118: x_complete_rec.ship_to_cust_account_id := NULL;
3119: END IF;
3120: IF p_claim_rec.ship_to_cust_account_id IS NULL THEN
3121: x_complete_rec.ship_to_cust_account_id := l_claim_rec.ship_to_cust_account_id;

Line 3126: IF p_claim_rec.amount_applied = FND_API.G_MISS_NUM THEN

3122: END IF;
3123: --End of Auto Write-off changes (Added by Uday Poluri)
3124:
3125: -- Start Bug:2781186 (Subsequent Receipt Application changes)
3126: IF p_claim_rec.amount_applied = FND_API.G_MISS_NUM THEN
3127: x_complete_rec.amount_applied := NULL;
3128: END IF;
3129: IF p_claim_rec.amount_applied IS NULL THEN
3130: x_complete_rec.amount_applied := l_claim_rec.amount_applied;

Line 3133: IF p_claim_rec.applied_receipt_id = FND_API.G_MISS_NUM THEN

3129: IF p_claim_rec.amount_applied IS NULL THEN
3130: x_complete_rec.amount_applied := l_claim_rec.amount_applied;
3131: END IF;
3132:
3133: IF p_claim_rec.applied_receipt_id = FND_API.G_MISS_NUM THEN
3134: x_complete_rec.applied_receipt_id := NULL;
3135: END IF;
3136: IF p_claim_rec.applied_receipt_id IS NULL THEN
3137: x_complete_rec.applied_receipt_id := l_claim_rec.applied_receipt_id;

Line 3140: IF p_claim_rec.applied_receipt_number = FND_API.G_MISS_CHAR THEN

3136: IF p_claim_rec.applied_receipt_id IS NULL THEN
3137: x_complete_rec.applied_receipt_id := l_claim_rec.applied_receipt_id;
3138: END IF;
3139:
3140: IF p_claim_rec.applied_receipt_number = FND_API.G_MISS_CHAR THEN
3141: x_complete_rec.applied_receipt_number := NULL;
3142: END IF;
3143: IF p_claim_rec.applied_receipt_number IS NULL THEN
3144: x_complete_rec.applied_receipt_number := l_claim_rec.applied_receipt_number;

Line 3147: IF p_claim_rec.wo_rec_trx_id = FND_API.G_MISS_NUM THEN

3143: IF p_claim_rec.applied_receipt_number IS NULL THEN
3144: x_complete_rec.applied_receipt_number := l_claim_rec.applied_receipt_number;
3145: END IF;
3146: -- End Bug:2781186
3147: IF p_claim_rec.wo_rec_trx_id = FND_API.G_MISS_NUM THEN
3148: x_complete_rec.wo_rec_trx_id := NULL;
3149: END IF;
3150: IF p_claim_rec.wo_rec_trx_id IS NULL THEN
3151: x_complete_rec.wo_rec_trx_id := l_claim_rec.wo_rec_trx_id;

Line 3155: IF p_claim_rec.group_claim_id = FND_API.G_MISS_NUM THEN

3151: x_complete_rec.wo_rec_trx_id := l_claim_rec.wo_rec_trx_id;
3152: END IF;
3153:
3154:
3155: IF p_claim_rec.group_claim_id = FND_API.G_MISS_NUM THEN
3156: x_complete_rec.group_claim_id := NULL;
3157: END IF;
3158: IF p_claim_rec.group_claim_id IS NULL THEN
3159: x_complete_rec.group_claim_id := l_claim_rec.group_claim_id;

Line 3161: IF p_claim_rec.appr_wf_item_key = FND_API.G_MISS_CHAR THEN

3157: END IF;
3158: IF p_claim_rec.group_claim_id IS NULL THEN
3159: x_complete_rec.group_claim_id := l_claim_rec.group_claim_id;
3160: END IF;
3161: IF p_claim_rec.appr_wf_item_key = FND_API.G_MISS_CHAR THEN
3162: x_complete_rec.appr_wf_item_key := NULL;
3163: END IF;
3164: IF p_claim_rec.appr_wf_item_key IS NULL THEN
3165: x_complete_rec.appr_wf_item_key := l_claim_rec.appr_wf_item_key;

Line 3167: IF p_claim_rec.cstl_wf_item_key = FND_API.G_MISS_CHAR THEN

3163: END IF;
3164: IF p_claim_rec.appr_wf_item_key IS NULL THEN
3165: x_complete_rec.appr_wf_item_key := l_claim_rec.appr_wf_item_key;
3166: END IF;
3167: IF p_claim_rec.cstl_wf_item_key = FND_API.G_MISS_CHAR THEN
3168: x_complete_rec.cstl_wf_item_key := NULL;
3169: END IF;
3170: IF p_claim_rec.cstl_wf_item_key IS NULL THEN
3171: x_complete_rec.cstl_wf_item_key := l_claim_rec.cstl_wf_item_key;

Line 3173: IF p_claim_rec.batch_type = FND_API.G_MISS_CHAR THEN

3169: END IF;
3170: IF p_claim_rec.cstl_wf_item_key IS NULL THEN
3171: x_complete_rec.cstl_wf_item_key := l_claim_rec.cstl_wf_item_key;
3172: END IF;
3173: IF p_claim_rec.batch_type = FND_API.G_MISS_CHAR THEN
3174: x_complete_rec.batch_type := NULL;
3175: END IF;
3176: IF p_claim_rec.batch_type IS NULL THEN
3177: x_complete_rec.batch_type := l_claim_rec.batch_type;

Line 3180: IF p_claim_rec.created_from = FND_API.G_MISS_CHAR THEN

3176: IF p_claim_rec.batch_type IS NULL THEN
3177: x_complete_rec.batch_type := l_claim_rec.batch_type;
3178: END IF;
3179:
3180: IF p_claim_rec.created_from = FND_API.G_MISS_CHAR THEN
3181: x_complete_rec.created_from := NULL;
3182: END IF;
3183: IF p_claim_rec.created_from IS NULL THEN
3184: x_complete_rec.created_from := l_claim_rec.created_from;

Line 3187: IF p_claim_rec.program_id = FND_API.G_MISS_NUM THEN

3183: IF p_claim_rec.created_from IS NULL THEN
3184: x_complete_rec.created_from := l_claim_rec.created_from;
3185: END IF;
3186:
3187: IF p_claim_rec.program_id = FND_API.G_MISS_NUM THEN
3188: x_complete_rec.program_id := NULL;
3189: END IF;
3190: IF p_claim_rec.program_id IS NULL THEN
3191: x_complete_rec.program_id := l_claim_rec.program_id;

Line 3194: IF p_claim_rec.program_update_date = FND_API.G_MISS_DATE THEN

3190: IF p_claim_rec.program_id IS NULL THEN
3191: x_complete_rec.program_id := l_claim_rec.program_id;
3192: END IF;
3193:
3194: IF p_claim_rec.program_update_date = FND_API.G_MISS_DATE THEN
3195: x_complete_rec.program_update_date := NULL;
3196: END IF;
3197: IF p_claim_rec.program_update_date IS NULL THEN
3198: x_complete_rec.program_update_date := l_claim_rec.program_update_date;

Line 3201: IF p_claim_rec.program_application_id = FND_API.G_MISS_NUM THEN

3197: IF p_claim_rec.program_update_date IS NULL THEN
3198: x_complete_rec.program_update_date := l_claim_rec.program_update_date;
3199: END IF;
3200:
3201: IF p_claim_rec.program_application_id = FND_API.G_MISS_NUM THEN
3202: x_complete_rec.program_application_id := NULL;
3203: END IF;
3204: IF p_claim_rec.program_application_id IS NULL THEN
3205: x_complete_rec.program_application_id := l_claim_rec.program_application_id;

Line 3208: IF p_claim_rec.request_id = FND_API.G_MISS_NUM THEN

3204: IF p_claim_rec.program_application_id IS NULL THEN
3205: x_complete_rec.program_application_id := l_claim_rec.program_application_id;
3206: END IF;
3207:
3208: IF p_claim_rec.request_id = FND_API.G_MISS_NUM THEN
3209: x_complete_rec.request_id := NULL;
3210: END IF;
3211: IF p_claim_rec.request_id IS NULL THEN
3212: x_complete_rec.request_id := l_claim_rec.request_id;

Line 3217: WHEN FND_API.G_EXC_ERROR THEN

3213: END IF;
3214:
3215:
3216: EXCEPTION
3217: WHEN FND_API.G_EXC_ERROR THEN
3218: x_return_status := FND_API.G_RET_STS_ERROR;
3219: WHEN OTHERS THEN
3220: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3221: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_COMPLETE_ERROR');

Line 3218: x_return_status := FND_API.G_RET_STS_ERROR;

3214:
3215:
3216: EXCEPTION
3217: WHEN FND_API.G_EXC_ERROR THEN
3218: x_return_status := FND_API.G_RET_STS_ERROR;
3219: WHEN OTHERS THEN
3220: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3221: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_COMPLETE_ERROR');
3222: FND_MSG_PUB.add;

Line 3224: x_return_status := FND_API.g_ret_sts_unexp_error;

3220: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
3221: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_COMPLETE_ERROR');
3222: FND_MSG_PUB.add;
3223: END IF;
3224: x_return_status := FND_API.g_ret_sts_unexp_error;
3225: END Complete_Claim_Rec;
3226: ---------------------------------------------------------------------
3227: -- PROCEDURE
3228: -- Create_Claim

Line 3246: -- 6. Please don't pass in any FND_API.g_mess_char/num/date.

3242: -- the sequence.
3243: -- 4. If a flag column is passed in, check if it is 'Y' or 'N'.
3244: -- Raise exception for invalid flag.
3245: -- 5. If a flag column is not passed in, default it to 'Y'.
3246: -- 6. Please don't pass in any FND_API.g_mess_char/num/date.
3247: -- 7. The program assumes that the cust_account_id and
3248: -- cust_billto_acct_site_id that passed in the program are valid
3249: ---------------------------------------------------------------------
3250: PROCEDURE Create_Claim (

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

3248: -- cust_billto_acct_site_id that passed in the program are valid
3249: ---------------------------------------------------------------------
3250: PROCEDURE Create_Claim (
3251: p_api_version IN NUMBER
3252: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3253: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3254: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3255:
3256: ,x_return_status OUT NOCOPY VARCHAR2

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

3249: ---------------------------------------------------------------------
3250: PROCEDURE Create_Claim (
3251: p_api_version IN NUMBER
3252: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3253: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3254: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3255:
3256: ,x_return_status OUT NOCOPY VARCHAR2
3257: ,x_msg_data OUT NOCOPY VARCHAR2

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

3250: PROCEDURE Create_Claim (
3251: p_api_version IN NUMBER
3252: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
3253: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
3254: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
3255:
3256: ,x_return_status OUT NOCOPY VARCHAR2
3257: ,x_msg_data OUT NOCOPY VARCHAR2
3258: ,x_msg_count OUT NOCOPY NUMBER

Line 3415: IF NOT FND_API.Compatible_API_Call (

3411:
3412: -- Standard begin of API savepoint
3413: SAVEPOINT Create_Claim_PVT;
3414: -- Standard call to check for call compatibility.
3415: IF NOT FND_API.Compatible_API_Call (
3416: l_api_version,
3417: p_api_version,
3418: l_api_name,
3419: G_PKG_NAME)

Line 3421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3417: p_api_version,
3418: l_api_name,
3419: G_PKG_NAME)
3420: THEN
3421: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3422: END IF;
3423: -- Debug Message
3424: IF OZF_DEBUG_LOW_ON THEN
3425: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 3430: IF FND_API.To_Boolean (p_init_msg_list) THEN

3426: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
3427: FND_MSG_PUB.Add;
3428: END IF;
3429: --Initialize message list if p_init_msg_list is TRUE.
3430: IF FND_API.To_Boolean (p_init_msg_list) THEN
3431: FND_MSG_PUB.initialize;
3432: END IF;
3433:
3434: -- Initialize API return status to sucess

Line 3435: x_return_status := FND_API.G_RET_STS_SUCCESS;

3431: FND_MSG_PUB.initialize;
3432: END IF;
3433:
3434: -- Initialize API return status to sucess
3435: x_return_status := FND_API.G_RET_STS_SUCCESS;
3436:
3437:
3438: -- Default claim_class
3439: IF (l_claim.claim_class is null OR

Line 3440: l_claim.claim_class = FND_API.G_MISS_CHAR) THEN

3436:
3437:
3438: -- Default claim_class
3439: IF (l_claim.claim_class is null OR
3440: l_claim.claim_class = FND_API.G_MISS_CHAR) THEN
3441: if l_claim.amount >0 then
3442: l_claim.claim_class := G_CLAIM_CLASS;
3443: else
3444: l_claim.claim_class := G_CHARGE_CLASS;

Line 3460: RAISE FND_API.G_EXC_ERROR;

3456: THEN
3457: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CLAIM_CLASS_WRG');
3458: FND_MSG_PUB.add;
3459: END IF;
3460: RAISE FND_API.G_EXC_ERROR;
3461: END IF;
3462: END IF;
3463:
3464: IF l_claim.cust_account_id is NULL OR

Line 3465: l_claim.cust_account_id = FND_API.G_MISS_NUM

3461: END IF;
3462: END IF;
3463:
3464: IF l_claim.cust_account_id is NULL OR
3465: l_claim.cust_account_id = FND_API.G_MISS_NUM
3466: THEN
3467: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3468: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CUST_ID_MISSING');
3469: FND_MSG_PUB.Add;

Line 3471: RAISE FND_API.G_EXC_ERROR;

3467: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3468: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CUST_ID_MISSING');
3469: FND_MSG_PUB.Add;
3470: END IF;
3471: RAISE FND_API.G_EXC_ERROR;
3472: END IF;
3473:
3474: --Call Get Customer Reason to get the reason code
3475: --if the customer reason is not null.

Line 3477: OR l_claim.reason_code_id = FND_API.G_MISS_NUM)

3473:
3474: --Call Get Customer Reason to get the reason code
3475: --if the customer reason is not null.
3476: IF (l_claim.reason_code_id is NULL
3477: OR l_claim.reason_code_id = FND_API.G_MISS_NUM)
3478: AND (l_claim.customer_reason is NOT NULL
3479: AND l_claim.customer_reason <> FND_API.G_MISS_CHAR)
3480: THEN
3481: Get_Customer_Reason(p_cust_account_id => l_claim.cust_account_id,

Line 3479: AND l_claim.customer_reason <> FND_API.G_MISS_CHAR)

3475: --if the customer reason is not null.
3476: IF (l_claim.reason_code_id is NULL
3477: OR l_claim.reason_code_id = FND_API.G_MISS_NUM)
3478: AND (l_claim.customer_reason is NOT NULL
3479: AND l_claim.customer_reason <> FND_API.G_MISS_CHAR)
3480: THEN
3481: Get_Customer_Reason(p_cust_account_id => l_claim.cust_account_id,
3482: px_reason_code_id => l_claim.reason_code_id,
3483: p_customer_reason => l_claim.customer_reason,

Line 3491: IF l_return_status = FND_API.g_ret_sts_error

3487: --retrieve the reason code. Instead default it from the Claim Defaults.
3488: IF l_claim.claim_class <> G_DEDUCTION_CLASS AND
3489: l_claim.claim_class <> G_OVERPAYMENT_CLASS
3490: THEN
3491: IF l_return_status = FND_API.g_ret_sts_error
3492: THEN
3493: RAISE FND_API.g_exc_error;
3494: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3495: RAISE FND_API.g_exc_unexpected_error;

Line 3493: RAISE FND_API.g_exc_error;

3489: l_claim.claim_class <> G_OVERPAYMENT_CLASS
3490: THEN
3491: IF l_return_status = FND_API.g_ret_sts_error
3492: THEN
3493: RAISE FND_API.g_exc_error;
3494: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3495: RAISE FND_API.g_exc_unexpected_error;
3496: END IF;
3497: END IF;

Line 3494: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3490: THEN
3491: IF l_return_status = FND_API.g_ret_sts_error
3492: THEN
3493: RAISE FND_API.g_exc_error;
3494: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3495: RAISE FND_API.g_exc_unexpected_error;
3496: END IF;
3497: END IF;
3498: END IF;

Line 3495: RAISE FND_API.g_exc_unexpected_error;

3491: IF l_return_status = FND_API.g_ret_sts_error
3492: THEN
3493: RAISE FND_API.g_exc_error;
3494: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3495: RAISE FND_API.g_exc_unexpected_error;
3496: END IF;
3497: END IF;
3498: END IF;
3499: --end of get_customer_reason if block.

Line 3511: IF l_return_status = FND_API.g_ret_sts_error THEN

3507: x_return_status => l_return_status,
3508: x_msg_count => l_msg_count,
3509: x_msg_data => l_msg_data);
3510:
3511: IF l_return_status = FND_API.g_ret_sts_error THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3515: END IF;

Line 3512: RAISE FND_API.G_EXC_ERROR;

3508: x_msg_count => l_msg_count,
3509: x_msg_data => l_msg_data);
3510:
3511: IF l_return_status = FND_API.g_ret_sts_error THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3515: END IF;
3516:

Line 3513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3509: x_msg_data => l_msg_data);
3510:
3511: IF l_return_status = FND_API.g_ret_sts_error THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3515: END IF;
3516:
3517: --Default custom setup Id

Line 3514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3510:
3511: IF l_return_status = FND_API.g_ret_sts_error THEN
3512: RAISE FND_API.G_EXC_ERROR;
3513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3515: END IF;
3516:
3517: --Default custom setup Id
3518: IF l_claim.custom_setup_id IS NULL

Line 3519: OR l_claim.custom_setup_id = FND_API.G_MISS_NUM

3515: END IF;
3516:
3517: --Default custom setup Id
3518: IF l_claim.custom_setup_id IS NULL
3519: OR l_claim.custom_setup_id = FND_API.G_MISS_NUM
3520: THEN
3521: l_claim.custom_setup_id := l_clam_def_rec_type.custom_setup_id;
3522: END IF;
3523:

Line 3525: l_claim.custom_setup_id = FND_API.G_MISS_NUM

3521: l_claim.custom_setup_id := l_clam_def_rec_type.custom_setup_id;
3522: END IF;
3523:
3524: IF l_claim.custom_setup_id is NULL OR
3525: l_claim.custom_setup_id = FND_API.G_MISS_NUM
3526: THEN
3527: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
3528: THEN
3529: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CUST_SETUP_MISSING');

Line 3532: RAISE FND_API.G_EXC_ERROR;

3528: THEN
3529: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CUST_SETUP_MISSING');
3530: FND_MSG_PUB.add;
3531: END IF;
3532: RAISE FND_API.G_EXC_ERROR;
3533: END IF;
3534:
3535:
3536: --Default Claim type Id.

Line 3538: OR l_claim.claim_type_id = FND_API.G_MISS_NUM

3534:
3535:
3536: --Default Claim type Id.
3537: IF l_claim.claim_type_id IS NULL
3538: OR l_claim.claim_type_id = FND_API.G_MISS_NUM
3539: THEN
3540: l_claim.claim_type_id := l_clam_def_rec_type.claim_type_id;
3541: END IF;
3542:

Line 3544: l_claim.claim_type_id = FND_API.G_MISS_NUM

3540: l_claim.claim_type_id := l_clam_def_rec_type.claim_type_id;
3541: END IF;
3542:
3543: IF l_claim.claim_type_id is NULL OR
3544: l_claim.claim_type_id = FND_API.G_MISS_NUM
3545: THEN
3546: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3547: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CLAIM_TYPE_MISSING');
3548: FND_MSG_PUB.Add;

Line 3550: RAISE FND_API.G_EXC_ERROR;

3546: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3547: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CLAIM_TYPE_MISSING');
3548: FND_MSG_PUB.Add;
3549: END IF;
3550: RAISE FND_API.G_EXC_ERROR;
3551: END IF;
3552:
3553:
3554: --Default reason code

Line 3556: OR l_claim.reason_code_id = FND_API.G_MISS_NUM)

3552:
3553:
3554: --Default reason code
3555: IF (l_claim.reason_code_id IS NULL
3556: OR l_claim.reason_code_id = FND_API.G_MISS_NUM)
3557: THEN
3558: l_claim.reason_code_id := l_clam_def_rec_type.reason_code_id;
3559: END IF;
3560:

Line 3569: RAISE FND_API.G_EXC_ERROR;

3565: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3566: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_REASON_CD_MISSING');
3567: FND_MSG_PUB.Add;
3568: END IF;
3569: RAISE FND_API.G_EXC_ERROR;
3570: END IF;
3571: --End of defalting values from Claim defaults.
3572:
3573:

Line 3575: l_claim.amount = FND_API.G_MISS_NUM OR

3571: --End of defalting values from Claim defaults.
3572:
3573:
3574: IF (l_claim.amount is NULL OR
3575: l_claim.amount = FND_API.G_MISS_NUM OR
3576: l_claim.amount = 0) AND
3577: l_claim.claim_class <>'GROUP' THEN
3578:
3579: IF OZF_DEBUG_LOW_ON THEN

Line 3589: RAISE FND_API.G_EXC_ERROR;

3585: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3586: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_AMOUNT_MISSING');
3587: FND_MSG_PUB.Add;
3588: END IF;
3589: RAISE FND_API.G_EXC_ERROR;
3590: END IF;
3591:
3592: -- Now we will default some values for this claim record
3593: --

Line 3603: RAISE fnd_api.g_exc_error;

3599: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
3600: fnd_message.set_name('OZF', 'OZF_CLAIM_ORG_ID_MISSING');
3601: fnd_msg_pub.add;
3602: END IF;
3603: RAISE fnd_api.g_exc_error;
3604: END IF;
3605: CLOSE org_id_csr;
3606: l_claim.org_id := l_org_id; */
3607:

Line 3627: l_claim.legal_entity_id = FND_API.G_MISS_NUM

3623: END IF;
3624:
3625: -- BUG 4600325 is fixed.
3626: IF l_claim.legal_entity_id is NULL OR
3627: l_claim.legal_entity_id = FND_API.G_MISS_NUM
3628: THEN
3629: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3630: FND_MESSAGE.Set_Name('OZF','OZF_LE_FOR_CLAIM_MISSING');
3631: FND_MSG_PUB.Add;

Line 3633: RAISE FND_API.G_EXC_ERROR;

3629: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3630: FND_MESSAGE.Set_Name('OZF','OZF_LE_FOR_CLAIM_MISSING');
3631: FND_MSG_PUB.Add;
3632: END IF;
3633: RAISE FND_API.G_EXC_ERROR;
3634: END IF;
3635:
3636: -- get sob
3637: OPEN sob_csr;

Line 3646: (l_claim.claim_number = FND_API.G_MISS_CHAR))THEN

3642:
3643:
3644: -- Default claim_number if it's null
3645: IF ((l_claim.claim_number is null) OR
3646: (l_claim.claim_number = FND_API.G_MISS_CHAR))THEN
3647:
3648: Get_Claim_Number(
3649: p_split_from_claim_id => l_claim.split_from_claim_id,
3650: p_custom_setup_id => l_claim.custom_setup_id,

Line 3656: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

3652: x_msg_data => l_msg_data,
3653: x_msg_count => l_msg_count,
3654: x_return_status=> l_return_status
3655: );
3656: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3657: RAISE FND_API.G_EXC_ERROR;
3658: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3660: END IF;

Line 3657: RAISE FND_API.G_EXC_ERROR;

3653: x_msg_count => l_msg_count,
3654: x_return_status=> l_return_status
3655: );
3656: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3657: RAISE FND_API.G_EXC_ERROR;
3658: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3660: END IF;
3661:

Line 3658: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

3654: x_return_status=> l_return_status
3655: );
3656: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3657: RAISE FND_API.G_EXC_ERROR;
3658: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3660: END IF;
3661:
3662: l_claim.claim_number := l_claim_number;

Line 3659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3655: );
3656: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
3657: RAISE FND_API.G_EXC_ERROR;
3658: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
3659: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3660: END IF;
3661:
3662: l_claim.claim_number := l_claim_number;
3663: ELSE

Line 3674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

3670: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
3671: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUP_CLAIM_NUM');
3672: FND_MSG_PUB.add;
3673: END IF;
3674: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
3675: END IF;
3676: END IF;
3677:
3678: -- Default CLAIM_DATE if it's null

Line 3680: l_claim.claim_date = FND_API.G_MISS_DATE)THEN

3676: END IF;
3677:
3678: -- Default CLAIM_DATE if it's null
3679: IF (l_claim.claim_date is null OR
3680: l_claim.claim_date = FND_API.G_MISS_DATE)THEN
3681: l_claim.claim_date := TRUNC(sysdate);
3682: END IF;
3683:
3684: -- get customer info from trade profile

Line 3697: l_claim.vendor_id = FND_API.G_MISS_NUM THEN

3693: END IF;
3694:
3695: -- Default vendor info
3696: IF l_claim.vendor_id is null OR
3697: l_claim.vendor_id = FND_API.G_MISS_NUM THEN
3698: l_claim.vendor_id := l_trade_profile.vendor_id;
3699:
3700: IF l_claim.vendor_site_id is null OR
3701: l_claim.vendor_site_id = FND_API.G_MISS_NUM THEN

Line 3701: l_claim.vendor_site_id = FND_API.G_MISS_NUM THEN

3697: l_claim.vendor_id = FND_API.G_MISS_NUM THEN
3698: l_claim.vendor_id := l_trade_profile.vendor_id;
3699:
3700: IF l_claim.vendor_site_id is null OR
3701: l_claim.vendor_site_id = FND_API.G_MISS_NUM THEN
3702: l_claim.vendor_site_id := l_trade_profile.vendor_site_id;
3703: END IF;
3704: END IF;
3705:

Line 3708: l_claim.due_date = FND_API.G_MISS_DATE) THEN

3704: END IF;
3705:
3706: -- Default DUE_DATE if it's null
3707: IF (l_claim.DUE_DATE is null OR
3708: l_claim.due_date = FND_API.G_MISS_DATE) THEN
3709:
3710: get_days_due (p_cust_accout_id => l_claim.cust_account_id,
3711: x_days_due => l_days_due,
3712: x_return_status => l_return_status);

Line 3713: IF l_return_status = FND_API.g_ret_sts_error THEN

3709:
3710: get_days_due (p_cust_accout_id => l_claim.cust_account_id,
3711: x_days_due => l_days_due,
3712: x_return_status => l_return_status);
3713: IF l_return_status = FND_API.g_ret_sts_error THEN
3714: RAISE FND_API.g_exc_error;
3715: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3716: RAISE FND_API.g_exc_unexpected_error;
3717: END IF;

Line 3714: RAISE FND_API.g_exc_error;

3710: get_days_due (p_cust_accout_id => l_claim.cust_account_id,
3711: x_days_due => l_days_due,
3712: x_return_status => l_return_status);
3713: IF l_return_status = FND_API.g_ret_sts_error THEN
3714: RAISE FND_API.g_exc_error;
3715: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3716: RAISE FND_API.g_exc_unexpected_error;
3717: END IF;
3718: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);

Line 3715: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3711: x_days_due => l_days_due,
3712: x_return_status => l_return_status);
3713: IF l_return_status = FND_API.g_ret_sts_error THEN
3714: RAISE FND_API.g_exc_error;
3715: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3716: RAISE FND_API.g_exc_unexpected_error;
3717: END IF;
3718: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);
3719: END IF;

Line 3716: RAISE FND_API.g_exc_unexpected_error;

3712: x_return_status => l_return_status);
3713: IF l_return_status = FND_API.g_ret_sts_error THEN
3714: RAISE FND_API.g_exc_error;
3715: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3716: RAISE FND_API.g_exc_unexpected_error;
3717: END IF;
3718: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);
3719: END IF;
3720:

Line 3723: l_claim.user_status_id = FND_API.G_MISS_NUM) THEN

3719: END IF;
3720:
3721: -- Default user_status_id if it's null
3722: IF (l_claim.user_status_id is null OR
3723: l_claim.user_status_id = FND_API.G_MISS_NUM) THEN
3724: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(
3725: P_STATUS_TYPE=> G_CLAIM_STATUS,
3726: P_STATUS_CODE=> G_INIT_STATUS
3727: )

Line 3737: l_claim.status_code = FND_API.G_MISS_CHAR) THEN

3733: l_claim.TASK_TEMPLATE_GROUP_ID := get_action_id(l_claim.reason_code_id);
3734:
3735: -- Default status_code according to user_status_id if it's null
3736: IF (l_claim.status_code is null OR
3737: l_claim.status_code = FND_API.G_MISS_CHAR) THEN
3738: Get_System_Status( p_user_status_id => l_claim.user_status_id,
3739: p_status_type => G_CLAIM_STATUS,
3740: x_system_status => l_status_code,
3741: x_msg_data => l_msg_data,

Line 3755: IF l_return_status = FND_API.g_ret_sts_error THEN

3751: -----------------* Deal with customer information *---------------------------
3752: get_customer_info (p_claim => l_claim,
3753: x_claim => l_complete_claim,
3754: x_return_status => l_return_status);
3755: IF l_return_status = FND_API.g_ret_sts_error THEN
3756: RAISE FND_API.g_exc_error;
3757: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3758: RAISE FND_API.g_exc_unexpected_error;
3759: END IF;

Line 3756: RAISE FND_API.g_exc_error;

3752: get_customer_info (p_claim => l_claim,
3753: x_claim => l_complete_claim,
3754: x_return_status => l_return_status);
3755: IF l_return_status = FND_API.g_ret_sts_error THEN
3756: RAISE FND_API.g_exc_error;
3757: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3758: RAISE FND_API.g_exc_unexpected_error;
3759: END IF;
3760:

Line 3757: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3753: x_claim => l_complete_claim,
3754: x_return_status => l_return_status);
3755: IF l_return_status = FND_API.g_ret_sts_error THEN
3756: RAISE FND_API.g_exc_error;
3757: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3758: RAISE FND_API.g_exc_unexpected_error;
3759: END IF;
3760:
3761: l_claim := l_complete_claim;

Line 3758: RAISE FND_API.g_exc_unexpected_error;

3754: x_return_status => l_return_status);
3755: IF l_return_status = FND_API.g_ret_sts_error THEN
3756: RAISE FND_API.g_exc_error;
3757: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3758: RAISE FND_API.g_exc_unexpected_error;
3759: END IF;
3760:
3761: l_claim := l_complete_claim;
3762:

Line 3765: -- l_claim.broker_id = FND_API.G_MISS_NUM)THEN

3761: l_claim := l_complete_claim;
3762:
3763: -- Default broker if it's null
3764: -- IF (l_claim.BROKER_ID is null OR
3765: -- l_claim.broker_id = FND_API.G_MISS_NUM)THEN
3766: -- OPEN broker_id_csr(l_claim.cust_account_id);
3767: -- FETCH broker_id_csr INTO l_broker_id;
3768: -- CLOSE broker_id_csr;
3769: -- l_claim.broker_id := l_broker_id;

Line 3779: l_claim.owner_id <> FND_API.G_MISS_NUM) THEN

3775: -- If it is then call the get owner routine.
3776: -- If there is still no owner after this. get the owner from sys parameter and add it to access list
3777:
3778: IF (l_claim.owner_id is not null AND
3779: l_claim.owner_id <> FND_API.G_MISS_NUM) THEN
3780:
3781: l_access_list(1).arc_act_access_to_object := G_CLAIM_OBJECT_TYPE;
3782: l_access_list(1).user_or_role_id := l_claim.owner_id;
3783: l_access_list(1).arc_user_or_role_type := 'USER';

Line 3809: IF l_return_status = FND_API.g_ret_sts_error THEN

3805: p_claim_class => l_claim.claim_class,
3806: x_owner_id => l_default_owner, --l_claim.owner_id, [BUG 3835800 Fixing]
3807: x_access_list => l_access_list,
3808: x_return_status => l_return_status);
3809: IF l_return_status = FND_API.g_ret_sts_error THEN
3810: RAISE FND_API.g_exc_error;
3811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3812: RAISE FND_API.g_exc_unexpected_error;
3813: END IF;

Line 3810: RAISE FND_API.g_exc_error;

3806: x_owner_id => l_default_owner, --l_claim.owner_id, [BUG 3835800 Fixing]
3807: x_access_list => l_access_list,
3808: x_return_status => l_return_status);
3809: IF l_return_status = FND_API.g_ret_sts_error THEN
3810: RAISE FND_API.g_exc_error;
3811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3812: RAISE FND_API.g_exc_unexpected_error;
3813: END IF;
3814: l_claim.owner_id := l_default_owner; -- [BUG 3835800 Fixing]

Line 3811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3807: x_access_list => l_access_list,
3808: x_return_status => l_return_status);
3809: IF l_return_status = FND_API.g_ret_sts_error THEN
3810: RAISE FND_API.g_exc_error;
3811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3812: RAISE FND_API.g_exc_unexpected_error;
3813: END IF;
3814: l_claim.owner_id := l_default_owner; -- [BUG 3835800 Fixing]
3815: END IF;

Line 3812: RAISE FND_API.g_exc_unexpected_error;

3808: x_return_status => l_return_status);
3809: IF l_return_status = FND_API.g_ret_sts_error THEN
3810: RAISE FND_API.g_exc_error;
3811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3812: RAISE FND_API.g_exc_unexpected_error;
3813: END IF;
3814: l_claim.owner_id := l_default_owner; -- [BUG 3835800 Fixing]
3815: END IF;
3816: IF (l_claim.owner_id is null OR

Line 3817: l_claim.owner_id = FND_API.G_MISS_NUM) THEN

3813: END IF;
3814: l_claim.owner_id := l_default_owner; -- [BUG 3835800 Fixing]
3815: END IF;
3816: IF (l_claim.owner_id is null OR
3817: l_claim.owner_id = FND_API.G_MISS_NUM) THEN
3818: OPEN default_owner_id_csr;
3819: FETCH default_owner_id_csr into l_claim.owner_id;
3820: CLOSE default_owner_id_csr;
3821:

Line 3863: l_claim.amount = FND_API.G_MISS_NUM) THEN

3859: l_claim.acctd_amount_adjusted := 0;
3860: l_claim.acctd_amount_settled := 0;
3861:
3862: IF (l_claim.amount is NULL OR
3863: l_claim.amount = FND_API.G_MISS_NUM) THEN
3864: l_claim.amount := 0;
3865: END IF;
3866: l_claim.amount_remaining := l_claim.amount;
3867:

Line 3876: l_claim.currency_code = FND_API.G_MISS_CHAR)THEN

3872:
3873: -- Default the transaction currency code to functional currency code
3874: -- if it's null.
3875: IF (l_claim.currency_code is NULL OR
3876: l_claim.currency_code = FND_API.G_MISS_CHAR)THEN
3877: l_claim.currency_code := l_functional_currency_code;
3878: END IF;
3879:
3880: -- If transaction currency_code is different from functional currency_code,

Line 3884: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN

3880: -- If transaction currency_code is different from functional currency_code,
3881: -- We need to make sure that exchange_type is not null
3882: IF l_claim.currency_code <> l_functional_currency_code THEN
3883: IF l_claim.exchange_rate_type is null OR
3884: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN
3885: OPEN exchange_rate_type_csr;
3886: FETCH exchange_rate_type_csr into l_claim.exchange_rate_type;
3887: CLOSE exchange_rate_type_csr;
3888:

Line 3890: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN

3886: FETCH exchange_rate_type_csr into l_claim.exchange_rate_type;
3887: CLOSE exchange_rate_type_csr;
3888:
3889: IF l_claim.exchange_rate_type is null OR
3890: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN
3891: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
3892: fnd_message.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
3893: fnd_msg_pub.add;
3894: END IF;

Line 3895: RAISE fnd_api.g_exc_error;

3891: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
3892: fnd_message.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
3893: fnd_msg_pub.add;
3894: END IF;
3895: RAISE fnd_api.g_exc_error;
3896: END IF;
3897: END IF;
3898:
3899:

Line 3901: l_claim.exchange_rate_date = FND_API.G_MISS_DATE THEN

3897: END IF;
3898:
3899:
3900: IF l_claim.exchange_rate_date is null OR
3901: l_claim.exchange_rate_date = FND_API.G_MISS_DATE THEN
3902:
3903: -- Default exchange_rate_date to sysdate
3904: l_claim.exchange_rate_date := SYSDATE;
3905: END IF;

Line 3928: IF l_return_status = FND_API.g_ret_sts_error THEN

3924: P_AMOUNT => l_claim.amount,
3925: X_RETURN_STATUS => l_return_status,
3926: X_ACC_AMOUNT => l_acc_amount,
3927: X_RATE => l_rate);
3928: IF l_return_status = FND_API.g_ret_sts_error THEN
3929: RAISE FND_API.g_exc_error;
3930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3931: RAISE FND_API.g_exc_unexpected_error;
3932: END IF;

Line 3929: RAISE FND_API.g_exc_error;

3925: X_RETURN_STATUS => l_return_status,
3926: X_ACC_AMOUNT => l_acc_amount,
3927: X_RATE => l_rate);
3928: IF l_return_status = FND_API.g_ret_sts_error THEN
3929: RAISE FND_API.g_exc_error;
3930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3931: RAISE FND_API.g_exc_unexpected_error;
3932: END IF;
3933: l_claim.exchange_rate := l_rate;

Line 3930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

3926: X_ACC_AMOUNT => l_acc_amount,
3927: X_RATE => l_rate);
3928: IF l_return_status = FND_API.g_ret_sts_error THEN
3929: RAISE FND_API.g_exc_error;
3930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3931: RAISE FND_API.g_exc_unexpected_error;
3932: END IF;
3933: l_claim.exchange_rate := l_rate;
3934: l_claim.ACCTD_AMOUNT := l_acc_amount;

Line 3931: RAISE FND_API.g_exc_unexpected_error;

3927: X_RATE => l_rate);
3928: IF l_return_status = FND_API.g_ret_sts_error THEN
3929: RAISE FND_API.g_exc_error;
3930: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
3931: RAISE FND_API.g_exc_unexpected_error;
3932: END IF;
3933: l_claim.exchange_rate := l_rate;
3934: l_claim.ACCTD_AMOUNT := l_acc_amount;
3935: l_claim.ACCTD_AMOUNT_REMAINING := l_acc_amount;

Line 3950: OR l_claim.claim_id = FND_API.G_MISS_NUM

3946:
3947:
3948: --Default the Claim_id only if the in coming claim_id is null.
3949: IF l_claim.claim_id is NULL
3950: OR l_claim.claim_id = FND_API.G_MISS_NUM
3951: THEN
3952: --fetch claim_id
3953: OPEN claim_id_csr;
3954: FETCH claim_id_csr INTO l_claim_id;

Line 3979: l_claim.root_claim_id = FND_API.G_MISS_NUM THEN

3975: l_claim_id := l_claim.claim_id;
3976:
3977: -- default root_claim_id
3978: IF l_claim.root_claim_id is NULL OR
3979: l_claim.root_claim_id = FND_API.G_MISS_NUM THEN
3980: l_claim.root_claim_id := l_claim_id;
3981: END IF;
3982:
3983: -- END of default

Line 3987: l_claim.customer_ref_number <> FND_API.G_MISS_CHAR THEN

3983: -- END of default
3984:
3985: -- normalize customer reference number if it isn't null
3986: IF l_claim.customer_ref_number is not NULL AND
3987: l_claim.customer_ref_number <> FND_API.G_MISS_CHAR THEN
3988: OZF_Claim_Utility_PVT.Normalize_Customer_Reference(
3989: p_customer_reference => l_claim.customer_ref_number,
3990: x_normalized_reference => l_customer_ref_norm
3991: );

Line 4005: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

4001: x_msg_data => l_msg_data,
4002: p_claim => l_claim
4003: );
4004:
4005: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4006: RAISE FND_API.G_EXC_ERROR;
4007: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009: END IF;

Line 4006: RAISE FND_API.G_EXC_ERROR;

4002: p_claim => l_claim
4003: );
4004:
4005: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4006: RAISE FND_API.G_EXC_ERROR;
4007: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009: END IF;
4010:

Line 4007: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

4003: );
4004:
4005: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4006: RAISE FND_API.G_EXC_ERROR;
4007: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009: END IF;
4010:
4011: -- -------------------------------------------------------------------------------------------

Line 4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4004:
4005: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
4006: RAISE FND_API.G_EXC_ERROR;
4007: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
4008: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4009: END IF;
4010:
4011: -- -------------------------------------------------------------------------------------------
4012: -- Bug : 2781186

Line 4174: RAISE FND_API.g_exc_error;

4170: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4171: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
4172: FND_MSG_PUB.add;
4173: END IF;
4174: RAISE FND_API.g_exc_error;
4175: END;
4176:
4177: -- Create Tasks for the claim created if task_template_group_id is not null
4178: IF (l_claim.task_template_group_id is not NULL AND

Line 4179: l_claim.task_template_group_id <> FND_API.G_MISS_NUM ) THEN

4175: END;
4176:
4177: -- Create Tasks for the claim created if task_template_group_id is not null
4178: IF (l_claim.task_template_group_id is not NULL AND
4179: l_claim.task_template_group_id <> FND_API.G_MISS_NUM ) THEN
4180:
4181: generate_tasks(
4182: p_task_template_group_id => l_claim.task_template_group_id
4183: ,p_owner_id => l_claim.owner_id

Line 4196: IF l_return_status = FND_API.g_ret_sts_error THEN

4192: FND_MSG_PUB.Add;
4193: END IF;
4194: END IF;
4195:
4196: IF l_return_status = FND_API.g_ret_sts_error THEN
4197: RAISE FND_API.g_exc_error;
4198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4199: RAISE FND_API.g_exc_unexpected_error;
4200: END IF;

Line 4197: RAISE FND_API.g_exc_error;

4193: END IF;
4194: END IF;
4195:
4196: IF l_return_status = FND_API.g_ret_sts_error THEN
4197: RAISE FND_API.g_exc_error;
4198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4199: RAISE FND_API.g_exc_unexpected_error;
4200: END IF;
4201:

Line 4198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4194: END IF;
4195:
4196: IF l_return_status = FND_API.g_ret_sts_error THEN
4197: RAISE FND_API.g_exc_error;
4198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4199: RAISE FND_API.g_exc_unexpected_error;
4200: END IF;
4201:
4202: -- This loop should always run

Line 4199: RAISE FND_API.g_exc_unexpected_error;

4195:
4196: IF l_return_status = FND_API.g_ret_sts_error THEN
4197: RAISE FND_API.g_exc_error;
4198: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4199: RAISE FND_API.g_exc_unexpected_error;
4200: END IF;
4201:
4202: -- This loop should always run
4203: IF l_access_list.count > 0 THEN

Line 4220: ,p_init_msg_list => fnd_api.g_false

4216: -- [END OF BUG 3835800 Fiing]
4217: l_access_list(i).act_access_to_object_id := l_claim_id;
4218: ams_access_pvt.create_access(
4219: p_api_version => l_api_version
4220: ,p_init_msg_list => fnd_api.g_false
4221: ,p_validation_level => p_validation_level
4222: ,x_return_status => l_return_status
4223: ,x_msg_count => x_msg_count
4224: ,x_msg_data => x_msg_data

Line 4225: ,p_commit => fnd_api.g_false

4221: ,p_validation_level => p_validation_level
4222: ,x_return_status => l_return_status
4223: ,x_msg_count => x_msg_count
4224: ,x_msg_data => x_msg_data
4225: ,p_commit => fnd_api.g_false
4226: ,p_access_rec => l_access_list(i)
4227: ,x_access_id => l_access_id);
4228: IF l_return_status = fnd_api.g_ret_sts_error THEN
4229: RAISE fnd_api.g_exc_error;

Line 4228: IF l_return_status = fnd_api.g_ret_sts_error THEN

4224: ,x_msg_data => x_msg_data
4225: ,p_commit => fnd_api.g_false
4226: ,p_access_rec => l_access_list(i)
4227: ,x_access_id => l_access_id);
4228: IF l_return_status = fnd_api.g_ret_sts_error THEN
4229: RAISE fnd_api.g_exc_error;
4230: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4231: RAISE fnd_api.g_exc_unexpected_error;
4232: END IF;

Line 4229: RAISE fnd_api.g_exc_error;

4225: ,p_commit => fnd_api.g_false
4226: ,p_access_rec => l_access_list(i)
4227: ,x_access_id => l_access_id);
4228: IF l_return_status = fnd_api.g_ret_sts_error THEN
4229: RAISE fnd_api.g_exc_error;
4230: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4231: RAISE fnd_api.g_exc_unexpected_error;
4232: END IF;
4233: END IF; -- end of l_dup_resource checking BUG 3835800 Fixing

Line 4230: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

4226: ,p_access_rec => l_access_list(i)
4227: ,x_access_id => l_access_id);
4228: IF l_return_status = fnd_api.g_ret_sts_error THEN
4229: RAISE fnd_api.g_exc_error;
4230: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4231: RAISE fnd_api.g_exc_unexpected_error;
4232: END IF;
4233: END IF; -- end of l_dup_resource checking BUG 3835800 Fixing
4234: END LOOP;

Line 4231: RAISE fnd_api.g_exc_unexpected_error;

4227: ,x_access_id => l_access_id);
4228: IF l_return_status = fnd_api.g_ret_sts_error THEN
4229: RAISE fnd_api.g_exc_error;
4230: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
4231: RAISE fnd_api.g_exc_unexpected_error;
4232: END IF;
4233: END IF; -- end of l_dup_resource checking BUG 3835800 Fixing
4234: END LOOP;
4235: END IF;

Line 4243: ,p_init_msg_list => FND_API.G_FALSE

4239:
4240: --create history call (uday)
4241: Create_Claim_History (
4242: p_api_version => l_api_version
4243: ,p_init_msg_list => FND_API.G_FALSE
4244: ,p_commit => FND_API.G_FALSE
4245: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
4246: ,x_return_status => l_return_status
4247: ,x_msg_data => l_msg_data

Line 4244: ,p_commit => FND_API.G_FALSE

4240: --create history call (uday)
4241: Create_Claim_History (
4242: p_api_version => l_api_version
4243: ,p_init_msg_list => FND_API.G_FALSE
4244: ,p_commit => FND_API.G_FALSE
4245: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
4246: ,x_return_status => l_return_status
4247: ,x_msg_data => l_msg_data
4248: ,x_msg_count => l_msg_count

Line 4245: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

4241: Create_Claim_History (
4242: p_api_version => l_api_version
4243: ,p_init_msg_list => FND_API.G_FALSE
4244: ,p_commit => FND_API.G_FALSE
4245: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
4246: ,x_return_status => l_return_status
4247: ,x_msg_data => l_msg_data
4248: ,x_msg_count => l_msg_count
4249: ,p_claim => l_claim

Line 4254: IF l_return_status = FND_API.g_ret_sts_error THEN

4250: ,p_event => G_NEW_EVENT
4251: ,x_need_to_create => l_need_to_create
4252: ,x_claim_history_id => l_claim_history_id
4253: );
4254: IF l_return_status = FND_API.g_ret_sts_error THEN
4255: RAISE FND_API.g_exc_error;
4256: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4257: RAISE FND_API.g_exc_unexpected_error;
4258: END IF;

Line 4255: RAISE FND_API.g_exc_error;

4251: ,x_need_to_create => l_need_to_create
4252: ,x_claim_history_id => l_claim_history_id
4253: );
4254: IF l_return_status = FND_API.g_ret_sts_error THEN
4255: RAISE FND_API.g_exc_error;
4256: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4257: RAISE FND_API.g_exc_unexpected_error;
4258: END IF;
4259: --end of history call (uday)

Line 4256: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4252: ,x_claim_history_id => l_claim_history_id
4253: );
4254: IF l_return_status = FND_API.g_ret_sts_error THEN
4255: RAISE FND_API.g_exc_error;
4256: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4257: RAISE FND_API.g_exc_unexpected_error;
4258: END IF;
4259: --end of history call (uday)
4260:

Line 4257: RAISE FND_API.g_exc_unexpected_error;

4253: );
4254: IF l_return_status = FND_API.g_ret_sts_error THEN
4255: RAISE FND_API.g_exc_error;
4256: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4257: RAISE FND_API.g_exc_unexpected_error;
4258: END IF;
4259: --end of history call (uday)
4260:
4261: --------------------------

Line 4266: ,p_init_msg_list => FND_API.g_false

4262: -- Raise Business Event --
4263: --------------------------
4264: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
4265: p_api_version => l_api_version
4266: ,p_init_msg_list => FND_API.g_false
4267: ,p_commit => FND_API.g_false
4268: ,p_validation_level => FND_API.g_valid_level_full
4269: ,x_return_status => l_return_status
4270: ,x_msg_data => x_msg_data

Line 4267: ,p_commit => FND_API.g_false

4263: --------------------------
4264: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
4265: p_api_version => l_api_version
4266: ,p_init_msg_list => FND_API.g_false
4267: ,p_commit => FND_API.g_false
4268: ,p_validation_level => FND_API.g_valid_level_full
4269: ,x_return_status => l_return_status
4270: ,x_msg_data => x_msg_data
4271: ,x_msg_count => x_msg_count

Line 4268: ,p_validation_level => FND_API.g_valid_level_full

4264: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
4265: p_api_version => l_api_version
4266: ,p_init_msg_list => FND_API.g_false
4267: ,p_commit => FND_API.g_false
4268: ,p_validation_level => FND_API.g_valid_level_full
4269: ,x_return_status => l_return_status
4270: ,x_msg_data => x_msg_data
4271: ,x_msg_count => x_msg_count
4272:

Line 4278: IF l_return_status = FND_API.g_ret_sts_error THEN

4274: ,p_old_status => NULL
4275: ,p_new_status => l_claim.status_code
4276: ,p_event_name => 'oracle.apps.ozf.claim.create'
4277: );
4278: IF l_return_status = FND_API.g_ret_sts_error THEN
4279: RAISE FND_API.g_exc_error;
4280: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4281: RAISE FND_API.g_exc_unexpected_error;
4282: END IF;

Line 4279: RAISE FND_API.g_exc_error;

4275: ,p_new_status => l_claim.status_code
4276: ,p_event_name => 'oracle.apps.ozf.claim.create'
4277: );
4278: IF l_return_status = FND_API.g_ret_sts_error THEN
4279: RAISE FND_API.g_exc_error;
4280: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4281: RAISE FND_API.g_exc_unexpected_error;
4282: END IF;
4283:

Line 4280: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4276: ,p_event_name => 'oracle.apps.ozf.claim.create'
4277: );
4278: IF l_return_status = FND_API.g_ret_sts_error THEN
4279: RAISE FND_API.g_exc_error;
4280: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4281: RAISE FND_API.g_exc_unexpected_error;
4282: END IF;
4283:
4284:

Line 4281: RAISE FND_API.g_exc_unexpected_error;

4277: );
4278: IF l_return_status = FND_API.g_ret_sts_error THEN
4279: RAISE FND_API.g_exc_error;
4280: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4281: RAISE FND_API.g_exc_unexpected_error;
4282: END IF;
4283:
4284:
4285: --Standard check of commit

Line 4286: IF FND_API.To_Boolean ( p_commit ) THEN

4282: END IF;
4283:
4284:
4285: --Standard check of commit
4286: IF FND_API.To_Boolean ( p_commit ) THEN
4287: COMMIT WORK;
4288: END IF;
4289: -- Debug Message
4290: IF OZF_DEBUG_LOW_ON THEN

Line 4298: p_encoded => FND_API.G_FALSE,

4294: END IF;
4295:
4296: --Standard call to get message count AND if count=1, get the message
4297: FND_MSG_PUB.Count_And_Get (
4298: p_encoded => FND_API.G_FALSE,
4299: p_count => x_msg_count,
4300: p_data => x_msg_data
4301: );
4302: EXCEPTION

Line 4303: WHEN FND_API.G_EXC_ERROR THEN

4299: p_count => x_msg_count,
4300: p_data => x_msg_data
4301: );
4302: EXCEPTION
4303: WHEN FND_API.G_EXC_ERROR THEN
4304: ROLLBACK TO Create_Claim_PVT;
4305: x_return_status := FND_API.G_RET_STS_ERROR;
4306: -- Standard call to get message count AND if count=1, get the message
4307: FND_MSG_PUB.Count_And_Get (

Line 4305: x_return_status := FND_API.G_RET_STS_ERROR;

4301: );
4302: EXCEPTION
4303: WHEN FND_API.G_EXC_ERROR THEN
4304: ROLLBACK TO Create_Claim_PVT;
4305: x_return_status := FND_API.G_RET_STS_ERROR;
4306: -- Standard call to get message count AND if count=1, get the message
4307: FND_MSG_PUB.Count_And_Get (
4308: p_encoded => FND_API.G_FALSE,
4309: p_count => x_msg_count,

Line 4308: p_encoded => FND_API.G_FALSE,

4304: ROLLBACK TO Create_Claim_PVT;
4305: x_return_status := FND_API.G_RET_STS_ERROR;
4306: -- Standard call to get message count AND if count=1, get the message
4307: FND_MSG_PUB.Count_And_Get (
4308: p_encoded => FND_API.G_FALSE,
4309: p_count => x_msg_count,
4310: p_data => x_msg_data
4311: );
4312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4308: p_encoded => FND_API.G_FALSE,
4309: p_count => x_msg_count,
4310: p_data => x_msg_data
4311: );
4312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4313: ROLLBACK TO Create_Claim_PVT;
4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4315: -- Standard call to get message count AND if count=1, get the message
4316: FND_MSG_PUB.Count_And_Get (

Line 4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4310: p_data => x_msg_data
4311: );
4312: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4313: ROLLBACK TO Create_Claim_PVT;
4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4315: -- Standard call to get message count AND if count=1, get the message
4316: FND_MSG_PUB.Count_And_Get (
4317: p_encoded => FND_API.G_FALSE,
4318: p_count => x_msg_count,

Line 4317: p_encoded => FND_API.G_FALSE,

4313: ROLLBACK TO Create_Claim_PVT;
4314: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4315: -- Standard call to get message count AND if count=1, get the message
4316: FND_MSG_PUB.Count_And_Get (
4317: p_encoded => FND_API.G_FALSE,
4318: p_count => x_msg_count,
4319: p_data => x_msg_data
4320: );
4321: WHEN OTHERS THEN

Line 4323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4319: p_data => x_msg_data
4320: );
4321: WHEN OTHERS THEN
4322: ROLLBACK TO Create_Claim_PVT;
4323: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4324: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4325: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4326: END IF;
4327: -- Standard call to get message count AND if count=1, get the message

Line 4329: p_encoded => FND_API.G_FALSE,

4325: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4326: END IF;
4327: -- Standard call to get message count AND if count=1, get the message
4328: FND_MSG_PUB.Count_And_Get (
4329: p_encoded => FND_API.G_FALSE,
4330: p_count => x_msg_count,
4331: p_data => x_msg_data
4332: );
4333: END Create_Claim;

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

4362:
4363: ---------------------------------------------------------------------
4364: PROCEDURE Validate_Delete_Claim (
4365: p_api_version_number IN NUMBER,
4366: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4367: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4368: p_object_id IN NUMBER,
4369: p_object_version_number IN NUMBER,
4370: x_dependent_object_tbl OUT NOCOPY ams_utility_pvt.dependent_objects_tbl_type,

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

4363: ---------------------------------------------------------------------
4364: PROCEDURE Validate_Delete_Claim (
4365: p_api_version_number IN NUMBER,
4366: p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE,
4367: p_commit IN VARCHAR2 := FND_API.G_FALSE,
4368: p_object_id IN NUMBER,
4369: p_object_version_number IN NUMBER,
4370: x_dependent_object_tbl OUT NOCOPY ams_utility_pvt.dependent_objects_tbl_type,
4371: x_return_status OUT NOCOPY VARCHAR2,

Line 4437: IF NOT FND_API.Compatible_API_Call (

4433: BEGIN
4434: -- Standard begin of API savepoint
4435: SAVEPOINT Val_Delete_Claim_PVT;
4436: -- Standard call to check for call compatibility.
4437: IF NOT FND_API.Compatible_API_Call (
4438: l_api_version,
4439: p_api_version_number,
4440: l_api_name,
4441: G_PKG_NAME)

Line 4443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4439: p_api_version_number,
4440: l_api_name,
4441: G_PKG_NAME)
4442: THEN
4443: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4444: END IF;
4445: -- Debug Message
4446: IF OZF_DEBUG_LOW_ON THEN
4447: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 4452: IF FND_API.To_Boolean (p_init_msg_list) THEN

4448: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
4449: FND_MSG_PUB.Add;
4450: END IF;
4451: --Initialize message list if p_init_msg_list is TRUE.
4452: IF FND_API.To_Boolean (p_init_msg_list) THEN
4453: FND_MSG_PUB.initialize;
4454: END IF;
4455: -- Initialize API return status to sucess
4456: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4456: x_return_status := FND_API.G_RET_STS_SUCCESS;

4452: IF FND_API.To_Boolean (p_init_msg_list) THEN
4453: FND_MSG_PUB.initialize;
4454: END IF;
4455: -- Initialize API return status to sucess
4456: x_return_status := FND_API.G_RET_STS_SUCCESS;
4457:
4458: OPEN claim_info_csr(p_object_id);
4459: FETCH claim_info_csr INTO l_object_version_number, l_owner_id, l_status_code;
4460: CLOSE claim_info_csr;

Line 4531: RAISE FND_API.g_exc_error;

4527: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4528: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
4529: FND_MSG_PUB.add;
4530: END IF;
4531: RAISE FND_API.g_exc_error;
4532: END IF;
4533:
4534: --Standard check of commit
4535: IF FND_API.To_Boolean ( p_commit ) THEN

Line 4535: IF FND_API.To_Boolean ( p_commit ) THEN

4531: RAISE FND_API.g_exc_error;
4532: END IF;
4533:
4534: --Standard check of commit
4535: IF FND_API.To_Boolean ( p_commit ) THEN
4536: COMMIT WORK;
4537: END IF;
4538: -- Debug Message
4539: IF OZF_DEBUG_LOW_ON THEN

Line 4547: p_encoded => FND_API.G_FALSE,

4543: END IF;
4544:
4545: --Standard call to get message count AND if count=1, get the message
4546: FND_MSG_PUB.Count_And_Get (
4547: p_encoded => FND_API.G_FALSE,
4548: p_count => x_msg_count,
4549: p_data => x_msg_data
4550: );
4551: EXCEPTION

Line 4552: WHEN FND_API.G_EXC_ERROR THEN

4548: p_count => x_msg_count,
4549: p_data => x_msg_data
4550: );
4551: EXCEPTION
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: ROLLBACK TO Val_Delete_Claim_PVT;
4554: x_return_status := FND_API.G_RET_STS_ERROR;
4555: -- Standard call to get message count AND if count=1, get the message
4556: FND_MSG_PUB.Count_And_Get (

Line 4554: x_return_status := FND_API.G_RET_STS_ERROR;

4550: );
4551: EXCEPTION
4552: WHEN FND_API.G_EXC_ERROR THEN
4553: ROLLBACK TO Val_Delete_Claim_PVT;
4554: x_return_status := FND_API.G_RET_STS_ERROR;
4555: -- Standard call to get message count AND if count=1, get the message
4556: FND_MSG_PUB.Count_And_Get (
4557: p_encoded => FND_API.G_FALSE,
4558: p_count => x_msg_count,

Line 4557: p_encoded => FND_API.G_FALSE,

4553: ROLLBACK TO Val_Delete_Claim_PVT;
4554: x_return_status := FND_API.G_RET_STS_ERROR;
4555: -- Standard call to get message count AND if count=1, get the message
4556: FND_MSG_PUB.Count_And_Get (
4557: p_encoded => FND_API.G_FALSE,
4558: p_count => x_msg_count,
4559: p_data => x_msg_data
4560: );
4561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4557: p_encoded => FND_API.G_FALSE,
4558: p_count => x_msg_count,
4559: p_data => x_msg_data
4560: );
4561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4562: ROLLBACK TO Val_Delete_Claim_PVT;
4563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4564: -- Standard call to get message count AND if count=1, get the message
4565: FND_MSG_PUB.Count_And_Get (

Line 4563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4559: p_data => x_msg_data
4560: );
4561: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4562: ROLLBACK TO Val_Delete_Claim_PVT;
4563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4564: -- Standard call to get message count AND if count=1, get the message
4565: FND_MSG_PUB.Count_And_Get (
4566: p_encoded => FND_API.G_FALSE,
4567: p_count => x_msg_count,

Line 4566: p_encoded => FND_API.G_FALSE,

4562: ROLLBACK TO Val_Delete_Claim_PVT;
4563: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4564: -- Standard call to get message count AND if count=1, get the message
4565: FND_MSG_PUB.Count_And_Get (
4566: p_encoded => FND_API.G_FALSE,
4567: p_count => x_msg_count,
4568: p_data => x_msg_data
4569: );
4570: WHEN OTHERS THEN

Line 4572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4568: p_data => x_msg_data
4569: );
4570: WHEN OTHERS THEN
4571: ROLLBACK TO Val_Delete_Claim_PVT;
4572: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4573: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4574: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4575: END IF;
4576: -- Standard call to get message count AND if count=1, get the message

Line 4578: p_encoded => FND_API.G_FALSE,

4574: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4575: END IF;
4576: -- Standard call to get message count AND if count=1, get the message
4577: FND_MSG_PUB.Count_And_Get (
4578: p_encoded => FND_API.G_FALSE,
4579: p_count => x_msg_count,
4580: p_data => x_msg_data
4581: );
4582: End Validate_Delete_Claim;

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

4598: -- any API to delete these two objects. Checks on these will have to be added later.
4599: ----------------------------------------------------------------------
4600: PROCEDURE Delete_Claim (
4601: p_api_version_number IN NUMBER
4602: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4603: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4604: ,p_object_id IN NUMBER
4605: ,p_object_version_number IN NUMBER
4606: ,x_return_status OUT NOCOPY VARCHAR2

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

4599: ----------------------------------------------------------------------
4600: PROCEDURE Delete_Claim (
4601: p_api_version_number IN NUMBER
4602: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
4603: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
4604: ,p_object_id IN NUMBER
4605: ,p_object_version_number IN NUMBER
4606: ,x_return_status OUT NOCOPY VARCHAR2
4607: ,x_msg_count OUT NOCOPY NUMBER

Line 4676: IF NOT FND_API.Compatible_API_Call (

4672: BEGIN
4673: -- Standard begin of API savepoint
4674: SAVEPOINT Delete_Claim_PVT;
4675: -- Standard call to check for call compatibility.
4676: IF NOT FND_API.Compatible_API_Call (
4677: l_api_version,
4678: p_api_version_number,
4679: l_api_name,
4680: G_PKG_NAME)

Line 4682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

4678: p_api_version_number,
4679: l_api_name,
4680: G_PKG_NAME)
4681: THEN
4682: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
4683: END IF;
4684: -- Debug Message
4685: IF OZF_DEBUG_LOW_ON THEN
4686: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 4691: IF FND_API.To_Boolean (p_init_msg_list) THEN

4687: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
4688: FND_MSG_PUB.Add;
4689: END IF;
4690: --Initialize message list if p_init_msg_list is TRUE.
4691: IF FND_API.To_Boolean (p_init_msg_list) THEN
4692: FND_MSG_PUB.initialize;
4693: END IF;
4694: -- Initialize API return status to sucess
4695: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 4695: x_return_status := FND_API.G_RET_STS_SUCCESS;

4691: IF FND_API.To_Boolean (p_init_msg_list) THEN
4692: FND_MSG_PUB.initialize;
4693: END IF;
4694: -- Initialize API return status to sucess
4695: x_return_status := FND_API.G_RET_STS_SUCCESS;
4696:
4697: OPEN claim_info_csr(p_object_id);
4698: FETCH claim_info_csr INTO l_object_version_number, l_status_code;
4699: CLOSE claim_info_csr;

Line 4720: ,p_delete_future_recurrences => FND_API.G_TRUE

4716: JTF_TASKS_PUB.delete_task(
4717: p_api_version => l_api_version
4718: ,p_object_version_number => l_tasks_id_tbl(i).object_version_number
4719: ,p_task_id => l_tasks_id_tbl(i).task_id
4720: ,p_delete_future_recurrences => FND_API.G_TRUE
4721: ,x_return_status => l_return_status
4722: ,x_msg_count => l_msg_count
4723: ,x_msg_data => l_msg_data
4724: );

Line 4725: IF l_return_status = FND_API.g_ret_sts_error THEN

4721: ,x_return_status => l_return_status
4722: ,x_msg_count => l_msg_count
4723: ,x_msg_data => l_msg_data
4724: );
4725: IF l_return_status = FND_API.g_ret_sts_error THEN
4726: RAISE FND_API.g_exc_error;
4727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4728: RAISE FND_API.g_exc_unexpected_error;
4729: END IF;

Line 4726: RAISE FND_API.g_exc_error;

4722: ,x_msg_count => l_msg_count
4723: ,x_msg_data => l_msg_data
4724: );
4725: IF l_return_status = FND_API.g_ret_sts_error THEN
4726: RAISE FND_API.g_exc_error;
4727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4728: RAISE FND_API.g_exc_unexpected_error;
4729: END IF;
4730: END LOOP;

Line 4727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4723: ,x_msg_data => l_msg_data
4724: );
4725: IF l_return_status = FND_API.g_ret_sts_error THEN
4726: RAISE FND_API.g_exc_error;
4727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4728: RAISE FND_API.g_exc_unexpected_error;
4729: END IF;
4730: END LOOP;
4731:

Line 4728: RAISE FND_API.g_exc_unexpected_error;

4724: );
4725: IF l_return_status = FND_API.g_ret_sts_error THEN
4726: RAISE FND_API.g_exc_error;
4727: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4728: RAISE FND_API.g_exc_unexpected_error;
4729: END IF;
4730: END LOOP;
4731:
4732: -- Fix for 5048675

Line 4741: ,P_Init_Msg_List => FND_API.g_false

4737: EXIT When claim_history_id_csr%NOTFOUND;
4738:
4739: OZF_claims_history_PVT.Delete_claims_history(
4740: P_Api_Version_Number => l_api_version
4741: ,P_Init_Msg_List => FND_API.g_false
4742: ,P_Commit => FND_API.g_false
4743: ,p_validation_level => FND_API.g_valid_level_full
4744: ,X_Return_Status => l_return_status
4745: ,X_Msg_Count => l_msg_count

Line 4742: ,P_Commit => FND_API.g_false

4738:
4739: OZF_claims_history_PVT.Delete_claims_history(
4740: P_Api_Version_Number => l_api_version
4741: ,P_Init_Msg_List => FND_API.g_false
4742: ,P_Commit => FND_API.g_false
4743: ,p_validation_level => FND_API.g_valid_level_full
4744: ,X_Return_Status => l_return_status
4745: ,X_Msg_Count => l_msg_count
4746: ,X_Msg_Data => l_msg_data

Line 4743: ,p_validation_level => FND_API.g_valid_level_full

4739: OZF_claims_history_PVT.Delete_claims_history(
4740: P_Api_Version_Number => l_api_version
4741: ,P_Init_Msg_List => FND_API.g_false
4742: ,P_Commit => FND_API.g_false
4743: ,p_validation_level => FND_API.g_valid_level_full
4744: ,X_Return_Status => l_return_status
4745: ,X_Msg_Count => l_msg_count
4746: ,X_Msg_Data => l_msg_data
4747: ,P_CLAIM_HISTORY_ID => l_claim_history_id

Line 4751: IF l_return_status = FND_API.g_ret_sts_error THEN

4747: ,P_CLAIM_HISTORY_ID => l_claim_history_id
4748: ,P_Object_Version_Number => l_object_version_number
4749: );
4750:
4751: IF l_return_status = FND_API.g_ret_sts_error THEN
4752: RAISE FND_API.g_exc_unexpected_error;
4753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4754: RAISE FND_API.g_exc_unexpected_error;
4755: END IF;

Line 4752: RAISE FND_API.g_exc_unexpected_error;

4748: ,P_Object_Version_Number => l_object_version_number
4749: );
4750:
4751: IF l_return_status = FND_API.g_ret_sts_error THEN
4752: RAISE FND_API.g_exc_unexpected_error;
4753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4754: RAISE FND_API.g_exc_unexpected_error;
4755: END IF;
4756: END LOOP;

Line 4753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4749: );
4750:
4751: IF l_return_status = FND_API.g_ret_sts_error THEN
4752: RAISE FND_API.g_exc_unexpected_error;
4753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4754: RAISE FND_API.g_exc_unexpected_error;
4755: END IF;
4756: END LOOP;
4757: CLOSE claim_history_id_csr;

Line 4754: RAISE FND_API.g_exc_unexpected_error;

4750:
4751: IF l_return_status = FND_API.g_ret_sts_error THEN
4752: RAISE FND_API.g_exc_unexpected_error;
4753: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4754: RAISE FND_API.g_exc_unexpected_error;
4755: END IF;
4756: END LOOP;
4757: CLOSE claim_history_id_csr;
4758:

Line 4767: ,p_init_msg_list => FND_API.g_false

4763: EXIT When claim_line_his_id_csr%NOTFOUND;
4764:
4765: OZF_Claim_Line_Hist_PVT.Delete_Claim_Line_Hist(
4766: p_api_version_number => l_api_version
4767: ,p_init_msg_list => FND_API.g_false
4768: ,p_commit => FND_API.g_false
4769: ,p_validation_level => FND_API.g_valid_level_full
4770: ,x_return_status => l_return_status
4771: ,x_msg_count => l_msg_count

Line 4768: ,p_commit => FND_API.g_false

4764:
4765: OZF_Claim_Line_Hist_PVT.Delete_Claim_Line_Hist(
4766: p_api_version_number => l_api_version
4767: ,p_init_msg_list => FND_API.g_false
4768: ,p_commit => FND_API.g_false
4769: ,p_validation_level => FND_API.g_valid_level_full
4770: ,x_return_status => l_return_status
4771: ,x_msg_count => l_msg_count
4772: ,x_msg_data => l_msg_data

Line 4769: ,p_validation_level => FND_API.g_valid_level_full

4765: OZF_Claim_Line_Hist_PVT.Delete_Claim_Line_Hist(
4766: p_api_version_number => l_api_version
4767: ,p_init_msg_list => FND_API.g_false
4768: ,p_commit => FND_API.g_false
4769: ,p_validation_level => FND_API.g_valid_level_full
4770: ,x_return_status => l_return_status
4771: ,x_msg_count => l_msg_count
4772: ,x_msg_data => l_msg_data
4773: ,p_claim_line_history_id => l_claim_line_hist_id

Line 4777: IF l_return_status = FND_API.g_ret_sts_error THEN

4773: ,p_claim_line_history_id => l_claim_line_hist_id
4774: ,p_object_version_number => l_object_version_number
4775: );
4776:
4777: IF l_return_status = FND_API.g_ret_sts_error THEN
4778: RAISE FND_API.g_exc_unexpected_error;
4779: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4780: RAISE FND_API.g_exc_unexpected_error;
4781: END IF;

Line 4778: RAISE FND_API.g_exc_unexpected_error;

4774: ,p_object_version_number => l_object_version_number
4775: );
4776:
4777: IF l_return_status = FND_API.g_ret_sts_error THEN
4778: RAISE FND_API.g_exc_unexpected_error;
4779: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4780: RAISE FND_API.g_exc_unexpected_error;
4781: END IF;
4782: END LOOP;

Line 4779: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4775: );
4776:
4777: IF l_return_status = FND_API.g_ret_sts_error THEN
4778: RAISE FND_API.g_exc_unexpected_error;
4779: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4780: RAISE FND_API.g_exc_unexpected_error;
4781: END IF;
4782: END LOOP;
4783: CLOSE claim_line_his_id_csr;

Line 4780: RAISE FND_API.g_exc_unexpected_error;

4776:
4777: IF l_return_status = FND_API.g_ret_sts_error THEN
4778: RAISE FND_API.g_exc_unexpected_error;
4779: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4780: RAISE FND_API.g_exc_unexpected_error;
4781: END IF;
4782: END LOOP;
4783: CLOSE claim_line_his_id_csr;
4784:

Line 4799: ,p_init_msg_list => FND_API.g_false

4795: CLOSE claim_line_id_csr;
4796:
4797: OZF_Claim_Line_PVT.Delete_Claim_Line_Tbl(
4798: p_api_version => l_api_version
4799: ,p_init_msg_list => FND_API.g_false
4800: ,p_commit => FND_API.g_false
4801: ,p_validation_level => FND_API.g_valid_level_full
4802: ,x_return_status => l_return_status
4803: ,x_msg_count => l_msg_count

Line 4800: ,p_commit => FND_API.g_false

4796:
4797: OZF_Claim_Line_PVT.Delete_Claim_Line_Tbl(
4798: p_api_version => l_api_version
4799: ,p_init_msg_list => FND_API.g_false
4800: ,p_commit => FND_API.g_false
4801: ,p_validation_level => FND_API.g_valid_level_full
4802: ,x_return_status => l_return_status
4803: ,x_msg_count => l_msg_count
4804: ,x_msg_data => l_msg_data

Line 4801: ,p_validation_level => FND_API.g_valid_level_full

4797: OZF_Claim_Line_PVT.Delete_Claim_Line_Tbl(
4798: p_api_version => l_api_version
4799: ,p_init_msg_list => FND_API.g_false
4800: ,p_commit => FND_API.g_false
4801: ,p_validation_level => FND_API.g_valid_level_full
4802: ,x_return_status => l_return_status
4803: ,x_msg_count => l_msg_count
4804: ,x_msg_data => l_msg_data
4805: ,p_claim_line_tbl => l_claim_line_tbl

Line 4806: ,p_change_object_version => FND_API.g_false

4802: ,x_return_status => l_return_status
4803: ,x_msg_count => l_msg_count
4804: ,x_msg_data => l_msg_data
4805: ,p_claim_line_tbl => l_claim_line_tbl
4806: ,p_change_object_version => FND_API.g_false
4807: ,x_error_index => l_error_index
4808: );
4809: IF l_return_status = FND_API.g_ret_sts_error THEN
4810: RAISE FND_API.g_exc_unexpected_error;

Line 4809: IF l_return_status = FND_API.g_ret_sts_error THEN

4805: ,p_claim_line_tbl => l_claim_line_tbl
4806: ,p_change_object_version => FND_API.g_false
4807: ,x_error_index => l_error_index
4808: );
4809: IF l_return_status = FND_API.g_ret_sts_error THEN
4810: RAISE FND_API.g_exc_unexpected_error;
4811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4812: RAISE FND_API.g_exc_unexpected_error;
4813: END IF;

Line 4810: RAISE FND_API.g_exc_unexpected_error;

4806: ,p_change_object_version => FND_API.g_false
4807: ,x_error_index => l_error_index
4808: );
4809: IF l_return_status = FND_API.g_ret_sts_error THEN
4810: RAISE FND_API.g_exc_unexpected_error;
4811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4812: RAISE FND_API.g_exc_unexpected_error;
4813: END IF;
4814:

Line 4811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4807: ,x_error_index => l_error_index
4808: );
4809: IF l_return_status = FND_API.g_ret_sts_error THEN
4810: RAISE FND_API.g_exc_unexpected_error;
4811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4812: RAISE FND_API.g_exc_unexpected_error;
4813: END IF;
4814:
4815: OZF_claims_PKG.Delete_Row(p_object_id);

Line 4812: RAISE FND_API.g_exc_unexpected_error;

4808: );
4809: IF l_return_status = FND_API.g_ret_sts_error THEN
4810: RAISE FND_API.g_exc_unexpected_error;
4811: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4812: RAISE FND_API.g_exc_unexpected_error;
4813: END IF;
4814:
4815: OZF_claims_PKG.Delete_Row(p_object_id);
4816: ELSE

Line 4828: RAISE FND_API.g_exc_error;

4824: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
4825: FND_MESSAGE.set_name('OZF', 'OZF_REC_VERSION_CHANGED');
4826: FND_MSG_PUB.add;
4827: END IF;
4828: RAISE FND_API.g_exc_error;
4829: END IF;
4830:
4831: --Standard check of commit
4832: IF FND_API.To_Boolean ( p_commit ) THEN

Line 4832: IF FND_API.To_Boolean ( p_commit ) THEN

4828: RAISE FND_API.g_exc_error;
4829: END IF;
4830:
4831: --Standard check of commit
4832: IF FND_API.To_Boolean ( p_commit ) THEN
4833: COMMIT WORK;
4834: END IF;
4835:
4836: -- Debug Message

Line 4845: p_encoded => FND_API.G_FALSE,

4841: END IF;
4842:
4843: --Standard call to get message count and if count=1, get the message
4844: FND_MSG_PUB.Count_And_Get (
4845: p_encoded => FND_API.G_FALSE,
4846: p_count => x_msg_count,
4847: p_data => x_msg_data
4848: );
4849: EXCEPTION

Line 4850: WHEN FND_API.G_EXC_ERROR THEN

4846: p_count => x_msg_count,
4847: p_data => x_msg_data
4848: );
4849: EXCEPTION
4850: WHEN FND_API.G_EXC_ERROR THEN
4851: ROLLBACK TO Delete_Claim_PVT;
4852: x_return_status := FND_API.G_RET_STS_ERROR;
4853: -- Standard call to get message count and if count=1, get the message
4854: FND_MSG_PUB.Count_And_Get (

Line 4852: x_return_status := FND_API.G_RET_STS_ERROR;

4848: );
4849: EXCEPTION
4850: WHEN FND_API.G_EXC_ERROR THEN
4851: ROLLBACK TO Delete_Claim_PVT;
4852: x_return_status := FND_API.G_RET_STS_ERROR;
4853: -- Standard call to get message count and if count=1, get the message
4854: FND_MSG_PUB.Count_And_Get (
4855: p_encoded => FND_API.G_FALSE,
4856: p_count => x_msg_count,

Line 4855: p_encoded => FND_API.G_FALSE,

4851: ROLLBACK TO Delete_Claim_PVT;
4852: x_return_status := FND_API.G_RET_STS_ERROR;
4853: -- Standard call to get message count and if count=1, get the message
4854: FND_MSG_PUB.Count_And_Get (
4855: p_encoded => FND_API.G_FALSE,
4856: p_count => x_msg_count,
4857: p_data => x_msg_data
4858: );
4859: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 4859: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4855: p_encoded => FND_API.G_FALSE,
4856: p_count => x_msg_count,
4857: p_data => x_msg_data
4858: );
4859: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4860: ROLLBACK TO Delete_Claim_PVT;
4861: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4862: -- Standard call to get message count and if count=1, get the message
4863: FND_MSG_PUB.Count_And_Get (

Line 4861: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4857: p_data => x_msg_data
4858: );
4859: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4860: ROLLBACK TO Delete_Claim_PVT;
4861: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4862: -- Standard call to get message count and if count=1, get the message
4863: FND_MSG_PUB.Count_And_Get (
4864: p_encoded => FND_API.G_FALSE,
4865: p_count => x_msg_count,

Line 4864: p_encoded => FND_API.G_FALSE,

4860: ROLLBACK TO Delete_Claim_PVT;
4861: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4862: -- Standard call to get message count and if count=1, get the message
4863: FND_MSG_PUB.Count_And_Get (
4864: p_encoded => FND_API.G_FALSE,
4865: p_count => x_msg_count,
4866: p_data => x_msg_data
4867: );
4868: WHEN OTHERS THEN

Line 4870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4866: p_data => x_msg_data
4867: );
4868: WHEN OTHERS THEN
4869: ROLLBACK TO Delete_Claim_PVT;
4870: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4871: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
4872: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4873: END IF;
4874: -- Standard call to get message count and if count=1, get the message

Line 4876: p_encoded => FND_API.G_FALSE,

4872: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
4873: END IF;
4874: -- Standard call to get message count and if count=1, get the message
4875: FND_MSG_PUB.Count_And_Get (
4876: p_encoded => FND_API.G_FALSE,
4877: p_count => x_msg_count,
4878: p_data => x_msg_data
4879: );
4880: END Delete_Claim;

Line 4916: x_return_status := FND_API.G_RET_STS_SUCCESS;

4912: WHERE claim_id = p_id;
4913:
4914: BEGIN
4915: -- Initialize API return status to sucess
4916: x_return_status := FND_API.G_RET_STS_SUCCESS;
4917:
4918: OPEN reason_csr(p_claim_id);
4919: FETCH reason_csr into l_reason_code_id, l_task_template_group_id;
4920: CLOSE reason_csr;

Line 4946: IF (l_task_template_group_id is null AND (p_task_template_group_id is not null AND p_task_template_group_id <> FND_API.G_MISS_NUM)) THEN

4942: END IF;
4943: END IF;
4944:
4945: /* -- Here I will generate task if there is no task generated.
4946: IF (l_task_template_group_id is null AND (p_task_template_group_id is not null AND p_task_template_group_id <> FND_API.G_MISS_NUM)) THEN
4947: generate_tasks(
4948: p_task_template_group_id => p_task_template_group_id
4949: ,p_owner_id => p_owner_id
4950: ,p_claim_number => p_claim_number

Line 4954: IF l_return_status = FND_API.g_ret_sts_error THEN

4950: ,p_claim_number => p_claim_number
4951: ,p_claim_id => p_claim_id
4952: ,x_return_status => l_return_status
4953: );
4954: IF l_return_status = FND_API.g_ret_sts_error THEN
4955: RAISE FND_API.g_exc_unexpected_error;
4956: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4957: RAISE FND_API.g_exc_unexpected_error;
4958: END IF;

Line 4955: RAISE FND_API.g_exc_unexpected_error;

4951: ,p_claim_id => p_claim_id
4952: ,x_return_status => l_return_status
4953: );
4954: IF l_return_status = FND_API.g_ret_sts_error THEN
4955: RAISE FND_API.g_exc_unexpected_error;
4956: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4957: RAISE FND_API.g_exc_unexpected_error;
4958: END IF;
4959: END IF;

Line 4956: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

4952: ,x_return_status => l_return_status
4953: );
4954: IF l_return_status = FND_API.g_ret_sts_error THEN
4955: RAISE FND_API.g_exc_unexpected_error;
4956: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4957: RAISE FND_API.g_exc_unexpected_error;
4958: END IF;
4959: END IF;
4960: */

Line 4957: RAISE FND_API.g_exc_unexpected_error;

4953: );
4954: IF l_return_status = FND_API.g_ret_sts_error THEN
4955: RAISE FND_API.g_exc_unexpected_error;
4956: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
4957: RAISE FND_API.g_exc_unexpected_error;
4958: END IF;
4959: END IF;
4960: */
4961: EXCEPTION

Line 4962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

4958: END IF;
4959: END IF;
4960: */
4961: EXCEPTION
4962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4964: WHEN OTHERS THEN
4965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN

Line 4963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4959: END IF;
4960: */
4961: EXCEPTION
4962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4964: WHEN OTHERS THEN
4965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4967: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_REASON_CHANGE_ERR');

Line 4965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4961: EXCEPTION
4962: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
4963: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4964: WHEN OTHERS THEN
4965: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4966: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
4967: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_REASON_CHANGE_ERR');
4968: FND_MSG_PUB.add;
4969: END IF;

Line 5022: IF NOT FND_API.Compatible_API_Call (

5018: -- Standard begin of API savepoint
5019: SAVEPOINT Create_Claim_Hist_PVT;
5020:
5021: -- Standard call to check for call compatibility.
5022: IF NOT FND_API.Compatible_API_Call (
5023: l_api_version,
5024: p_api_version,
5025: l_api_name,
5026: G_PKG_NAME)

Line 5028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5024: p_api_version,
5025: l_api_name,
5026: G_PKG_NAME)
5027: THEN
5028: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5029: END IF;
5030: -- Debug Message
5031: IF OZF_DEBUG_LOW_ON THEN
5032: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 5037: IF FND_API.To_Boolean (p_init_msg_list) THEN

5033: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
5034: FND_MSG_PUB.Add;
5035: END IF;
5036: --Initialize message list if p_init_msg_list is TRUE.
5037: IF FND_API.To_Boolean (p_init_msg_list) THEN
5038: FND_MSG_PUB.initialize;
5039: END IF;
5040: -- Initialize API return status to sucess
5041: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5041: x_return_status := FND_API.G_RET_STS_SUCCESS;

5037: IF FND_API.To_Boolean (p_init_msg_list) THEN
5038: FND_MSG_PUB.initialize;
5039: END IF;
5040: -- Initialize API return status to sucess
5041: x_return_status := FND_API.G_RET_STS_SUCCESS;
5042:
5043: OPEN user_status_id_csr (p_claim.claim_id);
5044: FETCH user_status_id_csr into l_user_status_id;
5045: CLOSe user_status_id_csr;

Line 5055: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

5051: x_msg_count => l_msg_count,
5052: x_return_status => l_return_status
5053: );
5054:
5055: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5056: RAISE FND_API.G_EXC_ERROR;
5057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5059: END IF;

Line 5056: RAISE FND_API.G_EXC_ERROR;

5052: x_return_status => l_return_status
5053: );
5054:
5055: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5056: RAISE FND_API.G_EXC_ERROR;
5057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5059: END IF;
5060:

Line 5057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

5053: );
5054:
5055: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5056: RAISE FND_API.G_EXC_ERROR;
5057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5059: END IF;
5060:
5061: -- If the status_code is not new, then I will to create_claim_history

Line 5058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5054:
5055: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5056: RAISE FND_API.G_EXC_ERROR;
5057: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5058: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5059: END IF;
5060:
5061: -- If the status_code is not new, then I will to create_claim_history
5062: --Comment out the below line (uday) since we will be creating the history

Line 5073: IF l_return_status = FND_API.g_ret_sts_error THEN

5069: x_history_event_description => l_history_event_description,
5070: x_needed_to_create => l_needed_to_create,
5071: x_return_status => l_return_status
5072: );
5073: IF l_return_status = FND_API.g_ret_sts_error THEN
5074: RAISE FND_API.g_exc_error;
5075: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5076: RAISE FND_API.g_exc_unexpected_error;
5077: END IF;

Line 5074: RAISE FND_API.g_exc_error;

5070: x_needed_to_create => l_needed_to_create,
5071: x_return_status => l_return_status
5072: );
5073: IF l_return_status = FND_API.g_ret_sts_error THEN
5074: RAISE FND_API.g_exc_error;
5075: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5076: RAISE FND_API.g_exc_unexpected_error;
5077: END IF;
5078:

Line 5075: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5071: x_return_status => l_return_status
5072: );
5073: IF l_return_status = FND_API.g_ret_sts_error THEN
5074: RAISE FND_API.g_exc_error;
5075: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5076: RAISE FND_API.g_exc_unexpected_error;
5077: END IF;
5078:
5079: IF (l_needed_to_create = 'Y') THEN

Line 5076: RAISE FND_API.g_exc_unexpected_error;

5072: );
5073: IF l_return_status = FND_API.g_ret_sts_error THEN
5074: RAISE FND_API.g_exc_error;
5075: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5076: RAISE FND_API.g_exc_unexpected_error;
5077: END IF;
5078:
5079: IF (l_needed_to_create = 'Y') THEN
5080: -- CREATE history

Line 5088: IF l_return_status = FND_API.g_ret_sts_error THEN

5084: p_history_event_description => l_history_event_description,
5085: x_claim_history_id => l_claim_history_id,
5086: x_return_status => l_return_status
5087: );
5088: IF l_return_status = FND_API.g_ret_sts_error THEN
5089: RAISE FND_API.g_exc_error;
5090: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5091: RAISE FND_API.g_exc_unexpected_error;
5092: END IF;

Line 5089: RAISE FND_API.g_exc_error;

5085: x_claim_history_id => l_claim_history_id,
5086: x_return_status => l_return_status
5087: );
5088: IF l_return_status = FND_API.g_ret_sts_error THEN
5089: RAISE FND_API.g_exc_error;
5090: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5091: RAISE FND_API.g_exc_unexpected_error;
5092: END IF;
5093: END IF;

Line 5090: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5086: x_return_status => l_return_status
5087: );
5088: IF l_return_status = FND_API.g_ret_sts_error THEN
5089: RAISE FND_API.g_exc_error;
5090: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5091: RAISE FND_API.g_exc_unexpected_error;
5092: END IF;
5093: END IF;
5094: --END IF; (uday)

Line 5091: RAISE FND_API.g_exc_unexpected_error;

5087: );
5088: IF l_return_status = FND_API.g_ret_sts_error THEN
5089: RAISE FND_API.g_exc_error;
5090: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5091: RAISE FND_API.g_exc_unexpected_error;
5092: END IF;
5093: END IF;
5094: --END IF; (uday)
5095: x_need_to_create := l_needed_to_create;

Line 5098: IF FND_API.To_Boolean ( p_commit ) THEN

5094: --END IF; (uday)
5095: x_need_to_create := l_needed_to_create;
5096: x_claim_history_id := l_claim_history_id;
5097: --Standard check of commit
5098: IF FND_API.To_Boolean ( p_commit ) THEN
5099: COMMIT WORK;
5100: END IF;
5101: -- Debug Message
5102: IF OZF_DEBUG_LOW_ON THEN

Line 5109: p_encoded => FND_API.G_FALSE,

5105: FND_MSG_PUB.Add;
5106: END IF;
5107: --Standard call to get message count and if count=1, get the message
5108: FND_MSG_PUB.Count_And_Get (
5109: p_encoded => FND_API.G_FALSE,
5110: p_count => x_msg_count,
5111: p_data => x_msg_data
5112: );
5113: EXCEPTION

Line 5114: WHEN FND_API.G_EXC_ERROR THEN

5110: p_count => x_msg_count,
5111: p_data => x_msg_data
5112: );
5113: EXCEPTION
5114: WHEN FND_API.G_EXC_ERROR THEN
5115: ROLLBACK TO Create_Claim_Hist_PVT;
5116: x_return_status := FND_API.G_RET_STS_ERROR;
5117: -- Standard call to get message count and if count=1, get the message
5118: FND_MSG_PUB.Count_And_Get (

Line 5116: x_return_status := FND_API.G_RET_STS_ERROR;

5112: );
5113: EXCEPTION
5114: WHEN FND_API.G_EXC_ERROR THEN
5115: ROLLBACK TO Create_Claim_Hist_PVT;
5116: x_return_status := FND_API.G_RET_STS_ERROR;
5117: -- Standard call to get message count and if count=1, get the message
5118: FND_MSG_PUB.Count_And_Get (
5119: p_encoded => FND_API.G_FALSE,
5120: p_count => x_msg_count,

Line 5119: p_encoded => FND_API.G_FALSE,

5115: ROLLBACK TO Create_Claim_Hist_PVT;
5116: x_return_status := FND_API.G_RET_STS_ERROR;
5117: -- Standard call to get message count and if count=1, get the message
5118: FND_MSG_PUB.Count_And_Get (
5119: p_encoded => FND_API.G_FALSE,
5120: p_count => x_msg_count,
5121: p_data => x_msg_data
5122: );
5123: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 5123: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5119: p_encoded => FND_API.G_FALSE,
5120: p_count => x_msg_count,
5121: p_data => x_msg_data
5122: );
5123: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5124: ROLLBACK TO Create_Claim_Hist_PVT;
5125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5126: -- Standard call to get message count and if count=1, get the message
5127: FND_MSG_PUB.Count_And_Get (

Line 5125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5121: p_data => x_msg_data
5122: );
5123: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5124: ROLLBACK TO Create_Claim_Hist_PVT;
5125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5126: -- Standard call to get message count and if count=1, get the message
5127: FND_MSG_PUB.Count_And_Get (
5128: p_encoded => FND_API.G_FALSE,
5129: p_count => x_msg_count,

Line 5128: p_encoded => FND_API.G_FALSE,

5124: ROLLBACK TO Create_Claim_Hist_PVT;
5125: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5126: -- Standard call to get message count and if count=1, get the message
5127: FND_MSG_PUB.Count_And_Get (
5128: p_encoded => FND_API.G_FALSE,
5129: p_count => x_msg_count,
5130: p_data => x_msg_data
5131: );
5132: WHEN OTHERS THEN

Line 5134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5130: p_data => x_msg_data
5131: );
5132: WHEN OTHERS THEN
5133: ROLLBACK TO Create_Claim_Hist_PVT;
5134: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5135: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5136: THEN
5137: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5138: END IF;

Line 5141: p_encoded => FND_API.G_FALSE,

5137: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
5138: END IF;
5139: -- Standard call to get message count and if count=1, get the message
5140: FND_MSG_PUB.Count_And_Get (
5141: p_encoded => FND_API.G_FALSE,
5142: p_count => x_msg_count,
5143: p_data => x_msg_data
5144: );
5145: --

Line 5161: -- 2. If an attribute is passed in as FND_API.g_miss_char/num/date,

5157: -- p_claim : the record with new items.
5158: --
5159: -- NOTES
5160: -- 1. Raise exception if the object_version_number doesn't match.
5161: -- 2. If an attribute is passed in as FND_API.g_miss_char/num/date,
5162: -- that column won't be updated.
5163: ----------------------------------------------------------------------
5164: PROCEDURE Update_Claim (
5165: p_api_version IN NUMBER

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

5162: -- that column won't be updated.
5163: ----------------------------------------------------------------------
5164: PROCEDURE Update_Claim (
5165: p_api_version IN NUMBER
5166: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
5167: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
5168: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
5169:
5170: ,x_return_status OUT NOCOPY VARCHAR2

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

5163: ----------------------------------------------------------------------
5164: PROCEDURE Update_Claim (
5165: p_api_version IN NUMBER
5166: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
5167: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
5168: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
5169:
5170: ,x_return_status OUT NOCOPY VARCHAR2
5171: ,x_msg_data OUT NOCOPY VARCHAR2

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

5164: PROCEDURE Update_Claim (
5165: p_api_version IN NUMBER
5166: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
5167: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
5168: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
5169:
5170: ,x_return_status OUT NOCOPY VARCHAR2
5171: ,x_msg_data OUT NOCOPY VARCHAR2
5172: ,x_msg_count OUT NOCOPY NUMBER

Line 5388: IF NOT FND_API.Compatible_API_Call (

5384: SAVEPOINT Update_Claim_PVT;
5385: -- G_UPDATE_CALLED := true;
5386: -- END IF;
5387: -- Standard call to check for call compatibility.
5388: IF NOT FND_API.Compatible_API_Call (
5389: l_api_version,
5390: p_api_version,
5391: l_api_name,
5392: G_PKG_NAME)

Line 5394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5390: p_api_version,
5391: l_api_name,
5392: G_PKG_NAME)
5393: THEN
5394: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5395: END IF;
5396: -- Debug Message
5397: IF OZF_DEBUG_LOW_ON THEN
5398: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');

Line 5403: IF FND_API.To_Boolean (p_init_msg_list) THEN

5399: FND_MESSAGE.Set_Token('TEXT',l_full_name||': Start');
5400: FND_MSG_PUB.Add;
5401: END IF;
5402: --Initialize message list if p_init_msg_list is TRUE.
5403: IF FND_API.To_Boolean (p_init_msg_list) THEN
5404: FND_MSG_PUB.initialize;
5405: END IF;
5406: -- Initialize API return status to sucess
5407: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 5407: x_return_status := FND_API.G_RET_STS_SUCCESS;

5403: IF FND_API.To_Boolean (p_init_msg_list) THEN
5404: FND_MSG_PUB.initialize;
5405: END IF;
5406: -- Initialize API return status to sucess
5407: x_return_status := FND_API.G_RET_STS_SUCCESS;
5408:
5409: -- Varify object_version_number
5410: IF (l_claim.object_version_number is NULL or
5411: l_claim.object_version_number = FND_API.G_MISS_NUM ) THEN

Line 5411: l_claim.object_version_number = FND_API.G_MISS_NUM ) THEN

5407: x_return_status := FND_API.G_RET_STS_SUCCESS;
5408:
5409: -- Varify object_version_number
5410: IF (l_claim.object_version_number is NULL or
5411: l_claim.object_version_number = FND_API.G_MISS_NUM ) THEN
5412: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5413: FND_MESSAGE.Set_Name('OZF', 'OZF_API_NO_OBJ_VER_NUM');
5414: FND_MSG_PUB.ADD;
5415: END IF;

Line 5416: RAISE FND_API.G_EXC_ERROR;

5412: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5413: FND_MESSAGE.Set_Name('OZF', 'OZF_API_NO_OBJ_VER_NUM');
5414: FND_MSG_PUB.ADD;
5415: END IF;
5416: RAISE FND_API.G_EXC_ERROR;
5417: END IF;
5418:
5419: OPEN object_version_number_csr(l_claim.claim_id);
5420: FETCH object_version_number_csr INTO l_object_version_number;

Line 5428: RAISE FND_API.G_EXC_ERROR;

5424: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5425: FND_MESSAGE.Set_Name('OZF', 'OZF_API_RESOURCE_LOCKED');
5426: FND_MSG_PUB.ADD;
5427: END IF;
5428: RAISE FND_API.G_EXC_ERROR;
5429: END IF;
5430:
5431: -- Bug: 2732290 -----------------------------------------------------------
5432: IF (l_claim.customer_reason is not NULL

Line 5433: AND l_claim.customer_reason <> FND_API.g_miss_char )

5429: END IF;
5430:
5431: -- Bug: 2732290 -----------------------------------------------------------
5432: IF (l_claim.customer_reason is not NULL
5433: AND l_claim.customer_reason <> FND_API.g_miss_char )
5434: THEN
5435: Get_Customer_Reason(p_cust_account_id => l_claim.cust_account_id,
5436: px_reason_code_id => l_claim.reason_code_id,
5437: p_customer_reason => l_claim.customer_reason,

Line 5439: IF l_return_status = FND_API.g_ret_sts_error THEN

5435: Get_Customer_Reason(p_cust_account_id => l_claim.cust_account_id,
5436: px_reason_code_id => l_claim.reason_code_id,
5437: p_customer_reason => l_claim.customer_reason,
5438: x_return_status => l_return_status);
5439: IF l_return_status = FND_API.g_ret_sts_error THEN
5440: RAISE FND_API.g_exc_error;
5441: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5442: RAISE FND_API.g_exc_unexpected_error;
5443: END IF;

Line 5440: RAISE FND_API.g_exc_error;

5436: px_reason_code_id => l_claim.reason_code_id,
5437: p_customer_reason => l_claim.customer_reason,
5438: x_return_status => l_return_status);
5439: IF l_return_status = FND_API.g_ret_sts_error THEN
5440: RAISE FND_API.g_exc_error;
5441: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5442: RAISE FND_API.g_exc_unexpected_error;
5443: END IF;
5444: END IF;

Line 5441: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5437: p_customer_reason => l_claim.customer_reason,
5438: x_return_status => l_return_status);
5439: IF l_return_status = FND_API.g_ret_sts_error THEN
5440: RAISE FND_API.g_exc_error;
5441: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5442: RAISE FND_API.g_exc_unexpected_error;
5443: END IF;
5444: END IF;
5445: -- End Bug: 2732290 -----------------------------------------------------------

Line 5442: RAISE FND_API.g_exc_unexpected_error;

5438: x_return_status => l_return_status);
5439: IF l_return_status = FND_API.g_ret_sts_error THEN
5440: RAISE FND_API.g_exc_error;
5441: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5442: RAISE FND_API.g_exc_unexpected_error;
5443: END IF;
5444: END IF;
5445: -- End Bug: 2732290 -----------------------------------------------------------
5446:

Line 5459: P_Init_Msg_List => FND_API.G_FALSE,

5455:
5456: IF p_mode = OZF_claim_Utility_pvt.G_MANU_MODE THEN
5457: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
5458: P_Api_Version_Number => 1.0,
5459: P_Init_Msg_List => FND_API.G_FALSE,
5460: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
5461: P_Commit => FND_API.G_FALSE,
5462: P_object_id => p_claim.claim_id,
5463: P_object_type => G_CLAIM_OBJECT_TYPE,

Line 5460: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

5456: IF p_mode = OZF_claim_Utility_pvt.G_MANU_MODE THEN
5457: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
5458: P_Api_Version_Number => 1.0,
5459: P_Init_Msg_List => FND_API.G_FALSE,
5460: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
5461: P_Commit => FND_API.G_FALSE,
5462: P_object_id => p_claim.claim_id,
5463: P_object_type => G_CLAIM_OBJECT_TYPE,
5464: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

Line 5461: P_Commit => FND_API.G_FALSE,

5457: OZF_CLAIM_UTILITY_PVT.Check_Claim_access(
5458: P_Api_Version_Number => 1.0,
5459: P_Init_Msg_List => FND_API.G_FALSE,
5460: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
5461: P_Commit => FND_API.G_FALSE,
5462: P_object_id => p_claim.claim_id,
5463: P_object_type => G_CLAIM_OBJECT_TYPE,
5464: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),
5465: X_Return_Status => l_return_status,

Line 5475: RAISE FND_API.G_EXC_ERROR;

5471: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5472: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_NO_ACCESS');
5473: FND_MSG_PUB.Add;
5474: END IF;
5475: RAISE FND_API.G_EXC_ERROR;
5476: END IF;
5477: END IF;
5478:
5479: -- Now the object_version_number matches, we can increase it.

Line 5484: l_claim.user_status_id = FND_API.G_MISS_NUM THEN

5480: l_object_version_number := l_claim.object_version_number + 1;
5481:
5482: -- Retrieve user_status_id if it is not changed.
5483: IF l_claim.user_status_id is null OR
5484: l_claim.user_status_id = FND_API.G_MISS_NUM THEN
5485: IF l_claim.status_code is null OR
5486: l_claim.status_code = FND_API.G_MISS_CHAR THEN
5487:
5488: OPEN user_status_id_csr(l_claim.claim_id);

Line 5486: l_claim.status_code = FND_API.G_MISS_CHAR THEN

5482: -- Retrieve user_status_id if it is not changed.
5483: IF l_claim.user_status_id is null OR
5484: l_claim.user_status_id = FND_API.G_MISS_NUM THEN
5485: IF l_claim.status_code is null OR
5486: l_claim.status_code = FND_API.G_MISS_CHAR THEN
5487:
5488: OPEN user_status_id_csr(l_claim.claim_id);
5489: FETCH user_status_id_csr INTO l_claim.user_status_id;
5490: CLOSE user_status_id_csr;

Line 5511: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

5507: x_msg_count => l_msg_count,
5508: x_return_status => l_return_status
5509: );
5510:
5511: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5512: RAISE FND_API.G_EXC_ERROR;
5513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5515: END IF;

Line 5512: RAISE FND_API.G_EXC_ERROR;

5508: x_return_status => l_return_status
5509: );
5510:
5511: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5512: RAISE FND_API.G_EXC_ERROR;
5513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5515: END IF;
5516:

Line 5513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

5509: );
5510:
5511: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5512: RAISE FND_API.G_EXC_ERROR;
5513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5515: END IF;
5516:
5517: OPEN csr_user_status_info(l_claim.claim_id);

Line 5514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5510:
5511: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5512: RAISE FND_API.G_EXC_ERROR;
5513: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5514: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5515: END IF;
5516:
5517: OPEN csr_user_status_info(l_claim.claim_id);
5518: FETCH csr_user_status_info INTO l_open_status_id, l_close_status_id;

Line 5550: IF l_return_status = FND_API.g_ret_sts_error THEN

5546: p_claim_rec => l_claim,
5547: x_complete_rec => l_complete_claim,
5548: x_return_status => l_return_status
5549: );
5550: IF l_return_status = FND_API.g_ret_sts_error THEN
5551: RAISE FND_API.g_exc_error;
5552: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5553: RAISE FND_API.g_exc_unexpected_error;
5554: END IF;

Line 5551: RAISE FND_API.g_exc_error;

5547: x_complete_rec => l_complete_claim,
5548: x_return_status => l_return_status
5549: );
5550: IF l_return_status = FND_API.g_ret_sts_error THEN
5551: RAISE FND_API.g_exc_error;
5552: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5553: RAISE FND_API.g_exc_unexpected_error;
5554: END IF;
5555:

Line 5552: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5548: x_return_status => l_return_status
5549: );
5550: IF l_return_status = FND_API.g_ret_sts_error THEN
5551: RAISE FND_API.g_exc_error;
5552: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5553: RAISE FND_API.g_exc_unexpected_error;
5554: END IF;
5555:
5556: l_claim := l_complete_claim;

Line 5553: RAISE FND_API.g_exc_unexpected_error;

5549: );
5550: IF l_return_status = FND_API.g_ret_sts_error THEN
5551: RAISE FND_API.g_exc_error;
5552: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5553: RAISE FND_API.g_exc_unexpected_error;
5554: END IF;
5555:
5556: l_claim := l_complete_claim;
5557:

Line 5576: IF l_return_status = FND_API.g_ret_sts_error THEN

5572: x_exchange_changed => l_exchange_changed,
5573: x_pass => l_pass,
5574: x_return_status => l_return_status
5575: );
5576: IF l_return_status = FND_API.g_ret_sts_error THEN
5577: RAISE FND_API.g_exc_error;
5578: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5579: RAISE FND_API.g_exc_unexpected_error;
5580: END IF;

Line 5577: RAISE FND_API.g_exc_error;

5573: x_pass => l_pass,
5574: x_return_status => l_return_status
5575: );
5576: IF l_return_status = FND_API.g_ret_sts_error THEN
5577: RAISE FND_API.g_exc_error;
5578: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5579: RAISE FND_API.g_exc_unexpected_error;
5580: END IF;
5581:

Line 5578: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5574: x_return_status => l_return_status
5575: );
5576: IF l_return_status = FND_API.g_ret_sts_error THEN
5577: RAISE FND_API.g_exc_error;
5578: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5579: RAISE FND_API.g_exc_unexpected_error;
5580: END IF;
5581:
5582: IF l_pass = false THEN

Line 5579: RAISE FND_API.g_exc_unexpected_error;

5575: );
5576: IF l_return_status = FND_API.g_ret_sts_error THEN
5577: RAISE FND_API.g_exc_error;
5578: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5579: RAISE FND_API.g_exc_unexpected_error;
5580: END IF;
5581:
5582: IF l_pass = false THEN
5583: RAISE FND_API.G_EXC_ERROR;

Line 5583: RAISE FND_API.G_EXC_ERROR;

5579: RAISE FND_API.g_exc_unexpected_error;
5580: END IF;
5581:
5582: IF l_pass = false THEN
5583: RAISE FND_API.G_EXC_ERROR;
5584: END IF;
5585:
5586:
5587: -- Bug: 3359914 -----------------------------------------------------------

Line 5590: OR l_claim.reason_code_id = FND_API.G_MISS_NUM

5586:
5587: -- Bug: 3359914 -----------------------------------------------------------
5588: -- Reason is a required field when the claim is updated.
5589: IF l_claim.reason_code_id is null
5590: OR l_claim.reason_code_id = FND_API.G_MISS_NUM
5591: THEN
5592: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5593: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_REASON_CD_MISSING');
5594: FND_MSG_PUB.Add;

Line 5596: RAISE FND_API.G_EXC_ERROR;

5592: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5593: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_REASON_CD_MISSING');
5594: FND_MSG_PUB.Add;
5595: END IF;
5596: RAISE FND_API.G_EXC_ERROR;
5597: END IF;
5598: -- End Bug: 3359914 -----------------------------------------------------------
5599:
5600:

Line 5611: IF l_return_status = FND_API.g_ret_sts_error THEN

5607: p_task_template_group_id => l_claim.task_template_group_id,
5608: x_changed => l_reason_code_changed,
5609: x_return_status => l_return_status
5610: );
5611: IF l_return_status = FND_API.g_ret_sts_error THEN
5612: RAISE FND_API.g_exc_error;
5613: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5614: RAISE FND_API.g_exc_unexpected_error;
5615: END IF;

Line 5612: RAISE FND_API.g_exc_error;

5608: x_changed => l_reason_code_changed,
5609: x_return_status => l_return_status
5610: );
5611: IF l_return_status = FND_API.g_ret_sts_error THEN
5612: RAISE FND_API.g_exc_error;
5613: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5614: RAISE FND_API.g_exc_unexpected_error;
5615: END IF;
5616:

Line 5613: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5609: x_return_status => l_return_status
5610: );
5611: IF l_return_status = FND_API.g_ret_sts_error THEN
5612: RAISE FND_API.g_exc_error;
5613: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5614: RAISE FND_API.g_exc_unexpected_error;
5615: END IF;
5616:
5617: -- ----------------------------------------------------------------------------

Line 5614: RAISE FND_API.g_exc_unexpected_error;

5610: );
5611: IF l_return_status = FND_API.g_ret_sts_error THEN
5612: RAISE FND_API.g_exc_error;
5613: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5614: RAISE FND_API.g_exc_unexpected_error;
5615: END IF;
5616:
5617: -- ----------------------------------------------------------------------------
5618: -- Bug : 2732290

Line 5636: l_claim.task_template_group_id = fnd_api.g_miss_num))THEN

5632: -- Bug#-5954318 : Start
5633: IF (l_old_reason_code_id <> l_claim.reason_code_id AND
5634: (--l_old_task_template_group_id = l_claim.task_template_group_id OR
5635: l_claim.task_template_group_id is null OR
5636: l_claim.task_template_group_id = fnd_api.g_miss_num))THEN
5637: l_claim.task_template_group_id := get_action_id(l_claim.reason_code_id);
5638: END IF;
5639: -- Bug#-5954318 : End
5640:

Line 5660: l_claim.duplicate_claim_id = FND_API.G_MISS_NUM THEN

5656: IF l_old_status_code <> l_claim.status_code THEN
5657: -- if user change status to dupliate, we need to have duplicate_claim_id as inputs
5658: IF l_claim.status_code = G_DUPLICATE_STATUS THEN
5659: IF l_claim.duplicate_claim_id is null OR
5660: l_claim.duplicate_claim_id = FND_API.G_MISS_NUM THEN
5661: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5662: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUP_CLM_ID_MISSING');
5663: FND_MSG_PUB.add;
5664: END IF;

Line 5665: RAISE FND_API.G_EXC_ERROR;

5661: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5662: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUP_CLM_ID_MISSING');
5663: FND_MSG_PUB.add;
5664: END IF;
5665: RAISE FND_API.G_EXC_ERROR;
5666: END IF;
5667:
5668: -- Raise an error
5669: -- if the duplicate_claim_id equal to the current claim_id

Line 5675: RAISE FND_API.G_EXC_ERROR;

5671: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5672: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_DUP_ID_SAME');
5673: FND_MSG_PUB.Add;
5674: END IF;
5675: RAISE FND_API.G_EXC_ERROR;
5676: END IF;
5677: END IF;
5678:
5679: -- if user change status from duplicate, we need to set duplicate_claim_id as null

Line 5701: RAISE FND_API.G_EXC_ERROR;

5697: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
5698: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_UPDT_OWNER_PERM');
5699: FND_MSG_PUB.ADD;
5700: END IF;
5701: RAISE FND_API.G_EXC_ERROR;
5702: END IF;
5703: -- delete access for the current owner
5704: OPEN owner_access_csr(l_claim.claim_id, l_old_owner_id);
5705: FETCH owner_access_csr into l_access_id, l_access_obj_ver;

Line 5710: ,p_init_msg_list => fnd_api.g_false

5706: CLOSE owner_access_csr;
5707:
5708: AMS_ACCESS_PVT.delete_access(
5709: p_api_version => l_api_version
5710: ,p_init_msg_list => fnd_api.g_false
5711: ,p_validation_level => p_validation_level
5712: ,x_return_status => l_return_status
5713: ,x_msg_count => x_msg_count
5714: ,x_msg_data => x_msg_data

Line 5715: ,p_commit => fnd_api.g_false

5711: ,p_validation_level => p_validation_level
5712: ,x_return_status => l_return_status
5713: ,x_msg_count => x_msg_count
5714: ,x_msg_data => x_msg_data
5715: ,p_commit => fnd_api.g_false
5716: ,p_access_id =>l_access_id
5717: ,p_object_version =>l_access_obj_ver
5718: );
5719: IF l_return_status = fnd_api.g_ret_sts_error THEN

Line 5719: IF l_return_status = fnd_api.g_ret_sts_error THEN

5715: ,p_commit => fnd_api.g_false
5716: ,p_access_id =>l_access_id
5717: ,p_object_version =>l_access_obj_ver
5718: );
5719: IF l_return_status = fnd_api.g_ret_sts_error THEN
5720: RAISE fnd_api.g_exc_error;
5721: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5722: RAISE fnd_api.g_exc_unexpected_error;
5723: END IF;

Line 5720: RAISE fnd_api.g_exc_error;

5716: ,p_access_id =>l_access_id
5717: ,p_object_version =>l_access_obj_ver
5718: );
5719: IF l_return_status = fnd_api.g_ret_sts_error THEN
5720: RAISE fnd_api.g_exc_error;
5721: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5722: RAISE fnd_api.g_exc_unexpected_error;
5723: END IF;
5724:

Line 5721: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

5717: ,p_object_version =>l_access_obj_ver
5718: );
5719: IF l_return_status = fnd_api.g_ret_sts_error THEN
5720: RAISE fnd_api.g_exc_error;
5721: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5722: RAISE fnd_api.g_exc_unexpected_error;
5723: END IF;
5724:
5725:

Line 5722: RAISE fnd_api.g_exc_unexpected_error;

5718: );
5719: IF l_return_status = fnd_api.g_ret_sts_error THEN
5720: RAISE fnd_api.g_exc_error;
5721: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5722: RAISE fnd_api.g_exc_unexpected_error;
5723: END IF;
5724:
5725:
5726: -- Added for bug fix 4247328

Line 5738: ,p_init_msg_list => fnd_api.g_false

5734: CLOSE owner_access_csr;
5735:
5736: AMS_ACCESS_PVT.delete_access(
5737: p_api_version => l_api_version
5738: ,p_init_msg_list => fnd_api.g_false
5739: ,p_validation_level => p_validation_level
5740: ,x_return_status => l_return_status
5741: ,x_msg_count => x_msg_count
5742: ,x_msg_data => x_msg_data

Line 5743: ,p_commit => fnd_api.g_false

5739: ,p_validation_level => p_validation_level
5740: ,x_return_status => l_return_status
5741: ,x_msg_count => x_msg_count
5742: ,x_msg_data => x_msg_data
5743: ,p_commit => fnd_api.g_false
5744: ,p_access_id =>l_access_id
5745: ,p_object_version =>l_access_obj_ver
5746: );
5747: IF l_return_status = fnd_api.g_ret_sts_error THEN

Line 5747: IF l_return_status = fnd_api.g_ret_sts_error THEN

5743: ,p_commit => fnd_api.g_false
5744: ,p_access_id =>l_access_id
5745: ,p_object_version =>l_access_obj_ver
5746: );
5747: IF l_return_status = fnd_api.g_ret_sts_error THEN
5748: RAISE fnd_api.g_exc_error;
5749: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5750: RAISE fnd_api.g_exc_unexpected_error;
5751: END IF;

Line 5748: RAISE fnd_api.g_exc_error;

5744: ,p_access_id =>l_access_id
5745: ,p_object_version =>l_access_obj_ver
5746: );
5747: IF l_return_status = fnd_api.g_ret_sts_error THEN
5748: RAISE fnd_api.g_exc_error;
5749: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5750: RAISE fnd_api.g_exc_unexpected_error;
5751: END IF;
5752:

Line 5749: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

5745: ,p_object_version =>l_access_obj_ver
5746: );
5747: IF l_return_status = fnd_api.g_ret_sts_error THEN
5748: RAISE fnd_api.g_exc_error;
5749: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5750: RAISE fnd_api.g_exc_unexpected_error;
5751: END IF;
5752:
5753: END IF;

Line 5750: RAISE fnd_api.g_exc_unexpected_error;

5746: );
5747: IF l_return_status = fnd_api.g_ret_sts_error THEN
5748: RAISE fnd_api.g_exc_error;
5749: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5750: RAISE fnd_api.g_exc_unexpected_error;
5751: END IF;
5752:
5753: END IF;
5754:

Line 5758: l_claim.owner_id <> FND_API.G_MISS_NUM) THEN

5754:
5755: -- Default owner_id if necessary
5756:
5757: IF (l_claim.owner_id is not null AND
5758: l_claim.owner_id <> FND_API.G_MISS_NUM) THEN
5759:
5760: -- Add the new owner to the access list
5761: l_access_list(1).arc_act_access_to_object := G_CLAIM_OBJECT_TYPE;
5762: l_access_list(1).user_or_role_id := l_claim.owner_id;

Line 5786: IF l_return_status = FND_API.g_ret_sts_error THEN

5782: p_claim_class => l_claim.claim_class,
5783: x_owner_id => l_claim.owner_id,
5784: x_access_list => l_access_list,
5785: x_return_status => l_return_status);
5786: IF l_return_status = FND_API.g_ret_sts_error THEN
5787: RAISE FND_API.g_exc_error;
5788: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5789: RAISE FND_API.g_exc_unexpected_error;
5790: END IF;

Line 5787: RAISE FND_API.g_exc_error;

5783: x_owner_id => l_claim.owner_id,
5784: x_access_list => l_access_list,
5785: x_return_status => l_return_status);
5786: IF l_return_status = FND_API.g_ret_sts_error THEN
5787: RAISE FND_API.g_exc_error;
5788: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5789: RAISE FND_API.g_exc_unexpected_error;
5790: END IF;
5791:

Line 5788: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5784: x_access_list => l_access_list,
5785: x_return_status => l_return_status);
5786: IF l_return_status = FND_API.g_ret_sts_error THEN
5787: RAISE FND_API.g_exc_error;
5788: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5789: RAISE FND_API.g_exc_unexpected_error;
5790: END IF;
5791:
5792: -- Default to system parameter if can not find an owner_id

Line 5789: RAISE FND_API.g_exc_unexpected_error;

5785: x_return_status => l_return_status);
5786: IF l_return_status = FND_API.g_ret_sts_error THEN
5787: RAISE FND_API.g_exc_error;
5788: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5789: RAISE FND_API.g_exc_unexpected_error;
5790: END IF;
5791:
5792: -- Default to system parameter if can not find an owner_id
5793: IF (l_claim.owner_id is null OR

Line 5794: l_claim.owner_id = FND_API.G_MISS_NUM) THEN

5790: END IF;
5791:
5792: -- Default to system parameter if can not find an owner_id
5793: IF (l_claim.owner_id is null OR
5794: l_claim.owner_id = FND_API.G_MISS_NUM) THEN
5795:
5796: OPEN default_owner_id_csr;
5797: FETCH default_owner_id_csr into l_claim.owner_id;
5798: CLOSE default_owner_id_csr;

Line 5828: ,p_init_msg_list => fnd_api.g_false

5824: IF l_claim_access_list.COUNT <>0 THEN
5825: FOR i in 1..l_claim_access_list.LAST LOOP
5826: AMS_ACCESS_PVT.delete_access(
5827: p_api_version => l_api_version
5828: ,p_init_msg_list => fnd_api.g_false
5829: ,p_validation_level => p_validation_level
5830: ,x_return_status => l_return_status
5831: ,x_msg_count => x_msg_count
5832: ,x_msg_data => x_msg_data

Line 5833: ,p_commit => fnd_api.g_false

5829: ,p_validation_level => p_validation_level
5830: ,x_return_status => l_return_status
5831: ,x_msg_count => x_msg_count
5832: ,x_msg_data => x_msg_data
5833: ,p_commit => fnd_api.g_false
5834: ,p_access_id =>l_claim_access_list(i).activity_access_id
5835: ,p_object_version =>l_claim_access_list(i).object_version_number
5836: );
5837: IF l_return_status = fnd_api.g_ret_sts_error THEN

Line 5837: IF l_return_status = fnd_api.g_ret_sts_error THEN

5833: ,p_commit => fnd_api.g_false
5834: ,p_access_id =>l_claim_access_list(i).activity_access_id
5835: ,p_object_version =>l_claim_access_list(i).object_version_number
5836: );
5837: IF l_return_status = fnd_api.g_ret_sts_error THEN
5838: RAISE fnd_api.g_exc_error;
5839: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5840: RAISE fnd_api.g_exc_unexpected_error;
5841: END IF;

Line 5838: RAISE fnd_api.g_exc_error;

5834: ,p_access_id =>l_claim_access_list(i).activity_access_id
5835: ,p_object_version =>l_claim_access_list(i).object_version_number
5836: );
5837: IF l_return_status = fnd_api.g_ret_sts_error THEN
5838: RAISE fnd_api.g_exc_error;
5839: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5840: RAISE fnd_api.g_exc_unexpected_error;
5841: END IF;
5842: END LOOP;

Line 5839: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

5835: ,p_object_version =>l_claim_access_list(i).object_version_number
5836: );
5837: IF l_return_status = fnd_api.g_ret_sts_error THEN
5838: RAISE fnd_api.g_exc_error;
5839: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5840: RAISE fnd_api.g_exc_unexpected_error;
5841: END IF;
5842: END LOOP;
5843: END IF;

Line 5840: RAISE fnd_api.g_exc_unexpected_error;

5836: );
5837: IF l_return_status = fnd_api.g_ret_sts_error THEN
5838: RAISE fnd_api.g_exc_error;
5839: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
5840: RAISE fnd_api.g_exc_unexpected_error;
5841: END IF;
5842: END LOOP;
5843: END IF;
5844: ELSE

Line 5850: RAISE FND_API.g_exc_error;

5846: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
5847: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_UPDATE_OWNER_ERR');
5848: FND_MSG_PUB.add;
5849: END IF;
5850: RAISE FND_API.g_exc_error;
5851: END IF;
5852: END IF;
5853:
5854: -----------* Deal with currency code issues

Line 5867: RAISE fnd_api.g_exc_error;

5863: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
5864: fnd_message.set_name('OZF', 'OZF_CLAIM_GL_FUNCUR_MISSING');
5865: fnd_msg_pub.add;
5866: END IF;
5867: RAISE fnd_api.g_exc_error;
5868: END IF;
5869: CLOSE gp_func_currency_cd_csr;
5870:
5871: -- l_functional_currency_code := fnd_profile.value('JTF_PROFILE_DEFAULT_CURRENCY');

Line 5877: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN

5873: -- If transaction currency_code is different from functional currency_code,
5874: -- We need to make sure that exchange_type is not null
5875: IF l_claim.currency_code <> l_functional_currency_code THEN
5876: IF l_claim.exchange_rate_type is null OR
5877: l_claim.exchange_rate_type = FND_API.G_MISS_CHAR THEN
5878: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
5879: fnd_message.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
5880: fnd_msg_pub.add;
5881: END IF;

Line 5882: RAISE fnd_api.g_exc_error;

5878: IF fnd_msg_pub.check_msg_level(fnd_msg_pub.g_msg_lvl_error) THEN
5879: fnd_message.set_name('OZF', 'OZF_CLAIM_CONTYPE_MISSING');
5880: fnd_msg_pub.add;
5881: END IF;
5882: RAISE fnd_api.g_exc_error;
5883: END IF;
5884:
5885: IF l_claim.exchange_rate_date is null OR
5886: l_claim.exchange_rate_date = FND_API.G_MISS_DATE THEN

Line 5886: l_claim.exchange_rate_date = FND_API.G_MISS_DATE THEN

5882: RAISE fnd_api.g_exc_error;
5883: END IF;
5884:
5885: IF l_claim.exchange_rate_date is null OR
5886: l_claim.exchange_rate_date = FND_API.G_MISS_DATE THEN
5887:
5888: -- Default exchange_rate_date to sysdate
5889: l_claim.exchange_rate_date := SYSDATE;
5890: END IF;

Line 5909: IF l_return_status = FND_API.g_ret_sts_error THEN

5905: X_RETURN_STATUS => l_return_status,
5906: X_ACC_AMOUNT => l_acc_amount,
5907: X_RATE => l_rate
5908: );
5909: IF l_return_status = FND_API.g_ret_sts_error THEN
5910: RAISE FND_API.g_exc_error;
5911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5912: RAISE FND_API.g_exc_unexpected_error;
5913: END IF;

Line 5910: RAISE FND_API.g_exc_error;

5906: X_ACC_AMOUNT => l_acc_amount,
5907: X_RATE => l_rate
5908: );
5909: IF l_return_status = FND_API.g_ret_sts_error THEN
5910: RAISE FND_API.g_exc_error;
5911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5912: RAISE FND_API.g_exc_unexpected_error;
5913: END IF;
5914: l_claim.exchange_rate := l_rate;

Line 5911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

5907: X_RATE => l_rate
5908: );
5909: IF l_return_status = FND_API.g_ret_sts_error THEN
5910: RAISE FND_API.g_exc_error;
5911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5912: RAISE FND_API.g_exc_unexpected_error;
5913: END IF;
5914: l_claim.exchange_rate := l_rate;
5915: l_claim.ACCTD_AMOUNT := l_acc_amount;

Line 5912: RAISE FND_API.g_exc_unexpected_error;

5908: );
5909: IF l_return_status = FND_API.g_ret_sts_error THEN
5910: RAISE FND_API.g_exc_error;
5911: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
5912: RAISE FND_API.g_exc_unexpected_error;
5913: END IF;
5914: l_claim.exchange_rate := l_rate;
5915: l_claim.ACCTD_AMOUNT := l_acc_amount;
5916:

Line 5985: RAISE FND_API.g_exc_error;

5981: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
5982: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_AMT_REM_ERR');
5983: FND_MSG_PUB.add;
5984: END IF;
5985: RAISE FND_API.g_exc_error;
5986: END IF;
5987: END IF; --End of relaxation.
5988:
5989: -- convert amount_remaing.

Line 6002: IF l_return_status = FND_API.g_ret_sts_error THEN

5998: X_RETURN_STATUS => l_return_status,
5999: X_ACC_AMOUNT => l_acc_amount,
6000: X_RATE => l_rate
6001: );
6002: IF l_return_status = FND_API.g_ret_sts_error THEN
6003: RAISE FND_API.g_exc_error;
6004: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6005: RAISE FND_API.g_exc_unexpected_error;
6006: END IF;

Line 6003: RAISE FND_API.g_exc_error;

5999: X_ACC_AMOUNT => l_acc_amount,
6000: X_RATE => l_rate
6001: );
6002: IF l_return_status = FND_API.g_ret_sts_error THEN
6003: RAISE FND_API.g_exc_error;
6004: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6005: RAISE FND_API.g_exc_unexpected_error;
6006: END IF;
6007: l_claim.ACCTD_AMOUNT_REMAINING := l_acc_amount;

Line 6004: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6000: X_RATE => l_rate
6001: );
6002: IF l_return_status = FND_API.g_ret_sts_error THEN
6003: RAISE FND_API.g_exc_error;
6004: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6005: RAISE FND_API.g_exc_unexpected_error;
6006: END IF;
6007: l_claim.ACCTD_AMOUNT_REMAINING := l_acc_amount;
6008:

Line 6005: RAISE FND_API.g_exc_unexpected_error;

6001: );
6002: IF l_return_status = FND_API.g_ret_sts_error THEN
6003: RAISE FND_API.g_exc_error;
6004: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6005: RAISE FND_API.g_exc_unexpected_error;
6006: END IF;
6007: l_claim.ACCTD_AMOUNT_REMAINING := l_acc_amount;
6008:
6009: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);

Line 6029: IF l_return_status = FND_API.g_ret_sts_error THEN

6025: X_RETURN_STATUS => l_return_status,
6026: X_ACC_AMOUNT => l_acc_amount,
6027: X_RATE => l_rate
6028: );
6029: IF l_return_status = FND_API.g_ret_sts_error THEN
6030: RAISE FND_API.g_exc_error;
6031: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6032: RAISE FND_API.g_exc_unexpected_error;
6033: END IF;

Line 6030: RAISE FND_API.g_exc_error;

6026: X_ACC_AMOUNT => l_acc_amount,
6027: X_RATE => l_rate
6028: );
6029: IF l_return_status = FND_API.g_ret_sts_error THEN
6030: RAISE FND_API.g_exc_error;
6031: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6032: RAISE FND_API.g_exc_unexpected_error;
6033: END IF;
6034: l_claim.ACCTD_amount_settled := l_acc_amount;

Line 6031: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6027: X_RATE => l_rate
6028: );
6029: IF l_return_status = FND_API.g_ret_sts_error THEN
6030: RAISE FND_API.g_exc_error;
6031: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6032: RAISE FND_API.g_exc_unexpected_error;
6033: END IF;
6034: l_claim.ACCTD_amount_settled := l_acc_amount;
6035:

Line 6032: RAISE FND_API.g_exc_unexpected_error;

6028: );
6029: IF l_return_status = FND_API.g_ret_sts_error THEN
6030: RAISE FND_API.g_exc_error;
6031: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6032: RAISE FND_API.g_exc_unexpected_error;
6033: END IF;
6034: l_claim.ACCTD_amount_settled := l_acc_amount;
6035:
6036: l_claim.acctd_amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_settled,l_functional_currency_code);

Line 6051: IF l_return_status = FND_API.g_ret_sts_error THEN

6047: X_RETURN_STATUS => l_return_status,
6048: X_ACC_AMOUNT => l_acc_amount,
6049: X_RATE => l_rate
6050: );
6051: IF l_return_status = FND_API.g_ret_sts_error THEN
6052: RAISE FND_API.g_exc_error;
6053: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6054: RAISE FND_API.g_exc_unexpected_error;
6055: END IF;

Line 6052: RAISE FND_API.g_exc_error;

6048: X_ACC_AMOUNT => l_acc_amount,
6049: X_RATE => l_rate
6050: );
6051: IF l_return_status = FND_API.g_ret_sts_error THEN
6052: RAISE FND_API.g_exc_error;
6053: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6054: RAISE FND_API.g_exc_unexpected_error;
6055: END IF;
6056: l_claim.ACCTD_amount_adjusted := l_acc_amount;

Line 6053: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6049: X_RATE => l_rate
6050: );
6051: IF l_return_status = FND_API.g_ret_sts_error THEN
6052: RAISE FND_API.g_exc_error;
6053: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6054: RAISE FND_API.g_exc_unexpected_error;
6055: END IF;
6056: l_claim.ACCTD_amount_adjusted := l_acc_amount;
6057:

Line 6054: RAISE FND_API.g_exc_unexpected_error;

6050: );
6051: IF l_return_status = FND_API.g_ret_sts_error THEN
6052: RAISE FND_API.g_exc_error;
6053: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6054: RAISE FND_API.g_exc_unexpected_error;
6055: END IF;
6056: l_claim.ACCTD_amount_adjusted := l_acc_amount;
6057:
6058: l_claim.acctd_amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_adjusted,l_functional_currency_code);

Line 6067: IF l_return_status = FND_API.g_ret_sts_error THEN

6063: IF l_old_cust_acct_id <> l_claim.cust_account_id THEN
6064: get_days_due (p_cust_accout_id => l_claim.cust_account_id,
6065: x_days_due => l_days_due,
6066: x_return_status => l_return_status);
6067: IF l_return_status = FND_API.g_ret_sts_error THEN
6068: RAISE FND_API.g_exc_error;
6069: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6070: RAISE FND_API.g_exc_unexpected_error;
6071: END IF;

Line 6068: RAISE FND_API.g_exc_error;

6064: get_days_due (p_cust_accout_id => l_claim.cust_account_id,
6065: x_days_due => l_days_due,
6066: x_return_status => l_return_status);
6067: IF l_return_status = FND_API.g_ret_sts_error THEN
6068: RAISE FND_API.g_exc_error;
6069: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6070: RAISE FND_API.g_exc_unexpected_error;
6071: END IF;
6072: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);

Line 6069: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6065: x_days_due => l_days_due,
6066: x_return_status => l_return_status);
6067: IF l_return_status = FND_API.g_ret_sts_error THEN
6068: RAISE FND_API.g_exc_error;
6069: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6070: RAISE FND_API.g_exc_unexpected_error;
6071: END IF;
6072: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);
6073:

Line 6070: RAISE FND_API.g_exc_unexpected_error;

6066: x_return_status => l_return_status);
6067: IF l_return_status = FND_API.g_ret_sts_error THEN
6068: RAISE FND_API.g_exc_error;
6069: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6070: RAISE FND_API.g_exc_unexpected_error;
6071: END IF;
6072: l_claim.DUE_DATE := TRUNC(l_claim.claim_date + l_days_due);
6073:
6074: get_customer_info(p_claim => l_claim,

Line 6077: IF l_return_status = FND_API.g_ret_sts_error THEN

6073:
6074: get_customer_info(p_claim => l_claim,
6075: x_claim => l_complete_claim,
6076: x_return_status => l_return_status);
6077: IF l_return_status = FND_API.g_ret_sts_error THEN
6078: RAISE FND_API.g_exc_error;
6079: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6080: RAISE FND_API.g_exc_unexpected_error;
6081: END IF;

Line 6078: RAISE FND_API.g_exc_error;

6074: get_customer_info(p_claim => l_claim,
6075: x_claim => l_complete_claim,
6076: x_return_status => l_return_status);
6077: IF l_return_status = FND_API.g_ret_sts_error THEN
6078: RAISE FND_API.g_exc_error;
6079: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6080: RAISE FND_API.g_exc_unexpected_error;
6081: END IF;
6082:

Line 6079: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6075: x_claim => l_complete_claim,
6076: x_return_status => l_return_status);
6077: IF l_return_status = FND_API.g_ret_sts_error THEN
6078: RAISE FND_API.g_exc_error;
6079: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6080: RAISE FND_API.g_exc_unexpected_error;
6081: END IF;
6082:
6083: l_claim := l_complete_claim;

Line 6080: RAISE FND_API.g_exc_unexpected_error;

6076: x_return_status => l_return_status);
6077: IF l_return_status = FND_API.g_ret_sts_error THEN
6078: RAISE FND_API.g_exc_error;
6079: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6080: RAISE FND_API.g_exc_unexpected_error;
6081: END IF;
6082:
6083: l_claim := l_complete_claim;
6084: END IF;

Line 6089: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN

6085:
6086: -- Bug4334023: User entered only shipto site then default shipto customer
6087: IF l_claim.ship_to_cust_account_id IS NULL THEN
6088: IF (l_claim.cust_shipto_acct_site_id is not null AND
6089: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN
6090: OPEN shipto_cust_account_id_csr(l_claim.cust_shipto_acct_site_id);
6091: FETCH shipto_cust_account_id_csr INTO l_claim.ship_to_cust_account_id;
6092: CLOSE shipto_cust_account_id_csr;
6093: END IF;

Line 6100: IF (l_claim.customer_ref_number is not null or l_claim.customer_ref_number <> FND_API.g_miss_char) then

6096: -- normalize the customer reference number if changed
6097: -- normalize the customer reference number if changed
6098: -- Fixed: uday poluri date:03-Jun-2003. following if condition is added to avoid normalize in case of null
6099: -- customer_ref_number.
6100: IF (l_claim.customer_ref_number is not null or l_claim.customer_ref_number <> FND_API.g_miss_char) then
6101: IF (l_old_customer_ref_number IS NULL AND l_claim.customer_ref_number IS NOT NULL) OR
6102: (l_old_customer_ref_number IS NOT NULL AND l_claim.customer_ref_number IS NULL) OR
6103: l_old_customer_ref_number <> l_claim.customer_ref_number THEN
6104:

Line 6115: ,p_init_msg_list => FND_API.G_FALSE

6111:
6112:
6113: OZF_CLAIM_SETTLEMENT_PVT.complete_settlement(
6114: p_api_version => 1.0
6115: ,p_init_msg_list => FND_API.G_FALSE
6116: ,p_commit => FND_API.G_FALSE
6117: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6118: ,x_return_status => l_return_status
6119: ,x_msg_data => l_msg_data

Line 6116: ,p_commit => FND_API.G_FALSE

6112:
6113: OZF_CLAIM_SETTLEMENT_PVT.complete_settlement(
6114: p_api_version => 1.0
6115: ,p_init_msg_list => FND_API.G_FALSE
6116: ,p_commit => FND_API.G_FALSE
6117: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6118: ,x_return_status => l_return_status
6119: ,x_msg_data => l_msg_data
6120: ,x_msg_count => l_msg_count

Line 6117: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

6113: OZF_CLAIM_SETTLEMENT_PVT.complete_settlement(
6114: p_api_version => 1.0
6115: ,p_init_msg_list => FND_API.G_FALSE
6116: ,p_commit => FND_API.G_FALSE
6117: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6118: ,x_return_status => l_return_status
6119: ,x_msg_data => l_msg_data
6120: ,x_msg_count => l_msg_count
6121: ,p_claim_rec => l_claim

Line 6124: IF l_return_status = FND_API.g_ret_sts_error THEN

6120: ,x_msg_count => l_msg_count
6121: ,p_claim_rec => l_claim
6122: ,x_claim_rec => l_complete_claim
6123: );
6124: IF l_return_status = FND_API.g_ret_sts_error THEN
6125: RAISE FND_API.g_exc_error;
6126: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6127: RAISE FND_API.g_exc_unexpected_error;
6128: END IF;

Line 6125: RAISE FND_API.g_exc_error;

6121: ,p_claim_rec => l_claim
6122: ,x_claim_rec => l_complete_claim
6123: );
6124: IF l_return_status = FND_API.g_ret_sts_error THEN
6125: RAISE FND_API.g_exc_error;
6126: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6127: RAISE FND_API.g_exc_unexpected_error;
6128: END IF;
6129: l_claim := l_complete_claim;

Line 6126: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6122: ,x_claim_rec => l_complete_claim
6123: );
6124: IF l_return_status = FND_API.g_ret_sts_error THEN
6125: RAISE FND_API.g_exc_error;
6126: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6127: RAISE FND_API.g_exc_unexpected_error;
6128: END IF;
6129: l_claim := l_complete_claim;
6130:

Line 6127: RAISE FND_API.g_exc_unexpected_error;

6123: );
6124: IF l_return_status = FND_API.g_ret_sts_error THEN
6125: RAISE FND_API.g_exc_error;
6126: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6127: RAISE FND_API.g_exc_unexpected_error;
6128: END IF;
6129: l_claim := l_complete_claim;
6130:
6131: -- Validate the record

Line 6139: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

6135: ,x_msg_count => l_msg_count
6136: ,x_msg_data => l_msg_data
6137: ,p_claim => l_claim
6138: );
6139: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6140: RAISE FND_API.G_EXC_ERROR;
6141: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6143: END IF;

Line 6140: RAISE FND_API.G_EXC_ERROR;

6136: ,x_msg_data => l_msg_data
6137: ,p_claim => l_claim
6138: );
6139: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6140: RAISE FND_API.G_EXC_ERROR;
6141: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6143: END IF;
6144:

Line 6141: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

6137: ,p_claim => l_claim
6138: );
6139: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6140: RAISE FND_API.G_EXC_ERROR;
6141: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6143: END IF;
6144:
6145: -- R12: eTax Uptake Make call to validate claim tax

Line 6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6138: );
6139: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6140: RAISE FND_API.G_EXC_ERROR;
6141: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6143: END IF;
6144:
6145: -- R12: eTax Uptake Make call to validate claim tax
6146: -- bugfix 4754589 added condition l_claim.tax_action <> FND_API.G_MISS_CHAR

Line 6146: -- bugfix 4754589 added condition l_claim.tax_action <> FND_API.G_MISS_CHAR

6142: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6143: END IF;
6144:
6145: -- R12: eTax Uptake Make call to validate claim tax
6146: -- bugfix 4754589 added condition l_claim.tax_action <> FND_API.G_MISS_CHAR
6147: IF (l_claim.tax_action IS NOT NULL AND l_claim.tax_action <> FND_API.G_MISS_CHAR) THEN
6148: OZF_CLAIM_TAX_PVT. Validate_Claim_For_Tax(
6149: p_api_version => l_api_version
6150: ,p_init_msg_list => FND_API.G_FALSE

Line 6147: IF (l_claim.tax_action IS NOT NULL AND l_claim.tax_action <> FND_API.G_MISS_CHAR) THEN

6143: END IF;
6144:
6145: -- R12: eTax Uptake Make call to validate claim tax
6146: -- bugfix 4754589 added condition l_claim.tax_action <> FND_API.G_MISS_CHAR
6147: IF (l_claim.tax_action IS NOT NULL AND l_claim.tax_action <> FND_API.G_MISS_CHAR) THEN
6148: OZF_CLAIM_TAX_PVT. Validate_Claim_For_Tax(
6149: p_api_version => l_api_version
6150: ,p_init_msg_list => FND_API.G_FALSE
6151: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

Line 6150: ,p_init_msg_list => FND_API.G_FALSE

6146: -- bugfix 4754589 added condition l_claim.tax_action <> FND_API.G_MISS_CHAR
6147: IF (l_claim.tax_action IS NOT NULL AND l_claim.tax_action <> FND_API.G_MISS_CHAR) THEN
6148: OZF_CLAIM_TAX_PVT. Validate_Claim_For_Tax(
6149: p_api_version => l_api_version
6150: ,p_init_msg_list => FND_API.G_FALSE
6151: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6152: ,x_return_status => l_return_status
6153: ,x_msg_data => l_msg_data
6154: ,x_msg_count => l_msg_count

Line 6151: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

6147: IF (l_claim.tax_action IS NOT NULL AND l_claim.tax_action <> FND_API.G_MISS_CHAR) THEN
6148: OZF_CLAIM_TAX_PVT. Validate_Claim_For_Tax(
6149: p_api_version => l_api_version
6150: ,p_init_msg_list => FND_API.G_FALSE
6151: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6152: ,x_return_status => l_return_status
6153: ,x_msg_data => l_msg_data
6154: ,x_msg_count => l_msg_count
6155: ,p_claim_rec => l_claim) ;

Line 6156: IF l_return_status = FND_API.g_ret_sts_error THEN

6152: ,x_return_status => l_return_status
6153: ,x_msg_data => l_msg_data
6154: ,x_msg_count => l_msg_count
6155: ,p_claim_rec => l_claim) ;
6156: IF l_return_status = FND_API.g_ret_sts_error THEN
6157: RAISE FND_API.g_exc_error;
6158: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6159: RAISE FND_API.g_exc_unexpected_error;
6160: END IF;

Line 6157: RAISE FND_API.g_exc_error;

6153: ,x_msg_data => l_msg_data
6154: ,x_msg_count => l_msg_count
6155: ,p_claim_rec => l_claim) ;
6156: IF l_return_status = FND_API.g_ret_sts_error THEN
6157: RAISE FND_API.g_exc_error;
6158: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6159: RAISE FND_API.g_exc_unexpected_error;
6160: END IF;
6161: END IF;

Line 6158: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6154: ,x_msg_count => l_msg_count
6155: ,p_claim_rec => l_claim) ;
6156: IF l_return_status = FND_API.g_ret_sts_error THEN
6157: RAISE FND_API.g_exc_error;
6158: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6159: RAISE FND_API.g_exc_unexpected_error;
6160: END IF;
6161: END IF;
6162:

Line 6159: RAISE FND_API.g_exc_unexpected_error;

6155: ,p_claim_rec => l_claim) ;
6156: IF l_return_status = FND_API.g_ret_sts_error THEN
6157: RAISE FND_API.g_exc_error;
6158: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6159: RAISE FND_API.g_exc_unexpected_error;
6160: END IF;
6161: END IF;
6162:
6163: OZF_CLAIM_LINE_PVT.Update_Line_Fm_Claim(

Line 6165: ,p_init_msg_list => FND_API.G_FALSE

6161: END IF;
6162:
6163: OZF_CLAIM_LINE_PVT.Update_Line_Fm_Claim(
6164: p_api_version => l_api_version
6165: ,p_init_msg_list => FND_API.G_FALSE
6166: ,p_commit => FND_API.G_FALSE
6167: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6168: ,x_return_status => l_return_status
6169: ,x_msg_data => l_msg_data

Line 6166: ,p_commit => FND_API.G_FALSE

6162:
6163: OZF_CLAIM_LINE_PVT.Update_Line_Fm_Claim(
6164: p_api_version => l_api_version
6165: ,p_init_msg_list => FND_API.G_FALSE
6166: ,p_commit => FND_API.G_FALSE
6167: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6168: ,x_return_status => l_return_status
6169: ,x_msg_data => l_msg_data
6170: ,x_msg_count => l_msg_count

Line 6167: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

6163: OZF_CLAIM_LINE_PVT.Update_Line_Fm_Claim(
6164: p_api_version => l_api_version
6165: ,p_init_msg_list => FND_API.G_FALSE
6166: ,p_commit => FND_API.G_FALSE
6167: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6168: ,x_return_status => l_return_status
6169: ,x_msg_data => l_msg_data
6170: ,x_msg_count => l_msg_count
6171: ,p_new_claim_rec => l_claim

Line 6173: IF l_return_status = FND_API.g_ret_sts_error THEN

6169: ,x_msg_data => l_msg_data
6170: ,x_msg_count => l_msg_count
6171: ,p_new_claim_rec => l_claim
6172: );
6173: IF l_return_status = FND_API.g_ret_sts_error THEN
6174: RAISE FND_API.g_exc_error;
6175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6176: RAISE FND_API.g_exc_unexpected_error;
6177: END IF;

Line 6174: RAISE FND_API.g_exc_error;

6170: ,x_msg_count => l_msg_count
6171: ,p_new_claim_rec => l_claim
6172: );
6173: IF l_return_status = FND_API.g_ret_sts_error THEN
6174: RAISE FND_API.g_exc_error;
6175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6176: RAISE FND_API.g_exc_unexpected_error;
6177: END IF;
6178:

Line 6175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6171: ,p_new_claim_rec => l_claim
6172: );
6173: IF l_return_status = FND_API.g_ret_sts_error THEN
6174: RAISE FND_API.g_exc_error;
6175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6176: RAISE FND_API.g_exc_unexpected_error;
6177: END IF;
6178:
6179: -- ----------------------------------------------------------------------------

Line 6176: RAISE FND_API.g_exc_unexpected_error;

6172: );
6173: IF l_return_status = FND_API.g_ret_sts_error THEN
6174: RAISE FND_API.g_exc_error;
6175: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6176: RAISE FND_API.g_exc_unexpected_error;
6177: END IF;
6178:
6179: -- ----------------------------------------------------------------------------
6180: -- Bug : 2732290

Line 6193: IF FND_API.To_Boolean (p_init_msg_list) THEN

6189: -- mchang 12/05/2003: comment out the following message initialization code.
6190: -- message stack only allow to initialize in the begining
6191: -- of api, not at this point.
6192: /*
6193: IF FND_API.To_Boolean (p_init_msg_list) THEN
6194: FND_MSG_PUB.initialize;
6195: END IF;
6196: */
6197:

Line 6202: RAISE FND_API.G_EXC_ERROR;

6198: IF FND_MSG_PUB.Check_Msg_Level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6199: FND_MESSAGE.Set_Name('AMS', 'OZF_CLAIM_API_NO_OPEN_STATUS');
6200: FND_MSG_PUB.ADD;
6201: END IF;
6202: RAISE FND_API.G_EXC_ERROR;
6203: END IF;
6204: -- End Bug: 2732290 -----------------------------------------------------------
6205:
6206: BEGIN

Line 6358: RAISE FND_API.g_exc_error;

6354: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error) THEN
6355: FND_MESSAGE.set_name('OZF', 'OZF_TABLE_HANDLER_ERROR');
6356: FND_MSG_PUB.add;
6357: END IF;
6358: RAISE FND_API.g_exc_error;
6359: END;
6360: l_rec_num := 1;
6361:
6362: IF l_user_sel_status_code_id IS NOT NULL THEN

Line 6373: ,p_init_msg_list => FND_API.G_FALSE

6369: IF l_old_status_code <> l_claim.status_code THEN
6370:
6371: OZF_CLAIM_SETTLEMENT_PVT.settle_claim(
6372: p_api_version => 1.0
6373: ,p_init_msg_list => FND_API.G_FALSE
6374: ,p_commit => FND_API.G_FALSE
6375: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6376: ,x_return_status => l_return_status
6377: ,x_msg_data => l_msg_data

Line 6374: ,p_commit => FND_API.G_FALSE

6370:
6371: OZF_CLAIM_SETTLEMENT_PVT.settle_claim(
6372: p_api_version => 1.0
6373: ,p_init_msg_list => FND_API.G_FALSE
6374: ,p_commit => FND_API.G_FALSE
6375: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6376: ,x_return_status => l_return_status
6377: ,x_msg_data => l_msg_data
6378: ,x_msg_count => l_msg_count

Line 6375: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

6371: OZF_CLAIM_SETTLEMENT_PVT.settle_claim(
6372: p_api_version => 1.0
6373: ,p_init_msg_list => FND_API.G_FALSE
6374: ,p_commit => FND_API.G_FALSE
6375: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6376: ,x_return_status => l_return_status
6377: ,x_msg_data => l_msg_data
6378: ,x_msg_count => l_msg_count
6379: ,p_claim_id => l_claim.claim_id

Line 6383: IF l_return_status = FND_API.g_ret_sts_error THEN

6379: ,p_claim_id => l_claim.claim_id
6380: ,p_curr_status => l_prev_status_code
6381: ,p_prev_status => l_old_status_code
6382: );
6383: IF l_return_status = FND_API.g_ret_sts_error THEN
6384: RAISE FND_API.g_exc_error;
6385: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6386: RAISE FND_API.g_exc_unexpected_error;
6387: END IF;

Line 6384: RAISE FND_API.g_exc_error;

6380: ,p_curr_status => l_prev_status_code
6381: ,p_prev_status => l_old_status_code
6382: );
6383: IF l_return_status = FND_API.g_ret_sts_error THEN
6384: RAISE FND_API.g_exc_error;
6385: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6386: RAISE FND_API.g_exc_unexpected_error;
6387: END IF;
6388: END IF;

Line 6385: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6381: ,p_prev_status => l_old_status_code
6382: );
6383: IF l_return_status = FND_API.g_ret_sts_error THEN
6384: RAISE FND_API.g_exc_error;
6385: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6386: RAISE FND_API.g_exc_unexpected_error;
6387: END IF;
6388: END IF;
6389:

Line 6386: RAISE FND_API.g_exc_unexpected_error;

6382: );
6383: IF l_return_status = FND_API.g_ret_sts_error THEN
6384: RAISE FND_API.g_exc_error;
6385: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6386: RAISE FND_API.g_exc_unexpected_error;
6387: END IF;
6388: END IF;
6389:
6390: -- start bug# 4363588

Line 6408: ,p_init_msg_list => FND_API.G_FALSE

6404:
6405: --Call the create history from here only after the claim update goes successfully(uday)
6406: Create_Claim_History (
6407: p_api_version => l_api_version
6408: ,p_init_msg_list => FND_API.G_FALSE
6409: ,p_commit => FND_API.G_FALSE
6410: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6411: ,x_return_status => l_return_status
6412: ,x_msg_data => l_msg_data

Line 6409: ,p_commit => FND_API.G_FALSE

6405: --Call the create history from here only after the claim update goes successfully(uday)
6406: Create_Claim_History (
6407: p_api_version => l_api_version
6408: ,p_init_msg_list => FND_API.G_FALSE
6409: ,p_commit => FND_API.G_FALSE
6410: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6411: ,x_return_status => l_return_status
6412: ,x_msg_data => l_msg_data
6413: ,x_msg_count => l_msg_count

Line 6410: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

6406: Create_Claim_History (
6407: p_api_version => l_api_version
6408: ,p_init_msg_list => FND_API.G_FALSE
6409: ,p_commit => FND_API.G_FALSE
6410: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
6411: ,x_return_status => l_return_status
6412: ,x_msg_data => l_msg_data
6413: ,x_msg_count => l_msg_count
6414: ,p_claim => l_claim

Line 6419: IF l_return_status = FND_API.g_ret_sts_error THEN

6415: ,p_event => p_event
6416: ,x_need_to_create => l_need_to_create
6417: ,x_claim_history_id => l_claim_history_id
6418: );
6419: IF l_return_status = FND_API.g_ret_sts_error THEN
6420: RAISE FND_API.g_exc_error;
6421: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6422: RAISE FND_API.g_exc_unexpected_error;
6423: END IF;

Line 6420: RAISE FND_API.g_exc_error;

6416: ,x_need_to_create => l_need_to_create
6417: ,x_claim_history_id => l_claim_history_id
6418: );
6419: IF l_return_status = FND_API.g_ret_sts_error THEN
6420: RAISE FND_API.g_exc_error;
6421: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6422: RAISE FND_API.g_exc_unexpected_error;
6423: END IF;
6424:

Line 6421: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6417: ,x_claim_history_id => l_claim_history_id
6418: );
6419: IF l_return_status = FND_API.g_ret_sts_error THEN
6420: RAISE FND_API.g_exc_error;
6421: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6422: RAISE FND_API.g_exc_unexpected_error;
6423: END IF;
6424:
6425:

Line 6422: RAISE FND_API.g_exc_unexpected_error;

6418: );
6419: IF l_return_status = FND_API.g_ret_sts_error THEN
6420: RAISE FND_API.g_exc_error;
6421: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6422: RAISE FND_API.g_exc_unexpected_error;
6423: END IF;
6424:
6425:
6426: -- Create Tasks for the claim if the reason code has been changed and a history record is created.

Line 6446: ,p_delete_future_recurrences => FND_API.G_FALSE

6442: JTF_TASKS_PUB.delete_task(
6443: p_api_version => l_api_version
6444: ,p_object_version_number => l_uncompleted_tasks_tbl(i).object_version_number
6445: ,p_task_id => l_uncompleted_tasks_tbl(i).task_id
6446: ,p_delete_future_recurrences => FND_API.G_FALSE
6447: ,x_return_status => l_return_status
6448: ,x_msg_count => l_msg_count
6449: ,x_msg_data => l_msg_data
6450: );

Line 6451: IF l_return_status = FND_API.g_ret_sts_error THEN

6447: ,x_return_status => l_return_status
6448: ,x_msg_count => l_msg_count
6449: ,x_msg_data => l_msg_data
6450: );
6451: IF l_return_status = FND_API.g_ret_sts_error THEN
6452: RAISE FND_API.g_exc_error;
6453: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6454: RAISE FND_API.g_exc_unexpected_error;
6455: END IF;

Line 6452: RAISE FND_API.g_exc_error;

6448: ,x_msg_count => l_msg_count
6449: ,x_msg_data => l_msg_data
6450: );
6451: IF l_return_status = FND_API.g_ret_sts_error THEN
6452: RAISE FND_API.g_exc_error;
6453: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6454: RAISE FND_API.g_exc_unexpected_error;
6455: END IF;
6456: END LOOP;

Line 6453: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6449: ,x_msg_data => l_msg_data
6450: );
6451: IF l_return_status = FND_API.g_ret_sts_error THEN
6452: RAISE FND_API.g_exc_error;
6453: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6454: RAISE FND_API.g_exc_unexpected_error;
6455: END IF;
6456: END LOOP;
6457:

Line 6454: RAISE FND_API.g_exc_unexpected_error;

6450: );
6451: IF l_return_status = FND_API.g_ret_sts_error THEN
6452: RAISE FND_API.g_exc_error;
6453: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6454: RAISE FND_API.g_exc_unexpected_error;
6455: END IF;
6456: END LOOP;
6457:
6458: -- point the completed tasks to claim_history. The completed_flag is set to 'Y'

Line 6474: ,p_init_msg_list => FND_API.g_false

6470: -- change the source_object_id and source_object_type_code for the tasks.
6471: JTF_TASKS_PUB.update_task(
6472: p_api_version => l_api_version
6473: ,p_object_version_number => l_completed_tasks_tbl(i).object_version_number
6474: ,p_init_msg_list => FND_API.g_false
6475: ,p_commit => FND_API.g_false
6476: ,x_return_status => l_return_status
6477: ,x_msg_count => l_msg_count
6478: ,x_msg_data => l_msg_data

Line 6475: ,p_commit => FND_API.g_false

6471: JTF_TASKS_PUB.update_task(
6472: p_api_version => l_api_version
6473: ,p_object_version_number => l_completed_tasks_tbl(i).object_version_number
6474: ,p_init_msg_list => FND_API.g_false
6475: ,p_commit => FND_API.g_false
6476: ,x_return_status => l_return_status
6477: ,x_msg_count => l_msg_count
6478: ,x_msg_data => l_msg_data
6479: ,p_task_id => l_completed_tasks_tbl(i).task_id

Line 6484: IF l_return_status = FND_API.g_ret_sts_error THEN

6480: ,p_source_object_type_code =>G_CLAIM_HISTORY_TYPE
6481: ,p_source_object_id => l_claim_history_id
6482: );
6483:
6484: IF l_return_status = FND_API.g_ret_sts_error THEN
6485: RAISE FND_API.g_exc_error;
6486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6487: RAISE FND_API.g_exc_unexpected_error;
6488: END IF;

Line 6485: RAISE FND_API.g_exc_error;

6481: ,p_source_object_id => l_claim_history_id
6482: );
6483:
6484: IF l_return_status = FND_API.g_ret_sts_error THEN
6485: RAISE FND_API.g_exc_error;
6486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6487: RAISE FND_API.g_exc_unexpected_error;
6488: END IF;
6489: END LOOP;

Line 6486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6482: );
6483:
6484: IF l_return_status = FND_API.g_ret_sts_error THEN
6485: RAISE FND_API.g_exc_error;
6486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6487: RAISE FND_API.g_exc_unexpected_error;
6488: END IF;
6489: END LOOP;
6490: END IF;

Line 6487: RAISE FND_API.g_exc_unexpected_error;

6483:
6484: IF l_return_status = FND_API.g_ret_sts_error THEN
6485: RAISE FND_API.g_exc_error;
6486: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6487: RAISE FND_API.g_exc_unexpected_error;
6488: END IF;
6489: END LOOP;
6490: END IF;
6491:

Line 6502: l_claim.task_template_group_id <> FND_API.G_MISS_NUM) THEN

6498: and source_object_type_code = G_OBJECT_TYPE;
6499: */
6500: -- Create Tasks for the claim created if there is any
6501: IF (l_claim.task_template_group_id is not null and
6502: l_claim.task_template_group_id <> FND_API.G_MISS_NUM) THEN
6503: generate_tasks(
6504: p_task_template_group_id => l_claim.task_template_group_id
6505: ,p_owner_id => l_claim.owner_id
6506: ,p_claim_number => l_claim.claim_number

Line 6510: IF l_return_status = FND_API.g_ret_sts_error THEN

6506: ,p_claim_number => l_claim.claim_number
6507: ,p_claim_id => l_claim.claim_id
6508: ,x_return_status => l_return_status
6509: );
6510: IF l_return_status = FND_API.g_ret_sts_error THEN
6511: RAISE FND_API.g_exc_error;
6512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6513: RAISE FND_API.g_exc_unexpected_error;
6514: END IF;

Line 6511: RAISE FND_API.g_exc_error;

6507: ,p_claim_id => l_claim.claim_id
6508: ,x_return_status => l_return_status
6509: );
6510: IF l_return_status = FND_API.g_ret_sts_error THEN
6511: RAISE FND_API.g_exc_error;
6512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6513: RAISE FND_API.g_exc_unexpected_error;
6514: END IF;
6515: END IF;

Line 6512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6508: ,x_return_status => l_return_status
6509: );
6510: IF l_return_status = FND_API.g_ret_sts_error THEN
6511: RAISE FND_API.g_exc_error;
6512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6513: RAISE FND_API.g_exc_unexpected_error;
6514: END IF;
6515: END IF;
6516: /*

Line 6513: RAISE FND_API.g_exc_unexpected_error;

6509: );
6510: IF l_return_status = FND_API.g_ret_sts_error THEN
6511: RAISE FND_API.g_exc_error;
6512: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6513: RAISE FND_API.g_exc_unexpected_error;
6514: END IF;
6515: END IF;
6516: /*
6517: -- Temp solution for update the claim history

Line 6546: P_Init_Msg_List => FND_API.G_FALSE,

6542: l_claim_history_rec.task_source_object_type_code := G_CLAIM_HISTORY_TYPE;
6543:
6544: OZF_claims_history_PVT.Update_claims_history(
6545: P_Api_Version_Number => 1.0,
6546: P_Init_Msg_List => FND_API.G_FALSE,
6547: P_Commit => FND_API.G_FALSE,
6548: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6549: x_return_status => l_return_status,
6550: x_msg_count => l_msg_count,

Line 6547: P_Commit => FND_API.G_FALSE,

6543:
6544: OZF_claims_history_PVT.Update_claims_history(
6545: P_Api_Version_Number => 1.0,
6546: P_Init_Msg_List => FND_API.G_FALSE,
6547: P_Commit => FND_API.G_FALSE,
6548: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6549: x_return_status => l_return_status,
6550: x_msg_count => l_msg_count,
6551: x_msg_data => l_msg_data,

Line 6548: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

6544: OZF_claims_history_PVT.Update_claims_history(
6545: P_Api_Version_Number => 1.0,
6546: P_Init_Msg_List => FND_API.G_FALSE,
6547: P_Commit => FND_API.G_FALSE,
6548: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
6549: x_return_status => l_return_status,
6550: x_msg_count => l_msg_count,
6551: x_msg_data => l_msg_data,
6552: P_CLAIMS_HISTORY_Rec => l_claim_history_rec,

Line 6556: IF l_return_status = FND_API.g_ret_sts_error THEN

6552: P_CLAIMS_HISTORY_Rec => l_claim_history_rec,
6553: X_Object_Version_Number => l_hist_obj_ver_num
6554: );
6555:
6556: IF l_return_status = FND_API.g_ret_sts_error THEN
6557: RAISE FND_API.g_exc_error;
6558: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6559: RAISE FND_API.g_exc_unexpected_error;
6560: END IF;

Line 6557: RAISE FND_API.g_exc_error;

6553: X_Object_Version_Number => l_hist_obj_ver_num
6554: );
6555:
6556: IF l_return_status = FND_API.g_ret_sts_error THEN
6557: RAISE FND_API.g_exc_error;
6558: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6559: RAISE FND_API.g_exc_unexpected_error;
6560: END IF;
6561: END LOOP;

Line 6558: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6554: );
6555:
6556: IF l_return_status = FND_API.g_ret_sts_error THEN
6557: RAISE FND_API.g_exc_error;
6558: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6559: RAISE FND_API.g_exc_unexpected_error;
6560: END IF;
6561: END LOOP;
6562: END IF;

Line 6559: RAISE FND_API.g_exc_unexpected_error;

6555:
6556: IF l_return_status = FND_API.g_ret_sts_error THEN
6557: RAISE FND_API.g_exc_error;
6558: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6559: RAISE FND_API.g_exc_unexpected_error;
6560: END IF;
6561: END LOOP;
6562: END IF;
6563: END IF;

Line 6587: ,p_init_msg_list => fnd_api.g_false

6583: -- [END OF BUG 3835800 Fiing]
6584: l_access_list(i).act_access_to_object_id := l_claim.claim_id;
6585: ams_access_pvt.create_access(
6586: p_api_version => l_api_version
6587: ,p_init_msg_list => fnd_api.g_false
6588: ,p_validation_level => p_validation_level
6589: ,x_return_status => l_return_status
6590: ,x_msg_count => x_msg_count
6591: ,x_msg_data => x_msg_data

Line 6592: ,p_commit => fnd_api.g_false

6588: ,p_validation_level => p_validation_level
6589: ,x_return_status => l_return_status
6590: ,x_msg_count => x_msg_count
6591: ,x_msg_data => x_msg_data
6592: ,p_commit => fnd_api.g_false
6593: ,p_access_rec => l_access_list(i)
6594: ,x_access_id => l_access_id);
6595: IF l_return_status = fnd_api.g_ret_sts_error THEN
6596: RAISE fnd_api.g_exc_error;

Line 6595: IF l_return_status = fnd_api.g_ret_sts_error THEN

6591: ,x_msg_data => x_msg_data
6592: ,p_commit => fnd_api.g_false
6593: ,p_access_rec => l_access_list(i)
6594: ,x_access_id => l_access_id);
6595: IF l_return_status = fnd_api.g_ret_sts_error THEN
6596: RAISE fnd_api.g_exc_error;
6597: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6598: RAISE fnd_api.g_exc_unexpected_error;
6599: END IF;

Line 6596: RAISE fnd_api.g_exc_error;

6592: ,p_commit => fnd_api.g_false
6593: ,p_access_rec => l_access_list(i)
6594: ,x_access_id => l_access_id);
6595: IF l_return_status = fnd_api.g_ret_sts_error THEN
6596: RAISE fnd_api.g_exc_error;
6597: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6598: RAISE fnd_api.g_exc_unexpected_error;
6599: END IF;
6600: END IF; -- end of l_dup_resource checking BUG 3835800 Fiing

Line 6597: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN

6593: ,p_access_rec => l_access_list(i)
6594: ,x_access_id => l_access_id);
6595: IF l_return_status = fnd_api.g_ret_sts_error THEN
6596: RAISE fnd_api.g_exc_error;
6597: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6598: RAISE fnd_api.g_exc_unexpected_error;
6599: END IF;
6600: END IF; -- end of l_dup_resource checking BUG 3835800 Fiing
6601: END LOOP;

Line 6598: RAISE fnd_api.g_exc_unexpected_error;

6594: ,x_access_id => l_access_id);
6595: IF l_return_status = fnd_api.g_ret_sts_error THEN
6596: RAISE fnd_api.g_exc_error;
6597: ELSIF l_return_status = fnd_api.g_ret_sts_unexp_error THEN
6598: RAISE fnd_api.g_exc_unexpected_error;
6599: END IF;
6600: END IF; -- end of l_dup_resource checking BUG 3835800 Fiing
6601: END LOOP;
6602: END IF;

Line 6611: ,p_init_msg_list => FND_API.g_false

6607: -------------------------------------------------
6608: IF l_old_status_code <> l_claim.status_code THEN
6609: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
6610: p_api_version => l_api_version
6611: ,p_init_msg_list => FND_API.g_false
6612: ,p_commit => FND_API.g_false
6613: ,p_validation_level => FND_API.g_valid_level_full
6614: ,x_return_status => l_return_status
6615: ,x_msg_data => x_msg_data

Line 6612: ,p_commit => FND_API.g_false

6608: IF l_old_status_code <> l_claim.status_code THEN
6609: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
6610: p_api_version => l_api_version
6611: ,p_init_msg_list => FND_API.g_false
6612: ,p_commit => FND_API.g_false
6613: ,p_validation_level => FND_API.g_valid_level_full
6614: ,x_return_status => l_return_status
6615: ,x_msg_data => x_msg_data
6616: ,x_msg_count => x_msg_count

Line 6613: ,p_validation_level => FND_API.g_valid_level_full

6609: OZF_CLAIM_SETTLEMENT_PVT.Raise_Business_Event(
6610: p_api_version => l_api_version
6611: ,p_init_msg_list => FND_API.g_false
6612: ,p_commit => FND_API.g_false
6613: ,p_validation_level => FND_API.g_valid_level_full
6614: ,x_return_status => l_return_status
6615: ,x_msg_data => x_msg_data
6616: ,x_msg_count => x_msg_count
6617:

Line 6623: IF l_return_status = FND_API.g_ret_sts_error THEN

6619: ,p_old_status => l_old_status_code
6620: ,p_new_status => l_claim.status_code
6621: ,p_event_name => 'oracle.apps.ozf.claim.updateStatus'
6622: );
6623: IF l_return_status = FND_API.g_ret_sts_error THEN
6624: RAISE FND_API.g_exc_error;
6625: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6626: RAISE FND_API.g_exc_unexpected_error;
6627: END IF;

Line 6624: RAISE FND_API.g_exc_error;

6620: ,p_new_status => l_claim.status_code
6621: ,p_event_name => 'oracle.apps.ozf.claim.updateStatus'
6622: );
6623: IF l_return_status = FND_API.g_ret_sts_error THEN
6624: RAISE FND_API.g_exc_error;
6625: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6626: RAISE FND_API.g_exc_unexpected_error;
6627: END IF;
6628: END IF;

Line 6625: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

6621: ,p_event_name => 'oracle.apps.ozf.claim.updateStatus'
6622: );
6623: IF l_return_status = FND_API.g_ret_sts_error THEN
6624: RAISE FND_API.g_exc_error;
6625: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6626: RAISE FND_API.g_exc_unexpected_error;
6627: END IF;
6628: END IF;
6629:

Line 6626: RAISE FND_API.g_exc_unexpected_error;

6622: );
6623: IF l_return_status = FND_API.g_ret_sts_error THEN
6624: RAISE FND_API.g_exc_error;
6625: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
6626: RAISE FND_API.g_exc_unexpected_error;
6627: END IF;
6628: END IF;
6629:
6630: -- pass the new version number

Line 6634: IF FND_API.To_Boolean ( p_commit ) THEN

6630: -- pass the new version number
6631: x_object_version_number := l_object_version_number;
6632:
6633: --Standard check of commit
6634: IF FND_API.To_Boolean ( p_commit ) THEN
6635: COMMIT WORK;
6636: END IF;
6637: -- Debug Message
6638: IF OZF_DEBUG_LOW_ON THEN

Line 6645: p_encoded => FND_API.G_FALSE,

6641: FND_MSG_PUB.Add;
6642: END IF;
6643: --Standard call to get message count and if count=1, get the message
6644: FND_MSG_PUB.Count_And_Get (
6645: p_encoded => FND_API.G_FALSE,
6646: p_count => x_msg_count,
6647: p_data => x_msg_data
6648: );
6649: EXCEPTION

Line 6650: WHEN FND_API.G_EXC_ERROR THEN

6646: p_count => x_msg_count,
6647: p_data => x_msg_data
6648: );
6649: EXCEPTION
6650: WHEN FND_API.G_EXC_ERROR THEN
6651: -- IF ( NOT G_UPDATE_CALLED ) THEN
6652: ROLLBACK TO Update_Claim_PVT;
6653: -- END IF;
6654: x_return_status := FND_API.G_RET_STS_ERROR;

Line 6654: x_return_status := FND_API.G_RET_STS_ERROR;

6650: WHEN FND_API.G_EXC_ERROR THEN
6651: -- IF ( NOT G_UPDATE_CALLED ) THEN
6652: ROLLBACK TO Update_Claim_PVT;
6653: -- END IF;
6654: x_return_status := FND_API.G_RET_STS_ERROR;
6655: -- Standard call to get message count and if count=1, get the message
6656: FND_MSG_PUB.Count_And_Get (
6657: p_encoded => FND_API.G_FALSE,
6658: p_count => x_msg_count,

Line 6657: p_encoded => FND_API.G_FALSE,

6653: -- END IF;
6654: x_return_status := FND_API.G_RET_STS_ERROR;
6655: -- Standard call to get message count and if count=1, get the message
6656: FND_MSG_PUB.Count_And_Get (
6657: p_encoded => FND_API.G_FALSE,
6658: p_count => x_msg_count,
6659: p_data => x_msg_data
6660: );
6661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 6661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

6657: p_encoded => FND_API.G_FALSE,
6658: p_count => x_msg_count,
6659: p_data => x_msg_data
6660: );
6661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6662: -- IF ( NOT G_UPDATE_CALLED ) THEN
6663: ROLLBACK TO Update_Claim_PVT;
6664: -- END IF;
6665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 6665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6661: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
6662: -- IF ( NOT G_UPDATE_CALLED ) THEN
6663: ROLLBACK TO Update_Claim_PVT;
6664: -- END IF;
6665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6666: -- Standard call to get message count and if count=1, get the message
6667: FND_MSG_PUB.Count_And_Get (
6668: p_encoded => FND_API.G_FALSE,
6669: p_count => x_msg_count,

Line 6668: p_encoded => FND_API.G_FALSE,

6664: -- END IF;
6665: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6666: -- Standard call to get message count and if count=1, get the message
6667: FND_MSG_PUB.Count_And_Get (
6668: p_encoded => FND_API.G_FALSE,
6669: p_count => x_msg_count,
6670: p_data => x_msg_data
6671: );
6672: WHEN OTHERS THEN

Line 6676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

6672: WHEN OTHERS THEN
6673: -- IF ( NOT G_UPDATE_CALLED ) THEN
6674: ROLLBACK TO Update_Claim_PVT;
6675: -- END IF;
6676: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
6677: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
6678: THEN
6679: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6680: END IF;

Line 6683: p_encoded => FND_API.G_FALSE,

6679: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
6680: END IF;
6681: -- Standard call to get message count and if count=1, get the message
6682: FND_MSG_PUB.Count_And_Get (
6683: p_encoded => FND_API.G_FALSE,
6684: p_count => x_msg_count,
6685: p_data => x_msg_data
6686: );
6687: --

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

6701: --
6702: ----------------------------------------------------------------------
6703: PROCEDURE Validate_Claim (
6704: p_api_version IN NUMBER
6705: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
6706: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
6707: ,x_return_status OUT NOCOPY VARCHAR2
6708: ,x_msg_count OUT NOCOPY NUMBER
6709: ,x_msg_data OUT NOCOPY VARCHAR2

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

6702: ----------------------------------------------------------------------
6703: PROCEDURE Validate_Claim (
6704: p_api_version IN NUMBER
6705: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
6706: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
6707: ,x_return_status OUT NOCOPY VARCHAR2
6708: ,x_msg_count OUT NOCOPY NUMBER
6709: ,x_msg_data OUT NOCOPY VARCHAR2
6710: ,p_claim IN claim_rec_type

Line 6822: IF NOT FND_API.Compatible_API_Call (

6818: BEGIN
6819: -- Standard begin of API savepoint
6820: SAVEPOINT Validate_Claim_PVT;
6821: -- Standard call to check for call compatibility.
6822: IF NOT FND_API.Compatible_API_Call (
6823: l_api_version,
6824: p_api_version,
6825: l_api_name,
6826: G_PKG_NAME)

Line 6828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6824: p_api_version,
6825: l_api_name,
6826: G_PKG_NAME)
6827: THEN
6828: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6829: END IF;
6830:
6831: -- Debug Message
6832: IF OZF_DEBUG_LOW_ON THEN

Line 6839: IF FND_API.To_Boolean (p_init_msg_list) THEN

6835: FND_MSG_PUB.Add;
6836: END IF;
6837:
6838: --Initialize message list if p_init_msg_list is TRUE.
6839: IF FND_API.To_Boolean (p_init_msg_list) THEN
6840: FND_MSG_PUB.initialize;
6841: END IF;
6842:
6843: -- Initialize API return status to sucess

Line 6844: x_return_status := FND_API.G_RET_STS_SUCCESS;

6840: FND_MSG_PUB.initialize;
6841: END IF;
6842:
6843: -- Initialize API return status to sucess
6844: x_return_status := FND_API.G_RET_STS_SUCCESS;
6845:
6846: IF p_validation_level >= JTF_PLSQL_API.g_valid_level_item THEN
6847: Check_Claim_Items(
6848: p_claim_rec => l_claim,

Line 6853: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

6849: p_validation_mode => JTF_PLSQL_API.g_update,
6850: x_return_status => l_return_status
6851: );
6852:
6853: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6854: RAISE FND_API.G_EXC_ERROR;
6855: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6857: END IF;

Line 6854: RAISE FND_API.G_EXC_ERROR;

6850: x_return_status => l_return_status
6851: );
6852:
6853: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6854: RAISE FND_API.G_EXC_ERROR;
6855: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6857: END IF;
6858: END IF;

Line 6855: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

6851: );
6852:
6853: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6854: RAISE FND_API.G_EXC_ERROR;
6855: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6857: END IF;
6858: END IF;
6859:

Line 6856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6852:
6853: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
6854: RAISE FND_API.G_EXC_ERROR;
6855: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
6856: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6857: END IF;
6858: END IF;
6859:
6860: -- Raise an error

Line 6871: RAISE FND_API.G_EXC_ERROR;

6867: IF OZF_DEBUG_HIGH_ON THEN
6868: ozf_utility_PVT.debug_message('claim date: ' || l_claim.claim_date);
6869: ozf_utility_PVT.debug_message('due date: ' || l_claim.DUE_DATE);
6870: END IF;
6871: RAISE FND_API.G_EXC_ERROR;
6872: END IF;
6873:
6874: -- Raise an error
6875: -- if the current status code is not duplicate but the duplicate_claim_id is not null

Line 6878: (l_claim.duplicate_claim_id <> FND_API.G_MISS_NUM)) THEN

6874: -- Raise an error
6875: -- if the current status code is not duplicate but the duplicate_claim_id is not null
6876: IF ((l_claim.status_code <> G_DUPLICATE_STATUS) AND
6877: (l_claim.duplicate_claim_id is not null) AND
6878: (l_claim.duplicate_claim_id <> FND_API.G_MISS_NUM)) THEN
6879: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6880: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CANT_DUP');
6881: FND_MSG_PUB.Add;
6882: END IF;

Line 6883: RAISE FND_API.G_EXC_ERROR;

6879: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6880: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CANT_DUP');
6881: FND_MSG_PUB.Add;
6882: END IF;
6883: RAISE FND_API.G_EXC_ERROR;
6884: END IF;
6885:
6886: -- Raise an error
6887: -- if billto_site and shipto_site do not belong to the customer

Line 6889: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN

6885:
6886: -- Raise an error
6887: -- if billto_site and shipto_site do not belong to the customer
6888: IF (l_claim.cust_account_id is not null AND
6889: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN
6890:
6891: -- check cust_billto_acct_site_id
6892: IF (l_claim.cust_billto_acct_site_id is not null AND
6893: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN

Line 6893: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN

6889: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN
6890:
6891: -- check cust_billto_acct_site_id
6892: IF (l_claim.cust_billto_acct_site_id is not null AND
6893: l_claim.cust_account_id <> FND_API.G_MISS_NUM) THEN
6894:
6895: OPEN cust_site_csr(l_claim.cust_account_id, 'BILL_TO', l_claim.cust_billto_acct_site_id);
6896: FETCH cust_site_csr INTO l_count;
6897: CLOSE cust_site_csr;

Line 6904: RAISE FND_API.G_EXC_ERROR;

6900: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6901: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_BILL_TO_ST_WRNG');
6902: FND_MSG_PUB.Add;
6903: END IF;
6904: RAISE FND_API.G_EXC_ERROR;
6905: END IF;
6906: END IF;
6907:
6908: -- 4334023: check for unrelated shipto if profile does not allow unrelated

Line 6921: RAISE FND_API.G_EXC_ERROR;

6917: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6918: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_UNRELATED_SHIPTO');
6919: FND_MSG_PUB.Add;
6920: END IF;
6921: RAISE FND_API.G_EXC_ERROR;
6922: END IF;
6923: END IF;
6924:
6925: -- Bug 5498540 -- Removed validation for SHIP_TO Site address

Line 6928: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN

6924:
6925: -- Bug 5498540 -- Removed validation for SHIP_TO Site address
6926: -- check cust_shipto_acct_site_id
6927: /*IF (l_claim.cust_shipto_acct_site_id is not null AND
6928: l_claim.cust_shipto_acct_site_id <> FND_API.G_MISS_NUM) THEN
6929:
6930: l_count := 0;
6931: OPEN cust_site_csr(l_claim.ship_to_cust_account_id, 'SHIP_TO', l_claim.cust_shipto_acct_site_id);
6932: FETCH cust_site_csr INTO l_count;

Line 6940: RAISE FND_API.G_EXC_ERROR;

6936: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6937: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_SHIP_TO_ST_WRNG');
6938: FND_MSG_PUB.Add;
6939: END IF;
6940: RAISE FND_API.G_EXC_ERROR;
6941: END IF;
6942: END IF; */
6943:
6944: /* phase out this check since

Line 6948: l_claim.contact_id <> FND_API.G_MISS_NUM) THEN

6944: /* phase out this check since
6945:
6946: -- check contact_id
6947: IF (l_claim.contact_id is not null AND
6948: l_claim.contact_id <> FND_API.G_MISS_NUM) THEN
6949:
6950: l_count := 0;
6951: OPEN party_csr(l_claim.cust_account_id, 'CONTACT_OF', l_claim.contact_id);
6952: FETCH party_csr INTO l_count;

Line 6960: RAISE FND_API.G_EXC_ERROR;

6956: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6957: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CONTACT_WRNG');
6958: FND_MSG_PUB.Add;
6959: END IF;
6960: RAISE FND_API.G_EXC_ERROR;
6961: END IF;
6962: END IF;
6963: -- end of phase out this check */
6964:

Line 6967: l_claim.broker_id <> FND_API.G_MISS_NUM) THEN

6963: -- end of phase out this check */
6964:
6965: -- check broker_id
6966: IF (l_claim.broker_id is not null AND
6967: l_claim.broker_id <> FND_API.G_MISS_NUM) THEN
6968:
6969: l_count := 0;
6970: OPEN party_csr(l_claim.cust_account_id, 'BROKER_OF', l_claim.broker_id);
6971: FETCH party_csr INTO l_count;

Line 6979: RAISE FND_API.G_EXC_ERROR;

6975: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
6976: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_BROKER_WRNG');
6977: FND_MSG_PUB.Add;
6978: END IF;
6979: RAISE FND_API.G_EXC_ERROR;
6980: END IF;
6981: END IF;
6982:
6983: -- check sales_rep

Line 6988: l_claim.sales_rep_id <> FND_API.G_MISS_NUM) THEN

6984: -- 04-MAR-2002 mchang updated: comment out the following section to avoid the sales_rep_id checking
6985: -- since the sales_rep_id might not be valied over time when claim is updated.
6986: /*
6987: IF (l_claim.sales_rep_id is not NULL AND
6988: l_claim.sales_rep_id <> FND_API.G_MISS_NUM) THEN
6989: OPEN sales_rep_num_csr(l_claim.sales_rep_id);
6990: FETCH sales_rep_num_csr INTO l_sales_rep_num;
6991: CLOSE sales_rep_num_csr;
6992:

Line 6998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

6994: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
6995: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SALES_REP_MISSING');
6996: FND_MSG_PUB.add;
6997: END IF;
6998: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
6999: END IF;
7000: END IF;
7001: */
7002:

Line 7008: RAISE FND_API.G_EXC_ERROR;

7004: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7005: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CUST_ID_MISSING');
7006: FND_MSG_PUB.Add;
7007: END IF;
7008: RAISE FND_API.G_EXC_ERROR;
7009: END IF;
7010:
7011:
7012: -- 04-MAR-2002 mchang updated: comment out the following section to avoid the status code checking

Line 7031: RAISE FND_API.G_EXC_ERROR;

7027: FND_MESSAGE.Set_Name('OZF','OZF_API_DEBUG_MESSAGE');
7028: FND_MESSAGE.Set_Token('TEXT','code: '||l_claim.status_code||' id:'||l_claim.user_status_id);
7029: FND_MSG_PUB.Add;
7030: END IF;
7031: RAISE FND_API.G_EXC_ERROR;
7032: END IF;
7033: */
7034:
7035: -- Check to see whether the reason_code_id and task_template_id matches.

Line 7039: IF l_claim.reason_code_id is not null AND l_claim.reason_code_id <> FND_API.G_MISS_NUM AND

7035: -- Check to see whether the reason_code_id and task_template_id matches.
7036: -- 04-MAR-2002 mchang updated: comment out the following section to avoid the reason_code_id and reason_code_id checking
7037: -- since the reason_code_id and reason_code_id might not be valied over time when the claim is updated.
7038: /*
7039: IF l_claim.reason_code_id is not null AND l_claim.reason_code_id <> FND_API.G_MISS_NUM AND
7040: l_claim.task_template_group_id is not null AND l_claim.task_template_group_id <> FND_API.G_MISS_NUM THEN
7041: l_count := 0;
7042:
7043: OPEN action_count_csr(l_claim.reason_code_id, l_claim.task_template_group_id);

Line 7040: l_claim.task_template_group_id is not null AND l_claim.task_template_group_id <> FND_API.G_MISS_NUM THEN

7036: -- 04-MAR-2002 mchang updated: comment out the following section to avoid the reason_code_id and reason_code_id checking
7037: -- since the reason_code_id and reason_code_id might not be valied over time when the claim is updated.
7038: /*
7039: IF l_claim.reason_code_id is not null AND l_claim.reason_code_id <> FND_API.G_MISS_NUM AND
7040: l_claim.task_template_group_id is not null AND l_claim.task_template_group_id <> FND_API.G_MISS_NUM THEN
7041: l_count := 0;
7042:
7043: OPEN action_count_csr(l_claim.reason_code_id, l_claim.task_template_group_id);
7044: FETCH action_count_csr INTO l_count;

Line 7052: RAISE FND_API.G_EXC_ERROR;

7048: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7049: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_ACTION_NOT_MAT');
7050: FND_MSG_PUB.Add;
7051: END IF;
7052: RAISE FND_API.G_EXC_ERROR;
7053: END IF;
7054: END IF;
7055: */
7056:

Line 7059: l_claim.owner_id = FND_API.G_MISS_NUM) THEN

7055: */
7056:
7057: -- raise an error if owner_id is not found
7058: IF (l_claim.owner_id is null OR
7059: l_claim.owner_id = FND_API.G_MISS_NUM) THEN
7060: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7061: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_OWNER_NOT_FOUND');
7062: FND_MSG_PUB.Add;
7063: END IF;

Line 7064: RAISE FND_API.G_EXC_ERROR;

7060: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7061: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_OWNER_NOT_FOUND');
7062: FND_MSG_PUB.Add;
7063: END IF;
7064: RAISE FND_API.G_EXC_ERROR;
7065: END IF;
7066:
7067: -- raise an error if status_code is open and amount_remaining is 0
7068: IF (l_claim.status_code = G_OPEN_STATUS AND

Line 7074: RAISE FND_API.G_EXC_ERROR;

7070: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7071: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_AMT_ZERO_WOPEN');
7072: FND_MSG_PUB.Add;
7073: END IF;
7074: RAISE FND_API.G_EXC_ERROR;
7075: END IF;
7076:
7077: -- raise an error if amount is <0 and claim_class = Claim or DEDUCTION
7078: -- raise an error if amount is >0 and claim_class = OVERPAYMENT or charge

Line 7086: RAISE FND_API.G_EXC_ERROR;

7082: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7083: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_AMT_NEG');
7084: FND_MSG_PUB.Add;
7085: END IF;
7086: RAISE FND_API.G_EXC_ERROR;
7087: END IF;
7088:
7089: IF (l_claim.amount > 0 AND
7090: (l_claim.claim_class = G_OVERPAYMENT_CLASS OR

Line 7096: RAISE FND_API.G_EXC_ERROR;

7092: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
7093: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_AMT_POS_OPM');
7094: FND_MSG_PUB.Add;
7095: END IF;
7096: RAISE FND_API.G_EXC_ERROR;
7097: END IF;
7098:
7099: -- if source_object_id is set, all info about source_object has to be set
7100: IF (l_claim.claim_class = G_DEDUCTION_CLASS AND

Line 7102: l_claim.source_object_id <> FND_API.G_MISS_NUM)) THEN

7098:
7099: -- if source_object_id is set, all info about source_object has to be set
7100: IF (l_claim.claim_class = G_DEDUCTION_CLASS AND
7101: (l_claim.source_object_id IS NOT NULL AND
7102: l_claim.source_object_id <> FND_API.G_MISS_NUM)) THEN
7103:
7104: IF ((l_claim.source_object_class IS NULL OR
7105: l_claim.source_object_class = FND_API.G_MISS_CHAR) OR
7106: (l_claim.source_object_type_id IS NULL OR

Line 7105: l_claim.source_object_class = FND_API.G_MISS_CHAR) OR

7101: (l_claim.source_object_id IS NOT NULL AND
7102: l_claim.source_object_id <> FND_API.G_MISS_NUM)) THEN
7103:
7104: IF ((l_claim.source_object_class IS NULL OR
7105: l_claim.source_object_class = FND_API.G_MISS_CHAR) OR
7106: (l_claim.source_object_type_id IS NULL OR
7107: l_claim.source_object_type_id = FND_API.G_MISS_NUM) OR
7108: (l_claim.source_object_number IS NULL OR
7109: l_claim.source_object_number = FND_API.G_MISS_CHAR)) THEN

Line 7107: l_claim.source_object_type_id = FND_API.G_MISS_NUM) OR

7103:
7104: IF ((l_claim.source_object_class IS NULL OR
7105: l_claim.source_object_class = FND_API.G_MISS_CHAR) OR
7106: (l_claim.source_object_type_id IS NULL OR
7107: l_claim.source_object_type_id = FND_API.G_MISS_NUM) OR
7108: (l_claim.source_object_number IS NULL OR
7109: l_claim.source_object_number = FND_API.G_MISS_CHAR)) THEN
7110:
7111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN

Line 7109: l_claim.source_object_number = FND_API.G_MISS_CHAR)) THEN

7105: l_claim.source_object_class = FND_API.G_MISS_CHAR) OR
7106: (l_claim.source_object_type_id IS NULL OR
7107: l_claim.source_object_type_id = FND_API.G_MISS_NUM) OR
7108: (l_claim.source_object_number IS NULL OR
7109: l_claim.source_object_number = FND_API.G_MISS_CHAR)) THEN
7110:
7111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7112: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SRC_INFO_MISSING');
7113: FND_MSG_PUB.add;

Line 7115: RAISE FND_API.g_exc_error;

7111: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7112: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_SRC_INFO_MISSING');
7113: FND_MSG_PUB.add;
7114: END IF;
7115: RAISE FND_API.g_exc_error;
7116: END IF;
7117: END IF;
7118:
7119: -- check payment_method

Line 7121: l_claim.payment_method <> FND_API.G_MISS_CHAR THEN

7117: END IF;
7118:
7119: -- check payment_method
7120: IF l_claim.payment_method IS NOT NULL AND
7121: l_claim.payment_method <> FND_API.G_MISS_CHAR THEN
7122:
7123: OPEN payment_method_csr(l_claim.payment_method);
7124: FETCH payment_method_csr into l_lookup_code_count;
7125: CLOSE payment_method_csr;

Line 7132: RAISE FND_API.g_exc_error;

7128: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7129: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_PAY_MTHD_WRG');
7130: FND_MSG_PUB.add;
7131: END IF;
7132: RAISE FND_API.g_exc_error;
7133: END IF;
7134: END IF;
7135:
7136: -- check pay_related_account_flag

Line 7138: l_claim.pay_related_account_flag <> FND_API.G_MISS_CHAR) THEN

7134: END IF;
7135:
7136: -- check pay_related_account_flag
7137: IF (l_claim.pay_related_account_flag IS NOT NULL AND
7138: l_claim.pay_related_account_flag <> FND_API.G_MISS_CHAR) THEN
7139:
7140: IF (l_claim.pay_related_account_flag <> 'F' AND
7141: l_claim.pay_related_account_flag <> 'T') THEN
7142:

Line 7147: RAISE FND_API.g_exc_error;

7143: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7144: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_PAY_REL_FLG_WRG');
7145: FND_MSG_PUB.add;
7146: END IF;
7147: RAISE FND_API.g_exc_error;
7148: END IF;
7149: END IF;
7150:
7151: -- check order_type_id

Line 7153: l_claim.order_type_id <> FND_API.G_MISS_NUM) THEN

7149: END IF;
7150:
7151: -- check order_type_id
7152: IF (l_claim.order_type_id IS NOT NULL AND
7153: l_claim.order_type_id <> FND_API.G_MISS_NUM) THEN
7154:
7155: OPEN order_type_count_csr(l_claim.order_type_id);
7156: FETCH order_type_count_csr into l_order_type_count;
7157: CLOSE order_type_count_csr;

Line 7163: RAISE FND_API.g_exc_error;

7159: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7160: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_ODTYPE_WRG');
7161: FND_MSG_PUB.add;
7162: END IF;
7163: RAISE FND_API.g_exc_error;
7164: END IF;
7165: END IF;
7166:
7167: -- Debug Message

Line 7175: p_encoded => FND_API.G_FALSE,

7171: FND_MSG_PUB.Add;
7172: END IF;
7173: --Standard call to get message count and if count=1, get the message
7174: FND_MSG_PUB.Count_And_Get (
7175: p_encoded => FND_API.G_FALSE,
7176: p_count => x_msg_count,
7177: p_data => x_msg_data
7178: );
7179: EXCEPTION

Line 7180: WHEN FND_API.G_EXC_ERROR THEN

7176: p_count => x_msg_count,
7177: p_data => x_msg_data
7178: );
7179: EXCEPTION
7180: WHEN FND_API.G_EXC_ERROR THEN
7181: ROLLBACK TO Validate_Claim_PVT;
7182: x_return_status := FND_API.G_RET_STS_ERROR;
7183: -- Standard call to get message count and if count=1, get the message
7184: FND_MSG_PUB.Count_And_Get (

Line 7182: x_return_status := FND_API.G_RET_STS_ERROR;

7178: );
7179: EXCEPTION
7180: WHEN FND_API.G_EXC_ERROR THEN
7181: ROLLBACK TO Validate_Claim_PVT;
7182: x_return_status := FND_API.G_RET_STS_ERROR;
7183: -- Standard call to get message count and if count=1, get the message
7184: FND_MSG_PUB.Count_And_Get (
7185: p_encoded => FND_API.G_FALSE,
7186: p_count => x_msg_count,

Line 7185: p_encoded => FND_API.G_FALSE,

7181: ROLLBACK TO Validate_Claim_PVT;
7182: x_return_status := FND_API.G_RET_STS_ERROR;
7183: -- Standard call to get message count and if count=1, get the message
7184: FND_MSG_PUB.Count_And_Get (
7185: p_encoded => FND_API.G_FALSE,
7186: p_count => x_msg_count,
7187: p_data => x_msg_data
7188: );
7189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 7189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7185: p_encoded => FND_API.G_FALSE,
7186: p_count => x_msg_count,
7187: p_data => x_msg_data
7188: );
7189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7190: ROLLBACK TO Validate_Claim_PVT;
7191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7192: -- Standard call to get message count and if count=1, get the message
7193: FND_MSG_PUB.Count_And_Get (

Line 7191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7187: p_data => x_msg_data
7188: );
7189: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7190: ROLLBACK TO Validate_Claim_PVT;
7191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7192: -- Standard call to get message count and if count=1, get the message
7193: FND_MSG_PUB.Count_And_Get (
7194: p_encoded => FND_API.G_FALSE,
7195: p_count => x_msg_count,

Line 7194: p_encoded => FND_API.G_FALSE,

7190: ROLLBACK TO Validate_Claim_PVT;
7191: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7192: -- Standard call to get message count and if count=1, get the message
7193: FND_MSG_PUB.Count_And_Get (
7194: p_encoded => FND_API.G_FALSE,
7195: p_count => x_msg_count,
7196: p_data => x_msg_data
7197: );
7198: WHEN OTHERS THEN

Line 7200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7196: p_data => x_msg_data
7197: );
7198: WHEN OTHERS THEN
7199: ROLLBACK TO Validate_Claim_PVT;
7200: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7201: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7202: THEN
7203: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7204: END IF;

Line 7207: p_encoded => FND_API.G_FALSE,

7203: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7204: END IF;
7205: -- Standard call to get message count and if count=1, get the message
7206: FND_MSG_PUB.Count_And_Get (
7207: p_encoded => FND_API.G_FALSE,
7208: p_count => x_msg_count,
7209: p_data => x_msg_data
7210: );
7211: END Validate_Claim;

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

7226: --
7227: ----------------------------------------------------------------------
7228: PROCEDURE Check_Claim_Common_Element (
7229: p_api_version IN NUMBER
7230: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7231: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7232: ,x_return_status OUT NOCOPY VARCHAR2
7233: ,x_msg_count OUT NOCOPY NUMBER
7234: ,x_msg_data OUT NOCOPY VARCHAR2

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

7227: ----------------------------------------------------------------------
7228: PROCEDURE Check_Claim_Common_Element (
7229: p_api_version IN NUMBER
7230: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7231: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7232: ,x_return_status OUT NOCOPY VARCHAR2
7233: ,x_msg_count OUT NOCOPY NUMBER
7234: ,x_msg_data OUT NOCOPY VARCHAR2
7235: ,p_claim IN claim_rec_type

Line 7290: IF NOT FND_API.Compatible_API_Call (

7286: BEGIN
7287: -- Standard begin of API savepoint
7288: SAVEPOINT Check_Clm_Cmn_Element_PVT;
7289: -- Standard call to check for call compatibility.
7290: IF NOT FND_API.Compatible_API_Call (
7291: l_api_version,
7292: p_api_version,
7293: l_api_name,
7294: G_PKG_NAME)

Line 7296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7292: p_api_version,
7293: l_api_name,
7294: G_PKG_NAME)
7295: THEN
7296: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7297: END IF;
7298:
7299: -- Debug Message
7300: IF OZF_DEBUG_LOW_ON THEN

Line 7307: IF FND_API.To_Boolean (p_init_msg_list) THEN

7303: FND_MSG_PUB.Add;
7304: END IF;
7305:
7306: --Initialize message list if p_init_msg_list is TRUE.
7307: IF FND_API.To_Boolean (p_init_msg_list) THEN
7308: FND_MSG_PUB.initialize;
7309: END IF;
7310:
7311: -- Initialize API return status to sucess

Line 7312: x_return_status := FND_API.G_RET_STS_SUCCESS;

7308: FND_MSG_PUB.initialize;
7309: END IF;
7310:
7311: -- Initialize API return status to sucess
7312: x_return_status := FND_API.G_RET_STS_SUCCESS;
7313:
7314:
7315: -- Begin of minimum required data for claims in general.
7316: -- We will check: claim_type_id, reason_code_id

Line 7322: -- l_claim.claim_type_id = FND_API.G_MISS_NUM THEN

7318: -- 11.5.10(uday) Removed check for Claim type id and Reason code id
7319: -- as these values are defaulted from Claim Defaults.
7320: -- Check claim_type_id
7321: -- IF l_claim.claim_type_id is NULL OR
7322: -- l_claim.claim_type_id = FND_API.G_MISS_NUM THEN
7323:
7324: -- OPEN claim_type_id_csr;
7325: -- FETCH claim_type_id_csr into l_claim.claim_type_id;
7326: -- CLOSE claim_type_id_csr;

Line 7332: -- RAISE FND_API.G_EXC_ERROR;

7328: -- IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
7329: -- FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CLAIM_TYPE_MISSING');
7330: -- FND_MSG_PUB.Add;
7331: -- END IF;
7332: -- RAISE FND_API.G_EXC_ERROR;
7333: -- END IF;
7334: -- ELSE
7335: -- -- check whether the claim_type_id is in the database.
7336: -- OPEN number_of_claim_type_id_csr(l_claim.claim_type_id);

Line 7345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7341: -- IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7342: -- FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CLAIM_TYPE_NOT_IN_DB');
7343: -- FND_MSG_PUB.add;
7344: -- END IF;
7345: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7346: -- END IF;
7347: -- END IF;
7348:
7349: -- -- Check reason_code_id

Line 7351: -- l_claim.reason_code_id = FND_API.G_MISS_NUM THEN

7347: -- END IF;
7348:
7349: -- -- Check reason_code_id
7350: -- IF l_claim.reason_code_id is NULL OR
7351: -- l_claim.reason_code_id = FND_API.G_MISS_NUM THEN
7352:
7353: -- ELSE
7354: -- check whether reason code exists
7355: -- OPEN number_of_reason_code_id_csr(l_claim.reason_code_id);

Line 7364: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7360: -- IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7361: -- FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_REASON_CD_NOT_IN_DB');
7362: -- FND_MSG_PUB.add;
7363: -- END IF;
7364: -- RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7365: -- END IF;
7366: -- END IF;
7367:
7368: -- Check cust_account_id

Line 7370: l_claim.cust_account_id = FND_API.G_MISS_NUM THEN

7366: -- END IF;
7367:
7368: -- Check cust_account_id
7369: IF l_claim.cust_account_id is NULL OR
7370: l_claim.cust_account_id = FND_API.G_MISS_NUM THEN
7371:
7372: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
7373: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CUST_ID_MISSING');
7374: FND_MSG_PUB.Add;

Line 7376: RAISE FND_API.G_EXC_ERROR;

7372: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.g_msg_lvl_error) THEN
7373: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_CUST_ID_MISSING');
7374: FND_MSG_PUB.Add;
7375: END IF;
7376: RAISE FND_API.G_EXC_ERROR;
7377: ELSE
7378: -- check whether the customer is in the database.
7379: OPEN num_of_cust_acctid_csr(l_claim.cust_account_id);
7380: FETCH num_of_cust_acctid_csr INTO l_number_of_cust;

Line 7388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7384: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
7385: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_CUST_NOT_IN_DB');
7386: FND_MSG_PUB.add;
7387: END IF;
7388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7389: END IF;
7390: END IF;
7391: -- End of minimum checking
7392:

Line 7414: IF l_return_status = FND_API.g_ret_sts_error THEN

7410: , x_write_off_flag => l_claim.write_off_flag
7411: , x_write_off_threshold_amount => l_claim.write_off_threshold_amount
7412: , x_under_write_off_threshold => l_claim.under_write_off_threshold
7413: ,x_return_status => l_return_status);
7414: IF l_return_status = FND_API.g_ret_sts_error THEN
7415: RAISE FND_API.g_exc_error;
7416: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7417: RAISE FND_API.g_exc_unexpected_error;
7418: END IF;

Line 7415: RAISE FND_API.g_exc_error;

7411: , x_write_off_threshold_amount => l_claim.write_off_threshold_amount
7412: , x_under_write_off_threshold => l_claim.under_write_off_threshold
7413: ,x_return_status => l_return_status);
7414: IF l_return_status = FND_API.g_ret_sts_error THEN
7415: RAISE FND_API.g_exc_error;
7416: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7417: RAISE FND_API.g_exc_unexpected_error;
7418: END IF;
7419: END IF;

Line 7416: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

7412: , x_under_write_off_threshold => l_claim.under_write_off_threshold
7413: ,x_return_status => l_return_status);
7414: IF l_return_status = FND_API.g_ret_sts_error THEN
7415: RAISE FND_API.g_exc_error;
7416: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7417: RAISE FND_API.g_exc_unexpected_error;
7418: END IF;
7419: END IF;
7420: -- -----------------------------------------------------------

Line 7417: RAISE FND_API.g_exc_unexpected_error;

7413: ,x_return_status => l_return_status);
7414: IF l_return_status = FND_API.g_ret_sts_error THEN
7415: RAISE FND_API.g_exc_error;
7416: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7417: RAISE FND_API.g_exc_unexpected_error;
7418: END IF;
7419: END IF;
7420: -- -----------------------------------------------------------
7421: -- End of Bug : 2710047

Line 7433: p_encoded => FND_API.G_FALSE,

7429: FND_MSG_PUB.Add;
7430: END IF;
7431: --Standard call to get message count and if count=1, get the message
7432: FND_MSG_PUB.Count_And_Get (
7433: p_encoded => FND_API.G_FALSE,
7434: p_count => x_msg_count,
7435: p_data => x_msg_data
7436: );
7437: EXCEPTION

Line 7438: WHEN FND_API.G_EXC_ERROR THEN

7434: p_count => x_msg_count,
7435: p_data => x_msg_data
7436: );
7437: EXCEPTION
7438: WHEN FND_API.G_EXC_ERROR THEN
7439: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7440: x_return_status := FND_API.G_RET_STS_ERROR;
7441: -- Standard call to get message count and if count=1, get the message
7442: FND_MSG_PUB.Count_And_Get (

Line 7440: x_return_status := FND_API.G_RET_STS_ERROR;

7436: );
7437: EXCEPTION
7438: WHEN FND_API.G_EXC_ERROR THEN
7439: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7440: x_return_status := FND_API.G_RET_STS_ERROR;
7441: -- Standard call to get message count and if count=1, get the message
7442: FND_MSG_PUB.Count_And_Get (
7443: p_encoded => FND_API.G_FALSE,
7444: p_count => x_msg_count,

Line 7443: p_encoded => FND_API.G_FALSE,

7439: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7440: x_return_status := FND_API.G_RET_STS_ERROR;
7441: -- Standard call to get message count and if count=1, get the message
7442: FND_MSG_PUB.Count_And_Get (
7443: p_encoded => FND_API.G_FALSE,
7444: p_count => x_msg_count,
7445: p_data => x_msg_data
7446: );
7447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 7447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7443: p_encoded => FND_API.G_FALSE,
7444: p_count => x_msg_count,
7445: p_data => x_msg_data
7446: );
7447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7448: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7450: -- Standard call to get message count and if count=1, get the message
7451: FND_MSG_PUB.Count_And_Get (

Line 7449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7445: p_data => x_msg_data
7446: );
7447: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7448: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7450: -- Standard call to get message count and if count=1, get the message
7451: FND_MSG_PUB.Count_And_Get (
7452: p_encoded => FND_API.G_FALSE,
7453: p_count => x_msg_count,

Line 7452: p_encoded => FND_API.G_FALSE,

7448: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7449: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7450: -- Standard call to get message count and if count=1, get the message
7451: FND_MSG_PUB.Count_And_Get (
7452: p_encoded => FND_API.G_FALSE,
7453: p_count => x_msg_count,
7454: p_data => x_msg_data
7455: );
7456: WHEN OTHERS THEN

Line 7458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7454: p_data => x_msg_data
7455: );
7456: WHEN OTHERS THEN
7457: ROLLBACK TO Check_Clm_Cmn_Element_PVT;
7458: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7459: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7460: THEN
7461: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7462: END IF;

Line 7465: p_encoded => FND_API.G_FALSE,

7461: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7462: END IF;
7463: -- Standard call to get message count and if count=1, get the message
7464: FND_MSG_PUB.Count_And_Get (
7465: p_encoded => FND_API.G_FALSE,
7466: p_count => x_msg_count,
7467: p_data => x_msg_data
7468: );
7469: END Check_Claim_Common_Element;

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

7484: -- Raise exception in case of duplicates.
7485: ---------------------------------------------------------------------
7486: PROCEDURE Create_Claim_tbl (
7487: p_api_version IN NUMBER
7488: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7489: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7490: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7491:
7492: ,x_return_status OUT NOCOPY VARCHAR2

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

7485: ---------------------------------------------------------------------
7486: PROCEDURE Create_Claim_tbl (
7487: p_api_version IN NUMBER
7488: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7489: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7490: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7491:
7492: ,x_return_status OUT NOCOPY VARCHAR2
7493: ,x_msg_data OUT NOCOPY VARCHAR2

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

7486: PROCEDURE Create_Claim_tbl (
7487: p_api_version IN NUMBER
7488: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7489: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7490: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7491:
7492: ,x_return_status OUT NOCOPY VARCHAR2
7493: ,x_msg_data OUT NOCOPY VARCHAR2
7494: ,x_msg_count OUT NOCOPY NUMBER

Line 7518: IF NOT FND_API.Compatible_API_Call (

7514: BEGIN
7515: -- Standard begin of API savepoint
7516: SAVEPOINT Create_Claim_Tbl_PVT;
7517: -- Standard call to check for call compatibility.
7518: IF NOT FND_API.Compatible_API_Call (
7519: l_api_version,
7520: p_api_version,
7521: l_api_name,
7522: G_PKG_NAME)

Line 7524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7520: p_api_version,
7521: l_api_name,
7522: G_PKG_NAME)
7523: THEN
7524: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7525: END IF;
7526: x_error_index := -1;
7527:
7528: -- Debug Message

Line 7536: IF FND_API.To_Boolean (p_init_msg_list) THEN

7532: FND_MSG_PUB.Add;
7533: END IF;
7534:
7535: --Initialize message list if p_init_msg_list is TRUE.
7536: IF FND_API.To_Boolean (p_init_msg_list) THEN
7537: FND_MSG_PUB.initialize;
7538: END IF;
7539:
7540: -- Initialize API return status to sucess

Line 7541: x_return_status := FND_API.G_RET_STS_SUCCESS;

7537: FND_MSG_PUB.initialize;
7538: END IF;
7539:
7540: -- Initialize API return status to sucess
7541: x_return_status := FND_API.G_RET_STS_SUCCESS;
7542:
7543: For i in 1..p_claim_tbl.count LOOP
7544:
7545: l_claim := p_claim_tbl(i);

Line 7550: p_init_msg_list => FND_API.G_FALSE,

7546:
7547: -- default claim_type_id, reason_code_id if necessary.
7548: OZF_claim_PVT.Check_Claim_Common_Element (
7549: p_api_version => 1.0,
7550: p_init_msg_list => FND_API.G_FALSE,
7551: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7552: x_Return_Status => l_return_status,
7553: x_Msg_Count => l_msg_count,
7554: x_Msg_Data => l_msg_data,

Line 7551: p_validation_level => FND_API.G_VALID_LEVEL_FULL,

7547: -- default claim_type_id, reason_code_id if necessary.
7548: OZF_claim_PVT.Check_Claim_Common_Element (
7549: p_api_version => 1.0,
7550: p_init_msg_list => FND_API.G_FALSE,
7551: p_validation_level => FND_API.G_VALID_LEVEL_FULL,
7552: x_Return_Status => l_return_status,
7553: x_Msg_Count => l_msg_count,
7554: x_Msg_Data => l_msg_data,
7555: p_claim => l_claim,

Line 7560: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

7556: x_claim => l_x_claim,
7557: p_mode => l_mode
7558: );
7559: -- Check return status from the above procedure call
7560: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7561: x_error_index := i;
7562: RAISE FND_API.G_EXC_ERROR;
7563: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7564: x_error_index := i;

Line 7562: RAISE FND_API.G_EXC_ERROR;

7558: );
7559: -- Check return status from the above procedure call
7560: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7561: x_error_index := i;
7562: RAISE FND_API.G_EXC_ERROR;
7563: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7564: x_error_index := i;
7565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7566: END IF;

Line 7563: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

7559: -- Check return status from the above procedure call
7560: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7561: x_error_index := i;
7562: RAISE FND_API.G_EXC_ERROR;
7563: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7564: x_error_index := i;
7565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7566: END IF;
7567:

Line 7565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7561: x_error_index := i;
7562: RAISE FND_API.G_EXC_ERROR;
7563: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7564: x_error_index := i;
7565: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7566: END IF;
7567:
7568: l_claim := l_x_claim;
7569:

Line 7574: l_claim.currency_code = FND_API.G_MISS_CHAR)THEN

7570: -- default currency code if necessary.
7571: -- Default the transaction currency code to functional currency code
7572: -- if it's null.
7573: IF (l_claim.currency_code is NULL OR
7574: l_claim.currency_code = FND_API.G_MISS_CHAR)THEN
7575: l_claim.currency_code := l_default_curr_code;
7576: END IF;
7577:
7578: -- l_claim.claim_class := G_CLAIM_CLASS;

Line 7584: P_Init_Msg_List => FND_API.G_FALSE,

7580: -- Calling Private package: Create_claim
7581: -- Hint: Primary key needs to be returned
7582: OZF_claim_PVT.Create_Claim(
7583: P_Api_Version => 1.0,
7584: P_Init_Msg_List => FND_API.G_FALSE,
7585: P_Commit => FND_API.G_FALSE,
7586: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
7587: X_Return_Status => l_return_status,
7588: X_Msg_Count => l_msg_count,

Line 7585: P_Commit => FND_API.G_FALSE,

7581: -- Hint: Primary key needs to be returned
7582: OZF_claim_PVT.Create_Claim(
7583: P_Api_Version => 1.0,
7584: P_Init_Msg_List => FND_API.G_FALSE,
7585: P_Commit => FND_API.G_FALSE,
7586: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
7587: X_Return_Status => l_return_status,
7588: X_Msg_Count => l_msg_count,
7589: X_Msg_Data => l_msg_data,

Line 7586: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,

7582: OZF_claim_PVT.Create_Claim(
7583: P_Api_Version => 1.0,
7584: P_Init_Msg_List => FND_API.G_FALSE,
7585: P_Commit => FND_API.G_FALSE,
7586: P_Validation_Level => FND_API.G_VALID_LEVEL_FULL,
7587: X_Return_Status => l_return_status,
7588: X_Msg_Count => l_msg_count,
7589: X_Msg_Data => l_msg_data,
7590: P_claim => l_claim,

Line 7595: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

7591: X_CLAIM_ID => l_claim_id
7592: );
7593:
7594: -- Check return status from the above procedure call
7595: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7596: x_error_index := i;
7597: RAISE FND_API.G_EXC_ERROR;
7598: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7599: x_error_index := i;

Line 7597: RAISE FND_API.G_EXC_ERROR;

7593:
7594: -- Check return status from the above procedure call
7595: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7596: x_error_index := i;
7597: RAISE FND_API.G_EXC_ERROR;
7598: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7599: x_error_index := i;
7600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7601: END IF;

Line 7598: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

7594: -- Check return status from the above procedure call
7595: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
7596: x_error_index := i;
7597: RAISE FND_API.G_EXC_ERROR;
7598: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7599: x_error_index := i;
7600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7601: END IF;
7602:

Line 7600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7596: x_error_index := i;
7597: RAISE FND_API.G_EXC_ERROR;
7598: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
7599: x_error_index := i;
7600: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7601: END IF;
7602:
7603: END LOOP;
7604:

Line 7613: p_encoded => FND_API.G_FALSE,

7609: FND_MSG_PUB.Add;
7610: END IF;
7611: --Standard call to get message count and if count=1, get the message
7612: FND_MSG_PUB.Count_And_Get (
7613: p_encoded => FND_API.G_FALSE,
7614: p_count => x_msg_count,
7615: p_data => x_msg_data
7616: );
7617: EXCEPTION

Line 7618: WHEN FND_API.G_EXC_ERROR THEN

7614: p_count => x_msg_count,
7615: p_data => x_msg_data
7616: );
7617: EXCEPTION
7618: WHEN FND_API.G_EXC_ERROR THEN
7619: ROLLBACK TO Create_Claim_Tbl_PVT;
7620: x_return_status := FND_API.G_RET_STS_ERROR;
7621: /* IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7622: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');

Line 7620: x_return_status := FND_API.G_RET_STS_ERROR;

7616: );
7617: EXCEPTION
7618: WHEN FND_API.G_EXC_ERROR THEN
7619: ROLLBACK TO Create_Claim_Tbl_PVT;
7620: x_return_status := FND_API.G_RET_STS_ERROR;
7621: /* IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7622: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7623: FND_MESSAGE.Set_Token('ROW',l_err_row);
7624: FND_MSG_PUB.Add;

Line 7629: p_encoded => FND_API.G_FALSE,

7625: END IF;
7626: */
7627: -- Standard call to get message count and if count=1, get the message
7628: FND_MSG_PUB.Count_And_Get (
7629: p_encoded => FND_API.G_FALSE,
7630: p_count => x_msg_count,
7631: p_data => x_msg_data
7632: );
7633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 7633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7629: p_encoded => FND_API.G_FALSE,
7630: p_count => x_msg_count,
7631: p_data => x_msg_data
7632: );
7633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7634: ROLLBACK TO Create_Claim_Tbl_PVT;
7635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7636: /* IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7637: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');

Line 7635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7631: p_data => x_msg_data
7632: );
7633: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7634: ROLLBACK TO Create_Claim_Tbl_PVT;
7635: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7636: /* IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7637: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7638: FND_MESSAGE.Set_Token('ROW',l_err_row);
7639: FND_MSG_PUB.Add;

Line 7644: p_encoded => FND_API.G_FALSE,

7640: END IF;
7641: */
7642: -- Standard call to get message count and if count=1, get the message
7643: FND_MSG_PUB.Count_And_Get (
7644: p_encoded => FND_API.G_FALSE,
7645: p_count => x_msg_count,
7646: p_data => x_msg_data
7647: );
7648: WHEN OTHERS THEN

Line 7650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7646: p_data => x_msg_data
7647: );
7648: WHEN OTHERS THEN
7649: ROLLBACK TO Create_Claim_Tbl_PVT;
7650: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7651: /* IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
7652: THEN
7653: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7654: FND_MESSAGE.Set_Token('ROW',l_err_row);

Line 7659: p_encoded => FND_API.G_FALSE,

7655: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7656: END IF;
7657: */ -- Standard call to get message count and if count=1, get the message
7658: FND_MSG_PUB.Count_And_Get (
7659: p_encoded => FND_API.G_FALSE,
7660: p_count => x_msg_count,
7661: p_data => x_msg_data
7662: );
7663: END Create_Claim_tbl;

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

7686: --
7687: ---------------------------------------------------------------------
7688: PROCEDURE Update_Claim_tbl (
7689: p_api_version IN NUMBER
7690: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7691: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7692: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7693:
7694: ,x_return_status OUT NOCOPY VARCHAR2

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

7687: ---------------------------------------------------------------------
7688: PROCEDURE Update_Claim_tbl (
7689: p_api_version IN NUMBER
7690: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7691: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7692: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7693:
7694: ,x_return_status OUT NOCOPY VARCHAR2
7695: ,x_msg_data OUT NOCOPY VARCHAR2

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

7688: PROCEDURE Update_Claim_tbl (
7689: p_api_version IN NUMBER
7690: ,p_init_msg_list IN VARCHAR2 := FND_API.G_FALSE
7691: ,p_commit IN VARCHAR2 := FND_API.G_FALSE
7692: ,p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL
7693:
7694: ,x_return_status OUT NOCOPY VARCHAR2
7695: ,x_msg_data OUT NOCOPY VARCHAR2
7696: ,x_msg_count OUT NOCOPY NUMBER

Line 7719: IF NOT FND_API.Compatible_API_Call (

7715: BEGIN
7716: -- Standard begin of API savepoint
7717: SAVEPOINT Update_Claim_Tbl_PVT;
7718: -- Standard call to check for call compatibility.
7719: IF NOT FND_API.Compatible_API_Call (
7720: l_api_version,
7721: p_api_version,
7722: l_api_name,
7723: G_PKG_NAME) THEN

Line 7724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

7720: l_api_version,
7721: p_api_version,
7722: l_api_name,
7723: G_PKG_NAME) THEN
7724: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
7725: END IF;
7726:
7727: -- Debug Message
7728: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_DEBUG_LOW) THEN

Line 7735: IF FND_API.To_Boolean (p_init_msg_list) THEN

7731: FND_MSG_PUB.Add;
7732: END IF;
7733:
7734: --Initialize message list if p_init_msg_list is TRUE.
7735: IF FND_API.To_Boolean (p_init_msg_list) THEN
7736: FND_MSG_PUB.initialize;
7737: END IF;
7738:
7739: -- Initialize API return status to sucess

Line 7740: x_return_status := FND_API.G_RET_STS_SUCCESS;

7736: FND_MSG_PUB.initialize;
7737: END IF;
7738:
7739: -- Initialize API return status to sucess
7740: x_return_status := FND_API.G_RET_STS_SUCCESS;
7741:
7742: For i in 1..p_claim_tbl.count LOOP
7743: l_claim := p_claim_tbl(i);
7744:

Line 7753: RAISE FND_API.G_EXC_ERROR;

7749: FND_MESSAGE.Set_Name('OZF', 'OZF_CLAIM_API_NO_OPEN_STATUS');
7750: FND_MESSAGE.Set_Token('ROW',l_err_row);
7751: FND_MSG_PUB.ADD;
7752: END IF;
7753: RAISE FND_API.G_EXC_ERROR;
7754: END IF;
7755:
7756: -- If incoming value for write-off flag is unchecked then set the values in database is 'N'.
7757: IF (l_claim.write_off_flag is NULL OR

Line 7758: l_claim.write_off_flag = FND_API.G_MISS_CHAR)THEN

7754: END IF;
7755:
7756: -- If incoming value for write-off flag is unchecked then set the values in database is 'N'.
7757: IF (l_claim.write_off_flag is NULL OR
7758: l_claim.write_off_flag = FND_API.G_MISS_CHAR)THEN
7759: l_claim.write_off_flag := 'F';
7760: END IF;
7761:
7762: -- Calling Private package: Update_claim

Line 7765: ,p_init_msg_list => FND_API.G_FALSE

7761:
7762: -- Calling Private package: Update_claim
7763: OZF_claim_PVT.Update_Claim (
7764: p_api_version => l_api_version
7765: ,p_init_msg_list => FND_API.G_FALSE
7766: ,p_commit => FND_API.G_FALSE
7767: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
7768: ,x_return_status => l_return_status
7769: ,x_msg_data => l_msg_data

Line 7766: ,p_commit => FND_API.G_FALSE

7762: -- Calling Private package: Update_claim
7763: OZF_claim_PVT.Update_Claim (
7764: p_api_version => l_api_version
7765: ,p_init_msg_list => FND_API.G_FALSE
7766: ,p_commit => FND_API.G_FALSE
7767: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
7768: ,x_return_status => l_return_status
7769: ,x_msg_data => l_msg_data
7770: ,x_msg_count => l_msg_count

Line 7767: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL

7763: OZF_claim_PVT.Update_Claim (
7764: p_api_version => l_api_version
7765: ,p_init_msg_list => FND_API.G_FALSE
7766: ,p_commit => FND_API.G_FALSE
7767: ,p_validation_level => FND_API.G_VALID_LEVEL_FULL
7768: ,x_return_status => l_return_status
7769: ,x_msg_data => l_msg_data
7770: ,x_msg_count => l_msg_count
7771: ,p_claim => l_claim

Line 7777: IF l_return_status = FND_API.g_ret_sts_error THEN

7773: ,p_mode => OZF_claim_Utility_pvt.G_AUTO_MODE
7774: ,x_object_version_number => l_object_version_number
7775: );
7776:
7777: IF l_return_status = FND_API.g_ret_sts_error THEN
7778: l_err_row := i;
7779: RAISE FND_API.g_exc_error;
7780: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7781: l_err_row := i;

Line 7779: RAISE FND_API.g_exc_error;

7775: );
7776:
7777: IF l_return_status = FND_API.g_ret_sts_error THEN
7778: l_err_row := i;
7779: RAISE FND_API.g_exc_error;
7780: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7781: l_err_row := i;
7782: RAISE FND_API.g_exc_unexpected_error;
7783: END IF;

Line 7780: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN

7776:
7777: IF l_return_status = FND_API.g_ret_sts_error THEN
7778: l_err_row := i;
7779: RAISE FND_API.g_exc_error;
7780: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7781: l_err_row := i;
7782: RAISE FND_API.g_exc_unexpected_error;
7783: END IF;
7784: END LOOP;

Line 7782: RAISE FND_API.g_exc_unexpected_error;

7778: l_err_row := i;
7779: RAISE FND_API.g_exc_error;
7780: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
7781: l_err_row := i;
7782: RAISE FND_API.g_exc_unexpected_error;
7783: END IF;
7784: END LOOP;
7785:
7786: -- Debug Message

Line 7794: p_encoded => FND_API.G_FALSE,

7790: FND_MSG_PUB.Add;
7791: END IF;
7792: --Standard call to get message count and if count=1, get the message
7793: FND_MSG_PUB.Count_And_Get (
7794: p_encoded => FND_API.G_FALSE,
7795: p_count => x_msg_count,
7796: p_data => x_msg_data
7797: );
7798: EXCEPTION

Line 7799: WHEN FND_API.G_EXC_ERROR THEN

7795: p_count => x_msg_count,
7796: p_data => x_msg_data
7797: );
7798: EXCEPTION
7799: WHEN FND_API.G_EXC_ERROR THEN
7800: ROLLBACK TO Update_Claim_Tbl_PVT;
7801: x_return_status := FND_API.G_RET_STS_ERROR;
7802: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7803: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');

Line 7801: x_return_status := FND_API.G_RET_STS_ERROR;

7797: );
7798: EXCEPTION
7799: WHEN FND_API.G_EXC_ERROR THEN
7800: ROLLBACK TO Update_Claim_Tbl_PVT;
7801: x_return_status := FND_API.G_RET_STS_ERROR;
7802: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7803: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7804: FND_MESSAGE.Set_Token('ROW',l_err_row);
7805: FND_MSG_PUB.Add;

Line 7809: p_encoded => FND_API.G_FALSE,

7805: FND_MSG_PUB.Add;
7806: END IF;
7807: -- Standard call to get message count and if count=1, get the message
7808: FND_MSG_PUB.Count_And_Get (
7809: p_encoded => FND_API.G_FALSE,
7810: p_count => x_msg_count,
7811: p_data => x_msg_data
7812: );
7813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

Line 7813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

7809: p_encoded => FND_API.G_FALSE,
7810: p_count => x_msg_count,
7811: p_data => x_msg_data
7812: );
7813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7814: ROLLBACK TO Update_Claim_Tbl_PVT;
7815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7816: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7817: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');

Line 7815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7811: p_data => x_msg_data
7812: );
7813: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
7814: ROLLBACK TO Update_Claim_Tbl_PVT;
7815: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7816: IF FND_MSG_PUB.Check_Msg_level (FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7817: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7818: FND_MESSAGE.Set_Token('ROW',l_err_row);
7819: FND_MSG_PUB.Add;

Line 7823: p_encoded => FND_API.G_FALSE,

7819: FND_MSG_PUB.Add;
7820: END IF;
7821: -- Standard call to get message count and if count=1, get the message
7822: FND_MSG_PUB.Count_And_Get (
7823: p_encoded => FND_API.G_FALSE,
7824: p_count => x_msg_count,
7825: p_data => x_msg_data
7826: );
7827: WHEN OTHERS THEN

Line 7829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

7825: p_data => x_msg_data
7826: );
7827: WHEN OTHERS THEN
7828: ROLLBACK TO Update_Claim_Tbl_PVT;
7829: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
7830: IF FND_MSG_PUB.Check_Msg_Level ( FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
7831: FND_MESSAGE.Set_Name('OZF','OZF_CLAIM_TBL_ERR');
7832: FND_MESSAGE.Set_Token('ROW',l_err_row);
7833: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);

Line 7837: p_encoded => FND_API.G_FALSE,

7833: FND_MSG_PUB.Add_Exc_Msg( G_PKG_NAME,l_api_name);
7834: END IF;
7835: -- Standard call to get message count and if count=1, get the message
7836: FND_MSG_PUB.Count_And_Get (
7837: p_encoded => FND_API.G_FALSE,
7838: p_count => x_msg_count,
7839: p_data => x_msg_data
7840: );
7841: END Update_Claim_tbl;