[Home] [Help]
123: -- 1/29/2013 nepanda Bug 16235187 - ER - MULTI UOM FULFILLMENT WITH CATCH WEIGHT
124: -- 3/5/2013 nepanda Bug 16434010 - chrm - catch weight : fae failure
125: -------------------------------------------------------------------------------
126: g_pkg_name CONSTANT VARCHAR2 (30) := 'OZF_ACCRUAL_ENGINE';
127: g_recal_flag CONSTANT VARCHAR2(1) := NVL(fnd_profile.value('OZF_BUDGET_ADJ_ALLOW_RECAL'),'N');
128: g_debug_flag VARCHAR2 (1) := 'N';
129: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
130: g_universal_currency CONSTANT VARCHAR2 (15) := fnd_profile.VALUE ('OZF_UNIV_CURR_CODE');
131: g_order_gl_phase CONSTANT VARCHAR2 (15) := NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED');
126: g_pkg_name CONSTANT VARCHAR2 (30) := 'OZF_ACCRUAL_ENGINE';
127: g_recal_flag CONSTANT VARCHAR2(1) := NVL(fnd_profile.value('OZF_BUDGET_ADJ_ALLOW_RECAL'),'N');
128: g_debug_flag VARCHAR2 (1) := 'N';
129: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
130: g_universal_currency CONSTANT VARCHAR2 (15) := fnd_profile.VALUE ('OZF_UNIV_CURR_CODE');
131: g_order_gl_phase CONSTANT VARCHAR2 (15) := NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED');
132: g_bulk_limit CONSTANT NUMBER := 5000; -- yzhao: Sep 8,2005 bulk fetch limit. It should get from profile.
133: g_message_count NUMBER := -1; --nirprasa, added for bug 8435487 to restrict thenumber of ASO messages to be processed
134: --//13333298
127: g_recal_flag CONSTANT VARCHAR2(1) := NVL(fnd_profile.value('OZF_BUDGET_ADJ_ALLOW_RECAL'),'N');
128: g_debug_flag VARCHAR2 (1) := 'N';
129: G_DEBUG BOOLEAN := FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_debug_high);
130: g_universal_currency CONSTANT VARCHAR2 (15) := fnd_profile.VALUE ('OZF_UNIV_CURR_CODE');
131: g_order_gl_phase CONSTANT VARCHAR2 (15) := NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED');
132: g_bulk_limit CONSTANT NUMBER := 5000; -- yzhao: Sep 8,2005 bulk fetch limit. It should get from profile.
133: g_message_count NUMBER := -1; --nirprasa, added for bug 8435487 to restrict thenumber of ASO messages to be processed
134: --//13333298
135: G_TPM_PROCESS_ENABLED VARCHAR2 (1) := NVL(fnd_profile.VALUE ('OZF_TPM_PROCESS_ENABLED'),'N');
131: g_order_gl_phase CONSTANT VARCHAR2 (15) := NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED');
132: g_bulk_limit CONSTANT NUMBER := 5000; -- yzhao: Sep 8,2005 bulk fetch limit. It should get from profile.
133: g_message_count NUMBER := -1; --nirprasa, added for bug 8435487 to restrict thenumber of ASO messages to be processed
134: --//13333298
135: G_TPM_PROCESS_ENABLED VARCHAR2 (1) := NVL(fnd_profile.VALUE ('OZF_TPM_PROCESS_ENABLED'),'N');
136:
137:
138: TYPE utilIdTbl IS TABLE OF ozf_funds_utilized_all_b.utilization_id%TYPE;
139: TYPE objVerTbl IS TABLE OF ozf_funds_utilized_all_b.object_version_number%TYPE;
3114: dynamic sql and execute the ref cursor.*/
3115:
3116: IF l_custom_setup_id = 118 THEN --ER9447673
3117: MO_GLOBAL.set_policy_context('S', l_order_org_id);
3118: l_column_name := FND_PROFILE.VALUE('OZF_ITEM_COST_COLUMN');
3119:
3120: IF l_column_name IS NOT NULL AND l_column_name <> FND_API.G_MISS_CHAR THEN
3121: l_stmt := 'SELECT ' || l_column_name ||' FROM oe_order_lines_all WHERE line_id = :1 AND org_id = :2';
3122:
3312:
3313:
3314: IF l_custom_setup_id = 118 THEN --ER9447673
3315: MO_GLOBAL.set_policy_context('S', l_order_org_id);
3316: l_column_name := FND_PROFILE.VALUE('OZF_ITEM_COST_COLUMN');
3317:
3318: IF l_column_name IS NOT NULL AND l_column_name <> FND_API.G_MISS_CHAR THEN
3319: l_stmt := 'SELECT ' || l_column_name ||' FROM oe_order_lines_all WHERE line_id = :1 AND org_id = :2';
3320:
4401: ozf_utility_pvt.write_conc_log('l_custom_setup_id: ' || l_custom_setup_id);
4402: END IF;
4403:
4404: IF l_custom_setup_id = 118 THEN
4405: l_column_name := FND_PROFILE.VALUE('OZF_ITEM_COST_COLUMN');
4406:
4407: IF l_column_name IS NOT NULL AND l_column_name <> FND_API.G_MISS_CHAR THEN
4408: l_stmt := 'SELECT ' || l_column_name ||' FROM oe_order_lines_all WHERE line_id = :1';
4409:
4648: l_gl_date := NULL;
4649:
4650: IF g_debug_flag = 'Y' THEN
4651: ozf_utility_pvt.write_conc_log (' D: profile to create gl entries is set to ' ||
4652: fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE') || ' g_order_gl_phase=' || g_order_gl_phase);
4653: END IF;
4654:
4655: --ninarasi: bug 15877269 - When the order is shipped and invoiced the flow_status_code can be 'POST BILLING ACCEPTANCE'.
4656: --So for this status the following check will not work. So commented the flow_status_code check below (refer QP bug 14785197)
6244: --to post to GL based on invoice date
6245:
6246: -- Bug 13463758, fix issue for RMA orders, when FAE is run before auto-invoice,
6247: --The failed RMA records were not getting processed. removed condition
6248: --IF NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED') = 'INVOICED' THEN
6249:
6250: l_inv_date := NULL;
6251: IF l_glDateTbl(i) IS NULL THEN
6252: --IF NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED') = 'INVOICED' THEN
6248: --IF NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED') = 'INVOICED' THEN
6249:
6250: l_inv_date := NULL;
6251: IF l_glDateTbl(i) IS NULL THEN
6252: --IF NVL(fnd_profile.VALUE ('OZF_ORDER_GLPOST_PHASE'), 'SHIPPED') = 'INVOICED' THEN
6253:
6254:
6255: OPEN c_invoice_date(l_objectIdTbl(i), l_orderLineIdTbl(i));
6256: FETCH c_invoice_date INTO l_inv_date;