[Home] [Help]
PACKAGE BODY: APPS.MSC_ATP_GLOBAL
Source
1 PACKAGE BODY MSC_ATP_GLOBAL AS
2 /* $Header: MSCGLBLB.pls 120.4 2007/12/12 10:28:47 sbnaik ship $ */
3
4 G_PKG_NAME CONSTANT VARCHAR2(30) := 'MSC_ATP_GLOBAL';
5
6
7 PROCEDURE Extend_Atp (
8 p_atp_tab IN OUT NOCOPY MRP_ATP_PUB.ATP_Rec_Typ,
9 x_return_status OUT NoCopy VARCHAR2,
10 p_index IN NUMBER := 1
11 ) IS
12 Begin
13
14 x_return_status := FND_API.G_RET_STS_SUCCESS;
15
16 p_atp_tab.Row_Id.Extend(p_index);
17 p_atp_tab.Instance_Id.Extend(p_index);
18 p_atp_tab.Inventory_Item_Id.Extend(p_index);
19 p_atp_tab.Inventory_Item_Name.Extend(p_index);
20 p_atp_tab.Source_Organization_Id.Extend(p_index);
21 p_atp_tab.Organization_Id.Extend(p_index);
22 p_atp_tab.Source_Organization_Code.Extend(p_index);
23 p_atp_tab.Identifier.Extend(p_index);
24 p_atp_tab.Demand_Source_Header_Id.Extend(p_index);
25 p_atp_tab.Demand_Source_Delivery.Extend(p_index);
26 p_atp_tab.Demand_Source_Type.Extend(p_index);
27 p_atp_tab.Scenario_Id.Extend(p_index);
28 p_atp_tab.Calling_Module.Extend(p_index);
29 p_atp_tab.Customer_Id.Extend(p_index);
30 p_atp_tab.Customer_Site_Id.Extend(p_index);
31 p_atp_tab.Destination_Time_Zone.Extend(p_index);
32 p_atp_tab.Quantity_Ordered.Extend(p_index);
33 p_atp_tab.Quantity_UOM.Extend(p_index);
34 p_atp_tab.Requested_Ship_Date.Extend(p_index);
35 p_atp_tab.Requested_Arrival_Date.Extend(p_index);
36 p_atp_tab.Earliest_Acceptable_Date.Extend(p_index);
37 p_atp_tab.Latest_Acceptable_Date.Extend(p_index);
38 p_atp_tab.Delivery_Lead_Time.Extend(p_index);
39 p_atp_tab.Freight_Carrier.Extend(p_index);
40 p_atp_tab.Ship_Method.Extend(p_index);
41 p_atp_tab.Demand_Class.Extend(p_index);
42 p_atp_tab.Ship_Set_Name.Extend(p_index);
43 p_atp_tab.Arrival_Set_Name.Extend(p_index);
44 p_atp_tab.Override_Flag.Extend(p_index);
45 p_atp_tab.Action.Extend(p_index);
46 p_atp_tab.Ship_Date.Extend(p_index);
47 p_atp_tab.Arrival_Date.Extend(p_index);
48 p_atp_tab.Available_Quantity.Extend(p_index);
49 p_atp_tab.Requested_Date_Quantity.Extend(p_index);
50 p_atp_tab.Group_Ship_Date.Extend(p_index);
51 p_atp_tab.Group_Arrival_Date.Extend(p_index);
52 p_atp_tab.Vendor_Id.Extend(p_index);
53 p_atp_tab.Vendor_Name.Extend(p_index);
54 p_atp_tab.Vendor_Site_Id.Extend(p_index);
55 p_atp_tab.Vendor_Site_Name.Extend(p_index);
56 p_atp_tab.Insert_Flag.Extend(p_index);
57 p_atp_tab.OE_Flag.Extend(p_index);
58 p_atp_tab.Error_Code.Extend(p_index);
59 p_atp_tab.Atp_Lead_Time.Extend(p_index);
60 p_atp_tab.Message.Extend(p_index);
61 p_atp_tab.End_Pegging_Id.Extend(p_index);
62 p_atp_tab.Order_Number.Extend(p_index);
63 p_atp_tab.Old_Source_Organization_Id.Extend(p_index);
64 p_atp_tab.Old_Demand_Class.Extend(p_index);
65 p_atp_tab.ato_delete_flag.Extend(p_index); -- added by ngoel 6/15/2001
66 p_atp_tab.attribute_05.Extend(p_index); -- added by ngoel 7/31/2001
67 p_atp_tab.attribute_06.Extend(p_index); -- added by ngoel 8/09/2001
68 p_atp_tab.attribute_07.Extend(p_index); -- added for bug 2392456
69 p_atp_tab.attribute_01.Extend(p_index); -- added by ngoel 10/12/2001
70 p_atp_tab.customer_name.Extend(p_index); -- added by ngoel 10/12/2001
71 p_atp_tab.customer_class.Extend(p_index); -- added by ngoel 10/12/2001
72 p_atp_tab.customer_location.Extend(p_index); -- added by ngoel 10/12/2001
73 p_atp_tab.customer_country.Extend(p_index); -- added by ngoel 10/12/2001
74 p_atp_tab.customer_state.Extend(p_index); -- added by ngoel 10/12/2001
75 p_atp_tab.customer_city.Extend(p_index); -- added by ngoel 10/12/2001
76 p_atp_tab.customer_postal_code.Extend(p_index); -- added by ngoel 10/12/2001
77
78 --- added for product substitution
79 p_atp_tab.substitution_typ_code.Extend(p_index);
80 p_atp_tab.req_item_detail_flag.Extend(p_index);
81 p_atp_tab.request_item_id.Extend(p_index);
82 p_atp_tab.req_item_req_date_qty.Extend(p_index);
83 p_atp_tab.req_item_available_date.Extend(p_index);
84 p_atp_tab.req_item_available_date_qty.Extend(p_index);
85 p_atp_tab.request_item_name.Extend(p_index);
86 p_atp_tab.old_inventory_item_id.Extend(p_index);
87 p_atp_tab.sales_rep.Extend(p_index);
88 p_atp_tab.customer_contact.Extend(p_index);
89 p_atp_tab.subst_flag.Extend(p_index);
90
91 --diag_atp
92 p_atp_tab.attribute_02.Extend(p_index);
93
94 -- 24x7 Support
95 p_atp_tab.attribute_04.Extend(p_index);
96 p_atp_tab.attribute_08.Extend(p_index); -- 24x7
97
98 -- CTO enhancement
99 p_atp_tab.Top_Model_line_id.Extend(p_index);
100 p_atp_tab.ATO_Parent_Model_Line_Id.Extend(p_index);
101 p_atp_tab.ATO_Model_Line_Id.Extend(p_index);
102 p_atp_tab.Parent_line_id.Extend(p_index);
103 p_atp_tab.match_item_id.Extend(p_index);
104 p_atp_tab.matched_item_name.Extend(p_index);
105 p_atp_tab.Config_item_line_id.Extend(p_index);
106 p_atp_tab.Validation_Org.Extend(p_index);
107 p_atp_tab.Component_Sequence_ID.Extend(p_index);
108 p_atp_tab.Component_Code.Extend(p_index);
109 p_atp_tab.line_number.Extend(p_index);
110 p_atp_tab.included_item_flag.Extend(p_index);
111 p_atp_tab.included_item_flag.Extend(p_index);
112 p_atp_tab.atp_flag.Extend(p_index);
113 p_atp_tab.atp_components_flag.Extend(p_index);
114 p_atp_tab.wip_supply_type.Extend(p_index);
115 p_atp_tab.bom_item_type.Extend(p_index);
116 p_atp_tab.mandatory_item_flag.Extend(p_index);
117 p_atp_tab.pick_components_flag.Extend(p_index);
118 p_atp_tab.base_model_id.Extend(p_index);
119 p_atp_tab.OSS_ERROR_CODE.Extend(p_index);
120 p_atp_tab.sequence_number.Extend(p_index);
121 p_atp_tab.firm_flag.Extend(p_index);
122 p_atp_tab.order_line_number.Extend(p_index);
123 p_atp_tab.option_number.Extend(p_index);
124 p_atp_tab.shipment_number.Extend(p_index);
125 p_atp_tab.item_desc.Extend(p_index);
126 p_atp_tab.old_line_schedule_date.Extend(p_index);
127 p_atp_tab.old_source_organization_code.Extend(p_index);
128 p_atp_tab.firm_source_org_id.Extend(p_index);
129 p_atp_tab.firm_source_org_code.Extend(p_index);
130 p_atp_tab.firm_ship_date.Extend(p_index);
131 p_atp_tab.firm_arrival_date.Extend(p_index);
132 p_atp_tab.ship_method_text.Extend(p_index);
133 p_atp_tab.ship_set_id.Extend(p_index);
134 p_atp_tab.arrival_set_id.Extend(p_index);
135 p_atp_tab.PROJECT_ID.Extend(p_index);
136 p_atp_tab.TASK_ID.Extend(p_index);
137 p_atp_tab.PROJECT_NUMBER.Extend(p_index);
138 p_atp_tab.TASK_NUMBER.Extend(p_index);
139 p_atp_tab.attribute_11.Extend(p_index);
140 p_atp_tab.attribute_12.Extend(p_index);
141 p_atp_tab.attribute_13.Extend(p_index);
142 p_atp_tab.attribute_14.Extend(p_index);
143 p_atp_tab.attribute_15.Extend(p_index);
144 p_atp_tab.attribute_16.Extend(p_index);
145 p_atp_tab.attribute_17.Extend(p_index);
146 p_atp_tab.attribute_18.Extend(p_index);
147 p_atp_tab.attribute_19.Extend(p_index);
148 p_atp_tab.attribute_20.Extend(p_index);
149 p_atp_tab.Attribute_21.Extend(p_index);
150 p_atp_tab.attribute_22.Extend(p_index);
151 p_atp_tab.attribute_23.Extend(p_index);
152 p_atp_tab.attribute_24.Extend(p_index);
153 p_atp_tab.attribute_25.Extend(p_index);
154 p_atp_tab.attribute_26.Extend(p_index);
155 p_atp_tab.attribute_27.Extend(p_index);
156 p_atp_tab.attribute_28.Extend(p_index);
157 p_atp_tab.attribute_29.Extend(p_index);
158 p_atp_tab.attribute_30.Extend(p_index);
159
160 p_atp_tab.atf_date.Extend(p_index);
161 --plan by request date enhancment for capturing request date in case of 24*7 ATP
162 p_atp_tab.original_request_date.Extend(p_index);
163 p_atp_tab.plan_id.Extend(p_index); -- time_phased_atp
164
165 p_atp_tab.cascade_model_info_to_comp.extend(p_index);
166
167 -- ship_rec_cal
168 p_atp_tab.receiving_cal_code.Extend(p_index);
169 p_atp_tab.intransit_cal_code.Extend(p_index);
170 p_atp_tab.shipping_cal_code.Extend(p_index);
171 p_atp_tab.manufacturing_cal_code.Extend(p_index);
172
173 -- Bug 3449812
174 p_atp_tab.internal_org_id.Extend(p_index);
175
176 --bug 3328421
177 p_atp_tab.first_valid_ship_arrival_date.Extend(p_index);
178
179 --2814895
180 p_atp_tab.party_site_id.Extend(p_index);
181
182 p_atp_tab.part_of_set.extend(p_index); --4500382
183
184 p_atp_tab.attribute_14.extend(p_index); --5195929
185
186 -- msc_sch_wb.atp_debug('***** End Extend_Atp Procedure *****');
187
188 END Extend_Atp;
189
190 FUNCTION Get_APS_Version
191 RETURN Number
192
193 IS
194 BEGIN
195
196 RETURN G_APS_Version;
197
198 END Get_APS_Version;
199
200 Procedure Get_ATP_Session_Id (
201 x_session_id OUT NOCOPY NUMBER,
202 x_return_status OUT NOCOPY VARCHAR2)
203 IS
204 PRAGMA AUTONOMOUS_TRANSACTION;
205 l_dblink VARCHAR2(80);
206 l_instance_id number;
207 l_return_status varchar2(10);
208 BEGIN
209
210 --get dblink
211 MSC_SATP_FUNC.get_dblink_profile(l_dblink,l_instance_id,l_return_status);
212
213 IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
214 --RAISE FND_API.G_EXC_ERROR ;
215 --if we are unable to get l_dblink then we assume that its same instance.
216 -- This may happen when APS instance is not defined.
217 l_return_status := FND_API.G_RET_STS_SUCCESS;
218 l_dblink := null;
219 END IF;
220
221 --get session id
222 MSC_SCH_WB.get_session_id(l_dblink, x_session_id);
223
224 x_return_status := l_return_status;
225 EXCEPTION
226 WHEN OTHERS THEN
227 x_return_status := FND_API.G_RET_STS_ERROR;
228 END Get_ATP_Session_Id;
229
230
231 END MSC_ATP_GLOBAL;