11: G_FILE_NAME CONSTANT VARCHAR2(12) := 'ozfvclab.pls';
12:
13: -- status
14: G_CLAIM_STATUS CONSTANT VARCHAR2(30) := 'OZF_CLAIM_STATUS';
15: G_INIT_STATUS CONSTANT VARCHAR2(30) := NVL(fnd_profile.value('OZF_CLAIM_DEFAULT_STATUS'), 'NEW'); -- R12 Enhancements
16: G_OPEN_STATUS CONSTANT VARCHAR2(30) := 'OPEN';
17: G_DUPLICATE_STATUS CONSTANT VARCHAR2(30) := 'DUPLICATE';
18: G_PENDING_STATUS CONSTANT VARCHAR2(30) := 'PENDING';
19: G_CANCELLED_STATUS CONSTANT VARCHAR2(30) := 'CANCELLED';
58: -- It is to see whether an update_claim is called upon already.
59: -- We use this to avoid multiple save_point setting for settlment.
60: G_YES CONSTANT VARCHAR2(1) :='Y';
61:
62: G_ALLOW_UNREL_SHIPTO_FLAG VARCHAR2(1) := NVL(fnd_profile.value('OZF_CLAIM_UR_SHIPTO'),'N'); -- 4334023
63:
64: --//12970850 TPM Integration
65: G_TPM_PROCESS_ENABLED VARCHAR2 (1) := NVL(fnd_profile.VALUE ('OZF_TPM_PROCESS_ENABLED'),'N');
66:
61:
62: G_ALLOW_UNREL_SHIPTO_FLAG VARCHAR2(1) := NVL(fnd_profile.value('OZF_CLAIM_UR_SHIPTO'),'N'); -- 4334023
63:
64: --//12970850 TPM Integration
65: G_TPM_PROCESS_ENABLED VARCHAR2 (1) := NVL(fnd_profile.VALUE ('OZF_TPM_PROCESS_ENABLED'),'N');
66:
67: OZF_DEBUG_HIGH_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
68: OZF_DEBUG_LOW_ON BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_low);
69:
4067: END IF;
4068:
4069: -- If legal_entity_id is null, then needs to get from profile.
4070: IF (l_claim.legal_entity_id IS NULL) THEN
4071: l_claim.legal_entity_id := FND_PROFILE.VALUE('OZF_DEFAULT_LE_FOR_CLAIM');
4072: END IF;
4073:
4074: IF OZF_DEBUG_HIGH_ON THEN
4075: ozf_utility_PVT.debug_message('legal_entity_id:'||l_claim.legal_entity_id);
4532: END IF;
4533:
4534: IF (l_claim.claim_class = 'DEDUCTION') THEN
4535:
4536: l_attribute := FND_PROFILE.Value(L_ATTRIBUTE_PAD);
4537:
4538: IF OZF_DEBUG_HIGH_ON THEN
4539: ozf_utility_PVT.debug_message('l_attribute:'||l_attribute);
4540: END IF;
6992: CLOSE gp_func_currency_cd_csr;
6993:
6994: --Bug# 7319828 fixed by ateotia(-)
6995:
6996: -- l_functional_currency_code := fnd_profile.value('JTF_PROFILE_DEFAULT_CURRENCY');
6997:
6998: -- ER#9382547 - ChRM-SLA Uptake
6999: -- If the functional and claim currency is same we need to populate the
7000: -- the exchange rate informations along with the date. This will be used for
9230: l_Error_Token varchar2(80);
9231: l_return_status varchar2(30);
9232: l_mode varchar2(30) := OZF_claim_Utility_pvt.G_MANU_MODE;
9233:
9234: l_default_curr_code varchar2(30):= fnd_profile.value('JTF_PROFILE_DEFAULT_CURRENCY');
9235: l_claim_id number;
9236: l_err_row number:=0;
9237: BEGIN
9238: -- Standard begin of API savepoint
9431: l_Msg_count number;
9432: l_Error_Token varchar2(80);
9433: l_return_status varchar2(30);
9434:
9435: l_default_curr_code varchar2(30):= fnd_profile.value('JTF_PROFILE_DEFAULT_CURRENCY');
9436: l_claim_id number;
9437: l_err_row number:=0;
9438: BEGIN
9439: -- Standard begin of API savepoint