DBA Data[Home] [Help]

PACKAGE BODY: APPS.ARP_DELETE_LINE_COVER

Source


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