28: G_BATCH_CURRENCY_CODE VARCHAR2(30) := NULL;
29: G_INVENTORY_TRACKING_FLAG VARCHAR2(1) := NULL;
30: G_ADMIN_EMAIL VARCHAR2(100);
31:
32: G_DQM_CONTACT_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_CONTACT_DQM_RULE');
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
29: G_INVENTORY_TRACKING_FLAG VARCHAR2(1) := NULL;
30: G_ADMIN_EMAIL VARCHAR2(100);
31:
32: G_DQM_CONTACT_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_CONTACT_DQM_RULE');
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
37: G_MANDATE_PARTY_MAPPING VARCHAR2(5) := NVL(FND_PROFILE.value('OZF_IDSM_MANDATE_PARTY_MAPPING'),'N'); -- added for bug 15908782
30: G_ADMIN_EMAIL VARCHAR2(100);
31:
32: G_DQM_CONTACT_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_CONTACT_DQM_RULE');
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
37: G_MANDATE_PARTY_MAPPING VARCHAR2(5) := NVL(FND_PROFILE.value('OZF_IDSM_MANDATE_PARTY_MAPPING'),'N'); -- added for bug 15908782
38:
31:
32: G_DQM_CONTACT_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_CONTACT_DQM_RULE');
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
37: G_MANDATE_PARTY_MAPPING VARCHAR2(5) := NVL(FND_PROFILE.value('OZF_IDSM_MANDATE_PARTY_MAPPING'),'N'); -- added for bug 15908782
38:
39: -- Private Procedure
32: G_DQM_CONTACT_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_CONTACT_DQM_RULE');
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
37: G_MANDATE_PARTY_MAPPING VARCHAR2(5) := NVL(FND_PROFILE.value('OZF_IDSM_MANDATE_PARTY_MAPPING'),'N'); -- added for bug 15908782
38:
39: -- Private Procedure
40: PROCEDURE Number_Mapping_Required(
33: G_DQM_PARTY_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_DQM_RULE');
34: G_DQM_PARTY_SITE_RULE NUMBER := FND_PROFILE.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
35: G_ITEM_ORG_ID NUMBER := FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
36: G_DEFAULT_ORG_ID NUMBER := FND_PROFILE.value('DEFAULT_ORG_ID');
37: G_MANDATE_PARTY_MAPPING VARCHAR2(5) := NVL(FND_PROFILE.value('OZF_IDSM_MANDATE_PARTY_MAPPING'),'N'); -- added for bug 15908782
38:
39: -- Private Procedure
40: PROCEDURE Number_Mapping_Required(
41: p_internal_code_tbl IN NUMBER_TABLE,
1202: l_partner_cntct_rec.contact_name := px_resale_batch_rec.partner_contact_name;
1203: l_partner_cntct_rec.party_email_id := px_resale_batch_rec.partner_email;
1204: l_partner_cntct_rec.party_phone := px_resale_batch_rec.partner_phone;
1205: l_partner_cntct_rec.party_fax := px_resale_batch_rec.partner_fax;
1206: l_dqm_contact_rule := G_DQM_CONTACT_RULE; --fnd_profile.value('OZF_RESALE_CONTACT_DQM_RULE');
1207: IF OZF_DEBUG_LOW_ON THEN
1208: ozf_utility_pvt.debug_message ( 'DQM Contact Rule '|| l_dqm_contact_rule);
1209: END IF;
1210: IF l_dqm_contact_rule IS NOT NULL THEN
1284: -- Org ID Defaulting
1285: -- -----------------------------------------------------------------
1286:
1287: IF l_resale_batch_rec.org_id IS NULL THEN
1288: l_resale_batch_rec.org_id := G_DEFAULT_ORG_ID; --FND_PROFILE.value('DEFAULT_ORG_ID');
1289: END IF;
1290: IF OZF_DEBUG_LOW_ON THEN
1291: ozf_utility_pvt.debug_message ( 'Org ID '|| l_resale_batch_rec.org_id);
1292: END IF;
2118: LOOP
2119:
2120: -- Derive ORG ID
2121: IF px_line_record.org_id(i) IS NULL THEN
2122: px_line_record.org_id(i) := G_DEFAULT_ORG_ID; --FND_PROFILE.value('DEFAULT_ORG_ID');
2123: END IF;
2124: -- Derive Quantity from External Quantity
2125: IF px_line_record.quantity(i) IS NULL THEN
2126: IF px_line_record.orig_system_quantity(i) IS NOT NULL THEN
2219: CLOSE OZF_RESALE_COMMON_PVT.g_batch_type_csr;
2220:
2221: IF l_batch_type = 'TP_ACCRUAL' THEN
2222: IF px_line_record.agreement_type(i) IS NULL AND px_line_record.agreement_id(i) IS NULL AND px_line_record.price_list_id(i) IS NULL THEN
2223: px_line_record.price_list_id(i) := FND_PROFILE.value('OZF_TP_ACCRUAL_PRICE_LIST');
2224: END IF;
2225: END IF;
2226:
2227: IF px_line_record.price_list_id(i) IS NOT NULL AND
2877: -----------------------------------------------------------------------
2878: IF px_line_record.inventory_item_id(i) IS NOT NULL AND
2879: px_line_record.item_number(i) IS NULL THEN
2880: -- Bug 4520881 (+)
2881: l_org_id := G_ITEM_ORG_ID; --FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
2882: -- SELECT NVL(SUBSTRB(USERENV('CLIENT_INFO'),1,10),-99)
2883: -- INTO l_org_id FROM DUAL;
2884: -- Bug 4520881 (-)
2885: OPEN get_item_number( px_line_record.inventory_item_id(i)
4773:
4774: IF p_item_number_tbl.COUNT > 0 THEN
4775: FOR i IN 1..p_item_number_tbl.COUNT LOOP
4776: IF p_item_number_tbl(i) IS NOT NULL THEN
4777: l_org_id := G_ITEM_ORG_ID; --FND_PROFILE.value('AMS_ITEM_ORGANIZATION_ID');
4778: IF OZF_DEBUG_LOW_ON THEN
4779: ozf_utility_pvt.debug_message('p_item_number_tbl(i) ' || p_item_number_tbl(i));
4780: END IF;
4781: OPEN get_inventory_item_id(p_item_number_tbl(i),
6190:
6191:
6192: IF l_run_dqm_flag = 'Y' THEN
6193:
6194: l_dqm_party_rule := G_DQM_PARTY_RULE; --fnd_profile.value('OZF_RESALE_PARTY_DQM_RULE');
6195: l_dqm_party_site_rule := G_DQM_PARTY_SITE_RULE; --fnd_profile.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
6196: l_dqm_contact_rule := G_DQM_CONTACT_RULE; --fnd_profile.value('OZF_RESALE_CONTACT_DQM_RULE');
6197:
6198: IF OZF_DEBUG_LOW_ON THEN
6191:
6192: IF l_run_dqm_flag = 'Y' THEN
6193:
6194: l_dqm_party_rule := G_DQM_PARTY_RULE; --fnd_profile.value('OZF_RESALE_PARTY_DQM_RULE');
6195: l_dqm_party_site_rule := G_DQM_PARTY_SITE_RULE; --fnd_profile.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
6196: l_dqm_contact_rule := G_DQM_CONTACT_RULE; --fnd_profile.value('OZF_RESALE_CONTACT_DQM_RULE');
6197:
6198: IF OZF_DEBUG_LOW_ON THEN
6199: ozf_utility_pvt.debug_message( 'Party DQM Rule '|| l_dqm_party_rule );
6192: IF l_run_dqm_flag = 'Y' THEN
6193:
6194: l_dqm_party_rule := G_DQM_PARTY_RULE; --fnd_profile.value('OZF_RESALE_PARTY_DQM_RULE');
6195: l_dqm_party_site_rule := G_DQM_PARTY_SITE_RULE; --fnd_profile.value('OZF_RESALE_PARTY_SITE_DQM_RULE');
6196: l_dqm_contact_rule := G_DQM_CONTACT_RULE; --fnd_profile.value('OZF_RESALE_CONTACT_DQM_RULE');
6197:
6198: IF OZF_DEBUG_LOW_ON THEN
6199: ozf_utility_pvt.debug_message( 'Party DQM Rule '|| l_dqm_party_rule );
6200: ozf_utility_pvt.debug_message( 'Party Site DQM Rule '|| l_dqm_party_site_rule );