[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;