[Home] [Help]
PACKAGE BODY: APPS.ZX_TRX_MASTER
Source
1 PACKAGE BODY ZX_TRX_MASTER AS
2 /* $Header: zxritsimmasterb.pls 120.27 2006/09/22 01:44:10 pla ship $ */
3
4 g_current_runtime_level NUMBER;
5 g_level_statement CONSTANT NUMBER := FND_LOG.LEVEL_STATEMENT;
6 g_level_procedure CONSTANT NUMBER := FND_LOG.LEVEL_PROCEDURE;
7 g_level_event CONSTANT NUMBER := FND_LOG.LEVEL_EVENT;
8 g_level_unexpected CONSTANT NUMBER := FND_LOG.LEVEL_UNEXPECTED;
9
10 PROCEDURE Insert_Row
11 (p_Rowid IN OUT NOCOPY VARCHAR2,
12 p_first_pty_org_id NUMBER,
13 p_internal_organization_id NUMBER,
14 p_internal_org_location_id NUMBER,
15 p_application_id NUMBER,
16 p_entity_code VARCHAR2,
17 p_event_class_code VARCHAR2,
18 p_event_type_code VARCHAR2,
19 p_trx_id NUMBER,
20 p_tax_event_type_code VARCHAR2,
21 --p_trx_level_type VARCHAR2,
22 p_trx_date DATE,
23 p_ledger_id NUMBER,
24 p_trx_currency_code VARCHAR2,
25 p_currency_conversion_date DATE,
26 p_currency_conversion_rate NUMBER,
27 p_currency_conversion_type VARCHAR2,
28 p_minimum_accountable_unit NUMBER,
29 p_precision NUMBER,
30 p_legal_entity_ptp_id NUMBER,
31 p_legal_entity_id NUMBER,
32 p_rounding_ship_to_party_id NUMBER,
33 p_rounding_ship_from_party_id NUMBER,
34 p_rounding_bill_to_party_id NUMBER,
35 p_rounding_bill_from_party_id NUMBER,
36 p_rndg_ship_to_party_site_id NUMBER,
37 p_rndg_ship_from_party_site_id NUMBER,
38 p_rndg_bill_to_party_site_id NUMBER,
39 p_rndg_bill_from_party_site_id NUMBER,
40 p_bill_from_party_site_id NUMBER,
41 p_bill_to_party_site_id NUMBER,
42 p_ship_from_party_site_id NUMBER,
43 p_ship_to_party_site_id NUMBER,
44 p_ship_to_party_id NUMBER,
45 p_ship_from_party_id NUMBER,
46 p_bill_to_party_id NUMBER,
47 p_bill_from_party_id NUMBER,
48 p_ship_to_location_id NUMBER,
49 p_ship_from_location_id NUMBER,
50 p_bill_to_location_id NUMBER,
51 p_bill_from_location_id NUMBER,
52 p_poa_location_id NUMBER,
53 p_poo_location_id NUMBER,
54 p_paying_location_id NUMBER,
55 p_own_hq_location_id NUMBER,
56 p_trading_hq_location_id NUMBER,
57 p_poc_location_id NUMBER,
58 p_poi_location_id NUMBER,
59 p_pod_location_id NUMBER,
60 p_title_transfer_location_id NUMBER,
61 p_trx_number VARCHAR2,
62 p_trx_description VARCHAR2,
63 p_document_sub_type VARCHAR2,
64 p_supplier_tax_invoice_number NUMBER,
65 p_supplier_tax_invoice_date DATE,
66 p_supplier_exchange_rate NUMBER,
67 p_tax_invoice_date DATE,
68 p_tax_invoice_number NUMBER,
69 p_tax_manual_entry_flag VARCHAR2,
70 p_establishment_id NUMBER,
71 p_receivables_trx_type_id NUMBER,
72 p_default_taxation_country VARCHAR2,
73 p_quote_flag VARCHAR2,
74 p_ctrl_total_hdr_tx_amt NUMBER,
75 p_port_of_entry_code VARCHAR2,
76 p_tax_reporting_flag VARCHAR2,
77 p_ship_to_cust_acct_siteuse_id NUMBER,
78 p_bill_to_cust_acct_siteuse_id NUMBER,
79 p_provnl_tax_determ_date DATE,
80 p_applied_to_trx_number VARCHAR2,
81 p_ship_third_pty_acct_id NUMBER,
82 p_bill_third_pty_acct_id NUMBER,
83 p_ship_third_pty_acct_site_id NUMBER,
84 p_bill_third_pty_acct_site_id NUMBER,
85 p_validation_check_flag VARCHAR2,
86 p_object_version_number NUMBER,
87 p_created_by NUMBER,
88 p_creation_date DATE,
89 p_last_updated_by NUMBER,
90 p_last_update_date DATE,
91 p_last_update_login NUMBER) IS
92
93 l_set_of_books_id NUMBER;
94 p_error_buffer VARCHAR2(100);
95
96 CURSOR C IS
97 SELECT rowid
98 FROM zx_transaction
99 WHERE APPLICATION_ID = p_application_id
100 AND ENTITY_CODE = p_entity_code
101 AND EVENT_CLASS_CODE = p_event_class_code
102 AND TRX_ID = p_trx_id;
103
104 BEGIN
105 g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
106
107 IF (g_level_procedure >= g_current_runtime_level ) THEN
108 FND_LOG.STRING(g_level_procedure,
109 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row.BEGIN',
110 'ZX_TRX_MASTER: Insert_Row (+)');
111 FND_LOG.STRING(g_level_procedure,
112 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row',
113 'Insert into ZX_TRANSACTION (+)');
114 END IF;
115
116 INSERT INTO ZX_TRANSACTION (FIRST_PTY_ORG_ID,
117 INTERNAL_ORGANIZATION_ID,
118 INTERNAL_ORG_LOCATION_ID,
119 APPLICATION_ID,
120 ENTITY_CODE,
121 EVENT_CLASS_CODE,
122 EVENT_TYPE_CODE,
123 TRX_ID,
124 TAX_EVENT_TYPE_CODE,
125 DOCUMENT_EVENT_TYPE,
126 --TRX_LEVEL_TYPE,
127 TRX_DATE,
128 LEDGER_ID,
129 TRX_CURRENCY_CODE,
130 CURRENCY_CONVERSION_DATE,
131 CURRENCY_CONVERSION_RATE,
132 CURRENCY_CONVERSION_TYPE,
133 MINIMUM_ACCOUNTABLE_UNIT,
134 PRECISION,
135 LEGAL_ENTITY_PTP_ID,
136 LEGAL_ENTITY_ID,
137 ROUNDING_SHIP_TO_PARTY_ID,
138 ROUNDING_SHIP_FROM_PARTY_ID,
139 ROUNDING_BILL_TO_PARTY_ID,
140 ROUNDING_BILL_FROM_PARTY_ID,
141 RNDG_SHIP_TO_PARTY_SITE_ID,
142 RNDG_SHIP_FROM_PARTY_SITE_ID,
143 RNDG_BILL_TO_PARTY_SITE_ID,
144 RNDG_BILL_FROM_PARTY_SITE_ID,
145 BILL_FROM_PARTY_SITE_ID,
146 BILL_TO_PARTY_SITE_ID,
147 SHIP_FROM_PARTY_SITE_ID,
148 SHIP_TO_PARTY_SITE_ID,
149 SHIP_TO_PARTY_ID,
150 SHIP_FROM_PARTY_ID,
151 BILL_TO_PARTY_ID,
152 BILL_FROM_PARTY_ID,
153 SHIP_TO_LOCATION_ID,
154 SHIP_FROM_LOCATION_ID,
155 BILL_TO_LOCATION_ID,
156 BILL_FROM_LOCATION_ID,
157 POA_LOCATION_ID,
158 POO_LOCATION_ID,
159 PAYING_LOCATION_ID,
160 OWN_HQ_LOCATION_ID,
161 TRADING_HQ_LOCATION_ID,
162 POC_LOCATION_ID,
163 POI_LOCATION_ID,
164 POD_LOCATION_ID,
165 TITLE_TRANSFER_LOCATION_ID,
166 TRX_NUMBER,
167 TRX_DESCRIPTION,
168 DOCUMENT_SUB_TYPE,
169 SUPPLIER_TAX_INVOICE_NUMBER,
170 SUPPLIER_TAX_INVOICE_DATE,
171 SUPPLIER_EXCHANGE_RATE,
172 TAX_INVOICE_DATE,
173 TAX_INVOICE_NUMBER,
174 TAX_MANUAL_ENTRY_FLAG,
175 ESTABLISHMENT_ID,
176 RECEIVABLES_TRX_TYPE_ID,
177 DEFAULT_TAXATION_COUNTRY,
178 QUOTE_FLAG,
179 CTRL_TOTAL_HDR_TX_AMT,
180 PORT_OF_ENTRY_CODE,
181 TAX_REPORTING_FLAG,
182 SHIP_TO_CUST_ACCT_SITE_USE_ID,
183 BILL_TO_CUST_ACCT_SITE_USE_ID,
184 PROVNL_TAX_DETERMINATION_DATE,
185 APPLIED_TO_TRX_NUMBER,
186 SHIP_THIRD_PTY_ACCT_ID,
187 BILL_THIRD_PTY_ACCT_ID,
188 SHIP_THIRD_PTY_ACCT_SITE_ID,
189 BILL_THIRD_PTY_ACCT_SITE_ID,
190 VALIDATION_CHECK_FLAG,
191 OBJECT_VERSION_NUMBER,
192 CREATED_BY,
193 CREATION_DATE,
194 LAST_UPDATED_BY,
195 LAST_UPDATE_DATE,
196 LAST_UPDATE_LOGIN)
197 VALUES (p_first_pty_org_id,
198 p_internal_organization_id,
199 p_internal_org_location_id,
200 p_application_id,
201 p_entity_code,
202 p_event_class_code,
203 p_event_type_code,
204 p_trx_id,
205 p_tax_event_type_code,
206 p_event_type_code,
207 --p_trx_level_type,
208 p_trx_date,
209 p_ledger_id,
210 p_trx_currency_code,
211 p_currency_conversion_date,
212 p_currency_conversion_rate,
213 p_currency_conversion_type,
214 p_minimum_accountable_unit,
215 p_precision,
216 p_legal_entity_ptp_id,
217 p_legal_entity_id,
218 p_rounding_ship_to_party_id,
219 p_rounding_ship_from_party_id,
220 p_rounding_bill_to_party_id,
221 p_rounding_bill_from_party_id,
222 p_rndg_ship_to_party_site_id,
223 p_rndg_ship_from_party_site_id,
224 p_rndg_bill_to_party_site_id,
225 p_rndg_bill_from_party_site_id,
226 p_bill_from_party_site_id,
227 p_bill_to_party_site_id,
228 p_ship_from_party_site_id,
229 p_ship_to_party_site_id,
230 p_ship_to_party_id,
231 p_ship_from_party_id,
232 p_bill_to_party_id,
233 p_bill_from_party_id,
234 p_ship_to_location_id,
235 p_ship_from_location_id,
236 p_bill_to_location_id,
237 p_bill_from_location_id,
238 p_poa_location_id,
239 p_poo_location_id,
240 p_paying_location_id,
241 p_own_hq_location_id,
242 p_trading_hq_location_id,
243 p_poc_location_id,
244 p_poi_location_id,
245 p_pod_location_id,
246 p_title_transfer_location_id,
247 p_trx_number,
248 p_trx_description,
249 p_document_sub_type,
250 p_supplier_tax_invoice_number,
251 p_supplier_tax_invoice_date,
252 p_supplier_exchange_rate,
253 p_tax_invoice_date,
254 p_tax_invoice_number,
255 p_tax_manual_entry_flag,
256 p_establishment_id,
257 p_receivables_trx_type_id,
258 p_default_taxation_country,
259 p_quote_flag,
260 p_ctrl_total_hdr_tx_amt,
261 p_port_of_entry_code,
262 p_tax_reporting_flag,
263 p_ship_to_cust_acct_siteuse_id,
264 p_bill_to_cust_acct_siteuse_id,
265 p_provnl_tax_determ_date,
266 p_applied_to_trx_number,
267 p_ship_third_pty_acct_id,
268 p_bill_third_pty_acct_id,
269 p_ship_third_pty_acct_site_id,
270 p_bill_third_pty_acct_site_id,
271 p_validation_check_flag,
272 1, --p_object_version_number,
273 p_created_by,
274 p_creation_date,
275 p_last_updated_by,
276 p_last_update_date,
277 p_last_update_login);
278
279 OPEN C;
280 FETCH C INTO p_Rowid;
281 IF (C%NOTFOUND) THEN
282 CLOSE C;
283 Raise NO_DATA_FOUND;
284 END IF;
285 CLOSE C;
286
287 IF (g_level_procedure >= g_current_runtime_level ) THEN
288 FND_LOG.STRING(g_level_procedure,
289 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row',
290 'Insert into ZX_TRANSACTION (-)');
291 FND_LOG.STRING(g_level_procedure,
292 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row',
293 'Insert into ZX_SIM_PURGE (+)');
294 END IF;
295
296 INSERT INTO ZX_SIM_PURGE (TRX_ID,
297 APPLICATION_ID,
298 ENTITY_CODE,
299 EVENT_CLASS_CODE,
300 CREATED_BY,
301 CREATION_DATE,
302 LAST_UPDATED_BY,
303 LAST_UPDATE_DATE,
304 LAST_UPDATE_LOGIN)
305 VALUES (p_trx_id,
306 p_application_id,
307 p_entity_code,
308 p_event_class_code,
309 p_created_by,
310 p_creation_date,
311 p_last_updated_by,
312 p_last_update_date,
313 p_last_update_login);
314
315 IF (g_level_procedure >= g_current_runtime_level ) THEN
316 FND_LOG.STRING(g_level_procedure,
317 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row',
318 'Insert into ZX_SIM_PURGE (-)');
319 FND_LOG.STRING(g_level_procedure,
320 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Row.END',
321 'ZX_TRX_MASTER: Insert_Row (-)');
322 END IF;
323
324
325 END Insert_Row;
326
327 PROCEDURE Update_Row
328 (p_Rowid VARCHAR2,
329 p_first_pty_org_id NUMBER,
330 p_internal_organization_id NUMBER,
331 p_internal_org_location_id NUMBER,
332 p_application_id NUMBER,
333 p_entity_code VARCHAR2,
334 p_event_class_code VARCHAR2,
335 p_event_type_code VARCHAR2,
336 p_trx_id NUMBER,
337 p_tax_event_type_code VARCHAR2,
338 -- p_trx_level_type VARCHAR2,
339 p_trx_date DATE,
340 p_document_event_type VARCHAR2,
341 p_ledger_id NUMBER,
342 p_trx_currency_code VARCHAR2,
343 p_currency_conversion_date DATE,
344 p_currency_conversion_rate NUMBER,
345 p_currency_conversion_type VARCHAR2,
346 p_minimum_accountable_unit NUMBER,
347 p_precision NUMBER,
348 p_legal_entity_ptp_id NUMBER,
349 p_legal_entity_id NUMBER,
350 p_rounding_ship_to_party_id NUMBER,
351 p_rounding_ship_from_party_id NUMBER,
352 p_rounding_bill_to_party_id NUMBER,
353 p_rounding_bill_from_party_id NUMBER,
354 p_rndg_ship_to_party_site_id NUMBER,
355 p_rndg_ship_from_party_site_id NUMBER,
356 p_rndg_bill_to_party_site_id NUMBER,
357 p_rndg_bill_from_party_site_id NUMBER,
358 p_bill_from_party_site_id NUMBER,
359 p_bill_to_party_site_id NUMBER,
360 p_ship_from_party_site_id NUMBER,
361 p_ship_to_party_site_id NUMBER,
362 p_ship_to_party_id NUMBER,
363 p_ship_from_party_id NUMBER,
364 p_bill_to_party_id NUMBER,
365 p_bill_from_party_id NUMBER,
366 p_ship_to_location_id NUMBER,
367 p_ship_from_location_id NUMBER,
368 p_bill_to_location_id NUMBER,
369 p_bill_from_location_id NUMBER,
370 p_poa_location_id NUMBER,
371 p_poo_location_id NUMBER,
372 p_paying_location_id NUMBER,
373 p_own_hq_location_id NUMBER,
374 p_trading_hq_location_id NUMBER,
375 p_poc_location_id NUMBER,
376 p_poi_location_id NUMBER,
377 p_pod_location_id NUMBER,
378 p_title_transfer_location_id NUMBER,
379 p_trx_number VARCHAR2,
380 p_trx_description VARCHAR2,
381 p_document_sub_type VARCHAR2,
382 p_supplier_tax_invoice_number NUMBER,
383 p_supplier_tax_invoice_date DATE,
384 p_supplier_exchange_rate NUMBER,
385 p_tax_invoice_date DATE,
386 p_tax_invoice_number NUMBER,
387 p_tax_manual_entry_flag VARCHAR2,
388 p_document_event VARCHAR2,
389 p_establishment_id NUMBER,
390 p_receivables_trx_type_id NUMBER,
391 p_default_taxation_country VARCHAR2,
392 p_quote_flag VARCHAR2,
393 p_ctrl_total_hdr_tx_amt NUMBER,
394 p_port_of_entry_code VARCHAR2,
395 p_tax_reporting_flag VARCHAR2,
396 p_ship_to_cust_acct_siteuse_id NUMBER,
397 p_bill_to_cust_acct_siteuse_id NUMBER,
398 p_provnl_tax_determ_date DATE,
399 p_applied_to_trx_number VARCHAR2,
400 p_ship_third_pty_acct_id NUMBER,
401 p_bill_third_pty_acct_id NUMBER,
402 p_ship_third_pty_acct_site_id NUMBER,
403 p_bill_third_pty_acct_site_id NUMBER,
404 p_validation_check_flag VARCHAR2,
405 p_object_version_number NUMBER,
406 p_created_by NUMBER,
407 p_creation_date DATE,
408 p_last_updated_by NUMBER,
409 p_last_update_date DATE,
410 p_last_update_login NUMBER) IS
411
412 status_detail_block VARCHAR2(30);
413 l_return_status VARCHAR2(1000);
414 l_msg_count NUMBER;
415 l_msg_data VARCHAR2(1000);
416 l_tax_event_type_code VARCHAR2(30);
417 l_transaction_rec ZX_API_PUB.transaction_rec_type;
418 l_validate_status_rec ZX_API_PUB.validation_status_tbl_type;
419 l_hold_codes_tbl ZX_API_PUB.hold_codes_tbl_type;
420 l_validate_status VARCHAR2(30);
421 l_sync_trx_rec ZX_API_PUB.sync_trx_rec_type;
422 l_sync_trx_lines_rec ZX_API_PUB.sync_trx_lines_rec_type;
423 debug_info VARCHAR2(100);
424 i NUMBER;
425
426 CURSOR sync_trx_lines_rec IS
427 SELECT APPLICATION_ID,
428 ENTITY_CODE,
429 EVENT_CLASS_CODE,
430 TRX_ID,
431 TRX_LEVEL_TYPE,
432 TRX_LINE_ID,
433 NULL TRX_WAYBILL_NUMBER,
434 TRX_LINE_DESCRIPTION,
435 PRODUCT_DESCRIPTION,
436 TRX_LINE_GL_DATE,
437 NULL MERCHANT_PARTY_NAME,
438 NULL MERCHANT_PARTY_DOCUMENT_NUMBER,
439 NULL MERCHANT_PARTY_REFERENCE,
440 NULL MERCHANT_PARTY_TAXPAYER_ID,
441 NULL MERCHANT_PARTY_TAX_REG_NUMBER,
442 NULL ASSET_NUMBER
443 FROM ZX_TRANSACTION_LINES
444 WHERE APPLICATION_ID = p_application_id
445 AND ENTITY_CODE = p_entity_code
446 AND EVENT_CLASS_CODE = p_event_class_code
447 AND TRX_ID = p_trx_id
448 AND TRX_LINE_TYPE <> 'TAX';
449
450 BEGIN
451 g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
452
453 i := 0;
454
455 IF (g_level_procedure >= g_current_runtime_level ) THEN
456 FND_LOG.STRING(g_level_procedure,
457 'ZX.PLSQL.ZX_TRX_MASTER.update_Row.BEGIN',
458 'ZX_TRX_MASTER: update_Row (+)');
459 FND_LOG.STRING(g_level_procedure,
460 'ZX.PLSQL.ZX_TRX_MASTER.update_Row',
461 'Update into ZX_TRANSACTION (+)');
462 END IF;
463
464 UPDATE ZX_TRANSACTION
465 SET EVENT_TYPE_CODE = p_event_type_code,
466 TRX_DATE = p_trx_date,
467 DOCUMENT_EVENT_TYPE = p_document_event_type,
468 TRX_CURRENCY_CODE = p_trx_currency_code,
469 CURRENCY_CONVERSION_DATE = p_currency_conversion_date,
470 CURRENCY_CONVERSION_RATE = p_currency_conversion_rate,
471 CURRENCY_CONVERSION_TYPE = p_currency_conversion_type,
472 MINIMUM_ACCOUNTABLE_UNIT = p_minimum_accountable_unit,
473 PRECISION = p_precision,
474 LEGAL_ENTITY_PTP_ID = p_legal_entity_ptp_id,
475 LEGAL_ENTITY_ID = p_legal_entity_id,
476 ROUNDING_SHIP_TO_PARTY_ID = p_rounding_ship_to_party_id,
477 ROUNDING_SHIP_FROM_PARTY_ID = p_rounding_ship_from_party_id,
478 ROUNDING_BILL_TO_PARTY_ID = p_rounding_bill_to_party_id,
479 ROUNDING_BILL_FROM_PARTY_ID = p_rounding_bill_from_party_id,
480 RNDG_SHIP_TO_PARTY_SITE_ID = p_rndg_ship_to_party_site_id,
481 RNDG_SHIP_FROM_PARTY_SITE_ID = p_rndg_ship_from_party_site_id,
482 RNDG_BILL_TO_PARTY_SITE_ID = p_rndg_bill_to_party_site_id,
483 RNDG_BILL_FROM_PARTY_SITE_ID = p_rndg_bill_from_party_site_id,
484 BILL_FROM_PARTY_SITE_ID = p_bill_from_party_site_id,
485 BILL_TO_PARTY_SITE_ID = p_bill_to_party_site_id,
486 SHIP_FROM_PARTY_SITE_ID = p_ship_from_party_site_id,
487 SHIP_TO_PARTY_SITE_ID = p_ship_to_party_site_id,
488 SHIP_TO_PARTY_ID = p_ship_to_party_id,
489 SHIP_FROM_PARTY_ID = p_ship_from_party_id,
490 BILL_TO_PARTY_ID = p_bill_to_party_id,
491 BILL_FROM_PARTY_ID = p_bill_from_party_id,
492 SHIP_TO_LOCATION_ID = p_ship_to_location_id,
493 SHIP_FROM_LOCATION_ID = p_ship_from_location_id,
494 BILL_TO_LOCATION_ID = p_bill_to_location_id,
495 BILL_FROM_LOCATION_ID = p_bill_from_location_id,
496 POA_LOCATION_ID = p_poa_location_id,
497 POO_LOCATION_ID = p_poo_location_id,
498 PAYING_LOCATION_ID = p_paying_location_id,
499 OWN_HQ_LOCATION_ID = p_own_hq_location_id,
500 TRADING_HQ_LOCATION_ID = p_trading_hq_location_id,
501 POC_LOCATION_ID = p_poc_location_id,
502 POI_LOCATION_ID = p_poi_location_id,
503 POD_LOCATION_ID = p_pod_location_id,
504 TITLE_TRANSFER_LOCATION_ID = p_title_transfer_location_id,
505 TRX_NUMBER = p_trx_number,
506 TRX_DESCRIPTION = p_trx_description,
507 DOCUMENT_SUB_TYPE = p_document_sub_type,
508 SUPPLIER_TAX_INVOICE_NUMBER = p_supplier_tax_invoice_number,
509 SUPPLIER_TAX_INVOICE_DATE = p_supplier_tax_invoice_date,
510 SUPPLIER_EXCHANGE_RATE = p_supplier_exchange_rate,
511 TAX_INVOICE_DATE = p_tax_invoice_date,
512 TAX_INVOICE_NUMBER = p_tax_invoice_number,
513 ESTABLISHMENT_ID = p_establishment_id,
514 RECEIVABLES_TRX_TYPE_ID = p_receivables_trx_type_id,
515 DEFAULT_TAXATION_COUNTRY = p_default_taxation_country,
516 QUOTE_FLAG = p_quote_flag,
517 CTRL_TOTAL_HDR_TX_AMT = p_ctrl_total_hdr_tx_amt,
518 PORT_OF_ENTRY_CODE = p_port_of_entry_code,
519 TAX_REPORTING_FLAG = p_tax_reporting_flag,
520 SHIP_TO_CUST_ACCT_SITE_USE_ID = p_ship_to_cust_acct_siteuse_id,
521 BILL_TO_CUST_ACCT_SITE_USE_ID = p_bill_to_cust_acct_siteuse_id,
522 PROVNL_TAX_DETERMINATION_DATE = p_provnl_tax_determ_date,
523 APPLIED_TO_TRX_NUMBER = p_applied_to_trx_number,
524 SHIP_THIRD_PTY_ACCT_ID = p_ship_third_pty_acct_id,
525 BILL_THIRD_PTY_ACCT_ID = p_bill_third_pty_acct_id,
526 SHIP_THIRD_PTY_ACCT_SITE_ID = p_ship_third_pty_acct_site_id,
527 BILL_THIRD_PTY_ACCT_SITE_ID = p_bill_third_pty_acct_site_id,
528 VALIDATION_CHECK_FLAG = p_validation_check_flag,
529 OBJECT_VERSION_NUMBER = NVL(p_object_version_number, OBJECT_VERSION_NUMBER + 1),
530 LAST_UPDATED_BY = p_last_updated_by,
531 LAST_UPDATE_DATE = p_last_update_date,
532 LAST_UPDATE_LOGIN = p_last_update_login
533 WHERE INTERNAL_ORGANIZATION_ID = p_internal_organization_id
534 -- AND FIRST_PTY_ORG_ID = p_first_pty_org_id
535 AND APPLICATION_ID = p_application_id
536 AND ENTITY_CODE = p_entity_code
537 AND EVENT_CLASS_CODE = p_event_class_code
538 AND TRX_ID = p_trx_id;
539
540 IF (g_level_procedure >= g_current_runtime_level ) THEN
541 FND_LOG.STRING(g_level_procedure,
542 'ZX.PLSQL.ZX_TRX_MASTER.Update_Row',
543 'Update into ZX_TRANSACTION (-)');
544 END IF;
545
546 IF (g_level_procedure >= g_current_runtime_level ) THEN
547 FND_LOG.STRING(g_level_procedure,
548 'ZX.PLSQL.ZX_TRX_MASTER.Update_Row',
549 'Document Event Type (+)');
550
551 FND_LOG.STRING(g_level_procedure,
552 'ZX.PLSQL.ZX_TRX_MASTER.Update_Row',
553 'Document Event Type: '||p_document_event_type);
554 END IF;
555
556 --
557 -- bug#5208939
558 -- update line_level_action in trx line to 'UPDATE'
559 --
560 UPDATE ZX_TRANSACTION_LINES
561 SET line_level_action = 'UPDATE'
562 WHERE APPLICATION_ID = p_application_id
563 AND ENTITY_CODE = p_entity_code
564 AND EVENT_CLASS_CODE = p_event_class_code
565 AND TRX_ID = p_trx_id
566 AND LINE_LEVEL_ACTION = 'CREATE';
567
568
569 IF p_document_event = 'DISTRIBUTE' THEN
570 RETURN;
571 END IF;
572
573 l_tax_event_type_code := p_document_event_type;
574
575 l_transaction_rec.APPLICATION_ID := p_application_id;
576 l_transaction_rec.ENTITY_CODE := p_entity_code;
577 l_transaction_rec.EVENT_CLASS_CODE := p_event_class_code;
578 l_transaction_rec.EVENT_TYPE_CODE := p_event_type_code;
579 l_transaction_rec.TRX_ID := p_trx_id;
580 l_transaction_rec.INTERNAL_ORGANIZATION_ID := p_internal_organization_id;
581 l_transaction_rec.FIRST_PTY_ORG_ID := p_first_pty_org_id;
582 l_transaction_rec.TAX_EVENT_TYPE_CODE := l_tax_event_type_code;
583 l_transaction_rec.DOC_EVENT_STATUS := NULL;
584
585 IF p_document_event_type IN ('CANCEL', 'DELETE', 'PURGE',
586 'FREEZE_FOR_TAX', 'UNFREEZE_FOR_TAX',
587 'RELEASE_TAX_HOLD') THEN
588
589 ZX_API_PUB.global_document_update (p_api_version => 1.0,
590 p_commit => NULL,
591 p_validation_level => NULL,
592 p_transaction_rec => l_transaction_rec,
593 p_init_msg_list => FND_API.G_TRUE,
594 x_return_status => l_return_status,
595 x_msg_count => l_msg_count,
596 x_msg_data => l_msg_data);
597
598 ELSIF p_document_event_type = 'VALIDATE' THEN
599
600 INSERT INTO ZX_TRANSACTIONS_GT (APPLICATION_ID,
601 ENTITY_CODE,
602 EVENT_CLASS_CODE,
603 EVENT_TYPE_CODE,
604 TRX_ID,
605 INTERNAL_ORGANIZATION_ID,
606 FIRST_PTY_ORG_ID,
607 --TAX_EVENT_CLASS_CODE,
608 TAX_EVENT_TYPE_CODE,
609 DOC_EVENT_STATUS)
610 VALUES (p_application_id,
611 p_entity_code,
612 p_event_class_code,
613 p_event_type_code,
614 p_trx_id,
615 p_internal_organization_id,
616 p_first_pty_org_id,
617 --p_tax_event_class_code,
618 p_tax_event_type_code,
619 null); --p_doc_event_status
620
621 ZX_API_PUB.validate_document_for_tax (p_api_version => 1.0,
622 p_init_msg_list => NULL,
623 p_commit => NULL,
624 p_validation_level => NULL,
625 x_return_status => l_return_status,
626 x_msg_count => l_msg_count,
627 x_msg_data => l_msg_data,
628 p_transaction_rec => l_transaction_rec,
629 x_validation_status => l_validate_status,
630 x_hold_codes_tbl => l_hold_codes_tbl);
631
632 ELSIF p_document_event = 'SYNC' THEN
633
634 IF (g_level_procedure >= g_current_runtime_level ) THEN
635 FND_LOG.STRING(g_level_procedure,
636 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Temporary_Table',
637 'Insert into zx_trx_headers_gt (+)');
638 END IF;
639
640 INSERT INTO ZX_TRX_HEADERS_GT (INTERNAL_ORGANIZATION_ID,
641 INTERNAL_ORG_LOCATION_ID,
642 APPLICATION_ID,
643 ENTITY_CODE,
644 EVENT_CLASS_CODE,
645 EVENT_TYPE_CODE,
646 TRX_ID,
647 TRX_DATE,
648 --TRX_DOC_REVISION,
649 LEDGER_ID,
650 TRX_CURRENCY_CODE,
651 CURRENCY_CONVERSION_DATE,
652 CURRENCY_CONVERSION_RATE,
653 CURRENCY_CONVERSION_TYPE,
654 MINIMUM_ACCOUNTABLE_UNIT,
655 PRECISION,
656 LEGAL_ENTITY_ID,
657 ROUNDING_SHIP_TO_PARTY_ID,
658 ROUNDING_SHIP_FROM_PARTY_ID,
659 ROUNDING_BILL_TO_PARTY_ID,
660 ROUNDING_BILL_FROM_PARTY_ID,
661 RNDG_SHIP_TO_PARTY_SITE_ID,
662 RNDG_SHIP_FROM_PARTY_SITE_ID,
663 RNDG_BILL_TO_PARTY_SITE_ID,
664 RNDG_BILL_FROM_PARTY_SITE_ID,
665 ESTABLISHMENT_ID,
666 RECEIVABLES_TRX_TYPE_ID,
667 --RELATED_DOC_APPLICATION_ID,
668 --RELATED_DOC_ENTITY_CODE,
669 --RELATED_DOC_EVENT_CLASS_CODE,
670 --RELATED_DOC_TRX_ID,
671 --REL_DOC_HDR_TRX_USER_KEY1,
672 --REL_DOC_HDR_TRX_USER_KEY2,
673 --REL_DOC_HDR_TRX_USER_KEY3,
674 --REL_DOC_HDR_TRX_USER_KEY4,
675 --REL_DOC_HDR_TRX_USER_KEY5,
676 --REL_DOC_HDR_TRX_USER_KEY6,
677 --RELATED_DOC_NUMBER,
678 --RELATED_DOC_DATE,
679 DEFAULT_TAXATION_COUNTRY,
680 Quote_Flag,
681 CTRL_TOTAL_HDR_TX_AMT,
682 TRX_NUMBER,
683 TRX_DESCRIPTION,
684 --TRX_COMMUNICATED_DATE,
685 --BATCH_SOURCE_ID,
686 --BATCH_SOURCE_NAME,
687 --DOC_SEQ_ID,
688 --DOC_SEQ_NAME,
689 --DOC_SEQ_VALUE,
690 --TRX_DUE_DATE,
691 --TRX_TYPE_DESCRIPTION,
692 --BILLING_TRADING_PARTNER_NAME,
693 --BILLING_TRADING_PARTNER_NUMBER,
694 --Billing_Tp_Tax_Reporting_Flag,
695 --BILLING_TP_TAXPAYER_ID,
696 DOCUMENT_SUB_TYPE,
697 SUPPLIER_TAX_INVOICE_NUMBER,
698 SUPPLIER_TAX_INVOICE_DATE,
699 SUPPLIER_EXCHANGE_RATE,
700 TAX_INVOICE_DATE,
701 TAX_INVOICE_NUMBER,
702 FIRST_PTY_ORG_ID,
703 PORT_OF_ENTRY_CODE,
704 TAX_REPORTING_FLAG,
705 SHIP_TO_CUST_ACCT_SITE_USE_ID,
706 BILL_TO_CUST_ACCT_SITE_USE_ID,
707 PROVNL_TAX_DETERMINATION_DATE,
708 APPLIED_TO_TRX_NUMBER,
709 SHIP_THIRD_PTY_ACCT_ID,
710 BILL_THIRD_PTY_ACCT_ID,
711 SHIP_THIRD_PTY_ACCT_SITE_ID,
712 BILL_THIRD_PTY_ACCT_SITE_ID,
713 VALIDATION_CHECK_FLAG,
714 --TAX_EVENT_CLASS_CODE,
715 TAX_EVENT_TYPE_CODE
716 --DOC_EVENT_STATUS,
717 --RDNG_SHIP_TO_PTY_TX_PROF_ID,
718 --RDNG_SHIP_FROM_PTY_TX_PROF_ID,
719 --RDNG_BILL_TO_PTY_TX_PROF_ID,
720 --RDNG_BILL_FROM_PTY_TX_PROF_ID,
721 --RDNG_SHIP_TO_PTY_TX_P_ST_ID,
722 --RDNG_SHIP_FROM_PTY_TX_P_ST_ID,
723 --RDNG_BILL_TO_PTY_TX_P_ST_ID,
724 --RDNG_BILL_FROM_PTY_TX_P_ST_ID
725 )
726 SELECT internal_organization_id,
727 internal_org_location_id,
728 application_id,
729 entity_code,
730 event_class_code,
731 event_type_code,
732 trx_id,
733 trx_date,
734 --p_trx_doc_revision,
735 ledger_id,
736 trx_currency_code,
737 currency_conversion_date,
738 currency_conversion_rate,
739 currency_conversion_type,
740 minimum_accountable_unit,
741 precision,
742 legal_entity_id,
743 rounding_ship_to_party_id,
744 rounding_ship_from_party_id,
745 rounding_bill_to_party_id,
746 rounding_bill_from_party_id,
747 rndg_ship_to_party_site_id,
748 rndg_ship_from_party_site_id,
749 rndg_bill_to_party_site_id,
750 rndg_bill_from_party_site_id,
751 establishment_id,
752 receivables_trx_type_id,
753 --p_related_doc_application_id,
754 --p_related_doc_entity_code,
755 --p_related_doc_evt_class_code, --reduced size p_related_doc_event_class_code
756 --p_related_doc_trx_id,
757 --p_rel_doc_hdr_trx_user_key1,
758 --p_rel_doc_hdr_trx_user_key2,
759 --p_rel_doc_hdr_trx_user_key3,
760 --p_rel_doc_hdr_trx_user_key4,
761 --p_rel_doc_hdr_trx_user_key5,
762 --p_rel_doc_hdr_trx_user_key6,
763 --p_related_doc_number,
764 --p_related_doc_date,
765 default_taxation_country,
766 Quote_Flag,
767 ctrl_total_hdr_tx_amt,
768 trx_number,
769 trx_description,
770 --p_trx_communicated_date,
771 --p_batch_source_id,
772 --p_batch_source_name,
773 --p_doc_seq_id,
774 --p_doc_seq_name,
775 --p_doc_seq_value,
776 --p_trx_due_date,
777 --p_trx_type_description,
778 --p_billing_trad_partner_name, --reduced size p_billing_trading_partner_name
779 --p_billing_trad_partner_number, --reduced size p_billing_trading_partner_number
780 --p_billing_tp_tax_report_flg, --reduced size p_Billing_Tp_Tax_Reporting_Flag
781 --p_billing_tp_taxpayer_id,
782 document_sub_type,
783 supplier_tax_invoice_number,
784 supplier_tax_invoice_date,
785 supplier_exchange_rate,
786 tax_invoice_date,
787 tax_invoice_number,
788 FIRST_PTY_ORG_ID,
789 PORT_OF_ENTRY_CODE,
790 TAX_REPORTING_FLAG,
791 SHIP_TO_CUST_ACCT_SITE_USE_ID,
792 BILL_TO_CUST_ACCT_SITE_USE_ID,
793 PROVNL_TAX_DETERMINATION_DATE,
794 APPLIED_TO_TRX_NUMBER,
795 SHIP_THIRD_PTY_ACCT_ID,
796 BILL_THIRD_PTY_ACCT_ID,
797 SHIP_THIRD_PTY_ACCT_SITE_ID,
798 BILL_THIRD_PTY_ACCT_SITE_ID,
799 VALIDATION_CHECK_FLAG,
800 --p_tax_event_class_code,
801 tax_event_type_code--p_tax_event_type_code,
802 --p_doc_event_status,
803 --p_rdng_ship_to_pty_tx_prof_id,
804 --p_rdng_ship_fr_pty_tx_prof_id, --reduced size p_rdng_ship_from_pty_tx_prof_id
805 --p_rdng_bill_to_pty_tx_prof_id,
806 --p_rdng_bill_fr_pty_tx_prof_id, --reduced size p_rdng_bill_from_pty_tx_prof_id
807 --p_rdng_ship_to_pty_tx_p_st_id,
808 --p_rdng_ship_fr_pty_tx_p_st_id, --reduced size p_rdng_ship_from_pty_tx_p_st_id
809 --p_rdng_bill_to_pty_tx_p_st_id,
810 --p_rdng_bill_fr_pty_tx_p_st_id); --reduced size p_rdng_bill_from_pty_tx_p_st_id
811 FROM ZX_TRANSACTION
812 WHERE APPLICATION_ID = p_application_id
813 AND ENTITY_CODE = p_entity_code
814 AND EVENT_CLASS_CODE = p_event_class_code
815 AND TRX_ID = p_trx_id;
816
817 IF (g_level_procedure >= g_current_runtime_level ) THEN
818 FND_LOG.STRING(g_level_procedure,
819 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Temporary_Table',
820 'Insert into zx_trx_headers_gt (-)');
821 END IF;
822
823 IF (g_level_procedure >= g_current_runtime_level ) THEN
824 FND_LOG.STRING(g_level_procedure,
825 'ZX.PLSQL.ZX_TRX_MASTER.Insert_Temporary_Table',
826 'Insert into ZX_TRANSACTION_LINES_GT (+)');
827 END IF;
828
829 INSERT INTO ZX_TRANSACTION_LINES_GT (APPLICATION_ID,
830 ENTITY_CODE,
831 EVENT_CLASS_CODE,
832 TRX_ID,
833 TRX_LEVEL_TYPE,
834 TRX_LINE_ID,
835 LINE_LEVEL_ACTION,
836 --TRX_SHIPPING_DATE,
837 --TRX_RECEIPT_DATE,
838 TRX_LINE_TYPE,
839 TRX_LINE_DATE,
840 TRX_BUSINESS_CATEGORY,
841 LINE_INTENDED_USE,
842 USER_DEFINED_FISC_CLASS,
843 LINE_AMT,
844 TRX_LINE_QUANTITY,
845 UNIT_PRICE,
846 EXEMPT_CERTIFICATE_NUMBER,
847 EXEMPT_REASON,
848 CASH_DISCOUNT,
849 VOLUME_DISCOUNT,
850 TRADING_DISCOUNT,
851 TRANSFER_CHARGE,
852 TRANSPORTATION_CHARGE,
853 INSURANCE_CHARGE,
854 OTHER_CHARGE,
855 EXEMPTION_CONTROL_FLAG,
856 EXEMPT_REASON_CODE,
857 PRODUCT_ID,
858 PRODUCT_FISC_CLASSIFICATION,
859 PRODUCT_ORG_ID,
860 UOM_CODE,
861 PRODUCT_TYPE,
862 PRODUCT_CODE,
863 PRODUCT_CATEGORY,
864 --TRX_SIC_CODE,
865 --FOB_POINT,
866 SHIP_TO_PARTY_ID,
867 SHIP_FROM_PARTY_ID,
868 --POA_PARTY_ID,
869 --POO_PARTY_ID,
870 BILL_TO_PARTY_ID,
871 BILL_FROM_PARTY_ID,
872 MERCHANT_PARTY_ID,
873 SHIP_TO_PARTY_SITE_ID,
874 SHIP_FROM_PARTY_SITE_ID,
875 --POA_PARTY_SITE_ID,
876 --POO_PARTY_SITE_ID,
877 BILL_TO_PARTY_SITE_ID,
878 BILL_FROM_PARTY_SITE_ID,
879 SHIP_TO_LOCATION_ID,
880 SHIP_FROM_LOCATION_ID,
881 POA_LOCATION_ID,
882 POO_LOCATION_ID,
883 BILL_TO_LOCATION_ID,
884 BILL_FROM_LOCATION_ID,
885 ACCOUNT_CCID,
886 ACCOUNT_STRING,
887 --MERCHANT_PARTY_COUNTRY,
888 REF_DOC_APPLICATION_ID,
889 REF_DOC_ENTITY_CODE,
890 REF_DOC_EVENT_CLASS_CODE,
891 REF_DOC_TRX_ID,
892 REF_DOC_LINE_ID,
893 REF_DOC_LINE_QUANTITY,
894 APPLIED_FROM_APPLICATION_ID,
895 APPLIED_FROM_ENTITY_CODE,
896 APPLIED_FROM_EVENT_CLASS_CODE,
897 APPLIED_FROM_TRX_ID,
898 APPLIED_FROM_LINE_ID,
899 ADJUSTED_DOC_APPLICATION_ID,
900 ADJUSTED_DOC_ENTITY_CODE,
901 ADJUSTED_DOC_EVENT_CLASS_CODE,
902 ADJUSTED_DOC_TRX_ID,
903 ADJUSTED_DOC_LINE_ID,
904 --ADJUSTED_DOC_NUMBER,
905 ADJUSTED_DOC_DATE,
906 --APPLIED_TO_APPLICATION_ID,
907 --APPLIED_TO_ENTITY_CODE,
908 --APPLIED_TO_EVENT_CLASS_CODE,
909 --APPLIED_TO_TRX_ID,
910 --APPLIED_TO_TRX_LINE_ID,
911 --TRX_ID_LEVEL2,
912 --TRX_ID_LEVEL3,
913 --TRX_ID_LEVEL4,
914 --TRX_ID_LEVEL5,
915 --TRX_ID_LEVEL6,
916 TRX_LINE_NUMBER,
917 TRX_LINE_DESCRIPTION,
918 PRODUCT_DESCRIPTION,
919 --TRX_WAYBILL_NUMBER,
920 TRX_LINE_GL_DATE,
921 --MERCHANT_PARTY_NAME,
922 --MERCHANT_PARTY_DOCUMENT_NUMBER,
923 --MERCHANT_PARTY_REFERENCE,
924 --MERCHANT_PARTY_TAXPAYER_ID,
925 --MERCHANT_PARTY_TAX_REG_NUMBER,
926 --PAYING_PARTY_ID,
927 --OWN_HQ_PARTY_ID,
928 --TRADING_HQ_PARTY_ID,
929 --POI_PARTY_ID,
930 --POD_PARTY_ID,
931 --TITLE_TRANSFER_PARTY_ID,
932 --PAYING_PARTY_SITE_ID,
933 --OWN_HQ_PARTY_SITE_ID,
934 --TRADING_HQ_PARTY_SITE_ID,
935 --POI_PARTY_SITE_ID,
936 --POD_PARTY_SITE_ID,
937 --TITLE_TRANSFER_PARTY_SITE_ID,
938 PAYING_LOCATION_ID,
939 OWN_HQ_LOCATION_ID,
940 TRADING_HQ_LOCATION_ID,
941 POC_LOCATION_ID,
942 POI_LOCATION_ID,
943 POD_LOCATION_ID,
944 --TITLE_TRANSFER_LOCATION_ID,
945 --BANKING_TP_TAXPAYER_ID,
946 --ASSESSABLE_VALUE,
947 --ASSET_FLAG,
948 --ASSET_NUMBER,
949 --ASSET_ACCUM_DEPRECIATION,
950 --ASSET_TYPE,
951 --ASSET_COST,
952 --NUMERIC1,
953 --NUMERIC2,
954 --NUMERIC3,
955 --NUMERIC4,
956 --NUMERIC5,
957 --NUMERIC6,
958 --NUMERIC7,
959 --NUMERIC8,
960 --NUMERIC9,
961 --NUMERIC10,
962 --CHAR1,
963 --CHAR2,
964 --CHAR3,
965 --CHAR4,
966 --CHAR5,
967 --CHAR6,
968 --CHAR7,
969 --CHAR8,
970 --CHAR9,
971 --CHAR10,
972 --DATE1,
973 --DATE2,
974 --DATE3,
975 --DATE4,
976 --DATE5,
977 --DATE6,
978 --DATE7,
979 --DATE8,
980 --DATE9,
981 --DATE10,
982 --SHIP_TO_PARTY_TAX_PROF_ID,
983 --SHIP_FROM_PARTY_TAX_PROF_ID,
984 --POA_PARTY_TAX_PROF_ID,
985 --POO_PARTY_TAX_PROF_ID,
986 --PAYING_PARTY_TAX_PROF_ID,
987 --OWN_HQ_PARTY_TAX_PROF_ID,
988 --TRADING_HQ_PARTY_TAX_PROF_ID,
989 --POI_PARTY_TAX_PROF_ID,
990 --POD_PARTY_TAX_PROF_ID,
991 --BILL_TO_PARTY_TAX_PROF_ID,
992 --BILL_FROM_PARTY_TAX_PROF_ID,
993 --TITLE_TRANS_PARTY_TAX_PROF_ID,
994 --SHIP_TO_SITE_TAX_PROF_ID,
995 --SHIP_FROM_SITE_TAX_PROF_ID,
996 --POA_SITE_TAX_PROF_ID,
997 --POO_SITE_TAX_PROF_ID,
998 --PAYING_SITE_TAX_PROF_ID,
999 --OWN_HQ_SITE_TAX_PROF_ID,
1000 --TRADING_HQ_SITE_TAX_PROF_ID,
1001 --POI_SITE_TAX_PROF_ID,
1002 --POD_SITE_TAX_PROF_ID,
1003 --BILL_TO_SITE_TAX_PROF_ID,
1004 --BILL_FROM_SITE_TAX_PROF_ID,
1005 --TITLE_TRANS_SITE_TAX_PROF_ID,
1006 --MERCHANT_PARTY_TAX_PROF_ID,
1007 LINE_AMT_INCLUDES_TAX_FLAG,
1008 HISTORICAL_FLAG
1009 --TAX_CLASSIFICATION_CODE
1010 )
1011 SELECT application_id,
1012 entity_code,
1013 event_class_code,
1014 trx_id,
1015 trx_level_type,
1016 trx_line_id,
1017 line_level_action,
1018 --p_trx_shipping_date,
1019 --p_trx_receipt_date,
1020 trx_line_type,
1021 trx_line_date,
1022 trx_business_category,
1023 line_intended_use,
1024 user_defined_fisc_class,
1025 line_amt,
1026 trx_line_quantity,
1027 unit_price,
1028 exempt_certificate_number,
1029 exempt_reason,
1030 cash_discount,
1031 volume_discount,
1032 trading_discount,
1033 transfer_charge,
1034 transportation_charge,
1035 insurance_charge,
1036 other_charge,
1037 exemption_control_flag,
1038 exempt_reason_code,
1039 product_id,
1040 product_fisc_classification,
1041 product_org_id,
1042 uom_code,
1043 product_type,
1044 product_code,
1045 product_category,
1046 --p_trx_sic_code,
1047 --p_fob_point,
1048 ship_to_party_id,
1049 ship_from_party_id,
1050 --p_poa_party_id,
1051 --p_poo_party_id,
1052 bill_to_party_id,
1053 bill_from_party_id,
1054 merchant_party_id,
1055 ship_to_party_site_id,
1056 ship_from_party_site_id,
1057 --p_poa_party_site_id,
1058 --p_poo_party_site_id,
1059 bill_to_party_site_id,
1060 bill_from_party_site_id,
1061 ship_to_location_id,
1062 ship_from_location_id,
1063 poa_location_id,
1064 poo_location_id,
1065 bill_to_location_id,
1066 bill_from_location_id,
1067 account_ccid,
1068 account_string,
1069 --p_merchant_party_country,
1070 ref_doc_application_id,
1071 ref_doc_entity_code,
1072 ref_doc_event_class_code,
1073 ref_doc_trx_id,
1074 ref_doc_line_id,
1075 ref_doc_line_quantity,
1076 applied_from_application_id,
1077 applied_from_entity_code,
1078 applied_from_event_class_code,
1079 applied_from_trx_id,
1080 applied_from_line_id,
1081 adjusted_doc_application_id,
1082 adjusted_doc_entity_code,
1083 adjusted_doc_event_class_code,
1084 adjusted_doc_trx_id,
1085 adjusted_doc_line_id,
1086 --adjusted_doc_number,
1087 adjusted_doc_date,
1088 --p_applied_to_application_id,
1089 --p_applied_to_entity_code,
1090 --p_applied_to_event_class_code,
1091 --p_applied_to_trx_id,
1092 --p_applied_to_trx_line_id,
1093 --p_trx_id_level2,
1094 --p_trx_id_level3,
1095 --p_trx_id_level4,
1096 --p_trx_id_level5,
1097 --p_trx_id_level6,
1098 trx_line_number,
1099 trx_line_description,
1100 product_description,
1101 --trx_waybill_number,
1102 trx_line_gl_date,
1103 --p_merchant_party_name,
1104 --p_merchant_party_doc_number,
1105 --p_merchant_party_reference,
1106 --p_merchant_party_taxpayer_id,
1107 --p_merchant_pty_tax_reg_number,
1108 --p_paying_party_id,
1109 --p_own_hq_party_id,
1110 --p_trading_hq_party_id,
1111 --p_poi_party_id,
1112 --p_pod_party_id,
1113 --p_title_transfer_party_id,
1114 --p_paying_party_site_id,
1115 --p_own_hq_party_site_id,
1116 --p_trading_hq_party_site_id,
1117 --p_poi_party_site_id,
1118 --p_pod_party_site_id,
1119 --p_title_transfer_pty_site_id,
1120 paying_location_id,
1121 own_hq_location_id,
1122 trading_hq_location_id,
1123 poc_location_id,
1124 poi_location_id,
1125 pod_location_id,
1126 --p_title_transfer_location_id,
1127 --p_banking_tp_taxpayer_id,
1128 --p_assessable_value,
1129 --p_asset_flag,
1130 --p_asset_number,
1131 --p_asset_accum_depreciation,
1132 --p_asset_type,
1133 --p_asset_cost,
1134 --p_numeric1,
1135 --p_numeric2,
1136 --p_numeric3,
1137 --p_numeric4,
1138 --p_numeric5,
1139 --p_numeric6,
1140 --p_numeric7,
1141 --p_numeric8,
1142 --p_numeric9,
1143 --p_numeric10,
1144 --p_char1,
1145 --p_char2,
1146 --p_char3,
1147 --p_char4,
1148 --p_char5,
1149 --p_char6,
1150 --p_char7,
1151 --p_char8,
1152 --p_char9,
1153 --p_char10,
1154 --p_date1,
1155 --p_date2,
1156 --p_date3,
1157 --p_date4,
1158 --p_date5,
1159 --p_date6,
1160 --p_date7,
1161 --p_date8,
1162 --p_date9,
1163 --p_date10,
1164 --p_ship_to_party_tax_prof_id,
1165 --p_ship_from_party_tax_prof_id,
1166 --p_poa_party_tax_prof_id,
1167 --p_poo_party_tax_prof_id,
1168 --p_paying_party_tax_prof_id,
1169 --p_own_hq_party_tax_prof_id,
1170 --p_trading_hq_pty_tax_prof_id,
1171 --p_poi_party_tax_prof_id,
1172 --p_pod_party_tax_prof_id,
1173 --p_bill_to_party_tax_prof_id,
1174 --p_bill_from_party_tax_prof_id,
1175 --p_title_trans_pty_tax_prof_id,
1176 --p_ship_to_site_tax_prof_id,
1177 --p_ship_from_site_tax_prof_id,
1178 --p_poa_site_tax_prof_id,
1179 --p_poo_site_tax_prof_id,
1180 --p_paying_site_tax_prof_id,
1181 --p_own_hq_site_tax_prof_id,
1182 --p_trading_hq_site_tax_prof_id,
1183 --p_poi_site_tax_prof_id,
1184 --p_pod_site_tax_prof_id,
1185 --p_bill_to_site_tax_prof_id,
1186 --p_bill_from_site_tax_prof_id,
1187 --p_title_trn_site_tax_prof_id,
1188 --p_merchant_party_tax_prof_id,
1189 line_amt_includes_tax_flag,
1190 historical_flag
1191 --p_tax_classification_code
1192 FROM ZX_TRANSACTION_LINES
1193 WHERE APPLICATION_ID = p_application_id
1194 AND ENTITY_CODE = p_entity_code
1195 AND EVENT_CLASS_CODE = p_event_class_code
1196 AND TRX_ID = p_trx_id
1197 AND TRX_LINE_TYPE <> 'TAX';
1198
1199 IF (SQL%ROWCOUNT) = 0 THEN
1200 RETURN;
1201 END IF;
1202 /*
1203 INSERT INTO ZX_SYNC_TRX_LINES_GT (APPLICATION_ID,
1204 ENTITY_CODE,
1205 EVENT_CLASS_CODE,
1206 TRX_ID,
1207 HDR_TRX_USER_KEY1,
1208 HDR_TRX_USER_KEY2,
1209 HDR_TRX_USER_KEY3,
1210 HDR_TRX_USER_KEY4,
1211 HDR_TRX_USER_KEY5,
1212 HDR_TRX_USER_KEY6,
1213 TRX_LEVEL_TYPE,
1214 TRX_LINE_ID,
1215 LINE_TRX_USER_KEY1,
1216 LINE_TRX_USER_KEY2,
1217 LINE_TRX_USER_KEY3,
1218 LINE_TRX_USER_KEY4,
1219 LINE_TRX_USER_KEY5,
1220 LINE_TRX_USER_KEY6,
1221 TRX_WAYBILL_NUMBER,
1222 TRX_LINE_DESCRIPTION,
1223 PRODUCT_DESCRIPTION,
1224 TRX_LINE_GL_DATE,
1225 BANKING_TP_TAXPAYER_ID,
1226 MERCHANT_PARTY_NAME,
1227 MERCHANT_PARTY_DOCUMENT_NUMBER,
1228 MERCHANT_PARTY_REFERENCE,
1229 MERCHANT_PARTY_TAXPAYER_ID,
1230 MERCHANT_PARTY_TAX_REG_NUMBER,
1231 ASSET_NUMBER)
1232 SELECT APPLICATION_ID,
1233 ENTITY_CODE,
1234 EVENT_CLASS_CODE,
1235 TRX_ID,
1236 NULL,
1237 NULL,
1238 NULL,
1239 NULL,
1240 NULL,
1241 NULL,
1242 TRX_LEVEL_TYPE,
1243 TRX_LINE_ID,
1244 NULL,
1245 NULL,
1246 NULL,
1247 NULL,
1248 NULL,
1249 NULL,
1250 NULL, --TRX_WAYBILL_NUMBER,
1251 TRX_LINE_DESCRIPTION,
1252 PRODUCT_DESCRIPTION,
1253 TRX_LINE_GL_DATE,
1254 NULL, --BANKING_TP_TAXPAYER_ID,
1255 NULL, --MERCHANT_PARTY_NAME,
1256 NULL, --MERCHANT_PARTY_DOCUMENT_NUMBER,
1257 NULL, --MERCHANT_PARTY_REFERENCE,
1258 NULL, --MERCHANT_PARTY_TAXPAYER_ID,
1259 NULL, --MERCHANT_PARTY_TAX_REG_NUMBER,
1260 NULL --ASSET_NUMBER
1261 FROM ZX_TRANSACTION_LINES
1262 WHERE APPLICATION_ID = p_application_id
1263 AND ENTITY_CODE = p_entity_code
1264 AND EVENT_CLASS_CODE = p_event_class_code
1265 AND TRX_ID = p_trx_id
1266 AND TRX_LINE_TYPE <> 'TAX';*/
1267
1268
1269 l_sync_trx_rec.APPLICATION_ID := p_application_id;
1270 l_sync_trx_rec.ENTITY_CODE := p_entity_code;
1271 l_sync_trx_rec.EVENT_CLASS_CODE := p_event_class_code;
1272 l_sync_trx_rec.EVENT_TYPE_CODE := p_event_type_code;
1273 l_sync_trx_rec.TRX_ID := p_trx_id;
1274 l_sync_trx_rec.TRX_NUMBER := p_trx_number;
1275 l_sync_trx_rec.TRX_DESCRIPTION := p_trx_description;
1276 l_sync_trx_rec.TRX_COMMUNICATED_DATE := NULL;
1277 l_sync_trx_rec.BATCH_SOURCE_ID := NULL;
1278 l_sync_trx_rec.BATCH_SOURCE_NAME := NULL;
1279 l_sync_trx_rec.DOC_SEQ_ID := NULL;
1280 l_sync_trx_rec.DOC_SEQ_NAME := NULL;
1281 l_sync_trx_rec.DOC_SEQ_VALUE := NULL;
1282 l_sync_trx_rec.TRX_DUE_DATE := NULL;
1283 l_sync_trx_rec.TRX_TYPE_DESCRIPTION := NULL;
1284 l_sync_trx_rec.SUPPLIER_TAX_INVOICE_NUMBER := NULL;
1285 l_sync_trx_rec.SUPPLIER_TAX_INVOICE_DATE := NULL;
1286 l_sync_trx_rec.SUPPLIER_EXCHANGE_RATE := NULL;
1287 l_sync_trx_rec.TAX_INVOICE_DATE := NULL;
1288 l_sync_trx_rec.TAX_INVOICE_NUMBER := NULL;
1289 l_sync_trx_rec.PORT_OF_ENTRY_CODE := NULL;
1290
1291 OPEN sync_trx_lines_rec;
1292 debug_info := 'Fetch cursor sync_trx_lines_rec';
1293
1294 i :=i + 1;
1295
1296 FETCH sync_trx_lines_rec INTO l_sync_trx_lines_rec.APPLICATION_ID(i),
1297 l_sync_trx_lines_rec.ENTITY_CODE(i),
1298 l_sync_trx_lines_rec.EVENT_CLASS_CODE(i),
1299 l_sync_trx_lines_rec.TRX_ID(i),
1300 l_sync_trx_lines_rec.TRX_LEVEL_TYPE(i),
1301 l_sync_trx_lines_rec.TRX_LINE_ID(i),
1302 l_sync_trx_lines_rec.TRX_WAYBILL_NUMBER(i),
1303 l_sync_trx_lines_rec.TRX_LINE_DESCRIPTION(i),
1304 l_sync_trx_lines_rec.PRODUCT_DESCRIPTION(i),
1305 l_sync_trx_lines_rec.TRX_LINE_GL_DATE(i),
1306 l_sync_trx_lines_rec.MERCHANT_PARTY_NAME(i),
1307 l_sync_trx_lines_rec.MERCHANT_PARTY_DOCUMENT_NUMBER(i),
1308 l_sync_trx_lines_rec.MERCHANT_PARTY_REFERENCE(i),
1309 l_sync_trx_lines_rec.MERCHANT_PARTY_TAXPAYER_ID(i),
1310 l_sync_trx_lines_rec.MERCHANT_PARTY_TAX_REG_NUMBER(i),
1311 l_sync_trx_lines_rec.ASSET_NUMBER(i);
1312
1313 IF (sync_trx_lines_rec%NOTFOUND) THEN
1314 debug_info := 'Close cursor C - DATA NOTFOUND';
1315 CLOSE sync_trx_lines_rec;
1316 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
1317 APP_EXCEPTION.Raise_Exception;
1318 END IF;
1319
1320 debug_info := 'Close cursor sync_trx_lines_rec';
1321 CLOSE sync_trx_lines_rec;
1322
1323 ZX_API_PUB.synchronize_tax_repository
1324 (p_api_version => 1.0,
1325 p_init_msg_list => NULL,
1326 p_commit => NULL,
1327 p_validation_level => NULL,
1328 x_return_status => l_return_status,
1329 x_msg_count => l_msg_count,
1330 x_msg_data => l_msg_data,
1331 p_sync_trx_rec => l_sync_trx_rec,
1332 p_sync_trx_lines_tbl => l_sync_trx_lines_rec);
1333
1334 ZX_API_PUB.CALCULATE_TAX (p_api_version => 1.0,
1335 p_init_msg_list => NULL,
1336 p_commit => NULL,
1337 p_validation_level => NULL,
1338 x_return_status => l_return_status,
1339 x_msg_count => l_msg_count,
1340 x_msg_data => l_msg_data);
1341
1342 END IF;
1343
1344 IF (g_level_procedure >= g_current_runtime_level ) THEN
1345 FND_LOG.STRING(g_level_procedure,
1346 'ZX.PLSQL.ZX_TRX_MASTER.Update_Row',
1347 'Document Event Type (-)');
1348 END IF;
1349
1350 IF (g_level_procedure >= g_current_runtime_level ) THEN
1351 FND_LOG.STRING(g_level_procedure,
1352 'ZX.PLSQL.ZX_TRX_MASTER.update_Row.END',
1353 'ZX_TRX_MASTER: update_Row (-)');
1354 END IF;
1355 END Update_Row;
1356
1357 PROCEDURE Delete_Row
1358 (p_Rowid VARCHAR2,
1359 p_first_pty_org_id NUMBER,
1360 p_internal_organization_id NUMBER,
1361 p_internal_org_location_id NUMBER,
1362 p_application_id NUMBER,
1363 p_entity_code VARCHAR2,
1364 p_event_class_code VARCHAR2,
1365 p_event_type_code VARCHAR2,
1366 p_trx_id NUMBER,
1367 p_tax_event_type_code VARCHAR2,
1368 -- p_trx_level_type VARCHAR2,
1369 p_trx_date DATE,
1370 p_document_event_type VARCHAR2,
1371 p_ledger_id NUMBER,
1372 p_trx_currency_code VARCHAR2,
1373 p_currency_conversion_date DATE,
1374 p_currency_conversion_rate NUMBER,
1375 p_currency_conversion_type VARCHAR2,
1376 p_minimum_accountable_unit NUMBER,
1377 p_precision NUMBER,
1378 p_legal_entity_ptp_id NUMBER,
1379 p_legal_entity_id NUMBER,
1380 p_rounding_ship_to_party_id NUMBER,
1381 p_rounding_ship_from_party_id NUMBER,
1382 p_rounding_bill_to_party_id NUMBER,
1383 p_rounding_bill_from_party_id NUMBER,
1384 p_rndg_ship_to_party_site_id NUMBER,
1385 p_rndg_ship_from_party_site_id NUMBER,
1386 p_rndg_bill_to_party_site_id NUMBER,
1387 p_rndg_bill_from_party_site_id NUMBER,
1388 p_bill_from_party_site_id NUMBER,
1389 p_bill_to_party_site_id NUMBER,
1390 p_ship_from_party_site_id NUMBER,
1391 p_ship_to_party_site_id NUMBER,
1392 p_ship_to_party_id NUMBER,
1393 p_ship_from_party_id NUMBER,
1394 p_bill_to_party_id NUMBER,
1395 p_bill_from_party_id NUMBER,
1396 p_ship_to_location_id NUMBER,
1397 p_ship_from_location_id NUMBER,
1398 p_bill_to_location_id NUMBER,
1399 p_bill_from_location_id NUMBER,
1400 p_poa_location_id NUMBER,
1401 p_poo_location_id NUMBER,
1402 p_paying_location_id NUMBER,
1403 p_own_hq_location_id NUMBER,
1404 p_trading_hq_location_id NUMBER,
1405 p_poc_location_id NUMBER,
1406 p_poi_location_id NUMBER,
1407 p_pod_location_id NUMBER,
1408 p_title_transfer_location_id NUMBER,
1409 p_trx_number VARCHAR2,
1410 p_trx_description VARCHAR2,
1411 p_document_sub_type VARCHAR2,
1412 p_supplier_tax_invoice_number NUMBER,
1413 p_supplier_tax_invoice_date DATE,
1414 p_supplier_exchange_rate NUMBER,
1415 p_tax_invoice_date DATE,
1416 p_tax_invoice_number NUMBER,
1417 p_tax_manual_entry_flag VARCHAR2,
1418 p_establishment_id NUMBER,
1419 p_receivables_trx_type_id NUMBER,
1420 p_default_taxation_country VARCHAR2,
1421 p_quote_flag VARCHAR2,
1422 p_ctrl_total_hdr_tx_amt NUMBER,
1423 p_port_of_entry_code VARCHAR2,
1424 p_tax_reporting_flag VARCHAR2,
1425 p_ship_to_cust_acct_siteuse_id NUMBER,
1426 p_bill_to_cust_acct_siteuse_id NUMBER,
1427 p_provnl_tax_determ_date DATE,
1428 p_applied_to_trx_number VARCHAR2,
1429 p_ship_third_pty_acct_id NUMBER,
1430 p_bill_third_pty_acct_id NUMBER,
1431 p_ship_third_pty_acct_site_id NUMBER,
1432 p_bill_third_pty_acct_site_id NUMBER,
1433 p_validation_check_flag VARCHAR2,
1434 p_object_version_number NUMBER,
1435 p_created_by NUMBER,
1436 p_creation_date DATE,
1437 p_last_updated_by NUMBER,
1438 p_last_update_date DATE,
1439 p_last_update_login NUMBER) IS
1440
1441 BEGIN
1442 g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1443
1444 IF (g_level_procedure >= g_current_runtime_level ) THEN
1445 FND_LOG.STRING(g_level_procedure,
1446 'ZX.PLSQL.ZX_TRX_MASTER.Delete_Row.BEGIN',
1447 'ZX_TRX_MASTER: Delete_Row (+)');
1448 FND_LOG.STRING(g_level_procedure,
1449 'ZX.PLSQL.ZX_TRX_MASTER.Delete_Row',
1450 'Update for DELETE in ZX_TRANSACTION (+)');
1451 END IF;
1452
1453 UPDATE ZX_TRANSACTION
1454 SET EVENT_TYPE_CODE = p_event_type_code,
1455 TRX_DATE = p_trx_date,
1456 TRX_CURRENCY_CODE = p_trx_currency_code,
1457 CURRENCY_CONVERSION_DATE = p_currency_conversion_date,
1458 CURRENCY_CONVERSION_RATE = p_currency_conversion_rate,
1459 CURRENCY_CONVERSION_TYPE = p_currency_conversion_type,
1460 MINIMUM_ACCOUNTABLE_UNIT = p_minimum_accountable_unit,
1461 PRECISION = p_precision,
1462 LEGAL_ENTITY_PTP_ID = p_legal_entity_ptp_id,
1463 LEGAL_ENTITY_ID = p_legal_entity_id,
1464 ROUNDING_SHIP_TO_PARTY_ID = p_rounding_ship_to_party_id,
1465 ROUNDING_SHIP_FROM_PARTY_ID = p_rounding_ship_from_party_id,
1466 ROUNDING_BILL_TO_PARTY_ID = p_rounding_bill_to_party_id,
1467 ROUNDING_BILL_FROM_PARTY_ID = p_rounding_bill_from_party_id,
1468 RNDG_SHIP_TO_PARTY_SITE_ID = p_rndg_ship_to_party_site_id,
1469 RNDG_SHIP_FROM_PARTY_SITE_ID = p_rndg_ship_from_party_site_id,
1470 RNDG_BILL_TO_PARTY_SITE_ID = p_rndg_bill_to_party_site_id,
1471 RNDG_BILL_FROM_PARTY_SITE_ID = p_rndg_bill_from_party_site_id,
1472 BILL_FROM_PARTY_SITE_ID = p_bill_from_party_site_id,
1473 BILL_TO_PARTY_SITE_ID = p_bill_to_party_site_id,
1474 SHIP_FROM_PARTY_SITE_ID = p_ship_from_party_site_id,
1475 SHIP_TO_PARTY_SITE_ID = p_ship_to_party_site_id,
1476 SHIP_TO_PARTY_ID = p_ship_to_party_id,
1477 SHIP_FROM_PARTY_ID = p_ship_from_party_id,
1478 BILL_TO_PARTY_ID = p_bill_to_party_id,
1479 BILL_FROM_PARTY_ID = p_bill_from_party_id,
1480 SHIP_TO_LOCATION_ID = p_ship_to_location_id,
1481 SHIP_FROM_LOCATION_ID = p_ship_from_location_id,
1482 BILL_TO_LOCATION_ID = p_bill_to_location_id,
1483 BILL_FROM_LOCATION_ID = p_bill_from_location_id,
1484 POA_LOCATION_ID = p_poa_location_id,
1485 POO_LOCATION_ID = p_poo_location_id,
1486 PAYING_LOCATION_ID = p_paying_location_id,
1487 OWN_HQ_LOCATION_ID = p_own_hq_location_id,
1488 TRADING_HQ_LOCATION_ID = p_trading_hq_location_id,
1489 POC_LOCATION_ID = p_poc_location_id,
1490 POI_LOCATION_ID = p_poi_location_id,
1491 POD_LOCATION_ID = p_pod_location_id,
1492 TITLE_TRANSFER_LOCATION_ID = p_title_transfer_location_id,
1493 TRX_NUMBER = p_trx_number,
1494 TRX_DESCRIPTION = p_trx_description,
1495 DOCUMENT_SUB_TYPE = p_document_sub_type,
1496 SUPPLIER_TAX_INVOICE_NUMBER = p_supplier_tax_invoice_number,
1497 SUPPLIER_TAX_INVOICE_DATE = p_supplier_tax_invoice_date,
1498 SUPPLIER_EXCHANGE_RATE = p_supplier_exchange_rate,
1499 ESTABLISHMENT_ID = p_establishment_id,
1500 RECEIVABLES_TRX_TYPE_ID = p_receivables_trx_type_id,
1501 DEFAULT_TAXATION_COUNTRY = p_default_taxation_country,
1502 QUOTE_FLAG = p_quote_flag,
1503 CTRL_TOTAL_HDR_TX_AMT = p_ctrl_total_hdr_tx_amt,
1504 PORT_OF_ENTRY_CODE = p_port_of_entry_code,
1505 TAX_REPORTING_FLAG = p_tax_reporting_flag,
1506 SHIP_TO_CUST_ACCT_SITE_USE_ID = p_ship_to_cust_acct_siteuse_id,
1507 BILL_TO_CUST_ACCT_SITE_USE_ID = p_bill_to_cust_acct_siteuse_id,
1508 PROVNL_TAX_DETERMINATION_DATE = p_provnl_tax_determ_date,
1509 APPLIED_TO_TRX_NUMBER = p_applied_to_trx_number,
1510 SHIP_THIRD_PTY_ACCT_ID = p_ship_third_pty_acct_id,
1511 BILL_THIRD_PTY_ACCT_ID = p_bill_third_pty_acct_id,
1512 SHIP_THIRD_PTY_ACCT_SITE_ID = p_ship_third_pty_acct_site_id,
1513 BILL_THIRD_PTY_ACCT_SITE_ID = p_bill_third_pty_acct_site_id,
1514 VALIDATION_CHECK_FLAG = p_validation_check_flag,
1515 TAX_INVOICE_DATE = p_tax_invoice_date,
1516 TAX_INVOICE_NUMBER = p_tax_invoice_number
1517 WHERE INTERNAL_ORGANIZATION_ID = p_internal_organization_id
1518 -- SUBSCRIBER_ID = p_subscriber_id
1519 AND APPLICATION_ID = p_application_id
1520 AND ENTITY_CODE = p_entity_code
1521 AND EVENT_CLASS_CODE = p_event_class_code
1522 AND TRX_ID = p_trx_id;
1523
1524 IF (g_level_procedure >= g_current_runtime_level ) THEN
1525 FND_LOG.STRING(g_level_procedure,
1526 'ZX.PLSQL.ZX_TRX_MASTER.Delete_Row',
1527 'Update for DELETE in ZX_TRANSACTION (-)');
1528 FND_LOG.STRING(g_level_procedure,
1529 'ZX.PLSQL.ZX_TRX_MASTER.Delete_Row.END',
1530 'ZX_TRX_MASTER: Delete_Row (-)');
1531 END IF;
1532 END Delete_Row;
1533
1534 PROCEDURE Lock_Row
1535 (p_Rowid VARCHAR2,
1536 p_first_pty_org_id NUMBER,
1537 p_internal_organization_id NUMBER,
1538 p_internal_org_location_id NUMBER,
1539 p_application_id NUMBER,
1540 p_entity_code VARCHAR2,
1541 p_event_class_code VARCHAR2,
1542 p_event_type_code VARCHAR2,
1543 p_trx_id NUMBER,
1544 p_tax_event_type_code VARCHAR2,
1545 -- p_trx_level_type VARCHAR2,
1546 p_trx_date DATE,
1547 p_document_event_type VARCHAR2,
1548 p_ledger_id NUMBER,
1549 p_trx_currency_code VARCHAR2,
1550 p_currency_conversion_date DATE,
1551 p_currency_conversion_rate NUMBER,
1552 p_currency_conversion_type VARCHAR2,
1553 p_minimum_accountable_unit NUMBER,
1554 p_precision NUMBER,
1555 p_legal_entity_ptp_id NUMBER,
1556 p_legal_entity_id NUMBER,
1557 p_rounding_ship_to_party_id NUMBER,
1558 p_rounding_ship_from_party_id NUMBER,
1559 p_rounding_bill_to_party_id NUMBER,
1560 p_rounding_bill_from_party_id NUMBER,
1561 p_rndg_ship_to_party_site_id NUMBER,
1562 p_rndg_ship_from_party_site_id NUMBER,
1563 p_rndg_bill_to_party_site_id NUMBER,
1564 p_rndg_bill_from_party_site_id NUMBER,
1565 p_bill_from_party_site_id NUMBER,
1566 p_bill_to_party_site_id NUMBER,
1567 p_ship_from_party_site_id NUMBER,
1568 p_ship_to_party_site_id NUMBER,
1569 p_ship_to_party_id NUMBER,
1570 p_ship_from_party_id NUMBER,
1571 p_bill_to_party_id NUMBER,
1572 p_bill_from_party_id NUMBER,
1573 p_ship_to_location_id NUMBER,
1574 p_ship_from_location_id NUMBER,
1575 p_bill_to_location_id NUMBER,
1576 p_bill_from_location_id NUMBER,
1577 p_poa_location_id NUMBER,
1578 p_poo_location_id NUMBER,
1579 p_paying_location_id NUMBER,
1580 p_own_hq_location_id NUMBER,
1581 p_trading_hq_location_id NUMBER,
1582 p_poc_location_id NUMBER,
1583 p_poi_location_id NUMBER,
1584 p_pod_location_id NUMBER,
1585 p_title_transfer_location_id NUMBER,
1586 p_trx_number VARCHAR2,
1587 p_trx_description VARCHAR2,
1588 p_document_sub_type VARCHAR2,
1589 p_supplier_tax_invoice_number NUMBER,
1590 p_supplier_tax_invoice_date DATE,
1591 p_supplier_exchange_rate NUMBER,
1592 p_tax_invoice_date DATE,
1593 p_tax_invoice_number NUMBER,
1594 p_tax_manual_entry_flag VARCHAR2,
1595 p_establishment_id NUMBER,
1596 p_receivables_trx_type_id NUMBER,
1597 p_default_taxation_country VARCHAR2,
1598 p_quote_flag VARCHAR2,
1599 p_ctrl_total_hdr_tx_amt NUMBER,
1600 p_port_of_entry_code VARCHAR2,
1601 p_tax_reporting_flag VARCHAR2,
1602 p_ship_to_cust_acct_siteuse_id NUMBER,
1603 p_bill_to_cust_acct_siteuse_id NUMBER,
1604 p_provnl_tax_determ_date DATE,
1605 p_applied_to_trx_number VARCHAR2,
1606 p_ship_third_pty_acct_id NUMBER,
1607 p_bill_third_pty_acct_id NUMBER,
1608 p_ship_third_pty_acct_site_id NUMBER,
1609 p_bill_third_pty_acct_site_id NUMBER,
1610 p_validation_check_flag VARCHAR2,
1611 p_object_version_number NUMBER,
1612 p_created_by NUMBER,
1613 p_creation_date DATE,
1614 p_last_updated_by NUMBER,
1615 p_last_update_date DATE,
1616 p_last_update_login NUMBER) IS
1617
1618 CURSOR C IS
1619 SELECT FIRST_PTY_ORG_ID,
1620 INTERNAL_ORGANIZATION_ID,
1621 INTERNAL_ORG_LOCATION_ID,
1622 APPLICATION_ID,
1623 ENTITY_CODE,
1624 EVENT_CLASS_CODE,
1625 EVENT_TYPE_CODE,
1626 TRX_ID,
1627 TAX_EVENT_TYPE_CODE,
1628 -- TRX_LEVEL_TYPE,
1629 TRX_DATE,
1630 DOCUMENT_EVENT_TYPE,
1631 LEDGER_ID,
1632 TRX_CURRENCY_CODE,
1633 CURRENCY_CONVERSION_DATE,
1634 CURRENCY_CONVERSION_RATE,
1635 CURRENCY_CONVERSION_TYPE,
1636 MINIMUM_ACCOUNTABLE_UNIT,
1637 PRECISION,
1638 LEGAL_ENTITY_PTP_ID,
1639 LEGAL_ENTITY_ID,
1640 ROUNDING_SHIP_TO_PARTY_ID,
1641 ROUNDING_SHIP_FROM_PARTY_ID,
1642 ROUNDING_BILL_TO_PARTY_ID,
1643 ROUNDING_BILL_FROM_PARTY_ID,
1644 RNDG_SHIP_TO_PARTY_SITE_ID,
1645 RNDG_SHIP_FROM_PARTY_SITE_ID,
1646 RNDG_BILL_TO_PARTY_SITE_ID,
1647 RNDG_BILL_FROM_PARTY_SITE_ID,
1648 BILL_FROM_PARTY_SITE_ID,
1649 BILL_TO_PARTY_SITE_ID,
1650 SHIP_FROM_PARTY_SITE_ID,
1651 SHIP_TO_PARTY_SITE_ID,
1652 SHIP_TO_PARTY_ID,
1653 SHIP_FROM_PARTY_ID,
1654 BILL_TO_PARTY_ID,
1655 BILL_FROM_PARTY_ID,
1656 SHIP_TO_LOCATION_ID,
1657 SHIP_FROM_LOCATION_ID,
1658 BILL_TO_LOCATION_ID,
1659 BILL_FROM_LOCATION_ID,
1660 POA_LOCATION_ID,
1661 POO_LOCATION_ID,
1662 PAYING_LOCATION_ID,
1663 OWN_HQ_LOCATION_ID,
1664 TRADING_HQ_LOCATION_ID,
1665 POC_LOCATION_ID,
1666 POI_LOCATION_ID,
1667 POD_LOCATION_ID,
1668 TRX_NUMBER,
1669 TRX_DESCRIPTION,
1670 DOCUMENT_SUB_TYPE,
1671 SUPPLIER_TAX_INVOICE_NUMBER,
1672 SUPPLIER_TAX_INVOICE_DATE,
1673 SUPPLIER_EXCHANGE_RATE,
1674 TAX_INVOICE_DATE,
1675 TAX_INVOICE_NUMBER,
1676 TITLE_TRANSFER_LOCATION_ID,
1677 TAX_MANUAL_ENTRY_FLAG,
1678 ESTABLISHMENT_ID,
1679 RECEIVABLES_TRX_TYPE_ID,
1680 DEFAULT_TAXATION_COUNTRY,
1681 QUOTE_FLAG,
1682 CTRL_TOTAL_HDR_TX_AMT,
1683 PORT_OF_ENTRY_CODE,
1684 TAX_REPORTING_FLAG,
1685 SHIP_TO_CUST_ACCT_SITE_USE_ID,
1686 BILL_TO_CUST_ACCT_SITE_USE_ID,
1687 PROVNL_TAX_DETERMINATION_DATE,
1688 APPLIED_TO_TRX_NUMBER,
1689 SHIP_THIRD_PTY_ACCT_ID,
1690 BILL_THIRD_PTY_ACCT_ID,
1691 SHIP_THIRD_PTY_ACCT_SITE_ID,
1692 BILL_THIRD_PTY_ACCT_SITE_ID,
1693 VALIDATION_CHECK_FLAG,
1694 OBJECT_VERSION_NUMBER,
1695 CREATED_BY,
1696 CREATION_DATE,
1697 LAST_UPDATED_BY,
1698 LAST_UPDATE_DATE,
1699 LAST_UPDATE_LOGIN
1700 FROM ZX_TRANSACTION
1701 WHERE APPLICATION_ID = p_application_id
1702 AND ENTITY_CODE = p_entity_code
1703 AND EVENT_CLASS_CODE = p_event_class_code
1704 AND TRX_ID = p_trx_id
1705 FOR UPDATE OF APPLICATION_ID,
1706 ENTITY_CODE,
1707 EVENT_CLASS_CODE,
1708 EVENT_TYPE_CODE,
1709 TRX_ID
1710 -- TRX_LEVEL_TYPE
1711 NOWAIT;
1712
1713 Recinfo C%ROWTYPE;
1714 debug_info VARCHAR2(100);
1715 p_error_buffer VARCHAR2(100);
1716
1717 BEGIN
1718
1719 g_current_runtime_level := FND_LOG.G_CURRENT_RUNTIME_LEVEL;
1720 IF (g_level_procedure >= g_current_runtime_level ) THEN
1721 FND_LOG.STRING(g_level_procedure,
1722 'ZX.PLSQL.ZX_TRX_MASTER.Lock_Row.BEGIN',
1723 'ZX_TRX_MASTER: Lock_Row (+)');
1724 END IF;
1725
1726 debug_info := 'Open cursor C';
1727 OPEN C;
1728 debug_info := 'Fetch cursor C';
1729 FETCH C INTO Recinfo;
1730
1731 IF (C%NOTFOUND) THEN
1732 debug_info := 'Close cursor C - DATA NOTFOUND';
1733 CLOSE C;
1734 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_DELETED');
1735 APP_EXCEPTION.Raise_Exception;
1736 END IF;
1737
1738 debug_info := 'Close cursor C';
1739 CLOSE C;
1740
1741 IF (((Recinfo.FIRST_PTY_ORG_ID = p_FIRST_PTY_ORG_ID) OR
1742 ((Recinfo.FIRST_PTY_ORG_ID IS NULL) AND
1743 (p_FIRST_PTY_ORG_ID IS NULL))) AND
1744 (Recinfo.INTERNAL_ORGANIZATION_ID = p_INTERNAL_ORGANIZATION_ID ) AND
1745 ((Recinfo.INTERNAL_ORG_LOCATION_ID = p_INTERNAL_ORG_LOCATION_ID) OR
1746 ((Recinfo.INTERNAL_ORG_LOCATION_ID IS NULL) AND
1747 (p_INTERNAL_ORG_LOCATION_ID IS NULL))) AND
1748 (Recinfo.APPLICATION_ID = p_APPLICATION_ID) AND
1749 (Recinfo.ENTITY_CODE = p_ENTITY_CODE) AND
1750 (Recinfo.EVENT_CLASS_CODE = p_EVENT_CLASS_CODE) AND
1751 (Recinfo.EVENT_TYPE_CODE = p_EVENT_TYPE_CODE) AND
1752 (Recinfo.TRX_ID = p_TRX_ID) AND
1753 (Recinfo.LEGAL_ENTITY_ID = p_LEGAL_ENTITY_ID) AND
1754 ((Recinfo.TAX_EVENT_TYPE_CODE = p_TAX_EVENT_TYPE_CODE) OR
1755 ((Recinfo.TAX_EVENT_TYPE_CODE IS NULL) AND
1756 (p_TAX_EVENT_TYPE_CODE IS NULL))) AND
1757 -- (Recinfo.TRX_LEVEL_TYPE = p_TRX_LEVEL_TYPE) AND
1758 ((Recinfo.TRX_DATE = p_TRX_DATE) OR
1759 ((Recinfo.TRX_DATE IS NULL) AND
1760 (p_TRX_DATE IS NULL))) AND
1761 ((Recinfo.DOCUMENT_EVENT_TYPE = p_document_event_type) OR
1762 ((Recinfo.DOCUMENT_EVENT_TYPE IS NULL) AND
1763 (p_document_event_type IS NULL))) AND
1764 ((Recinfo.LEDGER_ID = p_LEDGER_ID) OR
1765 ((Recinfo.LEDGER_ID IS NULL) AND
1766 (p_LEDGER_ID IS NULL))) AND
1767 ((Recinfo.TRX_CURRENCY_CODE = p_TRX_CURRENCY_CODE) OR
1768 ((Recinfo.TRX_CURRENCY_CODE IS NULL) AND
1769 (p_TRX_CURRENCY_CODE IS NULL))) AND
1770 ((Recinfo.CURRENCY_CONVERSION_DATE = p_CURRENCY_CONVERSION_DATE) OR
1771 ((Recinfo.CURRENCY_CONVERSION_DATE IS NULL) AND
1772 (p_CURRENCY_CONVERSION_DATE IS NULL))) AND
1773 ((Recinfo.CURRENCY_CONVERSION_RATE = p_CURRENCY_CONVERSION_RATE) OR
1774 ((Recinfo.CURRENCY_CONVERSION_RATE IS NULL) AND
1775 (p_CURRENCY_CONVERSION_RATE IS NULL))) AND
1776 ((Recinfo.CURRENCY_CONVERSION_TYPE = p_CURRENCY_CONVERSION_TYPE) OR
1777 ((Recinfo.CURRENCY_CONVERSION_TYPE IS NULL) AND
1778 (p_CURRENCY_CONVERSION_TYPE IS NULL))) AND
1779 ((Recinfo.MINIMUM_ACCOUNTABLE_UNIT = p_MINIMUM_ACCOUNTABLE_UNIT) OR
1780 ((Recinfo.MINIMUM_ACCOUNTABLE_UNIT IS NULL) AND
1781 (p_MINIMUM_ACCOUNTABLE_UNIT IS NULL))) AND
1782 ((Recinfo.PRECISION = p_PRECISION) OR
1783 ((Recinfo.PRECISION IS NULL) AND
1784 (p_PRECISION IS NULL))) AND
1785 ((Recinfo.LEGAL_ENTITY_PTP_ID = p_LEGAL_ENTITY_PTP_ID) OR
1786 ((Recinfo.LEGAL_ENTITY_PTP_ID IS NULL) AND
1787 (p_LEGAL_ENTITY_PTP_ID IS NULL))) AND
1788 ((Recinfo.ROUNDING_SHIP_TO_PARTY_ID = p_ROUNDING_SHIP_TO_PARTY_ID) OR
1789 ((Recinfo.ROUNDING_SHIP_TO_PARTY_ID IS NULL) AND
1790 (p_ROUNDING_SHIP_TO_PARTY_ID IS NULL))) AND
1791 ((Recinfo.ROUNDING_SHIP_FROM_PARTY_ID = p_ROUNDING_SHIP_FROM_PARTY_ID) OR
1792 ((Recinfo.ROUNDING_SHIP_FROM_PARTY_ID IS NULL) AND
1793 (p_ROUNDING_SHIP_FROM_PARTY_ID IS NULL))) AND
1794 ((Recinfo.ROUNDING_BILL_TO_PARTY_ID = p_ROUNDING_BILL_TO_PARTY_ID) OR
1795 ((Recinfo.ROUNDING_BILL_TO_PARTY_ID IS NULL) AND
1796 (p_ROUNDING_BILL_TO_PARTY_ID IS NULL))) AND
1797 ((Recinfo.ROUNDING_BILL_FROM_PARTY_ID = p_ROUNDING_BILL_FROM_PARTY_ID) OR
1798 ((Recinfo.ROUNDING_BILL_FROM_PARTY_ID IS NULL) AND
1799 (p_ROUNDING_BILL_FROM_PARTY_ID IS NULL))) AND
1800 ((Recinfo.RNDG_SHIP_TO_PARTY_SITE_ID = p_RNDG_SHIP_TO_PARTY_SITE_ID) OR
1801 ((Recinfo.RNDG_SHIP_TO_PARTY_SITE_ID IS NULL) AND
1802 (p_RNDG_SHIP_TO_PARTY_SITE_ID IS NULL))) AND
1803 ((Recinfo.RNDG_SHIP_FROM_PARTY_SITE_ID = p_RNDG_SHIP_FROM_PARTY_SITE_ID) OR
1804 ((Recinfo.RNDG_SHIP_FROM_PARTY_SITE_ID IS NULL) AND
1805 (p_RNDG_SHIP_FROM_PARTY_SITE_ID IS NULL))) AND
1806 ((Recinfo.RNDG_BILL_TO_PARTY_SITE_ID = p_RNDG_BILL_TO_PARTY_SITE_ID) OR
1807 ((Recinfo.RNDG_BILL_TO_PARTY_SITE_ID IS NULL) AND
1808 (p_RNDG_BILL_TO_PARTY_SITE_ID IS NULL))) AND
1809 ((Recinfo.RNDG_BILL_FROM_PARTY_SITE_ID = p_RNDG_BILL_FROM_PARTY_SITE_ID) OR
1810 ((Recinfo.RNDG_BILL_FROM_PARTY_SITE_ID IS NULL) AND
1811 (p_RNDG_BILL_FROM_PARTY_SITE_ID IS NULL))) AND
1812 ((Recinfo.BILL_FROM_PARTY_SITE_ID = p_BILL_FROM_PARTY_SITE_ID) OR
1813 ((Recinfo.BILL_FROM_PARTY_SITE_ID IS NULL) AND
1814 (p_BILL_FROM_PARTY_SITE_ID IS NULL))) AND
1815 ((Recinfo.BILL_TO_PARTY_SITE_ID = p_BILL_TO_PARTY_SITE_ID) OR
1816 ((Recinfo.BILL_TO_PARTY_SITE_ID IS NULL) AND
1817 (p_BILL_TO_PARTY_SITE_ID IS NULL))) AND
1818 ((Recinfo.SHIP_FROM_PARTY_SITE_ID = p_SHIP_FROM_PARTY_SITE_ID) OR
1819 ((Recinfo.SHIP_FROM_PARTY_SITE_ID IS NULL) AND
1820 (p_SHIP_FROM_PARTY_SITE_ID IS NULL))) AND
1821 ((Recinfo.SHIP_TO_PARTY_SITE_ID = p_SHIP_TO_PARTY_SITE_ID) OR
1822 ((Recinfo.SHIP_TO_PARTY_SITE_ID IS NULL) AND
1823 (p_SHIP_TO_PARTY_SITE_ID IS NULL))) AND
1824 ((Recinfo.SHIP_TO_PARTY_ID = p_SHIP_TO_PARTY_ID) OR
1825 ((Recinfo.SHIP_TO_PARTY_ID IS NULL) AND
1826 (p_SHIP_TO_PARTY_ID IS NULL))) AND
1827 ((Recinfo.SHIP_FROM_PARTY_ID = p_SHIP_FROM_PARTY_ID) OR
1828 ((Recinfo.SHIP_FROM_PARTY_ID IS NULL) AND
1829 (p_SHIP_FROM_PARTY_ID IS NULL))) AND
1830 ((Recinfo.BILL_TO_PARTY_ID = p_BILL_TO_PARTY_ID) OR
1831 ((Recinfo.BILL_TO_PARTY_ID IS NULL) AND
1832 (p_BILL_TO_PARTY_ID IS NULL))) AND
1833 ((Recinfo.BILL_FROM_PARTY_ID = p_BILL_FROM_PARTY_ID) OR
1834 ((Recinfo.BILL_FROM_PARTY_ID IS NULL) AND
1835 (p_BILL_FROM_PARTY_ID IS NULL))) AND
1836 ((Recinfo.SHIP_TO_LOCATION_ID = p_SHIP_TO_LOCATION_ID) OR
1837 ((Recinfo.SHIP_TO_LOCATION_ID IS NULL) AND
1838 (p_SHIP_TO_LOCATION_ID IS NULL))) AND
1839 ((Recinfo.SHIP_FROM_LOCATION_ID = p_SHIP_FROM_LOCATION_ID) OR
1840 ((Recinfo.SHIP_FROM_LOCATION_ID IS NULL) AND
1841 (p_SHIP_FROM_LOCATION_ID IS NULL))) AND
1842 ((Recinfo.BILL_TO_LOCATION_ID = p_BILL_TO_LOCATION_ID) OR
1843 ((Recinfo.BILL_TO_LOCATION_ID IS NULL) AND
1844 (p_BILL_TO_LOCATION_ID IS NULL))) AND
1845 ((Recinfo.BILL_FROM_LOCATION_ID = p_BILL_FROM_LOCATION_ID) OR
1846 ((Recinfo.BILL_FROM_LOCATION_ID IS NULL) AND
1847 (p_BILL_FROM_LOCATION_ID IS NULL))) AND
1848 ((Recinfo.POA_LOCATION_ID = p_POA_LOCATION_ID) OR
1849 ((Recinfo.POA_LOCATION_ID IS NULL) AND
1850 (p_POA_LOCATION_ID IS NULL))) AND
1851 ((Recinfo.POO_LOCATION_ID = p_POO_LOCATION_ID) OR
1852 ((Recinfo.POO_LOCATION_ID IS NULL) AND
1853 (p_POO_LOCATION_ID IS NULL))) AND
1854 ((Recinfo.PAYING_LOCATION_ID = p_PAYING_LOCATION_ID) OR
1855 ((Recinfo.PAYING_LOCATION_ID IS NULL) AND
1856 (p_PAYING_LOCATION_ID IS NULL))) AND
1857 ((Recinfo.OWN_HQ_LOCATION_ID = p_OWN_HQ_LOCATION_ID) OR
1858 ((Recinfo.OWN_HQ_LOCATION_ID IS NULL) AND
1859 (p_OWN_HQ_LOCATION_ID IS NULL))) AND
1860 ((Recinfo.TRADING_HQ_LOCATION_ID = p_TRADING_HQ_LOCATION_ID) OR
1861 ((Recinfo.TRADING_HQ_LOCATION_ID IS NULL) AND
1862 (p_TRADING_HQ_LOCATION_ID IS NULL))) AND
1863 ((Recinfo.POC_LOCATION_ID = p_POC_LOCATION_ID) OR
1864 ((Recinfo.POC_LOCATION_ID IS NULL) AND
1865 (p_POC_LOCATION_ID IS NULL))) AND
1866 ((Recinfo.POI_LOCATION_ID = p_POI_LOCATION_ID) OR
1867 ((Recinfo.POI_LOCATION_ID IS NULL) AND
1868 (p_POI_LOCATION_ID IS NULL))) AND
1869 ((Recinfo.POD_LOCATION_ID = p_POD_LOCATION_ID) OR
1870 ((Recinfo.POD_LOCATION_ID IS NULL) AND
1871 (p_POD_LOCATION_ID IS NULL))) AND
1872 ((Recinfo.TRX_NUMBER = p_TRX_NUMBER) ) AND
1873 ((Recinfo.TRX_DESCRIPTION = p_TRX_DESCRIPTION) OR
1874 ((Recinfo.TRX_DESCRIPTION IS NULL) AND
1875 (p_TRX_DESCRIPTION IS NULL))) AND
1876 ((Recinfo.DOCUMENT_SUB_TYPE = p_DOCUMENT_SUB_TYPE) OR
1877 ((Recinfo.DOCUMENT_SUB_TYPE IS NULL) AND
1878 (p_DOCUMENT_SUB_TYPE IS NULL))) AND
1879 ((Recinfo.SUPPLIER_TAX_INVOICE_NUMBER = p_SUPPLIER_TAX_INVOICE_NUMBER) OR
1880 ((Recinfo.SUPPLIER_TAX_INVOICE_NUMBER IS NULL) AND
1881 (p_SUPPLIER_TAX_INVOICE_NUMBER IS NULL))) AND
1882 ((Recinfo.SUPPLIER_TAX_INVOICE_DATE = p_supplier_tax_invoice_date) OR
1883 ((Recinfo.SUPPLIER_TAX_INVOICE_DATE IS NULL) AND
1884 (p_supplier_tax_invoice_date IS NULL))) AND
1885 ((Recinfo.SUPPLIER_EXCHANGE_RATE = p_supplier_exchange_rate) OR
1886 ((Recinfo.SUPPLIER_EXCHANGE_RATE IS NULL) AND
1887 (p_supplier_exchange_rate IS NULL))) AND
1888 ((Recinfo.TAX_INVOICE_DATE = p_tax_invoice_date) OR
1889 ((Recinfo.TAX_INVOICE_DATE IS NULL) AND
1890 (p_tax_invoice_date IS NULL))) AND
1891 ((Recinfo.TAX_INVOICE_NUMBER = p_tax_invoice_number) OR
1892 ((Recinfo.TAX_INVOICE_NUMBER IS NULL) AND
1893 (p_tax_invoice_number IS NULL))) AND
1894 ((Recinfo.TITLE_TRANSFER_LOCATION_ID = p_title_transfer_location_id) OR
1895 ((Recinfo.TITLE_TRANSFER_LOCATION_ID IS NULL) AND
1896 (p_title_transfer_location_id IS NULL))) AND
1897 ((Recinfo.TAX_MANUAL_ENTRY_FLAG = p_tax_manual_entry_flag) OR
1898 ((Recinfo.TAX_MANUAL_ENTRY_FLAG IS NULL) AND
1899 (p_tax_manual_entry_flag IS NULL))) AND
1900 ((Recinfo.ESTABLISHMENT_ID = p_ESTABLISHMENT_ID) OR
1901 ((Recinfo.ESTABLISHMENT_ID IS NULL) AND
1902 (p_ESTABLISHMENT_ID IS NULL))) AND
1903 ((Recinfo.RECEIVABLES_TRX_TYPE_ID = p_RECEIVABLES_TRX_TYPE_ID ) OR
1904 ((Recinfo.RECEIVABLES_TRX_TYPE_ID IS NULL) AND
1905 (p_RECEIVABLES_TRX_TYPE_ID IS NULL))) AND
1906 ((Recinfo.DEFAULT_TAXATION_COUNTRY = p_DEFAULT_TAXATION_COUNTRY ) OR
1907 ((Recinfo.DEFAULT_TAXATION_COUNTRY IS NULL) AND
1908 (p_DEFAULT_TAXATION_COUNTRY IS NULL))) AND
1909 ((Recinfo.QUOTE_FLAG = p_QUOTE_FLAG ) OR
1910 ((Recinfo.QUOTE_FLAG IS NULL) AND
1911 (p_QUOTE_FLAG IS NULL))) AND
1912 ((Recinfo.CTRL_TOTAL_HDR_TX_AMT = p_CTRL_TOTAL_HDR_TX_AMT ) OR
1913 ((Recinfo.CTRL_TOTAL_HDR_TX_AMT IS NULL) AND
1914 (p_CTRL_TOTAL_HDR_TX_AMT IS NULL))) AND
1915 ((Recinfo.PORT_OF_ENTRY_CODE = p_PORT_OF_ENTRY_CODE ) OR
1916 ((Recinfo.PORT_OF_ENTRY_CODE IS NULL) AND
1917 (p_PORT_OF_ENTRY_CODE IS NULL))) AND
1918 ((Recinfo.TAX_REPORTING_FLAG = p_TAX_REPORTING_FLAG ) OR
1919 ((Recinfo.TAX_REPORTING_FLAG IS NULL) AND
1920 (p_TAX_REPORTING_FLAG IS NULL))) AND
1921 ((Recinfo.SHIP_TO_CUST_ACCT_SITE_USE_ID = p_SHIP_TO_CUST_ACCT_SITEUSE_ID ) OR
1922 ((Recinfo.SHIP_TO_CUST_ACCT_SITE_USE_ID IS NULL) AND
1923 (p_SHIP_TO_CUST_ACCT_SITEUSE_ID IS NULL))) AND
1924 ((Recinfo.BILL_TO_CUST_ACCT_SITE_USE_ID = p_BILL_TO_CUST_ACCT_SITEUSE_ID ) OR
1925 ((Recinfo.BILL_TO_CUST_ACCT_SITE_USE_ID IS NULL) AND
1926 (p_BILL_TO_CUST_ACCT_SITEUSE_ID IS NULL))) AND
1927 ((Recinfo.PROVNL_TAX_DETERMINATION_DATE = p_PROVNL_TAX_DETERM_DATE ) OR
1928 ((Recinfo.PROVNL_TAX_DETERMINATION_DATE IS NULL) AND
1929 (p_PROVNL_TAX_DETERM_DATE IS NULL))) AND
1930 ((Recinfo.APPLIED_TO_TRX_NUMBER = p_APPLIED_TO_TRX_NUMBER ) OR
1931 ((Recinfo.APPLIED_TO_TRX_NUMBER IS NULL) AND
1932 (p_APPLIED_TO_TRX_NUMBER IS NULL))) AND
1933 ((Recinfo.SHIP_THIRD_PTY_ACCT_ID = p_SHIP_THIRD_PTY_ACCT_ID ) OR
1934 ((Recinfo.SHIP_THIRD_PTY_ACCT_ID IS NULL) AND
1935 (p_SHIP_THIRD_PTY_ACCT_ID IS NULL))) AND
1936 ((Recinfo.BILL_THIRD_PTY_ACCT_ID = p_BILL_THIRD_PTY_ACCT_ID ) OR
1937 ((Recinfo.BILL_THIRD_PTY_ACCT_ID IS NULL) AND
1938 (p_BILL_THIRD_PTY_ACCT_ID IS NULL))) AND
1939 ((Recinfo.SHIP_THIRD_PTY_ACCT_SITE_ID = p_SHIP_THIRD_PTY_ACCT_SITE_ID ) OR
1940 ((Recinfo.SHIP_THIRD_PTY_ACCT_SITE_ID IS NULL) AND
1941 (p_SHIP_THIRD_PTY_ACCT_SITE_ID IS NULL))) AND
1942 ((Recinfo.BILL_THIRD_PTY_ACCT_SITE_ID = p_BILL_THIRD_PTY_ACCT_SITE_ID ) OR
1943 ((Recinfo.BILL_THIRD_PTY_ACCT_SITE_ID IS NULL) AND
1944 (p_BILL_THIRD_PTY_ACCT_SITE_ID IS NULL))) AND
1945 ((Recinfo.VALIDATION_CHECK_FLAG = p_VALIDATION_CHECK_FLAG ) OR
1946 ((Recinfo.VALIDATION_CHECK_FLAG IS NULL) AND
1947 (p_VALIDATION_CHECK_FLAG IS NULL))) AND
1948 (Recinfo.OBJECT_VERSION_NUMBER = p_OBJECT_VERSION_NUMBER) AND
1949 (Recinfo.CREATED_BY = p_created_by) AND
1950 (Recinfo.CREATION_DATE = p_CREATION_DATE) AND
1951 (Recinfo.LAST_UPDATED_BY = p_last_updated_by) AND
1952 (Recinfo.LAST_UPDATE_DATE = p_last_update_date) AND
1953 ((Recinfo.LAST_UPDATE_LOGIN = p_last_update_login) OR
1954 ((Recinfo.LAST_UPDATE_LOGIN IS NULL) AND
1955 (p_last_update_login IS NULL))) ) THEN
1956
1957 return;
1958 ELSE
1959 FND_MESSAGE.Set_Name('FND', 'FORM_RECORD_CHANGED');
1960 APP_EXCEPTION.Raise_Exception;
1961 END IF;
1962
1963 IF (g_level_procedure >= g_current_runtime_level ) THEN
1964 FND_LOG.STRING(g_level_procedure,
1965 'ZX.PLSQL.ZX_TRX_MASTER.Lock_Row.END',
1966 'ZX_TRX_MASTER: Lock_Row (-)');
1967 END IF;
1968 EXCEPTION
1969 WHEN OTHERS THEN
1970 p_error_buffer := sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80);
1971
1972 FND_MESSAGE.SET_NAME('ZX','ZX_UNEXPECTED_ERROR');
1973 FND_MSG_PUB.Add;
1974
1975 IF (g_level_unexpected >= g_current_runtime_level ) THEN
1976 FND_LOG.STRING(g_level_unexpected,
1977 'ZX.PLSQL.ZX_TRX_MASTER.Lock_Row',
1978 p_error_buffer);
1979 END IF;
1980 END Lock_Row;
1981
1982 END ZX_TRX_MASTER;