[Home] [Help]
PACKAGE BODY: APPS.AR_TRX_GLOBAL_PROCESS_LINES
Source
1 PACKAGE BODY AR_TRX_GLOBAL_PROCESS_LINES AS
2 /* $Header: ARINGTLB.pls 120.17 2007/06/21 21:03:39 mraymond ship $ */
3
4 pg_debug VARCHAR2(1) := nvl(fnd_profile.value('AFLOG_ENABLED'),'N');
5
6 PROCEDURE INSERT_ROW (
7 p_trx_lines_tbl IN AR_INVOICE_API_PUB.trx_line_tbl_type,
8 x_errmsg OUT NOCOPY VARCHAR2,
9 x_return_status OUT NOCOPY VARCHAR2 ) IS
10 BEGIN
11
12 IF pg_debug = 'Y'
13 THEN
14 ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW (+)');
15 END IF;
16 x_return_status := FND_API.G_RET_STS_SUCCESS;
17 -- Now populate the lines global Temp. Table
18 FOR i IN p_trx_lines_tbl.FIRST .. p_trx_lines_tbl.LAST
19 LOOP
20
21 INSERT INTO ar_trx_lines_gt (
22 trx_line_id,
23 trx_header_id ,
24 customer_trx_line_id ,
25 link_to_trx_line_id,
26 LINE_NUMBER , -- required
27 LINE_TYPE , -- required
28 customer_trx_id ,
29 REASON_CODE ,
30 INVENTORY_ITEM_ID ,
31 DESCRIPTION ,
32 QUANTITY_ORDERED ,
33 QUANTITY_CREDITED ,
34 QUANTITY_INVOICED ,
35 UNIT_STANDARD_PRICE ,
36 UNIT_SELLING_PRICE ,
37 SALES_ORDER ,
38 SALES_ORDER_LINE ,
39 SALES_ORDER_DATE ,
40 ACCOUNTING_RULE_ID ,
41 RULE_START_DATE ,
42 ATTRIBUTE_CATEGORY ,
43 ATTRIBUTE1 ,
44 ATTRIBUTE2 ,
45 ATTRIBUTE3 ,
46 ATTRIBUTE4 ,
47 ATTRIBUTE5 ,
48 ATTRIBUTE6 ,
49 ATTRIBUTE7 ,
50 ATTRIBUTE8 ,
51 ATTRIBUTE9 ,
52 ATTRIBUTE10 ,
53 ATTRIBUTE11 ,
54 ATTRIBUTE12 ,
55 ATTRIBUTE13 ,
56 ATTRIBUTE14 ,
57 ATTRIBUTE15 ,
58 INTERFACE_LINE_CONTEXT ,
59 INTERFACE_LINE_ATTRIBUTE1 ,
60 INTERFACE_LINE_ATTRIBUTE2 ,
61 INTERFACE_LINE_ATTRIBUTE3 ,
62 INTERFACE_LINE_ATTRIBUTE4 ,
63 INTERFACE_LINE_ATTRIBUTE5 ,
64 INTERFACE_LINE_ATTRIBUTE6 ,
65 INTERFACE_LINE_ATTRIBUTE7 ,
66 INTERFACE_LINE_ATTRIBUTE8 ,
67 INTERFACE_LINE_ATTRIBUTE9 ,
68 INTERFACE_LINE_ATTRIBUTE10 ,
69 INTERFACE_LINE_ATTRIBUTE11 ,
70 INTERFACE_LINE_ATTRIBUTE12 ,
71 INTERFACE_LINE_ATTRIBUTE13 ,
72 INTERFACE_LINE_ATTRIBUTE14 ,
73 INTERFACE_LINE_ATTRIBUTE15 ,
74 SALES_ORDER_SOURCE , --channel in the form
75 EXTENDED_AMOUNT , -- required
76 REVENUE_AMOUNT ,
77 AUTORULE_COMPLETE_FLAG ,
78 TAX_PRECEDENCE ,
79 TAX_RATE ,
80 ITEM_EXCEPTION_RATE_ID ,
81 TAX_EXEMPTION_ID ,
82 MEMO_LINE_ID ,
83 AUTORULE_DURATION_PROCESSED ,
84 UOM_CODE ,
85 DEFAULT_USSGL_TRANSACTION_CODE ,
86 DEFAULT_USSGL_TRX_CODE_CONTEXT ,
87 VAT_TAX_ID ,
88 AUTOTAX ,
89 LAST_PERIOD_TO_CREDIT ,
90 ITEM_CONTEXT ,
91 TAX_EXEMPT_FLAG ,
92 TAX_EXEMPT_NUMBER ,
93 TAX_EXEMPT_REASON_CODE ,
94 TAX_VENDOR_RETURN_CODE ,
95 LOCATION_SEGMENT_ID ,
96 MOVEMENT_ID ,
97 GLOBAL_ATTRIBUTE1 ,
98 GLOBAL_ATTRIBUTE2 ,
99 GLOBAL_ATTRIBUTE3 ,
100 GLOBAL_ATTRIBUTE4 ,
101 GLOBAL_ATTRIBUTE5 ,
102 GLOBAL_ATTRIBUTE6 ,
103 GLOBAL_ATTRIBUTE7 ,
104 GLOBAL_ATTRIBUTE8 ,
105 GLOBAL_ATTRIBUTE9 ,
106 GLOBAL_ATTRIBUTE10 ,
107 GLOBAL_ATTRIBUTE11 ,
108 GLOBAL_ATTRIBUTE12 ,
109 GLOBAL_ATTRIBUTE13 ,
110 GLOBAL_ATTRIBUTE14 ,
111 GLOBAL_ATTRIBUTE15 ,
112 GLOBAL_ATTRIBUTE16 ,
113 GLOBAL_ATTRIBUTE17 ,
114 GLOBAL_ATTRIBUTE18 ,
115 GLOBAL_ATTRIBUTE19 ,
116 GLOBAL_ATTRIBUTE20 ,
117 GLOBAL_ATTRIBUTE_CATEGORY ,
118 GROSS_UNIT_SELLING_PRICE ,
119 GROSS_EXTENDED_AMOUNT ,
120 AMOUNT_INCLUDES_TAX_FLAG ,
121 TAXABLE_AMOUNT ,
122 WAREHOUSE_ID ,
123 EXTENDED_ACCTD_AMOUNT ,
124 CONTRACT_LINE_ID ,
125 SOURCE_DATA_KEY1 ,
126 SOURCE_DATA_KEY2 ,
127 SOURCE_DATA_KEY3 ,
128 SOURCE_DATA_KEY4 ,
129 SOURCE_DATA_KEY5 ,
130 INVOICED_LINE_ACCTG_LEVEL,
131 ship_via,
132 fob_point ,
133 waybill_number ,
134 SHIP_DATE_ACTUAL,
135 override_auto_accounting_flag ,
136 ORG_ID ,
137 rule_end_date,
138 request_id,
139 SOURCE_APPLICATION_ID,
140 SOURCE_EVENT_CLASS_CODE,
141 SOURCE_ENTITY_CODE,
142 SOURCE_TRX_ID,
143 SOURCE_TRX_LINE_ID,
144 SOURCE_TRX_LINE_TYPE,
145 SOURCE_TRX_DETAIL_TAX_LINE_ID,
146 HISTORICAL_FLAG,
147 TAXABLE_FLAG,
148 TAX_REGIME_CODE,
149 TAX,
150 TAX_STATUS_CODE,
151 TAX_RATE_CODE,
152 TAX_JURISDICTION_CODE,
153 TAX_CLASSIFICATION_CODE,
154 INTEREST_LINE_ID,
155 TRX_BUSINESS_CATEGORY,
156 PRODUCT_FISC_CLASSIFICATION,
157 PRODUCT_CATEGORY,
158 PRODUCT_TYPE,
159 LINE_INTENDED_USE,
160 ASSESSABLE_VALUE
161 )
162 VALUES (
163 p_trx_lines_tbl(i).trx_line_id,
164 p_trx_lines_tbl(i).trx_header_id,
165 RA_CUSTOMER_TRX_LINES_S.NEXTVAL,
166 p_trx_lines_tbl(i).link_to_trx_line_id,
167 p_trx_lines_tbl(i).LINE_number,
168 p_trx_lines_tbl(i).line_type,
169 null, --customer_trx_id
170 p_trx_lines_tbl(i).REASON_CODE,
171 p_trx_lines_tbl(i).INVENTORY_ITEM_ID,
172 p_trx_lines_tbl(i).DESCRIPTION,
173 p_trx_lines_tbl(i).QUANTITY_ORDERED,
174 null, -- p_trx_lines_tbl(i).QUANTITY_CREDITED,
175 p_trx_lines_tbl(i).QUANTITY_INVOICED,
176 p_trx_lines_tbl(i).UNIT_STANDARD_PRICE,
177 p_trx_lines_tbl(i).UNIT_SELLING_PRICE,
178 p_trx_lines_tbl(i).SALES_ORDER,
179 p_trx_lines_tbl(i).SALES_ORDER_LINE,
180 p_trx_lines_tbl(i).SALES_ORDER_DATE,
181 p_trx_lines_tbl(i).ACCOUNTING_RULE_ID,
182 p_trx_lines_tbl(i).RULE_START_DATE,
183 p_trx_lines_tbl(i).ATTRIBUTE_CATEGORY,
184 p_trx_lines_tbl(i).ATTRIBUTE1,
185 p_trx_lines_tbl(i).ATTRIBUTE2,
186 p_trx_lines_tbl(i).ATTRIBUTE3,
187 p_trx_lines_tbl(i).ATTRIBUTE4,
188 p_trx_lines_tbl(i).ATTRIBUTE5,
189 p_trx_lines_tbl(i).ATTRIBUTE6,
190 p_trx_lines_tbl(i).ATTRIBUTE7,
191 p_trx_lines_tbl(i).ATTRIBUTE8,
192 p_trx_lines_tbl(i).ATTRIBUTE9,
193 p_trx_lines_tbl(i).ATTRIBUTE10,
194 p_trx_lines_tbl(i).ATTRIBUTE11,
195 p_trx_lines_tbl(i).ATTRIBUTE12,
196 p_trx_lines_tbl(i).ATTRIBUTE13 ,
197 p_trx_lines_tbl(i).ATTRIBUTE14 ,
198 p_trx_lines_tbl(i).ATTRIBUTE15 ,
199 p_trx_lines_tbl(i).INTERFACE_LINE_CONTEXT ,
200 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE1 ,
201 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE2 ,
202 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE3 ,
203 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE4 ,
204 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE5 ,
205 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE6 ,
206 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE7 ,
207 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE8 ,
208 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE9 ,
209 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE10 ,
210 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE11 ,
211 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE12 ,
212 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE13 ,
213 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE14 ,
214 p_trx_lines_tbl(i).INTERFACE_LINE_ATTRIBUTE15 ,
215 p_trx_lines_tbl(i).SALES_ORDER_SOURCE , --channel in the form
216 p_trx_lines_tbl(i).AMOUNT , -- required
217 null, -- p_trx_lines_tbl(i).REVENUE_AMOUNT ,
218 DECODE(p_trx_lines_tbl(i).accounting_rule_id, NULL, NULL, 'N'),
219 p_trx_lines_tbl(i).TAX_PRECEDENCE ,
220 p_trx_lines_tbl(i).TAX_RATE ,
221 null, -- p_trx_lines_tbl(i).ITEM_EXCEPTION_RATE_ID ,
222 p_trx_lines_tbl(i).TAX_EXEMPTION_ID ,
223 p_trx_lines_tbl(i).MEMO_LINE_ID ,
224 null, -- p_trx_lines_tbl(i).AUTORULE_DURATION_PROCESSED ,
225 p_trx_lines_tbl(i).UOM_CODE ,
226 p_trx_lines_tbl(i).DEFAULT_USSGL_TRANSACTION_CODE ,
227 p_trx_lines_tbl(i).DEFAULT_USSGL_TRX_CODE_CONTEXT ,
228 p_trx_lines_tbl(i).VAT_TAX_ID ,
229 'N', -- p_trx_lines_tbl(i).AUTOTAX ,
230 null, -- p_trx_lines_tbl(i).LAST_PERIOD_TO_CREDIT ,
231 null, -- p_trx_lines_tbl(i).ITEM_CONTEXT ,
232 p_trx_lines_tbl(i).TAX_EXEMPT_FLAG ,
233 p_trx_lines_tbl(i).TAX_EXEMPT_NUMBER ,
234 p_trx_lines_tbl(i).TAX_EXEMPT_REASON_CODE ,
235 null, -- p_trx_lines_tbl(i).TAX_VENDOR_RETURN_CODE ,
236 null, -- p_trx_lines_tbl(i).LOCATION_SEGMENT_ID ,
237 p_trx_lines_tbl(i).MOVEMENT_ID ,
238 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE1 ,
239 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE2 ,
240 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE3 ,
241 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE4 ,
242 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE5 ,
243 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE6 ,
244 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE7 ,
245 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE8 ,
246 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE9 ,
247 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE10 ,
248 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE11 ,
249 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE12 ,
250 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE13 ,
251 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE14 ,
252 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE15 ,
253 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE16 ,
254 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE17 ,
255 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE18 ,
256 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE19 ,
257 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE20 ,
258 p_trx_lines_tbl(i).GLOBAL_ATTRIBUTE_CATEGORY ,
259 null, -- p_trx_lines_tbl(i).GROSS_UNIT_SELLING_PRICE,
260 null, -- p_trx_lines_tbl(i).GROSS_EXTENDED_AMOUNT ,
261 p_trx_lines_tbl(i).AMOUNT_INCLUDES_TAX_FLAG,
262 null, -- p_trx_lines_tbl(i).TAXABLE_AMOUNT,
263 p_trx_lines_tbl(i).WAREHOUSE_ID,
264 null, -- p_trx_lines_tbl(i).EXTENDED_ACCTD_AMOUNT,
265 p_trx_lines_tbl(i).CONTRACT_LINE_ID ,
266 p_trx_lines_tbl(i).SOURCE_DATA_KEY1 ,
267 p_trx_lines_tbl(i).SOURCE_DATA_KEY2 ,
268 p_trx_lines_tbl(i).SOURCE_DATA_KEY3 ,
269 p_trx_lines_tbl(i).SOURCE_DATA_KEY4 ,
270 p_trx_lines_tbl(i).SOURCE_DATA_KEY5 ,
271 p_trx_lines_tbl(i).INVOICED_LINE_ACCTG_LEVEL,
272 null, -- p_trx_lines_tbl(i).ship_via ,
273 null, -- p_trx_lines_tbl(i).fob_point ,
274 null, -- p_trx_lines_tbl(i).waybill_number ,
275 p_trx_lines_tbl(i).SHIP_DATE_ACTUAL,
276 p_trx_lines_tbl(i).override_auto_accounting_flag ,
277 arp_standard.sysparm.org_id ,
278 p_trx_lines_tbl(i).rule_end_date,
279 ar_invoice_table_handler.g_request_id,
280 p_trx_lines_tbl(i).source_application_id,
281 p_trx_lines_tbl(i).source_event_class_code,
282 p_trx_lines_tbl(i).source_entity_code,
283 p_trx_lines_tbl(i).source_trx_id,
284 p_trx_lines_tbl(i).source_trx_line_id,
285 p_trx_lines_tbl(i).source_trx_line_type,
286 p_trx_lines_tbl(i).source_trx_detail_tax_line_id,
287 p_trx_lines_tbl(i).historical_flag,
288 p_trx_lines_tbl(i).taxable_flag,
289 p_trx_lines_tbl(i).tax_regime_code,
290 p_trx_lines_tbl(i).tax,
291 p_trx_lines_tbl(i).tax_status_code,
292 p_trx_lines_tbl(i).tax_rate_code,
293 p_trx_lines_tbl(i).tax_jurisdiction_code,
294 p_trx_lines_tbl(i).tax_classification_code,
295 p_trx_lines_tbl(i).interest_line_id,
296 p_trx_lines_tbl(i).trx_business_category,
297 p_trx_lines_tbl(i).product_fisc_classification,
298 p_trx_lines_tbl(i).product_category,
299 p_trx_lines_tbl(i).product_type,
300 p_trx_lines_tbl(i).line_intended_use,
301 p_trx_lines_tbl(i).assessable_value
302 );
303 END LOOP;
304
305 IF pg_debug = 'Y'
306 THEN
307 ar_invoice_utils.debug ('AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW (-)');
308 END IF;
309 EXCEPTION
310 WHEN OTHERS THEN
311 x_errmsg := 'Error in AR_TRX_GLOBAL_PROCESS_LINES.INSERT_ROW '||sqlerrm;
312 x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
313 return;
314
315 END INSERT_ROW;
316
317 END AR_TRX_GLOBAL_PROCESS_LINES;