DBA Data[Home] [Help]

PACKAGE: APPS.MRP_ATP_PVT

Source


1 PACKAGE MRP_ATP_PVT AUTHID CURRENT_USER AS
2 /* $Header: MRPGATPS.pls 120.6 2006/04/28 04:24:33 anbansal noship $  */
3 
4 INFINITE_NUMBER         CONSTANT NUMBER := 1.0e+10;
5 
6 TYPE Atp_Source_Typ is RECORD (
7 Organization_Id                 MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
8 Instance_Id			MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
9 Supplier_Id                     MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
10 Supplier_Site_Id                MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
11 Rank			        MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
12 Source_Type                     MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
13 Lead_Time                       MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
14 Ship_Method                     MRP_ATP_PUB.char30_arr := MRP_ATP_PUB.char30_arr(),
15 Preferred                       MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
16 make_flag                       MRP_ATP_PUB.char1_arr := MRP_ATP_PUB.char1_arr(),
17 -- ship_rec_cal
18 Sup_Cap_Type                    MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr()
19 );
20 
21 TYPE AtpRec is RECORD (
22 instance_id		NUMBER,
23 identifier              NUMBER,
24 demand_source_line	VARCHAR2(30),
25 demand_source_header_id NUMBER,
26 demand_source_delivery  VARCHAR2(30),
27 demand_source_type      NUMBER,
28 inventory_item_id	NUMBER,
29 request_item_id		NUMBER,
30 customer_id		NUMBER,
31 organization_id		NUMBER,
32 supplier_id		NUMBER,
33 supplier_site_id	NUMBER,
34 quantity_ordered	NUMBER,
35 quantity_uom		VARCHAR2(3),
36 requested_ship_date	DATE,
37 requested_arrival_date	DATE,
38 latest_acceptable_date	DATE,
39 delivery_lead_time	NUMBER,
40 freight_carrier		VARCHAR2(30),
41 ship_method		VARCHAR2(30),
42 demand_class		VARCHAR2(200),
43 override_flag		VARCHAR2(1),
44 ship_date		DATE,
45 Arrival_date		DATE,
46 available_quantity	NUMBER,
47 requested_date_quantity NUMBER,
48 action			NUMBER,
49 insert_flag		NUMBER,
50 to_location_id          NUMBER,
51 to_organization_id      NUMBER,
52 to_instance_id		NUMBER,
53 error_code		NUMBER,
54 refresh_number          NUMBER,
55 atp_lead_time		NUMBER,
56 origination_type        NUMBER,
57 order_number            NUMBER,
58 combined_requested_date_qty NUMBER,
59 calling_module		NUMBER,
60 component_identifier    NUMBER,
61 stolen_flag             VARCHAR2(1),
62 --subst
63 substitution_type       NUMBER,
64 req_item_detail_flag    NUMBER,
65 req_item_req_date_qty   NUMBER,
66 req_item_available_date DATE,
67 req_item_available_date_qty NUMBER,
68 request_item_name       VARCHAR2(40),  -- Rewind to 40 Bug 2408159
69 inventory_item_name     VARCHAR2(40),  -- Rewind to 40 Bug 2408159
70 original_item_flag      NUMBER,
71 top_tier_org_flag       NUMBER,
72 substitution_window     NUMBER,
73 old_demand_id           NUMBER,
74 --diag_atp
75 plan_name               VARCHAR2(80),
76 reverse_cumulative_yield number,
77 children_type		NUMBER,
78 -- 2462661 -- atp flag value from MSC_BOM_TEMP passsed by CTO
79 src_atp_flag            VARCHAR2(1),
80 --s_cto_rearch
81 Top_Model_line_id       NUMBER,
82 ATO_Parent_Model_Line_Id       NUMBER,
83 ATO_Model_Line_Id       NUMBER,
84 Parent_line_id          NUMBER,
85 wip_supply_type         NUMBER,
86 parent_atp_flag         varchar2(1),
87 parent_atp_comp_flag    varchar2(1),
88 parent_repl_order_flag  varchar2(1),
89 parent_bom_item_type   number,
90 parent_item_id         number,
91 base_model_id           number,
92 bom_item_type           number,
93 rep_ord_flag            varchar2(1),
94 mand_comp_flag          number,
95 parent_so_quantity      number,
96 --e_cto_rearch
97 -- time_phased_atp
98 atf_date                DATE,
99 atf_date_quantity       NUMBER,
100 original_item_id        NUMBER,
101 original_item_name      VARCHAR2(40),
102 used_available_quantity NUMBER, --bug3409973
103 --plan by request
104 original_request_ship_date DATE,
105 original_request_date 	DATE,
106 ship_set_name		varchar2(30),
107 arrival_set_name	varchar2(30),
108 -- ship_rec_cal
109 receiving_cal_code      VARCHAR2(14),
110 intransit_cal_code      VARCHAR2(14),
111 shipping_cal_code       VARCHAR2(14),
112 manufacturing_cal_code  VARCHAR2(14),
113 session_id              number,
114 last_cap_date           Date,    -- Enforce Pur LT
115 OE_Flag                 varchar2(1),--
116 internal_org_id         number, --3409286
117 --4570421
118 scaling_type            number,
119 scale_multiple          number,
120 scale_rounding_variance number,
121 rounding_direction      number,
122 component_yield_factor  number, --4570421
123 usage_qty               number, --4775920
124 organization_type       number, --4775920
125 bill_seq_id             number, --4741012
126 subs_demand_id          number  --5088719
127 );
128 
129 
130 
131 TYPE Atp_Res_Typ is RECORD (
132 department_id                 MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
133 owning_department_id          MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
134 resource_id                   MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
135 basis_type                    MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
136 resource_usage                MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
137 requested_date		      MRP_ATP_PUB.date_arr := MRP_ATP_PUB.date_arr(),
138 lead_time                     MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
139 efficiency                    MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
140 utilization                   MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
141 batch_flag                    MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
142 max_capacity                  MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
143 required_unit_capacity        MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
144 required_capacity_uom         MRP_ATP_PUB.char3_arr := MRP_ATP_PUB.char3_arr(),
145 res_uom 		      MRP_ATP_PUB.char3_arr := MRP_ATP_PUB.char3_arr(),
146 res_uom_type		      MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
147 std_op_code                   MRP_ATP_PUB.char7_arr := MRP_ATP_PUB.char7_arr(),
148 resource_offset_percent       MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
149 operation_sequence            MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
150 actual_resource_usage         MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
151 reverse_cumulative_yield      MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
152 department_code               MRP_ATP_PUB.char10_arr := MRP_ATP_PUB.char10_arr(),
153 resource_code                 MRP_ATP_PUB.char16_arr := MRP_ATP_PUB.char16_arr()--4774169
154 
155 
156 );
157 
158 TYPE Atp_Comp_Typ is RECORD (
159 inventory_item_id             MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
160 comp_usage                    MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
161 requested_date                MRP_ATP_PUB.date_arr:=MRP_ATP_PUB.date_arr(),
162 lead_time                     MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
163 wip_supply_type               MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
164 assembly_identifier           MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
165 component_identifier          MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
166 pre_process_lead_time         MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
167 --diag_atp
168 reverse_cumulative_yield      MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
169 -- 2462661 -- atp flag value from MSC_BOM_TEMP passsed by CTO
170 src_atp_flag                  MRP_ATP_PUB.char1_arr:=MRP_ATP_PUB.char1_arr(),
171 --s_cto_rearch
172 match_item_id                 MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
173 bom_item_type                 MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
174 parent_line_id                MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
175 top_model_line_id             MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
176 ato_parent_model_line_id      MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
177 ato_model_line_id             MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
178 MAND_COMP_FLAG                 MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
179 parent_so_quantity            MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
180 fixed_lt                      MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
181 variable_lt                   MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
182 oss_error_code                MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
183 atp_flag                      MRP_ATP_PUB.char1_arr:= MRP_ATP_PUB.char1_arr(),
184 atp_components_flag                      MRP_ATP_PUB.char1_arr:= MRP_ATP_PUB.char1_arr(),
185 -- time_phased_atp
186 request_item_id               MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
187 atf_date                      MRP_ATP_PUB.date_arr:=MRP_ATP_PUB.date_arr(),
188 match_item_family_id          MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
189 dest_inventory_item_id        MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
190 parent_item_id                MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
191 comp_uom                      MRP_ATP_PUB.char3_arr := MRP_ATP_PUB.char3_arr(), --bug3110023
192 --4570421
193 scaling_type                  MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
194 scale_multiple                MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
195 scale_rounding_variance       MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
196 rounding_direction            MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(),
197 component_yield_factor        MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(), --4570421
198 usage_qty                     MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr(), --4775920
199 organization_type             MRP_ATP_PUB.number_arr:=MRP_ATP_PUB.number_arr()  --4775920
200 );
201 
202 TYPE ATP_COMP_REC IS RECORD
203 (
204 inventory_item_id             number,
205 comp_usage                    number,
206 requested_date                date,
207 lead_time                     number,
208 wip_supply_type               number,
209 assembly_identifier           number,
210 component_identifier          number,
211 --diag_atp
212 reverse_cumulative_yield      number,
213 --s_cto_rearch
214 match_item_id                 number,
215 bom_item_type                 number,
216 parent_line_id                number,
217 top_model_line_id             number,
218 ato_parent_model_line_id      number,
219 ato_model_line_id             number,
220 MAND_COMP_FLAG                number,
221 parent_so_quantity            number,
222 fixed_lt                      number,
223 variable_lt                   number,
224 oss_error_code                number,
225 model_flag                    number,
226 requested_quantity            number,
227 atp_flag                      varchar2(1),
228 atp_components_flag           varchar2(1),
229 -- time_phased_atp
230 request_item_id               number,
231 atf_date                      date,
232 match_item_family_id          number,
233 dest_inventory_item_id        number,
234 parent_repl_ord_flag          varchar2(1),
235 comp_uom                      varchar2(3), --bug3110023
236 --4570421
237 scaling_type                  number,
238 scale_multiple                number,
239 scale_rounding_variance       number,
240 rounding_direction            number,
241 component_yield_factor        number, --4570421
242 usage_qty                     NUMBER, --4775920
243 organization_type             NUMBER  --4775920
244 );
245 
246 
247 
248 TYPE SourceCurTyp IS REF CURSOR;
249 
250 TYPE Atp_Info is RECORD (
251 atp_period                MRP_ATP_PUB.date_arr := MRP_ATP_PUB.date_arr(),
252 atp_qty                   MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr(),
253 limit_qty                 MRP_ATP_PUB.number_arr := MRP_ATP_PUB.number_arr()
254 );
255 
256 
257 PROCEDURE Extend_Atp (
258   p_atp_tab             IN OUT NOCOPY  MRP_ATP_PUB.ATP_Rec_Typ,
259   x_return_status       OUT      NoCopy VARCHAR2
260 );
261 
262 
263 PROCEDURE Assign_Atp_Input_Rec (
264   p_atp_table           IN       MRP_ATP_PUB.ATP_Rec_Typ,
265   p_index               IN       NUMBER,
266   x_atp_table           IN OUT   NoCopy MRP_ATP_PUB.ATP_Rec_Typ,
267   x_return_status       OUT      NoCopy VARCHAR2
268 );
269 
270 PROCEDURE Assign_Atp_Output_Rec (
271   p_atp_table           IN       MRP_ATP_PUB.ATP_Rec_Typ,
272   x_atp_table           IN OUT   NoCopy MRP_ATP_PUB.ATP_Rec_Typ,
273   x_return_status       OUT      NoCopy VARCHAR2
274 );
275 
276 
277 END MRP_ATP_PVT;