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 2007/12/21 06:40:06 kunsharm 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         VALUES
180             (p_trx_header_tbl(i).trx_header_id,
181              ra_customer_trx_s.nextval,
182              fnd_global.user_id,
183              sysdate,
184              'AR_INVOICE_API',                                  -- 5921925
185              fnd_global.user_id,
186              sysdate,
187              fnd_global.login_id,
188              arp_global.sysparam.set_of_books_id,               -- 5921925
189              arp_global.sysparam.org_id,                        -- 5921925
190              p_trx_header_tbl(i).trx_number,
191              NVL(p_trx_header_tbl(i).trx_date,trunc(sysdate)),  -- 5921925
192              NVL(p_trx_header_tbl(i).trx_currency,
193                    arp_global.functional_currency),             -- 5921925
194              p_trx_header_tbl(i).reference_number,
195              p_trx_header_tbl(i).trx_class,
196              p_batch_source_rec.batch_source_id,
197              p_trx_header_tbl(i).cust_trx_type_id,
198              NVL(trunc(p_trx_header_tbl(i).gl_date),
199                  p_batch_source_rec.default_date),              -- 5921925
200              p_trx_header_tbl(i).bill_to_customer_id,
201              p_trx_header_tbl(i).bill_to_account_number,
202              p_trx_header_tbl(i).bill_to_customer_name,
203              null, -- p_trx_header_tbl(i).bill_to_location_id,
204              p_trx_header_tbl(i).bill_to_contact_id,
205              p_trx_header_tbl(i).bill_to_address_id,
206              p_trx_header_tbl(i).bill_to_site_use_id,
207              p_trx_header_tbl(i).ship_to_customer_id,
208              p_trx_header_tbl(i).ship_to_account_number,
209              p_trx_header_tbl(i).ship_to_customer_name,
210              null, -- p_trx_header_tbl(i).ship_to_location_id,
211              p_trx_header_tbl(i).ship_to_contact_id,
212              p_trx_header_tbl(i).ship_to_address_id,
213              p_trx_header_tbl(i).ship_to_site_use_id,
214              NVL(p_trx_header_tbl(i).sold_to_customer_id,
215                  p_trx_header_tbl(i).bill_to_customer_id),
216              null, -- p_trx_header_tbl(i).sold_to_site_use_id,
217              null, -- p_trx_header_tbl(i).sold_to_contact_id,
218              p_trx_header_tbl(i).term_id,
219              p_trx_header_tbl(i).primary_salesrep_id,
220              p_trx_header_tbl(i).primary_salesrep_name,
221              p_trx_header_tbl(i).exchange_rate_type,
222              p_trx_header_tbl(i).exchange_date,
223              p_trx_header_tbl(i).exchange_rate,
224              p_trx_header_tbl(i).territory_id,
225              p_trx_header_tbl(i).remit_to_address_id,
226              p_trx_header_tbl(i).invoicing_rule_id,
227              null, -- p_trx_header_tbl(i).SHIPMENT_ID,
228              p_trx_header_tbl(i).PRINTING_OPTION,
229 	     null, -- p_trx_header_tbl(i).PRINTING_COUNT,
230              p_trx_header_tbl(i).PURCHASE_ORDER,
231 	     p_trx_header_tbl(i).PURCHASE_ORDER_REVISION,
232 	     p_trx_header_tbl(i).PURCHASE_ORDER_DATE,
233 	     null, -- p_trx_header_tbl(i).CUSTOMER_REFERENCE,
234 	     null, -- p_trx_header_tbl(i).CUSTOMER_REFERENCE_DATE,
235 	     p_trx_header_tbl(i).COMMENTS,
236 	     p_trx_header_tbl(i).INTERNAL_NOTES,
237              p_trx_header_tbl(i).FINANCE_CHARGES,
238 	     null, --p_trx_header_tbl(i).CREDIT_METHOD_FOR_RULES,
239 	     null, --p_trx_header_tbl(i).CREDIT_METHOD_FOR_INSTALLMENTS,
240 	     p_trx_header_tbl(i).RECEIPT_METHOD_ID,
241              p_trx_header_tbl(i).RELATED_CUSTOMER_TRX_ID,
242              p_trx_header_tbl(i).agreement_id,
243 	     p_trx_header_tbl(i).SHIP_VIA,
244 	     p_trx_header_tbl(i).SHIP_DATE_ACTUAL,
245 	     p_trx_header_tbl(i).WAYBILL_NUMBER,
246 	     p_trx_header_tbl(i).FOB_POINT,
247 	     p_trx_header_tbl(i).CUSTOMER_BANK_ACCOUNT_ID,
248 	     null, -- p_trx_header_tbl(i).DEFAULT_USSGL_TRX_CODE_CONTEXT,
249 	     p_trx_header_tbl(i).DEFAULT_USSGL_TRANSACTION_CODE,
250              null, -- p_trx_header_tbl(i).RECURRED_FROM_TRX_NUMBER,
251              p_trx_header_tbl(i).STATUS_TRX,
252 	     p_trx_header_tbl(i).PAYING_CUSTOMER_ID,
253 	     p_trx_header_tbl(i).PAYING_SITE_USE_ID,
254 	     p_trx_header_tbl(i).DEFAULT_TAX_EXEMPT_FLAG,
255              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_RATE_TYPE,
256              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_DATE,
257              null, -- p_trx_header_tbl(i).MRC_EXCHANGE_RATE,
258              null, -- p_trx_header_tbl(i).doc_sequence_id,
259              p_trx_header_tbl(i).doc_sequence_value,
260              p_trx_header_tbl(i).attribute_category,
261              p_trx_header_tbl(i).attribute1,
262              p_trx_header_tbl(i).attribute2,
263              p_trx_header_tbl(i).attribute3,
264              p_trx_header_tbl(i).attribute4,
265              p_trx_header_tbl(i).attribute5,
266              p_trx_header_tbl(i).attribute6,
267              p_trx_header_tbl(i).attribute7,
268              p_trx_header_tbl(i).attribute8,
269              p_trx_header_tbl(i).attribute9,
270              p_trx_header_tbl(i).attribute10,
271              p_trx_header_tbl(i).attribute11,
272              p_trx_header_tbl(i).attribute12,
273              p_trx_header_tbl(i).attribute13,
274              p_trx_header_tbl(i).attribute14,
275              p_trx_header_tbl(i).attribute15,
276              p_trx_header_tbl(i).global_attribute_category,
277              p_trx_header_tbl(i).global_attribute1,
278              p_trx_header_tbl(i).global_attribute2,
279              p_trx_header_tbl(i).global_attribute3,
280              p_trx_header_tbl(i).global_attribute4,
281              p_trx_header_tbl(i).global_attribute5,
282              p_trx_header_tbl(i).global_attribute6,
283              p_trx_header_tbl(i).global_attribute7,
284              p_trx_header_tbl(i).global_attribute8,
285              p_trx_header_tbl(i).global_attribute9,
286              p_trx_header_tbl(i).global_attribute10,
287              p_trx_header_tbl(i).global_attribute11,
288              p_trx_header_tbl(i).global_attribute12,
289              p_trx_header_tbl(i).global_attribute13,
290              p_trx_header_tbl(i).global_attribute14,
291              p_trx_header_tbl(i).global_attribute15,
292              p_trx_header_tbl(i).global_attribute16,
293              p_trx_header_tbl(i).global_attribute17,
294              p_trx_header_tbl(i).global_attribute18,
295              p_trx_header_tbl(i).global_attribute19,
296              p_trx_header_tbl(i).global_attribute20,
297              p_trx_header_tbl(i).global_attribute21,
298              p_trx_header_tbl(i).global_attribute22,
299              p_trx_header_tbl(i).global_attribute23,
300              p_trx_header_tbl(i).global_attribute24,
301              p_trx_header_tbl(i).global_attribute25,
302              p_trx_header_tbl(i).global_attribute26,
303              p_trx_header_tbl(i).global_attribute27,
304              p_trx_header_tbl(i).global_attribute28,
305              p_trx_header_tbl(i).global_attribute29,
306              p_trx_header_tbl(i).global_attribute30,
307              p_trx_header_tbl(i).interface_header_context,
308              p_trx_header_tbl(i).interface_header_attribute1,
309              p_trx_header_tbl(i).interface_header_attribute2,
310              p_trx_header_tbl(i).interface_header_attribute3,
311              p_trx_header_tbl(i).interface_header_attribute4,
312              p_trx_header_tbl(i).interface_header_attribute5,
313              p_trx_header_tbl(i).interface_header_attribute6,
314              p_trx_header_tbl(i).interface_header_attribute7,
315              p_trx_header_tbl(i).interface_header_attribute8,
316              p_trx_header_tbl(i).interface_header_attribute9,
317              p_trx_header_tbl(i).interface_header_attribute10,
318              p_trx_header_tbl(i).interface_header_attribute11,
319              p_trx_header_tbl(i).interface_header_attribute12,
320              p_trx_header_tbl(i).interface_header_attribute13,
321              p_trx_header_tbl(i).interface_header_attribute14,
322              p_trx_header_tbl(i).interface_header_attribute15,
323              p_trx_header_tbl(i).legal_entity_id,
324              p_trx_header_tbl(i).payment_trxn_extension_id,
325              p_trx_header_tbl(i).billing_date,
326              p_trx_header_tbl(i).interest_header_id,
327              p_trx_header_tbl(i).late_charges_assessed,
328              AR_INVOICE_TABLE_HANDLER.g_batch_id,                 -- 5921925
329              AR_INVOICE_TABLE_HANDLER.g_request_id,               -- 5921925
330              DECODE(trunc(p_trx_header_tbl(i).gl_date),NULL, DECODE(p_batch_source_rec.default_date,NULL,'Y','N'),'N'),
331 
332              p_trx_header_tbl(i).document_sub_type,
333              p_trx_header_tbl(i).default_taxation_country);
334 
335    arp_util.debug ( 'insert header ' || (p_trx_header_tbl(i).trx_header_id) );
336    arp_util.debug ( 'insert header PMT' || (p_trx_header_tbl(i).payment_trxn_extension_id) );
337     END LOOP;
338 
339 
340 
341 
342     IF pg_debug = 'Y'
343     THEN
344         ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_HEADER.INERT_ROW(-)');
345     END IF;
346     EXCEPTION
347        WHEN OTHERS THEN
348          x_errmsg := 'Error in AR_TRX_GLOBAL_PROCESS_HEADER.INERT_ROW '||
349            sqlerrm;
350            x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
351            RETURN;
352 
353 END INSERT_ROW;
354 
355 END AR_TRX_GLOBAL_PROCESS_HEADER;