[Home] [Help]
PACKAGE BODY: APPS.ARP_INSERT_LINE_COVER
Source
1 PACKAGE BODY ARP_INSERT_LINE_COVER AS
2 /* $Header: ARTCTLIB.pls 120.6 2005/10/07 17:44:30 ralat ship $ */
3
4 /*===========================================================================+
5 | PROCEDURE |
6 | insert_line_cover |
7 | |
8 | DESCRIPTION |
9 | Converts column parameters to a line record and |
10 | inserts a line. |
11 | |
12 | SCOPE - PUBLIC |
13 | |
14 | EXETERNAL PROCEDURES/FUNCTIONS ACCESSED |
15 | arp_util.debug |
16 | |
17 | ARGUMENTS : IN: |
18 | p_form_name |
19 | p_form_version |
20 | p_memo_line_type |
21 | p_trx_class |
22 | p_ccid1 |
23 | p_ccid2 |
24 | p_amount |
25 | p_amount2 |
26 | p_customer_trx_id |
27 | p_line_number |
28 | p_line_type |
29 | p_quantity_credited |
30 | p_quantity_invoiced |
31 | p_quantity_ordered |
32 | p_unit_selling_price |
33 | p_unit_standard_price |
34 | p_revenue_amount |
35 | p_extended_amount |
36 | p_memo_line_id |
37 | p_inventory_item_id |
38 | p_item_exception_rate_id |
39 | p_description |
40 | p_item_context |
41 | p_initial_customer_trx_line_id |
42 | p_link_to_cust_trx_line_id |
43 | p_previous_customer_trx_id |
44 | p_prev_customer_trx_line_id |
45 | p_accounting_rule_id |
46 | p_autorule_complete_flag |
47 | p_autorule_duration_processed |
48 | p_reason_code |
49 | p_last_period_to_credit |
50 | p_sales_order |
51 | p_sales_order_date |
52 | p_sales_order_line |
53 | p_sales_order_revision |
54 | p_sales_order_source |
55 | p_vat_tax_id |
56 | p_tax_exempt_flag |
57 | p_sales_tax_id |
58 | p_location_segment_id |
59 | p_tax_exempt_number |
60 | p_tax_exempt_reason_code |
61 | p_tax_vendor_return_code |
62 | p_taxable_flag |
63 | p_tax_exemption_id |
64 | p_tax_precedence |
65 | p_tax_rate |
66 | p_uom_code |
67 | p_autotax |
68 | p_movement_id |
69 | p_default_ussgl_trx_code |
70 | p_default_ussgl_trx_code_cntxt |
71 | p_interface_line_context |
72 | p_interface_line_attribute1 |
73 | p_interface_line_attribute2 |
74 | p_interface_line_attribute3 |
75 | p_interface_line_attribute4 |
76 | p_interface_line_attribute5 |
77 | p_interface_line_attribute6 |
78 | p_interface_line_attribute7 |
79 | p_interface_line_attribute8 |
80 | p_interface_line_attribute9 |
81 | p_interface_line_attribute10 |
82 | p_interface_line_attribute11 |
83 | p_interface_line_attribute12 |
84 | p_interface_line_attribute13 |
85 | p_interface_line_attribute14 |
86 | p_interface_line_attribute15 |
87 | p_attribute_category |
88 | p_attribute1 |
89 | p_attribute2 |
90 | p_attribute3 |
91 | p_attribute4 |
92 | p_attribute5 |
93 | p_attribute6 |
94 | p_attribute7 |
95 | p_attribute8 |
96 | p_attribute9 |
97 | p_attribute10 |
98 | p_attribute11 |
99 | p_attribute12 |
100 | p_attribute13 |
101 | p_attribute14 |
102 | p_attribute15 |
103 | p_header_currency_code |
104 | p_header_exchange_rate |
105 | p_amount_includes_tax_flag |
106 | p_warehouse_id |
107 | p_ship_to_customer_id |
108 | p_ship_to_site_use_id |
109 | p_ship_to_contact_id |
110 | p_tax_classification_code |
111 | OUT: |
112 | p_customer_trx_line_id |
113 | p_net_extended_amount |
114 | p_net_unit_selling_price |
115 | p_status |
116 | IN/ OUT: |
117 | p_accounting_rule_duration |
118 | p_rule_start_date |
119 | p_gl_date |
120 | p_trx_date |
121 | |
122 | RETURNS : NONE |
123 | |
124 | NOTES |
125 | |
126 | MODIFICATION HISTORY |
127 | 27-NOV-95 Martin Johnson Created |
128 | 15-JAN-96 Martin Johnson Changed parameters |
129 | p_accounting_rule_duration and |
130 | p_rule_start_date to be IN OUT NOCOPY|
131 | 08-FEB-96 Martin Johnson Added IN OUT NOCOPY parameters |
132 | p_gl_date and p_trx_date |
133 | 15-MAY-96 Martin Johnson BugNo:356814. Added OUT NOCOPY |
134 | parameter |
135 | p_status |
136 | Rel. 11 Changes: |
137 | |
138 | 28-JUL-97 OSTEINME added new parameters for Rel.11: |
139 | p_header_currency_code |
140 | p_header_exchange_rate |
141 | p_net_extended_amount |
142 | p_net_unit_selling_price |
143 | p_amount_includes_tax_flag |
144 | |
145 | |
146 | Rel 11.5 Changes: Changes for global tax engine |
147 | 10-JAN-99 Saloni Shah added warehouse_id |
148 | 17-MAR-99 Debbie Jancis added translated_description for MLS |
149 | 07-APR-05 Debbie Jancis Etax: Added ship to columns for |
150 | ship_to at line level. Default null |
151 +===========================================================================*/
152 PG_DEBUG varchar2(1) := NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
153
154 /* Bug 3567353 */
155 pg_base_precision fnd_currencies.precision%type;
156 pg_base_min_acc_unit fnd_currencies.minimum_accountable_unit%type;
157 pg_trx_header_level_rounding ar_system_parameters.trx_header_level_rounding%type;
158
159 PROCEDURE insert_line_cover(
160 p_form_name IN varchar2,
161 p_form_version IN number,
162 p_memo_line_type IN
163 ar_memo_lines.line_type%type,
164 p_trx_class IN
165 ra_cust_trx_types.type%type,
166 p_ccid1 IN
167 gl_code_combinations.code_combination_id%type,
168 p_ccid2 IN
169 gl_code_combinations.code_combination_id%type,
170 p_amount1 IN
171 ra_cust_trx_line_gl_dist.amount%type,
172 p_amount2 IN
173 ra_cust_trx_line_gl_dist.amount%type,
174 p_customer_trx_id IN
175 ra_customer_trx_lines.customer_trx_id%type,
176 p_line_number IN
177 ra_customer_trx_lines.line_number%type,
178 p_line_type IN
179 ra_customer_trx_lines.line_type%type,
180 p_quantity_credited IN
181 ra_customer_trx_lines.quantity_credited%type,
182 p_quantity_invoiced IN
183 ra_customer_trx_lines.quantity_invoiced%type,
184 p_quantity_ordered IN
185 ra_customer_trx_lines.quantity_ordered%type,
186 p_unit_selling_price IN
187 ra_customer_trx_lines.unit_selling_price%type,
188 p_unit_standard_price IN
189 ra_customer_trx_lines.unit_standard_price%type,
190 p_revenue_amount IN
191 ra_customer_trx_lines.revenue_amount%type,
192 p_extended_amount IN
193 ra_customer_trx_lines.extended_amount%type,
194 p_memo_line_id IN
195 ra_customer_trx_lines.memo_line_id%type,
196 p_inventory_item_id IN
197 ra_customer_trx_lines.inventory_item_id%type,
198 p_item_exception_rate_id IN
199 ra_customer_trx_lines.item_exception_rate_id%type,
200 p_description IN
201 ra_customer_trx_lines.description%type,
202 p_item_context IN
203 ra_customer_trx_lines.item_context%type,
204 p_initial_customer_trx_line_id IN
205 ra_customer_trx_lines.initial_customer_trx_line_id%type,
206 p_link_to_cust_trx_line_id IN
207 ra_customer_trx_lines.link_to_cust_trx_line_id%type,
208 p_previous_customer_trx_id IN
209 ra_customer_trx_lines.previous_customer_trx_id%type,
210 p_prev_customer_trx_line_id IN
211 ra_customer_trx_lines.previous_customer_trx_line_id%type,
212 p_accounting_rule_duration IN OUT NOCOPY
213 ra_customer_trx_lines.accounting_rule_duration%type,
214 p_accounting_rule_id IN
215 ra_customer_trx_lines.accounting_rule_id%type,
216 p_rule_start_date IN OUT NOCOPY
217 ra_customer_trx_lines.rule_start_date%type,
218 p_autorule_complete_flag IN
219 ra_customer_trx_lines.autorule_complete_flag%type,
220 p_autorule_duration_processed IN
221 ra_customer_trx_lines.autorule_duration_processed%type,
222 p_reason_code IN
223 ra_customer_trx_lines.reason_code%type,
224 p_last_period_to_credit IN
225 ra_customer_trx_lines.last_period_to_credit%type,
226 p_sales_order IN
227 ra_customer_trx_lines.sales_order%type,
228 p_sales_order_date IN
229 ra_customer_trx_lines.sales_order_date%type,
230 p_sales_order_line IN
231 ra_customer_trx_lines.sales_order_line%type,
232 p_sales_order_revision IN
233 ra_customer_trx_lines.sales_order_revision%type,
234 p_sales_order_source IN
235 ra_customer_trx_lines.sales_order_source%type,
236 p_vat_tax_id IN
237 ra_customer_trx_lines.vat_tax_id%type,
238 p_tax_exempt_flag IN
239 ra_customer_trx_lines.tax_exempt_flag%type,
240 p_sales_tax_id IN
241 ra_customer_trx_lines.sales_tax_id%type,
242 p_location_segment_id IN
243 ra_customer_trx_lines.location_segment_id%type,
244 p_tax_exempt_number IN
245 ra_customer_trx_lines.tax_exempt_number%type,
246 p_tax_exempt_reason_code IN
247 ra_customer_trx_lines.tax_exempt_reason_code%type,
248 p_tax_vendor_return_code IN
249 ra_customer_trx_lines.tax_vendor_return_code%type,
250 p_taxable_flag IN
251 ra_customer_trx_lines.taxable_flag%type,
252 p_tax_exemption_id IN
253 ra_customer_trx_lines.tax_exemption_id%type,
254 p_tax_precedence IN
255 ra_customer_trx_lines.tax_precedence%type,
256 p_tax_rate IN
257 ra_customer_trx_lines.tax_rate%type,
258 p_uom_code IN
259 ra_customer_trx_lines.uom_code%type,
260 p_autotax IN
261 ra_customer_trx_lines.autotax%type,
262 p_movement_id IN
263 ra_customer_trx_lines.movement_id%type,
264 p_default_ussgl_trx_code IN
265 ra_customer_trx_lines.default_ussgl_transaction_code%type,
266 p_default_ussgl_trx_code_cntxt IN
267 ra_customer_trx_lines.default_ussgl_trx_code_context%type,
268 p_interface_line_context IN
269 ra_customer_trx_lines.interface_line_context%type,
270 p_interface_line_attribute1 IN
271 ra_customer_trx_lines.interface_line_attribute1%type,
272 p_interface_line_attribute2 IN
273 ra_customer_trx_lines.interface_line_attribute2%type,
274 p_interface_line_attribute3 IN
275 ra_customer_trx_lines.interface_line_attribute3%type,
276 p_interface_line_attribute4 IN
277 ra_customer_trx_lines.interface_line_attribute4%type,
278 p_interface_line_attribute5 IN
279 ra_customer_trx_lines.interface_line_attribute5%type,
280 p_interface_line_attribute6 IN
281 ra_customer_trx_lines.interface_line_attribute6%type,
282 p_interface_line_attribute7 IN
283 ra_customer_trx_lines.interface_line_attribute7%type,
284 p_interface_line_attribute8 IN
285 ra_customer_trx_lines.interface_line_attribute8%type,
286 p_interface_line_attribute9 IN
287 ra_customer_trx_lines.interface_line_attribute9%type,
288 p_interface_line_attribute10 IN
289 ra_customer_trx_lines.interface_line_attribute10%type,
290 p_interface_line_attribute11 IN
291 ra_customer_trx_lines.interface_line_attribute11%type,
292 p_interface_line_attribute12 IN
293 ra_customer_trx_lines.interface_line_attribute12%type,
294 p_interface_line_attribute13 IN
295 ra_customer_trx_lines.interface_line_attribute13%type,
296 p_interface_line_attribute14 IN
297 ra_customer_trx_lines.interface_line_attribute14%type,
298 p_interface_line_attribute15 IN
299 ra_customer_trx_lines.interface_line_attribute15%type,
300 p_attribute_category IN
301 ra_customer_trx_lines.attribute_category%type,
302 p_attribute1 IN
303 ra_customer_trx_lines.attribute1%type,
304 p_attribute2 IN
305 ra_customer_trx_lines.attribute2%type,
306 p_attribute3 IN
307 ra_customer_trx_lines.attribute3%type,
308 p_attribute4 IN
309 ra_customer_trx_lines.attribute4%type,
310 p_attribute5 IN
311 ra_customer_trx_lines.attribute5%type,
312 p_attribute6 IN
313 ra_customer_trx_lines.attribute6%type,
314 p_attribute7 IN
315 ra_customer_trx_lines.attribute7%type,
316 p_attribute8 IN
317 ra_customer_trx_lines.attribute8%type,
318 p_attribute9 IN
319 ra_customer_trx_lines.attribute9%type,
320 p_attribute10 IN
321 ra_customer_trx_lines.attribute10%type,
322 p_attribute11 IN
323 ra_customer_trx_lines.attribute11%type,
324 p_attribute12 IN
325 ra_customer_trx_lines.attribute12%type,
326 p_attribute13 IN
327 ra_customer_trx_lines.attribute13%type,
328 p_attribute14 IN
329 ra_customer_trx_lines.attribute14%type,
330 p_attribute15 IN
331 ra_customer_trx_lines.attribute15%type,
332 p_customer_trx_line_id OUT NOCOPY
333 ra_customer_trx_lines.customer_trx_line_id%type,
334 p_gl_date IN OUT NOCOPY
335 ra_cust_trx_line_gl_dist.gl_date%type,
336 p_trx_date IN OUT NOCOPY
337 ra_customer_trx.trx_date%type,
338 p_header_currency_code IN
339 ra_customer_trx.invoice_currency_code%type,
340 p_header_exchange_rate IN
341 ra_customer_trx.exchange_rate%type,
342 p_amount_includes_tax_flag IN
343 ra_customer_trx_lines.amount_includes_tax_flag%type,
344 p_net_extended_amount OUT NOCOPY
345 ra_customer_trx_lines.extended_amount%type,
346 p_net_unit_selling_price OUT NOCOPY
347 ra_customer_trx_lines.unit_selling_price%type,
348 p_status OUT NOCOPY
349 varchar2 ,
350 p_global_attribute_category IN
351 ra_customer_trx_lines.global_attribute_category%type,
352 p_global_attribute1 IN
353 ra_customer_trx_lines.global_attribute1%type,
354 p_global_attribute2 IN
355 ra_customer_trx_lines.global_attribute2%type,
356 p_global_attribute3 IN
357 ra_customer_trx_lines.global_attribute3%type,
358 p_global_attribute4 IN
359 ra_customer_trx_lines.global_attribute4%type,
360 p_global_attribute5 IN
361 ra_customer_trx_lines.global_attribute5%type,
362 p_global_attribute6 IN
363 ra_customer_trx_lines.global_attribute6%type,
364 p_global_attribute7 IN
365 ra_customer_trx_lines.global_attribute7%type,
366 p_global_attribute8 IN
367 ra_customer_trx_lines.global_attribute8%type,
368 p_global_attribute9 IN
369 ra_customer_trx_lines.global_attribute9%type,
370 p_global_attribute10 IN
371 ra_customer_trx_lines.global_attribute10%type,
372 p_global_attribute11 IN
373 ra_customer_trx_lines.global_attribute11%type,
374 p_global_attribute12 IN
375 ra_customer_trx_lines.global_attribute12%type,
376 p_global_attribute13 IN
377 ra_customer_trx_lines.global_attribute13%type,
378 p_global_attribute14 IN
379 ra_customer_trx_lines.global_attribute14%type,
380 p_global_attribute15 IN
381 ra_customer_trx_lines.global_attribute15%type,
382 p_global_attribute16 IN
383 ra_customer_trx_lines.global_attribute16%type,
384 p_global_attribute17 IN
385 ra_customer_trx_lines.global_attribute17%type,
386 p_global_attribute18 IN
387 ra_customer_trx_lines.global_attribute18%type,
388 p_global_attribute19 IN
389 ra_customer_trx_lines.global_attribute19%type,
390 p_global_attribute20 IN
391 ra_customer_trx_lines.global_attribute20%type,
392 p_warehouse_id IN
393 ra_customer_trx_lines.warehouse_id%type,
394 p_translated_description IN
395 ra_customer_trx_lines.translated_description%type,
396 p_payment_set_id IN ra_customer_trx_lines.payment_set_id%type,
397 p_ship_to_customer_id IN
398 ra_customer_trx_lines.ship_to_customer_id%type DEFAULT NULL,
399 p_ship_to_site_use_id IN
400 ra_customer_trx_lines.ship_to_site_use_id%type DEFAULT NULL,
401 p_ship_to_contact_id IN
402 ra_customer_trx_lines.ship_to_contact_id%type DEFAULT NULL,
403 p_tax_classification_code IN
404 ra_customer_trx_lines.tax_classification_code%type DEFAULT NULL,
405 p_rule_end_date IN
406 ra_customer_trx_lines.rule_end_date%type DEFAULT NULL
407 )
408 IS
409
410 l_line_rec ra_customer_trx_lines%rowtype;
411
412 /* bug 3567353 */
413 l_error_message VARCHAR2(128) := '';
414 l_dist_count NUMBER;
415 l_rules_check_flag VARCHAR2(1);
416
417 BEGIN
418
419 IF PG_DEBUG in ('Y', 'C') THEN
420 arp_util.debug('arp_insert_line_cover.insert_line_cover()+');
421 END IF;
422
423 /*-----------------------------------------+
424 | Populate the line record group with |
425 | the values passed in as parameters. |
426 +-----------------------------------------*/
427
428 l_line_rec.customer_trx_id := p_customer_trx_id;
429 l_line_rec.line_number := p_line_number;
430 l_line_rec.line_type := p_line_type;
431 l_line_rec.quantity_credited := p_quantity_credited;
432 l_line_rec.quantity_invoiced := p_quantity_invoiced;
433 l_line_rec.quantity_ordered := p_quantity_ordered;
434 l_line_rec.unit_selling_price := p_unit_selling_price;
435 l_line_rec.unit_standard_price := p_unit_standard_price;
436 l_line_rec.revenue_amount := p_revenue_amount;
437 l_line_rec.extended_amount := p_extended_amount;
438 l_line_rec.memo_line_id := p_memo_line_id;
439 l_line_rec.inventory_item_id := p_inventory_item_id;
440 l_line_rec.item_exception_rate_id := p_item_exception_rate_id;
441 l_line_rec.description := p_description;
442 l_line_rec.item_context := p_item_context;
443 l_line_rec.initial_customer_trx_line_id := p_initial_customer_trx_line_id;
444 l_line_rec.link_to_cust_trx_line_id := p_link_to_cust_trx_line_id;
445 l_line_rec.previous_customer_trx_id := p_previous_customer_trx_id;
446 l_line_rec.previous_customer_trx_line_id := p_prev_customer_trx_line_id;
447 l_line_rec.accounting_rule_duration := p_accounting_rule_duration;
448 l_line_rec.accounting_rule_id := p_accounting_rule_id;
449 l_line_rec.rule_start_date := p_rule_start_date;
450 l_line_rec.autorule_complete_flag := p_autorule_complete_flag;
451 l_line_rec.autorule_duration_processed := p_autorule_duration_processed;
452 l_line_rec.reason_code := p_reason_code;
453 l_line_rec.last_period_to_credit := p_last_period_to_credit;
454 l_line_rec.sales_order := p_sales_order;
455 l_line_rec.sales_order_date := p_sales_order_date;
456 l_line_rec.sales_order_line := p_sales_order_line;
457 l_line_rec.sales_order_revision := p_sales_order_revision;
458 l_line_rec.sales_order_source := p_sales_order_source;
459 l_line_rec.vat_tax_id := p_vat_tax_id;
460 l_line_rec.tax_exempt_flag := p_tax_exempt_flag;
461 l_line_rec.sales_tax_id := p_sales_tax_id;
462 l_line_rec.location_segment_id := p_location_segment_id;
463 l_line_rec.tax_exempt_number := p_tax_exempt_number;
464 l_line_rec.tax_exempt_reason_code := p_tax_exempt_reason_code;
465 l_line_rec.tax_vendor_return_code := p_tax_vendor_return_code;
466 l_line_rec.taxable_flag := p_taxable_flag;
467 l_line_rec.tax_exemption_id := p_tax_exemption_id;
468 l_line_rec.tax_precedence := p_tax_precedence;
469 l_line_rec.tax_rate := p_tax_rate;
470 l_line_rec.uom_code := p_uom_code;
471 l_line_rec.autotax := p_autotax;
472 l_line_rec.movement_id := p_movement_id;
473 l_line_rec.default_ussgl_transaction_code :=
474 p_default_ussgl_trx_code;
475 l_line_rec.default_ussgl_trx_code_context :=
476 p_default_ussgl_trx_code_cntxt;
477 l_line_rec.interface_line_context := p_interface_line_context;
478 l_line_rec.interface_line_attribute1 := p_interface_line_attribute1;
479 l_line_rec.interface_line_attribute2 := p_interface_line_attribute2;
480 l_line_rec.interface_line_attribute3 := p_interface_line_attribute3;
481 l_line_rec.interface_line_attribute4 := p_interface_line_attribute4;
482 l_line_rec.interface_line_attribute5 := p_interface_line_attribute5;
483 l_line_rec.interface_line_attribute6 := p_interface_line_attribute6;
484 l_line_rec.interface_line_attribute7 := p_interface_line_attribute7;
485 l_line_rec.interface_line_attribute8 := p_interface_line_attribute8;
486 l_line_rec.interface_line_attribute9 := p_interface_line_attribute9;
487 l_line_rec.interface_line_attribute10 := p_interface_line_attribute10;
488 l_line_rec.interface_line_attribute11 := p_interface_line_attribute11;
489 l_line_rec.interface_line_attribute12 := p_interface_line_attribute12;
490 l_line_rec.interface_line_attribute13 := p_interface_line_attribute13;
491 l_line_rec.interface_line_attribute14 := p_interface_line_attribute14;
492 l_line_rec.interface_line_attribute15 := p_interface_line_attribute15;
493 l_line_rec.attribute_category := p_attribute_category;
494 l_line_rec.attribute1 := p_attribute1;
495 l_line_rec.attribute2 := p_attribute2;
496 l_line_rec.attribute3 := p_attribute3;
497 l_line_rec.attribute4 := p_attribute4;
498 l_line_rec.attribute5 := p_attribute5;
499 l_line_rec.attribute6 := p_attribute6;
500 l_line_rec.attribute7 := p_attribute7;
501 l_line_rec.attribute8 := p_attribute8;
502 l_line_rec.attribute9 := p_attribute9;
503 l_line_rec.attribute10 := p_attribute10;
504 l_line_rec.attribute11 := p_attribute11;
505 l_line_rec.attribute12 := p_attribute12;
506 l_line_rec.attribute13 := p_attribute13;
507 l_line_rec.attribute14 := p_attribute14;
508 l_line_rec.attribute15 := p_attribute15;
509 l_line_rec.payment_set_id := p_payment_set_id;
510
511 -- Rel. 11 Changes:
512
513 l_line_rec.amount_includes_tax_flag := p_amount_includes_tax_flag;
514 l_line_rec.gross_unit_selling_price := NULL;
515 l_line_rec.gross_extended_amount := NULL;
516
517 -- Rel. 11 Changes: Global Desc. Flex.
518
519 l_line_rec.global_attribute_category := p_global_attribute_category;
520 l_line_rec.global_attribute1 := p_global_attribute1;
521 l_line_rec.global_attribute2 := p_global_attribute2;
522 l_line_rec.global_attribute3 := p_global_attribute3;
523 l_line_rec.global_attribute4 := p_global_attribute4;
524 l_line_rec.global_attribute5 := p_global_attribute5;
525 l_line_rec.global_attribute6 := p_global_attribute6;
526 l_line_rec.global_attribute7 := p_global_attribute7;
527 l_line_rec.global_attribute8 := p_global_attribute8;
528 l_line_rec.global_attribute9 := p_global_attribute9;
529 l_line_rec.global_attribute10 := p_global_attribute10;
530 l_line_rec.global_attribute11 := p_global_attribute11;
531 l_line_rec.global_attribute12 := p_global_attribute12;
532 l_line_rec.global_attribute13 := p_global_attribute13;
533 l_line_rec.global_attribute14 := p_global_attribute14;
534 l_line_rec.global_attribute15 := p_global_attribute15;
535 l_line_rec.global_attribute16 := p_global_attribute16;
536 l_line_rec.global_attribute17 := p_global_attribute17;
537 l_line_rec.global_attribute18 := p_global_attribute18;
538 l_line_rec.global_attribute19 := p_global_attribute19;
539 l_line_rec.global_attribute20 := p_global_attribute20;
540
541 -- Rel. 11.5 changes: Warehouse_id.
542 l_line_rec.warehouse_id := p_warehouse_id;
543
544 l_line_rec.translated_description := p_translated_description;
545
546
547 -- ETax - ship to at line level information
548 l_line_rec.ship_to_customer_id := p_ship_to_customer_id;
549 l_line_rec.ship_to_site_use_id := p_ship_to_site_use_id;
550 l_line_rec.ship_to_contact_id := p_ship_to_contact_id;
551 l_line_rec.tax_classification_code := p_tax_classification_code;
552 l_line_rec.rule_end_date := p_rule_end_date;
553
554 IF PG_DEBUG in ('Y', 'C') THEN
555 arp_util.debug('insert_line_cover: ' || 'ARTCTLIB: amount_includes_tax_flag = ' || l_line_rec.amount_includes_tax_flag);
556 arp_util.debug('insert_line_cover: ' || 'ARTCTLIB: header_currency_code = '|| p_header_currency_code);
557 arp_util.debug('insert_line_cover: ' || 'ARTCTLIB: header_exchange_rate = '|| p_header_exchange_rate);
558 END IF;
559
560 /*----------------------------------------+
561 | Call the standard line entity handler |
562 +----------------------------------------*/
563
564 arp_process_line.insert_line(
565 p_form_name,
566 p_form_version,
567 l_line_rec,
568 p_memo_line_type,
569 p_customer_trx_line_id,
570 p_trx_class,
571 p_ccid1,
572 p_ccid2,
573 p_amount1,
574 p_amount2,
575 p_rule_start_date,
576 p_accounting_rule_duration,
577 p_gl_date,
578 p_trx_date,
579 p_header_currency_code,
580 p_header_exchange_rate,
581 p_status );
582
583 -- Rel. 11: Return the net amounts to client
584
585 p_net_unit_selling_price := l_line_rec.unit_selling_price;
586 p_net_extended_amount := l_line_rec.extended_amount;
587
588 /* bug 3567353 Call rounding */
589 IF p_rule_start_date IS NULL THEN
590 l_rules_check_flag := 'N';
591 ELSE
592 l_rules_check_flag := 'Y';
593 END IF;
594
595 IF arp_rounding.correct_dist_rounding_errors(
596 NULL,
597 l_line_rec.CUSTOMER_TRX_ID ,
598 p_customer_trx_line_id ,
599 l_dist_count,
600 l_error_message ,
601 pg_base_precision ,
602 pg_base_min_acc_unit ,
603 'ALL' ,
604 l_rules_check_flag,
605 'N' ,
606 pg_trx_header_level_rounding ,
607 'N',
608 'N') = 0 -- FALSE
609 THEN
610 arp_util.debug('EXCEPTION: arp_insert_line_cover.insert_line_cover()');
611 arp_util.debug(l_error_message);
612 fnd_message.set_name('AR', 'AR_PLCRE_FHLR_CCID');
613 APP_EXCEPTION.raise_exception;
614 END IF;
615
616 IF PG_DEBUG in ('Y', 'C') THEN
617 arp_util.debug('arp_insert_line_cover.insert_line_cover()-');
618 END IF;
619
620 EXCEPTION
621 WHEN OTHERS THEN
622
623 IF PG_DEBUG in ('Y', 'C') THEN
624 arp_util.debug('EXCEPTION: arp_insert_line_cover.insert_line_cover()');
625 arp_util.debug('------- parameters for insert_line_cover() ' ||
626 '---------');
627 arp_util.debug('insert_line_cover: ' || 'p_form_name = ' || p_form_name);
628 arp_util.debug('insert_line_cover: ' || 'p_form_version = ' || p_form_version);
629 arp_util.debug('insert_line_cover: ' || 'p_memo_line_type = ' || p_memo_line_type);
630 arp_util.debug('insert_line_cover: ' || 'p_trx_class = ' || p_trx_class);
631 arp_util.debug('insert_line_cover: ' || 'p_ccid1 = ' || p_ccid1);
632 arp_util.debug('insert_line_cover: ' || 'p_ccid2 = ' || p_ccid2);
633 arp_util.debug('insert_line_cover: ' || 'p_amount1 = ' || p_amount1);
634 arp_util.debug('insert_line_cover: ' || 'p_amount2 = ' || p_amount2);
635 arp_util.debug('insert_line_cover: ' || 'p_customer_trx_id = ' || p_customer_trx_id);
636 arp_util.debug('insert_line_cover: ' || 'p_line_number = ' || p_line_number);
637 arp_util.debug('insert_line_cover: ' || 'p_line_type = ' || p_line_type);
638 arp_util.debug('insert_line_cover: ' || 'p_quantity_credited = ' || p_quantity_credited);
639 arp_util.debug('insert_line_cover: ' || 'p_quantity_invoiced = ' || p_quantity_invoiced);
640 arp_util.debug('insert_line_cover: ' || 'p_quantity_ordered = ' || p_quantity_ordered);
641 arp_util.debug('insert_line_cover: ' || 'p_unit_selling_price = ' || p_unit_selling_price);
642 arp_util.debug('insert_line_cover: ' || 'p_unit_standard_price = ' || p_unit_standard_price);
643 arp_util.debug('insert_line_cover: ' || 'p_revenue_amount = ' || p_revenue_amount);
644 arp_util.debug('insert_line_cover: ' || 'p_extended_amount = ' || p_extended_amount);
645 arp_util.debug('insert_line_cover: ' || 'p_memo_line_id = ' || p_memo_line_id);
646 arp_util.debug('insert_line_cover: ' || 'p_inventory_item_id = ' || p_inventory_item_id);
647 arp_util.debug('insert_line_cover: ' || 'p_item_exception_rate_id = ' || p_item_exception_rate_id);
648 arp_util.debug('insert_line_cover: ' || 'p_description = ' || p_description);
649 arp_util.debug('insert_line_cover: ' || 'p_item_context = ' || p_item_context);
650 arp_util.debug('insert_line_cover: ' || 'p_initial_customer_trx_line_id = ' ||
651 p_initial_customer_trx_line_id);
652 arp_util.debug('insert_line_cover: ' || 'p_link_to_cust_trx_line_id = ' ||
653 p_link_to_cust_trx_line_id);
654 arp_util.debug('insert_line_cover: ' || 'p_previous_customer_trx_id = ' ||
655 p_previous_customer_trx_id);
656 arp_util.debug('insert_line_cover: ' || 'p_prev_customer_trx_line_id = ' ||
657 p_prev_customer_trx_line_id);
658 arp_util.debug('insert_line_cover: ' || 'p_accounting_rule_duration = ' ||
659 p_accounting_rule_duration);
660 arp_util.debug('insert_line_cover: ' || 'p_accounting_rule_id = ' || p_accounting_rule_id);
661 arp_util.debug('insert_line_cover: ' || 'p_rule_start_date = ' || p_rule_start_date);
662 arp_util.debug('insert_line_cover: ' || 'p_autorule_complete_flag = ' || p_autorule_complete_flag);
663 arp_util.debug('insert_line_cover: ' || 'p_autorule_duration_processed = ' ||
664 p_autorule_duration_processed);
665 arp_util.debug('insert_line_cover: ' || 'p_reason_code = ' || p_reason_code);
666 arp_util.debug('insert_line_cover: ' || 'p_last_period_to_credit = ' || p_last_period_to_credit);
667 arp_util.debug('insert_line_cover: ' || 'p_sales_order = ' || p_sales_order);
668 arp_util.debug('insert_line_cover: ' || 'p_sales_order_date = ' || p_sales_order_date);
669 arp_util.debug('insert_line_cover: ' || 'p_sales_order_line = ' || p_sales_order_line);
670 arp_util.debug('insert_line_cover: ' || 'p_sales_order_revision = ' || p_sales_order_revision);
671 arp_util.debug('insert_line_cover: ' || 'p_sales_order_source = ' || p_sales_order_source);
672 arp_util.debug('insert_line_cover: ' || 'p_vat_tax_id = ' || p_vat_tax_id);
673 arp_util.debug('insert_line_cover: ' || 'p_tax_exempt_flag = ' || p_tax_exempt_flag);
674 arp_util.debug('insert_line_cover: ' || 'p_sales_tax_id = ' || p_sales_tax_id);
675 arp_util.debug('insert_line_cover: ' || 'p_location_segment_id = ' || p_location_segment_id);
676 arp_util.debug('insert_line_cover: ' || 'p_tax_exempt_number = ' || p_tax_exempt_number);
677 arp_util.debug('insert_line_cover: ' || 'p_tax_exempt_reason_code = ' || p_tax_exempt_reason_code);
678 arp_util.debug('insert_line_cover: ' || 'p_tax_vendor_return_code = ' || p_tax_vendor_return_code);
679 arp_util.debug('insert_line_cover: ' || 'p_taxable_flag = ' || p_taxable_flag);
680 arp_util.debug('insert_line_cover: ' || 'p_tax_exemption_id = ' || p_tax_exemption_id);
681 arp_util.debug('insert_line_cover: ' || 'p_tax_precedence = ' || p_tax_precedence);
682 arp_util.debug('insert_line_cover: ' || 'p_tax_rate = ' || p_tax_rate);
683 arp_util.debug('insert_line_cover: ' || 'p_uom_code = ' || p_uom_code);
684 arp_util.debug('insert_line_cover: ' || 'p_autotax = ' || p_autotax);
685 arp_util.debug('insert_line_cover: ' || 'p_movement_id = ' || p_movement_id);
686 arp_util.debug('insert_line_cover: ' || 'p_default_ussgl_trx_code = ' ||
687 p_default_ussgl_trx_code);
688 arp_util.debug('insert_line_cover: ' || 'p_default_ussgl_trx_code_cntxt = ' ||
689 p_default_ussgl_trx_code_cntxt);
690 arp_util.debug('insert_line_cover: ' || 'p_interface_line_context = ' || p_interface_line_context);
691 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute1 = ' ||
692 p_interface_line_attribute1);
693 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute2 = ' ||
694 p_interface_line_attribute2);
695 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute3 = ' ||
696 p_interface_line_attribute3);
697 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute4 = ' ||
698 p_interface_line_attribute4);
699 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute5 = ' ||
700 p_interface_line_attribute5);
701 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute6 = ' ||
702 p_interface_line_attribute6);
703 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute7 = ' ||
704 p_interface_line_attribute7);
705 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute8 = ' ||
706 p_interface_line_attribute8);
707 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute9 = ' ||
708 p_interface_line_attribute9);
709 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute10 = ' ||
710 p_interface_line_attribute10);
711 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute11 = ' ||
712 p_interface_line_attribute11);
713 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute12 = ' ||
714 p_interface_line_attribute12);
715 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute13 = ' ||
716 p_interface_line_attribute13);
717 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute14 = ' ||
718 p_interface_line_attribute14);
719 arp_util.debug('insert_line_cover: ' || 'p_interface_line_attribute15 = ' ||
720 p_interface_line_attribute15);
721 arp_util.debug('insert_line_cover: ' || 'p_attribute_category = ' || p_attribute_category);
722 arp_util.debug('insert_line_cover: ' || 'p_attribute1 = ' || p_attribute1);
723 arp_util.debug('insert_line_cover: ' || 'p_attribute2 = ' || p_attribute2);
724 arp_util.debug('insert_line_cover: ' || 'p_attribute3 = ' || p_attribute3);
725 arp_util.debug('insert_line_cover: ' || 'p_attribute4 = ' || p_attribute4);
726 arp_util.debug('insert_line_cover: ' || 'p_attribute5 = ' || p_attribute5);
727 arp_util.debug('insert_line_cover: ' || 'p_attribute6 = ' || p_attribute6);
728 arp_util.debug('insert_line_cover: ' || 'p_attribute7 = ' || p_attribute7);
729 arp_util.debug('insert_line_cover: ' || 'p_attribute8 = ' || p_attribute8);
730 arp_util.debug('insert_line_cover: ' || 'p_attribute9 = ' || p_attribute9);
731 arp_util.debug('insert_line_cover: ' || 'p_attribute10 = ' || p_attribute10);
732 arp_util.debug('insert_line_cover: ' || 'p_attribute11 = ' || p_attribute11);
733 arp_util.debug('insert_line_cover: ' || 'p_attribute12 = ' || p_attribute12);
734 arp_util.debug('insert_line_cover: ' || 'p_attribute13 = ' || p_attribute13);
735 arp_util.debug('insert_line_cover: ' || 'p_attribute14 = ' || p_attribute14);
736 arp_util.debug('insert_line_cover: ' || 'p_attribute15 = ' || p_attribute15);
737 arp_util.debug('insert_line_cover: ' || 'amount_includes_tax_flag = ' || p_amount_includes_tax_flag);
738 arp_util.debug('insert_line_cover: ' || 'header_currency_code = '|| p_header_currency_code);
739 arp_util.debug('insert_line_cover: ' || 'header_exchange_rate = '|| p_header_exchange_rate);
740 arp_util.debug('insert_line_cover: ' || 'p_global_attribute_category = ' || p_global_attribute_category);
741 arp_util.debug('insert_line_cover: ' || 'p_global_attribute1 = ' || p_global_attribute1);
742 arp_util.debug('insert_line_cover: ' || 'p_global_attribute2 = ' || p_global_attribute2);
743 arp_util.debug('insert_line_cover: ' || 'p_global_attribute3 = ' || p_global_attribute3);
744 arp_util.debug('insert_line_cover: ' || 'p_global_attribute4 = ' || p_global_attribute4);
745 arp_util.debug('insert_line_cover: ' || 'p_global_attribute5 = ' || p_global_attribute5);
746 arp_util.debug('insert_line_cover: ' || 'p_global_attribute6 = ' || p_global_attribute6);
747 arp_util.debug('insert_line_cover: ' || 'p_global_attribute7 = ' || p_global_attribute7);
748 arp_util.debug('insert_line_cover: ' || 'p_global_attribute8 = ' || p_global_attribute8);
749 arp_util.debug('insert_line_cover: ' || 'p_global_attribute9 = ' || p_global_attribute9);
750 arp_util.debug('insert_line_cover: ' || 'p_global_attribute10 = ' || p_global_attribute10);
751 arp_util.debug('insert_line_cover: ' || 'p_global_attribute11 = ' || p_global_attribute11);
752 arp_util.debug('insert_line_cover: ' || 'p_global_attribute12 = ' || p_global_attribute12);
753 arp_util.debug('insert_line_cover: ' || 'p_global_attribute13 = ' || p_global_attribute13);
754 arp_util.debug('insert_line_cover: ' || 'p_global_attribute14 = ' || p_global_attribute14);
755 arp_util.debug('insert_line_cover: ' || 'p_global_attribute15 = ' || p_global_attribute15);
756 arp_util.debug('insert_line_cover: ' || 'p_global_attribute16 = ' || p_global_attribute16);
757 arp_util.debug('insert_line_cover: ' || 'p_global_attribute17 = ' || p_global_attribute17);
758 arp_util.debug('insert_line_cover: ' || 'p_global_attribute18 = ' || p_global_attribute18);
759 arp_util.debug('insert_line_cover: ' || 'p_global_attribute19 = ' || p_global_attribute19);
760 arp_util.debug('insert_line_cover: ' || 'p_global_attribute20 = ' || p_global_attribute20);
761 arp_util.debug('insert_line_cover: ' || 'p_warehouse_id = ' || p_warehouse_id);
762 arp_util.debug('insert_line_cover: ' || 'p_translated_description = ' || p_translated_description);
763 arp_util.debug('insert_line_cover: ' || 'p_payment_set_id = ' || p_payment_set_id);
764 arp_util.debug('insert_line_cover: ' || 'p_rule_end_date = ' || p_rule_end_date);
765 END IF;
766
767 RAISE;
768
769 END insert_line_cover;
770
771 BEGIN
772
773 /* Bug 3567353 */
774 pg_base_precision := arp_global.base_precision;
775 pg_base_min_acc_unit := arp_global.base_min_acc_unit;
776 pg_trx_header_level_rounding := arp_global.sysparam.trx_header_level_rounding;
777
778 END ARP_INSERT_LINE_COVER;