DBA Data[Home] [Help]

APPS.OZF_CLAIM_PVT dependencies on OZF_UTILITY_PVT

Line 1206: ozf_utility_PVT.debug_message('winner count:' || l_gen_return_Rec.terr_id.count );

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 );
1207: END IF;
1208: IF (l_gen_return_Rec.terr_id.LAST >= 1) THEN
1209:
1210: -- For the list of winners, we need to do two things.

Line 1221: ozf_utility_PVT.debug_message('winner :'||i||' resource_id:' || l_gen_return_Rec.resource_id(i) );

1217: l_access_list(i).arc_act_access_to_object := G_CLAIM_OBJECT_TYPE;
1218: l_access_list(i).user_or_role_id := l_gen_return_Rec.RESOURCE_ID(i);
1219:
1220: IF OZF_DEBUG_HIGH_ON THEN
1221: ozf_utility_PVT.debug_message('winner :'||i||' resource_id:' || l_gen_return_Rec.resource_id(i) );
1222: ozf_utility_PVT.debug_message('winner :'||i||' type:' || l_gen_return_Rec.resource_type(i) );
1223: ozf_utility_PVT.debug_message('winner :'||i||' group_id:' || l_gen_return_Rec.group_id(i) );
1224: END IF;
1225:

Line 1222: ozf_utility_PVT.debug_message('winner :'||i||' type:' || l_gen_return_Rec.resource_type(i) );

1218: l_access_list(i).user_or_role_id := l_gen_return_Rec.RESOURCE_ID(i);
1219:
1220: IF OZF_DEBUG_HIGH_ON THEN
1221: ozf_utility_PVT.debug_message('winner :'||i||' resource_id:' || l_gen_return_Rec.resource_id(i) );
1222: ozf_utility_PVT.debug_message('winner :'||i||' type:' || l_gen_return_Rec.resource_type(i) );
1223: ozf_utility_PVT.debug_message('winner :'||i||' group_id:' || l_gen_return_Rec.group_id(i) );
1224: END IF;
1225:
1226: l_access_list(i).admin_flag := 'N';

Line 1223: ozf_utility_PVT.debug_message('winner :'||i||' group_id:' || l_gen_return_Rec.group_id(i) );

1219:
1220: IF OZF_DEBUG_HIGH_ON THEN
1221: ozf_utility_PVT.debug_message('winner :'||i||' resource_id:' || l_gen_return_Rec.resource_id(i) );
1222: ozf_utility_PVT.debug_message('winner :'||i||' type:' || l_gen_return_Rec.resource_type(i) );
1223: ozf_utility_PVT.debug_message('winner :'||i||' group_id:' || l_gen_return_Rec.group_id(i) );
1224: END IF;
1225:
1226: l_access_list(i).admin_flag := 'N';
1227: l_access_list(i).owner_flag := 'N';

Line 1293: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' category:' || l_group_member_list(i).category );

1289: ---pick one person from the group to be the owner.
1290: l_access_list_index := l_access_list.LAST;
1291: For i in 1..l_group_member_list.LAST LOOP
1292: IF OZF_DEBUG_HIGH_ON THEN
1293: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' category:' || l_group_member_list(i).category );
1294: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' resource_id:' || l_group_member_list(i).resource_id );
1295: END IF;
1296:
1297: IF l_group_member_list(i).category = G_EMPLOYEE_CAT THEN

Line 1294: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' resource_id:' || l_group_member_list(i).resource_id );

1290: l_access_list_index := l_access_list.LAST;
1291: For i in 1..l_group_member_list.LAST LOOP
1292: IF OZF_DEBUG_HIGH_ON THEN
1293: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' category:' || l_group_member_list(i).category );
1294: ozf_utility_PVT.debug_message('l_group_member_list :'||i||' resource_id:' || l_group_member_list(i).resource_id );
1295: END IF;
1296:
1297: IF l_group_member_list(i).category = G_EMPLOYEE_CAT THEN
1298: x_owner_id := l_group_member_list(i).resource_id;

Line 1307: ozf_utility_PVT.debug_message('end of assign');

1303: l_access_list(l_access_list_index).owner_flag := 'Y';
1304: l_access_list(l_access_list_index).arc_user_or_role_type := 'USER';
1305:
1306: IF OZF_DEBUG_HIGH_ON THEN
1307: ozf_utility_PVT.debug_message('end of assign');
1308: END IF;
1309: exit;
1310: END IF;
1311: END LOOP;

Line 1728: ozf_utility_PVT.debug_message('rate_type:'||l_exchange_rate_type);

1724: l_exchange_rate_date := SYSDATE;
1725: END IF;
1726:
1727: IF OZF_DEBUG_HIGH_ON THEN
1728: ozf_utility_PVT.debug_message('rate_type:'||l_exchange_rate_type);
1729: END IF;
1730:
1731: IF (l_amount <> 0) THEN
1732: OZF_UTILITY_PVT.Convert_Currency(

Line 1732: OZF_UTILITY_PVT.Convert_Currency(

1728: ozf_utility_PVT.debug_message('rate_type:'||l_exchange_rate_type);
1729: END IF;
1730:
1731: IF (l_amount <> 0) THEN
1732: OZF_UTILITY_PVT.Convert_Currency(
1733: P_SET_OF_BOOKS_ID => l_set_of_books_id,
1734: P_FROM_CURRENCY => l_currency_code,
1735: P_CONVERSION_DATE => l_exchange_rate_date,
1736: P_CONVERSION_TYPE => l_exchange_rate_type,

Line 1756: l_acctd_amount := OZF_UTILITY_PVT.CurrRound(l_acctd_amount, l_functional_currency_code);

1752: l_acctd_amount := l_amount;
1753: END IF;
1754: --Round off the amount and acctd_amount according to the currency.
1755: --As threshold amounts are stored in functional currency, we need to round off by functional currency code.
1756: l_acctd_amount := OZF_UTILITY_PVT.CurrRound(l_acctd_amount, l_functional_currency_code);
1757: ELSE --else of IF (l_claim.currency_code <> l_functional_currency_code)
1758: l_acctd_amount := l_amount;
1759: l_exchange_rate_type := null;
1760: l_exchange_rate_date := null;

Line 3622: ozf_utility_PVT.debug_message('legal_entity_id:'||l_claim.legal_entity_id);

3618: l_claim.legal_entity_id := FND_PROFILE.VALUE('OZF_DEFAULT_LE_FOR_CLAIM');
3619: END IF;
3620:
3621: IF OZF_DEBUG_HIGH_ON THEN
3622: ozf_utility_PVT.debug_message('legal_entity_id:'||l_claim.legal_entity_id);
3623: END IF;
3624:
3625: -- BUG 4600325 is fixed.
3626: IF l_claim.legal_entity_id is NULL OR

Line 3724: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(

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: )
3728: );

Line 3848: l_access_list(l_last_index).user_or_role_id := OZF_UTILITY_PVT.get_resource_id(FND_GLOBAL.user_id) ;

3844: END IF;
3845:
3846: IF l_claim.created_from = 'MASS_CREATE' THEN
3847: l_access_list(l_last_index).arc_act_access_to_object := G_CLAIM_OBJECT_TYPE;
3848: l_access_list(l_last_index).user_or_role_id := OZF_UTILITY_PVT.get_resource_id(FND_GLOBAL.user_id) ;
3849: l_access_list(l_last_index).arc_user_or_role_type := 'USER';
3850: l_access_list(l_last_index).admin_flag := 'Y';
3851: l_access_list(l_last_index).owner_flag := 'N';
3852: l_access_list(l_last_index).act_access_to_object_id := l_claim_id;

Line 3914: ozf_utility_PVT.debug_message('rate_type:'||l_claim.exchange_rate_type);

3910: l_claim.exchange_rate :=1;
3911: END IF;
3912:
3913: IF OZF_DEBUG_HIGH_ON THEN
3914: ozf_utility_PVT.debug_message('rate_type:'||l_claim.exchange_rate_type);
3915: END IF;
3916:
3917: IF (l_claim.amount <> 0 )THEN
3918: OZF_UTILITY_PVT.Convert_Currency(

Line 3918: OZF_UTILITY_PVT.Convert_Currency(

3914: ozf_utility_PVT.debug_message('rate_type:'||l_claim.exchange_rate_type);
3915: END IF;
3916:
3917: IF (l_claim.amount <> 0 )THEN
3918: OZF_UTILITY_PVT.Convert_Currency(
3919: P_SET_OF_BOOKS_ID => l_claim.set_of_books_id,
3920: P_FROM_CURRENCY => l_claim.currency_code,
3921: P_CONVERSION_DATE => l_claim.exchange_rate_date,
3922: P_CONVERSION_TYPE => l_claim.exchange_rate_type,

Line 3942: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);

3938: l_claim.acctd_amount_remaining := l_claim.amount;
3939: END IF;
3940:
3941: -- We need to round the amount and account_amount according to the currency.
3942: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
3943: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
3944: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);
3945: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_functional_currency_code);
3946:

Line 3943: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);

3939: END IF;
3940:
3941: -- We need to round the amount and account_amount according to the currency.
3942: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
3943: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
3944: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);
3945: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_functional_currency_code);
3946:
3947:

Line 3944: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);

3940:
3941: -- We need to round the amount and account_amount according to the currency.
3942: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
3943: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
3944: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);
3945: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_functional_currency_code);
3946:
3947:
3948: --Default the Claim_id only if the in coming claim_id is null.

Line 3945: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_functional_currency_code);

3941: -- We need to round the amount and account_amount according to the currency.
3942: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
3943: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
3944: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);
3945: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_functional_currency_code);
3946:
3947:
3948: --Default the Claim_id only if the in coming claim_id is null.
3949: IF l_claim.claim_id is NULL

Line 4346: -- x_dependent_object_tbl OUT ozf_utility_pvt.dependent_objects_tbl_type

4342: --
4343: -- PARAMETERS
4344: -- p_object_id IN NUMBER,
4345: -- p_object_version_number IN NUMBER,
4346: -- x_dependent_object_tbl OUT ozf_utility_pvt.dependent_objects_tbl_type
4347: --
4348: -- We will only delete claim with status of NEW. At this stage, all dependent objects
4349: -- are deleteable and we don't have to worry about split and duplications.
4350: -- Also noted, we have not implemented Attachments and NOTES so far. Nor have I found

Line 5464: P_user_id => OZF_UTILITY_PVT.get_resource_id(NVL(FND_GLOBAL.user_id,-1)),

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,
5466: X_Msg_Count => l_msg_count,
5467: X_Msg_Data => l_msg_data,
5468: X_access => l_access);

Line 5492: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(

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;
5491: ELSE
5492: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(
5493: P_STATUS_TYPE=> G_CLAIM_STATUS,
5494: P_STATUS_CODE=> l_claim.status_code
5495: )
5496: );

Line 5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);

5556: l_claim := l_complete_claim;
5557:
5558: -- check amount first, throw any error if amount for deduction is changed.
5559: -- round the amount first
5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);

Line 5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);

5557:
5558: -- check amount first, throw any error if amount for deduction is changed.
5559: -- round the amount first
5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);
5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);

Line 5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);

5558: -- check amount first, throw any error if amount for deduction is changed.
5559: -- round the amount first
5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);
5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);
5566:

Line 5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);

5559: -- round the amount first
5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);
5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);
5566:
5567: -- Calculate currency conversions if amount is changed

Line 5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);

5560: l_claim.amount := OZF_UTILITY_PVT.CurrRound(l_claim.amount, l_claim.currency_code);
5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);
5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);
5566:
5567: -- Calculate currency conversions if amount is changed
5568: check_amount(

Line 5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);

5561: l_claim.amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.amount_adjusted, l_claim.currency_code);
5562: l_claim.amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.amount_settled, l_claim.currency_code);
5563: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
5564: -- l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount, l_claim.currency_code);
5565: -- l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining, l_claim.currency_code);
5566:
5567: -- Calculate currency conversions if amount is changed
5568: check_amount(
5569: p_claim => l_claim,

Line 5647: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(

5643: -- default user_status_id.
5644: IF l_old_status_code <> l_claim.status_code AND
5645: l_old_user_status_id = l_claim.user_status_id THEN
5646:
5647: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(
5648: P_STATUS_TYPE=> G_CLAIM_STATUS,
5649: P_STATUS_CODE=> l_claim.status_code)
5650: );
5651: END IF;

Line 5898: OZF_UTILITY_PVT.Convert_Currency(

5894: l_claim.exchange_rate :=1;
5895: END IF;
5896:
5897: -- Convert amount now
5898: OZF_UTILITY_PVT.Convert_Currency(
5899: P_SET_OF_BOOKS_ID => l_claim.set_of_books_id,
5900: P_FROM_CURRENCY => l_claim.currency_code,
5901: P_CONVERSION_DATE => l_claim.exchange_rate_date,
5902: P_CONVERSION_TYPE => l_claim.exchange_rate_type,

Line 5918: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);

5914: l_claim.exchange_rate := l_rate;
5915: l_claim.ACCTD_AMOUNT := l_acc_amount;
5916:
5917: -- We need to round the amount and account_amount according to the currency.
5918: l_claim.acctd_amount := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount,l_functional_currency_code);
5919:
5920: -- get claim_lines_sum
5921: OPEN claim_currency_amount_sum_csr(l_claim.claim_id);
5922: FETCH claim_currency_amount_sum_csr INTO l_claim_lines_sum;

Line 5930: --l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_functional_currency_code);

5926: l_claim_lines_sum := 0;
5927: ELSE
5928: -- [BEGIN FIX 04/29/02] mchang: claim_currency_amount in claim lines is stored as claim currency code
5929: -- not functional currency code.
5930: --l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_functional_currency_code);
5931: l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_claim.currency_code);
5932: -- [END FIX 04/29/02] mchang:
5933: END IF;
5934:

Line 5931: l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_claim.currency_code);

5927: ELSE
5928: -- [BEGIN FIX 04/29/02] mchang: claim_currency_amount in claim lines is stored as claim currency code
5929: -- not functional currency code.
5930: --l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_functional_currency_code);
5931: l_claim_lines_sum := OZF_UTILITY_PVT.CurrRound(l_claim_lines_sum, l_claim.currency_code);
5932: -- [END FIX 04/29/02] mchang:
5933: END IF;
5934:
5935: -- if amount_adjusted = amount then change the status to cancell;

Line 5939: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(

5935: -- if amount_adjusted = amount then change the status to cancell;
5936: -- This will happen if we split all the amount of a claim to its children.
5937: IF l_claim.amount = l_claim.amount_adjusted THEN
5938: l_claim.status_code := G_CANCELLED_STATUS;
5939: l_claim.user_status_id := to_number( ozf_utility_pvt.GET_DEFAULT_USER_STATUS(
5940: P_STATUS_TYPE=> G_CLAIM_STATUS,
5941: P_STATUS_CODE=> G_CANCELLED_STATUS
5942: )
5943: );

Line 5957: OZF_Utility_PVT.debug_message('UC:STEP 0: Before amount_remaining:'||l_claim.amount_remaining);

5953: l_tax_amount := 0;
5954: END IF;
5955:
5956: IF OZF_DEBUG_HIGH_ON THEN
5957: OZF_Utility_PVT.debug_message('UC:STEP 0: Before amount_remaining:'||l_claim.amount_remaining);
5958: END IF;
5959: l_claim.amount_remaining := l_claim.amount - l_claim.amount_adjusted - l_claim.amount_settled- l_tax_amount;
5960:
5961: IF OZF_DEBUG_HIGH_ON THEN

Line 5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);

5958: END IF;
5959: l_claim.amount_remaining := l_claim.amount - l_claim.amount_adjusted - l_claim.amount_settled- l_tax_amount;
5960:
5961: IF OZF_DEBUG_HIGH_ON THEN
5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);
5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);
5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);
5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);
5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );

Line 5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);

5959: l_claim.amount_remaining := l_claim.amount - l_claim.amount_adjusted - l_claim.amount_settled- l_tax_amount;
5960:
5961: IF OZF_DEBUG_HIGH_ON THEN
5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);
5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);
5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);
5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);
5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );
5967: END IF;

Line 5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);

5960:
5961: IF OZF_DEBUG_HIGH_ON THEN
5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);
5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);
5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);
5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);
5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );
5967: END IF;
5968: -- Raise an error if amount_remaining < claim_lines_sum

Line 5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);

5961: IF OZF_DEBUG_HIGH_ON THEN
5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);
5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);
5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);
5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);
5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );
5967: END IF;
5968: -- Raise an error if amount_remaining < claim_lines_sum
5969: -- [BEGIN FIX 04/29/02] mchang: Add ABS function for claim and line amount checking in case of overpayment.

Line 5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );

5962: OZF_Utility_PVT.debug_message('UC:STEP 1: After amount_remaining:'||l_claim.amount_remaining);
5963: OZF_Utility_PVT.debug_message('UC:STEP 2: amount_adjusted:'||l_claim.amount_adjusted);
5964: OZF_Utility_PVT.debug_message('UC:STEP 3: amount_settled:'||l_claim.amount_settled);
5965: OZF_Utility_PVT.debug_message('UC:STEP 4: l_tax_amount:'||l_tax_amount);
5966: OZF_Utility_PVT.debug_message('UC:STEP 2: lines_sum: '||l_claim_lines_sum );
5967: END IF;
5968: -- Raise an error if amount_remaining < claim_lines_sum
5969: -- [BEGIN FIX 04/29/02] mchang: Add ABS function for claim and line amount checking in case of overpayment.
5970: -- [BEGIN FIX 05/08/02] mchang: the amount_remaining checking is not doing when claim status is from PENDING_CLOSE to CLOSED.

Line 5991: OZF_UTILITY_PVT.Convert_Currency(

5987: END IF; --End of relaxation.
5988:
5989: -- convert amount_remaing.
5990: l_acc_amount := null;
5991: OZF_UTILITY_PVT.Convert_Currency(
5992: P_SET_OF_BOOKS_ID => l_claim.set_of_books_id,
5993: P_FROM_CURRENCY => l_claim.currency_code,
5994: P_CONVERSION_DATE => l_claim.exchange_rate_date,
5995: P_CONVERSION_TYPE => l_claim.exchange_rate_type,

Line 6009: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);

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);
6010: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining,l_functional_currency_code);
6011:
6012: IF OZF_DEBUG_HIGH_ON THEN
6013: OZF_Utility_PVT.debug_message('UC:AJ STEP 11: After amount_remaining:'||l_claim.amount_remaining);

Line 6010: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining,l_functional_currency_code);

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);
6010: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining,l_functional_currency_code);
6011:
6012: IF OZF_DEBUG_HIGH_ON THEN
6013: OZF_Utility_PVT.debug_message('UC:AJ STEP 11: After amount_remaining:'||l_claim.amount_remaining);
6014: END IF;

Line 6013: OZF_Utility_PVT.debug_message('UC:AJ STEP 11: After amount_remaining:'||l_claim.amount_remaining);

6009: l_claim.amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.amount_remaining, l_claim.currency_code);
6010: l_claim.acctd_amount_remaining := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_remaining,l_functional_currency_code);
6011:
6012: IF OZF_DEBUG_HIGH_ON THEN
6013: OZF_Utility_PVT.debug_message('UC:AJ STEP 11: After amount_remaining:'||l_claim.amount_remaining);
6014: END IF;
6015:
6016: -- convert amount_settled.
6017: l_acc_amount := null;

Line 6018: OZF_UTILITY_PVT.Convert_Currency(

6014: END IF;
6015:
6016: -- convert amount_settled.
6017: l_acc_amount := null;
6018: OZF_UTILITY_PVT.Convert_Currency(
6019: P_SET_OF_BOOKS_ID => l_claim.set_of_books_id,
6020: P_FROM_CURRENCY => l_claim.currency_code,
6021: P_CONVERSION_DATE => l_claim.exchange_rate_date,
6022: P_CONVERSION_TYPE => l_claim.exchange_rate_type,

Line 6036: l_claim.acctd_amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_settled,l_functional_currency_code);

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);
6037:
6038: -- convert amount_adjusted.
6039: l_acc_amount := null;
6040: OZF_UTILITY_PVT.Convert_Currency(

Line 6040: OZF_UTILITY_PVT.Convert_Currency(

6036: l_claim.acctd_amount_settled := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_settled,l_functional_currency_code);
6037:
6038: -- convert amount_adjusted.
6039: l_acc_amount := null;
6040: OZF_UTILITY_PVT.Convert_Currency(
6041: P_SET_OF_BOOKS_ID => l_claim.set_of_books_id,
6042: P_FROM_CURRENCY => l_claim.currency_code,
6043: P_CONVERSION_DATE => l_claim.exchange_rate_date,
6044: P_CONVERSION_TYPE => l_claim.exchange_rate_type,

Line 6058: l_claim.acctd_amount_adjusted := OZF_UTILITY_PVT.CurrRound(l_claim.acctd_amount_adjusted,l_functional_currency_code);

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);
6059: END IF;
6060:
6061: -- If the cust_account_id has changed, we need to change the followings accordingly.
6062: -- Days due and others

Line 6566: ozf_utility_PVT.debug_message('Before create access');

6562: END IF;
6563: END IF;
6564:
6565: IF OZF_DEBUG_HIGH_ON THEN
6566: ozf_utility_PVT.debug_message('Before create access');
6567: END IF;
6568:
6569: IF l_owner_changed THEN
6570: IF l_access_list.count > 0 THEN

Line 6868: ozf_utility_PVT.debug_message('claim date: ' || l_claim.claim_date);

6864: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_DUE_DATE_ERR');
6865: FND_MSG_PUB.add;
6866: END IF;
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;

Line 6869: ozf_utility_PVT.debug_message('due date: ' || l_claim.DUE_DATE);

6865: FND_MSG_PUB.add;
6866: END IF;
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: