[Home] [Help]
PACKAGE BODY: APPS.OE_ORDER_IMPORT_PVT
Source
1 PACKAGE BODY OE_ORDER_IMPORT_PVT AS
2 /* $Header: OEXVIMPB.pls 120.16.12010000.5 2008/10/11 09:41:14 amimukhe ship $ */
3
4 /* ---------------------------------------------------------------
5 -- Start of Comments
6 -- API name OE_ORDER_IMPORT_PVT
7 -- Type Private
8 -- Function
9 -- Pre-reqs
10 -- Parameters
11 -- Version Current version = 1.0
12 -- Initial version = 1.0
13 -- Notes
14 --
15 -- End of Comments
16 ------------------------------------------------------------------
17 */
18
19 /* -----------------------------------------------------------
20 Procedure: Import_Order
21 -----------------------------------------------------------
22 */
23 PROCEDURE IMPORT_ORDER(
24 p_request_id IN NUMBER
25 ,p_order_source_id IN NUMBER
26 ,p_orig_sys_document_ref IN VARCHAR2
27 ,p_sold_to_org_id IN NUMBER
28 ,p_sold_to_org IN VARCHAR2
29 ,p_change_sequence IN VARCHAR2
30 ,p_validate_only IN VARCHAR2
31 ,p_init_msg_list IN VARCHAR2
32 ,p_rtrim_data IN VARCHAR2
33 ,p_org_id IN NUMBER
34 ,p_msg_count OUT NOCOPY NUMBER
35 ,p_msg_data OUT NOCOPY VARCHAR2
36 ,p_return_status OUT NOCOPY VARCHAR2
37 ,p_validate_desc_flex in varchar2 default 'Y' -- bug4343612
38 ) IS
39
40 l_control_rec OE_Globals.Control_Rec_Type;
41
42 l_header_adj_rec OE_Order_Pub.Header_Adj_Rec_Type;
43 l_header_scredit_rec OE_Order_Pub.Header_Scredit_Rec_Type;
44 l_header_payment_rec OE_Order_Pub.Header_payment_Rec_Type;
45 l_header_price_att_rec OE_Order_Pub.Header_Price_Att_Rec_Type;
46 l_header_adj_att_rec OE_Order_Pub.Header_Adj_Att_Rec_Type;
47 l_header_adj_assoc_rec OE_Order_Pub.Header_Adj_Assoc_Rec_Type;
48 l_line_rec OE_Order_Pub.Line_Rec_Type;
49 l_line_adj_rec OE_Order_Pub.Line_Adj_Rec_Type;
50 l_line_price_att_rec OE_Order_Pub.Line_Price_Att_Rec_Type;
51 l_line_adj_att_rec OE_Order_Pub.Line_Adj_Att_Rec_Type;
52 l_line_adj_assoc_rec OE_Order_Pub.Line_Adj_Assoc_Rec_Type;
53 l_line_scredit_rec OE_Order_Pub.Line_Scredit_Rec_Type;
54 l_line_payment_rec OE_Order_Pub.Line_payment_Rec_Type;
55 l_lot_serial_rec OE_Order_Pub.Lot_Serial_Rec_Type;
56 l_reservation_rec OE_Order_Pub.Reservation_Rec_Type;
57 l_action_request_rec OE_Order_Pub.Request_Rec_Type;
58
59 l_header_rec OE_Order_Pub.Header_Rec_Type;
60 l_header_adj_tbl OE_Order_Pub.Header_Adj_Tbl_Type;
61 l_header_price_att_tbl OE_Order_Pub.Header_Price_Att_Tbl_Type;
62 l_header_adj_att_tbl OE_Order_Pub.Header_Adj_Att_Tbl_Type;
63 l_header_adj_assoc_tbl OE_Order_Pub.Header_Adj_Assoc_Tbl_Type;
64 l_header_scredit_tbl OE_Order_Pub.Header_Scredit_Tbl_Type;
65 l_header_payment_tbl OE_Order_Pub.Header_payment_Tbl_Type;
66 l_line_tbl OE_Order_Pub.Line_Tbl_Type;
67 l_line_adj_tbl OE_Order_Pub.Line_Adj_Tbl_Type;
68 l_line_price_att_tbl OE_Order_Pub.Line_Price_Att_Tbl_Type;
69 l_line_adj_att_tbl OE_Order_Pub.Line_Adj_Att_Tbl_Type;
70 l_line_adj_assoc_tbl OE_Order_Pub.Line_Adj_Assoc_Tbl_Type;
71 l_line_scredit_tbl OE_Order_Pub.Line_Scredit_Tbl_Type;
72 l_line_payment_tbl OE_Order_Pub.Line_payment_Tbl_Type;
73 l_lot_serial_tbl OE_Order_Pub.Lot_Serial_Tbl_Type;
74 l_reservation_tbl OE_Order_Pub.Reservation_Tbl_Type;
75 l_action_request_tbl OE_Order_Pub.Request_Tbl_Type;
76
77 l_header_rec_old OE_Order_Pub.Header_Rec_Type;
78 l_header_adj_tbl_old OE_Order_Pub.Header_Adj_Tbl_Type;
79 l_header_price_att_tbl_old OE_Order_Pub.Header_Price_Att_Tbl_Type;
80 l_header_adj_att_tbl_old OE_Order_Pub.Header_Adj_Att_Tbl_Type;
81 l_header_adj_assoc_tbl_old OE_Order_Pub.Header_Adj_Assoc_Tbl_Type;
82 l_header_scredit_tbl_old OE_Order_Pub.Header_Scredit_Tbl_Type;
83 l_header_payment_tbl_old OE_Order_Pub.Header_payment_Tbl_Type;
84 l_line_tbl_old OE_Order_Pub.Line_Tbl_Type;
85 l_line_adj_tbl_old OE_Order_Pub.Line_Adj_Tbl_Type;
86 l_line_price_att_tbl_old OE_Order_Pub.Line_Price_Att_Tbl_Type;
87 l_line_adj_att_tbl_old OE_Order_Pub.Line_Adj_Att_Tbl_Type;
88 l_line_adj_assoc_tbl_old OE_Order_Pub.Line_Adj_Assoc_Tbl_Type;
89 l_line_scredit_tbl_old OE_Order_Pub.Line_Scredit_Tbl_Type;
90 l_line_payment_tbl_old OE_Order_Pub.Line_payment_Tbl_Type;
91 l_lot_serial_tbl_old OE_Order_Pub.Lot_Serial_Tbl_Type;
92 l_action_request_tbl_old OE_Order_Pub.Request_Tbl_Type;
93
94 l_header_rec_new OE_Order_Pub.Header_Rec_Type;
95 l_header_adj_tbl_new OE_Order_Pub.Header_Adj_Tbl_Type;
96 l_header_price_att_tbl_new OE_Order_Pub.Header_Price_Att_Tbl_Type;
97 l_header_adj_att_tbl_new OE_Order_Pub.Header_Adj_Att_Tbl_Type;
98 l_header_adj_assoc_tbl_new OE_Order_Pub.Header_Adj_Assoc_Tbl_Type;
99 l_header_scredit_tbl_new OE_Order_Pub.Header_Scredit_Tbl_Type;
100 l_header_payment_tbl_new OE_Order_Pub.Header_payment_Tbl_Type;
101 l_line_tbl_new OE_Order_Pub.Line_Tbl_Type;
102 l_line_adj_tbl_new OE_Order_Pub.Line_Adj_Tbl_Type;
103 l_line_price_att_tbl_new OE_Order_Pub.Line_Price_Att_Tbl_Type;
104 l_line_adj_att_tbl_new OE_Order_Pub.Line_Adj_Att_Tbl_Type;
105 l_line_adj_assoc_tbl_new OE_Order_Pub.Line_Adj_Assoc_Tbl_Type;
106 l_line_scredit_tbl_new OE_Order_Pub.Line_Scredit_Tbl_Type;
107 l_line_payment_tbl_new OE_Order_Pub.Line_payment_Tbl_Type;
108 l_lot_serial_tbl_new OE_Order_Pub.Lot_Serial_Tbl_Type;
109
110 l_header_adj_val_rec OE_Order_Pub.Header_Adj_Val_Rec_Type;
111 l_header_scredit_val_rec OE_Order_Pub.Header_Scredit_Val_Rec_Type;
112 l_header_payment_val_rec OE_Order_Pub.Header_payment_Val_Rec_Type;
113 l_line_val_rec OE_Order_Pub.Line_Val_Rec_Type;
114 l_line_adj_val_rec OE_Order_Pub.Line_Adj_Val_Rec_Type;
115 l_line_scredit_val_rec OE_Order_Pub.Line_Scredit_Val_Rec_Type;
116 l_line_payment_val_rec OE_Order_Pub.Line_payment_Val_Rec_Type;
117 l_lot_serial_val_rec OE_Order_Pub.Lot_Serial_Val_Rec_Type;
118 l_reservation_val_rec OE_Order_Pub.Reservation_Val_Rec_Type;
119
120 l_header_val_rec OE_Order_Pub.Header_Val_Rec_Type;
121 l_header_adj_val_tbl OE_Order_Pub.Header_Adj_Val_Tbl_Type;
122 l_header_scredit_val_tbl OE_Order_Pub.Header_Scredit_Val_Tbl_Type;
123 l_header_payment_val_tbl OE_Order_Pub.Header_payment_Val_Tbl_Type;
124 l_line_val_tbl OE_Order_Pub.Line_Val_Tbl_Type;
125 l_line_adj_val_tbl OE_Order_Pub.Line_Adj_Val_Tbl_Type;
126 l_line_scredit_val_tbl OE_Order_Pub.Line_Scredit_Val_Tbl_Type;
127 l_line_payment_val_tbl OE_Order_Pub.Line_payment_Val_Tbl_Type;
128 l_lot_serial_val_tbl OE_Order_Pub.Lot_Serial_Val_Tbl_Type;
129 l_reservation_val_tbl OE_Order_Pub.Reservation_Val_Tbl_Type;
130
131 l_header_val_rec_old OE_Order_Pub.Header_Val_Rec_Type;
132 l_header_adj_val_tbl_old OE_Order_Pub.Header_Adj_Val_Tbl_Type;
133 l_header_scredit_val_tbl_old OE_Order_Pub.Header_Scredit_Val_Tbl_Type;
134 l_header_payment_val_tbl_old OE_Order_Pub.Header_payment_Val_Tbl_Type;
135 l_line_val_tbl_old OE_Order_Pub.Line_Val_Tbl_Type;
136 l_line_adj_val_tbl_old OE_Order_Pub.Line_Adj_Val_Tbl_Type;
137 l_line_scredit_val_tbl_old OE_Order_Pub.Line_Scredit_Val_Tbl_Type;
138 l_line_payment_val_tbl_old OE_Order_Pub.Line_payment_Val_Tbl_Type;
139 l_lot_serial_val_tbl_old OE_Order_Pub.Lot_Serial_Val_Tbl_Type;
140
141 l_header_val_rec_new OE_Order_Pub.Header_Val_Rec_Type;
142 l_header_adj_val_tbl_new OE_Order_Pub.Header_Adj_Val_Tbl_Type;
143 l_header_scredit_val_tbl_new OE_Order_Pub.Header_Scredit_Val_Tbl_Type;
144 l_header_payment_val_tbl_new OE_Order_Pub.Header_payment_Val_Tbl_Type;
145 l_line_val_tbl_new OE_Order_Pub.Line_Val_Tbl_Type;
146 l_line_adj_val_tbl_new OE_Order_Pub.Line_Adj_Val_Tbl_Type;
147 l_line_scredit_val_tbl_new OE_Order_Pub.Line_Scredit_Val_Tbl_Type;
148 l_line_payment_val_tbl_new OE_Order_Pub.Line_payment_Val_Tbl_Type;
149 l_lot_serial_val_tbl_new OE_Order_Pub.Lot_Serial_Val_Tbl_Type;
150
151 l_action_rec OE_Order_Import_Pvt.Action_Rec_Type;
152
153 l_request_id NUMBER := p_request_id;
154 l_order_source_id NUMBER := p_order_source_id;
155 l_orig_sys_document_ref VARCHAR2(50) := p_orig_sys_document_ref;
156 l_sold_to_org_id NUMBER := p_sold_to_org_id;
157 l_sold_to_org VARCHAR2(360) := p_sold_to_org;
158 l_change_sequence VARCHAR2(50) := p_change_sequence;
159 l_org_id NUMBER := p_org_id;
160 l_orig_sys_line_ref VARCHAR2(50);
161 l_orig_sys_shipment_ref VARCHAR2(50);
162
163 l_order_type_id NUMBER;
164 l_order_number NUMBER;
165 l_line_number NUMBER;
166 l_shipment_number NUMBER;
167 l_header_id NUMBER;
168 l_line_id NUMBER;
169
170 l_validate_only VARCHAR2(1);
171 l_init_msg_list VARCHAR2(1) := p_init_msg_list;
172 l_validation_level NUMBER := FND_API.G_VALID_LEVEL_FULL;
173 l_return_values VARCHAR2(1) := FND_API.G_FALSE;
174 l_commit VARCHAR2(1) := FND_API.G_FALSE;
175 l_api_service_level VARCHAR2(30) := OE_GLOBALS.G_ALL_SERVICE;
176
177 l_return_status VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
178 l_return_status_oi_pre VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
179 l_return_status_oi_pst VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
180 l_return_status_po VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
181 l_return_status_del_ord VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
182 l_return_status_del_msg VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
183 l_return_status_sav_msg VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
184 l_return_status_upd_err VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
185 l_return_status_book VARCHAR2(1) := FND_API.G_RET_STS_SUCCESS;
186 l_error_index_flag VARCHAR2(1) := 'N';
187 l_validation_org NUMBER := OE_Sys_Parameters.VALUE('MASTER_ORGANIZATION_ID', p_org_id);
188
189 l_header_count NUMBER := 0;
190 l_header_adj_count NUMBER := 0;
191 l_header_att_count NUMBER := 0;
192 l_header_scredit_count NUMBER := 0;
193 l_header_payment_count NUMBER := 0;
194 l_line_count NUMBER := 0;
195 l_line_adj_count NUMBER := 0;
196 l_line_att_count NUMBER := 0;
197 l_line_scredit_count NUMBER := 0;
198 l_line_payment_count NUMBER := 0;
199 l_lot_serial_count NUMBER := 0;
200 l_reservation_count NUMBER := 0;
201 l_action_request_count NUMBER := 0;
202
203 l_msg_index NUMBER := 0;
204 l_msg_context VARCHAR2(2000);
205 l_msg_data VARCHAR2(2000);
206 l_tbl_index Number;
207
208 l_msg_entity_code VARCHAR2(30);
209 l_msg_entity_ref VARCHAR2(50);
210 l_msg_entity_id NUMBER;
211 l_msg_header_id NUMBER;
212 l_msg_line_id NUMBER;
213 l_msg_order_source_id NUMBER;
214 l_msg_orig_sys_document_ref VARCHAR2(50);
215 l_msg_change_sequence VARCHAR2(50);
216 l_msg_orig_sys_line_ref VARCHAR2(50);
217 l_msg_orig_sys_shipment_ref VARCHAR2(50);
218 l_msg_sold_to_org_id NUMBER;
219 l_msg_sold_to_org VARCHAR2(360);
220 l_msg_source_document_type_id NUMBER;
221 l_msg_source_document_id NUMBER;
222 l_msg_source_document_line_id NUMBER;
223 l_msg_attribute_code VARCHAR2(50);
224 l_msg_constraint_id NUMBER;
225 l_msg_process_activity NUMBER;
226 l_msg_notification_flag VARCHAR2(1);
227 l_msg_type VARCHAR2(30);
228
229 l_commit_flag VARCHAR2(1) := 'Y';
230 l_delete_flag VARCHAR2(1) := 'Y';
231
232 l_api_name CONSTANT VARCHAR2(30) := 'Import_Order';
233
234 l_structure fnd_flex_key_api.structure_type;
235 l_flexfield fnd_flex_key_api.flexfield_type;
236 l_segment_array fnd_flex_ext.segmentarray;
237 l_n_segments NUMBER;
238 l_segments FND_FLEX_KEY_API.SEGMENT_LIST;
239 l_id NUMBER;
240 failure_message varchar2(2000);
241
242 --{ Start of the variable declaration for the add customer
243
244 l_header_customer_rec OE_ORDER_IMPORT_SPECIFIC_PVT.Customer_Rec_Type;
245 l_line_customer_rec OE_ORDER_IMPORT_SPECIFIC_PVT.Customer_Rec_Type;
246 l_line_customer_tbl OE_ORDER_IMPORT_SPECIFIC_PVT.Customer_Tbl_Type;
247
248 --End of the variable declaration for the add customer}
249
250 --{ Start of the subinventory Nulling Code variable declartion
251 l_revision_code NUMBER;
252 l_lot_code NUMBER;
253 -- End of subinventory Nulling Code variable declartion}
254
255 G_IMPORT_SHIPMENTS VARCHAR2(3);
256
257 l_order_imported Varchar2(1);
258 l_header_cso_response_flag Varchar2(1);
259 l_cso_response_pfile Varchar2(3);
260 l_cho_ack_send_pfile Varchar2(3);
261 l_sold_to_org_id_tmp NUMBER;
262
263 l_rtrim_data Varchar2(1) := p_rtrim_data;
264 l_status VARCHAR2(1); -- Added for the bug 6378240
265
266 l_msg_data_vp varchar2(2000); -- Added for bug 7367433
267 l_msg_count_vp number; -- Added for bug 7367433
268
269
270 --myerrams, Bug:4724191 l_header_id_temp NUMBER; --myerrams
271
272
273 /* -----------------------------------------------------------
274 Headers cursor
275 -----------------------------------------------------------
276 */
277 CURSOR l_header_cursor IS
278 SELECT order_source_id
279 , orig_sys_document_ref
280 , change_sequence
281 , nvl(change_request_code, FND_API.G_MISS_CHAR)
282 , nvl(order_source, FND_API.G_MISS_CHAR)
283 , nvl(org_id, FND_API.G_MISS_NUM)
284 , nvl(header_id, FND_API.G_MISS_NUM)
285 , nvl(order_number, FND_API.G_MISS_NUM)
286 , nvl(version_number, FND_API.G_MISS_NUM)
287 , nvl(ordered_date, FND_API.G_MISS_DATE)
288 , nvl(order_type_id, FND_API.G_MISS_NUM)
289 , nvl(order_type, FND_API.G_MISS_CHAR)
290 , nvl(price_list_id, FND_API.G_MISS_NUM)
291 , nvl(price_list, FND_API.G_MISS_CHAR)
292 , nvl(conversion_rate, FND_API.G_MISS_NUM)
293 , nvl(conversion_rate_date, FND_API.G_MISS_DATE)
294 , nvl(conversion_type_code, FND_API.G_MISS_CHAR)
295 , nvl(conversion_type, FND_API.G_MISS_CHAR)
296 , nvl(transactional_curr_code, FND_API.G_MISS_CHAR)
297 , nvl(return_reason_code, FND_API.G_MISS_CHAR)
298 , nvl(salesrep_id, FND_API.G_MISS_NUM)
299 , nvl(salesrep, FND_API.G_MISS_CHAR)
300 , nvl(sales_channel_code, FND_API.G_MISS_CHAR)
301 , nvl(sales_channel, FND_API.G_MISS_CHAR)
302 , nvl(tax_point_code, FND_API.G_MISS_CHAR)
303 , nvl(tax_point, FND_API.G_MISS_CHAR)
304 , nvl(tax_exempt_flag, FND_API.G_MISS_CHAR)
305 , nvl(tax_exempt_number, FND_API.G_MISS_CHAR)
306 , nvl(tax_exempt_reason_code, FND_API.G_MISS_CHAR)
307 , nvl(tax_exempt_reason, FND_API.G_MISS_CHAR)
308 , nvl(agreement_id, FND_API.G_MISS_NUM)
309 , nvl(agreement, FND_API.G_MISS_CHAR)
310 , nvl(invoicing_rule_id, FND_API.G_MISS_NUM)
311 , nvl(invoicing_rule, FND_API.G_MISS_CHAR)
312 , nvl(accounting_rule_id, FND_API.G_MISS_NUM)
313 , nvl(accounting_rule_duration, FND_API.G_MISS_NUM)
314 , nvl(accounting_rule, FND_API.G_MISS_CHAR)
315 , nvl(payment_term_id, FND_API.G_MISS_NUM)
316 , nvl(payment_term, FND_API.G_MISS_CHAR)
317 , nvl(demand_class_code, FND_API.G_MISS_CHAR)
318 , nvl(shipment_priority_code, FND_API.G_MISS_CHAR)
319 , nvl(shipment_priority, FND_API.G_MISS_CHAR)
320 , nvl(shipping_method_code, FND_API.G_MISS_CHAR)
321 , nvl(freight_carrier_code, FND_API.G_MISS_CHAR)
322 , nvl(freight_terms_code, FND_API.G_MISS_CHAR)
323 , nvl(freight_terms, FND_API.G_MISS_CHAR)
324 , nvl(fob_point_code, FND_API.G_MISS_CHAR)
325 , nvl(fob_point, FND_API.G_MISS_CHAR)
326 , nvl(partial_shipments_allowed, FND_API.G_MISS_CHAR)
327 , nvl(ship_tolerance_above, FND_API.G_MISS_NUM)
328 , nvl(ship_tolerance_below, FND_API.G_MISS_NUM)
329 , nvl(shipping_instructions, FND_API.G_MISS_CHAR)
330 , nvl(packing_instructions, FND_API.G_MISS_CHAR)
331 , nvl(order_date_type_code, FND_API.G_MISS_CHAR)
332 , nvl(earliest_schedule_limit, FND_API.G_MISS_NUM)
333 , nvl(latest_schedule_limit, FND_API.G_MISS_NUM)
334 , nvl(customer_po_number, FND_API.G_MISS_CHAR)
335 , nvl(customer_payment_term_id, FND_API.G_MISS_NUM)
336 , nvl(customer_payment_term, FND_API.G_MISS_CHAR)
337 , nvl(payment_type_code, FND_API.G_MISS_CHAR)
338 , nvl(payment_amount, FND_API.G_MISS_NUM)
339 , nvl(check_number, FND_API.G_MISS_CHAR)
340 , nvl(credit_card_code, FND_API.G_MISS_CHAR)
341 , nvl(credit_card_holder_name, FND_API.G_MISS_CHAR)
342 , nvl(credit_card_number, FND_API.G_MISS_CHAR)
343 , nvl(credit_card_expiration_date, FND_API.G_MISS_DATE)
344 , nvl(credit_card_approval_code, FND_API.G_MISS_CHAR)
345 , nvl(credit_card_approval_date, FND_API.G_MISS_DATE)
346 , nvl(sold_from_org_id, FND_API.G_MISS_NUM)
347 , nvl(sold_from_org, FND_API.G_MISS_CHAR)
348 , nvl(sold_to_org_id, FND_API.G_MISS_NUM)
349 , nvl(sold_to_org, FND_API.G_MISS_CHAR)
350 , nvl(customer_number, FND_API.G_MISS_CHAR)
351 , nvl(ship_from_org_id, FND_API.G_MISS_NUM)
352 , nvl(ship_from_org, FND_API.G_MISS_CHAR)
353 , nvl(ship_to_org_id, FND_API.G_MISS_NUM)
354 , nvl(ship_to_org, FND_API.G_MISS_CHAR)
355 , nvl(invoice_to_org_id, FND_API.G_MISS_NUM)
356 , nvl(invoice_to_org, FND_API.G_MISS_CHAR)
357 , nvl(deliver_to_org_id, FND_API.G_MISS_NUM)
358 , nvl(deliver_to_org, FND_API.G_MISS_CHAR)
359 , nvl(sold_to_contact_id, FND_API.G_MISS_NUM)
360 , nvl(sold_to_contact, FND_API.G_MISS_CHAR)
361 , nvl(ship_to_contact_id, FND_API.G_MISS_NUM)
362 , nvl(ship_to_contact, FND_API.G_MISS_CHAR)
363 , nvl(invoice_to_contact_id, FND_API.G_MISS_NUM)
364 , nvl(invoice_to_contact, FND_API.G_MISS_CHAR)
365 , nvl(deliver_to_contact_id, FND_API.G_MISS_NUM)
366 , nvl(deliver_to_contact, FND_API.G_MISS_CHAR)
367 , nvl(ship_to_address1, FND_API.G_MISS_CHAR)
368 , nvl(ship_to_address2, FND_API.G_MISS_CHAR)
369 , nvl(ship_to_address3, FND_API.G_MISS_CHAR)
370 , nvl(ship_to_address4, FND_API.G_MISS_CHAR)
371 , nvl(ship_to_city, FND_API.G_MISS_CHAR)
372 , nvl(ship_to_state, FND_API.G_MISS_CHAR)
373 , nvl(ship_to_postal_code, FND_API.G_MISS_CHAR)
374 , nvl(ship_to_country, FND_API.G_MISS_CHAR)
375 , nvl(invoice_address1, FND_API.G_MISS_CHAR)
376 , nvl(invoice_address2, FND_API.G_MISS_CHAR)
377 , nvl(invoice_address3, FND_API.G_MISS_CHAR)
378 , nvl(invoice_address4, FND_API.G_MISS_CHAR)
379 , nvl(invoice_city, FND_API.G_MISS_CHAR)
380 , nvl(invoice_state, FND_API.G_MISS_CHAR)
381 , nvl(invoice_postal_code, FND_API.G_MISS_CHAR)
382 , nvl(invoice_country, FND_API.G_MISS_CHAR)
383 , nvl(drop_ship_flag, FND_API.G_MISS_CHAR)
384 , nvl(booked_flag, FND_API.G_MISS_CHAR)
385 -- , nvl(closed_flag, FND_API.G_MISS_CHAR)
386 , nvl(cancelled_flag, FND_API.G_MISS_CHAR)
387 , nvl(context, FND_API.G_MISS_CHAR)
388 , nvl(attribute1, FND_API.G_MISS_CHAR)
389 , nvl(attribute2, FND_API.G_MISS_CHAR)
390 , nvl(attribute3, FND_API.G_MISS_CHAR)
391 , nvl(attribute4, FND_API.G_MISS_CHAR)
392 , nvl(attribute5, FND_API.G_MISS_CHAR)
393 , nvl(attribute6, FND_API.G_MISS_CHAR)
394 , nvl(attribute7, FND_API.G_MISS_CHAR)
395 , nvl(attribute8, FND_API.G_MISS_CHAR)
396 , nvl(attribute9, FND_API.G_MISS_CHAR)
397 , nvl(attribute10, FND_API.G_MISS_CHAR)
398 , nvl(attribute11, FND_API.G_MISS_CHAR)
399 , nvl(attribute12, FND_API.G_MISS_CHAR)
400 , nvl(attribute13, FND_API.G_MISS_CHAR)
401 , nvl(attribute14, FND_API.G_MISS_CHAR)
402 , nvl(attribute15, FND_API.G_MISS_CHAR)
403 , nvl(attribute16, FND_API.G_MISS_CHAR) -- for bug 2184255
404 , nvl(attribute17, FND_API.G_MISS_CHAR)
405 , nvl(attribute18, FND_API.G_MISS_CHAR)
406 , nvl(attribute19, FND_API.G_MISS_CHAR)
407 , nvl(attribute20, FND_API.G_MISS_CHAR)
408 , nvl(tp_context, FND_API.G_MISS_CHAR)
409 , nvl(tp_attribute1, FND_API.G_MISS_CHAR)
410 , nvl(tp_attribute2, FND_API.G_MISS_CHAR)
411 , nvl(tp_attribute3, FND_API.G_MISS_CHAR)
412 , nvl(tp_attribute4, FND_API.G_MISS_CHAR)
413 , nvl(tp_attribute5, FND_API.G_MISS_CHAR)
414 , nvl(tp_attribute6, FND_API.G_MISS_CHAR)
415 , nvl(tp_attribute7, FND_API.G_MISS_CHAR)
416 , nvl(tp_attribute8, FND_API.G_MISS_CHAR)
417 , nvl(tp_attribute9, FND_API.G_MISS_CHAR)
418 , nvl(tp_attribute10, FND_API.G_MISS_CHAR)
419 , nvl(tp_attribute11, FND_API.G_MISS_CHAR)
420 , nvl(tp_attribute12, FND_API.G_MISS_CHAR)
421 , nvl(tp_attribute13, FND_API.G_MISS_CHAR)
422 , nvl(tp_attribute14, FND_API.G_MISS_CHAR)
423 , nvl(tp_attribute15, FND_API.G_MISS_CHAR)
424 , nvl(global_attribute_category, FND_API.G_MISS_CHAR)
425 , nvl(global_attribute1, FND_API.G_MISS_CHAR)
426 , nvl(global_attribute2, FND_API.G_MISS_CHAR)
427 , nvl(global_attribute3, FND_API.G_MISS_CHAR)
428 , nvl(global_attribute4, FND_API.G_MISS_CHAR)
429 , nvl(global_attribute5, FND_API.G_MISS_CHAR)
430 , nvl(global_attribute6, FND_API.G_MISS_CHAR)
431 , nvl(global_attribute7, FND_API.G_MISS_CHAR)
432 , nvl(global_attribute8, FND_API.G_MISS_CHAR)
433 , nvl(global_attribute9, FND_API.G_MISS_CHAR)
434 , nvl(global_attribute10, FND_API.G_MISS_CHAR)
435 , nvl(global_attribute11, FND_API.G_MISS_CHAR)
436 , nvl(global_attribute12, FND_API.G_MISS_CHAR)
437 , nvl(global_attribute13, FND_API.G_MISS_CHAR)
438 , nvl(global_attribute14, FND_API.G_MISS_CHAR)
439 , nvl(global_attribute15, FND_API.G_MISS_CHAR)
440 , nvl(global_attribute16, FND_API.G_MISS_CHAR)
441 , nvl(global_attribute17, FND_API.G_MISS_CHAR)
442 , nvl(global_attribute18, FND_API.G_MISS_CHAR)
443 , nvl(global_attribute19, FND_API.G_MISS_CHAR)
444 , nvl(global_attribute20, FND_API.G_MISS_CHAR)
445 , request_id
446 , NVL(request_date, FND_API.G_MISS_DATE)
447 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
448 , nvl(ready_flag, 'Y')
449 , nvl(status_flag, '0')
450 , nvl(force_apply_flag, 'N')
451 , nvl(change_reason, FND_API.G_MISS_CHAR)
452 , nvl(change_comments, FND_API.G_MISS_CHAR)
453 , nvl(customer_preference_set_code, FND_API.G_MISS_CHAR)
454 -- { Start add new columns to select for the Add Customer
455 , Orig_Sys_Customer_Ref
456 , Orig_Ship_Address_Ref
457 , Orig_Bill_Address_Ref
458 , Orig_Deliver_Address_Ref
459 , Sold_to_Contact_Ref
460 , Ship_to_Contact_Ref
461 , Bill_to_Contact_Ref
462 , Deliver_to_Contact_Ref
463 -- End add new columns to select for the Add Customer}
464 , Xml_Message_Id
465 , nvl(ship_to_customer, FND_API.G_MISS_CHAR)
466 , nvl(ship_to_customer_number, FND_API.G_MISS_CHAR)
467 , nvl(ship_to_customer_id, FND_API.G_MISS_NUM)
468 , nvl(invoice_customer, FND_API.G_MISS_CHAR)
469 , nvl(invoice_customer_number, FND_API.G_MISS_CHAR)
470 , nvl(invoice_customer_id, FND_API.G_MISS_NUM)
471 , nvl(deliver_to_customer, FND_API.G_MISS_CHAR)
472 , nvl(deliver_to_customer_number, FND_API.G_MISS_CHAR)
473 , nvl(deliver_to_customer_id, FND_API.G_MISS_NUM)
474 , xml_transaction_type_code
475 , nvl(blanket_number, FND_API.G_MISS_NUM)
476 , nvl(shipping_method, FND_API.G_MISS_CHAR)
477 -- Added pricing_date for the bug 3001346
478 , nvl(pricing_date, FND_API.G_MISS_DATE)
479 , response_flag
480 , nvl(sold_to_site_use_id, FND_API.G_MISS_NUM)
481 , nvl(sold_to_location_address1, FND_API.G_MISS_CHAR)
482 , nvl(sold_to_location_address2, FND_API.G_MISS_CHAR)
483 , nvl(sold_to_location_address3, FND_API.G_MISS_CHAR)
484 , nvl(sold_to_location_address4, FND_API.G_MISS_CHAR)
485 , nvl(sold_to_location_city, FND_API.G_MISS_CHAR)
486 , nvl(sold_to_location_postal_code, FND_API.G_MISS_CHAR)
487 , nvl(sold_to_location_country, FND_API.G_MISS_CHAR)
488 , nvl(sold_to_location_state, FND_API.G_MISS_CHAR)
489 , nvl(sold_to_location_county, FND_API.G_MISS_CHAR)
490 , nvl(sold_to_location_province, FND_API.G_MISS_CHAR)
491 -- automatic account creation {
492 , sold_to_party_id
493 , sold_to_org_contact_id
494 , ship_to_party_id
495 , ship_to_party_site_id
496 , ship_to_party_site_use_id
497 , deliver_to_party_id
498 , deliver_to_party_site_id
499 , deliver_to_party_site_use_id
500 , invoice_to_party_id
501 , invoice_to_party_site_id
502 , invoice_to_party_site_use_id
503 -- automatic account creation }
504 -- start if additional quoting columns
505 , nvl(transaction_phase_code, FND_API.G_MISS_CHAR)
506 , nvl(expiration_date, FND_API.G_MISS_DATE)
507 , nvl(quote_number, FND_API.G_MISS_NUM)
508 , nvl(quote_date, FND_API.G_MISS_DATE)
509 , nvl(sales_document_name, FND_API.G_MISS_CHAR)
510 , nvl(user_status_code, FND_API.G_MISS_CHAR)
511 -- end of additional quoting columns
512 -- { Distributer Order related change
513 , nvl(end_customer_id, FND_API.G_MISS_NUM)
514 , nvl(end_customer_contact_id, FND_API.G_MISS_NUM)
515 , nvl(end_customer_site_use_id, FND_API.G_MISS_NUM)
516 , nvl(end_customer_name, FND_API.G_MISS_CHAR) --mvijayku
517 , nvl(end_customer_address1, FND_API.G_MISS_CHAR)
518 , nvl(end_customer_address2, FND_API.G_MISS_CHAR)
519 , nvl(end_customer_address3, FND_API.G_MISS_CHAR)
520 , nvl(end_customer_address4, FND_API.G_MISS_CHAR)
521 -- , nvl(end_customer_location, FND_API.G_MISS_CHAR)
522 , nvl(end_customer_city, FND_API.G_MISS_CHAR)
523 , nvl(end_customer_state, FND_API.G_MISS_CHAR)
524 , nvl(end_customer_postal_code, FND_API.G_MISS_CHAR)
525 , nvl(end_customer_country, FND_API.G_MISS_CHAR)
526 , nvl(end_customer_contact, FND_API.G_MISS_CHAR)
527 , nvl(end_customer_number, FND_API.G_MISS_CHAR)
528 , nvl(ib_owner, FND_API.G_MISS_CHAR)
529 , nvl(ib_current_location, FND_API.G_MISS_CHAR)
530 , nvl(ib_installed_at_location, FND_API.G_MISS_CHAR)
531 , nvl(ib_owner_code, FND_API.G_MISS_CHAR)
532 , nvl(ib_current_location_code, FND_API.G_MISS_CHAR)
533 , nvl(ib_installed_at_location_code, FND_API.G_MISS_CHAR)
534 , END_CUSTOMER_PARTY_ID
535 , END_CUSTOMER_ORG_CONTACT_ID
536 , END_CUSTOMER_PARTY_SITE_ID
537 , END_CUSTOMER_PARTY_SITE_USE_ID
538 , END_CUSTOMER_PARTY_NUMBER
539 -- Distributer Order related change }
540 -- for automatic account creation
541 , sold_to_party_number
542 , ship_to_party_number
543 , invoice_to_party_number
544 , deliver_to_party_number
545 -- for automatic account creation
546 , nvl(deliver_to_address1, FND_API.G_MISS_CHAR)
547 , nvl(deliver_to_address2, FND_API.G_MISS_CHAR)
548 , nvl(deliver_to_address3, FND_API.G_MISS_CHAR)
549 , nvl(deliver_to_address4, FND_API.G_MISS_CHAR)
550 , nvl(deliver_to_state , FND_API.G_MISS_CHAR)
551 , nvl(deliver_to_county , FND_API.G_MISS_CHAR)
552 , nvl(deliver_to_country , FND_API.G_MISS_CHAR)
553 , nvl(deliver_to_province, FND_API.G_MISS_CHAR)
554 , nvl(deliver_to_city , FND_API.G_MISS_CHAR)
555 , nvl(deliver_to_postal_code , FND_API.G_MISS_CHAR)
556 , nvl(instrument_security_code, FND_API.G_MISS_CHAR) --R12 CVV2
557 FROM oe_headers_iface_all
558 WHERE order_source_id = l_order_source_id
559 AND orig_sys_document_ref = l_orig_sys_document_ref
560 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
561 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
562 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
563 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
564 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
565 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
566 AND nvl(org_id, FND_API.G_MISS_NUM)
567 = nvl(l_org_id, FND_API.G_MISS_NUM)
568 AND nvl( request_id, FND_API.G_MISS_NUM)
569 = nvl(l_request_id, FND_API.G_MISS_NUM)
570 AND nvl(error_flag,'N') = 'N'
571 AND nvl(ready_flag,'Y') = 'Y'
572 AND nvl(rejected_flag,'N') = 'N'
573 AND nvl(force_apply_flag,'Y') = 'Y'
574 FOR UPDATE NOWAIT
575 ORDER BY org_id,order_source_id, orig_sys_document_ref, change_sequence
576 ;
577
578
579 /* -----------------------------------------------------------
580 Header Discounts/Price adjustments cursor
581 -----------------------------------------------------------
582 */
583 CURSOR l_header_adj_cursor IS
584 SELECT nvl(orig_sys_discount_ref, FND_API.G_MISS_CHAR)
585 , nvl(change_request_code, FND_API.G_MISS_CHAR)
586 , nvl(list_header_id, FND_API.G_MISS_NUM)
587 , nvl(list_line_id, FND_API.G_MISS_NUM)
588 , nvl(discount_name, FND_API.G_MISS_CHAR)
589 , nvl(percent, FND_API.G_MISS_NUM)
590 , nvl(automatic_flag, FND_API.G_MISS_CHAR)
591 , nvl(applied_flag, FND_API.G_MISS_CHAR)
592 , nvl(operand, FND_API.G_MISS_NUM)
593 , nvl(arithmetic_operator, FND_API.G_MISS_CHAR)
594 , nvl(context, FND_API.G_MISS_CHAR)
595 , nvl(attribute1, FND_API.G_MISS_CHAR)
596 , nvl(attribute2, FND_API.G_MISS_CHAR)
597 , nvl(attribute3, FND_API.G_MISS_CHAR)
598 , nvl(attribute4, FND_API.G_MISS_CHAR)
599 , nvl(attribute5, FND_API.G_MISS_CHAR)
600 , nvl(attribute6, FND_API.G_MISS_CHAR)
601 , nvl(attribute7, FND_API.G_MISS_CHAR)
602 , nvl(attribute8, FND_API.G_MISS_CHAR)
603 , nvl(attribute9, FND_API.G_MISS_CHAR)
604 , nvl(attribute10, FND_API.G_MISS_CHAR)
605 , nvl(attribute11, FND_API.G_MISS_CHAR)
606 , nvl(attribute12, FND_API.G_MISS_CHAR)
607 , nvl(attribute13, FND_API.G_MISS_CHAR)
608 , nvl(attribute14, FND_API.G_MISS_CHAR)
609 , nvl(attribute15, FND_API.G_MISS_CHAR)
610 , request_id
611 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
612 , nvl(status_flag, FND_API.G_MISS_CHAR)
613 -- Price Adjustment related changes bug# 1220921 (Start)
614 , nvl( AC_CONTEXT, FND_API.G_MISS_CHAR)
615 , nvl( AC_ATTRIBUTE1, FND_API.G_MISS_CHAR)
616 , nvl( AC_ATTRIBUTE2, FND_API.G_MISS_CHAR)
617 , nvl( AC_ATTRIBUTE3, FND_API.G_MISS_CHAR)
618 , nvl( AC_ATTRIBUTE4, FND_API.G_MISS_CHAR)
619 , nvl( AC_ATTRIBUTE5, FND_API.G_MISS_CHAR)
620 , nvl( AC_ATTRIBUTE6, FND_API.G_MISS_CHAR)
621 , nvl( AC_ATTRIBUTE7, FND_API.G_MISS_CHAR)
622 , nvl( AC_ATTRIBUTE8, FND_API.G_MISS_CHAR)
623 , nvl( AC_ATTRIBUTE9, FND_API.G_MISS_CHAR)
624 , nvl( AC_ATTRIBUTE10, FND_API.G_MISS_CHAR)
625 , nvl( AC_ATTRIBUTE11, FND_API.G_MISS_CHAR)
626 , nvl( AC_ATTRIBUTE12, FND_API.G_MISS_CHAR)
627 , nvl( AC_ATTRIBUTE13, FND_API.G_MISS_CHAR)
628 , nvl( AC_ATTRIBUTE14, FND_API.G_MISS_CHAR)
629 , nvl( AC_ATTRIBUTE15, FND_API.G_MISS_CHAR)
630 , nvl( LIST_NAME, FND_API.G_MISS_CHAR)
631 , nvl( LIST_LINE_TYPE_CODE, FND_API.G_MISS_CHAR)
632 , nvl( LIST_LINE_NUMBER, FND_API.G_MISS_CHAR)
633 , nvl( VERSION_NUMBER, FND_API.G_MISS_CHAR)
634 , nvl( INVOICED_FLAG, FND_API.G_MISS_CHAR)
635 , nvl( ESTIMATED_FLAG, FND_API.G_MISS_CHAR)
636 , nvl( INC_IN_SALES_PERFORMANCE, FND_API.G_MISS_CHAR)
637 , nvl( CHARGE_TYPE_CODE, FND_API.G_MISS_CHAR)
638 , nvl( CHARGE_SUBTYPE_CODE, FND_API.G_MISS_CHAR)
639 , nvl( CREDIT_OR_CHARGE_FLAG, FND_API.G_MISS_CHAR)
640 , nvl( INCLUDE_ON_RETURNS_FLAG, FND_API.G_MISS_CHAR)
641 , nvl( COST_ID, FND_API.G_MISS_NUM)
642 , nvl( TAX_CODE, FND_API.G_MISS_CHAR)
643 , nvl( PARENT_ADJUSTMENT_ID, FND_API.G_MISS_NUM)
644 , nvl(MODIFIER_MECHANISM_TYPE_CODE,FND_API.G_MISS_CHAR)
645 , nvl( MODIFIED_FROM, FND_API.G_MISS_CHAR)
646 , nvl( MODIFIED_TO, FND_API.G_MISS_CHAR)
647 , nvl( UPDATED_FLAG, FND_API.G_MISS_CHAR)
648 , nvl( UPDATE_ALLOWED, FND_API.G_MISS_CHAR)
649 , nvl( CHANGE_REASON_CODE, FND_API.G_MISS_CHAR)
650 , nvl( CHANGE_REASON_TEXT, FND_API.G_MISS_CHAR)
651 , nvl( PRICING_PHASE_ID, FND_API.G_MISS_NUM)
652 , nvl( ADJUSTED_AMOUNT, FND_API.G_MISS_NUM)
653 -- Price Adjustment related changes bug# 1220921 (End)
654 FROM oe_price_adjs_iface_all
655 WHERE order_source_id = l_order_source_id
656 AND orig_sys_document_ref = l_orig_sys_document_ref
657 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
658 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
659 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
660 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
661 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
662 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
663 AND nvl(org_id, FND_API.G_MISS_NUM)
664 = nvl(l_org_id, FND_API.G_MISS_NUM)
665 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
666 = FND_API.G_MISS_CHAR
667 AND nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
668 = FND_API.G_MISS_CHAR
669 AND nvl( request_id, FND_API.G_MISS_NUM)
670 = nvl(l_request_id, FND_API.G_MISS_NUM)
671 FOR UPDATE NOWAIT
672 ORDER BY orig_sys_discount_ref
673 ;
674
675
676 /* -----------------------------------------------------------
677 Header Price attribute cursor
678 -----------------------------------------------------------
679 */
680 CURSOR l_header_attrib_cursor IS
681 SELECT nvl(orig_sys_atts_ref, FND_API.G_MISS_CHAR)
682 , nvl(change_request_code, FND_API.G_MISS_CHAR)
683 , nvl(creation_date , FND_API.G_MISS_DATE)
684 , nvl(created_by , FND_API.G_MISS_NUM)
685 , nvl(last_update_date , FND_API.G_MISS_DATE)
686 , nvl(last_updated_by , FND_API.G_MISS_NUM)
687 , nvl(last_update_login , FND_API.G_MISS_NUM)
688 , nvl(program_application_id , FND_API.G_MISS_NUM)
689 , nvl(program_id , FND_API.G_MISS_NUM)
690 , nvl(program_update_date, FND_API.G_MISS_DATE)
691 , nvl(request_id , FND_API.G_MISS_NUM)
692 , nvl(flex_title , FND_API.G_MISS_CHAR)
693 , nvl(pricing_context , FND_API.G_MISS_CHAR)
694 , nvl(pricing_attribute1 , FND_API.G_MISS_CHAR)
695 , nvl(pricing_attribute2 , FND_API.G_MISS_CHAR)
696 , nvl(pricing_attribute3 , FND_API.G_MISS_CHAR)
697 , nvl(pricing_attribute4 , FND_API.G_MISS_CHAR)
698 , nvl(pricing_attribute5 , FND_API.G_MISS_CHAR)
699 , nvl(pricing_attribute6 , FND_API.G_MISS_CHAR)
700 , nvl(pricing_attribute7 , FND_API.G_MISS_CHAR)
701 , nvl(pricing_attribute8 , FND_API.G_MISS_CHAR)
702 , nvl(pricing_attribute9 , FND_API.G_MISS_CHAR)
703 , nvl(pricing_attribute10 , FND_API.G_MISS_CHAR)
704 , nvl(pricing_attribute11 , FND_API.G_MISS_CHAR)
705 , nvl(pricing_attribute12 , FND_API.G_MISS_CHAR)
706 , nvl(pricing_attribute13 , FND_API.G_MISS_CHAR)
707 , nvl(pricing_attribute14 , FND_API.G_MISS_CHAR)
708 , nvl(pricing_attribute15 , FND_API.G_MISS_CHAR)
709 , nvl(pricing_attribute16 , FND_API.G_MISS_CHAR)
710 , nvl(pricing_attribute17 , FND_API.G_MISS_CHAR)
711 , nvl(pricing_attribute18 , FND_API.G_MISS_CHAR)
712 , nvl(pricing_attribute19 , FND_API.G_MISS_CHAR)
713 , nvl(pricing_attribute20 , FND_API.G_MISS_CHAR)
714 , nvl(pricing_attribute21 , FND_API.G_MISS_CHAR)
715 , nvl(pricing_attribute22 , FND_API.G_MISS_CHAR)
716 , nvl(pricing_attribute23 , FND_API.G_MISS_CHAR)
717 , nvl(pricing_attribute24 , FND_API.G_MISS_CHAR)
718 , nvl(pricing_attribute25 , FND_API.G_MISS_CHAR)
719 , nvl(pricing_attribute26 , FND_API.G_MISS_CHAR)
720 , nvl(pricing_attribute27 , FND_API.G_MISS_CHAR)
721 , nvl(pricing_attribute28 , FND_API.G_MISS_CHAR)
722 , nvl(pricing_attribute29 , FND_API.G_MISS_CHAR)
723 , nvl(pricing_attribute30 , FND_API.G_MISS_CHAR)
724 , nvl(pricing_attribute31 , FND_API.G_MISS_CHAR)
725 , nvl(pricing_attribute32 , FND_API.G_MISS_CHAR)
726 , nvl(pricing_attribute33 , FND_API.G_MISS_CHAR)
727 , nvl(pricing_attribute34 , FND_API.G_MISS_CHAR)
728 , nvl(pricing_attribute35 , FND_API.G_MISS_CHAR)
729 , nvl(pricing_attribute36 , FND_API.G_MISS_CHAR)
730 , nvl(pricing_attribute37 , FND_API.G_MISS_CHAR)
731 , nvl(pricing_attribute38 , FND_API.G_MISS_CHAR)
732 , nvl(pricing_attribute39 , FND_API.G_MISS_CHAR)
733 , nvl(pricing_attribute40 , FND_API.G_MISS_CHAR)
734 , nvl(pricing_attribute41 , FND_API.G_MISS_CHAR)
735 , nvl(pricing_attribute42 , FND_API.G_MISS_CHAR)
736 , nvl(pricing_attribute43 , FND_API.G_MISS_CHAR)
737 , nvl(pricing_attribute44 , FND_API.G_MISS_CHAR)
738 , nvl(pricing_attribute45 , FND_API.G_MISS_CHAR)
739 , nvl(pricing_attribute46 , FND_API.G_MISS_CHAR)
740 , nvl(pricing_attribute47 , FND_API.G_MISS_CHAR)
741 , nvl(pricing_attribute48 , FND_API.G_MISS_CHAR)
742 , nvl(pricing_attribute49 , FND_API.G_MISS_CHAR)
743 , nvl(pricing_attribute50 , FND_API.G_MISS_CHAR)
744 , nvl(pricing_attribute51 , FND_API.G_MISS_CHAR)
745 , nvl(pricing_attribute52 , FND_API.G_MISS_CHAR)
746 , nvl(pricing_attribute53 , FND_API.G_MISS_CHAR)
747 , nvl(pricing_attribute54 , FND_API.G_MISS_CHAR)
748 , nvl(pricing_attribute55 , FND_API.G_MISS_CHAR)
749 , nvl(pricing_attribute56 , FND_API.G_MISS_CHAR)
750 , nvl(pricing_attribute57 , FND_API.G_MISS_CHAR)
751 , nvl(pricing_attribute58 , FND_API.G_MISS_CHAR)
752 , nvl(pricing_attribute59 , FND_API.G_MISS_CHAR)
753 , nvl(pricing_attribute60 , FND_API.G_MISS_CHAR)
754 , nvl(pricing_attribute61 , FND_API.G_MISS_CHAR)
755 , nvl(pricing_attribute62 , FND_API.G_MISS_CHAR)
756 , nvl(pricing_attribute63 , FND_API.G_MISS_CHAR)
757 , nvl(pricing_attribute64 , FND_API.G_MISS_CHAR)
758 , nvl(pricing_attribute65 , FND_API.G_MISS_CHAR)
759 , nvl(pricing_attribute66 , FND_API.G_MISS_CHAR)
760 , nvl(pricing_attribute67 , FND_API.G_MISS_CHAR)
761 , nvl(pricing_attribute68 , FND_API.G_MISS_CHAR)
762 , nvl(pricing_attribute69 , FND_API.G_MISS_CHAR)
763 , nvl(pricing_attribute70 , FND_API.G_MISS_CHAR)
764 , nvl(pricing_attribute71 , FND_API.G_MISS_CHAR)
765 , nvl(pricing_attribute72 , FND_API.G_MISS_CHAR)
766 , nvl(pricing_attribute73 , FND_API.G_MISS_CHAR)
767 , nvl(pricing_attribute74 , FND_API.G_MISS_CHAR)
768 , nvl(pricing_attribute75 , FND_API.G_MISS_CHAR)
769 , nvl(pricing_attribute76 , FND_API.G_MISS_CHAR)
770 , nvl(pricing_attribute77 , FND_API.G_MISS_CHAR)
771 , nvl(pricing_attribute78 , FND_API.G_MISS_CHAR)
772 , nvl(pricing_attribute79 , FND_API.G_MISS_CHAR)
773 , nvl(pricing_attribute80 , FND_API.G_MISS_CHAR)
774 , nvl(pricing_attribute81 , FND_API.G_MISS_CHAR)
775 , nvl(pricing_attribute82 , FND_API.G_MISS_CHAR)
776 , nvl(pricing_attribute83 , FND_API.G_MISS_CHAR)
777 , nvl(pricing_attribute84 , FND_API.G_MISS_CHAR)
778 , nvl(pricing_attribute85 , FND_API.G_MISS_CHAR)
779 , nvl(pricing_attribute86 , FND_API.G_MISS_CHAR)
780 , nvl(pricing_attribute87 , FND_API.G_MISS_CHAR)
781 , nvl(pricing_attribute88 , FND_API.G_MISS_CHAR)
782 , nvl(pricing_attribute89 , FND_API.G_MISS_CHAR)
783 , nvl(pricing_attribute90 , FND_API.G_MISS_CHAR)
784 , nvl(pricing_attribute91 , FND_API.G_MISS_CHAR)
785 , nvl(pricing_attribute92 , FND_API.G_MISS_CHAR)
786 , nvl(pricing_attribute93 , FND_API.G_MISS_CHAR)
787 , nvl(pricing_attribute94 , FND_API.G_MISS_CHAR)
788 , nvl(pricing_attribute95 , FND_API.G_MISS_CHAR)
789 , nvl(pricing_attribute96 , FND_API.G_MISS_CHAR)
790 , nvl(pricing_attribute97 , FND_API.G_MISS_CHAR)
791 , nvl(pricing_attribute98 , FND_API.G_MISS_CHAR)
792 , nvl(pricing_attribute99 , FND_API.G_MISS_CHAR)
793 , nvl(pricing_attribute100 , FND_API.G_MISS_CHAR)
794 , nvl(context , FND_API.G_MISS_CHAR)
795 , nvl(attribute1 , FND_API.G_MISS_CHAR)
796 , nvl(attribute2 , FND_API.G_MISS_CHAR)
797 , nvl(attribute3 , FND_API.G_MISS_CHAR)
798 , nvl(attribute4 , FND_API.G_MISS_CHAR)
799 , nvl(attribute5 , FND_API.G_MISS_CHAR)
800 , nvl(attribute6 , FND_API.G_MISS_CHAR)
801 , nvl(attribute7 , FND_API.G_MISS_CHAR)
802 , nvl(attribute8 , FND_API.G_MISS_CHAR)
803 , nvl(attribute9 , FND_API.G_MISS_CHAR)
804 , nvl(attribute10 , FND_API.G_MISS_CHAR)
805 , nvl(attribute11 , FND_API.G_MISS_CHAR)
806 , nvl(attribute12 , FND_API.G_MISS_CHAR)
807 , nvl(attribute13 , FND_API.G_MISS_CHAR)
808 , nvl(attribute14 , FND_API.G_MISS_CHAR)
809 , nvl(attribute15 , FND_API.G_MISS_CHAR)
810 , nvl(operation_code , OE_GLOBALS.G_OPR_CREATE)
811 FROM oe_price_atts_iface_all
812 WHERE order_source_id = l_order_source_id
813 AND orig_sys_document_ref = l_orig_sys_document_ref
814 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
815 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
816 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
817 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
818 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
819 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
820 AND nvl(org_id, FND_API.G_MISS_NUM)
821 = nvl(l_org_id, FND_API.G_MISS_NUM)
822 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
823 = FND_API.G_MISS_CHAR
824 AND nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
825 = FND_API.G_MISS_CHAR
826 AND nvl( request_id, FND_API.G_MISS_NUM)
827 = nvl(l_request_id, FND_API.G_MISS_NUM)
828 FOR UPDATE NOWAIT
829 ORDER by orig_sys_document_ref;
830
831 /* -----------------------------------------------------------
832 Header Sales Credits cursor
833 -----------------------------------------------------------
834 */
835 CURSOR l_header_scredit_cursor IS
836 SELECT nvl(orig_sys_credit_ref, FND_API.G_MISS_CHAR)
837 , nvl(change_request_code, FND_API.G_MISS_CHAR)
838 , nvl(salesrep_id, FND_API.G_MISS_NUM)
839 , nvl(salesrep , FND_API.G_MISS_CHAR)
840 , nvl(sales_credit_type_id, FND_API.G_MISS_NUM)
841 , nvl(sales_credit_type, FND_API.G_MISS_CHAR)
842 , nvl(percent, FND_API.G_MISS_NUM)
843 , nvl(context, FND_API.G_MISS_CHAR)
844 , nvl(attribute1, FND_API.G_MISS_CHAR)
845 , nvl(attribute2, FND_API.G_MISS_CHAR)
846 , nvl(attribute3, FND_API.G_MISS_CHAR)
847 , nvl(attribute4, FND_API.G_MISS_CHAR)
848 , nvl(attribute5, FND_API.G_MISS_CHAR)
849 , nvl(attribute6, FND_API.G_MISS_CHAR)
850 , nvl(attribute7, FND_API.G_MISS_CHAR)
851 , nvl(attribute8, FND_API.G_MISS_CHAR)
852 , nvl(attribute9, FND_API.G_MISS_CHAR)
853 , nvl(attribute10, FND_API.G_MISS_CHAR)
854 , nvl(attribute11, FND_API.G_MISS_CHAR)
855 , nvl(attribute12, FND_API.G_MISS_CHAR)
856 , nvl(attribute13, FND_API.G_MISS_CHAR)
857 , nvl(attribute14, FND_API.G_MISS_CHAR)
858 , nvl(attribute15, FND_API.G_MISS_CHAR)
859 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
860 , nvl(status_flag, FND_API.G_MISS_CHAR)
861 , nvl(change_reason, FND_API.G_MISS_CHAR)
862 , nvl(change_comments, FND_API.G_MISS_CHAR)
863 FROM oe_credits_iface_all
864 WHERE order_source_id = l_order_source_id
865 AND orig_sys_document_ref = l_orig_sys_document_ref
866 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
867 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
868 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
869 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
870 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
871 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
872 AND nvl(org_id, FND_API.G_MISS_NUM)
873 = nvl(l_org_id, FND_API.G_MISS_NUM)
874 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
875 = FND_API.G_MISS_CHAR
876 AND nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
877 = FND_API.G_MISS_CHAR
878 AND nvl( request_id, FND_API.G_MISS_NUM)
879 = nvl(l_request_id, FND_API.G_MISS_NUM)
880 FOR UPDATE NOWAIT
881 ORDER BY orig_sys_credit_ref
882 ;
883
884 /* -----------------------------------------------------------
885 Multiple Payments: Header payments cursor
886 -----------------------------------------------------------
887 */
888 CURSOR l_header_payment_cursor IS
889 SELECT nvl(orig_sys_payment_ref, FND_API.G_MISS_CHAR)
890 , nvl(change_request_code, FND_API.G_MISS_CHAR)
891 , nvl(payment_type_code, FND_API.G_MISS_CHAR)
892 , nvl(commitment, FND_API.G_MISS_CHAR)
893 , nvl(payment_trx_id, FND_API.G_MISS_NUM)
894 , nvl(payment_method, FND_API.G_MISS_CHAR)
895 , nvl(receipt_method_id, FND_API.G_MISS_NUM)
896 , nvl(payment_collection_event,FND_API.G_MISS_CHAR)
897 , nvl(payment_set_id, FND_API.G_MISS_NUM)
898 , nvl(prepaid_amount, FND_API.G_MISS_NUM)
899 , nvl(credit_card_number, FND_API.G_MISS_CHAR)
900 , nvl(credit_card_holder_name, FND_API.G_MISS_CHAR)
901 , nvl(credit_card_expiration_date,FND_API.G_MISS_DATE)
902 , nvl(credit_card_code, FND_API.G_MISS_CHAR)
903 , nvl(credit_card_approval_code,FND_API.G_MISS_CHAR)
904 , nvl(credit_card_approval_date,FND_API.G_MISS_DATE)
905 , nvl(check_number, FND_API.G_MISS_CHAR)--6367320
906 , nvl(payment_amount, FND_API.G_MISS_NUM)
907 , nvl(payment_percentage, FND_API.G_MISS_NUM)
908 , nvl(creation_date, FND_API.G_MISS_DATE)
909 , nvl(created_by, FND_API.G_MISS_NUM)
910 , nvl(last_update_date, FND_API.G_MISS_DATE)
911 , nvl(last_updated_by, FND_API.G_MISS_NUM)
912 , nvl(last_update_login, FND_API.G_MISS_NUM)
913 , nvl(program_application_id, FND_API.G_MISS_NUM)
914 , nvl(program_id, FND_API.G_MISS_NUM)
915 , nvl(program_update_date, FND_API.G_MISS_DATE)
916 , nvl(context, FND_API.G_MISS_CHAR)
917 , nvl(attribute1, FND_API.G_MISS_CHAR)
918 , nvl(attribute2, FND_API.G_MISS_CHAR)
919 , nvl(attribute3, FND_API.G_MISS_CHAR)
920 , nvl(attribute4, FND_API.G_MISS_CHAR)
921 , nvl(attribute5, FND_API.G_MISS_CHAR)
922 , nvl(attribute6, FND_API.G_MISS_CHAR)
923 , nvl(attribute7, FND_API.G_MISS_CHAR)
924 , nvl(attribute8, FND_API.G_MISS_CHAR)
925 , nvl(attribute9, FND_API.G_MISS_CHAR)
926 , nvl(attribute10, FND_API.G_MISS_CHAR)
927 , nvl(attribute11, FND_API.G_MISS_CHAR)
928 , nvl(attribute12, FND_API.G_MISS_CHAR)
929 , nvl(attribute13, FND_API.G_MISS_CHAR)
930 , nvl(attribute14, FND_API.G_MISS_CHAR)
931 , nvl(attribute15, FND_API.G_MISS_CHAR)
932 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
933 , nvl(status_flag, FND_API.G_MISS_CHAR)
934 , nvl(payment_number, FND_API.G_MISS_NUM)
935 , nvl(header_id, FND_API.G_MISS_NUM)
936 , nvl(line_id, FND_API.G_MISS_NUM)
937 , nvl(trxn_extension_id, FND_API.G_MISS_NUM)
938 , nvl(instrument_security_code,FND_API.G_MISS_CHAR) --R12 CVV2
939 FROM oe_payments_iface_all
940 WHERE order_source_id = l_order_source_id
941 AND orig_sys_document_ref = l_orig_sys_document_ref
942 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
943 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
944 AND nvl(org_id, FND_API.G_MISS_NUM)
945 = nvl(l_org_id, FND_API.G_MISS_NUM)
946 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
947 = FND_API.G_MISS_CHAR
948 AND nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
949 = FND_API.G_MISS_CHAR
950 AND nvl( request_id, FND_API.G_MISS_NUM)
951 = nvl(l_request_id, FND_API.G_MISS_NUM)
952 FOR UPDATE NOWAIT
953 ORDER BY orig_sys_payment_ref;
954 -- end of multiple payments: header payment cursor.
955
956
957 /* -----------------------------------------------------------
958 Lines cursor
959 -----------------------------------------------------------
960 */
961 CURSOR l_line_cursor IS
962 SELECT nvl(order_source_id, FND_API.G_MISS_NUM)
963 , nvl(orig_sys_document_ref, FND_API.G_MISS_CHAR)
964 , nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
965 , nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
966 , nvl(change_request_code, FND_API.G_MISS_CHAR)
967 , nvl(org_id, FND_API.G_MISS_NUM)
968 , nvl(line_number, FND_API.G_MISS_NUM)
969 , nvl(shipment_number, FND_API.G_MISS_NUM)
970 , nvl(line_id, FND_API.G_MISS_NUM)
971 , nvl(line_type_id, FND_API.G_MISS_NUM)
972 , nvl(line_type, FND_API.G_MISS_CHAR)
973 , nvl(item_type_code, FND_API.G_MISS_CHAR)
974 , nvl(inventory_item_id, FND_API.G_MISS_NUM)
975 , nvl(inventory_item, FND_API.G_MISS_CHAR)
976 , nvl(top_model_line_ref, FND_API.G_MISS_CHAR)
977 , nvl(link_to_line_ref, FND_API.G_MISS_CHAR)
978 , nvl(explosion_date, FND_API.G_MISS_DATE)
979 , nvl(ato_line_id, FND_API.G_MISS_NUM)
980 , nvl(component_sequence_id, FND_API.G_MISS_NUM)
981 , nvl(component_code, FND_API.G_MISS_CHAR)
982 , nvl(sort_order, FND_API.G_MISS_CHAR)
983 , nvl(model_group_number, FND_API.G_MISS_NUM)
984 , nvl(option_number, FND_API.G_MISS_NUM)
985 , nvl(option_flag, 'N')
986 , nvl(ship_model_complete_flag, FND_API.G_MISS_CHAR)
987 , nvl(source_type_code, FND_API.G_MISS_CHAR)
988 , nvl(schedule_status_code, FND_API.G_MISS_CHAR)
989 , nvl(schedule_ship_date, FND_API.G_MISS_DATE)
990 , nvl(late_demand_penalty_factor, FND_API.G_MISS_NUM)
991 , nvl(schedule_arrival_date, FND_API.G_MISS_DATE)
992 , nvl(actual_arrival_date, FND_API.G_MISS_DATE)
993 , nvl(request_date, FND_API.G_MISS_DATE)
994 , nvl(promise_date, FND_API.G_MISS_DATE)
995 , nvl(delivery_lead_time, FND_API.G_MISS_NUM)
996 , nvl(ordered_quantity, FND_API.G_MISS_NUM)
997 , nvl(order_quantity_uom , FND_API.G_MISS_CHAR)
998 , nvl(shipping_quantity, FND_API.G_MISS_NUM)
999 , nvl(shipping_quantity_uom, FND_API.G_MISS_CHAR)
1000 , nvl(shipped_quantity, FND_API.G_MISS_NUM)
1001 , nvl(cancelled_quantity, FND_API.G_MISS_NUM)
1002 , nvl(fulfilled_quantity, FND_API.G_MISS_NUM)
1003 /* OPM variables */
1004 , nvl(ordered_quantity2, FND_API.G_MISS_NUM)
1005 , nvl(ordered_quantity_uom2 , FND_API.G_MISS_CHAR)
1006 , nvl(shipping_quantity2, FND_API.G_MISS_NUM)
1007 , nvl(shipping_quantity_uom2, FND_API.G_MISS_CHAR)
1008 , nvl(shipped_quantity2, FND_API.G_MISS_NUM)
1009 , nvl(cancelled_quantity2, FND_API.G_MISS_NUM)
1010 , nvl(fulfilled_quantity2, FND_API.G_MISS_NUM)
1011 , nvl(preferred_grade, FND_API.G_MISS_CHAR)
1012 /* end of OPM variables */
1013 , nvl(pricing_quantity, FND_API.G_MISS_NUM)
1014 , nvl(pricing_quantity_uom, FND_API.G_MISS_CHAR)
1015 , nvl(sold_from_org_id, FND_API.G_MISS_NUM)
1016 , nvl(sold_from_org, FND_API.G_MISS_CHAR)
1017 , nvl(sold_to_org_id , FND_API.G_MISS_NUM)
1018 , nvl(sold_to_org, FND_API.G_MISS_CHAR)
1019 , nvl(ship_from_org_id, FND_API.G_MISS_NUM)
1020 , nvl(ship_from_org, FND_API.G_MISS_CHAR)
1021 , nvl(ship_to_org_id , FND_API.G_MISS_NUM)
1022 , nvl(ship_to_org, FND_API.G_MISS_CHAR)
1023 , nvl(deliver_to_org_id, FND_API.G_MISS_NUM)
1024 , nvl(deliver_to_org, FND_API.G_MISS_CHAR)
1025 , nvl(invoice_to_org_id, FND_API.G_MISS_NUM)
1026 , nvl(invoice_to_org, FND_API.G_MISS_CHAR)
1027 , nvl(ship_to_address1, FND_API.G_MISS_CHAR)
1028 , nvl(ship_to_address2, FND_API.G_MISS_CHAR)
1029 , nvl(ship_to_address3, FND_API.G_MISS_CHAR)
1030 , nvl(ship_to_address4, FND_API.G_MISS_CHAR)
1031 , nvl(ship_to_city, FND_API.G_MISS_CHAR)
1032 , nvl(ship_to_state, FND_API.G_MISS_CHAR)
1033 , nvl(ship_to_postal_code, FND_API.G_MISS_CHAR)
1034 , nvl(ship_to_country, FND_API.G_MISS_CHAR)
1035 , nvl(ship_to_contact_id, FND_API.G_MISS_NUM)
1036 , nvl(ship_to_contact, FND_API.G_MISS_CHAR)
1037 , nvl(deliver_to_contact_id, FND_API.G_MISS_NUM)
1038 , nvl(deliver_to_contact, FND_API.G_MISS_CHAR)
1039 , nvl(invoice_to_contact_id, FND_API.G_MISS_NUM)
1040 , nvl(invoice_to_contact, FND_API.G_MISS_CHAR)
1041 , nvl(drop_ship_flag, FND_API.G_MISS_CHAR)
1042 , nvl(ship_tolerance_above, FND_API.G_MISS_NUM)
1043 , nvl(ship_tolerance_below, FND_API.G_MISS_NUM)
1044 , nvl(price_list_id, FND_API.G_MISS_NUM)
1045 , nvl(price_list, FND_API.G_MISS_CHAR)
1046 , nvl(pricing_date, FND_API.G_MISS_DATE)
1047 , nvl(unit_list_price, FND_API.G_MISS_NUM)
1048 , nvl(unit_selling_price, FND_API.G_MISS_NUM)
1049 --, nvl(calculate_price_flag, 'Y') --commented for BUG#7304558
1050 , nvl(calculate_price_flag, FND_API.G_MISS_CHAR) --added for BUG#7304558
1051 , nvl(ship_set_id, FND_API.G_MISS_NUM)
1052 , nvl(ship_set_name, FND_API.G_MISS_CHAR)
1053 , nvl(arrival_set_id, FND_API.G_MISS_NUM)
1054 , nvl(arrival_set_name, FND_API.G_MISS_CHAR)
1055 , nvl(fulfillment_set_id, FND_API.G_MISS_NUM)
1056 , nvl(fulfillment_set_name, FND_API.G_MISS_CHAR)
1057 , nvl(tax_code, FND_API.G_MISS_CHAR)
1058 , nvl(tax_value, FND_API.G_MISS_NUM)
1059 , nvl(tax_date, FND_API.G_MISS_DATE)
1060 , nvl(tax_point_code, FND_API.G_MISS_CHAR)
1061 , nvl(tax_point, FND_API.G_MISS_CHAR)
1062 , nvl(tax_exempt_flag, FND_API.G_MISS_CHAR)
1063 , nvl(tax_exempt_number, FND_API.G_MISS_CHAR)
1064 , nvl(tax_exempt_reason_code, FND_API.G_MISS_CHAR)
1065 , nvl(tax_exempt_reason, FND_API.G_MISS_CHAR)
1066 , nvl(agreement_id, FND_API.G_MISS_NUM)
1067 , nvl(agreement, FND_API.G_MISS_CHAR)
1068 , nvl(invoicing_rule_id, FND_API.G_MISS_NUM)
1069 , nvl(invoicing_rule, FND_API.G_MISS_CHAR)
1070 , nvl(accounting_rule_id, FND_API.G_MISS_NUM)
1071 , nvl(accounting_rule_duration, FND_API.G_MISS_NUM)
1072 , nvl(accounting_rule, FND_API.G_MISS_CHAR)
1073 , nvl(payment_term_id, FND_API.G_MISS_NUM)
1074 , nvl(payment_term, FND_API.G_MISS_CHAR)
1075 , nvl(demand_class_code, FND_API.G_MISS_CHAR)
1076 , nvl(shipment_priority_code, FND_API.G_MISS_CHAR)
1077 , nvl(shipment_priority, FND_API.G_MISS_CHAR)
1078 , nvl(shipping_method_code, FND_API.G_MISS_CHAR)
1079 , nvl(shipping_instructions, FND_API.G_MISS_CHAR)
1080 , nvl(packing_instructions, FND_API.G_MISS_CHAR)
1081 , nvl(freight_carrier_code, FND_API.G_MISS_CHAR)
1082 , nvl(freight_terms_code, FND_API.G_MISS_CHAR)
1083 , nvl(freight_terms, FND_API.G_MISS_CHAR)
1084 , nvl(fob_point_code, FND_API.G_MISS_CHAR)
1085 , nvl(fob_point, FND_API.G_MISS_CHAR)
1086 , nvl(return_reason_code, FND_API.G_MISS_CHAR)
1087 , nvl(reference_type, FND_API.G_MISS_CHAR)
1088 , nvl(reference_header_id, FND_API.G_MISS_NUM)
1089 , nvl(reference_line_id, FND_API.G_MISS_NUM)
1090 , nvl(credit_invoice_line_id, FND_API.G_MISS_NUM)
1091 , nvl(customer_po_number, FND_API.G_MISS_CHAR)
1092 --bug#4063831:
1093 --FP:11I9-12.0CUST_PRODUCTION_SEQ_NUM IS NOT GETTING POPULATED
1094 -- DURING ORDER IMPORT
1095 , nvl(cust_production_seq_num, FND_API.G_MISS_CHAR)
1096 , nvl(customer_line_number, FND_API.G_MISS_CHAR)
1097 , nvl(customer_shipment_number, FND_API.G_MISS_CHAR)
1098 , nvl(customer_item_id, FND_API.G_MISS_NUM)
1099 , nvl(customer_item_id_type, FND_API.G_MISS_CHAR)
1100 , nvl(customer_item_name, FND_API.G_MISS_CHAR)
1101 -- , nvl(customer_item_revision, FND_API.G_MISS_CHAR)
1102 , nvl(customer_item_net_price, FND_API.G_MISS_NUM)
1103 , nvl(customer_payment_term_id, FND_API.G_MISS_NUM)
1104 , nvl(customer_payment_term, FND_API.G_MISS_CHAR)
1105 , nvl(demand_bucket_type_code, FND_API.G_MISS_CHAR)
1106 , nvl(demand_bucket_type, FND_API.G_MISS_CHAR)
1107 , nvl(customer_dock_code, FND_API.G_MISS_CHAR)
1108 , nvl(customer_job, FND_API.G_MISS_CHAR)
1109 , nvl(customer_production_line, FND_API.G_MISS_CHAR)
1110 , nvl(cust_model_serial_number, FND_API.G_MISS_CHAR)
1111 , nvl(project_id, FND_API.G_MISS_NUM)
1112 , nvl(project, FND_API.G_MISS_CHAR)
1113 , nvl(task_id, FND_API.G_MISS_NUM)
1114 , nvl(task, FND_API.G_MISS_CHAR)
1115 , nvl(end_item_unit_number, FND_API.G_MISS_CHAR)
1116 , nvl(item_revision, FND_API.G_MISS_CHAR)
1117 , nvl(service_duration, FND_API.G_MISS_NUM)
1118 , nvl(service_period, FND_API.G_MISS_CHAR)
1119 , nvl(service_start_date, FND_API.G_MISS_DATE)
1120 , nvl(service_end_date, FND_API.G_MISS_DATE)
1121 , nvl(service_coterminate_flag, FND_API.G_MISS_CHAR)
1122 , nvl(unit_selling_percent, FND_API.G_MISS_NUM)
1123 , nvl(unit_list_percent, FND_API.G_MISS_NUM)
1124 , nvl(unit_percent_base_price, FND_API.G_MISS_NUM)
1125 , nvl(service_number, FND_API.G_MISS_NUM)
1126 -- , nvl(fulfilled_flag, FND_API.G_MISS_CHAR)--ToBeAdded
1127 -- , nvl(closed_flag, FND_API.G_MISS_CHAR)
1128 , nvl(cancelled_flag, FND_API.G_MISS_CHAR)
1129 , nvl(context, FND_API.G_MISS_CHAR)
1130 , nvl(attribute1, FND_API.G_MISS_CHAR)
1131 , nvl(attribute2, FND_API.G_MISS_CHAR)
1132 , nvl(attribute3, FND_API.G_MISS_CHAR)
1133 , nvl(attribute4, FND_API.G_MISS_CHAR)
1134 , nvl(attribute5, FND_API.G_MISS_CHAR)
1135 , nvl(attribute6, FND_API.G_MISS_CHAR)
1136 , nvl(attribute7, FND_API.G_MISS_CHAR)
1137 , nvl(attribute8, FND_API.G_MISS_CHAR)
1138 , nvl(attribute9, FND_API.G_MISS_CHAR)
1139 , nvl(attribute10, FND_API.G_MISS_CHAR)
1140 , nvl(attribute11, FND_API.G_MISS_CHAR)
1141 , nvl(attribute12, FND_API.G_MISS_CHAR)
1142 , nvl(attribute13, FND_API.G_MISS_CHAR)
1143 , nvl(attribute14, FND_API.G_MISS_CHAR)
1144 , nvl(attribute15, FND_API.G_MISS_CHAR)
1145 , nvl(attribute16, FND_API.G_MISS_CHAR) -- for bug 2184255
1146 , nvl(attribute17, FND_API.G_MISS_CHAR)
1147 , nvl(attribute18, FND_API.G_MISS_CHAR)
1148 , nvl(attribute19, FND_API.G_MISS_CHAR)
1149 , nvl(attribute20, FND_API.G_MISS_CHAR)
1150 , nvl(tp_context, FND_API.G_MISS_CHAR)
1151 , nvl(tp_attribute1, FND_API.G_MISS_CHAR)
1152 , nvl(tp_attribute2, FND_API.G_MISS_CHAR)
1153 , nvl(tp_attribute3, FND_API.G_MISS_CHAR)
1154 , nvl(tp_attribute4, FND_API.G_MISS_CHAR)
1155 , nvl(tp_attribute5, FND_API.G_MISS_CHAR)
1156 , nvl(tp_attribute6, FND_API.G_MISS_CHAR)
1157 , nvl(tp_attribute7, FND_API.G_MISS_CHAR)
1158 , nvl(tp_attribute8, FND_API.G_MISS_CHAR)
1159 , nvl(tp_attribute9, FND_API.G_MISS_CHAR)
1160 , nvl(tp_attribute10, FND_API.G_MISS_CHAR)
1161 , nvl(tp_attribute11, FND_API.G_MISS_CHAR)
1162 , nvl(tp_attribute12, FND_API.G_MISS_CHAR)
1163 , nvl(tp_attribute13, FND_API.G_MISS_CHAR)
1164 , nvl(tp_attribute14, FND_API.G_MISS_CHAR)
1165 , nvl(tp_attribute15, FND_API.G_MISS_CHAR)
1166 , nvl(industry_context, FND_API.G_MISS_CHAR)
1167 , nvl(industry_attribute1, FND_API.G_MISS_CHAR)
1168 , nvl(industry_attribute2, FND_API.G_MISS_CHAR)
1169 , nvl(industry_attribute3, FND_API.G_MISS_CHAR)
1170 , nvl(industry_attribute4, FND_API.G_MISS_CHAR)
1171 , nvl(industry_attribute5, FND_API.G_MISS_CHAR)
1172 , nvl(industry_attribute6, FND_API.G_MISS_CHAR)
1173 , nvl(industry_attribute7, FND_API.G_MISS_CHAR)
1174 , nvl(industry_attribute8, FND_API.G_MISS_CHAR)
1175 , nvl(industry_attribute9, FND_API.G_MISS_CHAR)
1176 , nvl(industry_attribute10, FND_API.G_MISS_CHAR)
1177 , nvl(industry_attribute11, FND_API.G_MISS_CHAR)
1178 , nvl(industry_attribute12, FND_API.G_MISS_CHAR)
1179 , nvl(industry_attribute13, FND_API.G_MISS_CHAR)
1180 , nvl(industry_attribute14, FND_API.G_MISS_CHAR)
1181 , nvl(industry_attribute15, FND_API.G_MISS_CHAR)
1182 , nvl(industry_attribute16, FND_API.G_MISS_CHAR)
1183 , nvl(industry_attribute17, FND_API.G_MISS_CHAR)
1184 , nvl(industry_attribute18, FND_API.G_MISS_CHAR)
1185 , nvl(industry_attribute19, FND_API.G_MISS_CHAR)
1186 , nvl(industry_attribute20, FND_API.G_MISS_CHAR)
1187 , nvl(industry_attribute21, FND_API.G_MISS_CHAR)
1188 , nvl(industry_attribute22, FND_API.G_MISS_CHAR)
1189 , nvl(industry_attribute23, FND_API.G_MISS_CHAR)
1190 , nvl(industry_attribute24, FND_API.G_MISS_CHAR)
1191 , nvl(industry_attribute25, FND_API.G_MISS_CHAR)
1192 , nvl(industry_attribute26, FND_API.G_MISS_CHAR)
1193 , nvl(industry_attribute27, FND_API.G_MISS_CHAR)
1194 , nvl(industry_attribute28, FND_API.G_MISS_CHAR)
1195 , nvl(industry_attribute29, FND_API.G_MISS_CHAR)
1196 , nvl(industry_attribute30, FND_API.G_MISS_CHAR)
1197 , nvl(pricing_context, FND_API.G_MISS_CHAR)
1198 , nvl(pricing_attribute1, FND_API.G_MISS_CHAR)
1199 , nvl(pricing_attribute2, FND_API.G_MISS_CHAR)
1200 , nvl(pricing_attribute3, FND_API.G_MISS_CHAR)
1201 , nvl(pricing_attribute4, FND_API.G_MISS_CHAR)
1202 , nvl(pricing_attribute5, FND_API.G_MISS_CHAR)
1203 , nvl(pricing_attribute6, FND_API.G_MISS_CHAR)
1204 , nvl(pricing_attribute7, FND_API.G_MISS_CHAR)
1205 , nvl(pricing_attribute8, FND_API.G_MISS_CHAR)
1206 , nvl(pricing_attribute9, FND_API.G_MISS_CHAR)
1207 , nvl(pricing_attribute10, FND_API.G_MISS_CHAR)
1208 , nvl(global_attribute_category, FND_API.G_MISS_CHAR)
1209 , nvl(global_attribute1, FND_API.G_MISS_CHAR)
1210 , nvl(global_attribute2, FND_API.G_MISS_CHAR)
1211 , nvl(global_attribute3, FND_API.G_MISS_CHAR)
1212 , nvl(global_attribute4, FND_API.G_MISS_CHAR)
1213 , nvl(global_attribute5, FND_API.G_MISS_CHAR)
1214 , nvl(global_attribute6, FND_API.G_MISS_CHAR)
1215 , nvl(global_attribute7, FND_API.G_MISS_CHAR)
1216 , nvl(global_attribute8, FND_API.G_MISS_CHAR)
1217 , nvl(global_attribute9, FND_API.G_MISS_CHAR)
1218 , nvl(global_attribute10, FND_API.G_MISS_CHAR)
1219 , nvl(global_attribute11, FND_API.G_MISS_CHAR)
1220 , nvl(global_attribute12, FND_API.G_MISS_CHAR)
1221 , nvl(global_attribute13, FND_API.G_MISS_CHAR)
1222 , nvl(global_attribute14, FND_API.G_MISS_CHAR)
1223 , nvl(global_attribute15, FND_API.G_MISS_CHAR)
1224 , nvl(global_attribute16, FND_API.G_MISS_CHAR)
1225 , nvl(global_attribute17, FND_API.G_MISS_CHAR)
1226 , nvl(global_attribute18, FND_API.G_MISS_CHAR)
1227 , nvl(global_attribute19, FND_API.G_MISS_CHAR)
1228 , nvl(global_attribute20, FND_API.G_MISS_CHAR)
1229 , nvl(return_context, FND_API.G_MISS_CHAR)
1230 , nvl(return_attribute1, FND_API.G_MISS_CHAR)
1231 , nvl(return_attribute2, FND_API.G_MISS_CHAR)
1232 , nvl(return_attribute3, FND_API.G_MISS_CHAR)
1233 , nvl(return_attribute4, FND_API.G_MISS_CHAR)
1234 , nvl(return_attribute5, FND_API.G_MISS_CHAR)
1235 , nvl(return_attribute6, FND_API.G_MISS_CHAR)
1236 , nvl(return_attribute7, FND_API.G_MISS_CHAR)
1237 , nvl(return_attribute8, FND_API.G_MISS_CHAR)
1238 , nvl(return_attribute9, FND_API.G_MISS_CHAR)
1239 , nvl(return_attribute10, FND_API.G_MISS_CHAR)
1240 , nvl(return_attribute11, FND_API.G_MISS_CHAR)
1241 , nvl(return_attribute12, FND_API.G_MISS_CHAR)
1242 , nvl(return_attribute13, FND_API.G_MISS_CHAR)
1243 , nvl(return_attribute14, FND_API.G_MISS_CHAR)
1244 , nvl(return_attribute15, FND_API.G_MISS_CHAR)
1245 , request_id
1246 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1247 , nvl(status_flag, FND_API.G_MISS_CHAR)
1248 , nvl(change_reason, FND_API.G_MISS_CHAR)
1249 , nvl(change_comments, FND_API.G_MISS_CHAR)
1250 , nvl(service_txn_reason_code, FND_API.G_MISS_CHAR)
1251 , nvl(service_txn_comments, FND_API.G_MISS_CHAR)
1252 , nvl(service_reference_type_code, FND_API.G_MISS_CHAR)
1253 , nvl(service_reference_order, FND_API.G_MISS_CHAR)
1254 , nvl(service_reference_line, FND_API.G_MISS_CHAR)
1255 , nvl(service_reference_system, FND_API.G_MISS_CHAR)
1256 , INVENTORY_ITEM_SEGMENT_1
1257 , INVENTORY_ITEM_SEGMENT_2
1258 , INVENTORY_ITEM_SEGMENT_3
1259 , INVENTORY_ITEM_SEGMENT_4
1260 , INVENTORY_ITEM_SEGMENT_5
1261 , INVENTORY_ITEM_SEGMENT_6
1262 , INVENTORY_ITEM_SEGMENT_7
1263 , INVENTORY_ITEM_SEGMENT_8
1264 , INVENTORY_ITEM_SEGMENT_9
1265 , INVENTORY_ITEM_SEGMENT_10
1266 , INVENTORY_ITEM_SEGMENT_11
1267 , INVENTORY_ITEM_SEGMENT_12
1268 , INVENTORY_ITEM_SEGMENT_13
1269 , INVENTORY_ITEM_SEGMENT_14
1270 , INVENTORY_ITEM_SEGMENT_15
1271 , INVENTORY_ITEM_SEGMENT_16
1272 , INVENTORY_ITEM_SEGMENT_17
1273 , INVENTORY_ITEM_SEGMENT_18
1274 , INVENTORY_ITEM_SEGMENT_19
1275 , INVENTORY_ITEM_SEGMENT_20
1276 , nvl(commitment, FND_API.G_MISS_CHAR)
1277 , nvl(commitment_id, FND_API.G_MISS_NUM)
1278 -- aksingh subinventory
1279 , nvl(subinventory, FND_API.G_MISS_CHAR)
1280 ,nvl(salesrep, FND_API.G_MISS_CHAR)
1281 ,nvl(salesrep_id, FND_API.G_MISS_NUM)
1282 , nvl(earliest_acceptable_date, FND_API.G_MISS_DATE)
1283 , nvl(latest_acceptable_date, FND_API.G_MISS_DATE)
1284 , split_from_line_ref --bsadri
1285 , split_from_shipment_ref
1286 , nvl(invoice_to_address1, FND_API.G_MISS_CHAR)
1287 , nvl(invoice_to_address2, FND_API.G_MISS_CHAR)
1288 , nvl(invoice_to_address3, FND_API.G_MISS_CHAR)
1289 , nvl(invoice_to_address4, FND_API.G_MISS_CHAR)
1290 , nvl(invoice_to_city, FND_API.G_MISS_CHAR)
1291 , nvl(invoice_to_state, FND_API.G_MISS_CHAR)
1292 , nvl(invoice_to_postal_code, FND_API.G_MISS_CHAR)
1293 , nvl(invoice_to_country, FND_API.G_MISS_CHAR)
1294 -- { Start add new columns to select for the Add Customer
1295 , Orig_Ship_Address_Ref
1296 , Orig_Bill_Address_Ref
1297 , Orig_Deliver_Address_Ref
1298 , Ship_to_Contact_Ref
1299 , Bill_to_Contact_Ref
1300 , Deliver_to_Contact_Ref
1301 -- End add new columns to select for the Add Customer}
1302 , nvl(Config_Header_Id, FND_API.G_MISS_NUM)
1303 , nvl(Config_Rev_Nbr, FND_API.G_MISS_NUM)
1304 , nvl(Configuration_ID, FND_API.G_MISS_NUM)
1305 , nvl(ship_to_customer_name, FND_API.G_MISS_CHAR)
1306 , nvl(ship_to_customer_number, FND_API.G_MISS_CHAR)
1307 , nvl(ship_to_customer_id, FND_API.G_MISS_NUM)
1308 , nvl(invoice_to_customer_name, FND_API.G_MISS_CHAR)
1309 , nvl(invoice_to_customer_number, FND_API.G_MISS_CHAR)
1310 , nvl(invoice_to_customer_id, FND_API.G_MISS_NUM)
1311 , nvl(deliver_to_customer_name, FND_API.G_MISS_CHAR)
1312 , nvl(deliver_to_customer_number, FND_API.G_MISS_CHAR)
1313 , nvl(deliver_to_customer_id, FND_API.G_MISS_NUM)
1314 , nvl(user_item_description, FND_API.G_MISS_CHAR)
1315 , override_atp_date_code
1316 , xml_transaction_type_code
1317 , nvl(blanket_number, FND_API.G_MISS_NUM)
1318 , nvl(blanket_line_number, FND_API.G_MISS_NUM)
1319 , nvl(shipping_method, FND_API.G_MISS_CHAR)
1320 , nvl(change_sequence, FND_API.G_MISS_CHAR)
1321 -- automatic account creation {
1322 , ship_to_party_id
1323 , ship_to_party_site_id
1324 , ship_to_party_site_use_id
1325 , deliver_to_party_id
1326 , deliver_to_party_site_id
1327 , deliver_to_party_site_use_id
1328 , invoice_to_party_id
1329 , invoice_to_party_site_id
1330 , invoice_to_party_site_use_id
1331 -- automatic account creation }
1332 -- { Distributer Order related change
1333 , nvl(end_customer_id, FND_API.G_MISS_NUM)
1334 , nvl(end_customer_contact_id, FND_API.G_MISS_NUM)
1335 , nvl(end_customer_site_use_id, FND_API.G_MISS_NUM)
1336 , nvl(end_customer_name, FND_API.G_MISS_CHAR) --mvijayku
1337 , nvl(end_customer_address1, FND_API.G_MISS_CHAR)
1338 , nvl(end_customer_address2, FND_API.G_MISS_CHAR)
1339 , nvl(end_customer_address3, FND_API.G_MISS_CHAR)
1340 , nvl(end_customer_address4, FND_API.G_MISS_CHAR)
1341 -- , nvl(end_customer_location, FND_API.G_MISS_CHAR)
1342 , nvl(end_customer_city, FND_API.G_MISS_CHAR)
1343 , nvl(end_customer_state, FND_API.G_MISS_CHAR)
1344 , nvl(end_customer_postal_code, FND_API.G_MISS_CHAR)
1345 , nvl(end_customer_country, FND_API.G_MISS_CHAR)
1346 , nvl(end_customer_contact, FND_API.G_MISS_CHAR)
1347 , nvl(end_customer_number, FND_API.G_MISS_CHAR)
1348 , nvl(ib_owner, FND_API.G_MISS_CHAR)
1349 , nvl(ib_current_location, FND_API.G_MISS_CHAR)
1350 , nvl(ib_installed_at_location, FND_API.G_MISS_CHAR)
1351 , nvl(ib_owner_code, FND_API.G_MISS_CHAR)
1352 , nvl(ib_current_location_code, FND_API.G_MISS_CHAR)
1353 , nvl(ib_installed_at_location_code, FND_API.G_MISS_CHAR)
1354 , END_CUSTOMER_PARTY_ID
1355 , END_CUSTOMER_ORG_CONTACT_ID
1356 , END_CUSTOMER_PARTY_SITE_ID
1357 , END_CUSTOMER_PARTY_SITE_USE_ID
1358 , END_CUSTOMER_PARTY_NUMBER
1359 -- Distributer Order related change }
1360 -- for automatic account creation
1361 , ship_to_party_number
1362 , invoice_to_party_number
1363 , deliver_to_party_number
1364 -- for automatic account creation
1365 , nvl(deliver_to_address1, FND_API.G_MISS_CHAR)
1366 , nvl(deliver_to_address2, FND_API.G_MISS_CHAR)
1367 , nvl(deliver_to_address3, FND_API.G_MISS_CHAR)
1368 , nvl(deliver_to_address4, FND_API.G_MISS_CHAR)
1369 , nvl(deliver_to_state, FND_API.G_MISS_CHAR)
1370 , nvl(deliver_to_county, FND_API.G_MISS_CHAR)
1371 , nvl(deliver_to_country, FND_API.G_MISS_CHAR)
1372 , nvl(deliver_to_province, FND_API.G_MISS_CHAR)
1373 , nvl(deliver_to_city, FND_API.G_MISS_CHAR)
1374 , nvl(deliver_to_postal_code, FND_API.G_MISS_CHAR)
1375 , nvl(planning_priority, FND_API.G_MISS_NUM) --Bug#6924881
1376 FROM oe_lines_iface_all
1377 WHERE order_source_id = l_order_source_id
1378 AND orig_sys_document_ref = l_orig_sys_document_ref
1379 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1380 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1381 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1382 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1383 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1384 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1385 AND nvl(org_id, FND_API.G_MISS_NUM)
1386 = nvl(l_org_id, FND_API.G_MISS_NUM)
1387 AND nvl( request_id, FND_API.G_MISS_NUM)
1388 = nvl(l_request_id, FND_API.G_MISS_NUM)
1389 AND nvl(rejected_flag,'N') = 'N'
1390 FOR UPDATE NOWAIT
1391 ORDER BY operation_code desc, orig_sys_line_ref asc, orig_sys_shipment_ref asc
1392 ;
1393
1394
1395 /* -----------------------------------------------------------
1396 Line Discounts/Price adjustments cursor
1397 -----------------------------------------------------------
1398 */
1399 CURSOR l_line_adj_cursor IS
1400 SELECT nvl(orig_sys_discount_ref, FND_API.G_MISS_CHAR)
1401 , nvl(change_request_code, FND_API.G_MISS_CHAR)
1402 , nvl(list_header_id, FND_API.G_MISS_NUM)
1403 , nvl(list_line_id, FND_API.G_MISS_NUM)
1404 , nvl(discount_name, FND_API.G_MISS_CHAR)
1405 , nvl(percent, FND_API.G_MISS_NUM)
1406 , nvl(automatic_flag, FND_API.G_MISS_CHAR)
1407 , nvl(applied_flag, FND_API.G_MISS_CHAR)
1408 , nvl(operand, FND_API.G_MISS_NUM)
1409 , nvl(arithmetic_operator, FND_API.G_MISS_CHAR)
1410 , nvl(context, FND_API.G_MISS_CHAR)
1411 , nvl(attribute1, FND_API.G_MISS_CHAR)
1412 , nvl(attribute2, FND_API.G_MISS_CHAR)
1413 , nvl(attribute3, FND_API.G_MISS_CHAR)
1414 , nvl(attribute4, FND_API.G_MISS_CHAR)
1415 , nvl(attribute5, FND_API.G_MISS_CHAR)
1416 , nvl(attribute6, FND_API.G_MISS_CHAR)
1417 , nvl(attribute7, FND_API.G_MISS_CHAR)
1418 , nvl(attribute8, FND_API.G_MISS_CHAR)
1419 , nvl(attribute9, FND_API.G_MISS_CHAR)
1420 , nvl(attribute10, FND_API.G_MISS_CHAR)
1421 , nvl(attribute11, FND_API.G_MISS_CHAR)
1422 , nvl(attribute12, FND_API.G_MISS_CHAR)
1423 , nvl(attribute13, FND_API.G_MISS_CHAR)
1424 , nvl(attribute14, FND_API.G_MISS_CHAR)
1425 , nvl(attribute15, FND_API.G_MISS_CHAR)
1426 , request_id
1427 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1428 , nvl(status_flag, FND_API.G_MISS_CHAR)
1429 -- Price Adjustment related changes bug# 1220921 (Start)
1430 , nvl( AC_CONTEXT, FND_API.G_MISS_CHAR)
1431 , nvl( AC_ATTRIBUTE1, FND_API.G_MISS_CHAR)
1432 , nvl( AC_ATTRIBUTE2, FND_API.G_MISS_CHAR)
1433 , nvl( AC_ATTRIBUTE3, FND_API.G_MISS_CHAR)
1434 , nvl( AC_ATTRIBUTE4, FND_API.G_MISS_CHAR)
1435 , nvl( AC_ATTRIBUTE5, FND_API.G_MISS_CHAR)
1436 , nvl( AC_ATTRIBUTE6, FND_API.G_MISS_CHAR)
1437 , nvl( AC_ATTRIBUTE7, FND_API.G_MISS_CHAR)
1438 , nvl( AC_ATTRIBUTE8, FND_API.G_MISS_CHAR)
1439 , nvl( AC_ATTRIBUTE9, FND_API.G_MISS_CHAR)
1440 , nvl( AC_ATTRIBUTE10, FND_API.G_MISS_CHAR)
1441 , nvl( AC_ATTRIBUTE11, FND_API.G_MISS_CHAR)
1442 , nvl( AC_ATTRIBUTE12, FND_API.G_MISS_CHAR)
1443 , nvl( AC_ATTRIBUTE13, FND_API.G_MISS_CHAR)
1444 , nvl( AC_ATTRIBUTE14, FND_API.G_MISS_CHAR)
1445 , nvl( AC_ATTRIBUTE15, FND_API.G_MISS_CHAR)
1446 , nvl( LIST_NAME, FND_API.G_MISS_CHAR)
1447 , nvl( LIST_LINE_TYPE_CODE, FND_API.G_MISS_CHAR)
1448 , nvl( LIST_LINE_NUMBER, FND_API.G_MISS_CHAR)
1449 , nvl( VERSION_NUMBER, FND_API.G_MISS_CHAR)
1450 , nvl( INVOICED_FLAG, FND_API.G_MISS_CHAR)
1451 , nvl( ESTIMATED_FLAG, FND_API.G_MISS_CHAR)
1452 , nvl( INC_IN_SALES_PERFORMANCE, FND_API.G_MISS_CHAR)
1453 , nvl( CHARGE_TYPE_CODE, FND_API.G_MISS_CHAR)
1454 , nvl( CHARGE_SUBTYPE_CODE, FND_API.G_MISS_CHAR)
1455 , nvl( CREDIT_OR_CHARGE_FLAG, FND_API.G_MISS_CHAR)
1456 , nvl( INCLUDE_ON_RETURNS_FLAG, FND_API.G_MISS_CHAR)
1457 , nvl( COST_ID, FND_API.G_MISS_NUM)
1458 , nvl( TAX_CODE, FND_API.G_MISS_CHAR)
1459 , nvl( PARENT_ADJUSTMENT_ID, FND_API.G_MISS_NUM)
1460 , nvl(MODIFIER_MECHANISM_TYPE_CODE,FND_API.G_MISS_CHAR)
1461 , nvl( MODIFIED_FROM, FND_API.G_MISS_CHAR)
1462 , nvl( MODIFIED_TO, FND_API.G_MISS_CHAR)
1463 , nvl( UPDATED_FLAG, FND_API.G_MISS_CHAR)
1464 , nvl( UPDATE_ALLOWED, FND_API.G_MISS_CHAR)
1465 , nvl( CHANGE_REASON_CODE, FND_API.G_MISS_CHAR)
1466 , nvl( CHANGE_REASON_TEXT, FND_API.G_MISS_CHAR)
1467 , nvl( PRICING_PHASE_ID, FND_API.G_MISS_NUM)
1468 , nvl( ADJUSTED_AMOUNT, FND_API.G_MISS_NUM)
1469 -- Price Adjustment related changes bug# 1220921 (End)
1470 FROM oe_price_adjs_iface_all
1471 WHERE order_source_id = l_order_source_id
1472 AND orig_sys_document_ref = l_orig_sys_document_ref
1473 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1474 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1475 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1476 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1477 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1478 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1479 AND nvl(org_id, FND_API.G_MISS_NUM)
1480 = nvl(l_org_id, FND_API.G_MISS_NUM)
1481 AND orig_sys_line_ref = l_orig_sys_line_ref
1482 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1483 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1484 AND nvl( request_id, FND_API.G_MISS_NUM)
1485 = nvl(l_request_id, FND_API.G_MISS_NUM)
1486 FOR UPDATE NOWAIT
1487 ORDER BY orig_sys_discount_ref
1488 ;
1489
1490
1491 /* -----------------------------------------------------------
1492 Line Price attribute cursor
1493 -----------------------------------------------------------
1494 */
1495
1496 CURSOR l_Line_attrib_cursor IS
1497 SELECT nvl(creation_date , FND_API.G_MISS_DATE)
1498 , nvl(created_by , FND_API.G_MISS_NUM)
1499 , nvl(last_update_date , FND_API.G_MISS_DATE)
1500 , nvl(last_updated_by , FND_API.G_MISS_NUM)
1501 , nvl(last_update_login , FND_API.G_MISS_NUM)
1502 , nvl(program_application_id , FND_API.G_MISS_NUM)
1503 , nvl(program_id , FND_API.G_MISS_NUM)
1504 , nvl(program_update_date , FND_API.G_MISS_DATE)
1505 , nvl(request_id , FND_API.G_MISS_NUM)
1506 , nvl(flex_title , FND_API.G_MISS_CHAR)
1507 , nvl(pricing_context , FND_API.G_MISS_CHAR)
1508 , nvl(pricing_attribute1 , FND_API.G_MISS_CHAR)
1509 , nvl(pricing_attribute2 , FND_API.G_MISS_CHAR)
1510 , nvl(pricing_attribute3 , FND_API.G_MISS_CHAR)
1511 , nvl(pricing_attribute4 , FND_API.G_MISS_CHAR)
1512 , nvl(pricing_attribute5 , FND_API.G_MISS_CHAR)
1513 , nvl(pricing_attribute6 , FND_API.G_MISS_CHAR)
1514 , nvl(pricing_attribute7 , FND_API.G_MISS_CHAR)
1515 , nvl(pricing_attribute8 , FND_API.G_MISS_CHAR)
1516 , nvl(pricing_attribute9 , FND_API.G_MISS_CHAR)
1517 , nvl(pricing_attribute10 , FND_API.G_MISS_CHAR)
1518 , nvl(pricing_attribute11 , FND_API.G_MISS_CHAR)
1519 , nvl(pricing_attribute12 , FND_API.G_MISS_CHAR)
1520 , nvl(pricing_attribute13 , FND_API.G_MISS_CHAR)
1521 , nvl(pricing_attribute14 , FND_API.G_MISS_CHAR)
1522 , nvl(pricing_attribute15 , FND_API.G_MISS_CHAR)
1523 , nvl(pricing_attribute16 , FND_API.G_MISS_CHAR)
1524 , nvl(pricing_attribute17 , FND_API.G_MISS_CHAR)
1525 , nvl(pricing_attribute18 , FND_API.G_MISS_CHAR)
1526 , nvl(pricing_attribute19 , FND_API.G_MISS_CHAR)
1527 , nvl(pricing_attribute20 , FND_API.G_MISS_CHAR)
1528 , nvl(pricing_attribute21 , FND_API.G_MISS_CHAR)
1529 , nvl(pricing_attribute22 , FND_API.G_MISS_CHAR)
1530 , nvl(pricing_attribute23 , FND_API.G_MISS_CHAR)
1531 , nvl(pricing_attribute24 , FND_API.G_MISS_CHAR)
1532 , nvl(pricing_attribute25 , FND_API.G_MISS_CHAR)
1533 , nvl(pricing_attribute26 , FND_API.G_MISS_CHAR)
1534 , nvl(pricing_attribute27 , FND_API.G_MISS_CHAR)
1535 , nvl(pricing_attribute28 , FND_API.G_MISS_CHAR)
1536 , nvl(pricing_attribute29 , FND_API.G_MISS_CHAR)
1537 , nvl(pricing_attribute30 , FND_API.G_MISS_CHAR)
1538 , nvl(pricing_attribute31 , FND_API.G_MISS_CHAR)
1539 , nvl(pricing_attribute32 , FND_API.G_MISS_CHAR)
1540 , nvl(pricing_attribute33 , FND_API.G_MISS_CHAR)
1541 , nvl(pricing_attribute34 , FND_API.G_MISS_CHAR)
1542 , nvl(pricing_attribute35 , FND_API.G_MISS_CHAR)
1543 , nvl(pricing_attribute36 , FND_API.G_MISS_CHAR)
1544 , nvl(pricing_attribute37 , FND_API.G_MISS_CHAR)
1545 , nvl(pricing_attribute38 , FND_API.G_MISS_CHAR)
1546 , nvl(pricing_attribute39 , FND_API.G_MISS_CHAR)
1547 , nvl(pricing_attribute40 , FND_API.G_MISS_CHAR)
1548 , nvl(pricing_attribute41 , FND_API.G_MISS_CHAR)
1549 , nvl(pricing_attribute42 , FND_API.G_MISS_CHAR)
1550 , nvl(pricing_attribute43 , FND_API.G_MISS_CHAR)
1551 , nvl(pricing_attribute44 , FND_API.G_MISS_CHAR)
1552 , nvl(pricing_attribute45 , FND_API.G_MISS_CHAR)
1553 , nvl(pricing_attribute46 , FND_API.G_MISS_CHAR)
1554 , nvl(pricing_attribute47 , FND_API.G_MISS_CHAR)
1555 , nvl(pricing_attribute48 , FND_API.G_MISS_CHAR)
1556 , nvl(pricing_attribute49 , FND_API.G_MISS_CHAR)
1557 , nvl(pricing_attribute50 , FND_API.G_MISS_CHAR)
1558 , nvl(pricing_attribute51 , FND_API.G_MISS_CHAR)
1559 , nvl(pricing_attribute52 , FND_API.G_MISS_CHAR)
1560 , nvl(pricing_attribute53 , FND_API.G_MISS_CHAR)
1561 , nvl(pricing_attribute54 , FND_API.G_MISS_CHAR)
1562 , nvl(pricing_attribute55 , FND_API.G_MISS_CHAR)
1563 , nvl(pricing_attribute56 , FND_API.G_MISS_CHAR)
1564 , nvl(pricing_attribute57 , FND_API.G_MISS_CHAR)
1565 , nvl(pricing_attribute58 , FND_API.G_MISS_CHAR)
1566 , nvl(pricing_attribute59 , FND_API.G_MISS_CHAR)
1567 , nvl(pricing_attribute60 , FND_API.G_MISS_CHAR)
1568 , nvl(pricing_attribute61 , FND_API.G_MISS_CHAR)
1569 , nvl(pricing_attribute62 , FND_API.G_MISS_CHAR)
1570 , nvl(pricing_attribute63 , FND_API.G_MISS_CHAR)
1571 , nvl(pricing_attribute64 , FND_API.G_MISS_CHAR)
1572 , nvl(pricing_attribute65 , FND_API.G_MISS_CHAR)
1573 , nvl(pricing_attribute66 , FND_API.G_MISS_CHAR)
1574 , nvl(pricing_attribute67 , FND_API.G_MISS_CHAR)
1575 , nvl(pricing_attribute68 , FND_API.G_MISS_CHAR)
1576 , nvl(pricing_attribute69 , FND_API.G_MISS_CHAR)
1577 , nvl(pricing_attribute70 , FND_API.G_MISS_CHAR)
1578 , nvl(pricing_attribute71 , FND_API.G_MISS_CHAR)
1579 , nvl(pricing_attribute72 , FND_API.G_MISS_CHAR)
1580 , nvl(pricing_attribute73 , FND_API.G_MISS_CHAR)
1581 , nvl(pricing_attribute74 , FND_API.G_MISS_CHAR)
1582 , nvl(pricing_attribute75 , FND_API.G_MISS_CHAR)
1583 , nvl(pricing_attribute76 , FND_API.G_MISS_CHAR)
1584 , nvl(pricing_attribute77 , FND_API.G_MISS_CHAR)
1585 , nvl(pricing_attribute78 , FND_API.G_MISS_CHAR)
1586 , nvl(pricing_attribute79 , FND_API.G_MISS_CHAR)
1587 , nvl(pricing_attribute80 , FND_API.G_MISS_CHAR)
1588 , nvl(pricing_attribute81 , FND_API.G_MISS_CHAR)
1589 , nvl(pricing_attribute82 , FND_API.G_MISS_CHAR)
1590 , nvl(pricing_attribute83 , FND_API.G_MISS_CHAR)
1591 , nvl(pricing_attribute84 , FND_API.G_MISS_CHAR)
1592 , nvl(pricing_attribute85 , FND_API.G_MISS_CHAR)
1593 , nvl(pricing_attribute86 , FND_API.G_MISS_CHAR)
1594 , nvl(pricing_attribute87 , FND_API.G_MISS_CHAR)
1595 , nvl(pricing_attribute88 , FND_API.G_MISS_CHAR)
1596 , nvl(pricing_attribute89 , FND_API.G_MISS_CHAR)
1597 , nvl(pricing_attribute90 , FND_API.G_MISS_CHAR)
1598 , nvl(pricing_attribute91 , FND_API.G_MISS_CHAR)
1599 , nvl(pricing_attribute92 , FND_API.G_MISS_CHAR)
1600 , nvl(pricing_attribute93 , FND_API.G_MISS_CHAR)
1601 , nvl(pricing_attribute94 , FND_API.G_MISS_CHAR)
1602 , nvl(pricing_attribute95 , FND_API.G_MISS_CHAR)
1603 , nvl(pricing_attribute96 , FND_API.G_MISS_CHAR)
1604 , nvl(pricing_attribute97 , FND_API.G_MISS_CHAR)
1605 , nvl(pricing_attribute98 , FND_API.G_MISS_CHAR)
1606 , nvl(pricing_attribute99 , FND_API.G_MISS_CHAR)
1607 , nvl(pricing_attribute100 , FND_API.G_MISS_CHAR)
1608 , nvl(context , FND_API.G_MISS_CHAR)
1609 , nvl(attribute1 , FND_API.G_MISS_CHAR)
1610 , nvl(attribute2 , FND_API.G_MISS_CHAR)
1611 , nvl(attribute3 , FND_API.G_MISS_CHAR)
1612 , nvl(attribute4 , FND_API.G_MISS_CHAR)
1613 , nvl(attribute5 , FND_API.G_MISS_CHAR)
1614 , nvl(attribute6 , FND_API.G_MISS_CHAR)
1615 , nvl(attribute7 , FND_API.G_MISS_CHAR)
1616 , nvl(attribute8 , FND_API.G_MISS_CHAR)
1617 , nvl(attribute9 , FND_API.G_MISS_CHAR)
1618 , nvl(attribute10 , FND_API.G_MISS_CHAR)
1619 , nvl(attribute11 , FND_API.G_MISS_CHAR)
1620 , nvl(attribute12 , FND_API.G_MISS_CHAR)
1621 , nvl(attribute13 , FND_API.G_MISS_CHAR)
1622 , nvl(attribute14 , FND_API.G_MISS_CHAR)
1623 , nvl(attribute15 , FND_API.G_MISS_CHAR)
1624 , nvl(operation_code , OE_GLOBALS.G_OPR_CREATE)
1625 FROM oe_price_atts_iface_all
1626 WHERE order_source_id = l_order_source_id
1627 AND orig_sys_document_ref = l_orig_sys_document_ref
1628 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1629 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1630 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1631 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1632 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1633 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1634 AND nvl(org_id, FND_API.G_MISS_NUM)
1635 = nvl(l_org_id, FND_API.G_MISS_NUM)
1636 AND orig_sys_line_ref = l_orig_sys_line_ref
1637 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1638 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1639 AND nvl( request_id, FND_API.G_MISS_NUM)
1640 = nvl(l_request_id, FND_API.G_MISS_NUM)
1641 FOR UPDATE NOWAIT
1642 ORDER by orig_sys_line_ref;
1643
1644 /* -----------------------------------------------------------
1645 Line Sales Credits cursor
1646 -----------------------------------------------------------
1647 */
1648 CURSOR l_line_scredit_cursor IS
1649 SELECT nvl(orig_sys_credit_ref, FND_API.G_MISS_CHAR)
1650 , nvl(change_request_code, FND_API.G_MISS_CHAR)
1651 , nvl(salesrep_id, FND_API.G_MISS_NUM)
1652 , nvl(salesrep , FND_API.G_MISS_CHAR)
1653 , nvl(sales_credit_type_id, FND_API.G_MISS_NUM)
1654 , nvl(sales_credit_type, FND_API.G_MISS_CHAR)
1655 , nvl(percent, FND_API.G_MISS_NUM)
1656 , nvl(context, FND_API.G_MISS_CHAR)
1657 , nvl(attribute1, FND_API.G_MISS_CHAR)
1658 , nvl(attribute2, FND_API.G_MISS_CHAR)
1659 , nvl(attribute3, FND_API.G_MISS_CHAR)
1660 , nvl(attribute4, FND_API.G_MISS_CHAR)
1661 , nvl(attribute5, FND_API.G_MISS_CHAR)
1662 , nvl(attribute6, FND_API.G_MISS_CHAR)
1663 , nvl(attribute7, FND_API.G_MISS_CHAR)
1664 , nvl(attribute8, FND_API.G_MISS_CHAR)
1665 , nvl(attribute9, FND_API.G_MISS_CHAR)
1666 , nvl(attribute10, FND_API.G_MISS_CHAR)
1667 , nvl(attribute11, FND_API.G_MISS_CHAR)
1668 , nvl(attribute12, FND_API.G_MISS_CHAR)
1669 , nvl(attribute13, FND_API.G_MISS_CHAR)
1670 , nvl(attribute14, FND_API.G_MISS_CHAR)
1671 , nvl(attribute15, FND_API.G_MISS_CHAR)
1672 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1673 , nvl(status_flag, FND_API.G_MISS_CHAR)
1674 , nvl(change_reason, FND_API.G_MISS_CHAR)
1675 , nvl(change_comments, FND_API.G_MISS_CHAR)
1676 FROM oe_credits_iface_all
1677 WHERE order_source_id = l_order_source_id
1678 AND orig_sys_document_ref = l_orig_sys_document_ref
1679 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1680 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1681 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1682 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1683 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1684 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1685 AND nvl(org_id, FND_API.G_MISS_NUM)
1686 = nvl(l_org_id, FND_API.G_MISS_NUM)
1687 AND orig_sys_line_ref = l_orig_sys_line_ref
1688 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1689 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1690 AND nvl( request_id, FND_API.G_MISS_NUM)
1691 = nvl(l_request_id, FND_API.G_MISS_NUM)
1692 FOR UPDATE NOWAIT
1693 ORDER BY orig_sys_credit_ref
1694 ;
1695
1696 /* -----------------------------------------------------------
1697 Multiple Payments: Line payments cursor
1698 -----------------------------------------------------------
1699 */
1700 CURSOR l_line_payment_cursor IS
1701 SELECT nvl(orig_sys_payment_ref, FND_API.G_MISS_CHAR)
1702 , nvl(change_request_code, FND_API.G_MISS_CHAR)
1703 , nvl(payment_type_code, FND_API.G_MISS_CHAR)
1704 , nvl(commitment, FND_API.G_MISS_CHAR)
1705 , nvl(payment_trx_id, FND_API.G_MISS_NUM)
1706 , nvl(payment_method, FND_API.G_MISS_CHAR)
1707 , nvl(receipt_method_id, FND_API.G_MISS_NUM)
1708 , nvl(payment_collection_event,FND_API.G_MISS_CHAR)
1709 , nvl(payment_set_id, FND_API.G_MISS_NUM)
1710 , nvl(prepaid_amount, FND_API.G_MISS_NUM)
1711 , nvl(credit_card_number, FND_API.G_MISS_CHAR)
1712 , nvl(credit_card_holder_name, FND_API.G_MISS_CHAR)
1713 , nvl(credit_card_expiration_date,FND_API.G_MISS_DATE)
1714 , nvl(credit_card_code, FND_API.G_MISS_CHAR)
1715 , nvl(credit_card_approval_code,FND_API.G_MISS_CHAR)
1716 , nvl(credit_card_approval_date,FND_API.G_MISS_DATE)
1717 , nvl(check_number, FND_API.G_MISS_CHAR)--6367320
1718 , nvl(payment_amount, FND_API.G_MISS_NUM)
1719 , nvl(payment_percentage, FND_API.G_MISS_NUM)
1720 , nvl(creation_date, FND_API.G_MISS_DATE)
1721 , nvl(created_by, FND_API.G_MISS_NUM)
1722 , nvl(last_update_date, FND_API.G_MISS_DATE)
1723 , nvl(last_updated_by, FND_API.G_MISS_NUM)
1724 , nvl(last_update_login, FND_API.G_MISS_NUM)
1725 , nvl(program_application_id, FND_API.G_MISS_NUM)
1726 , nvl(program_id, FND_API.G_MISS_NUM)
1727 , nvl(program_update_date, FND_API.G_MISS_DATE)
1728 , nvl(context, FND_API.G_MISS_CHAR)
1729 , nvl(attribute1, FND_API.G_MISS_CHAR)
1730 , nvl(attribute2, FND_API.G_MISS_CHAR)
1731 , nvl(attribute3, FND_API.G_MISS_CHAR)
1732 , nvl(attribute4, FND_API.G_MISS_CHAR)
1733 , nvl(attribute5, FND_API.G_MISS_CHAR)
1734 , nvl(attribute6, FND_API.G_MISS_CHAR)
1735 , nvl(attribute7, FND_API.G_MISS_CHAR)
1736 , nvl(attribute8, FND_API.G_MISS_CHAR)
1737 , nvl(attribute9, FND_API.G_MISS_CHAR)
1738 , nvl(attribute10, FND_API.G_MISS_CHAR)
1739 , nvl(attribute11, FND_API.G_MISS_CHAR)
1740 , nvl(attribute12, FND_API.G_MISS_CHAR)
1741 , nvl(attribute13, FND_API.G_MISS_CHAR)
1742 , nvl(attribute14, FND_API.G_MISS_CHAR)
1743 , nvl(attribute15, FND_API.G_MISS_CHAR)
1744 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1745 , nvl(status_flag, FND_API.G_MISS_CHAR)
1746 , nvl(payment_number, FND_API.G_MISS_NUM)
1747 , nvl(header_id, FND_API.G_MISS_NUM)
1748 , nvl(line_id, FND_API.G_MISS_NUM)
1749 , nvl(trxn_extension_id, FND_API.G_MISS_NUM)
1750 , nvl(instrument_security_code,FND_API.G_MISS_CHAR) --R12 CVV2
1751 FROM oe_payments_iface_all
1752 WHERE order_source_id = l_order_source_id
1753 AND orig_sys_document_ref = l_orig_sys_document_ref
1754 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1755 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1756 AND nvl(org_id, FND_API.G_MISS_NUM)
1757 = nvl(l_org_id, FND_API.G_MISS_NUM)
1758 AND orig_sys_line_ref = l_orig_sys_line_ref
1759 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1760 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1761 AND nvl( request_id, FND_API.G_MISS_NUM)
1762 = nvl(l_request_id, FND_API.G_MISS_NUM)
1763 FOR UPDATE NOWAIT
1764 ORDER BY orig_sys_payment_ref;
1765 -- end of multiple payments: line payment cursor.
1766
1767 /* -----------------------------------------------------------
1768 Line Lot Serials cursor
1769 -----------------------------------------------------------
1770 */
1771 CURSOR l_lot_serial_cursor IS
1772 SELECT nvl(orig_sys_lotserial_ref, FND_API.G_MISS_CHAR)
1773 , nvl(change_request_code, FND_API.G_MISS_CHAR)
1774 , nvl(lot_number, FND_API.G_MISS_CHAR)
1775 -- , nvl(sublot_number, FND_API.G_MISS_CHAR) -- OPM 3322359 INVCONV
1776 , nvl(from_serial_number, FND_API.G_MISS_CHAR)
1777 , nvl(to_serial_number, FND_API.G_MISS_CHAR)
1778 , nvl(quantity, FND_API.G_MISS_NUM)
1779 , nvl(quantity2, FND_API.G_MISS_NUM) -- OPM 3322359
1780 , nvl(context, FND_API.G_MISS_CHAR)
1781 , nvl(attribute1, FND_API.G_MISS_CHAR)
1782 , nvl(attribute2, FND_API.G_MISS_CHAR)
1783 , nvl(attribute3, FND_API.G_MISS_CHAR)
1784 , nvl(attribute4, FND_API.G_MISS_CHAR)
1785 , nvl(attribute5, FND_API.G_MISS_CHAR)
1786 , nvl(attribute6, FND_API.G_MISS_CHAR)
1787 , nvl(attribute7, FND_API.G_MISS_CHAR)
1788 , nvl(attribute8, FND_API.G_MISS_CHAR)
1789 , nvl(attribute9, FND_API.G_MISS_CHAR)
1790 , nvl(attribute10, FND_API.G_MISS_CHAR)
1791 , nvl(attribute11, FND_API.G_MISS_CHAR)
1792 , nvl(attribute12, FND_API.G_MISS_CHAR)
1793 , nvl(attribute13, FND_API.G_MISS_CHAR)
1794 , nvl(attribute14, FND_API.G_MISS_CHAR)
1795 , nvl(attribute15, FND_API.G_MISS_CHAR)
1796 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1797 , nvl(status_flag, FND_API.G_MISS_CHAR)
1798 FROM oe_lotserials_iface_all
1799 WHERE order_source_id = l_order_source_id
1800 AND orig_sys_document_ref = l_orig_sys_document_ref
1801 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1802 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1803 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1804 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1805 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1806 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1807 AND nvl(org_id, FND_API.G_MISS_NUM)
1808 = nvl(l_org_id, FND_API.G_MISS_NUM)
1809 AND orig_sys_line_ref = l_orig_sys_line_ref
1810 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1811 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1812 AND nvl( request_id, FND_API.G_MISS_NUM)
1813 = nvl(l_request_id, FND_API.G_MISS_NUM)
1814 FOR UPDATE NOWAIT
1815 ORDER BY orig_sys_lotserial_ref
1816 ;
1817
1818
1819 /* -----------------------------------------------------------
1820 Line Reservations cursor
1821 -----------------------------------------------------------
1822 */
1823 CURSOR l_reservation_cursor IS
1824 SELECT orig_sys_reservation_ref
1825 , revision
1826 , lot_number_id
1827 , lot_number
1828 , subinventory_id
1829 , subinventory_code
1830 , locator_id
1831 , quantity
1832 , quantity2 -- INVCONV
1833 , attribute_category
1834 , attribute1
1835 , attribute2
1836 , attribute3
1837 , attribute4
1838 , attribute5
1839 , attribute6
1840 , attribute7
1841 , attribute8
1842 , attribute9
1843 , attribute10
1844 , attribute11
1845 , attribute12
1846 , attribute13
1847 , attribute14
1848 , attribute15
1849 , nvl(operation_code, OE_GLOBALS.G_OPR_CREATE)
1850 FROM oe_reservtns_iface_all
1851 WHERE order_source_id = l_order_source_id
1852 AND orig_sys_document_ref = l_orig_sys_document_ref
1853 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1854 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1855 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1856 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1857 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1858 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1859 AND nvl(org_id, FND_API.G_MISS_NUM)
1860 = nvl(l_org_id, FND_API.G_MISS_NUM)
1861 AND orig_sys_line_ref = l_orig_sys_line_ref
1862 AND nvl( orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1863 = nvl(l_orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1864 AND nvl( request_id, FND_API.G_MISS_NUM)
1865 = nvl(l_request_id, FND_API.G_MISS_NUM)
1866 FOR UPDATE NOWAIT
1867 ORDER BY orig_sys_reservation_ref
1868 ;
1869
1870
1871 /* -----------------------------------------------------------
1872 Action Requests cursor
1873 -----------------------------------------------------------
1874 */
1875 CURSOR l_action_request_header_cursor IS
1876 SELECT nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
1877 , nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1878 , hold_id
1879 , hold_type_code
1880 , hold_type_id
1881 , hold_until_date
1882 , release_reason_code
1883 , comments
1884 , context
1885 , attribute1
1886 , attribute2
1887 , attribute3
1888 , attribute4
1889 , attribute5
1890 , attribute6
1891 , attribute7
1892 , attribute8
1893 , attribute9
1894 , attribute10
1895 , attribute11
1896 , attribute12
1897 , attribute13
1898 , attribute14
1899 , attribute15
1900 , operation_code
1901 , error_flag
1902 , status_flag
1903 , interface_status
1904 --myerrams, start, added the following fields to the cursor for Customer Acceptance
1905 , char_param1
1906 , char_param2
1907 , char_param3
1908 , char_param4
1909 , char_param5
1910 , date_param1
1911 , date_param2
1912 , date_param3
1913 , date_param4
1914 , date_param5
1915 --myerrams, end
1916 FROM oe_actions_iface_all
1917 WHERE order_source_id = l_order_source_id
1918 AND orig_sys_document_ref = l_orig_sys_document_ref
1919 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1920 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1921 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1922 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1923 AND nvl(org_id, FND_API.G_MISS_NUM)
1924 = nvl(l_org_id, FND_API.G_MISS_NUM)
1925 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
1926 = FND_API.G_MISS_CHAR
1927 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1928 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1929 AND nvl( request_id, FND_API.G_MISS_NUM)
1930 = nvl(l_request_id, FND_API.G_MISS_NUM)
1931 FOR UPDATE NOWAIT
1932 ;
1933 /*bsadri the actions at line level has to have its own cursor so
1934 we can pass the line_index to it at the main loop.like other lines*/
1935
1936 CURSOR l_action_request_line_cursor IS
1937 SELECT nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
1938 , nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
1939 , hold_id
1940 , hold_type_code
1941 , hold_type_id
1942 , hold_until_date
1943 , release_reason_code
1944 , comments
1945 , context
1946 , attribute1
1947 , attribute2
1948 , attribute3
1949 , attribute4
1950 , attribute5
1951 , attribute6
1952 , attribute7
1953 , attribute8
1954 , attribute9
1955 , attribute10
1956 , attribute11
1957 , attribute12
1958 , attribute13
1959 , attribute14
1960 , attribute15
1961 , operation_code
1962 , fulfillment_set_name
1963 , error_flag
1964 , status_flag
1965 , interface_status
1966 --myerrams, start, added the following fields to the cursor for Customer Acceptance
1967 , char_param1
1968 , char_param2
1969 , char_param3
1970 , char_param4
1971 , char_param5
1972 , date_param1
1973 , date_param2
1974 , date_param3
1975 , date_param4
1976 , date_param5
1977 --myerrams, end
1978 FROM oe_actions_iface_all
1979 WHERE order_source_id = l_order_source_id
1980 AND orig_sys_document_ref = l_orig_sys_document_ref
1981 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
1982 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
1983 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
1984 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
1985 AND orig_sys_line_ref = l_orig_sys_line_ref
1986 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
1987 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
1988 AND nvl(org_id, FND_API.G_MISS_NUM)
1989 = nvl(l_org_id, FND_API.G_MISS_NUM)
1990 AND nvl( request_id, FND_API.G_MISS_NUM)
1991 = nvl(l_request_id, FND_API.G_MISS_NUM)
1992 FOR UPDATE NOWAIT
1993 ;
1994
1995
1996 --
1997 l_debug_level CONSTANT NUMBER := oe_debug_pub.g_debug_level;
1998 --
1999 BEGIN
2000
2001
2002 /* -----------------------------------------------------------
2003 Initialize messages
2004 -----------------------------------------------------------
2005 */
2006 IF p_init_msg_list = FND_API.G_TRUE THEN
2007 IF l_debug_level > 0 THEN
2008 oe_debug_pub.add( 'BEFORE INITIALIZING MESSAGES LIST' ) ;
2009 END IF;
2010 OE_MSG_PUB.Initialize;
2011 END IF;
2012
2013 /* -----------------------------------------------------------
2014 Set message context
2015 -----------------------------------------------------------
2016 */
2017 IF l_debug_level > 0 THEN
2018 oe_debug_pub.add( 'BEFORE SETTING MESSAGE CONTEXT' ) ;
2019 oe_debug_pub.add('trim data = '||l_rtrim_data);
2020 END IF;
2021
2022 OE_MSG_PUB.set_msg_context(
2023 p_entity_code => 'HEADER'
2024 ,p_entity_ref => null
2025 ,p_entity_id => null
2026 ,p_header_id => null
2027 ,p_line_id => null
2028 ,p_order_source_id => l_order_source_id
2029 ,p_orig_sys_document_ref => l_orig_sys_document_ref
2030 ,p_change_sequence => l_change_sequence
2031 ,p_orig_sys_document_line_ref => null
2032 ,p_orig_sys_shipment_ref => null
2033 ,p_source_document_type_id => null
2034 ,p_source_document_id => null
2035 ,p_source_document_line_id => null
2036 ,p_attribute_code => null
2037 ,p_constraint_id => null
2038 );
2039
2040 /* -----------------------------------------------------------
2041 Initialization
2042 -----------------------------------------------------------
2043 */
2044 IF l_debug_level > 0 THEN
2045 oe_debug_pub.add( 'BEFORE INITIALIZATION' ) ;
2046 END IF;
2047 begin
2048 select DECODE(p_validate_only,'Y','T','N','F',p_validate_only)
2049 into l_validate_only
2050 from dual;
2051 exception
2052 when others then
2053 l_validate_only := 'T';
2054 end;
2055 l_header_rec := OE_Order_Pub.G_MISS_HEADER_REC;
2056 l_header_rec_old := OE_Order_Pub.G_MISS_HEADER_REC;
2057 l_header_rec_new := OE_Order_Pub.G_MISS_HEADER_REC;
2058 l_header_adj_rec := OE_Order_Pub.G_MISS_HEADER_ADJ_REC;
2059 l_header_adj_tbl := OE_Order_Pub.G_MISS_HEADER_ADJ_TBL;
2060 l_header_adj_tbl_old := OE_Order_Pub.G_MISS_HEADER_ADJ_TBL;
2061 l_header_adj_tbl_new := OE_Order_Pub.G_MISS_HEADER_ADJ_TBL;
2062 l_header_scredit_rec := OE_Order_Pub.G_MISS_HEADER_SCREDIT_REC;
2063 l_header_scredit_tbl := OE_Order_Pub.G_MISS_HEADER_SCREDIT_TBL;
2064 l_header_scredit_tbl_old := OE_Order_Pub.G_MISS_HEADER_SCREDIT_TBL;
2065 l_header_scredit_tbl_new := OE_Order_Pub.G_MISS_HEADER_SCREDIT_TBL;
2066 l_header_payment_rec := OE_Order_Pub.G_MISS_HEADER_payment_REC;
2067 l_header_payment_tbl := OE_Order_Pub.G_MISS_HEADER_payment_TBL;
2068 l_header_payment_tbl_old := OE_Order_Pub.G_MISS_HEADER_payment_TBL;
2069 l_header_payment_tbl_new := OE_Order_Pub.G_MISS_HEADER_payment_TBL;
2070
2071 /* 1433292 */
2072 l_header_price_att_rec := OE_Order_Pub.G_MISS_HEADER_PRICE_ATT_REC;
2073 l_header_price_att_tbl := OE_Order_Pub.G_MISS_HEADER_PRICE_ATT_TBL;
2074 l_header_price_att_tbl_old := OE_Order_Pub.G_MISS_HEADER_PRICE_ATT_TBL;
2075 l_header_price_att_tbl_new := OE_Order_Pub.G_MISS_HEADER_PRICE_ATT_TBL;
2076 l_header_adj_att_rec := OE_Order_Pub.G_MISS_HEADER_ADJ_ATT_REC;
2077 l_header_adj_att_tbl := OE_Order_Pub.G_MISS_HEADER_ADJ_ATT_TBL;
2078 l_header_adj_att_tbl_old := OE_Order_Pub.G_MISS_HEADER_ADJ_ATT_TBL;
2079 l_header_adj_att_tbl_new := OE_Order_Pub.G_MISS_HEADER_ADJ_ATT_TBL;
2080 l_header_adj_assoc_rec := OE_Order_Pub.G_MISS_HEADER_ADJ_ASSOC_REC;
2081 l_header_adj_assoc_tbl := OE_Order_Pub.G_MISS_HEADER_ADJ_ASSOC_TBL;
2082 l_header_adj_assoc_tbl_old := OE_Order_Pub.G_MISS_HEADER_ADJ_ASSOC_TBL;
2083 l_header_adj_assoc_tbl_new := OE_Order_Pub.G_MISS_HEADER_ADJ_ASSOC_TBL;
2084
2085 l_header_val_rec := OE_Order_Pub.G_MISS_HEADER_VAL_REC;
2086 l_header_val_rec_old := OE_Order_Pub.G_MISS_HEADER_VAL_REC;
2087 l_header_val_rec_new := OE_Order_Pub.G_MISS_HEADER_VAL_REC;
2088 l_header_adj_val_rec := OE_Order_Pub.G_MISS_HEADER_ADJ_VAL_REC;
2089 l_header_adj_val_tbl := OE_Order_Pub.G_MISS_HEADER_ADJ_VAL_TBL;
2090 l_header_adj_val_tbl_old := OE_Order_Pub.G_MISS_HEADER_ADJ_VAL_TBL;
2091 l_header_adj_val_tbl_new := OE_Order_Pub.G_MISS_HEADER_ADJ_VAL_TBL;
2092 l_header_scredit_val_rec := OE_Order_Pub.G_MISS_HEADER_SCREDIT_VAL_REC;
2093 l_header_scredit_val_tbl := OE_Order_Pub.G_MISS_HEADER_SCREDIT_VAL_TBL;
2094 l_header_scredit_val_tbl_old := OE_Order_Pub.G_MISS_HEADER_SCREDIT_VAL_TBL;
2095 l_header_scredit_val_tbl_new := OE_Order_Pub.G_MISS_HEADER_SCREDIT_VAL_TBL;
2096 l_header_payment_val_rec := OE_Order_Pub.G_MISS_HEADER_payment_VAL_REC;
2097 l_header_payment_val_tbl := OE_Order_Pub.G_MISS_HEADER_payment_VAL_TBL;
2098 l_header_payment_val_tbl_old := OE_Order_Pub.G_MISS_HEADER_payment_VAL_TBL;
2099 l_header_payment_val_tbl_new := OE_Order_Pub.G_MISS_HEADER_payment_VAL_TBL;
2100
2101 l_line_rec := OE_Order_Pub.G_MISS_LINE_REC;
2102 l_line_tbl := OE_Order_Pub.G_MISS_LINE_TBL;
2103 l_line_tbl_old := OE_Order_Pub.G_MISS_LINE_TBL;
2104 l_line_tbl_new := OE_Order_Pub.G_MISS_LINE_TBL;
2105 l_line_adj_rec := OE_Order_Pub.G_MISS_LINE_ADJ_REC;
2106 l_line_adj_tbl := OE_Order_Pub.G_MISS_LINE_ADJ_TBL;
2107 l_line_adj_tbl_old := OE_Order_Pub.G_MISS_LINE_ADJ_TBL;
2108 l_line_adj_tbl_new := OE_Order_Pub.G_MISS_LINE_ADJ_TBL;
2109 l_line_scredit_rec := OE_Order_Pub.G_MISS_LINE_SCREDIT_REC;
2110 l_line_scredit_tbl := OE_Order_Pub.G_MISS_LINE_SCREDIT_TBL;
2111 l_line_scredit_tbl_old := OE_Order_Pub.G_MISS_LINE_SCREDIT_TBL;
2112 l_line_scredit_tbl_new := OE_Order_Pub.G_MISS_LINE_SCREDIT_TBL;
2113 l_line_payment_rec := OE_Order_Pub.G_MISS_LINE_payment_REC;
2114 l_line_payment_tbl := OE_Order_Pub.G_MISS_LINE_payment_TBL;
2115 l_line_payment_tbl_old := OE_Order_Pub.G_MISS_LINE_payment_TBL;
2116 l_line_payment_tbl_new := OE_Order_Pub.G_MISS_LINE_payment_TBL;
2117 l_reservation_rec := OE_Order_Pub.G_MISS_RESERVATION_REC;
2118 l_reservation_tbl := OE_Order_Pub.G_MISS_RESERVATION_TBL;
2119 /* 1433292 */
2120 l_line_price_att_rec := OE_Order_Pub.G_MISS_LINE_PRICE_ATT_REC;
2121 l_line_price_att_tbl := OE_Order_Pub.G_MISS_LINE_PRICE_ATT_TBL;
2122 l_line_price_att_tbl_old := OE_Order_Pub.G_MISS_LINE_PRICE_ATT_TBL;
2123 l_line_price_att_tbl_new := OE_Order_Pub.G_MISS_LINE_PRICE_ATT_TBL;
2124 l_line_adj_att_rec := OE_Order_Pub.G_MISS_LINE_ADJ_ATT_REC;
2125 l_line_adj_att_tbl := OE_Order_Pub.G_MISS_LINE_ADJ_ATT_TBL;
2126 l_line_adj_att_tbl_old := OE_Order_Pub.G_MISS_LINE_ADJ_ATT_TBL;
2127 l_line_adj_att_tbl_new := OE_Order_Pub.G_MISS_LINE_ADJ_ATT_TBL;
2128 l_line_adj_assoc_rec := OE_Order_Pub.G_MISS_LINE_ADJ_ASSOC_REC;
2129 l_line_adj_assoc_tbl := OE_Order_Pub.G_MISS_LINE_ADJ_ASSOC_TBL;
2130 l_line_adj_assoc_tbl_old := OE_Order_Pub.G_MISS_LINE_ADJ_ASSOC_TBL;
2131 l_line_adj_assoc_tbl_new := OE_Order_Pub.G_MISS_LINE_ADJ_ASSOC_TBL;
2132
2133 l_line_val_rec := OE_Order_Pub.G_MISS_LINE_VAL_REC;
2134 l_line_val_tbl := OE_Order_Pub.G_MISS_LINE_VAL_TBL;
2135 l_line_val_tbl_old := OE_Order_Pub.G_MISS_LINE_VAL_TBL;
2136 l_line_val_tbl_new := OE_Order_Pub.G_MISS_LINE_VAL_TBL;
2137 l_line_adj_val_rec := OE_Order_Pub.G_MISS_LINE_ADJ_VAL_REC;
2138 l_line_adj_val_tbl := OE_Order_Pub.G_MISS_LINE_ADJ_VAL_TBL;
2139 l_line_adj_val_tbl_old := OE_Order_Pub.G_MISS_LINE_ADJ_VAL_TBL;
2140 l_line_adj_val_tbl_new := OE_Order_Pub.G_MISS_LINE_ADJ_VAL_TBL;
2141 l_line_scredit_val_rec := OE_Order_Pub.G_MISS_LINE_SCREDIT_VAL_REC;
2142 l_line_scredit_val_tbl := OE_Order_Pub.G_MISS_LINE_SCREDIT_VAL_TBL;
2143 l_line_scredit_val_tbl_old := OE_Order_Pub.G_MISS_LINE_SCREDIT_VAL_TBL;
2144 l_line_scredit_val_tbl_new := OE_Order_Pub.G_MISS_LINE_SCREDIT_VAL_TBL;
2145 l_line_payment_val_rec := OE_Order_Pub.G_MISS_LINE_payment_VAL_REC;
2146 l_line_payment_val_tbl := OE_Order_Pub.G_MISS_LINE_payment_VAL_TBL;
2147 l_line_payment_val_tbl_old := OE_Order_Pub.G_MISS_LINE_payment_VAL_TBL;
2148 l_line_payment_val_tbl_new := OE_Order_Pub.G_MISS_LINE_payment_VAL_TBL;
2149 l_reservation_val_rec := OE_Order_Pub.G_MISS_RESERVATION_VAL_REC;
2150 l_reservation_val_tbl := OE_Order_Pub.G_MISS_RESERVATION_VAL_TBL;
2151
2152 l_lot_serial_rec := OE_Order_Pub.G_MISS_LOT_SERIAL_REC;
2153 l_lot_serial_tbl := OE_Order_Pub.G_MISS_LOT_SERIAL_TBL;
2154 l_lot_serial_tbl_old := OE_Order_Pub.G_MISS_LOT_SERIAL_TBL;
2155 l_lot_serial_tbl_new := OE_Order_Pub.G_MISS_LOT_SERIAL_TBL;
2156
2157 l_action_request_rec := OE_Order_Pub.G_MISS_REQUEST_REC;
2158 l_action_request_tbl := OE_Order_Pub.G_MISS_REQUEST_TBL;
2159 l_action_request_tbl_old := OE_Order_Pub.G_MISS_REQUEST_TBL;
2160
2161 p_return_status := FND_API.G_RET_STS_SUCCESS; -- Success
2162
2163 fnd_profile.get('ONT_IMP_MULTIPLE_SHIPMENTS', G_IMPORT_SHIPMENTS);
2164 G_IMPORT_SHIPMENTS := nvl(G_IMPORT_SHIPMENTS, 'NO');
2165
2166 FND_PROFILE.GET('ONT_3A7_RESPONSE_REQUIRED', l_cso_response_pfile);
2167 l_cso_response_pfile := nvl(l_cso_response_pfile, 'N');
2168
2169 FND_PROFILE.GET('ONT_3A8_RESPONSE_ACK', l_cho_ack_send_pfile);
2170 l_cho_ack_send_pfile := nvl(l_cho_ack_send_pfile, 'N');
2171
2172 /* -----------------------------------------------------------
2173 Headers
2174 -----------------------------------------------------------
2175 */
2176 IF l_debug_level > 0 THEN
2177 oe_debug_pub.add( 'BEFORE HEADERS LOOP' ) ;
2178 END IF;
2179
2180 l_header_count := 0;
2181
2182 OPEN l_header_cursor;
2183 --LOOP
2184 FETCH l_header_cursor
2185 INTO l_header_rec.order_source_id
2186 , l_header_rec.orig_sys_document_ref
2187 , l_header_rec.change_sequence
2188 , l_header_rec.change_request_code
2189 , l_header_val_rec.order_source
2190 , l_header_rec.org_id
2191 , l_header_rec.header_id
2192 , l_header_rec.order_number
2193 , l_header_rec.version_number
2194 , l_header_rec.ordered_date
2195 , l_header_rec.order_type_id
2196 , l_header_val_rec.order_type
2197 , l_header_rec.price_list_id
2198 , l_header_val_rec.price_list
2199 , l_header_rec.conversion_rate
2200 , l_header_rec.conversion_rate_date
2201 , l_header_rec.conversion_type_code
2202 , l_header_val_rec.conversion_type
2203 , l_header_rec.transactional_curr_code
2204 , l_header_rec.return_reason_code
2205 , l_header_rec.salesrep_id
2206 , l_header_val_rec.salesrep
2207 , l_header_rec.sales_channel_code
2208 , l_header_val_rec.sales_channel
2209 , l_header_rec.tax_point_code
2210 , l_header_val_rec.tax_point
2211 , l_header_rec.tax_exempt_flag
2212 , l_header_rec.tax_exempt_number
2213 , l_header_rec.tax_exempt_reason_code
2214 , l_header_val_rec.tax_exempt_reason
2215 , l_header_rec.agreement_id
2216 , l_header_val_rec.agreement
2217 , l_header_rec.invoicing_rule_id
2218 , l_header_val_rec.invoicing_rule
2219 , l_header_rec.accounting_rule_id
2220 , l_header_rec.accounting_rule_duration
2221 , l_header_val_rec.accounting_rule
2222 , l_header_rec.payment_term_id
2223 , l_header_val_rec.payment_term
2224 , l_header_rec.demand_class_code
2225 , l_header_rec.shipment_priority_code
2226 , l_header_val_rec.shipment_priority
2227 , l_header_rec.shipping_method_code
2228 , l_header_rec.freight_carrier_code
2229 , l_header_rec.freight_terms_code
2230 , l_header_val_rec.freight_terms
2231 , l_header_rec.fob_point_code
2232 , l_header_val_rec.fob_point
2233 , l_header_rec.partial_shipments_allowed
2234 , l_header_rec.ship_tolerance_above
2235 , l_header_rec.ship_tolerance_below
2236 , l_header_rec.shipping_instructions
2237 , l_header_rec.packing_instructions
2238 , l_header_rec.order_date_type_code
2239 , l_header_rec.earliest_schedule_limit
2240 , l_header_rec.latest_schedule_limit
2241 , l_header_rec.cust_po_number
2242 , l_header_rec.customer_payment_term_id
2243 , l_header_val_rec.customer_payment_term
2244 , l_header_rec.payment_type_code
2245 , l_header_rec.payment_amount
2246 , l_header_rec.check_number
2247 , l_header_rec.credit_card_code
2248 , l_header_rec.credit_card_holder_name
2249 , l_header_rec.credit_card_number
2250 , l_header_rec.credit_card_expiration_date
2251 , l_header_rec.credit_card_approval_code
2252 , l_header_rec.credit_card_approval_date
2253 , l_header_rec.sold_from_org_id
2254 , l_header_val_rec.sold_from_org
2255 , l_header_rec.sold_to_org_id
2256 , l_header_val_rec.sold_to_org
2257 , l_header_val_rec.customer_number
2258 , l_header_rec.ship_from_org_id
2259 , l_header_val_rec.ship_from_org
2260 , l_header_rec.ship_to_org_id
2261 , l_header_val_rec.ship_to_org
2262 , l_header_rec.invoice_to_org_id
2263 , l_header_val_rec.invoice_to_org
2264 , l_header_rec.deliver_to_org_id
2265 , l_header_val_rec.deliver_to_org
2266 , l_header_rec.sold_to_contact_id
2267 , l_header_val_rec.sold_to_contact
2268 , l_header_rec.ship_to_contact_id
2269 , l_header_val_rec.ship_to_contact
2270 , l_header_rec.invoice_to_contact_id
2271 , l_header_val_rec.invoice_to_contact
2272 , l_header_rec.deliver_to_contact_id
2273 , l_header_val_rec.deliver_to_contact
2274 , l_header_val_rec.ship_to_address1
2275 , l_header_val_rec.ship_to_address2
2276 , l_header_val_rec.ship_to_address3
2277 , l_header_val_rec.ship_to_address4
2278 , l_header_val_rec.ship_to_city
2279 , l_header_val_rec.ship_to_state
2280 , l_header_val_rec.ship_to_zip
2281 , l_header_val_rec.ship_to_country
2282 , l_header_val_rec.invoice_to_address1
2283 , l_header_val_rec.invoice_to_address2
2284 , l_header_val_rec.invoice_to_address3
2285 , l_header_val_rec.invoice_to_address4
2286 , l_header_val_rec.invoice_to_city
2287 , l_header_val_rec.invoice_to_state
2288 , l_header_val_rec.invoice_to_zip
2289 , l_header_val_rec.invoice_to_country
2290 , l_header_rec.drop_ship_flag
2291 , l_header_rec.booked_flag
2292 -- , l_header_rec.closed_flag
2293 , l_header_rec.cancelled_flag
2294 , l_header_rec.context
2295 , l_header_rec.attribute1
2296 , l_header_rec.attribute2
2297 , l_header_rec.attribute3
2298 , l_header_rec.attribute4
2299 , l_header_rec.attribute5
2300 , l_header_rec.attribute6
2301 , l_header_rec.attribute7
2302 , l_header_rec.attribute8
2303 , l_header_rec.attribute9
2304 , l_header_rec.attribute10
2305 , l_header_rec.attribute11
2306 , l_header_rec.attribute12
2307 , l_header_rec.attribute13
2308 , l_header_rec.attribute14
2309 , l_header_rec.attribute15
2310 , l_header_rec.attribute16 -- For bug 2184255
2311 , l_header_rec.attribute17
2312 , l_header_rec.attribute18
2313 , l_header_rec.attribute19
2314 , l_header_rec.attribute20
2315 , l_header_rec.tp_context
2316 , l_header_rec.tp_attribute1
2317 , l_header_rec.tp_attribute2
2318 , l_header_rec.tp_attribute3
2319 , l_header_rec.tp_attribute4
2320 , l_header_rec.tp_attribute5
2321 , l_header_rec.tp_attribute6
2322 , l_header_rec.tp_attribute7
2323 , l_header_rec.tp_attribute8
2324 , l_header_rec.tp_attribute9
2325 , l_header_rec.tp_attribute10
2326 , l_header_rec.tp_attribute11
2327 , l_header_rec.tp_attribute12
2328 , l_header_rec.tp_attribute13
2329 , l_header_rec.tp_attribute14
2330 , l_header_rec.tp_attribute15
2331 , l_header_rec.global_attribute_category
2332 , l_header_rec.global_attribute1
2333 , l_header_rec.global_attribute2
2334 , l_header_rec.global_attribute3
2335 , l_header_rec.global_attribute4
2336 , l_header_rec.global_attribute5
2337 , l_header_rec.global_attribute6
2338 , l_header_rec.global_attribute7
2339 , l_header_rec.global_attribute8
2340 , l_header_rec.global_attribute9
2341 , l_header_rec.global_attribute10
2342 , l_header_rec.global_attribute11
2343 , l_header_rec.global_attribute12
2344 , l_header_rec.global_attribute13
2345 , l_header_rec.global_attribute14
2346 , l_header_rec.global_attribute15
2347 , l_header_rec.global_attribute16
2348 , l_header_rec.global_attribute17
2349 , l_header_rec.global_attribute18
2350 , l_header_rec.global_attribute19
2351 , l_header_rec.global_attribute20
2352 , l_header_rec.request_id
2353 , l_header_rec.request_date
2354 , l_header_rec.operation
2355 , l_header_rec.ready_flag
2356 , l_header_rec.status_flag
2357 , l_header_rec.force_apply_flag
2358 , l_header_rec.change_reason
2359 , l_header_rec.change_comments
2360 , l_header_rec.customer_preference_set_code
2361 -- { Start add new columns to select for the Add Customer
2362 , l_header_customer_rec.Orig_Sys_Customer_Ref
2363 , l_header_customer_rec.Orig_Ship_Address_Ref
2364 , l_header_customer_rec.Orig_Bill_Address_Ref
2365 , l_header_customer_rec.Orig_Deliver_Address_Ref
2366 , l_header_customer_rec.Sold_to_Contact_Ref
2367 , l_header_customer_rec.Ship_to_Contact_Ref
2368 , l_header_customer_rec.Bill_to_Contact_Ref
2369 , l_header_customer_rec.Deliver_to_Contact_Ref
2370 -- End add new columns to select for the Add Customer}
2371 , l_header_rec.xml_message_id
2372 , l_header_val_rec.ship_to_customer_name_oi
2373 , l_header_val_rec.ship_to_customer_number_oi
2374 , l_header_rec.ship_to_customer_id
2375 , l_header_val_rec.invoice_to_customer_name_oi
2376 , l_header_val_rec.invoice_to_customer_number_oi
2377 , l_header_rec.invoice_to_customer_id
2378 , l_header_val_rec.deliver_to_customer_name_oi
2379 , l_header_val_rec.deliver_to_customer_number_oi
2380 , l_header_rec.deliver_to_customer_id
2381 , l_header_rec.xml_transaction_type_code
2382 , l_header_rec.blanket_number
2383 , l_header_val_rec.shipping_method
2384 -- Added pricing_date for the bug 3001346
2385 , l_header_rec.pricing_date
2386 , l_header_cso_response_flag
2387 , l_header_rec.sold_to_site_use_id
2388 , l_header_val_rec.sold_to_location_address1
2389 , l_header_val_rec.sold_to_location_address2
2390 , l_header_val_rec.sold_to_location_address3
2391 , l_header_val_rec.sold_to_location_address4
2392 , l_header_val_rec.sold_to_location_city
2393 , l_header_val_rec.sold_to_location_postal
2394 , l_header_val_rec.sold_to_location_country
2395 , l_header_val_rec.sold_to_location_state
2396 , l_header_val_rec.sold_to_location_county
2397 , l_header_val_rec.sold_to_location_province
2398 -- automatic account creation {
2399 , l_header_rec.sold_to_party_id
2400 , l_header_rec.sold_to_org_contact_id
2401 , l_header_rec.ship_to_party_id
2402 , l_header_rec.ship_to_party_site_id
2403 , l_header_rec.ship_to_party_site_use_id
2404 , l_header_rec.deliver_to_party_id
2405 , l_header_rec.deliver_to_party_site_id
2406 , l_header_rec.deliver_to_party_site_use_id
2407 , l_header_rec.invoice_to_party_id
2408 , l_header_rec.invoice_to_party_site_id
2409 , l_header_rec.invoice_to_party_site_use_id
2410 -- automatic account creation }
2411 -- start of additional quoting columns
2412 , l_header_rec.transaction_phase_code
2413 , l_header_rec.expiration_date
2414 , l_header_rec.quote_number
2415 , l_header_rec.quote_date
2416 , l_header_rec.sales_document_name
2417 , l_header_rec.user_status_code
2418 -- end of additional quoting columns
2419 -- { Distributer Order related change
2420 , l_header_rec.end_customer_id
2421 , l_header_rec.end_customer_contact_id
2422 , l_header_rec.end_customer_site_use_id
2423 ,l_header_val_rec.end_customer_name --mvijayku
2424 , l_header_val_rec.end_customer_site_address1
2425 , l_header_val_rec.end_customer_site_address2
2426 , l_header_val_rec.end_customer_site_address3
2427 , l_header_val_rec.end_customer_site_address4
2428 -- , l_header_val_rec.end_customer_site_location
2429 , l_header_val_rec.end_customer_site_city
2430 , l_header_val_rec.end_customer_site_state
2431 , l_header_val_rec.end_customer_site_postal_code
2432 , l_header_val_rec.end_customer_site_country
2433 , l_header_val_rec.end_customer_contact
2434 , l_header_val_rec.end_customer_number
2435 , l_header_val_rec.ib_owner_dsp
2436 , l_header_val_rec.ib_current_location_dsp
2437 , l_header_val_rec.ib_installed_at_location_dsp
2438 , l_header_rec.ib_owner
2439 , l_header_rec.ib_current_location
2440 , l_header_rec.ib_installed_at_location
2441 , l_header_rec.END_CUSTOMER_PARTY_ID
2442 ,l_header_rec.END_CUSTOMER_ORG_CONTACT_ID
2443 ,l_header_rec.END_CUSTOMER_PARTY_SITE_ID
2444 ,l_header_rec.END_CUSTOMER_PARTY_SITE_USE_ID
2445 ,l_header_rec.END_CUSTOMER_PARTY_NUMBER
2446 -- Distributer Order related change }
2447 -- Automatic Account Creation
2448 , l_header_rec.sold_to_party_number
2449 , l_header_rec.ship_to_party_number
2450 , l_header_rec.invoice_to_party_number
2451 , l_header_rec.deliver_to_party_number
2452 -- Automatic Account Creation
2453 , l_header_val_rec.deliver_to_address1
2454 , l_header_val_rec.deliver_to_address2
2455 , l_header_val_rec.deliver_to_address3
2456 , l_header_val_rec.deliver_to_address4
2457 , l_header_val_rec.deliver_to_state
2458 , l_header_val_rec.deliver_to_county
2459 , l_header_val_rec.deliver_to_country
2460 , l_header_val_rec.deliver_to_province
2461 , l_header_val_rec.deliver_to_city
2462 , l_header_val_rec.deliver_to_zip
2463 , l_header_rec.instrument_security_code --R12 CVV2
2464 ;
2465 --EXIT WHEN l_header_cursor%NOTFOUND;
2466
2467 l_header_count := l_header_count + 1;
2468
2469 l_order_source_id := l_header_rec.order_source_id;
2470 l_orig_sys_document_ref := l_header_rec.orig_sys_document_ref;
2471 l_sold_to_org_id := l_header_rec.sold_to_org_id;
2472 l_sold_to_org := l_header_val_rec.sold_to_org;
2473 l_change_sequence := l_header_rec.change_sequence;
2474
2475 IF l_header_rec.operation = 'INSERT' THEN
2476 l_header_rec.operation := 'CREATE';
2477 END IF;
2478
2479 IF l_debug_level > 0 THEN
2480 oe_debug_pub.add( 'ORDER SOURCE ID: ' || L_ORDER_SOURCE_ID ) ;
2481
2482 oe_debug_pub.add( 'ORIG SYS REFERENCE: '|| L_ORIG_SYS_DOCUMENT_REF ) ;
2483 oe_debug_pub.add( 'SOLD_TO_ORG passed in: ' || P_SOLD_TO_ORG ) ;
2484 oe_debug_pub.add( 'SOLD_TO_ORG_ID passed in: ' || P_SOLD_TO_ORG_ID ) ;
2485 oe_debug_pub.add( 'SOLD_TO_ORG: from record' || L_SOLD_TO_ORG ) ;
2486 oe_debug_pub.add( 'SOLD_TO_ORG_ID: from record' || L_SOLD_TO_ORG_ID ) ;
2487
2488 oe_debug_pub.add( 'CHANGE SEQUENCE: ' || L_CHANGE_SEQUENCE ) ;
2489 oe_debug_pub.add('sarita: booked flag: '|| l_header_rec.booked_flag);
2490
2491
2492 END IF;
2493
2494
2495
2496 IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' THEN
2497
2498 /* If l_sold_to_org_id is null attempt to populate it based on
2499 l_sold_to_org.
2500
2501 */
2502 -- bug 3392678
2503 OE_GLOBALS.G_XML_TXN_CODE := NULL;
2504 IF l_header_rec.order_source_id = OE_Acknowledgment_Pub.G_XML_ORDER_SOURCE_ID
2505 AND nvl(l_header_rec.xml_transaction_type_code, FND_API.G_MISS_CHAR) <> FND_API.G_MISS_CHAR THEN
2506 OE_GLOBALS.G_XML_TXN_CODE := l_header_rec.xml_transaction_type_code;
2507 IF l_debug_level > 0 THEN
2508 oe_debug_pub.add( 'SET GLOBAL TXN CODE TO '||OE_GLOBALS.G_XML_TXN_CODE ) ;
2509 END IF;
2510 END IF;
2511
2512 IF l_header_rec.order_source_id NOT IN (OE_Acknowledgment_Pub.G_XML_ORDER_SOURCE_ID,
2513 OE_Globals.G_ORDER_SOURCE_EDI)
2514 AND l_header_rec.xml_message_id IS NULL THEN
2515 SELECT oe_xml_message_seq_s.nextval
2516 INTO l_header_rec.xml_message_id
2517 FROM DUAL;
2518 END IF;
2519
2520 if l_sold_to_org_id = FND_API.G_MISS_NUM then
2521 IF l_debug_level > 0 THEN
2522 oe_debug_pub.add( 'header level sold to org id is g_miss_num, so it was not populated' ) ;
2523 END IF;
2524
2525 if (l_sold_to_org IS NOT NULL) AND
2526 (l_sold_to_org <> FND_API.G_MISS_CHAR) THEN
2527
2528 IF l_debug_level > 0 THEN
2529 oe_debug_pub.add( 'sold to org is populated:' || l_sold_to_org) ;
2530 END IF;
2531
2532 l_sold_to_org_id_tmp := OE_VALUE_TO_ID.sold_to_org(
2533 p_sold_to_org => l_sold_to_org,
2534 p_customer_number => null);
2535
2536 if (l_sold_to_org_id_tmp <> FND_API.G_MISS_NUM) AND
2537 (l_sold_to_org_id_tmp IS NOT NULL) THEN
2538 IF l_debug_level > 0 THEN
2539 oe_debug_pub.add( 'returned value for sold_to_org_id was ' || l_sold_to_org_id_tmp) ;
2540 END IF;
2541 l_header_rec.sold_to_org_id := l_sold_to_org_id_tmp;
2542 end if;
2543
2544 end if;
2545
2546 end if;
2547 END IF; -- code control check
2548
2549
2550 /* -----------------------------------------------------------
2551 Header Discounts/Price adjustments
2552 -----------------------------------------------------------
2553 */
2554
2555 IF l_debug_level > 0 THEN
2556 oe_debug_pub.add( 'BEFORE HEADER ADJUSTMENTS LOOP' ) ;
2557 END IF;
2558
2559 l_header_adj_count := 0;
2560
2561 OPEN l_header_adj_cursor;
2562 LOOP
2563 FETCH l_header_adj_cursor
2564 INTO l_header_adj_rec.orig_sys_discount_ref
2565 , l_header_adj_rec.change_request_code
2566 , l_header_adj_rec.list_header_id -- changed from discount_id
2567 , l_header_adj_rec.list_line_id -- changed from discount_line_id
2568 , l_header_adj_val_rec.discount
2569 , l_header_adj_rec.percent
2570 , l_header_adj_rec.automatic_flag
2571 , l_header_adj_rec.applied_flag
2572 , l_header_adj_rec.operand
2573 , l_header_adj_rec.arithmetic_operator
2574 , l_header_adj_rec.context
2575 , l_header_adj_rec.attribute1
2576 , l_header_adj_rec.attribute2
2577 , l_header_adj_rec.attribute3
2578 , l_header_adj_rec.attribute4
2579 , l_header_adj_rec.attribute5
2580 , l_header_adj_rec.attribute6
2581 , l_header_adj_rec.attribute7
2582 , l_header_adj_rec.attribute8
2583 , l_header_adj_rec.attribute9
2584 , l_header_adj_rec.attribute10
2585 , l_header_adj_rec.attribute11
2586 , l_header_adj_rec.attribute12
2587 , l_header_adj_rec.attribute13
2588 , l_header_adj_rec.attribute14
2589 , l_header_adj_rec.attribute15
2590 , l_header_adj_rec.request_id
2591 , l_header_adj_rec.operation
2592 , l_header_adj_rec.status_flag
2593 -- Price Adjustment related changes bug# 1220921 (Start)
2594 , l_header_adj_rec.AC_CONTEXT
2595 , l_header_adj_rec.AC_ATTRIBUTE1
2596 , l_header_adj_rec.AC_ATTRIBUTE2
2597 , l_header_adj_rec.AC_ATTRIBUTE3
2598 , l_header_adj_rec.AC_ATTRIBUTE4
2599 , l_header_adj_rec.AC_ATTRIBUTE5
2600 , l_header_adj_rec.AC_ATTRIBUTE6
2601 , l_header_adj_rec.AC_ATTRIBUTE7
2602 , l_header_adj_rec.AC_ATTRIBUTE8
2603 , l_header_adj_rec.AC_ATTRIBUTE9
2604 , l_header_adj_rec.AC_ATTRIBUTE10
2605 , l_header_adj_rec.AC_ATTRIBUTE11
2606 , l_header_adj_rec.AC_ATTRIBUTE12
2607 , l_header_adj_rec.AC_ATTRIBUTE13
2608 , l_header_adj_rec.AC_ATTRIBUTE14
2609 , l_header_adj_rec.AC_ATTRIBUTE15
2610 , l_header_adj_val_rec.LIST_NAME
2611 , l_header_adj_rec.LIST_LINE_TYPE_CODE
2612 , l_header_adj_rec.LIST_LINE_NO
2613 , l_header_adj_val_rec.VERSION_NO
2614 , l_header_adj_rec.INVOICED_FLAG
2615 , l_header_adj_rec.ESTIMATED_FLAG
2616 , l_header_adj_rec.INC_IN_SALES_PERFORMANCE
2617 , l_header_adj_rec.CHARGE_TYPE_CODE
2618 , l_header_adj_rec.CHARGE_SUBTYPE_CODE
2619 , l_header_adj_rec.CREDIT_OR_CHARGE_FLAG
2620 , l_header_adj_rec.INCLUDE_ON_RETURNS_FLAG
2621 , l_header_adj_rec.COST_ID
2622 , l_header_adj_rec.TAX_CODE
2623 , l_header_adj_rec.PARENT_ADJUSTMENT_ID
2624 , l_header_adj_rec.MODIFIER_MECHANISM_TYPE_CODE
2625 , l_header_adj_rec.MODIFIED_FROM
2626 , l_header_adj_rec.MODIFIED_TO
2627 , l_header_adj_rec.UPDATED_FLAG
2628 , l_header_adj_rec.UPDATE_ALLOWED
2629 , l_header_adj_rec.CHANGE_REASON_CODE
2630 , l_header_adj_rec.CHANGE_REASON_TEXT
2631 , l_header_adj_rec.PRICING_PHASE_ID
2632 , l_header_adj_rec.ADJUSTED_AMOUNT
2633 -- Price Adjustment related changes bug# 1220921 (End)
2634 ;
2635 EXIT WHEN l_header_adj_cursor%NOTFOUND;
2636
2637 IF l_header_adj_rec.operation = 'INSERT' THEN
2638 l_header_adj_rec.operation := 'CREATE';
2639 END IF;
2640
2641 IF(l_header_adj_count > 0) THEN
2642 IF(l_header_adj_rec.orig_sys_discount_ref = l_header_adj_tbl(l_header_adj_count).orig_sys_discount_ref) THEN
2643 --duplicate
2644 p_return_status := FND_API.G_RET_STS_ERROR;
2645 l_validate_only := FND_API.G_TRUE;
2646 IF l_debug_level > 0 THEN
2647 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_DISCOUNT_REF FOR THE SAME ORDER' ) ;
2648 END IF;
2649
2650 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2651 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_discount_ref');
2652 OE_MSG_PUB.Add;
2653
2654 END IF;
2655 END IF;
2656
2657 l_header_adj_count := l_header_adj_count + 1;
2658 l_header_adj_tbl (l_header_adj_count) := l_header_adj_rec;
2659 l_header_adj_val_tbl (l_header_adj_count) := l_header_adj_val_rec;
2660
2661 IF l_debug_level > 0 THEN
2662 oe_debug_pub.add( 'HEADER ADJ REF ( '||L_HEADER_ADJ_COUNT||' ) : '|| L_HEADER_ADJ_TBL ( L_HEADER_ADJ_COUNT ) .ORIG_SYS_DISCOUNT_REF ) ;
2663 END IF;
2664
2665 END LOOP;
2666 CLOSE l_header_adj_cursor;
2667
2668
2669 /* -----------------------------------------------------------
2670 Header Price Attribs
2671 -----------------------------------------------------------
2672 */
2673 IF l_debug_level > 0 THEN
2674 oe_debug_pub.add( 'BEFORE HEADER ATTRIBS LOOP' ) ;
2675 END IF;
2676
2677 l_header_att_count := 0;
2678
2679 OPEN l_header_attrib_cursor;
2680 LOOP
2681 FETCH l_header_attrib_cursor
2682 INTO l_header_price_att_rec.orig_sys_atts_ref
2683 , l_header_price_att_rec.change_request_code
2684 , l_header_price_att_rec.creation_date
2685 , l_header_price_att_rec.created_by
2686 , l_header_price_att_rec.last_update_date
2687 , l_header_price_att_rec.last_updated_by
2688 , l_header_price_att_rec.last_update_login
2689 , l_header_price_att_rec.program_application_id
2690 , l_header_price_att_rec.program_id
2691 , l_header_price_att_rec.program_update_date
2692 , l_header_price_att_rec.request_id
2693 , l_header_price_att_rec.flex_title
2694 , l_header_price_att_rec.pricing_context
2695 , l_header_price_att_rec.pricing_attribute1
2696 , l_header_price_att_rec.pricing_attribute2
2697 , l_header_price_att_rec.pricing_attribute3
2698 , l_header_price_att_rec.pricing_attribute4
2699 , l_header_price_att_rec.pricing_attribute5
2700 , l_header_price_att_rec.pricing_attribute6
2701 , l_header_price_att_rec.pricing_attribute7
2702 , l_header_price_att_rec.pricing_attribute8
2703 , l_header_price_att_rec.pricing_attribute9
2704 , l_header_price_att_rec.pricing_attribute10
2705 , l_header_price_att_rec.pricing_attribute11
2706 , l_header_price_att_rec.pricing_attribute12
2707 , l_header_price_att_rec.pricing_attribute13
2708 , l_header_price_att_rec.pricing_attribute14
2709 , l_header_price_att_rec.pricing_attribute15
2710 , l_header_price_att_rec.pricing_attribute16
2711 , l_header_price_att_rec.pricing_attribute17
2712 , l_header_price_att_rec.pricing_attribute18
2713 , l_header_price_att_rec.pricing_attribute19
2714 , l_header_price_att_rec.pricing_attribute20
2715 , l_header_price_att_rec.pricing_attribute21
2716 , l_header_price_att_rec.pricing_attribute22
2717 , l_header_price_att_rec.pricing_attribute23
2718 , l_header_price_att_rec.pricing_attribute24
2719 , l_header_price_att_rec.pricing_attribute25
2720 , l_header_price_att_rec.pricing_attribute26
2721 , l_header_price_att_rec.pricing_attribute27
2722 , l_header_price_att_rec.pricing_attribute28
2723 , l_header_price_att_rec.pricing_attribute29
2724 , l_header_price_att_rec.pricing_attribute30
2725 , l_header_price_att_rec.pricing_attribute31
2726 , l_header_price_att_rec.pricing_attribute32
2727 , l_header_price_att_rec.pricing_attribute33
2728 , l_header_price_att_rec.pricing_attribute34
2729 , l_header_price_att_rec.pricing_attribute35
2730 , l_header_price_att_rec.pricing_attribute36
2731 , l_header_price_att_rec.pricing_attribute37
2732 , l_header_price_att_rec.pricing_attribute38
2733 , l_header_price_att_rec.pricing_attribute39
2734 , l_header_price_att_rec.pricing_attribute40
2735 , l_header_price_att_rec.pricing_attribute41
2736 , l_header_price_att_rec.pricing_attribute42
2737 , l_header_price_att_rec.pricing_attribute43
2738 , l_header_price_att_rec.pricing_attribute44
2739 , l_header_price_att_rec.pricing_attribute45
2740 , l_header_price_att_rec.pricing_attribute46
2741 , l_header_price_att_rec.pricing_attribute47
2742 , l_header_price_att_rec.pricing_attribute48
2743 , l_header_price_att_rec.pricing_attribute49
2744 , l_header_price_att_rec.pricing_attribute50
2745 , l_header_price_att_rec.pricing_attribute51
2746 , l_header_price_att_rec.pricing_attribute52
2747 , l_header_price_att_rec.pricing_attribute53
2748 , l_header_price_att_rec.pricing_attribute54
2749 , l_header_price_att_rec.pricing_attribute55
2750 , l_header_price_att_rec.pricing_attribute56
2751 , l_header_price_att_rec.pricing_attribute57
2752 , l_header_price_att_rec.pricing_attribute58
2753 , l_header_price_att_rec.pricing_attribute59
2754 , l_header_price_att_rec.pricing_attribute60
2755 , l_header_price_att_rec.pricing_attribute61
2756 , l_header_price_att_rec.pricing_attribute62
2757 , l_header_price_att_rec.pricing_attribute63
2758 , l_header_price_att_rec.pricing_attribute64
2759 , l_header_price_att_rec.pricing_attribute65
2760 , l_header_price_att_rec.pricing_attribute66
2761 , l_header_price_att_rec.pricing_attribute67
2762 , l_header_price_att_rec.pricing_attribute68
2763 , l_header_price_att_rec.pricing_attribute69
2764 , l_header_price_att_rec.pricing_attribute70
2765 , l_header_price_att_rec.pricing_attribute71
2766 , l_header_price_att_rec.pricing_attribute72
2767 , l_header_price_att_rec.pricing_attribute73
2768 , l_header_price_att_rec.pricing_attribute74
2769 , l_header_price_att_rec.pricing_attribute75
2770 , l_header_price_att_rec.pricing_attribute76
2771 , l_header_price_att_rec.pricing_attribute77
2772 , l_header_price_att_rec.pricing_attribute78
2773 , l_header_price_att_rec.pricing_attribute79
2774 , l_header_price_att_rec.pricing_attribute80
2775 , l_header_price_att_rec.pricing_attribute81
2776 , l_header_price_att_rec.pricing_attribute82
2777 , l_header_price_att_rec.pricing_attribute83
2778 , l_header_price_att_rec.pricing_attribute84
2779 , l_header_price_att_rec.pricing_attribute85
2780 , l_header_price_att_rec.pricing_attribute86
2781 , l_header_price_att_rec.pricing_attribute87
2782 , l_header_price_att_rec.pricing_attribute88
2783 , l_header_price_att_rec.pricing_attribute89
2784 , l_header_price_att_rec.pricing_attribute90
2785 , l_header_price_att_rec.pricing_attribute91
2786 , l_header_price_att_rec.pricing_attribute92
2787 , l_header_price_att_rec.pricing_attribute93
2788 , l_header_price_att_rec.pricing_attribute94
2789 , l_header_price_att_rec.pricing_attribute95
2790 , l_header_price_att_rec.pricing_attribute96
2791 , l_header_price_att_rec.pricing_attribute97
2792 , l_header_price_att_rec.pricing_attribute98
2793 , l_header_price_att_rec.pricing_attribute99
2794 , l_header_price_att_rec.pricing_attribute100
2795 , l_header_price_att_rec.context
2796 , l_header_price_att_rec.attribute1
2797 , l_header_price_att_rec.attribute2
2798 , l_header_price_att_rec.attribute3
2799 , l_header_price_att_rec.attribute4
2800 , l_header_price_att_rec.attribute5
2801 , l_header_price_att_rec.attribute6
2802 , l_header_price_att_rec.attribute7
2803 , l_header_price_att_rec.attribute8
2804 , l_header_price_att_rec.attribute9
2805 , l_header_price_att_rec.attribute10
2806 , l_header_price_att_rec.attribute11
2807 , l_header_price_att_rec.attribute12
2808 , l_header_price_att_rec.attribute13
2809 , l_header_price_att_rec.attribute14
2810 , l_header_price_att_rec.attribute15
2811 , l_header_price_att_rec.operation;
2812
2813 EXIT WHEN l_header_attrib_cursor%NOTFOUND;
2814
2815 IF( l_header_price_att_rec.operation = 'INSERT') THEN
2816 l_header_price_att_rec.operation := 'CREATE';
2817 END IF;
2818 l_header_price_att_rec.flex_title := 'QP_ATTR_DEFNS_QUALIFIER'; --bug#5679839
2819 IF( l_header_att_count > 0 ) THEN
2820 IF (l_header_price_att_rec.orig_sys_atts_ref =l_header_price_att_tbl(l_header_att_count).orig_sys_atts_ref) THEN
2821 -- duplicate
2822 p_return_status := FND_API.G_RET_STS_ERROR;
2823 l_validate_only := FND_API.G_TRUE;
2824 IF l_debug_level > 0 THEN
2825 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_ATTS_REF FOR THE SAME ORDER' ) ;
2826 END IF;
2827 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2828 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_ats_ref');
2829 OE_MSG_PUB.Add;
2830 END IF;
2831 END IF;
2832 l_header_att_count := l_header_att_count +1;
2833 l_header_price_att_tbl(l_header_att_count) := l_header_price_att_rec;
2834
2835 END LOOP;
2836
2837 CLOSE l_header_attrib_cursor;
2838
2839 /* -----------------------------------------------------------
2840 Header Sales Credits
2841 -----------------------------------------------------------
2842 */
2843 IF l_debug_level > 0 THEN
2844 oe_debug_pub.add( 'BEFORE HEADER SALES CREDITS LOOP' ) ;
2845 END IF;
2846
2847 l_header_scredit_count := 0;
2848
2849 OPEN l_header_scredit_cursor;
2850 LOOP
2851 FETCH l_header_scredit_cursor
2852 INTO l_header_scredit_rec.orig_sys_credit_ref
2853 , l_header_scredit_rec.change_request_code
2854 , l_header_scredit_rec.salesrep_id
2855 , l_header_scredit_val_rec.salesrep
2856 , l_header_scredit_rec.sales_credit_type_id
2857 , l_header_scredit_val_rec.sales_credit_type
2858 , l_header_scredit_rec.percent
2859 , l_header_scredit_rec.context
2860 , l_header_scredit_rec.attribute1
2861 , l_header_scredit_rec.attribute2
2862 , l_header_scredit_rec.attribute3
2863 , l_header_scredit_rec.attribute4
2864 , l_header_scredit_rec.attribute5
2865 , l_header_scredit_rec.attribute6
2866 , l_header_scredit_rec.attribute7
2867 , l_header_scredit_rec.attribute8
2868 , l_header_scredit_rec.attribute9
2869 , l_header_scredit_rec.attribute10
2870 , l_header_scredit_rec.attribute11
2871 , l_header_scredit_rec.attribute12
2872 , l_header_scredit_rec.attribute13
2873 , l_header_scredit_rec.attribute14
2874 , l_header_scredit_rec.attribute15
2875 , l_header_scredit_rec.operation
2876 , l_header_scredit_rec.status_flag
2877 , l_header_scredit_rec.change_reason
2878 , l_header_scredit_rec.change_comments
2879 ;
2880 EXIT WHEN l_header_scredit_cursor%NOTFOUND;
2881
2882 IF l_header_scredit_rec.operation = 'INSERT' THEN
2883 l_header_scredit_rec.operation := 'CREATE';
2884 END IF;
2885
2886 IF(l_header_scredit_count > 0) THEN
2887 IF(l_header_scredit_rec.orig_sys_credit_ref = l_header_scredit_tbl(l_header_scredit_count).orig_sys_credit_ref) THEN
2888 --duplicate
2889 p_return_status := FND_API.G_RET_STS_ERROR;
2890 l_validate_only := FND_API.G_TRUE;
2891 IF l_debug_level > 0 THEN
2892 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_CREDIT_REF FORTHE SAME ORDER' ) ;
2893 END IF;
2894 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2895 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_credit_ref');
2896 OE_MSG_PUB.Add;
2897 END IF;
2898 END IF;
2899
2900 l_header_scredit_count := l_header_scredit_count + 1;
2901 l_header_scredit_tbl (l_header_scredit_count) := l_header_scredit_rec;
2902 l_header_scredit_val_tbl (l_header_scredit_count) := l_header_scredit_val_rec;
2903
2904 IF l_debug_level > 0 THEN
2905 oe_debug_pub.add( 'HEADER SALESCREDIT ( '|| L_HEADER_SCREDIT_COUNT||' ) : '|| L_HEADER_SCREDIT_TBL ( L_HEADER_SCREDIT_COUNT ) .ORIG_SYS_CREDIT_REF ) ;
2906 END IF;
2907
2908 END LOOP;
2909 CLOSE l_header_scredit_cursor;
2910
2911 /* -----------------------------------------------------------
2912 Multiple Payments: Header PAYMENTs
2913 -----------------------------------------------------------
2914 */
2915 IF l_debug_level > 0 THEN
2916 oe_debug_pub.add( 'BEFORE HEADER PAYMENTS LOOP' ) ;
2917 END IF;
2918
2919 l_header_payment_count := 0;
2920
2921 OPEN l_header_payment_cursor;
2922 LOOP
2923 FETCH l_header_payment_cursor
2924 INTO l_header_payment_rec.orig_sys_payment_ref
2925 , l_header_payment_rec.change_request_code
2926 , l_header_payment_rec.payment_type_code
2927 , l_header_payment_val_rec.commitment
2928 , l_header_payment_rec.payment_trx_id
2929 , l_header_payment_val_rec.receipt_method
2930 , l_header_payment_rec.receipt_method_id
2931 , l_header_payment_rec.payment_collection_event
2932 , l_header_payment_rec.payment_set_id
2933 , l_header_payment_rec.prepaid_amount
2934 , l_header_payment_rec.credit_card_number
2935 , l_header_payment_rec.credit_card_holder_name
2936 , l_header_payment_rec.credit_card_expiration_date
2937 , l_header_payment_rec.credit_card_code
2938 , l_header_payment_rec.credit_card_approval_code
2939 , l_header_payment_rec.credit_card_approval_date
2940 , l_header_payment_rec.check_number
2941 , l_header_payment_rec.payment_amount
2942 , l_header_payment_val_rec.payment_percentage
2943 , l_header_payment_rec.creation_date
2944 , l_header_payment_rec.created_by
2945 , l_header_payment_rec.last_update_date
2946 , l_header_payment_rec.last_updated_by
2947 , l_header_payment_rec.last_update_login
2948 , l_header_payment_rec.program_application_id
2949 , l_header_payment_rec.program_id
2950 , l_header_payment_rec.program_update_date
2951 , l_header_payment_rec.context
2952 , l_header_payment_rec.attribute1
2953 , l_header_payment_rec.attribute2
2954 , l_header_payment_rec.attribute3
2955 , l_header_payment_rec.attribute4
2956 , l_header_payment_rec.attribute5
2957 , l_header_payment_rec.attribute6
2958 , l_header_payment_rec.attribute7
2959 , l_header_payment_rec.attribute8
2960 , l_header_payment_rec.attribute9
2961 , l_header_payment_rec.attribute10
2962 , l_header_payment_rec.attribute11
2963 , l_header_payment_rec.attribute12
2964 , l_header_payment_rec.attribute13
2965 , l_header_payment_rec.attribute14
2966 , l_header_payment_rec.attribute15
2967 , l_header_payment_rec.operation
2968 , l_header_payment_rec.status_flag
2969 , l_header_payment_rec.payment_number
2970 , l_header_payment_rec.header_id
2971 , l_header_payment_rec.line_id
2972 , l_header_payment_rec.trxn_extension_id
2973 , l_header_payment_rec.instrument_security_code --R12 CVV2
2974 ;
2975 EXIT WHEN l_header_payment_cursor%NOTFOUND;
2976
2977 IF l_header_payment_rec.operation = 'INSERT' THEN
2978 l_header_payment_rec.operation := 'CREATE';
2979 END IF;
2980
2981 IF l_header_payment_rec.operation = 'CREATE' THEN
2982 -- set it to miss num, so payment number will be generated internally.
2983 l_header_payment_rec.payment_number := FND_API.G_MISS_NUM;
2984 END IF;
2985
2986 IF(l_header_payment_count > 0) THEN
2987 IF(l_header_payment_rec.orig_sys_payment_ref = l_header_payment_tbl(l_header_payment_count).orig_sys_payment_ref) THEN
2988 --duplicate
2989
2990 l_validate_only := FND_API.G_TRUE;
2991 IF l_debug_level > 0 THEN
2992 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_payment_REF FORTHE SAME ORDER' ) ;
2993 END IF;
2994 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
2995 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_payment_ref');
2996 OE_MSG_PUB.Add;
2997
2998 END IF;
2999 END IF;
3000
3001 l_header_payment_count := l_header_payment_count + 1;
3002 l_header_payment_tbl (l_header_payment_count) := l_header_payment_rec;
3003 l_header_payment_val_tbl (l_header_payment_count) := l_header_payment_val_rec;
3004
3005 IF l_debug_level > 0 THEN
3006 oe_debug_pub.add( 'HEADER PAYMENT ( '|| L_HEADER_PAYMENT_COUNT||' ) : '|| L_HEADER_payment_TBL ( L_HEADER_payment_COUNT ) .ORIG_SYS_payment_REF ) ;
3007 END IF;
3008
3009
3010 END LOOP;
3011 CLOSE l_header_payment_cursor;
3012 -- end of multiple payments: fetching header payment.
3013
3014 /* myerrams, Bug:4724191
3015 --myerrams, start
3016 select header_id into l_header_id_temp
3017 from oe_order_headers_all
3018 where orig_sys_document_ref = l_orig_sys_document_ref;
3019 --myerrams, end
3020 */
3021
3022 l_action_request_count := 0;
3023 OPEN l_action_request_header_cursor;
3024 LOOP
3025 FETCH l_action_request_header_cursor
3026 INTO l_action_rec.orig_sys_line_ref
3027 , l_action_rec.orig_sys_shipment_ref
3028 , l_action_rec.hold_id
3029 , l_action_rec.hold_type_code
3030 , l_action_rec.hold_type_id
3031 , l_action_rec.hold_until_date
3032 , l_action_rec.release_reason_code
3033 , l_action_rec.comments
3034 , l_action_rec.context
3035 , l_action_rec.attribute1
3036 , l_action_rec.attribute2
3037 , l_action_rec.attribute3
3038 , l_action_rec.attribute4
3039 , l_action_rec.attribute5
3040 , l_action_rec.attribute6
3041 , l_action_rec.attribute7
3042 , l_action_rec.attribute8
3043 , l_action_rec.attribute9
3044 , l_action_rec.attribute10
3045 , l_action_rec.attribute11
3046 , l_action_rec.attribute12
3047 , l_action_rec.attribute13
3048 , l_action_rec.attribute14
3049 , l_action_rec.attribute15
3050 , l_action_rec.operation_code
3051 , l_action_rec.error_flag
3052 , l_action_rec.status_flag
3053 , l_action_rec.interface_status
3054 --myerrams,start, modified the fetch statement to fetch newly introduced
3055 --fields in oe_actions_interface for Customer Acceptance
3056 , l_action_rec.char_param1
3057 , l_action_rec.char_param2
3058 , l_action_rec.char_param3
3059 , l_action_rec.char_param4
3060 , l_action_rec.char_param5
3061 , l_action_rec.date_param1
3062 , l_action_rec.date_param2
3063 , l_action_rec.date_param3
3064 , l_action_rec.date_param4
3065 , l_action_rec.date_param5
3066 --myerrams, end
3067 ;
3068 EXIT WHEN l_action_request_header_cursor%NOTFOUND;
3069 l_action_request_rec.request_type := l_action_rec.operation_code;
3070
3071 l_action_request_rec.entity_code := OE_Globals.G_ENTITY_HEADER;
3072 --l_action_request_rec.entity_id := l_header_rec_new.header_id;
3073
3074 IF l_debug_level > 0 THEN
3075 oe_debug_pub.add( 'ACTION CODE: '|| L_ACTION_REQUEST_REC.REQUEST_TYPE , 1 ) ;
3076
3077 oe_debug_pub.add( 'ENTITY CODE: '|| L_ACTION_REQUEST_REC.ENTITY_CODE , 1 ) ;
3078
3079 oe_debug_pub.add( 'ENTITY ID : '|| L_ACTION_REQUEST_REC.ENTITY_ID , 1 ) ;
3080 END IF;
3081
3082 IF l_action_rec.operation_code = OE_Globals.G_APPLY_HOLD THEN
3083 l_action_request_rec.param1 := l_action_rec.hold_id;
3084 l_action_request_rec.param2 := nvl(l_action_rec.hold_type_code,'O');
3085 l_action_request_rec.param3 := nvl(l_action_rec.hold_type_id,
3086 l_action_request_rec.entity_id);
3087 l_action_request_rec.param4 := l_action_rec.comments;
3088 l_action_request_rec.date_param1 := l_action_rec.hold_until_date;
3089 l_action_request_rec.param10 := l_action_rec.context;
3090 l_action_request_rec.param11 := l_action_rec.attribute1;
3091 l_action_request_rec.param12 := l_action_rec.attribute2;
3092 l_action_request_rec.param13 := l_action_rec.attribute3;
3093 l_action_request_rec.param14 := l_action_rec.attribute4;
3094 l_action_request_rec.param15 := l_action_rec.attribute5;
3095 l_action_request_rec.param16 := l_action_rec.attribute6;
3096 l_action_request_rec.param17 := l_action_rec.attribute7;
3097 l_action_request_rec.param18 := l_action_rec.attribute8;
3098 l_action_request_rec.param19 := l_action_rec.attribute9;
3099 l_action_request_rec.param20 := l_action_rec.attribute10;
3100 l_action_request_rec.param21 := l_action_rec.attribute11;
3101 l_action_request_rec.param22 := l_action_rec.attribute12;
3102 l_action_request_rec.param23 := l_action_rec.attribute13;
3103 l_action_request_rec.param24 := l_action_rec.attribute14;
3104 l_action_request_rec.param25 := l_action_rec.attribute15;
3105
3106 IF l_debug_level > 0 THEN
3107 oe_debug_pub.add( 'PARAM1/HOLD_ID: ' || L_ACTION_REQUEST_REC.PARAM1 , 1 ) ;
3108
3109 oe_debug_pub.add( 'PARAM2/HOLD_ENT_CD: '|| L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
3110
3111 oe_debug_pub.add( 'PARAM3/HOLD_ENT_ID: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
3112
3113 oe_debug_pub.add( 'PARAM4/HOLD_CMNTS: ' || L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
3114 END IF;
3115
3116 ELSIF l_action_rec.operation_code = OE_Globals.G_RELEASE_HOLD THEN
3117 l_action_request_rec.param1 := l_action_rec.hold_id;
3118 l_action_request_rec.param2 := nvl(l_action_rec.hold_type_code,'O');
3119 l_action_request_rec.param3 := nvl(l_action_rec.hold_type_id,
3120 l_action_request_rec.entity_id);
3121 l_action_request_rec.param4 := l_action_rec.release_reason_code;
3122 l_action_request_rec.param5 := l_action_rec.comments;
3123
3124 IF l_debug_level > 0 THEN
3125 oe_debug_pub.add( 'PARAM1/HOLD_ID: ' || L_ACTION_REQUEST_REC.PARAM1 , 1 ) ;
3126
3127 oe_debug_pub.add( 'PARAM2/HOLD_ENT_CD: '|| L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
3128
3129 oe_debug_pub.add( 'PARAM3/HOLD_ENT_ID: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
3130
3131 oe_debug_pub.add( 'PARAM4/REL_REASON: ' || L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
3132
3133 oe_debug_pub.add( 'PARAM5/REL_COMMNTS: '|| L_ACTION_REQUEST_REC.PARAM5 , 1 ) ;
3134 END IF;
3135
3136 --myerrams, introduced the following check for Customer Acceptance.
3137 ELSIF l_action_rec.operation_code = OE_Globals.G_ACCEPT_FULFILLMENT OR l_action_rec.operation_code = OE_Globals.G_REJECT_FULFILLMENT THEN
3138 IF (OE_SYS_PARAMETERS.VALUE('ENABLE_FULFILLMENT_ACCEPTANCE',p_org_id) = 'Y')
3139 THEN
3140 -- Customer Comments
3141 l_action_request_rec.param1 := l_action_rec.char_param1;
3142 -- Customer Signature
3143 l_action_request_rec.param2 := l_action_rec.char_param2;
3144 -- Reference Document
3145 l_action_request_rec.param3 := l_action_rec.char_param3;
3146 -- Implicit Acceptance Flag
3147 l_action_request_rec.param4 := l_action_rec.char_param4;
3148 --myerrams, Bug:4724191 l_action_request_rec.param5 := l_header_id_temp;
3149 -- Customer Signature Date
3150 l_action_request_rec.date_param1 := l_action_rec.date_param1;
3151 ELSE
3152 --display a message saying Customer Acceptance is not enabled
3153 FND_MESSAGE.Set_Name('ONT', 'ONT_CUST_ACC_DISABLED');
3154 OE_MSG_PUB.add;
3155 END IF;
3156
3157 IF l_debug_level > 0 THEN
3158 oe_debug_pub.add( 'PARAM2/CUSTOMER_COMMENTS: ' || L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
3159
3160 oe_debug_pub.add( 'PARAM3/CUSTOMER_SIGNATURE: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
3161
3162 oe_debug_pub.add( 'PARAM4/REFERENCE_DOCUMENT: '|| L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
3163
3164 oe_debug_pub.add( 'PARAM5/IMPLICIT ACCEPTANCE FLAG: ' || L_ACTION_REQUEST_REC.PARAM5 , 1 ) ;
3165
3166 oe_debug_pub.add( 'DATE_PARAM1/SIGNATURE_DATE: '|| L_ACTION_REQUEST_REC.DATE_PARAM1 , 1 ) ;
3167 END IF;
3168 --myerrams, end
3169 END IF;
3170
3171 l_action_request_count := l_action_request_count+1;
3172 l_action_request_tbl(l_action_request_count) := l_action_request_rec;
3173
3174 END LOOP;
3175 CLOSE l_action_request_header_cursor;
3176
3177 /* -----------------------------------------------------------
3178 Lines
3179 -----------------------------------------------------------
3180 */
3181 IF l_debug_level > 0 THEN
3182 oe_debug_pub.add( 'BEFORE LINES LOOP' ) ;
3183 END IF;
3184
3185 l_line_count := 0;
3186
3187 OPEN l_line_cursor;
3188 LOOP
3189 FETCH l_line_cursor
3190 INTO l_line_rec.order_source_id
3191 , l_line_rec.orig_sys_document_ref
3192 , l_line_rec.orig_sys_line_ref
3193 , l_line_rec.orig_sys_shipment_ref
3194 , l_line_rec.change_request_code
3195 , l_line_rec.org_id
3196 , l_line_rec.line_number
3197 , l_line_rec.shipment_number
3198 , l_line_rec.line_id
3199 , l_line_rec.line_type_id
3200 , l_line_val_rec.line_type
3201 , l_line_rec.item_type_code
3202 , l_line_rec.inventory_item_id
3203 , l_line_val_rec.inventory_item
3204 , l_line_rec.top_model_line_ref
3205 , l_line_rec.link_to_line_ref
3206 , l_line_rec.explosion_date
3207 , l_line_rec.ato_line_id
3208 , l_line_rec.component_sequence_id
3209 , l_line_rec.component_code
3210 , l_line_rec.sort_order
3211 , l_line_rec.model_group_number
3212 , l_line_rec.option_number
3213 , l_line_rec.option_flag
3214 , l_line_rec.ship_model_complete_flag
3215 , l_line_rec.source_type_code
3216 , l_line_rec.schedule_status_code
3217 , l_line_rec.schedule_ship_date
3218 , l_line_rec.late_demand_penalty_factor
3219 , l_line_rec.schedule_arrival_date
3220 , l_line_rec.actual_arrival_date
3221 , l_line_rec.request_date
3222 , l_line_rec.promise_date
3223 , l_line_rec.delivery_lead_time
3224 , l_line_rec.ordered_quantity
3225 , l_line_rec.order_quantity_uom
3226 , l_line_rec.shipping_quantity
3227 , l_line_rec.shipping_quantity_uom
3228 , l_line_rec.shipped_quantity
3229 , l_line_rec.cancelled_quantity
3230 , l_line_rec.fulfilled_quantity
3231 /* OPM variables */
3232 , l_line_rec.ordered_quantity2
3233 , l_line_rec.ordered_quantity_uom2
3234 , l_line_rec.shipping_quantity2
3235 , l_line_rec.shipping_quantity_uom2
3236 , l_line_rec.shipped_quantity2
3237 , l_line_rec.cancelled_quantity2
3238 , l_line_rec.fulfilled_quantity2
3239 , l_line_rec.preferred_grade
3240 /* end OPM variables */
3241 , l_line_rec.pricing_quantity
3242 , l_line_rec.pricing_quantity_uom
3243 , l_line_rec.sold_from_org_id
3244 , l_line_val_rec.sold_from_org
3245 , l_line_rec.sold_to_org_id
3246 , l_line_val_rec.sold_to_org
3247 , l_line_rec.ship_from_org_id
3248 , l_line_val_rec.ship_from_org
3249 , l_line_rec.ship_to_org_id
3250 , l_line_val_rec.ship_to_org
3251 , l_line_rec.deliver_to_org_id
3252 , l_line_val_rec.deliver_to_org
3253 , l_line_rec.invoice_to_org_id
3254 , l_line_val_rec.invoice_to_org
3255 , l_line_val_rec.ship_to_address1
3256 , l_line_val_rec.ship_to_address2
3257 , l_line_val_rec.ship_to_address3
3258 , l_line_val_rec.ship_to_address4
3259 , l_line_val_rec.ship_to_city
3260 , l_line_val_rec.ship_to_state
3261 , l_line_val_rec.ship_to_zip
3262 , l_line_val_rec.ship_to_country
3263 , l_line_rec.ship_to_contact_id
3264 , l_line_val_rec.ship_to_contact
3265 , l_line_rec.deliver_to_contact_id
3266 , l_line_val_rec.deliver_to_contact
3267 , l_line_rec.invoice_to_contact_id
3268 , l_line_val_rec.invoice_to_contact
3269 , l_line_rec.drop_ship_flag
3270 , l_line_rec.ship_tolerance_above
3271 , l_line_rec.ship_tolerance_below
3272 , l_line_rec.price_list_id
3273 , l_line_val_rec.price_list
3274 , l_line_rec.pricing_date
3275 , l_line_rec.unit_list_price
3276 , l_line_rec.unit_selling_price
3277 , l_line_rec.calculate_price_flag
3278 , l_line_rec.ship_set_id
3279 , l_line_rec.ship_set
3280 , l_line_rec.arrival_set_id
3281 , l_line_rec.arrival_set
3282 , l_line_rec.fulfillment_set_id
3283 , l_line_rec.fulfillment_set
3284 , l_line_rec.tax_code
3285 , l_line_rec.tax_value
3286 , l_line_rec.tax_date
3287 , l_line_rec.tax_point_code
3288 , l_line_val_rec.tax_point
3289 , l_line_rec.tax_exempt_flag
3290 , l_line_rec.tax_exempt_number
3291 , l_line_rec.tax_exempt_reason_code
3292 , l_line_val_rec.tax_exempt_reason
3293 , l_line_rec.agreement_id
3294 , l_line_val_rec.agreement
3295 , l_line_rec.invoicing_rule_id
3296 , l_line_val_rec.invoicing_rule
3297 , l_line_rec.accounting_rule_id
3298 , l_line_rec.accounting_rule_duration
3299 , l_line_val_rec.accounting_rule
3300 , l_line_rec.payment_term_id
3301 , l_line_val_rec.payment_term
3302 , l_line_rec.demand_class_code
3303 , l_line_rec.shipment_priority_code
3304 , l_line_val_rec.shipment_priority
3305 , l_line_rec.shipping_method_code
3306 , l_line_rec.shipping_instructions
3307 , l_line_rec.packing_instructions
3308 , l_line_rec.freight_carrier_code
3309 , l_line_rec.freight_terms_code
3310 , l_line_val_rec.freight_terms
3311 , l_line_rec.fob_point_code
3312 , l_line_val_rec.fob_point
3313 , l_line_rec.return_reason_code
3314 , l_line_rec.reference_type
3315 , l_line_rec.reference_header_id
3316 , l_line_rec.reference_line_id
3317 , l_line_rec.credit_invoice_line_id
3318 , l_line_rec.cust_po_number
3319 --bug#4063831:
3320 --FP:11I9-12.0CUST_PRODUCTION_SEQ_NUM IS NOT GETTING POPULATED
3321 -- DURING ORDER IMPORT
3322 , l_line_rec.cust_production_seq_num
3323 , l_line_rec.customer_line_number
3324 , l_line_rec.customer_shipment_number
3325 , l_line_rec.ordered_item_id
3326 , l_line_rec.item_identifier_type
3327 , l_line_rec.ordered_item
3328 -- , l_line_rec.customer_item_revision
3329 , l_line_rec.customer_item_net_price
3330 , l_line_rec.customer_payment_term_id
3331 , l_line_val_rec.customer_payment_term
3332 , l_line_rec.demand_bucket_type_code
3333 , l_line_val_rec.demand_bucket_type
3334 , l_line_rec.customer_dock_code
3335 , l_line_rec.customer_job
3336 , l_line_rec.customer_production_line
3337 , l_line_rec.cust_model_serial_number
3338 , l_line_rec.project_id
3339 , l_line_val_rec.project
3340 , l_line_rec.task_id
3341 , l_line_val_rec.task
3342 , l_line_rec.end_item_unit_number
3343 , l_line_rec.item_revision
3344 , l_line_rec.service_duration
3345 , l_line_rec.service_period
3346 , l_line_rec.service_start_date
3347 , l_line_rec.service_end_date
3348 , l_line_rec.service_coterminate_flag
3349 , l_line_rec.unit_selling_percent
3350 , l_line_rec.unit_list_percent
3351 , l_line_rec.unit_percent_base_price
3352 , l_line_rec.service_number
3353 -- , l_line_rec.fulfilled_flag -- To be added in Process Order
3354 -- , l_line_rec.closed_flag
3355 , l_line_rec.cancelled_flag
3356 , l_line_rec.context
3357 , l_line_rec.attribute1
3358 , l_line_rec.attribute2
3359 , l_line_rec.attribute3
3360 , l_line_rec.attribute4
3361 , l_line_rec.attribute5
3362 , l_line_rec.attribute6
3363 , l_line_rec.attribute7
3364 , l_line_rec.attribute8
3365 , l_line_rec.attribute9
3366 , l_line_rec.attribute10
3367 , l_line_rec.attribute11
3368 , l_line_rec.attribute12
3369 , l_line_rec.attribute13
3370 , l_line_rec.attribute14
3371 , l_line_rec.attribute15
3372 , l_line_rec.attribute16 -- For bug 2184255
3373 , l_line_rec.attribute17
3374 , l_line_rec.attribute18
3375 , l_line_rec.attribute19
3376 , l_line_rec.attribute20
3377 , l_line_rec.tp_context
3378 , l_line_rec.tp_attribute1
3379 , l_line_rec.tp_attribute2
3380 , l_line_rec.tp_attribute3
3381 , l_line_rec.tp_attribute4
3382 , l_line_rec.tp_attribute5
3383 , l_line_rec.tp_attribute6
3384 , l_line_rec.tp_attribute7
3385 , l_line_rec.tp_attribute8
3386 , l_line_rec.tp_attribute9
3387 , l_line_rec.tp_attribute10
3388 , l_line_rec.tp_attribute11
3389 , l_line_rec.tp_attribute12
3390 , l_line_rec.tp_attribute13
3391 , l_line_rec.tp_attribute14
3392 , l_line_rec.tp_attribute15
3393 , l_line_rec.industry_context
3394 , l_line_rec.industry_attribute1
3395 , l_line_rec.industry_attribute2
3396 , l_line_rec.industry_attribute3
3397 , l_line_rec.industry_attribute4
3398 , l_line_rec.industry_attribute5
3399 , l_line_rec.industry_attribute6
3400 , l_line_rec.industry_attribute7
3401 , l_line_rec.industry_attribute8
3402 , l_line_rec.industry_attribute9
3403 , l_line_rec.industry_attribute10
3404 , l_line_rec.industry_attribute11
3405 , l_line_rec.industry_attribute12
3406 , l_line_rec.industry_attribute13
3407 , l_line_rec.industry_attribute14
3408 , l_line_rec.industry_attribute15
3409 , l_line_rec.industry_attribute16
3410 , l_line_rec.industry_attribute17
3411 , l_line_rec.industry_attribute18
3412 , l_line_rec.industry_attribute19
3413 , l_line_rec.industry_attribute20
3414 , l_line_rec.industry_attribute21
3415 , l_line_rec.industry_attribute22
3416 , l_line_rec.industry_attribute23
3417 , l_line_rec.industry_attribute24
3418 , l_line_rec.industry_attribute25
3419 , l_line_rec.industry_attribute26
3420 , l_line_rec.industry_attribute27
3421 , l_line_rec.industry_attribute28
3422 , l_line_rec.industry_attribute29
3423 , l_line_rec.industry_attribute30
3424 , l_line_rec.pricing_context
3425 , l_line_rec.pricing_attribute1
3426 , l_line_rec.pricing_attribute2
3427 , l_line_rec.pricing_attribute3
3428 , l_line_rec.pricing_attribute4
3429 , l_line_rec.pricing_attribute5
3430 , l_line_rec.pricing_attribute6
3431 , l_line_rec.pricing_attribute7
3432 , l_line_rec.pricing_attribute8
3433 , l_line_rec.pricing_attribute9
3434 , l_line_rec.pricing_attribute10
3435 , l_line_rec.global_attribute_category
3436 , l_line_rec.global_attribute1
3437 , l_line_rec.global_attribute2
3438 , l_line_rec.global_attribute3
3439 , l_line_rec.global_attribute4
3440 , l_line_rec.global_attribute5
3441 , l_line_rec.global_attribute6
3442 , l_line_rec.global_attribute7
3443 , l_line_rec.global_attribute8
3444 , l_line_rec.global_attribute9
3445 , l_line_rec.global_attribute10
3446 , l_line_rec.global_attribute11
3447 , l_line_rec.global_attribute12
3448 , l_line_rec.global_attribute13
3449 , l_line_rec.global_attribute14
3450 , l_line_rec.global_attribute15
3451 , l_line_rec.global_attribute16
3452 , l_line_rec.global_attribute17
3453 , l_line_rec.global_attribute18
3454 , l_line_rec.global_attribute19
3455 , l_line_rec.global_attribute20
3456 , l_line_rec.return_context
3457 , l_line_rec.return_attribute1
3458 , l_line_rec.return_attribute2
3459 , l_line_rec.return_attribute3
3460 , l_line_rec.return_attribute4
3461 , l_line_rec.return_attribute5
3462 , l_line_rec.return_attribute6
3463 , l_line_rec.return_attribute7
3464 , l_line_rec.return_attribute8
3465 , l_line_rec.return_attribute9
3466 , l_line_rec.return_attribute10
3467 , l_line_rec.return_attribute11
3468 , l_line_rec.return_attribute12
3469 , l_line_rec.return_attribute13
3470 , l_line_rec.return_attribute14
3471 , l_line_rec.return_attribute15
3472 , l_line_rec.request_id
3473 , l_line_rec.operation
3474 , l_line_rec.status_flag
3475 , l_line_rec.change_reason
3476 , l_line_rec.change_comments
3477 , l_line_rec.service_txn_reason_code
3478 , l_line_rec.service_txn_comments
3479 , l_line_rec.service_reference_type_code
3480 , l_line_rec.service_reference_order
3481 , l_line_rec.service_reference_line
3482 , l_line_rec.service_reference_system
3483 , l_segment_array(1)
3484 , l_segment_array(2)
3485 , l_segment_array(3)
3486 , l_segment_array(4)
3487 , l_segment_array(5)
3488 , l_segment_array(6)
3489 , l_segment_array(7)
3490 , l_segment_array(8)
3491 , l_segment_array(9)
3492 , l_segment_array(10)
3493 , l_segment_array(11)
3494 , l_segment_array(12)
3495 , l_segment_array(13)
3496 , l_segment_array(14)
3497 , l_segment_array(15)
3498 , l_segment_array(16)
3499 , l_segment_array(17)
3500 , l_segment_array(18)
3501 , l_segment_array(19)
3502 , l_segment_array(20)
3503 , l_line_val_rec.commitment
3504 , l_line_rec.commitment_id
3505 -- aksingh subinventory
3506 , l_line_rec.subinventory
3507 ,l_line_val_rec.salesrep
3508 ,l_line_rec.salesrep_id
3509 ,l_line_rec.earliest_acceptable_date
3510 ,l_line_rec.latest_acceptable_date
3511 , l_line_rec.split_from_line_ref
3512 , l_line_rec.split_from_shipment_ref
3513 ,l_line_val_rec.invoice_to_address1
3514 ,l_line_val_rec.invoice_to_address2
3515 ,l_line_val_rec.invoice_to_address3
3516 ,l_line_val_rec.invoice_to_address4
3517 ,l_line_val_rec.invoice_to_city
3518 ,l_line_val_rec.invoice_to_state
3519 ,l_line_val_rec.invoice_to_zip
3520 ,l_line_val_rec.invoice_to_country
3521 -- { Start add new columns to select for the Add Customer
3522 , l_line_customer_rec.Orig_Ship_Address_Ref
3523 , l_line_customer_rec.Orig_Bill_Address_Ref
3524 , l_line_customer_rec.Orig_Deliver_Address_Ref
3525 , l_line_customer_rec.Ship_to_Contact_Ref
3526 , l_line_customer_rec.Bill_to_Contact_Ref
3527 , l_line_customer_rec.Deliver_to_Contact_Ref
3528 -- End add new columns to select for the Add Customer}
3529 , l_line_rec.Config_Header_Id
3530 , l_line_rec.Config_Rev_Nbr
3531 , l_line_rec.Configuration_Id
3532 , l_line_val_rec.ship_to_customer_name_oi
3533 , l_line_val_rec.ship_to_customer_number_oi
3534 , l_line_rec.ship_to_customer_id
3535 , l_line_val_rec.invoice_to_customer_name_oi
3536 , l_line_val_rec.invoice_to_customer_number_oi
3537 , l_line_rec.invoice_to_customer_id
3538 , l_line_val_rec.deliver_to_customer_name_oi
3539 , l_line_val_rec.deliver_to_customer_number_oi
3540 , l_line_rec.deliver_to_customer_id
3541 , l_line_rec.user_item_description
3542 , l_line_rec.override_atp_date_code
3543 , l_line_rec.xml_transaction_type_code
3544 , l_line_rec.blanket_number
3545 , l_line_rec.blanket_line_number
3546 , l_line_val_rec.shipping_method
3547 , l_line_rec.change_sequence
3548 -- automatic account creation {
3549 , l_line_rec.ship_to_party_id
3550 , l_line_rec.ship_to_party_site_id
3551 , l_line_rec.ship_to_party_site_use_id
3552 , l_line_rec.deliver_to_party_id
3553 , l_line_rec.deliver_to_party_site_id
3554 , l_line_rec.deliver_to_party_site_use_id
3555 , l_line_rec.invoice_to_party_id
3556 , l_line_rec.invoice_to_party_site_id
3557 , l_line_rec.invoice_to_party_site_use_id
3558 -- automatic account creation }
3559 -- { Distributer Order related change
3560 , l_line_rec.end_customer_id
3561 , l_line_rec.end_customer_contact_id
3562 , l_line_rec.end_customer_site_use_id
3563 ,l_line_val_rec.end_customer_name --mvijayku
3564 , l_line_val_rec.end_customer_site_address1
3565 , l_line_val_rec.end_customer_site_address2
3566 , l_line_val_rec.end_customer_site_address3
3567 , l_line_val_rec.end_customer_site_address4
3568 -- , l_line_val_rec.end_customer_site_location
3569 , l_line_val_rec.end_customer_site_city
3570 , l_line_val_rec.end_customer_site_state
3571 , l_line_val_rec.end_customer_site_postal_code
3572 , l_line_val_rec.end_customer_site_country
3573 , l_line_val_rec.end_customer_contact
3574 , l_line_val_rec.end_customer_number
3575 , l_line_val_rec.ib_owner_dsp
3576 , l_line_val_rec.ib_current_location_dsp
3577 , l_line_val_rec.ib_installed_at_location_dsp
3578 , l_line_rec.ib_owner
3579 , l_line_rec.ib_current_location
3580 , l_line_rec.ib_installed_at_location
3581 , l_line_rec.END_CUSTOMER_PARTY_ID
3582 ,l_line_rec.END_CUSTOMER_ORG_CONTACT_ID
3583 ,l_line_rec.END_CUSTOMER_PARTY_SITE_ID
3584 ,l_line_rec.END_CUSTOMER_PARTY_SITE_USE_ID
3585 ,l_line_rec.END_CUSTOMER_PARTY_NUMBER
3586 -- Distributer Order related change }
3587 -- Automatic Account Creation
3588 , l_line_rec.ship_to_party_number
3589 , l_line_rec.invoice_to_party_number
3590 , l_line_rec.deliver_to_party_number
3591 -- Automatic Account Creation
3592 , l_line_val_rec.deliver_to_address1
3593 , l_line_val_rec.deliver_to_address2
3594 , l_line_val_rec.deliver_to_address3
3595 , l_line_val_rec.deliver_to_address4
3596 , l_line_val_rec.deliver_to_state
3597 , l_line_val_rec.deliver_to_county
3598 , l_line_val_rec.deliver_to_country
3599 , l_line_val_rec.deliver_to_province
3600 , l_line_val_rec.deliver_to_city
3601 , l_line_val_rec.deliver_to_zip
3602 , l_line_rec.planning_priority --Bug#6924881
3603 ;
3604 EXIT WHEN l_line_cursor%NOTFOUND;
3605
3606 IF l_line_rec.operation = 'INSERT' THEN
3607 l_line_rec.operation := 'CREATE';
3608 END IF;
3609
3610 --added for BUG#7304558
3611
3612 IF l_line_rec.operation = 'CREATE' THEN
3613 IF l_line_rec.calculate_price_flag IS NULL or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR THEN
3614 l_line_rec.calculate_price_flag := 'Y';
3615 end if;
3616 ELSE
3617 BEGIN
3618 IF l_debug_level > 0 THEN
3619 oe_debug_pub.add( 'OPERATION CODE :'||l_line_rec.operation, 5);
3620 oe_debug_pub.add( 'CALCULATE PRICE FLAG'||l_line_rec.calculate_price_flag, 5) ;
3621 oe_debug_pub.add( 'UNIT SELLING PRICE'||l_line_rec.unit_selling_price, 5) ;
3622 oe_debug_pub.add( 'UNIT LIST PRICE'||l_line_rec.unit_list_price, 5) ;
3623 oe_debug_pub.add( 'ORIG_SYS_SHIPMENT_REF'||l_line_rec.orig_sys_shipment_ref, 5) ;
3624 END IF;
3625 IF l_line_rec.orig_sys_shipment_ref IS NULL or l_line_rec.orig_sys_shipment_ref = FND_API.G_MISS_CHAR then
3626 IF l_line_rec.calculate_price_flag IS NULL or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR then
3627 --populate calculate_price_flag from lines table
3628 SELECT calculate_price_flag
3629 INTO l_line_rec.calculate_price_flag
3630 FROM OE_ORDER_LINES_ALL
3631 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3632 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref;
3633
3634 IF l_debug_level > 0 THEN
3635 oe_debug_pub.add( 'CALCULATE PRICE FLAG'||l_line_rec.calculate_price_flag, 5) ;
3636 END IF;
3637
3638 if l_line_rec.calculate_price_flag in ('P', 'N') then
3639
3640 if (l_line_rec.unit_selling_price is null or l_line_rec.unit_selling_price = FND_API.G_MISS_NUM)
3641 AND (l_line_rec.unit_list_price is null or l_line_rec.unit_list_price = FND_API.G_MISS_NUM)
3642 THEN
3643 SELECT unit_selling_price,unit_list_price
3644 INTO l_line_rec.unit_selling_price,l_line_rec.unit_list_price
3645 FROM OE_ORDER_LINES_ALL
3646 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3647 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref;
3648
3649 IF l_debug_level > 0 THEN
3650 oe_debug_pub.add( 'UNIT SELLING PRICE/UNIT LIST PRICE'||l_line_rec.unit_selling_price||'/'||l_line_rec.unit_list_price, 5);
3651 END IF;
3652
3653 end if;
3654
3655 end if;
3656 --//added to handle the case when user will populate CPF
3657 ELSIF l_line_rec.calculate_price_flag in ('P', 'N') then
3658
3659 if (l_line_rec.unit_selling_price is null or l_line_rec.unit_selling_price = FND_API.G_MISS_NUM)
3660 AND (l_line_rec.unit_list_price is null or l_line_rec.unit_list_price = FND_API.G_MISS_NUM)
3661 THEN
3662 SELECT unit_selling_price,unit_list_price
3663 INTO l_line_rec.unit_selling_price,l_line_rec.unit_list_price
3664 FROM OE_ORDER_LINES_ALL
3665 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3666 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref;
3667
3668 IF l_debug_level > 0 THEN
3669 oe_debug_pub.add( 'UNIT SELLING PRICE/UNIT LIST PRICE'||l_line_rec.unit_selling_price||'/'||l_line_rec.unit_list_price, 5);
3670 END IF;
3671 end if;
3672 --//added to handle the case when user will populate CPF
3673 END IF;
3674 ELSE --if orig_sys_shipment_ref is populated(split line case)
3675 IF l_line_rec.calculate_price_flag IS NULL or l_line_rec.calculate_price_flag = FND_API.G_MISS_CHAR then
3676 --populate calculate_price_flag from lines table
3677 SELECT calculate_price_flag
3678 INTO l_line_rec.calculate_price_flag
3679 FROM OE_ORDER_LINES_ALL
3680 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3681 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref
3682 AND orig_sys_shipment_ref = l_line_rec.orig_sys_shipment_ref;
3683
3684 IF l_debug_level > 0 THEN
3685 oe_debug_pub.add( 'CALCULATE PRICE FLAG'||l_line_rec.calculate_price_flag, 5) ;
3686 END IF;
3687
3688 if l_line_rec.calculate_price_flag in ('P', 'N') then
3689
3690 if (l_line_rec.unit_selling_price is null or l_line_rec.unit_selling_price = FND_API.G_MISS_NUM)
3691 AND (l_line_rec.unit_list_price is null or l_line_rec.unit_list_price = FND_API.G_MISS_NUM)
3692 THEN
3693 SELECT unit_selling_price,unit_list_price
3694 INTO l_line_rec.unit_selling_price,l_line_rec.unit_list_price
3695 FROM OE_ORDER_LINES_ALL
3696 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3697 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref
3698 AND orig_sys_shipment_ref = l_line_rec.orig_sys_shipment_ref;
3699
3700 IF l_debug_level > 0 THEN
3701 oe_debug_pub.add( 'UNIT SELLING PRICE/UNIT LIST PRICE'||l_line_rec.unit_selling_price||'/'||l_line_rec.unit_list_price, 5);
3702 END IF;
3703
3704 end if;
3705
3706 end if;
3707 --//added to handle the case when user will populate CPF
3708 ELSIF l_line_rec.calculate_price_flag in ('P', 'N') then
3709
3710 if (l_line_rec.unit_selling_price is null or l_line_rec.unit_selling_price = FND_API.G_MISS_NUM)
3711 AND (l_line_rec.unit_list_price is null or l_line_rec.unit_list_price = FND_API.G_MISS_NUM)
3712 THEN
3713 SELECT unit_selling_price,unit_list_price
3714 INTO l_line_rec.unit_selling_price,l_line_rec.unit_list_price
3715 FROM OE_ORDER_LINES_ALL
3716 WHERE orig_sys_document_ref = l_line_rec.orig_sys_document_ref
3717 AND orig_sys_line_ref = l_line_rec.orig_sys_line_ref
3718 AND orig_sys_shipment_ref = l_line_rec.orig_sys_shipment_ref;
3719
3720 IF l_debug_level > 0 THEN
3721 oe_debug_pub.add( 'UNIT SELLING PRICE/UNIT LIST PRICE'||l_line_rec.unit_selling_price||'/'||l_line_rec.unit_list_price, 5);
3722 END IF;
3723
3724 end if;
3725 --//added to handle the case when user will populate CPF
3726 END IF;
3727 END IF; --end of orig_sys_shipment_ref check
3728 EXCEPTION
3729 WHEN NO_DATA_FOUND THEN
3730 IF l_debug_level > 0 THEN
3731 oe_debug_pub.add( 'CALCULATE_PRICE_FLAG/UNIT SELLING PRICE/UNIT LIST PRICE NOT FOUND', 5) ;
3732 END IF;
3733 WHEN TOO_MANY_ROWS THEN
3734 IF l_debug_level > 0 THEN
3735 oe_debug_pub.add( 'TOO MANY ROWS ERROR: '||SQLERRM) ;
3736 END IF;
3737 WHEN OTHERS THEN
3738 IF l_debug_level > 0 THEN
3739 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
3740 END IF;
3741 END;
3742 END IF;
3743
3744 --added for BUG#7304558
3745
3746 /* if missing, get line level sold to org id from header
3747 this is necessary for the case where the sold_to_org
3748 was populated and the header-level sold_to_org_id was derived
3749 */
3750
3751
3752 if l_line_rec.sold_to_org_id = FND_API.G_MISS_NUM then
3753 IF l_debug_level > 0 THEN
3754 oe_debug_pub.add( 'line level sold to org id is g_miss_num, so it was not populated. defaulting to header level sold to org id' ) ;
3755 END IF;
3756 l_line_rec.sold_to_org_id := l_header_rec.sold_to_org_id;
3757 end if;
3758
3759
3760
3761 IF(l_line_count > 0) THEN
3762 IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110508' THEN
3763 IF (l_line_rec.orig_sys_line_ref = l_line_tbl(l_line_count).orig_sys_line_ref) AND
3764 (l_line_rec.orig_sys_shipment_ref = l_line_tbl(l_line_count).orig_sys_shipment_ref) AND
3765 (G_IMPORT_SHIPMENTS = 'YES') THEN
3766 --duplicate
3767 p_return_status := FND_API.G_RET_STS_ERROR;
3768 l_validate_only := FND_API.G_TRUE;
3769 IF l_debug_level > 0 THEN
3770 oe_debug_pub.add( 'YOU ARE ENTERING EITHER A DUPLICATE ORIG_SYS_LINE_REF OR ORIG_SYS_SHIPMENT_REF FOR THE SAME ORDER' ) ;
3771 END IF;
3772 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
3773 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_line_ref and orig_sys_shipment_ref');
3774 OE_MSG_PUB.Add;
3775 ELSIF
3776 (l_line_rec.orig_sys_line_ref = l_line_tbl(l_line_count).orig_sys_line_ref) AND
3777 (G_IMPORT_SHIPMENTS = 'NO') THEN
3778 p_return_status := FND_API.G_RET_STS_ERROR;
3779 l_validate_only := FND_API.G_TRUE;
3780 IF l_debug_level > 0 THEN
3781 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_LINE_REF FOR THE SAME ORDER' ) ;
3782 END IF;
3783 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
3784 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_line_ref');
3785 OE_MSG_PUB.Add;
3786 END IF;
3787 ELSIF
3788 OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110508' THEN
3789 IF (l_line_rec.orig_sys_line_ref = l_line_tbl(l_line_count).orig_sys_line_ref) THEN
3790 p_return_status := FND_API.G_RET_STS_ERROR;
3791 l_validate_only := FND_API.G_TRUE;
3792 IF l_debug_level > 0 THEN
3793 oe_debug_pub.add( 'YOU ARE ENTERING A DUPLICATE ORIG_SYS_LINE_REF FOR THESAME ORDER' ) ;
3794 END IF;
3795 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
3796 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_line_ref');
3797 OE_MSG_PUB.Add;
3798 END IF;
3799 END IF;
3800 END IF;
3801
3802 -- BUG 1282873
3803 IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL < '110509' THEN
3804 -- do not allow the override atp flag before Pack I
3805 l_line_rec.override_atp_date_code := NULL;
3806 END IF;
3807
3808 IF OE_CODE_CONTROL.GET_CODE_RELEASE_LEVEL >= '110510' THEN
3809 IF l_line_rec.order_source_id = OE_Acknowledgment_Pub.G_XML_ORDER_SOURCE_ID
3810 AND l_line_rec.xml_transaction_type_code = OE_Acknowledgment_Pub.G_TRANSACTION_CHO THEN
3811 l_line_rec.cso_response_flag := l_header_cso_response_flag;
3812 IF l_debug_level > 0 THEN
3813 oe_debug_pub.add( 'Populated line response flag with :' || l_header_cso_response_flag
3814 || 'for line ref : ' || l_line_rec.orig_sys_line_ref);
3815 END IF;
3816 END IF;
3817 END IF;
3818
3819 l_line_count := l_line_count + 1;
3820 if l_line_rec.service_reference_order = FND_API.G_MISS_CHAR then
3821 IF l_debug_level > 0 THEN
3822 oe_debug_pub.add( 'L_LINE_REC.SERVICE_REFERENCE_ORDER ' || ASCII ( L_LINE_REC.SERVICE_REFERENCE_ORDER ) ) ;
3823 END IF;
3824 end if;
3825 if l_line_val_rec.sold_to_org = FND_API.G_MISS_CHAR then
3826 IF l_debug_level > 0 THEN
3827 oe_debug_pub.add( 'L_LINE_VAL_REC.SOLD_TO_ORG ' || ASCII ( L_LINE_VAL_REC.SOLD_TO_ORG ) ) ;
3828 END IF;
3829 end if;
3830
3831 --populate l_line_rec.inventory_item_id with ccid if any of the
3832 --segments are passed instead of inventory_item_id
3833 IF l_line_rec.inventory_item_id = FND_API.G_MISS_NUM AND
3834 ((l_segment_array(1) IS NOT NULL) OR
3835 (l_segment_array(2) IS NOT NULL) OR
3836 (l_segment_array(3) IS NOT NULL) OR
3837 (l_segment_array(4) IS NOT NULL) OR
3838 (l_segment_array(5) IS NOT NULL) OR
3839 (l_segment_array(6) IS NOT NULL) OR
3840 (l_segment_array(7) IS NOT NULL) OR
3841 (l_segment_array(8) IS NOT NULL) OR
3842 (l_segment_array(9) IS NOT NULL) OR
3843 (l_segment_array(10) IS NOT NULL) OR
3844 (l_segment_array(11) IS NOT NULL) OR
3845 (l_segment_array(12) IS NOT NULL) OR
3846 (l_segment_array(13) IS NOT NULL) OR
3847 (l_segment_array(14) IS NOT NULL) OR
3848 (l_segment_array(15) IS NOT NULL) OR
3849 (l_segment_array(16) IS NOT NULL) OR
3850 (l_segment_array(17) IS NOT NULL) OR
3851 (l_segment_array(18) IS NOT NULL) OR
3852 (l_segment_array(19) IS NOT NULL) OR
3853 (l_segment_array(20) IS NOT NULL)) THEN
3854 IF l_debug_level > 0 THEN
3855 oe_debug_pub.add( 'INSIDE GET CCID ROUTINE' ) ;
3856 END IF;
3857 FND_FLEX_KEY_API.SET_SESSION_MODE('customer_data');
3858 IF l_debug_level > 0 THEN
3859 oe_debug_pub.add( 'AFTER CALL TO SET SESSION' ) ;
3860 END IF;
3861 l_flexfield := FND_FLEX_KEY_API.FIND_FLEXFIELD('INV', 'MSTK');
3862 IF l_debug_level > 0 THEN
3863 oe_debug_pub.add( 'AFTER FIND FLEXFIELD' ) ;
3864 END IF;
3865 l_structure.structure_number := 101;
3866 FND_FLEX_KEY_API.GET_SEGMENTS(l_flexfield, l_structure, TRUE, l_n_segments, l_segments);
3867 IF l_debug_level > 0 THEN
3868 oe_debug_pub.add( 'SEGMENTS ENABLED = '||L_N_SEGMENTS ) ;
3869
3870 oe_debug_pub.add( 'ORG_ID = '||L_LINE_REC.ORG_ID ) ;
3871
3872 oe_debug_pub.add( 'VALIDATION_ORG_ID = '||L_VALIDATION_ORG ) ;
3873
3874 oe_debug_pub.add( 'ARRAY1 = '||L_SEGMENT_ARRAY ( 1 ) ) ;
3875 END IF;
3876 IF FND_FLEX_EXT.GET_COMBINATION_ID('INV', 'MSTK', 101, SYSDATE, l_n_segments, l_segment_array, l_id, l_validation_org) THEN
3877 l_line_rec.inventory_item_id := l_id;
3878 IF l_debug_level > 0 THEN
3879 oe_debug_pub.add( 'GET CCID = '||L_LINE_REC.INVENTORY_ITEM_ID ) ;
3880 END IF;
3881 ELSE
3882 IF l_debug_level > 0 THEN
3883 oe_debug_pub.add( 'ERROR IN GETTING CCID' ) ;
3884 END IF;
3885 failure_message := fnd_flex_ext.get_message;
3886 OE_MSG_PUB.Add_TEXT(failure_message);
3887 p_return_status := FND_API.G_RET_STS_ERROR;
3888 l_validate_only := FND_API.G_TRUE;
3889 IF l_debug_level > 0 THEN
3890 oe_debug_pub.add('failure message = ' || substr ( failure_message , 1 , 50 ) ) ;
3891 oe_debug_pub.add('failure message = ' || substr ( failure_message , 51 , 50 ) ) ;
3892 oe_debug_pub.add('failure message = ' || substr ( failure_message , 101 , 50 ) ) ;
3893 END IF;
3894 END IF;
3895
3896 ELSIF l_line_rec.inventory_item_id <> FND_API.G_MISS_NUM AND
3897 ((l_segment_array(1) IS NOT NULL) OR
3898 (l_segment_array(2) IS NOT NULL) OR
3899 (l_segment_array(3) IS NOT NULL) OR
3900 (l_segment_array(4) IS NOT NULL) OR
3901 (l_segment_array(5) IS NOT NULL) OR
3902 (l_segment_array(6) IS NOT NULL) OR
3903 (l_segment_array(7) IS NOT NULL) OR
3904 (l_segment_array(8) IS NOT NULL) OR
3905 (l_segment_array(9) IS NOT NULL) OR
3906 (l_segment_array(10) IS NOT NULL) OR
3907 (l_segment_array(11) IS NOT NULL) OR
3908 (l_segment_array(12) IS NOT NULL) OR
3909 (l_segment_array(13) IS NOT NULL) OR
3910 (l_segment_array(14) IS NOT NULL) OR
3911 (l_segment_array(15) IS NOT NULL) OR
3912 (l_segment_array(16) IS NOT NULL) OR
3913 (l_segment_array(17) IS NOT NULL) OR
3914 (l_segment_array(18) IS NOT NULL) OR
3915 (l_segment_array(19) IS NOT NULL) OR
3916 (l_segment_array(20) IS NOT NULL)) THEN
3917 IF l_debug_level > 0 THEN
3918 oe_debug_pub.add( 'INSIDE ROUTINE WHERE BOTH ID AND SEG ARE POPULATED' ) ;
3919 END IF;
3920 l_line_rec.inventory_item_id := FND_API.G_MISS_NUM;
3921 FND_MESSAGE.SET_NAME('ONT','OE_OIM_INVALID_ITEM_ID');
3922 FND_MESSAGE.SET_TOKEN('ORDER_NO', l_orig_sys_document_ref);
3923 FND_MESSAGE.SET_TOKEN('ORDER_SOURCE', l_order_source_id);
3924 OE_MSG_PUB.Add;
3925 p_return_status := FND_API.G_RET_STS_ERROR;
3926 l_validate_only := FND_API.G_TRUE;
3927 IF l_debug_level > 0 THEN
3928 oe_debug_pub.add( 'CANNOT IMPORT ORDER AS BOTH INVENTORY_ITEM_ID AND INVENTORY_ITEM_SEGMENTS ARE POPULATED' ) ;
3929
3930 oe_debug_pub.add( 'ORDER NO: '||L_ORIG_SYS_DOCUMENT_REF ) ;
3931
3932 oe_debug_pub.add( 'ORDER SOURCE: '||L_ORDER_SOURCE_ID ) ;
3933 END IF;
3934
3935 END IF;
3936
3937 -- { Start of fix for bug 2664600
3938 -- Following code is commented out as the process order no longer error
3939 -- out if the subinventory is present and it is not able to reserve
3940 -- because of some error. To check the code here take out the previous version
3941
3942 -- { Start of the fix to NULL out the subinventory information if
3943 -- the item has lower level of details defined in mtl_system_items_b
3944 -- This is required as PO is now not going to send the reservation
3945 -- record and process order fails, for the mention condition. This
3946 -- Code will NULL out the subinventory, so the process order does
3947 -- not fail, and order import behaves in the same way(order imported
3948 -- even if the reservations fails).
3949 -- Fixed Bug# 2049995
3950
3951 -- End of the subinventory related change}
3952 -- End of fix for bug 2664600 }
3953
3954
3955 l_line_rec.service_reference_order :=
3956 nvl(l_line_rec.service_reference_order, FND_API.G_MISS_CHAR);
3957 l_line_rec.service_reference_line :=
3958 nvl(l_line_rec.service_reference_line, FND_API.G_MISS_CHAR);
3959
3960 -- Ignore the fulfilment_set name populated on the lines interface
3961 -- table if the operation is update
3962
3963 IF l_line_rec.operation = 'UPDATE' AND
3964 ((l_line_rec.fulfillment_set IS NOT NULL AND
3965 l_line_rec.fulfillment_set <> FND_API.G_MISS_CHAR) OR
3966 (l_line_rec.fulfillment_set_id IS NOT NULL AND
3967 l_line_rec.fulfillment_set_id <> FND_API.G_MISS_NUM)) AND
3968 OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' THEN
3969 oe_debug_pub.add('Ignoring : '|| l_line_rec.fulfillment_set, 1 ) ;
3970 l_line_rec.fulfillment_set := NULL;
3971 l_line_rec.fulfillment_set_id := NULL;
3972 FND_MESSAGE.Set_Name('ONT','ONT_FULSET_NAME_IGNORED');
3973 OE_MSG_PUB.Add;
3974 END IF;
3975
3976
3977
3978 -- Assign record to line table
3979 l_line_tbl (l_line_count) := l_line_rec;
3980 l_line_val_tbl(l_line_count) := l_line_val_rec;
3981
3982 --{ Start of the Add customer
3983 l_line_customer_tbl(l_line_count) := l_line_customer_rec;
3984 --End of the Add customer}
3985
3986 if l_line_val_tbl(l_line_count).sold_to_org = FND_API.G_MISS_CHAR then
3987 IF l_debug_level > 0 THEN
3988 oe_debug_pub.add( 'L_LINE_TBL.SERVICE_REFERENCE_ORDER ' || ASCII ( L_LINE_TBL ( L_LINE_COUNT ) .SERVICE_REFERENCE_ORDER ) ) ;
3989
3990 oe_debug_pub.add( 'L_LINE_VAL_TBL.SOLD_TO_ORG ' || ASCII ( L_LINE_VAL_TBL ( L_LINE_COUNT ) .SOLD_TO_ORG ) ) ;
3991 END IF;
3992 end if;
3993
3994 l_orig_sys_line_ref := l_line_rec.orig_sys_line_ref;
3995 l_orig_sys_shipment_ref := l_line_rec.orig_sys_shipment_ref;
3996
3997 IF l_debug_level > 0 THEN
3998 oe_debug_pub.add( 'ORIG SYS LINE REF ( '||L_LINE_COUNT||' ) : '|| L_LINE_TBL ( L_LINE_COUNT ) .ORIG_SYS_LINE_REF ) ;
3999
4000 oe_debug_pub.add( 'ORIG SYS SHIPMENT REF ( '||L_LINE_COUNT||' ) : '|| L_LINE_TBL ( L_LINE_COUNT ) .ORIG_SYS_SHIPMENT_REF ) ;
4001
4002 /* -----------------------------------------------------------
4003 Line Discounts/Price adjustments
4004 -----------------------------------------------------------
4005 */
4006 oe_debug_pub.add( 'BEFORE LINE ADJUSTMENTS LOOP' ) ;
4007 END IF;
4008
4009 OPEN l_line_adj_cursor;
4010 LOOP
4011 FETCH l_line_adj_cursor
4012 INTO l_line_adj_rec.orig_sys_discount_ref
4013 , l_line_adj_rec.change_request_code
4014 , l_line_adj_rec.list_header_id -- changed from discount_id
4015 , l_line_adj_rec.list_line_id -- changed from discount_line_id
4016 , l_line_adj_val_rec.discount
4017 , l_line_adj_rec.percent
4018 , l_line_adj_rec.automatic_flag
4019 , l_line_adj_rec.applied_flag
4020 , l_line_adj_rec.operand
4021 , l_line_adj_rec.arithmetic_operator
4022 , l_line_adj_rec.context
4023 , l_line_adj_rec.attribute1
4024 , l_line_adj_rec.attribute2
4025 , l_line_adj_rec.attribute3
4026 , l_line_adj_rec.attribute4
4027 , l_line_adj_rec.attribute5
4028 , l_line_adj_rec.attribute6
4029 , l_line_adj_rec.attribute7
4030 , l_line_adj_rec.attribute8
4031 , l_line_adj_rec.attribute9
4032 , l_line_adj_rec.attribute10
4033 , l_line_adj_rec.attribute11
4034 , l_line_adj_rec.attribute12
4035 , l_line_adj_rec.attribute13
4036 , l_line_adj_rec.attribute14
4037 , l_line_adj_rec.attribute15
4038 , l_line_adj_rec.request_id
4039 , l_line_adj_rec.operation
4040 , l_line_adj_rec.status_flag
4041 -- Price Adjustment related changes bug# 1220921 (Start)
4042 , l_line_adj_rec.AC_CONTEXT
4043 , l_line_adj_rec.AC_ATTRIBUTE1
4044 , l_line_adj_rec.AC_ATTRIBUTE2
4045 , l_line_adj_rec.AC_ATTRIBUTE3
4046 , l_line_adj_rec.AC_ATTRIBUTE4
4047 , l_line_adj_rec.AC_ATTRIBUTE5
4048 , l_line_adj_rec.AC_ATTRIBUTE6
4049 , l_line_adj_rec.AC_ATTRIBUTE7
4050 , l_line_adj_rec.AC_ATTRIBUTE8
4051 , l_line_adj_rec.AC_ATTRIBUTE9
4052 , l_line_adj_rec.AC_ATTRIBUTE10
4053 , l_line_adj_rec.AC_ATTRIBUTE11
4054 , l_line_adj_rec.AC_ATTRIBUTE12
4055 , l_line_adj_rec.AC_ATTRIBUTE13
4056 , l_line_adj_rec.AC_ATTRIBUTE14
4057 , l_line_adj_rec.AC_ATTRIBUTE15
4058 , l_line_adj_val_rec.LIST_NAME
4059 , l_line_adj_rec.LIST_LINE_TYPE_CODE
4060 , l_line_adj_rec.LIST_LINE_NO
4061 , l_line_adj_val_rec.VERSION_NO
4062 , l_line_adj_rec.INVOICED_FLAG
4063 , l_line_adj_rec.ESTIMATED_FLAG
4064 , l_line_adj_rec.INC_IN_SALES_PERFORMANCE
4065 , l_line_adj_rec.CHARGE_TYPE_CODE
4066 , l_line_adj_rec.CHARGE_SUBTYPE_CODE
4067 , l_line_adj_rec.CREDIT_OR_CHARGE_FLAG
4068 , l_line_adj_rec.INCLUDE_ON_RETURNS_FLAG
4069 , l_line_adj_rec.COST_ID
4070 , l_line_adj_rec.TAX_CODE
4071 , l_line_adj_rec.PARENT_ADJUSTMENT_ID
4072 , l_line_adj_rec.MODIFIER_MECHANISM_TYPE_CODE
4073 , l_line_adj_rec.MODIFIED_FROM
4074 , l_line_adj_rec.MODIFIED_TO
4075 , l_line_adj_rec.UPDATED_FLAG
4076 , l_line_adj_rec.UPDATE_ALLOWED
4077 , l_line_adj_rec.CHANGE_REASON_CODE
4078 , l_line_adj_rec.CHANGE_REASON_TEXT
4079 , l_line_adj_rec.PRICING_PHASE_ID
4080 , l_line_adj_rec.ADJUSTED_AMOUNT
4081 -- Price Adjustment related changes bug# 1220921 (End)
4082 ;
4083 EXIT WHEN l_line_adj_cursor%NOTFOUND;
4084
4085 l_line_adj_rec.line_index := l_line_count;
4086
4087 IF l_line_adj_rec.operation = 'INSERT' THEN
4088 l_line_adj_rec.operation := 'CREATE';
4089 END IF;
4090
4091 l_line_adj_count := l_line_adj_count + 1;
4092 l_line_adj_tbl (l_line_adj_count) := l_line_adj_rec;
4093 l_line_adj_val_tbl (l_line_adj_count) := l_line_adj_val_rec;
4094
4095 IF l_debug_level > 0 THEN
4096 oe_debug_pub.add( 'LINE ADJUSTMENT REF ( '||L_LINE_ADJ_COUNT||' ) : '|| L_LINE_ADJ_TBL ( L_LINE_ADJ_COUNT ) .ORIG_SYS_DISCOUNT_REF ) ;
4097 END IF;
4098
4099 END LOOP;
4100 CLOSE l_line_adj_cursor;
4101
4102
4103 /* -----------------------------------------------------------
4104 Line Price attribs
4105 -----------------------------------------------------------
4106 */
4107 IF l_debug_level > 0 THEN
4108 oe_debug_pub.add( 'BEFORE LINE ATTRIBS LOOP' ) ;
4109 END IF;
4110
4111 OPEN l_line_attrib_cursor;
4112 LOOP
4113 FETCH l_line_attrib_cursor
4114 INTO l_line_price_att_rec.creation_date
4115 , l_line_price_att_rec.created_by
4116 , l_line_price_att_rec.last_update_date
4117 , l_line_price_att_rec.last_updated_by
4118 , l_line_price_att_rec.last_update_login
4119 , l_line_price_att_rec.program_application_id
4120 , l_line_price_att_rec.program_id
4121 , l_line_price_att_rec.program_update_date
4122 , l_line_price_att_rec.request_id
4123 , l_line_price_att_rec.flex_title
4124 , l_line_price_att_rec.pricing_context
4125 , l_line_price_att_rec.pricing_attribute1
4126 , l_line_price_att_rec.pricing_attribute2
4127 , l_line_price_att_rec.pricing_attribute3
4128 , l_line_price_att_rec.pricing_attribute4
4129 , l_line_price_att_rec.pricing_attribute5
4130 , l_line_price_att_rec.pricing_attribute6
4131 , l_line_price_att_rec.pricing_attribute7
4132 , l_line_price_att_rec.pricing_attribute8
4133 , l_line_price_att_rec.pricing_attribute9
4134 , l_line_price_att_rec.pricing_attribute10
4135 , l_line_price_att_rec.pricing_attribute11
4136 , l_line_price_att_rec.pricing_attribute12
4137 , l_line_price_att_rec.pricing_attribute13
4138 , l_line_price_att_rec.pricing_attribute14
4139 , l_line_price_att_rec.pricing_attribute15
4140 , l_line_price_att_rec.pricing_attribute16
4141 , l_line_price_att_rec.pricing_attribute17
4142 , l_line_price_att_rec.pricing_attribute18
4143 , l_line_price_att_rec.pricing_attribute19
4144 , l_line_price_att_rec.pricing_attribute20
4145 , l_line_price_att_rec.pricing_attribute21
4146 , l_line_price_att_rec.pricing_attribute22
4147 , l_line_price_att_rec.pricing_attribute23
4148 , l_line_price_att_rec.pricing_attribute24
4149 , l_line_price_att_rec.pricing_attribute25
4150 , l_line_price_att_rec.pricing_attribute26
4151 , l_line_price_att_rec.pricing_attribute27
4152 , l_line_price_att_rec.pricing_attribute28
4153 , l_line_price_att_rec.pricing_attribute29
4154 , l_line_price_att_rec.pricing_attribute30
4155 , l_line_price_att_rec.pricing_attribute31
4156 , l_line_price_att_rec.pricing_attribute32
4157 , l_line_price_att_rec.pricing_attribute33
4158 , l_line_price_att_rec.pricing_attribute34
4159 , l_line_price_att_rec.pricing_attribute35
4160 , l_line_price_att_rec.pricing_attribute36
4161 , l_line_price_att_rec.pricing_attribute37
4162 , l_line_price_att_rec.pricing_attribute38
4163 , l_line_price_att_rec.pricing_attribute39
4164 , l_line_price_att_rec.pricing_attribute40
4165 , l_line_price_att_rec.pricing_attribute41
4166 , l_line_price_att_rec.pricing_attribute42
4167 , l_line_price_att_rec.pricing_attribute43
4168 , l_line_price_att_rec.pricing_attribute44
4169 , l_line_price_att_rec.pricing_attribute45
4170 , l_line_price_att_rec.pricing_attribute46
4171 , l_line_price_att_rec.pricing_attribute47
4172 , l_line_price_att_rec.pricing_attribute48
4173 , l_line_price_att_rec.pricing_attribute49
4174 , l_line_price_att_rec.pricing_attribute50
4175 , l_line_price_att_rec.pricing_attribute51
4176 , l_line_price_att_rec.pricing_attribute52
4177 , l_line_price_att_rec.pricing_attribute53
4178 , l_line_price_att_rec.pricing_attribute54
4179 , l_line_price_att_rec.pricing_attribute55
4180 , l_line_price_att_rec.pricing_attribute56
4181 , l_line_price_att_rec.pricing_attribute57
4182 , l_line_price_att_rec.pricing_attribute58
4183 , l_line_price_att_rec.pricing_attribute59
4184 , l_line_price_att_rec.pricing_attribute60
4185 , l_line_price_att_rec.pricing_attribute61
4186 , l_line_price_att_rec.pricing_attribute62
4187 , l_line_price_att_rec.pricing_attribute63
4188 , l_line_price_att_rec.pricing_attribute64
4189 , l_line_price_att_rec.pricing_attribute65
4190 , l_line_price_att_rec.pricing_attribute66
4191 , l_line_price_att_rec.pricing_attribute67
4192 , l_line_price_att_rec.pricing_attribute68
4193 , l_line_price_att_rec.pricing_attribute69
4194 , l_line_price_att_rec.pricing_attribute70
4195 , l_line_price_att_rec.pricing_attribute71
4196 , l_line_price_att_rec.pricing_attribute72
4197 , l_line_price_att_rec.pricing_attribute73
4198 , l_line_price_att_rec.pricing_attribute74
4199 , l_line_price_att_rec.pricing_attribute75
4200 , l_line_price_att_rec.pricing_attribute76
4201 , l_line_price_att_rec.pricing_attribute77
4202 , l_line_price_att_rec.pricing_attribute78
4203 , l_line_price_att_rec.pricing_attribute79
4204 , l_line_price_att_rec.pricing_attribute80
4205 , l_line_price_att_rec.pricing_attribute81
4206 , l_line_price_att_rec.pricing_attribute82
4207 , l_line_price_att_rec.pricing_attribute83
4208 , l_line_price_att_rec.pricing_attribute84
4209 , l_line_price_att_rec.pricing_attribute85
4210 , l_line_price_att_rec.pricing_attribute86
4211 , l_line_price_att_rec.pricing_attribute87
4212 , l_line_price_att_rec.pricing_attribute88
4213 , l_line_price_att_rec.pricing_attribute89
4214 , l_line_price_att_rec.pricing_attribute90
4215 , l_line_price_att_rec.pricing_attribute91
4216 , l_line_price_att_rec.pricing_attribute92
4217 , l_line_price_att_rec.pricing_attribute93
4218 , l_line_price_att_rec.pricing_attribute94
4219 , l_line_price_att_rec.pricing_attribute95
4220 , l_line_price_att_rec.pricing_attribute96
4221 , l_line_price_att_rec.pricing_attribute97
4222 , l_line_price_att_rec.pricing_attribute98
4223 , l_line_price_att_rec.pricing_attribute99
4224 , l_line_price_att_rec.pricing_attribute100
4225 , l_line_price_att_rec.context
4226 , l_line_price_att_rec.attribute1
4227 , l_line_price_att_rec.attribute2
4228 , l_line_price_att_rec.attribute3
4229 , l_line_price_att_rec.attribute4
4230 , l_line_price_att_rec.attribute5
4231 , l_line_price_att_rec.attribute6
4232 , l_line_price_att_rec.attribute7
4233 , l_line_price_att_rec.attribute8
4234 , l_line_price_att_rec.attribute9
4235 , l_line_price_att_rec.attribute10
4236 , l_line_price_att_rec.attribute11
4237 , l_line_price_att_rec.attribute12
4238 , l_line_price_att_rec.attribute13
4239 , l_line_price_att_rec.attribute14
4240 , l_line_price_att_rec.attribute15
4241 , l_line_price_att_rec.operation;
4242
4243 EXIT WHEN l_line_attrib_cursor%NOTFOUND;
4244 l_line_price_att_rec.line_index := l_line_count;
4245
4246 IF l_line_price_att_rec.operation = 'INSERT' THEN
4247 l_line_price_att_rec.operation := 'CREATE';
4248 END IF;
4249 --bug#5679839
4250 IF l_line_price_att_rec.flex_title = 'QP_ATTR_DEFNS_PRICING' or
4251 l_line_price_att_rec.flex_title = 'QP_ATTR_DEFNS_QUALIFIER' THEN
4252 null;
4253 ELSE
4254 l_line_price_att_rec.flex_title := 'QP_ATTR_DEFNS_PRICING';
4255 END IF;
4256 --bug#5679839
4257 /*
4258 IF ( l_line_att_count > 0) THEN
4259 IF(l_line_price_att_rec.orig_sys_line_ref = l_line_price_att_tbl(l_line_att_count).orig_sys_line_ref) AND
4260 (l_line_rec.orig_sys_line_ref = l_line_tbl(l_line_count).orig_sys_line_ref ) THEN
4261 --duplicate
4262 p_return_status := FND_API.G_RET_STS_ERROR;
4263 l_validate_only := FND_API.G_TRUE;
4264 oe_debug_pub.add('You are entering a duplicate orig_sys_att_refat the line level for the same order');
4265 FND_MESSAGE.SET_NAME('ONT','OE_OI_DUPLICATE_REF');
4266 FND_MESSAGE.SET_TOKEN('DUPLICATE_REF','orig_sys_price_att_ref');
4267 OE_MSG_PUB.Add;
4268 END IF;
4269 END IF;
4270 */
4271 l_line_att_count := l_line_att_count+1;
4272 l_line_price_att_tbl (l_line_att_count):=l_line_price_att_rec;
4273 -- oe_debug_pub.add('Line Price ATT ('||l_line_att_count||'):'||l_line_price_att_tbl(l_line_att_count).orig_sys_line_ref);
4274
4275 END LOOP;
4276 CLOSE l_line_attrib_cursor;
4277
4278 /* -----------------------------------------------------------
4279 Line Sales Credits
4280 -----------------------------------------------------------
4281 */
4282 IF l_debug_level > 0 THEN
4283 oe_debug_pub.add( 'BEFORE LINE SALES CREDITS LOOP' ) ;
4284 END IF;
4285
4286 OPEN l_line_scredit_cursor;
4287 LOOP
4288 FETCH l_line_scredit_cursor
4289 INTO l_line_scredit_rec.orig_sys_credit_ref
4290 , l_line_scredit_rec.change_request_code
4291 , l_line_scredit_rec.salesrep_id
4292 , l_line_scredit_val_rec.salesrep
4293 , l_line_scredit_rec.sales_credit_type_id
4294 , l_line_scredit_val_rec.sales_credit_type
4295 , l_line_scredit_rec.percent
4296 , l_line_scredit_rec.context
4297 , l_line_scredit_rec.attribute1
4298 , l_line_scredit_rec.attribute2
4299 , l_line_scredit_rec.attribute3
4300 , l_line_scredit_rec.attribute4
4301 , l_line_scredit_rec.attribute5
4302 , l_line_scredit_rec.attribute6
4303 , l_line_scredit_rec.attribute7
4304 , l_line_scredit_rec.attribute8
4305 , l_line_scredit_rec.attribute9
4306 , l_line_scredit_rec.attribute10
4307 , l_line_scredit_rec.attribute11
4308 , l_line_scredit_rec.attribute12
4309 , l_line_scredit_rec.attribute13
4310 , l_line_scredit_rec.attribute14
4311 , l_line_scredit_rec.attribute15
4312 , l_line_scredit_rec.operation
4313 , l_line_scredit_rec.status_flag
4314 , l_line_scredit_rec.change_reason
4315 , l_line_scredit_rec.change_comments
4316 ;
4317 EXIT WHEN l_line_scredit_cursor%NOTFOUND;
4318
4319 l_line_scredit_rec.line_index := l_line_count;
4320
4321 IF l_line_scredit_rec.operation = 'INSERT' THEN
4322 l_line_scredit_rec.operation := 'CREATE';
4323 END IF;
4324
4325 l_line_scredit_count := l_line_scredit_count + 1;
4326 l_line_scredit_tbl (l_line_scredit_count) := l_line_scredit_rec;
4327 l_line_scredit_val_tbl (l_line_scredit_count) := l_line_scredit_val_rec;
4328
4329 IF l_debug_level > 0 THEN
4330 oe_debug_pub.add( 'LINE SALESCREDITS REF ( '||L_LINE_SCREDIT_COUNT||' ) : '|| L_LINE_SCREDIT_TBL ( L_LINE_SCREDIT_COUNT ) .ORIG_SYS_CREDIT_REF ) ;
4331 END IF;
4332
4333 END LOOP;
4334 CLOSE l_line_scredit_cursor;
4335
4336
4337 /* -----------------------------------------------------------
4338 Multiple Payments: Line Payments
4339 -----------------------------------------------------------
4340 */
4341 IF l_debug_level > 0 THEN
4342 oe_debug_pub.add( 'BEFORE LINE PAYMENTS LOOP' ) ;
4343 END IF;
4344
4345 --l_line_payment_count := 0; Commented for the Bug3419970
4346
4347 OPEN l_line_payment_cursor;
4348 LOOP
4349 FETCH l_line_payment_cursor
4350 INTO l_line_payment_rec.orig_sys_payment_ref
4351 , l_line_payment_rec.change_request_code
4352 , l_line_payment_rec.payment_type_code
4353 , l_line_payment_val_rec.commitment
4354 , l_line_payment_rec.payment_trx_id
4355 , l_line_payment_val_rec.receipt_method
4356 , l_line_payment_rec.receipt_method_id
4357 , l_line_payment_rec.payment_collection_event
4358 , l_line_payment_rec.payment_set_id
4359 , l_line_payment_rec.prepaid_amount
4360 , l_line_payment_rec.credit_card_number
4361 , l_line_payment_rec.credit_card_holder_name
4362 , l_line_payment_rec.credit_card_expiration_date
4363 , l_line_payment_rec.credit_card_code
4364 , l_line_payment_rec.credit_card_approval_code
4365 , l_line_payment_rec.credit_card_approval_date
4366 , l_line_payment_rec.check_number
4367 , l_line_payment_rec.payment_amount
4368 , l_line_payment_val_rec.payment_percentage
4369 , l_line_payment_rec.creation_date
4370 , l_line_payment_rec.created_by
4371 , l_line_payment_rec.last_update_date
4372 , l_line_payment_rec.last_updated_by
4373 , l_line_payment_rec.last_update_login
4374 , l_line_payment_rec.program_application_id
4375 , l_line_payment_rec.program_id
4376 , l_line_payment_rec.program_update_date
4377 , l_line_payment_rec.context
4378 , l_line_payment_rec.attribute1
4379 , l_line_payment_rec.attribute2
4380 , l_line_payment_rec.attribute3
4381 , l_line_payment_rec.attribute4
4382 , l_line_payment_rec.attribute5
4383 , l_line_payment_rec.attribute6
4384 , l_line_payment_rec.attribute7
4385 , l_line_payment_rec.attribute8
4386 , l_line_payment_rec.attribute9
4387 , l_line_payment_rec.attribute10
4388 , l_line_payment_rec.attribute11
4389 , l_line_payment_rec.attribute12
4390 , l_line_payment_rec.attribute13
4391 , l_line_payment_rec.attribute14
4392 , l_line_payment_rec.attribute15
4393 , l_line_payment_rec.operation
4394 , l_line_payment_rec.status_flag
4395 , l_line_payment_rec.payment_number
4396 , l_line_payment_rec.header_id
4397 , l_line_payment_rec.line_id
4398 , l_line_payment_rec.trxn_extension_id
4399 , l_line_payment_rec.instrument_security_code --R12 CVV2
4400 ;
4401 EXIT WHEN l_line_payment_cursor%NOTFOUND;
4402
4403 l_line_payment_rec.line_index := l_line_count;
4404
4405 IF l_line_payment_rec.operation = 'INSERT' THEN
4406 l_line_payment_rec.operation := 'CREATE';
4407 END IF;
4408
4409 IF l_line_payment_rec.operation = 'CREATE' THEN
4410 -- set it to miss num, so payment number will be generated internally.
4411 l_line_payment_rec.payment_number := FND_API.G_MISS_NUM;
4412 END IF;
4413
4414 l_line_payment_count := l_line_payment_count + 1;
4415 l_line_payment_tbl (l_line_payment_count) := l_line_payment_rec;
4416 l_line_payment_val_tbl (l_line_payment_count) := l_line_payment_val_rec;
4417
4418 IF l_debug_level > 0 THEN
4419 oe_debug_pub.add( 'LINE PAYMENT REF ( '||L_LINE_payment_COUNT||' ) : '|| L_LINE_payment_TBL ( L_LINE_payment_COUNT ) .ORIG_SYS_PAYMENT_REF ) ;
4420 END IF;
4421
4422 END LOOP;
4423 CLOSE l_line_payment_cursor;
4424 -- end of multiple payments: fetching line payments.
4425
4426 /* -----------------------------------------------------------
4427 Line Lot Serials
4428 -----------------------------------------------------------
4429 */
4430 IF l_debug_level > 0 THEN
4431 oe_debug_pub.add( 'BEFORE LINE LOT SERIALS LOOP' ) ;
4432 END IF;
4433
4434 OPEN l_lot_serial_cursor;
4435 LOOP
4436 FETCH l_lot_serial_cursor
4437 INTO l_lot_serial_rec.orig_sys_lotserial_ref
4438 , l_lot_serial_rec.change_request_code
4439 , l_lot_serial_rec.lot_number
4440 -- , l_lot_serial_rec.sublot_number -- OPM 3322359 INVCONV
4441 , l_lot_serial_rec.from_serial_number
4442 , l_lot_serial_rec.to_serial_number
4443 , l_lot_serial_rec.quantity
4444 , l_lot_serial_rec.quantity2 -- OPM 3322359
4445 , l_lot_serial_rec.context
4446 , l_lot_serial_rec.attribute1
4447 , l_lot_serial_rec.attribute2
4448 , l_lot_serial_rec.attribute3
4449 , l_lot_serial_rec.attribute4
4450 , l_lot_serial_rec.attribute5
4451 , l_lot_serial_rec.attribute6
4452 , l_lot_serial_rec.attribute7
4453 , l_lot_serial_rec.attribute8
4454 , l_lot_serial_rec.attribute9
4455 , l_lot_serial_rec.attribute10
4456 , l_lot_serial_rec.attribute11
4457 , l_lot_serial_rec.attribute12
4458 , l_lot_serial_rec.attribute13
4459 , l_lot_serial_rec.attribute14
4460 , l_lot_serial_rec.attribute15
4461 , l_lot_serial_rec.operation
4462 , l_lot_serial_rec.status_flag
4463 ;
4464 EXIT WHEN l_lot_serial_cursor%NOTFOUND;
4465
4466 l_lot_serial_rec.line_index := l_line_count;
4467
4468 IF l_lot_serial_rec.operation = 'INSERT' THEN
4469 l_lot_serial_rec.operation := 'CREATE';
4470 END IF;
4471
4472 l_lot_serial_count := l_lot_serial_count + 1;
4473 l_lot_serial_tbl (l_lot_serial_count) := l_lot_serial_rec;
4474
4475 IF l_debug_level > 0 THEN
4476 oe_debug_pub.add( 'LINE LOT SERIAL REF ( '||L_LOT_SERIAL_COUNT||' ) : '|| L_LOT_SERIAL_TBL ( L_LOT_SERIAL_COUNT ) .ORIG_SYS_LOTSERIAL_REF ) ;
4477 END IF;
4478
4479 END LOOP;
4480 CLOSE l_lot_serial_cursor;
4481
4482
4483 /* -----------------------------------------------------------
4484 Line Reservation Details
4485 -----------------------------------------------------------
4486 */
4487 IF l_debug_level > 0 THEN
4488 oe_debug_pub.add( 'BEFORE LINE RESERVATIONS LOOP' ) ;
4489 END IF;
4490
4491 OPEN l_reservation_cursor;
4492 LOOP
4493 FETCH l_reservation_cursor
4494 INTO l_reservation_rec.orig_sys_reservation_ref
4495 , l_reservation_rec.revision
4496 , l_reservation_rec.lot_number_id
4497 , l_reservation_val_rec.lot_number
4498 , l_reservation_rec.subinventory_id
4499 , l_reservation_val_rec.subinventory_code
4500 , l_reservation_rec.locator_id
4501 , l_reservation_rec.quantity
4502 , l_reservation_rec.quantity2 -- INVCONV
4503 , l_reservation_rec.attribute_category
4504 , l_reservation_rec.attribute1
4505 , l_reservation_rec.attribute2
4506 , l_reservation_rec.attribute3
4507 , l_reservation_rec.attribute4
4508 , l_reservation_rec.attribute5
4509 , l_reservation_rec.attribute6
4510 , l_reservation_rec.attribute7
4511 , l_reservation_rec.attribute8
4512 , l_reservation_rec.attribute9
4513 , l_reservation_rec.attribute10
4514 , l_reservation_rec.attribute11
4515 , l_reservation_rec.attribute12
4516 , l_reservation_rec.attribute13
4517 , l_reservation_rec.attribute14
4518 , l_reservation_rec.attribute15
4519 , l_reservation_rec.operation
4520 ;
4521 EXIT WHEN l_reservation_cursor%NOTFOUND;
4522
4523 l_reservation_rec.line_index := l_line_count;
4524
4525 IF l_reservation_rec.operation = 'INSERT' THEN
4526 l_reservation_rec.operation := 'CREATE';
4527 END IF;
4528
4529 l_reservation_count := l_reservation_count + 1;
4530 l_reservation_tbl (l_reservation_count) := l_reservation_rec;
4531 l_reservation_val_tbl (l_reservation_count) := l_reservation_val_rec;
4532
4533 IF l_debug_level > 0 THEN
4534 oe_debug_pub.add( 'LINE RESERVATION REF ( '||L_RESERVATION_COUNT||' ) : '|| L_RESERVATION_TBL ( L_RESERVATION_COUNT ) .ORIG_SYS_RESERVATION_REF ) ;
4535 END IF;
4536
4537 END LOOP;
4538 CLOSE l_reservation_cursor;
4539
4540 --bsadri
4541 --l_action_request_count := 0;
4542
4543 OPEN l_action_request_line_cursor;
4544 LOOP
4545 FETCH l_action_request_line_cursor
4546 INTO l_action_rec.orig_sys_line_ref
4547 , l_action_rec.orig_sys_shipment_ref
4548 , l_action_rec.hold_id
4549 , l_action_rec.hold_type_code
4550 , l_action_rec.hold_type_id
4551 , l_action_rec.hold_until_date
4552 , l_action_rec.release_reason_code
4553 , l_action_rec.comments
4554 , l_action_rec.context
4555 , l_action_rec.attribute1
4556 , l_action_rec.attribute2
4557 , l_action_rec.attribute3
4558 , l_action_rec.attribute4
4559 , l_action_rec.attribute5
4560 , l_action_rec.attribute6
4561 , l_action_rec.attribute7
4562 , l_action_rec.attribute8
4563 , l_action_rec.attribute9
4564 , l_action_rec.attribute10
4565 , l_action_rec.attribute11
4566 , l_action_rec.attribute12
4567 , l_action_rec.attribute13
4568 , l_action_rec.attribute14
4569 , l_action_rec.attribute15
4570 , l_action_rec.operation_code
4571 , l_action_rec.fulfillment_set_name
4572 , l_action_rec.error_flag
4573 , l_action_rec.status_flag
4574 , l_action_rec.interface_status
4575 --myerrams,start, modified the fetch statement to fetch newly introduced
4576 --fields in oe_actions_interface for Customer Acceptance
4577 , l_action_rec.char_param1
4578 , l_action_rec.char_param2
4579 , l_action_rec.char_param3
4580 , l_action_rec.char_param4
4581 , l_action_rec.char_param5
4582 , l_action_rec.date_param1
4583 , l_action_rec.date_param2
4584 , l_action_rec.date_param3
4585 , l_action_rec.date_param4
4586 , l_action_rec.date_param5
4587 --myerrams, end
4588 ;
4589 EXIT WHEN l_action_request_line_cursor%NOTFOUND;
4590
4591 l_action_request_rec.request_type := l_action_rec.operation_code;
4592
4593 IF OE_CODE_CONTROL.CODE_RELEASE_LEVEL >= '110510' AND
4594 (l_action_rec.operation_code = OE_GLOBALS.G_ADD_FULFILLMENT_SET OR
4595 l_action_rec.operation_code = OE_GLOBALS.G_REMOVE_FULFILLMENT_SET) THEN
4596
4597 l_action_request_rec.param5 := l_action_rec.fulfillment_set_name;
4598 END IF;
4599
4600 l_action_request_rec.entity_code := OE_Globals.G_ENTITY_LINE;
4601 l_action_request_rec.entity_index := l_line_count;
4602
4603 IF l_debug_level > 0 THEN
4604 oe_debug_pub.add( 'ACTION CODE: '|| L_ACTION_REQUEST_REC.REQUEST_TYPE , 1 ) ;
4605
4606 oe_debug_pub.add( 'ENTITY CODE: '|| L_ACTION_REQUEST_REC.ENTITY_CODE , 1 ) ;
4607
4608 oe_debug_pub.add( 'ENTITY ID : '|| L_ACTION_REQUEST_REC.ENTITY_ID , 1 ) ;
4609 END IF;
4610
4611 IF l_action_rec.operation_code = OE_Globals.G_APPLY_HOLD THEN
4612 l_action_request_rec.param1 := l_action_rec.hold_id;
4613 l_action_request_rec.param2 := nvl(l_action_rec.hold_type_code,'O');
4614 l_action_request_rec.param3 := nvl(l_action_rec.hold_type_id,
4615 l_action_request_rec.entity_id);
4616 l_action_request_rec.param4 := l_action_rec.comments;
4617 l_action_request_rec.date_param1 := l_action_rec.hold_until_date;
4618 l_action_request_rec.param10 := l_action_rec.context;
4619 l_action_request_rec.param11 := l_action_rec.attribute1;
4620 l_action_request_rec.param12 := l_action_rec.attribute2;
4621 l_action_request_rec.param13 := l_action_rec.attribute3;
4622 l_action_request_rec.param14 := l_action_rec.attribute4;
4623 l_action_request_rec.param15 := l_action_rec.attribute5;
4624 l_action_request_rec.param16 := l_action_rec.attribute6;
4625 l_action_request_rec.param17 := l_action_rec.attribute7;
4626 l_action_request_rec.param18 := l_action_rec.attribute8;
4627 l_action_request_rec.param19 := l_action_rec.attribute9;
4628 l_action_request_rec.param20 := l_action_rec.attribute10;
4629 l_action_request_rec.param21 := l_action_rec.attribute11;
4630 l_action_request_rec.param22 := l_action_rec.attribute12;
4631 l_action_request_rec.param23 := l_action_rec.attribute13;
4632 l_action_request_rec.param24 := l_action_rec.attribute14;
4633 l_action_request_rec.param25 := l_action_rec.attribute15;
4634
4635 IF l_debug_level > 0 THEN
4636 oe_debug_pub.add( 'PARAM1/HOLD_ID: ' || L_ACTION_REQUEST_REC.PARAM1 , 1 ) ;
4637
4638 oe_debug_pub.add( 'PARAM2/HOLD_ENT_CD: '|| L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
4639
4640 oe_debug_pub.add( 'PARAM3/HOLD_ENT_ID: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
4641
4642 oe_debug_pub.add( 'PARAM4/HOLD_CMNTS: ' || L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
4643 END IF;
4644
4645 ELSIF l_action_rec.operation_code = OE_Globals.G_RELEASE_HOLD THEN
4646 l_action_request_rec.param1 := l_action_rec.hold_id;
4647 l_action_request_rec.param2 := nvl(l_action_rec.hold_type_code,'O');
4648 l_action_request_rec.param3 := nvl(l_action_rec.hold_type_id,
4649 l_action_request_rec.entity_id);
4650 l_action_request_rec.param4 := l_action_rec.release_reason_code;
4651 l_action_request_rec.param5 := l_action_rec.comments;
4652
4653 IF l_debug_level > 0 THEN
4654 oe_debug_pub.add( 'PARAM1/HOLD_ID: ' || L_ACTION_REQUEST_REC.PARAM1 , 1 ) ;
4655
4656 oe_debug_pub.add( 'PARAM2/HOLD_ENT_CD: '|| L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
4657
4658 oe_debug_pub.add( 'PARAM3/HOLD_ENT_ID: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
4659
4660 oe_debug_pub.add( 'PARAM4/REL_REASON: ' || L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
4661
4662 oe_debug_pub.add( 'PARAM5/REL_COMMNTS: '|| L_ACTION_REQUEST_REC.PARAM5 , 1 ) ;
4663 END IF;
4664
4665 --myerrams, introduced the following check for Customer Acceptance.
4666 ELSIF l_action_rec.operation_code = OE_Globals.G_ACCEPT_FULFILLMENT OR l_action_rec.operation_code = OE_Globals.G_REJECT_FULFILLMENT THEN
4667 IF (OE_SYS_PARAMETERS.VALUE('ENABLE_FULFILLMENT_ACCEPTANCE',p_org_id) = 'Y')
4668 THEN
4669 -- Customer Comments
4670 l_action_request_rec.param1 := l_action_rec.char_param1;
4671 -- Customer Signature
4672 l_action_request_rec.param2 := l_action_rec.char_param2;
4673 -- Reference Document
4674 l_action_request_rec.param3 := l_action_rec.char_param3;
4675 -- Implicit Acceptance Flag
4676 l_action_request_rec.param4 := l_action_rec.char_param4;
4677 -- Customer Signature Date
4678 l_action_request_rec.date_param1 := l_action_rec.date_param1;
4679
4680 --myerrams, Bug:4724191 l_action_request_rec.param5 := l_header_id_temp;
4681
4682 ELSE
4683 --display a message saying Customer Acceptance is not enabled
4684 FND_MESSAGE.Set_Name('ONT', 'ONT_CUST_ACC_DISABLED');
4685 OE_MSG_PUB.add;
4686 END IF;
4687 IF l_debug_level > 0 THEN
4688 oe_debug_pub.add( 'PARAM2/CUSTOMER_COMMENTS: ' || L_ACTION_REQUEST_REC.PARAM2 , 1 ) ;
4689
4690 oe_debug_pub.add( 'PARAM3/CUSTOMER_SIGNATURE: '|| L_ACTION_REQUEST_REC.PARAM3 , 1 ) ;
4691
4692 oe_debug_pub.add( 'PARAM4/REFERENCE_DOCUMENT: '|| L_ACTION_REQUEST_REC.PARAM4 , 1 ) ;
4693
4694 oe_debug_pub.add( 'PARAM5/IMPLICIT ACCEPTANCE FLAG: ' || L_ACTION_REQUEST_REC.PARAM5 , 1 ) ;
4695
4696 oe_debug_pub.add( 'DATE_PARAM1/SIGNATURE_DATE: '|| L_ACTION_REQUEST_REC.DATE_PARAM1 , 1 ) ;
4697 END IF;
4698 --myerrams, end
4699 END IF;
4700
4701 l_action_request_count := l_action_request_count+1;
4702 l_action_request_tbl(l_action_request_count) := l_action_request_rec;
4703
4704 END LOOP;
4705 CLOSE l_action_request_line_cursor;
4706 IF l_debug_level > 0 THEN
4707 oe_debug_pub.add( 'LINES L_ACTION_REQUEST_COUNT : '||L_ACTION_REQUEST_COUNT ) ;
4708 END IF;
4709
4710 END LOOP; /* Lines cursor */
4711 CLOSE l_line_cursor;
4712
4713 /* -----------------------------------------------------------
4714 Action Requests header
4715 -----------------------------------------------------------
4716 */
4717 IF l_debug_level > 0 THEN
4718 oe_debug_pub.add( 'BEFORE ACTION REQUEST HEADER LOOP' ) ;
4719 END IF;
4720
4721 --l_action_request_count := 0;
4722
4723
4724 /* -----------------------------------------------------------
4725 Call Order Import Pre-Process
4726 -----------------------------------------------------------
4727 */
4728 IF l_debug_level > 0 THEN
4729 oe_debug_pub.add( 'BEFORE CALLING ORDERIMPORT PRE-PROCESS' ) ;
4730 END IF;
4731
4732
4733 OE_ORDER_IMPORT_SPECIFIC_PVT.Pre_Process(
4734 p_x_header_rec => l_header_rec
4735 ,p_x_header_adj_tbl => l_header_adj_tbl
4736 ,p_x_header_price_att_tbl => l_header_price_att_tbl
4737 ,p_x_header_adj_att_tbl => l_header_adj_att_tbl
4738 ,p_x_header_adj_assoc_tbl => l_header_adj_assoc_tbl
4739 ,p_x_header_scredit_tbl => l_header_scredit_tbl
4740 ,p_x_header_payment_tbl => l_header_payment_tbl
4741 ,p_x_line_tbl => l_line_tbl
4742 ,p_x_line_adj_tbl => l_line_adj_tbl
4743 ,p_x_line_price_att_tbl => l_line_price_att_tbl
4744 ,p_x_line_adj_att_tbl => l_line_adj_att_tbl
4745 ,p_x_line_adj_assoc_tbl => l_line_adj_assoc_tbl
4746 ,p_x_line_scredit_tbl => l_line_scredit_tbl
4747 ,p_x_line_payment_tbl => l_line_payment_tbl
4748 ,p_x_lot_serial_tbl => l_lot_serial_tbl
4749 ,p_x_reservation_tbl => l_reservation_tbl
4750 ,p_x_action_request_tbl => l_action_request_tbl
4751 --put back the action table for booked order processing
4752 ,p_x_header_val_rec => l_header_val_rec
4753 ,p_x_header_adj_val_tbl => l_header_adj_val_tbl
4754 ,p_x_header_scredit_val_tbl => l_header_scredit_val_tbl
4755 ,p_x_header_payment_val_tbl => l_header_payment_val_tbl
4756 ,p_x_line_val_tbl => l_line_val_tbl
4757 ,p_x_line_adj_val_tbl => l_line_adj_val_tbl
4758 ,p_x_line_scredit_val_tbl => l_line_scredit_val_tbl
4759 ,p_x_line_payment_val_tbl => l_line_payment_val_tbl
4760 ,p_x_lot_serial_val_tbl => l_lot_serial_val_tbl
4761 ,p_x_reservation_val_tbl => l_reservation_val_tbl
4762
4763 --{ Start of the variable declaration for the add customer
4764 ,p_header_customer_rec => l_header_customer_rec
4765 ,p_line_customer_tbl => l_line_customer_tbl
4766 --End of the variable declaration for the add customer}
4767 ,p_return_status => l_return_status_oi_pre
4768
4769 );
4770
4771 /* -----------------------------------------------------------
4772 Set Return Status
4773 -----------------------------------------------------------
4774 */
4775 IF l_debug_level > 0 THEN
4776 oe_debug_pub.add( 'PRE-PROCESS RETURN STATUS: '||L_RETURN_STATUS_OI_PRE ) ;
4777 END IF;
4778
4779 IF l_return_status_oi_pre IN (FND_API.G_RET_STS_ERROR)
4780 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
4781 FND_API.G_RET_STS_UNEXP_ERROR)
4782 THEN p_return_status := FND_API.G_RET_STS_ERROR;
4783 ELSIF l_return_status_oi_pre IN (FND_API.G_RET_STS_UNEXP_ERROR)
4784 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
4785 FND_API.G_RET_STS_UNEXP_ERROR)
4786 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4787 END IF;
4788
4789 -- aksingh
4790 IF l_debug_level > 0 THEN
4791 oe_debug_pub.add( 'P_RETURN_STATUS AFTER PRE-PROCESS : '|| P_RETURN_STATUS ) ;
4792
4793 /* -----------------------------------------------------------
4794 Set control flags for Process_Order
4795 -----------------------------------------------------------
4796 */
4797 oe_debug_pub.add( 'BEFORE SETTING UP CONTROL FLAGS' ) ;
4798 END IF;
4799
4800 l_init_msg_list := FND_API.G_FALSE;
4801
4802 /* -----------------------------------------------------------
4803 If the Order Import validation failed, we still want the
4804 Process_Order to do the validation but not import.
4805 -----------------------------------------------------------
4806 */
4807 IF l_return_status_oi_pre <> FND_API.G_RET_STS_SUCCESS THEN
4808 -- aksingh
4809 IF l_debug_level > 0 THEN
4810 oe_debug_pub.add( 'PRE-PROCESS FAILED SETTTING L_VALIDATE_ONLY TO TRUE' ) ;
4811 END IF;
4812 l_validate_only := FND_API.G_TRUE;
4813 END IF;
4814
4815 /* -----------------------------------------------------------
4816 Set the api service level to Validate_only for Process_Order
4817 -----------------------------------------------------------
4818 */
4819 IF l_validate_only = FND_API.G_TRUE THEN
4820 -- aksingh
4821 IF l_debug_level > 0 THEN
4822 oe_debug_pub.add( 'SETTTING L_API_SERVICE_LEVEL TO VALIDATE_ONLY' ) ;
4823 END IF;
4824 l_api_service_level := OE_GLOBALS.G_VALIDATION_ONLY;
4825 -- Following is added to fix the bug# 1267887
4826 -- It will allow the processing of all the line if API is called in
4827 -- validate only mode
4828 -- l_control_rec.process_partial := TRUE;
4829 l_control_rec.controlled_operation := TRUE;
4830 END IF;
4831 l_control_rec.controlled_operation := TRUE; -- Bug #1913056
4832 l_control_rec.process_partial := TRUE;
4833
4834 -- bug 3636884, set require_reason to true
4835 l_control_rec.require_reason := TRUE;
4836
4837 /* -----------------------------------------------------------
4838 This procedure sets the global G_RESET_APPS_CONTEXT to FALSE
4839 by doing OE_STANDARD_WF.G_RESET_APPS_CONTEXT := FALSE
4840 -----------------------------------------------------------
4841 */
4842 OE_STANDARD_WF.Reset_Apps_Context_Off;
4843 -- Following line added to fix the code for bug 2756895
4844 OE_STANDARD_WF.Save_Messages_Off;
4845
4846
4847 /* -----------------------------------------------------------
4848 Call Process_Order
4849 -----------------------------------------------------------
4850 */
4851 IF l_debug_level > 0 THEN
4852 oe_debug_pub.add( 'BEFORE CALLING PROCESS_ORDER' ) ;
4853
4854 oe_debug_pub.add( 'BEFORE L_HEADER.OPERATION ' || L_HEADER_REC.OPERATION ) ;
4855 oe_debug_pub.add('trim data = '||l_rtrim_data);
4856 END IF;
4857
4858 If l_action_request_tbl.count > 0 then
4859 oe_debug_pub.add('action table count = '|| l_action_request_tbl.count);
4860 l_action_request_tbl_old := l_action_request_tbl;
4861 oe_debug_pub.add('action table old count = '|| l_action_request_tbl_old.count);
4862
4863 End If;
4864
4865 OE_GLOBALS.G_FAIL_ORDER_IMPORT := FALSE; /* Bug # 4036765 */
4866
4867 OE_GLOBALS.G_ORDER_IMPORT_CALL := TRUE; -- Bug 7367433
4868
4869 OE_Order_Grp.Process_Order(
4870 p_api_version_number => 1
4871 ,p_init_msg_list => l_init_msg_list
4872 ,p_validation_level => l_validation_level
4873 ,p_return_values => l_return_values
4874 ,p_commit => l_commit
4875 ,p_api_service_level => l_api_service_level
4876 ,p_control_rec => l_control_rec
4877 ,p_header_rec => l_header_rec
4878 ,p_header_adj_tbl => l_header_adj_tbl
4879 ,p_header_price_att_tbl => l_header_price_att_tbl
4880 ,p_header_adj_att_tbl => l_header_adj_att_tbl
4881 ,p_header_adj_assoc_tbl => l_header_adj_assoc_tbl
4882 ,p_header_Scredit_tbl => l_header_scredit_tbl
4883 ,p_header_payment_tbl => l_header_payment_tbl
4884 ,p_line_tbl => l_line_tbl
4885 ,p_line_adj_tbl => l_line_adj_tbl
4886 ,p_line_price_att_tbl => l_line_price_att_tbl
4887 ,p_line_adj_att_tbl => l_line_adj_att_tbl
4888 ,p_line_adj_assoc_tbl => l_line_adj_assoc_tbl
4889 ,p_line_scredit_tbl => l_line_scredit_tbl
4890 ,p_line_payment_tbl => l_line_payment_tbl
4891 ,p_lot_serial_tbl => l_lot_serial_tbl
4892 ,p_action_request_tbl => l_action_request_tbl_old
4893 ,p_header_val_rec => l_header_val_rec
4894 ,p_header_adj_val_tbl => l_header_adj_val_tbl
4895 ,p_header_Scredit_val_tbl => l_header_scredit_val_tbl
4896 ,p_header_payment_val_tbl => l_header_payment_val_tbl
4897 ,p_line_val_tbl => l_line_val_tbl
4898 ,p_line_adj_val_tbl => l_line_adj_val_tbl
4899 ,p_line_scredit_val_tbl => l_line_scredit_val_tbl
4900 ,p_line_payment_val_tbl => l_line_payment_val_tbl
4901 ,p_lot_serial_val_tbl => l_lot_serial_val_tbl
4902 ,p_old_header_rec => l_header_rec_old
4903 ,p_old_header_adj_tbl => l_header_adj_tbl_old
4904 ,p_old_header_price_att_tbl => l_header_price_att_tbl_old
4905 ,p_old_header_adj_att_tbl => l_header_adj_att_tbl_old
4906 ,p_old_header_adj_assoc_tbl => l_header_adj_assoc_tbl_old
4907 ,p_old_header_Scredit_tbl => l_header_scredit_tbl_old
4908 ,p_old_header_payment_tbl => l_header_payment_tbl_old
4909 ,p_old_line_tbl => l_line_tbl_old
4910 ,p_old_line_adj_tbl => l_line_adj_tbl_old
4911 ,p_old_line_price_att_tbl => l_line_price_att_tbl_old
4912 ,p_old_line_adj_att_tbl => l_line_adj_att_tbl_old
4913 ,p_old_line_adj_assoc_tbl => l_line_adj_assoc_tbl_old
4914 ,p_old_line_scredit_tbl => l_line_scredit_tbl_old
4915 ,p_old_line_payment_tbl => l_line_payment_tbl_old
4916 ,p_old_lot_serial_tbl => l_lot_serial_tbl_old
4917 ,p_old_header_val_rec => l_header_val_rec_old
4918 ,p_old_header_adj_val_tbl => l_header_adj_val_tbl_old
4919 ,p_old_header_Scredit_val_tbl => l_header_scredit_val_tbl_old
4920 ,p_old_header_payment_val_tbl => l_header_payment_val_tbl_old
4921 ,p_old_line_val_tbl => l_line_val_tbl_old
4922 ,p_old_line_adj_val_tbl => l_line_adj_val_tbl_old
4923 ,p_old_line_scredit_val_tbl => l_line_scredit_val_tbl_old
4924 ,p_old_line_payment_val_tbl => l_line_payment_val_tbl_old
4925 ,p_old_lot_serial_val_tbl => l_lot_serial_val_tbl_old
4926 ,p_rtrim_data => l_rtrim_data
4927 ,x_header_rec => l_header_rec_new
4928 ,x_header_adj_tbl => l_header_adj_tbl_new
4929 ,x_header_price_att_tbl => l_header_price_att_tbl_new
4930 ,x_header_adj_att_tbl => l_header_adj_att_tbl_new
4931 ,x_header_adj_assoc_tbl => l_header_adj_assoc_tbl_new
4932 ,x_header_scredit_tbl => l_header_scredit_tbl_new
4933 ,x_header_payment_tbl => l_header_payment_tbl_new
4934 ,x_line_tbl => l_line_tbl_new
4935 ,x_line_adj_tbl => l_line_adj_tbl_new
4936 ,x_line_price_att_tbl => l_line_price_att_tbl_new
4937 ,x_line_adj_att_tbl => l_line_adj_att_tbl_new
4938 ,x_line_adj_assoc_tbl => l_line_adj_assoc_tbl_new
4939 ,x_line_scredit_tbl => l_line_Scredit_tbl_new
4940 ,x_line_payment_tbl => l_line_payment_tbl_new
4941 ,x_lot_serial_tbl => l_lot_serial_tbl_new
4942 ,x_action_request_tbl => l_action_request_tbl
4943 ,x_header_val_rec => l_header_val_rec_new
4944 ,x_header_adj_val_tbl => l_header_adj_val_tbl_new
4945 ,x_header_Scredit_val_tbl => l_header_scredit_val_tbl_new
4946 ,x_header_payment_val_tbl => l_header_payment_val_tbl_new
4947 ,x_line_val_tbl => l_line_val_tbl_new
4948 ,x_line_adj_val_tbl => l_line_adj_val_tbl_new
4949 ,x_line_scredit_val_tbl => l_line_scredit_val_tbl_new
4950 ,x_line_payment_val_tbl => l_line_payment_val_tbl_new
4951 ,x_lot_serial_val_tbl => l_lot_serial_val_tbl_new
4952 ,x_return_status => l_return_status_po
4953 ,x_msg_count => p_msg_count
4954 ,x_msg_data => p_msg_data
4955 ,p_validate_desc_flex => p_validate_desc_flex --bug 4343612
4956 );
4957
4958 OE_GLOBALS.G_ORDER_IMPORT_CALL := FALSE; -- Bug 7367433
4959
4960 -- For Actions call is directly made to delayed request
4961 -- Process_Order_Action, which is changed from the calling
4962 -- process_order group appi twice
4963 -- once for normal processing and next for processing actions
4964 -- Right now call to the process order is commented down
4965 -- will be removed later
4966
4967 IF l_debug_level > 0 THEN
4968 oe_debug_pub.add( 'PROCESS_ORDER RETURN STATUS BEFORE ACTION : '||L_RETURN_STATUS_PO , 1 ) ;
4969 END IF;
4970
4971 /* Bug # 4036765 */
4972 IF OE_GLOBALS.G_FAIL_ORDER_IMPORT THEN
4973 IF l_debug_level > 0 THEN
4974 oe_debug_pub.add( 'G_FAIL_ORDER_IMPORT WAS SET TO TRUE. SETTING PROCESS_ORDER RETURN STATUS TO FAILURE' , 1 ) ;
4975 END IF;
4976 l_return_status_po := FND_API.G_RET_STS_ERROR;
4977 END IF;
4978
4979 IF l_return_status_po IN (FND_API.G_RET_STS_ERROR,
4980 FND_API.G_RET_STS_UNEXP_ERROR) THEN
4981 IF l_debug_level > 0 THEN
4982 oe_debug_pub.add( 'PROCESS ORDER FAILED. NO NEED TO CALL FOR ACTIONS' , 1 ) ;
4983 END IF;
4984 ELSE --{
4985 l_header_rec := OE_Order_Pub.G_MISS_HEADER_REC;
4986 l_header_rec := l_header_rec_new;
4987 END IF; -- return status error }
4988
4989 For i in 1..l_action_request_tbl.count
4990 Loop
4991 If l_action_request_tbl(i).return_status <>
4992 FND_API.G_RET_STS_SUCCESS
4993 Then
4994 IF l_debug_level > 0 THEN
4995 oe_debug_pub.add( 'FAILED TO PERFORM ACTION REQUEST ' || L_ACTION_REQUEST_TBL ( I ) .REQUEST_TYPE , 1 ) ;
4996 END IF;
4997 fnd_file.put_line(FND_FILE.OUTPUT,
4998 'Failed to perform Action Request ' ||
4999 l_action_request_tbl(i).request_type);
5000 End If;
5001 End Loop;
5002
5003 IF l_debug_level > 0 THEN
5004 oe_debug_pub.add( 'AFTER CALLING PROCESS_ORDER' , 3 ) ;
5005
5006 /* -----------------------------------------------------------
5007 Set Return Status
5008 -----------------------------------------------------------
5009 */
5010 oe_debug_pub.add( 'PROCESS_ORDER RETURN STATUS: '||L_RETURN_STATUS_PO , 3 ) ;
5011 END IF;
5012
5013 IF l_return_status_po IN (FND_API.G_RET_STS_ERROR)
5014 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5015 FND_API.G_RET_STS_UNEXP_ERROR)
5016 THEN p_return_status := FND_API.G_RET_STS_ERROR;
5017 ELSIF l_return_status_po IN (FND_API.G_RET_STS_UNEXP_ERROR)
5018 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5019 FND_API.G_RET_STS_UNEXP_ERROR)
5020 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5021 END IF;
5022
5023
5024 -- aksingh
5025 IF l_debug_level > 0 THEN
5026 oe_debug_pub.add( 'P_RETURN_STATUS '||P_RETURN_STATUS , 3 ) ;
5027 END IF;
5028
5029 /* -----------------------------------------------------------
5030 Check Process_Order Results
5031 -----------------------------------------------------------
5032 */
5033 IF p_msg_count = 0 THEN
5034 IF l_return_status_po = FND_API.G_RET_STS_ERROR THEN
5035 IF l_debug_level > 0 THEN
5036 oe_debug_pub.add( 'PROCESS ORDER FAILED WITH ERRORS BUT RETURNED NO MESSAGE' ) ;
5037 END IF;
5038 FND_MESSAGE.SET_NAME('ONT','OE_OI_PO_ERROR');
5039 OE_MSG_PUB.Add;
5040 ELSIF l_return_status_po = FND_API.G_RET_STS_UNEXP_ERROR THEN
5041 IF l_debug_level > 0 THEN
5042 oe_debug_pub.add( 'PROCESS ORDER FAILED WITH UNEXPECTED ERRORS BUT RETURNED NO MESSAGE... ' ) ;
5043 END IF;
5044 FND_MESSAGE.SET_NAME('ONT','OE_OI_PO_UNEXP_ERROR');
5045 OE_MSG_PUB.Add;
5046 END IF;
5047 END IF;
5048
5049 IF l_header_rec.operation IN ('INSERT', 'CREATE') AND
5050 l_return_status_po = FND_API.G_RET_STS_SUCCESS
5051 THEN
5052 IF l_debug_level > 0 THEN
5053 oe_debug_pub.add( 'HEADER ID GENERATED: '|| TO_CHAR ( L_HEADER_REC_NEW.HEADER_ID ) ) ;
5054
5055 oe_debug_pub.add( 'ORDER NUMBER GENERATED: '|| TO_CHAR ( L_HEADER_REC_NEW.ORDER_NUMBER ) ) ;
5056 END IF;
5057 END IF;
5058
5059
5060 /* -----------------------------------------------------------
5061 Call Order Import Post-Process
5062 -----------------------------------------------------------
5063 */
5064 IF l_return_status_po = FND_API.G_RET_STS_SUCCESS THEN
5065 IF l_debug_level > 0 THEN
5066 oe_debug_pub.add( 'BEFORE CALLING ORDERIMPORT POST-PROCESS' ) ;
5067 END IF;
5068
5069 OE_ORDER_IMPORT_SPECIFIC_PVT.Post_Process(
5070 p_x_header_rec => l_header_rec_new
5071 ,p_x_header_adj_tbl => l_header_adj_tbl_new
5072 ,p_x_header_price_att_tbl => l_header_price_att_tbl_new
5073 ,p_x_header_adj_att_tbl => l_header_adj_att_tbl_new
5074 ,p_x_header_adj_assoc_tbl => l_header_adj_assoc_tbl_new
5075 ,p_x_header_scredit_tbl => l_header_scredit_tbl_new
5076 ,p_x_line_tbl => l_line_tbl_new
5077 ,p_x_line_adj_tbl => l_line_adj_tbl_new
5078 ,p_x_line_price_att_tbl => l_line_price_att_tbl_new
5079 ,p_x_line_adj_att_tbl => l_line_adj_att_tbl_new
5080 ,p_x_line_adj_assoc_tbl => l_line_adj_assoc_tbl_new
5081 ,p_x_line_scredit_tbl => l_line_scredit_tbl_new
5082 ,p_x_lot_serial_tbl => l_lot_serial_tbl_new
5083
5084 ,p_x_header_val_rec => l_header_val_rec_new
5085 ,p_x_header_adj_val_tbl => l_header_adj_val_tbl_new
5086 ,p_x_header_scredit_val_tbl => l_header_scredit_val_tbl_new
5087 ,p_x_line_val_tbl => l_line_val_tbl_new
5088 ,p_x_line_adj_val_tbl => l_line_adj_val_tbl_new
5089 ,p_x_line_scredit_val_tbl => l_line_scredit_val_tbl_new
5090 ,p_x_lot_serial_val_tbl => l_lot_serial_val_tbl_new
5091
5092 ,p_x_header_rec_old => l_header_rec
5093 ,p_x_header_adj_tbl_old => l_header_adj_tbl
5094 ,p_x_header_scredit_tbl_old => l_header_scredit_tbl
5095 ,p_x_line_tbl_old => l_line_tbl
5096 ,p_x_line_adj_tbl_old => l_line_adj_tbl
5097 ,p_x_line_price_att_tbl_old => l_line_price_att_tbl
5098 ,p_x_line_scredit_tbl_old => l_line_scredit_tbl
5099 ,p_x_lot_serial_tbl_old => l_lot_serial_tbl
5100
5101 ,p_x_header_val_rec_old => l_header_val_rec
5102 ,p_x_header_adj_val_tbl_old => l_header_adj_val_tbl
5103 ,p_x_header_scredit_val_tbl_old => l_header_scredit_val_tbl
5104 ,p_x_line_val_tbl_old => l_line_val_tbl
5105 ,p_x_line_adj_val_tbl_old => l_line_adj_val_tbl
5106 ,p_x_line_scredit_val_tbl_old => l_line_scredit_val_tbl
5107 ,p_x_lot_serial_val_tbl_old => l_lot_serial_val_tbl
5108
5109 ,p_x_reservation_tbl => l_reservation_tbl
5110 ,p_x_reservation_val_tbl => l_reservation_val_tbl
5111
5112 ,p_return_status => l_return_status_oi_pst
5113 );
5114 END IF;
5115
5116
5117 /* -----------------------------------------------------------
5118 Set Return Status
5119 -----------------------------------------------------------
5120 */
5121 IF l_debug_level > 0 THEN
5122 oe_debug_pub.add( 'POST-PROCESS RETURN STATUS: '||L_RETURN_STATUS_OI_PST ) ;
5123 END IF;
5124
5125 IF l_return_status_oi_pst IN (FND_API.G_RET_STS_ERROR)
5126 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5127 FND_API.G_RET_STS_UNEXP_ERROR)
5128 THEN p_return_status := FND_API.G_RET_STS_ERROR;
5129 ELSIF l_return_status_oi_pst IN (FND_API.G_RET_STS_UNEXP_ERROR)
5130 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5131 FND_API.G_RET_STS_UNEXP_ERROR)
5132 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5133 END IF;
5134
5135
5136 --END LOOP; /* Headers cursor */
5137 CLOSE l_header_cursor;
5138
5139 /* -----------------------------------------------------------
5140 Delete order from interface tables
5141 -----------------------------------------------------------
5142 */
5143 -- aksingh
5144 IF l_debug_level > 0 THEN
5145 oe_debug_pub.add('l_validate_only '||l_validate_only ) ;
5146 oe_debug_pub.add('p_return_status '||p_return_status ) ;
5147 END IF;
5148
5149 -- aksingh IF p_validate_only = FND_API.G_FALSE AND
5150 IF l_validate_only = FND_API.G_FALSE AND
5151 p_return_status = FND_API.G_RET_STS_SUCCESS /* S=Success */
5152 THEN
5153 l_delete_flag := 'Y';
5154 ELSE
5155 l_delete_flag := 'N';
5156 END IF;
5157
5158 IF l_debug_level > 0 THEN
5159 oe_debug_pub.add( 'DELETE FLAG '||L_DELETE_FLAG ) ;
5160 END IF;
5161
5162 IF l_delete_flag = 'Y' THEN
5163
5164 IF l_debug_level > 0 THEN
5165 oe_debug_pub.add( 'BEFORE DELETING ORDER FROM INTERFACE TABLES' ) ;
5166 END IF;
5167
5168 OE_ORDER_IMPORT_UTIL_PVT.Delete_Order (
5169 p_request_id => l_request_id,
5170 p_order_source_id => l_order_source_id,
5171 p_orig_sys_document_ref => l_orig_sys_document_ref,
5172 p_sold_to_org_id => l_sold_to_org_id,
5173 p_sold_to_org => l_sold_to_org,
5174 p_change_sequence => l_change_sequence,
5175 p_return_status => l_return_status_del_ord
5176 );
5177
5178
5179 IF l_debug_level > 0 THEN
5180 oe_debug_pub.add( 'BEFORE CALLING DELETE OF CUSTOMER INFO' ) ;
5181 END IF;
5182 OE_INLINE_CUSTOMER_PUB.Delete_Customer_Info(
5183 p_header_customer_rec => l_header_customer_rec,
5184 p_line_customer_tbl => l_line_customer_tbl
5185 );
5186 IF l_debug_level > 0 THEN
5187 oe_debug_pub.add( 'AFTER CALLING DELETE OF CUSTOMER INFO' ) ;
5188
5189
5190 /* -----------------------------------------------------------
5191 Set Return Status
5192 -----------------------------------------------------------
5193 */
5194 oe_debug_pub.add( 'DELETE ORDER RETURN STATUS: '||L_RETURN_STATUS_DEL_ORD ) ;
5195 END IF;
5196
5197 IF l_return_status_del_ord IN (FND_API.G_RET_STS_ERROR)
5198 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
5199 THEN p_return_status := FND_API.G_RET_STS_ERROR;
5200 ELSIF l_return_status_del_ord IN (FND_API.G_RET_STS_UNEXP_ERROR)
5201 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5202 FND_API.G_RET_STS_UNEXP_ERROR)
5203 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5204 END IF;
5205
5206 END IF; /* l_delete_flag = 'Y' */
5207
5208
5209 /* -----------------------------------------------------------
5210 Commit or rollback the transaction
5211 -----------------------------------------------------------
5212 */
5213 IF l_debug_level > 0 THEN
5214 oe_debug_pub.add( 'BEFORE COMMIT OR ROLLBACK' ) ;
5215 END IF;
5216
5217 IF l_validate_only = FND_API.G_TRUE
5218 OR p_return_status in (FND_API.G_RET_STS_ERROR, -- E:Expected error
5219 FND_API.G_RET_STS_UNEXP_ERROR) -- U:Unexpected error
5220 THEN
5221 l_commit_flag := 'N';
5222 ELSE
5223 l_commit_flag := 'Y';
5224 END IF;
5225
5226 IF l_debug_level > 0 THEN
5227 oe_debug_pub.add( 'COMMIT FLAG '||L_COMMIT_FLAG ) ;
5228 END IF;
5229
5230 IF l_commit_flag = 'Y' THEN
5231 COMMIT;
5232 -- For Bug 7367433
5233 -- From Order Import we will make a call to Verfify Payment, only after committing the data.
5234 -- The call to Verify Payment from Booking code is suppressed for Order Import flow.
5235 -- This change is only for Verify Payment call that is triggered as part of Booking.
5236 IF nvl(OE_GLOBALS.G_PAYMENT_PROCESSED, 'N') = 'O' THEN
5237 BEGIN
5238 SAVEPOINT VERIFY_PAYMENT;
5239
5240 if l_debug_level > 5 then
5241 oe_debug_pub.add('Calling Verify Payment from Order Import, after committing data', 5);
5242 end if;
5243 OE_Verify_Payment_PUB.Verify_Payment
5244 ( p_header_id => l_header_rec_new.header_id
5245 , p_calling_action => 'BOOKING'
5246 , p_msg_count => l_msg_count_vp
5247 , p_msg_data => l_msg_data_vp
5248 , p_return_status => l_return_status
5249 );
5250 EXCEPTION WHEN OTHERS THEN
5251 l_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5252 END;
5253
5254 if l_debug_level > 0 then
5255 oe_debug_pub.add('After Verify Payment from Order Import Status : ' || l_return_status, 5);
5256 end if;
5257
5258 IF l_return_status = FND_API.G_RET_STS_ERROR OR l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5259 ROLLBACK TO SAVEPOINT VERIFY_PAYMENT;
5260 END IF;
5261 END IF;
5262 -- End of Bug 7367433
5263
5264 ELSE
5265 /* Code changes for the bug 6378240 */
5266 oe_schedule_util.call_mrp_rollback(x_return_status => l_return_status);
5267
5268 ROLLBACK;
5269 END IF;
5270
5271 /* -----------------------------------------------------------
5272 Update error_flag in interface tables
5273 -----------------------------------------------------------
5274 */
5275 IF p_return_status IN (FND_API.G_RET_STS_ERROR,
5276 FND_API.G_RET_STS_UNEXP_ERROR)
5277 THEN
5278 BEGIN
5279 BEGIN
5280 IF l_debug_level > 0 THEN
5281 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR HEADER' ) ;
5282 END IF;
5283
5284 UPDATE oe_headers_interface
5285 SET error_flag = 'Y', xml_message_id = nvl(xml_message_id, l_header_rec.xml_message_id)
5286 WHERE order_source_id = l_order_source_id
5287 AND orig_sys_document_ref = l_orig_sys_document_ref
5288 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
5289 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
5290 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
5291 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
5292 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5293 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5294 AND nvl( request_id, FND_API.G_MISS_NUM)
5295 = nvl(l_request_id, FND_API.G_MISS_NUM);
5296 EXCEPTION
5297 WHEN OTHERS THEN
5298 IF l_debug_level > 0 THEN
5299 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5300 END IF;
5301 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5302 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5303 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5304 END IF;
5305 END;
5306 /* Fixing Bug #2026177 and processing the out nocopy table from process order */
5307
5308 BEGIN
5309 FOR I in 1..l_header_adj_tbl_new.count
5310 LOOP
5311 IF l_debug_level > 0 THEN
5312 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR HEADER PRICE ADJUSTMENTS' ) ;
5313 END IF;
5314 IF l_header_adj_tbl_new(I).return_status IN (
5315 FND_API.G_RET_STS_ERROR,
5316 FND_API.G_RET_STS_UNEXP_ERROR)
5317 THEN
5318 BEGIN
5319 UPDATE oe_price_adjs_interface
5320 SET error_flag = 'Y'
5321 WHERE order_source_id = l_order_source_id
5322 AND orig_sys_document_ref = l_orig_sys_document_ref
5323 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
5324 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
5325 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
5326 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
5327 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5328 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5329 AND nvl( request_id, FND_API.G_MISS_NUM)
5330 = nvl(l_request_id, FND_API.G_MISS_NUM)
5331 AND nvl(orig_sys_discount_ref, FND_API.G_MISS_CHAR)
5332 = nvl(l_header_adj_tbl_new(I).orig_sys_discount_ref,
5333 FND_API.G_MISS_CHAR);
5334 EXCEPTION
5335 WHEN OTHERS THEN
5336 IF l_debug_level > 0 THEN
5337 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5338 END IF;
5339 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5340 THEN
5341 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5342 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5343 END IF;
5344 END;
5345 END IF;
5346 END LOOP;
5347 END;
5348
5349 /* 1433292 */
5350 BEGIN
5351 FOR I in 1..l_header_price_att_tbl_new.count
5352 LOOP
5353 IF l_debug_level > 0 THEN
5354 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR HEADER PRICE ATT' ) ;
5355 END IF;
5356 IF l_header_price_att_tbl_new(I).return_status IN (
5357 FND_API.G_RET_STS_ERROR,
5358 FND_API.G_RET_STS_UNEXP_ERROR)
5359 THEN
5360 BEGIN
5361 UPDATE oe_price_atts_interface
5362 SET error_flag = 'Y'
5363 WHERE order_source_id = l_order_source_id
5364 AND orig_sys_document_ref = l_orig_sys_document_ref
5365 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
5366 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
5367 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
5368 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
5369 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5370 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5371 AND nvl( request_id, FND_API.G_MISS_NUM)
5372 = nvl(l_request_id, FND_API.G_MISS_NUM);
5373 EXCEPTION
5374 WHEN OTHERS THEN
5375 IF l_debug_level > 0 THEN
5376 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5377 END IF;
5378 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5379 THEN
5380 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5381 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5382 END IF;
5383 END;
5384 END IF;
5385 END LOOP;
5386 END;
5387 BEGIN
5388 FOR I in 1..l_header_scredit_tbl_new.count
5389 LOOP
5390 IF l_debug_level > 0 THEN
5391 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR HEADER SALES CREDITS' ) ;
5392 END IF;
5393 IF l_header_scredit_tbl_new(I).return_status IN (
5394 FND_API.G_RET_STS_ERROR,
5395 FND_API.G_RET_STS_UNEXP_ERROR)
5396 THEN
5397 BEGIN
5398 UPDATE oe_credits_interface
5399 SET error_flag = 'Y'
5400 WHERE order_source_id = l_order_source_id
5401 AND orig_sys_document_ref = l_orig_sys_document_ref
5402 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
5403 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
5404 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
5405 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
5406 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5407 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5408 AND nvl( request_id, FND_API.G_MISS_NUM)
5409 = nvl(l_request_id, FND_API.G_MISS_NUM)
5410 AND nvl(orig_sys_credit_ref, FND_API.G_MISS_CHAR)
5411 = nvl(l_header_scredit_tbl_new(I).orig_sys_credit_ref,
5412 FND_API.G_MISS_CHAR);
5413 EXCEPTION
5414 WHEN OTHERS THEN
5415 IF l_debug_level > 0 THEN
5416 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5417 END IF;
5418 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5419 THEN
5420 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5421 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5422 END IF;
5423 END;
5424 END IF;
5425 END LOOP;
5426 END;
5427
5428 -- multiple payments: header payments start...
5429
5430 BEGIN
5431 FOR I in 1..l_header_payment_tbl_new.count
5432 LOOP
5433 IF l_debug_level > 0 THEN
5434 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR HEADER PAYMENTS' ) ;
5435 END IF;
5436 IF l_header_payment_tbl_new(I).return_status IN (
5437 FND_API.G_RET_STS_ERROR,
5438 FND_API.G_RET_STS_UNEXP_ERROR)
5439 THEN
5440 BEGIN
5441 UPDATE oe_payments_interface
5442 SET error_flag = 'Y'
5443 WHERE order_source_id = l_order_source_id
5444 AND orig_sys_document_ref = l_orig_sys_document_ref
5445 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5446 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5447 AND nvl( request_id, FND_API.G_MISS_NUM)
5448 = nvl(l_request_id, FND_API.G_MISS_NUM)
5449 AND nvl(orig_sys_payment_ref, FND_API.G_MISS_CHAR)
5450 = nvl(l_header_payment_tbl_new(I).orig_sys_payment_ref,
5451 FND_API.G_MISS_CHAR);
5452 EXCEPTION
5453 WHEN OTHERS THEN
5454 IF l_debug_level > 0 THEN
5455 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5456 END IF;
5457 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5458 THEN
5459 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5460 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5461 END IF;
5462 END;
5463 END IF;
5464 END LOOP;
5465 END;
5466 -- end of multiple payments: header payments.
5467
5468
5469 BEGIN
5470 FOR I in 1..l_line_tbl_new.count
5471 LOOP
5472 IF l_debug_level > 0 THEN
5473 oe_debug_pub.add( 'BEFORE UPDATING ERROR FLAG FOR LINES' ) ;
5474 END IF;
5475 IF l_line_tbl_new(I).return_status IN (
5476 FND_API.G_RET_STS_ERROR,
5477 FND_API.G_RET_STS_UNEXP_ERROR)
5478 THEN
5479 BEGIN
5480 UPDATE oe_lines_interface
5481 SET error_flag = 'Y'
5482 WHERE order_source_id = l_order_source_id
5483 AND orig_sys_document_ref = l_orig_sys_document_ref
5484 AND nvl(sold_to_org_id, FND_API.G_MISS_NUM)
5485 = nvl(l_sold_to_org_id, FND_API.G_MISS_NUM)
5486 AND nvl(sold_to_org, FND_API.G_MISS_CHAR)
5487 = nvl(l_sold_to_org, FND_API.G_MISS_CHAR)
5488 AND nvl( change_sequence, FND_API.G_MISS_CHAR)
5489 = nvl(l_change_sequence, FND_API.G_MISS_CHAR)
5490 AND nvl( request_id, FND_API.G_MISS_NUM)
5491 = nvl(l_request_id, FND_API.G_MISS_NUM)
5492 AND nvl(orig_sys_line_ref, FND_API.G_MISS_CHAR)
5493 = nvl(l_line_tbl_new(I).orig_sys_line_ref, FND_API.G_MISS_CHAR)
5494 AND nvl(orig_sys_shipment_ref, FND_API.G_MISS_CHAR)
5495 = nvl(l_line_tbl_new(I).orig_sys_shipment_ref,FND_API.G_MISS_CHAR);
5496 EXCEPTION
5497 WHEN OTHERS THEN
5498 IF l_debug_level > 0 THEN
5499 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5500 END IF;
5501 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR)
5502 THEN
5503 l_return_status_upd_err := FND_API.G_RET_STS_UNEXP_ERROR;
5504 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5505 END IF;
5506 END;
5507 END IF;
5508 END LOOP;
5509 END;
5510 /*
5511 l_tbl_index := oe_msg_pub.g_msg_tbl.FIRST;
5512 LOOP
5513 IF l_debug_level > 0 THEN
5514 oe_debug_pub.add( 'L_TBL_INDEX = '||L_TBL_INDEX ) ;
5515 END IF;
5516 If oe_msg_pub.g_msg_tbl(l_tbl_index).entity_code = 'OI_INL_CUSTSUCC'
5517 Then
5518 IF l_debug_level > 0 THEN
5519 oe_debug_pub.add( 'BEFORE DELETING OI_INL_ADDCUST MSG' ) ;
5520 END IF;
5521 --oe_msg_pub.g_msg_tbl(l_tbl_index).message := Null;
5522 --oe_msg_pub.g_msg_tbl(l_tbl_index).message_text := Null;
5523 oe_msg_pub.Delete_Msg(p_msg_index => l_tbl_index);
5524 End If;
5525 Exit When l_tbl_index = oe_msg_pub.g_msg_tbl.LAST;
5526 l_tbl_index := oe_msg_pub.g_msg_tbl.NEXT(l_tbl_index);
5527 End Loop;
5528 */
5529
5530 /* -----------------------------------------------------------
5531 Set Return Status
5532 -----------------------------------------------------------
5533 */
5534 IF l_debug_level > 0 THEN
5535 oe_debug_pub.add( 'UPDATE ERROR_FLAG RETURN STATUS: '||L_RETURN_STATUS_UPD_ERR ) ;
5536 END IF;
5537
5538 IF l_return_status_upd_err IN (FND_API.G_RET_STS_ERROR)
5539 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
5540 THEN p_return_status := FND_API.G_RET_STS_ERROR;
5541 ELSIF l_return_status_upd_err IN (FND_API.G_RET_STS_UNEXP_ERROR)
5542 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5543 FND_API.G_RET_STS_UNEXP_ERROR)
5544 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5545 END IF;
5546
5547 /* -----------------------------------------------------------
5548 Commit or rollback the error_flag
5549 -----------------------------------------------------------
5550 */
5551 IF l_return_status_upd_err NOT IN (FND_API.G_RET_STS_ERROR,
5552 FND_API.G_RET_STS_UNEXP_ERROR)
5553 THEN
5554 IF l_debug_level > 0 THEN
5555 oe_debug_pub.add( 'COMMITING' ) ;
5556 END IF;
5557 COMMIT; /* commit the error_flag updated */
5558 ELSE
5559 ROLLBACK; /* rollback the error_flag updated */
5560 END IF;
5561
5562 END;
5563 END IF; /* IF p_return_status IN ... */
5564
5565
5566 /* -----------------------------------------------------------
5567 Update the processing messages table
5568 -----------------------------------------------------------
5569 */
5570 OE_MSG_PUB.Count_And_Get (p_count => p_msg_count
5571 ,p_data => p_msg_data);
5572
5573 IF l_debug_level > 0 THEN
5574 oe_debug_pub.add( 'MESSAGES RETURNED: '|| TO_CHAR ( P_MSG_COUNT ) ) ;
5575 END IF;
5576
5577 IF p_msg_count > 0 THEN
5578
5579 IF l_debug_level > 0 THEN
5580 oe_debug_pub.add( 'BEFORE UPDATING THE PROCESSING MESSAGES TABLE' ) ;
5581 END IF;
5582 l_tbl_index := oe_msg_pub.g_msg_tbl.FIRST;
5583
5584 LOOP
5585 IF l_debug_level > 0 THEN
5586 oe_debug_pub.add( 'BEFORE CALLING GET' ) ;
5587 END IF;
5588 l_msg_order_source_id := '';
5589 l_msg_orig_sys_document_ref := '';
5590 l_msg_orig_sys_line_ref := '';
5591 l_msg_orig_sys_shipment_ref := '';
5592 l_msg_sold_to_org_id := '';
5593 l_msg_sold_to_org := '';
5594 l_msg_change_sequence := '';
5595 l_msg_entity_code := '';
5596 l_msg_entity_ref := '';
5597
5598 IF l_debug_level > 0 THEN
5599 oe_debug_pub.add( 'BEFORE CALLING GET_MSG_CONTEXT' ) ;
5600 END IF;
5601 oe_msg_pub.get_msg_context (
5602 p_msg_index => l_tbl_index
5603 ,x_entity_code => l_msg_entity_code
5604 ,x_entity_ref => l_msg_entity_ref
5605 ,x_entity_id => l_msg_entity_id
5606 ,x_header_id => l_msg_header_id
5607 ,x_line_id => l_msg_line_id
5608 ,x_order_source_id => l_msg_order_source_id
5609 ,x_orig_sys_document_ref => l_msg_orig_sys_document_ref
5610 ,x_orig_sys_line_ref => l_msg_orig_sys_line_ref
5611 ,x_orig_sys_shipment_ref => l_msg_orig_sys_shipment_ref
5612 ,x_change_sequence => l_msg_change_sequence
5613 ,x_source_document_type_id => l_msg_source_document_type_id
5614 ,x_source_document_id => l_msg_source_document_id
5615 ,x_source_document_line_id => l_msg_source_document_line_id
5616 ,x_attribute_code => l_msg_attribute_code
5617 ,x_constraint_id => l_msg_constraint_id
5618 ,x_process_activity => l_msg_process_activity
5619 ,x_notification_flag => l_msg_notification_flag
5620 ,x_type => l_msg_type
5621 );
5622
5623 IF l_debug_level > 0 THEN
5624 oe_debug_pub.add( 'AFTER CALLING GET_MSG_CONTEXT' ) ;
5625 END IF;
5626 IF oe_msg_pub.g_msg_tbl(l_tbl_index).message_text IS NULL THEN
5627 IF l_debug_level > 0 THEN
5628 oe_debug_pub.add( 'IN INDEX.MESSAGE_TEXT IS NULL' ) ;
5629 END IF;
5630 p_msg_data := oe_msg_pub.get(l_tbl_index, 'F');
5631 END IF;
5632
5633 l_msg_context := '';
5634 IF l_msg_order_source_id IS NOT NULL THEN
5635 l_msg_context := 'Src: ' || l_msg_order_source_id;
5636 END IF;
5637 IF l_msg_orig_sys_document_ref IS NOT NULL THEN
5638 l_msg_context := l_msg_context ||
5639 ', ' || 'Hdr: '||rtrim(l_msg_orig_sys_document_ref);
5640 END IF;
5641 IF l_msg_orig_sys_line_ref IS NOT NULL THEN
5642 l_msg_context := l_msg_context ||
5643 ', ' || 'Line: '||rtrim(l_msg_orig_sys_line_ref);
5644 END IF;
5645 IF l_msg_orig_sys_shipment_ref IS NOT NULL THEN
5646 l_msg_context := l_msg_context ||
5647 ', ' || 'Ship: '||rtrim(l_msg_orig_sys_shipment_ref);
5648 END IF;
5649 IF l_msg_sold_to_org_id IS NOT NULL THEN
5650 l_msg_context := l_msg_context ||
5651 ', ' || 'Customer ID: '|| l_msg_sold_to_org_id;
5652 END IF;
5653 IF l_msg_sold_to_org IS NOT NULL THEN
5654 l_msg_context := l_msg_context ||
5655 ', ' || 'Customer Name: '|| rtrim(l_msg_sold_to_org);
5656 END IF;
5657 IF l_msg_change_sequence IS NOT NULL THEN
5658 l_msg_context := l_msg_context ||
5659 ', ' || 'Chg: '||rtrim(l_msg_change_sequence);
5660 END IF;
5661
5662
5663
5664 IF l_msg_entity_code IS NOT NULL AND
5665 l_msg_entity_ref IS NOT NULL
5666 THEN
5667 IF l_msg_entity_code IN ('HEADER_ADJ', 'LINE_ADJ') THEN
5668 l_msg_context := l_msg_context || ', ' || 'Adj: ';
5669 ELSIF l_msg_entity_code IN ('HEADER_SCREDIT', 'LINE_SCREDIT') THEN
5670 l_msg_context := l_msg_context || ', ' || 'SCredit: ';
5671 ELSIF l_msg_entity_code IN ('HEADER_PAYMENT', 'LINE_PAYMENT') THEN
5672 l_msg_context := l_msg_context || ', ' || 'Payment: ';
5673 ELSIF l_msg_entity_code IN ('LOT_SERIAL') THEN
5674 l_msg_context := l_msg_context || ', ' || 'Lot: ';
5675 ELSIF l_msg_entity_code IN ('RESERVATION') THEN
5676 l_msg_context := l_msg_context || ', ' || 'Rsrvtn: ';
5677 END IF;
5678 l_msg_context := l_msg_context || rtrim(l_msg_entity_ref);
5679 END IF;
5680 l_msg_data := 'Msg-'||l_tbl_index||' for '||l_msg_context||': '||p_msg_data;
5681
5682 IF l_debug_level > 0 THEN
5683 oe_debug_pub.add( L_MSG_DATA ) ;
5684 END IF;
5685 --bug 4195533
5686 IF p_return_status = FND_API.G_RET_STS_SUCCESS
5687 AND l_header_rec.header_id <> FND_API.G_MISS_NUM THEN
5688 IF l_debug_level > 0 THEN
5689 oe_debug_pub.add( 'Header id updated in msg stack:' || l_header_rec.header_id ) ;
5690 END IF;
5691 oe_msg_pub.g_msg_tbl(l_tbl_index).header_id := l_header_rec.header_id;
5692 END IF;
5693 --bug 4195533
5694 Exit When l_tbl_index = oe_msg_pub.g_msg_tbl.LAST;
5695 l_tbl_index := oe_msg_pub.g_msg_tbl.NEXT(l_tbl_index);
5696
5697 END LOOP;
5698 END IF;
5699
5700 /* -----------------------------------------------------------
5701 Delete messages from the database table
5702 -----------------------------------------------------------
5703 */
5704 IF l_debug_level > 0 THEN
5705 oe_debug_pub.add( 'BEFORE DELETING OLD MESSAGES FROM THE DATABASE TABLE' ) ;
5706 END IF;
5707
5708 /* Commmenting the call to delete message bug 2467558
5709
5710 OE_ORDER_IMPORT_UTIL_PVT.Delete_Messages (
5711 p_request_id => l_request_id,
5712 p_order_source_id => l_order_source_id,
5713 p_orig_sys_document_ref => l_orig_sys_document_ref,
5714 p_change_sequence => l_change_sequence,
5715 p_return_status => l_return_status_del_msg
5716 );
5717
5718 */
5719
5720 /* -----------------------------------------------------------
5721 Set Return Status
5722 -----------------------------------------------------------
5723 */
5724 IF l_debug_level > 0 THEN
5725 oe_debug_pub.add( 'DELETE MESSAGES RETURN STATUS: '||L_RETURN_STATUS_DEL_MSG ) ;
5726 END IF;
5727
5728 IF l_return_status_del_msg IN (FND_API.G_RET_STS_ERROR)
5729 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR)
5730 THEN p_return_status := FND_API.G_RET_STS_ERROR;
5731 ELSIF l_return_status_del_msg IN (FND_API.G_RET_STS_UNEXP_ERROR)
5732 AND p_return_status NOT IN (FND_API.G_RET_STS_ERROR,
5733 FND_API.G_RET_STS_UNEXP_ERROR)
5734 THEN p_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5735 END IF;
5736
5737
5738 /* -----------------------------------------------------------
5739 Save messages in the database table
5740 -----------------------------------------------------------
5741 */
5742 IF l_debug_level > 0 THEN
5743 oe_debug_pub.add( 'BEFORE SAVING MESSAGES IN THE DATABASE TABLE' ) ;
5744 END IF;
5745
5746 IF p_msg_count > 0 THEN
5747 OE_MSG_PUB.save_messages (l_request_id);
5748 END IF;
5749 COMMIT; /* commit again to commit the error messages */
5750
5751
5752 /* -----------------------------------------------------------
5753 Commit or rollback the messages
5754 -----------------------------------------------------------
5755 */
5756 IF l_return_status_del_msg = FND_API.G_RET_STS_SUCCESS
5757 -- AND l_return_status_sav_msg = FND_API.G_RET_STS_SUCCESS -- Currently not set
5758 THEN
5759 COMMIT; /* commit again to commit the error messages */
5760 ELSE
5761 ROLLBACK; /* rollback the error messages deleted */
5762 END IF;
5763
5764
5765 /* -----------------------------------------------------------
5766 Report final order processing results
5767 -----------------------------------------------------------
5768 */
5769 IF l_debug_level > 0 THEN
5770 oe_debug_pub.add( 'RETURN_STATUS: '||P_RETURN_STATUS ) ;
5771 END IF;
5772
5773 IF p_return_status = FND_API.G_RET_STS_ERROR THEN
5774 IF l_debug_level > 0 THEN
5775 oe_debug_pub.add( 'ORDER FAILED WITH ERROR ( S ) ' ) ;
5776 END IF;
5777 ELSIF p_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5778 IF l_debug_level > 0 THEN
5779 oe_debug_pub.add( 'ORDER FAILED WITH UNEXPECTED ERROR ( S ) ' ) ;
5780 END IF;
5781 ELSE
5782 IF l_debug_level > 0 THEN
5783 oe_debug_pub.add( 'ORDER PROCESSED SUCCESSFULLY' ) ;
5784 END IF;
5785 END IF;
5786
5787
5788 -- Call to raise the appropriate event for XML transactions
5789 -- This should only be raised when the profile is set to ASYNCHRONOUS
5790
5791 -- {Start If for raising event for XML Trans
5792 If l_header_rec.order_source_id = Oe_Acknowledgment_Pub.G_XML_ORDER_SOURCE_ID Then
5793 OE_GLOBALS.G_XML_TXN_CODE := NULL;
5794 IF l_debug_level > 0 THEN
5795 oe_debug_pub.add( 'SET GLOBAL TXN CODE TO NULL' ) ;
5796 END IF;
5797
5798 -- Check if Order is Imported
5799 -- Else Ack will have to be sent from the Inf tables.
5800 If p_return_status In (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) Then
5801 l_order_imported := 'N';
5802 Else
5803 l_order_imported := 'Y';
5804 End If;
5805 -- raise the appropriate event
5806 IF l_debug_level > 0 THEN
5807 oe_debug_pub.add( 'BEFORE CALLING RAISE_EVENT_FROM_OEOI' ) ;
5808
5809 oe_debug_pub.add( 'REF = '||L_HEADER_REC.ORIG_SYS_DOCUMENT_REF ) ;
5810 oe_debug_pub.add('3A8 ACK SEND PROFILE ' || l_cho_ack_send_pfile);
5811 oe_debug_pub.add('3A7 RESP PROFILE ' || l_cso_response_pfile);
5812 oe_debug_pub.add('3A8 RESP MSG TYPE ' || l_header_cso_response_flag);
5813 oe_debug_pub.add('XML TXN CODE ' || l_header_rec.xml_transaction_type_code);
5814 END IF;
5815
5816 IF NOT (nvl(l_header_rec.xml_transaction_type_code, FND_API.G_MISS_CHAR) = OE_Acknowledgment_Pub.G_TRANSACTION_CHO
5817 AND nvl(l_header_cso_response_flag, 'N') = 'Y'
5818 AND l_cho_ack_send_pfile = 'N'
5819 AND l_cso_response_pfile = 'Y') THEN
5820
5821 Oe_Acknowledgment_Pub.Raise_Event_From_Oeoi(
5822 p_transaction_type => l_header_rec.xml_transaction_type_code,
5823 p_orig_sys_document_ref => l_header_rec.orig_sys_document_ref,
5824 p_request_id => l_header_rec.request_id,
5825 p_order_imported => l_order_imported,
5826 p_sold_to_org_id => l_header_rec.sold_to_org_id,
5827 p_change_sequence => l_header_rec.change_sequence,
5828 p_xml_message_id => l_header_rec.xml_message_id,
5829 p_org_id => l_header_rec.org_id,
5830 x_return_status => l_return_status);
5831
5832 If p_return_status NOT IN (FND_API.G_RET_STS_ERROR) And
5833 l_return_status IN (FND_API.G_RET_STS_ERROR, FND_API.G_RET_STS_UNEXP_ERROR) Then
5834 p_return_status := l_return_status;
5835 End If;
5836 END IF;
5837
5838 End If;
5839 -- End If for raising event for XML Trans}
5840 -- we raise the event in all cases except Synchronous Order Import for XML
5841 If OE_Code_Control.Code_Release_Level >= '110510' Then
5842 OE_Acknowledgment_Pub.Raise_Event_XMLInt (
5843 p_order_source_id => l_header_rec.order_source_id,
5844 p_partner_document_num => l_header_rec.orig_sys_document_ref,
5845 p_sold_to_org_id => l_header_rec.sold_to_org_id,
5846 p_transaction_type => Oe_Acknowledgment_Pub.G_TRANSACTION_TYPE,
5847 p_transaction_subtype => l_header_rec.xml_transaction_type_code,
5848 p_itemtype => NULL,
5849 p_itemkey => NULL,
5850 p_message_text => NULL,
5851 p_xmlg_icn => l_header_rec.xml_message_id,
5852 p_document_num => l_header_rec.order_number,
5853 p_order_type_id => l_header_rec.order_type_id,
5854 p_doc_status => p_return_status,
5855 p_change_sequence => l_header_rec.change_sequence,
5856 p_org_id => l_header_rec.org_id,
5857 p_conc_request_id => l_header_rec.request_id,
5858 p_header_id => l_header_rec.header_id,
5859 p_response_flag => l_header_cso_response_flag,
5860 x_return_status => l_return_status);
5861 Commit; -- to raise the business event
5862 End If;
5863
5864 /*-----------------------------------------------------------
5865 End of Order Import
5866 -----------------------------------------------------------
5867 */
5868 --oe_debug_pub.add('End of Order Import');
5869
5870
5871 EXCEPTION
5872 WHEN OTHERS THEN
5873 IF l_debug_level > 0 THEN
5874 oe_debug_pub.add( 'UNEXPECTED ERROR: '||SQLERRM ) ;
5875 END IF;
5876 IF OE_MSG_PUB.Check_Msg_Level(OE_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5877 OE_MSG_PUB.Add_Exc_Msg (G_PKG_NAME, 'Import_Order');
5878 END IF;
5879 p_msg_count := p_msg_count + 1;
5880 p_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
5881
5882 OE_GLOBALS.G_ORDER_IMPORT_CALL := FALSE; -- Bug 7367433
5883
5884 END IMPORT_ORDER;
5885
5886 END OE_ORDER_IMPORT_PVT;