[Home] [Help]
1: PACKAGE BODY Msc_Get_Bis_Values AS
2: /* $Header: MSCBISUB.pls 120.15.12020000.3 2012/10/17 12:12:23 wexia ship $ */
3:
4: g_plan_start_date DATE;
5: g_period_zero_date date;
533: p_out1 := v_production;
534: p_out2 := v_purchasing;
535: p_out3 := v_penalty;
536: p_out4 := v_inventory;
537: v_tp_cost := msc_get_bis_values.get_tp_cost(p_plan_id,
538: p_instance_id, p_organization_id, p_product_family_id, null, null);
539: p_out5 := v_tp_cost;
540: elsif p_chart = SERVICE_LEVEL then
541: p_out1 := v_service;
630: l_start_date,
631: l_end_date, g_use_old_demand_qty);
632: else
633: if p_chart = COST_BREAKDOWN then
634: v_tp_cost := msc_get_bis_values.get_tp_cost(p_plan_id,
635: p_instance_id, p_organization_id, p_product_family_id, l_start_date, l_end_date);
636: end if;
637: if p_organization_id is not null then
638: if p_product_family_id is not null then
1146:
1147: return 100;
1148: else
1149:
1150: l_value1 := msc_get_bis_values.late_orders(p_plan_id,
1151: p_instance_id,p_organization_id,NULL,NULL,
1152: p_inventory_item_id, p_project_id, p_task_id,
1153: p_category_id,p_category_name,p_category_set_id,
1154: p_product_family_id);
1617: if l_value2 = 0 or l_value2 is null then
1618: l_value :=100;
1619:
1620: else
1621: l_value1 :=msc_get_bis_values.late_orders(
1622: p_plan_id,p_instance_id,p_org_id,
1623: l_start_date,l_end_date,
1624: p_inventory_item_id, p_project_id, p_task_id,
1625: p_category_id,p_category_name,
2785: CLOSE show_kpi;
2786:
2787: if nvl(v_show_kpi,1) = 1 then
2788: FND_FILE.PUT_LINE(FND_FILE.LOG,'--- refreshing summary data for kpi ---');
2789: msc_get_bis_values.refresh_data(l_err_buf, l_ret_code,p_plan_id, v_plan_type);
2790: else -- set kpi status as not refresh
2791: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'NOT REFRESH');
2792: end if;
2793: exception when others then
2787: if nvl(v_show_kpi,1) = 1 then
2788: FND_FILE.PUT_LINE(FND_FILE.LOG,'--- refreshing summary data for kpi ---');
2789: msc_get_bis_values.refresh_data(l_err_buf, l_ret_code,p_plan_id, v_plan_type);
2790: else -- set kpi status as not refresh
2791: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'NOT REFRESH');
2792: end if;
2793: exception when others then
2794: FND_FILE.PUT_LINE(FND_FILE.LOG,'refreshing kpi summary data fails');
2795: END refresh_kpi_data;
3176: res.sr_instance_id,
3177: res.resource_date;
3178: end if;
3179: commit;
3180: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'ONE_DONE');
3181: exception when no_data_found then
3182: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'ONE_DONE');
3183: END refresh_one_table;
3184:
3178: end if;
3179: commit;
3180: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'ONE_DONE');
3181: exception when no_data_found then
3182: msc_get_bis_values.set_kpi_refresh_status(p_plan_id,'ONE_DONE');
3183: END refresh_one_table;
3184:
3185: Procedure ui_post_plan(errbuf OUT NOCOPY VARCHAR2,
3186: retcode OUT NOCOPY NUMBER,
3226: OPEN plan_c;
3227: FETCH plan_c INTO v_show_kpi, v_plan_type, l_autorelease,l_generate_worksheet;
3228: CLOSE plan_c;
3229:
3230: msc_get_bis_values.refresh_kpi_data(p_plan_id);
3231:
3232: msc_launch_plan_pk.purge_user_notes_data(p_plan_id);
3233:
3234: msc_netchange_pkg.compare_plan_need_refresh(p_plan_id);
3272:
3273: End ui_post_plan;
3274:
3275:
3276: END Msc_Get_Bis_Values;