PACKAGE BODY: APPS.MSC_UPDATE_PLAN_OPTIONS_PK

Source

1 PACKAGE BODY msc_update_plan_options_pk AS
2 /* $Header: MSCPUPLB.pls 120.1 2005/07/06 13:25:39 pabram noship $ */
3 
4 /******************msc_update_options****************************************/
5 	PROCEDURE 		msc_update_options (
6 								arg_plan_id IN NUMBER,
7 								arg_user_id IN NUMBER)
8 IS
9 
10 
11 BEGIN
12 
13 
14     	UPDATE  msc_plans
15 		SET
16 				data_start_date = SYSDATE,
17 				data_completion_date = NULL,
18 				last_update_date = SYSDATE,
19 				last_updated_by = arg_user_id,
20 				schedule_designator = curr_schedule_designator,
21 				schedule_type = curr_schedule_type,
22 				operation_schedule_type = curr_operation_schedule_type,
23 				plan_type = curr_plan_type,
24 				cutoff_date = curr_cutoff_date,
25 				part_include_type = curr_part_include_type,
26 				planning_time_fence_flag =
27 						curr_planning_time_fence_flag,
28 				demand_time_fence_flag = curr_demand_time_fence_flag,
29 				consider_reservations = curr_consider_reservations,
30 				plan_safety_stock = curr_plan_safety_stock,
31 				consider_wip = curr_consider_wip,
32 				consider_po = curr_consider_po,
33 				snapshot_lock = curr_snapshot_lock,
34 				overwrite_option = curr_overwrite_option,
35 				append_planned_orders = curr_append_planned_orders,
36 				full_pegging = curr_full_pegging,
37 				reservation_level = curr_reservation_level,
38 				hard_pegging_level = curr_hard_pegging_level
39 		WHERE   plan_id = arg_plan_id;
40 
41 		COMMIT;
42 
43 
44 END	msc_update_options;
45 
46 /********************msc_set_completion_time**********************************/
47 PROCEDURE msc_set_completion_time (
48                         arg_plan_id IN NUMBER,
49 						arg_user_id IN NUMBER) IS
50 BEGIN
51 
52     UPDATE 	msc_plans
53     SET     data_completion_date = SYSDATE,
54             last_update_date = SYSDATE,
55             last_updated_by = arg_user_id
56     WHERE   plan_id = arg_plan_id;
57 
58 
59     COMMIT;
60 
61 END msc_set_completion_time;
62 
63 END msc_update_plan_options_pk;