1 PACKAGE MSC_UI_PEG_UTIL AS
2 /* $Header: MSCPEGUS.pls 120.1 2007/10/01 19:25:16 eychen ship $ */
3
4
5 TYPE peg_node_rec_values is RECORD (
6 Item_Org varchar2(2000),
7 Pegging_id number,
8 Prev_pegging_id number,
9 Qty number,
10 Peg_Date date,
11 Order_name varchar2(2000),
12 Demand_id number,
13 Transaction_id number,
14 Item_id number,
15 Pegged_qty number,
16 Order_number varchar2(2000),
17 Order_type number,
18 Disposition varchar2(2000),
19 End_Demand_class varchar2(2000));
20
21
22 TYPE peg_node_rec_values_table is table of peg_node_rec_values index by binary_integer;
23
24
25 Procedure get_suptree_dem_values(p_plan_id IN NUMBER,
26 p_transaction_id IN NUMBER,
27 x_itemorg_pegnode_rec OUT NOCOPY MSC_UI_PEG_UTIL.peg_node_rec_values_table,
28 p_item_id IN NUMBER,
29 p_pegging_id IN NUMBER,
30 p_instance_id IN NUMBER,
31 p_trigger_node_type IN NUMBER DEFAULT 2,
32 p_condense_supply_oper IN NUMBER DEFAULT 0,
33 p_hide_oper IN NUMBER DEFAULT 0,
34 p_organization_id IN NUMBER DEFAULT NULL,
35 p_supply_pegging IN NUMBER DEFAULT 0 ,
36 p_show_item_desc IN NUMBER DEFAULT 2);
37
38 Procedure get_label_and_nodevalue(Item_org IN VARCHAR2,
39 Qty IN NUMBER,
40 Pegged_qty IN NUMBER,
41 Peg_date IN DATE,
42 Order_name IN VARCHAR2,
43 end_demand_class IN VARCHAR2,
44 order_type IN NUMBER,
45 Disposition IN NUMBER,
46 Pegging_id IN NUMBER,
47 Prev_pegging_id IN NUMBER,
48 Demand_id IN NUMBER,
49 Transaction_id IN NUMBER,
50 Item_id IN NUMBER,
51 x_node_value OUT NOCOPY varchar2,
52 x_node_label OUT NOCOPY varchar2,
53 p_tmp IN NUMBER,
54 p_supply_org_id IN NUMBER,
55 pvt_so_number IN VARCHAR2,
56 pvt_l_node_number IN NUMBER,
57 p_constr_label IN BOOLEAN default FALSE,
58 p_node_type IN NUMBER default 1,
59 p_calling_module IN NUMBER default 1,
60 p_prev_pegging_value IN NUMBER default null );
61
62 Procedure get_disposition_id(p_demand_id IN NUMBER,
63 x_disposition_id OUT NOCOPY NUMBER,
64 x_origination_type OUT NOCOPY NUMBER,
65 p_sr_instance_id IN NUMBER,
66 p_organization_id IN NUMBER,
67 p_plan_id IN NUMBER);
68
69 Procedure get_demtree_dem_values( p_plan_id IN NUMBER,
70 p_transaction_id IN NUMBER,
71 x_itemorg_pegnode_rec OUT NOCOPY MSC_UI_PEG_UTIL.peg_node_rec_values_table,
72 p_instance_id IN NUMBER,
73 p_organization_id IN NUMBER,
74 p_bom_item_type IN NUMBER,
75 p_show_item_desc IN NUMBER DEFAULT 2);
76
77
78
79 Procedure get_suptree_sup_values(p_plan_id IN NUMBER,
80 p_demand_id IN NUMBER,
81 p_sr_instance_id IN NUMBER,
82 p_organization_id IN NUMBER,
83 p_prev_peg_id IN NUMBER,
84 x_itemorg_pegnode_rec OUT NOCOPY MSC_UI_PEG_UTIL.peg_node_rec_values_table,
85 p_supply_pegging IN NUMBER DEFAULT 0 , -- demand pegging ( peg up)
86 p_show_item_desc IN NUMBER DEFAULT 2);
87 Procedure get_suptree_dem_values_rep(p_plan_id IN NUMBER,
88 p_transaction_id IN NUMBER,
89 x_itemorg_pegnode_rec OUT NOCOPY MSC_UI_PEG_UTIL.peg_node_rec_values_table,
90 p_instance_id IN NUMBER,
91 p_supply_pegging IN NUMBER DEFAULT 0 ,
92 p_show_item_desc IN NUMBER DEFAULT 2,
93 p_show_ss_demands IN NUMBER DEFAULT 1);
94
95 END MSC_UI_PEG_UTIL;