DBA Data[Home] [Help]

PACKAGE BODY: APPS.AR_TRX_GLOBAL_PROCESS_HEADER

Source


1 PACKAGE BODY AR_TRX_GLOBAL_PROCESS_HEADER AS
2 /* $Header: ARINGTHB.pls 120.18.12010000.3 2010/01/28 09:58:10 aghoraka ship $ */
3 
4 pg_debug                VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'),'N');
5 
6 PROCEDURE INSERT_ROW (
7     p_trx_header_tbl            IN      AR_INVOICE_API_PUB.trx_header_tbl_type,
8     p_batch_source_rec          IN      AR_INVOICE_API_PUB.batch_source_rec_type,
9     x_errmsg                    OUT NOCOPY  VARCHAR2,
10     x_return_status             OUT NOCOPY  VARCHAR2
11     ) IS
12 BEGIN
13 
14     IF pg_debug = 'Y'
15     THEN
16         ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_HEADER.INERT_ROW(+)');
17     END IF;
18 
19 
20 
21 
22     FOR i IN  p_trx_header_tbl.FIRST .. p_trx_header_tbl.LAST
23     LOOP
24    arp_util.debug ( 'insert header ' || (p_trx_header_tbl(i).trx_header_id) );
25    arp_util.debug ( 'insert header PMT' || (p_trx_header_tbl(i).payment_trxn_extension_id) );
26 
27         INSERT INTO ar_trx_header_gt (
28             trx_header_id,
29             customer_trx_id,
30             created_by,
31             creation_date,
32             created_from,
33             last_updated_by,
34             last_update_date,
35             last_update_login,
36             set_of_books_id,
37             org_id,
38             trx_number,
39             trx_date,
40             trx_currency,
41             reference_number,
42             trx_class,
43             batch_source_id,
44             cust_trx_type_id,
45             gl_date,
46             bill_to_customer_id,
47             bill_to_account_number,
48             bill_to_customer_name,
49             bill_to_location_id,
50             bill_to_contact_id,
51             bill_to_address_id,
52             bill_to_site_use_id,
53             ship_to_customer_id,
54             ship_to_account_number,
55             ship_to_customer_name,
56             ship_to_location_id,
57             ship_to_contact_id,
58             ship_to_address_id,
59             ship_to_site_use_id,
60             sold_to_customer_id,
61             sold_to_site_use_id,
62             sold_to_contact_id,
63             term_id,
64             primary_salesrep_id,
65             primary_salesrep_name,
66             exchange_rate_type,
67             exchange_date,
68             exchange_rate,
69             territory_id,
70             remit_to_address_id,
71             invoicing_rule_id,
72             shipment_id,
73             printing_option,
74 	    printing_count,
75             purchase_order,
76 	    purchase_order_revision,
77 	    purchase_order_date,
78 	    customer_reference,
79 	    customer_reference_date,
80 	    comments,
81 	    internal_notes,
82             finance_charges,
83 	    credit_method_for_rules,
84 	    credit_method_for_installments,
85 	    receipt_method_id,
86             related_customer_trx_id,
87             agreement_id,
88 	    ship_via,
89 	    ship_date_actual,
90 	    waybill_number,
91 	    fob_point,
92 	    customer_bank_account_id,
93 	    default_ussgl_trx_code_context,
94 	    default_ussgl_transaction_code,
95 	    recurred_from_trx_number,
96             status_trx,
97 	    paying_customer_id,
98 	    paying_site_use_id,
99 	    default_tax_exempt_flag,
100             mrc_exchange_rate_type,
101             mrc_exchange_date,
102             mrc_exchange_rate,
103             doc_sequence_id,
104             doc_sequence_value,
105             attribute_category,
106             attribute1,
107             attribute2,
108             attribute3,
109             attribute4,
110             attribute5,
111             attribute6,
112             attribute7,
113             attribute8,
114             attribute9,
115             attribute10,
116             attribute11,
117             attribute12,
118             attribute13,
119             attribute14,
120             attribute15,
121             global_attribute_category,
122             global_attribute1,
123             global_attribute2,
124             global_attribute3,
125             global_attribute4,
126             global_attribute5,
127             global_attribute6,
128             global_attribute7,
129             global_attribute8,
130             global_attribute9,
131             global_attribute10,
132             global_attribute11,
133             global_attribute12,
134             global_attribute13,
135             global_attribute14,
136             global_attribute15,
137             global_attribute16,
138             global_attribute17,
139             global_attribute18,
140             global_attribute19,
141             global_attribute20,
142             global_attribute21,
143             global_attribute22,
144             global_attribute23,
145             global_attribute24,
146             global_attribute25,
147             global_attribute26,
148             global_attribute27,
149             global_attribute28,
150             global_attribute29,
151             global_attribute30,
152             interface_header_context,
153             interface_header_attribute1,
154             interface_header_attribute2,
155             interface_header_attribute3,
156             interface_header_attribute4,
157             interface_header_attribute5,
158             interface_header_attribute6,
159             interface_header_attribute7,
160             interface_header_attribute8,
161             interface_header_attribute9,
162             interface_header_attribute10,
163             interface_header_attribute11,
164             interface_header_attribute12,
165             interface_header_attribute13,
166             interface_header_attribute14,
167             interface_header_attribute15,
168             legal_entity_id,
169             payment_trxn_extension_id,
170             billing_date,
171             interest_header_id,
172             late_charges_assessed,
173             batch_id,
174             request_id,
175             defaulted_gl_date_flag,
176 
177             document_sub_type,
178             default_taxation_country,
179 	    mandate_last_trx_flag)
180         VALUES
181             (p_trx_header_tbl(i).trx_header_id,
182              ra_customer_trx_s.nextval,
183              fnd_global.user_id,
184              sysdate,
185              'AR_INVOICE_API',                                  -- 5921925
186              fnd_global.user_id,
187              sysdate,
188              fnd_global.login_id,
189              arp_global.sysparam.set_of_books_id,               -- 5921925
190              arp_global.sysparam.org_id,                        -- 5921925
191              p_trx_header_tbl(i).trx_number,
192              NVL(trunc(p_trx_header_tbl(i).trx_date),trunc(sysdate)),/*5921925,8963998*/
193              NVL(p_trx_header_tbl(i).trx_currency,
194                    arp_global.functional_currency),             -- 5921925
195              p_trx_header_tbl(i).reference_number,
196              p_trx_header_tbl(i).trx_class,
197              p_batch_source_rec.batch_source_id,
198              p_trx_header_tbl(i).cust_trx_type_id,
199              NVL(trunc(p_trx_header_tbl(i).gl_date),
200                  p_batch_source_rec.default_date),              -- 5921925
201              p_trx_header_tbl(i).bill_to_customer_id,
202              p_trx_header_tbl(i).bill_to_account_number,
203              p_trx_header_tbl(i).bill_to_customer_name,
204              null, -- p_trx_header_tbl(i).bill_to_location_id,
205              p_trx_header_tbl(i).bill_to_contact_id,
206              p_trx_header_tbl(i).bill_to_address_id,
207              p_trx_header_tbl(i).bill_to_site_use_id,
208              p_trx_header_tbl(i).ship_to_customer_id,
209              p_trx_header_tbl(i).ship_to_account_number,
210              p_trx_header_tbl(i).ship_to_customer_name,
211              null, -- p_trx_header_tbl(i).ship_to_location_id,
212              p_trx_header_tbl(i).ship_to_contact_id,
213              p_trx_header_tbl(i).ship_to_address_id,
214              p_trx_header_tbl(i).ship_to_site_use_id,
215              NVL(p_trx_header_tbl(i).sold_to_customer_id,
216                  p_trx_header_tbl(i).bill_to_customer_id),
217              null, -- p_trx_header_tbl(i).sold_to_site_use_id,
218              null, -- p_trx_header_tbl(i).sold_to_contact_id,
219              p_trx_header_tbl(i).term_id,
220              p_trx_header_tbl(i).primary_salesrep_id,
221              p_trx_header_tbl(i).primary_salesrep_name,
222              p_trx_header_tbl(i).exchange_rate_type,
223              p_trx_header_tbl(i).exchange_date,
224              p_trx_header_tbl(i).exchange_rate,
225              p_trx_header_tbl(i).territory_id,
226              p_trx_header_tbl(i).remit_to_address_id,
227              p_trx_header_tbl(i).invoicing_rule_id,
228              null, -- p_trx_header_tbl(i).SHIPMENT_ID,
229              p_trx_header_tbl(i).PRINTING_OPTION,
230 	     null, -- p_trx_header_tbl(i).PRINTING_COUNT,
231              p_trx_header_tbl(i).PURCHASE_ORDER,
232 	     p_trx_header_tbl(i).PURCHASE_ORDER_REVISION,
233 	     p_trx_header_tbl(i).PURCHASE_ORDER_DATE,
234 	     null, -- p_trx_header_tbl(i).CUSTOMER_REFERENCE,
235 	     null, -- p_trx_header_tbl(i).CUSTOMER_REFERENCE_DATE,
236 	     p_trx_header_tbl(i).COMMENTS,
237 	     p_trx_header_tbl(i).INTERNAL_NOTES,
238              p_trx_header_tbl(i).FINANCE_CHARGES,
239 	     null, --p_trx_header_tbl(i).CREDIT_METHOD_FOR_RULES,
240 	     null, --p_trx_header_tbl(i).CREDIT_METHOD_FOR_INSTALLMENTS,
241 	     p_trx_header_tbl(i).RECEIPT_METHOD_ID,
242              p_trx_header_tbl(i).RELATED_CUSTOMER_TRX_ID,
243              p_trx_header_tbl(i).agreement_id,
244 	     p_trx_header_tbl(i).SHIP_VIA,
245 	     p_trx_header_tbl(i).SHIP_DATE_ACTUAL,
246 	     p_trx_header_tbl(i).WAYBILL_NUMBER,
247 	     p_trx_header_tbl(i).FOB_POINT,
248 	     p_trx_header_tbl(i).CUSTOMER_BANK_ACCOUNT_ID,
249 	     null, -- p_trx_header_tbl(i).DEFAULT_USSGL_TRX_CODE_CONTEXT,
250 	     p_trx_header_tbl(i).DEFAULT_USSGL_TRANSACTION_CODE,
251              null, -- p_trx_header_tbl(i).RECURRED_FROM_TRX_NUMBER,
252              p_trx_header_tbl(i).STATUS_TRX,
253 	     p_trx_header_tbl(i).PAYING_CUSTOMER_ID,
254 	     p_trx_header_tbl(i).PAYING_SITE_USE_ID,
255 	     p_trx_header_tbl(i).DEFAULT_TAX_EXEMPT_FLAG,
256              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_RATE_TYPE,
257              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_DATE,
258              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_RATE,
259              null, -- p_trx_header_tbl(i).doc_sequence_id,
260              p_trx_header_tbl(i).doc_sequence_value,
261              p_trx_header_tbl(i).attribute_category,
262              p_trx_header_tbl(i).attribute1,
263              p_trx_header_tbl(i).attribute2,
264              p_trx_header_tbl(i).attribute3,
265              p_trx_header_tbl(i).attribute4,
266              p_trx_header_tbl(i).attribute5,
267              p_trx_header_tbl(i).attribute6,
268              p_trx_header_tbl(i).attribute7,
269              p_trx_header_tbl(i).attribute8,
270              p_trx_header_tbl(i).attribute9,
271              p_trx_header_tbl(i).attribute10,
272              p_trx_header_tbl(i).attribute11,
273              p_trx_header_tbl(i).attribute12,
274              p_trx_header_tbl(i).attribute13,
275              p_trx_header_tbl(i).attribute14,
276              p_trx_header_tbl(i).attribute15,
277              p_trx_header_tbl(i).global_attribute_category,
278              p_trx_header_tbl(i).global_attribute1,
279              p_trx_header_tbl(i).global_attribute2,
280              p_trx_header_tbl(i).global_attribute3,
281              p_trx_header_tbl(i).global_attribute4,
282              p_trx_header_tbl(i).global_attribute5,
283              p_trx_header_tbl(i).global_attribute6,
284              p_trx_header_tbl(i).global_attribute7,
285              p_trx_header_tbl(i).global_attribute8,
286              p_trx_header_tbl(i).global_attribute9,
287              p_trx_header_tbl(i).global_attribute10,
288              p_trx_header_tbl(i).global_attribute11,
289              p_trx_header_tbl(i).global_attribute12,
290              p_trx_header_tbl(i).global_attribute13,
291              p_trx_header_tbl(i).global_attribute14,
292              p_trx_header_tbl(i).global_attribute15,
293              p_trx_header_tbl(i).global_attribute16,
294              p_trx_header_tbl(i).global_attribute17,
295              p_trx_header_tbl(i).global_attribute18,
296              p_trx_header_tbl(i).global_attribute19,
297              p_trx_header_tbl(i).global_attribute20,
298              p_trx_header_tbl(i).global_attribute21,
299              p_trx_header_tbl(i).global_attribute22,
300              p_trx_header_tbl(i).global_attribute23,
301              p_trx_header_tbl(i).global_attribute24,
302              p_trx_header_tbl(i).global_attribute25,
303              p_trx_header_tbl(i).global_attribute26,
304              p_trx_header_tbl(i).global_attribute27,
305              p_trx_header_tbl(i).global_attribute28,
306              p_trx_header_tbl(i).global_attribute29,
307              p_trx_header_tbl(i).global_attribute30,
308              p_trx_header_tbl(i).interface_header_context,
309              p_trx_header_tbl(i).interface_header_attribute1,
310              p_trx_header_tbl(i).interface_header_attribute2,
311              p_trx_header_tbl(i).interface_header_attribute3,
312              p_trx_header_tbl(i).interface_header_attribute4,
313              p_trx_header_tbl(i).interface_header_attribute5,
314              p_trx_header_tbl(i).interface_header_attribute6,
315              p_trx_header_tbl(i).interface_header_attribute7,
316              p_trx_header_tbl(i).interface_header_attribute8,
317              p_trx_header_tbl(i).interface_header_attribute9,
318              p_trx_header_tbl(i).interface_header_attribute10,
319              p_trx_header_tbl(i).interface_header_attribute11,
320              p_trx_header_tbl(i).interface_header_attribute12,
321              p_trx_header_tbl(i).interface_header_attribute13,
322              p_trx_header_tbl(i).interface_header_attribute14,
323              p_trx_header_tbl(i).interface_header_attribute15,
324              p_trx_header_tbl(i).legal_entity_id,
325              p_trx_header_tbl(i).payment_trxn_extension_id,
326              p_trx_header_tbl(i).billing_date,
327              p_trx_header_tbl(i).interest_header_id,
328              p_trx_header_tbl(i).late_charges_assessed,
329              AR_INVOICE_TABLE_HANDLER.g_batch_id,                 -- 5921925
330              AR_INVOICE_TABLE_HANDLER.g_request_id,               -- 5921925
331              DECODE(trunc(p_trx_header_tbl(i).gl_date),NULL, DECODE(p_batch_source_rec.default_date,NULL,'Y','N'),'N'),
332 
333              p_trx_header_tbl(i).document_sub_type,
334              p_trx_header_tbl(i).default_taxation_country,
335 	     p_trx_header_tbl(i).mandate_last_trx_flag );
336 
337    arp_util.debug ( 'insert header ' || (p_trx_header_tbl(i).trx_header_id) );
338    arp_util.debug ( 'insert header PMT' || (p_trx_header_tbl(i).payment_trxn_extension_id) );
339     END LOOP;
340 
341 
342 
343 
344     IF pg_debug = 'Y'
345     THEN
346         ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_HEADER.INERT_ROW(-)');
347     END IF;
348     EXCEPTION
349        WHEN OTHERS THEN
350          x_errmsg := 'Error in AR_TRX_GLOBAL_PROCESS_HEADER.INERT_ROW '||
351            sqlerrm;
352            x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
353            RETURN;
354 
355 END INSERT_ROW;
356 
357 END AR_TRX_GLOBAL_PROCESS_HEADER;