[Home] [Help]
PACKAGE BODY: APPS.ZX_MIGRATE_REP_ENTITIES_PKG
Source
1 PACKAGE BODY ZX_MIGRATE_REP_ENTITIES_PKG AS
2 /* $Header: zxrepentitiesb.pls 120.61.12020000.2 2012/10/04 05:22:35 snoothi ship $ */
3
4 PG_DEBUG CONSTANT VARCHAR(1) default
5 NVL(FND_PROFILE.value('AFLOG_ENABLED'), 'N');
6 l_multi_org_flag fnd_product_groups.multi_org_flag%type;
7 l_org_id NUMBER(15);
8
9 /* Used to create the reporting code association for AP */
10 PROCEDURE CREATE_ZX_REPORTING_ASSOC_AP(p_tax_id IN NUMBER);
11
12 /* Used to create the reporting code association for AR */
13 PROCEDURE CREATE_ZX_REPORTING_ASSOC_AR(p_tax_id IN NUMBER);
14
15 /* Used to create the reporting type and code for AP */
16 PROCEDURE CREATE_ZX_REP_TYPE_CODES_AP(p_tax_id IN NUMBER);
17
18 /* Used to create the reporting type and code for AR */
19 PROCEDURE CREATE_ZX_REP_TYPE_CODES_AR(p_tax_id IN NUMBER);
20
21 /* Common procedure used to create Reporting Types for AR*/
22 PROCEDURE CREATE_REPORTING_TYPE_AR(
23 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
24 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
25 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE,
26 P_category IN AR_VAT_TAX_ALL_B.GLOBAL_ATTRIBUTE_CATEGORY%TYPE,
27 p_tax_id IN NUMBER
28 );
29
30 /* Common procedure used to create Reporting Types for AP*/
31 PROCEDURE CREATE_REPORTING_TYPE_AP(
32 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
33 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
34 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE,
35 P_category IN AR_VAT_TAX_ALL_B.GLOBAL_ATTRIBUTE_CATEGORY%TYPE,
36 p_tax_id IN NUMBER
37 );
38
39 /* Common procedure used to create Reporting Codes */
40 PROCEDURE CREATE_REPORTING_CODES (
41 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
42 P_lookup_type IN FND_LOOKUPS.LOOKUP_TYPE%TYPE
43 );
44
45 /*Common procedure used to create Reporting types for bug fix 3722296*/
46 PROCEDURE CREATE_REPORT_TYPE_PTP
47 (
48 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
49 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
50 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE
51 );
52
53 PROCEDURE CREATE_REPORT_TYPE_SEED
54 (
55 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
56 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
57 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE
58 );
59
60 PROCEDURE CREATE_REPORTING_CODES_SEED (
61 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
62 P_lookup_type IN FND_LOOKUPS.LOOKUP_TYPE%TYPE
63 );
64
65 PROCEDURE CREATE_REPORTTYPE_USAGES_SEED;
66
67 /* Used to create the reporting types for EMEA */
68 PROCEDURE CREATE_REPORTING_TYPE_EMEA;
69
70 /* Used to create the reporting type usages for EMEA */
71 PROCEDURE CREATE_REPORT_TYP_USAGES_EMEA;
72
73 /* Used to create the reporting codes for EMEA */
74 PROCEDURE CREATE_REPORTING_CODES_EMEA;
75
76 /* Used to create the reporting code association for EMEA */
77 PROCEDURE CREATE_REP_CODE_ASSOC_EMEA;
78
79 /* Used to create the reporting entities for UK Reverse Charge Vat */
80 PROCEDURE CREATE_REP_ENT_REVERSE_VAT;
81
82 /* Used to create the reporting types for EUVAT */
83 PROCEDURE CREATE_REPORTING_TYPE_EUVAT;
84
85 /* Used to create the reporting type usages for EUVAT */
86 PROCEDURE CREATE_REPORT_TYP_USAGES_EUVAT;
87
88 /* Used to create the reporting codes for EUVAT */
89 PROCEDURE CREATE_REPORTING_CODES_EUVAT;
90
91 /* Used to create the reporting code association for EUVAT */
92 PROCEDURE CREATE_REP_CODE_ASSOC_EUVAT;
93
94 /* Used to create the reporting entity EUVAT */
95 PROCEDURE CREATE_REP_ENT_EUVAT;
96
97 /*=========================================================================+
98 | PROCEDURE |
99 | CREATE_ZX_REPORTING_ASSOC |
100 | |
101 | DESCRIPTION |
102 | |
103 | Used to create the reporting code association for different eTax |
104 | entities. |
105 | |
106 | SCOPE - PUBLIC |
107 | |
108 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
109 | |
110 | CALLED FROM |
111 | |
112 | NOTES |
113 | |
114 | MODIFICATION HISTORY |
115 | 01-Jul-04 Arnab Sengupta Created. |
116 | |
117 |=========================================================================*/
118
119 PROCEDURE CREATE_ZX_REPORTING_ASSOC(p_tax_id IN NUMBER) IS
120 l_status fnd_module_installations.status%TYPE;
121 l_db_status fnd_module_installations.DB_STATUS%TYPE;
122
123 l_reporting_type_id zx_reporting_types_b.reporting_type_id%TYPE ;
124
125 BEGIN
126 arp_util_tax.debug('CREATE_ZX_REPORTING_ASSOC(+)');
127
128 IF Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
129 CREATE_ZX_REPORTING_ASSOC_AP(p_tax_id);
130 END IF;
131
132 IF Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
133 CREATE_ZX_REPORTING_ASSOC_AR(p_tax_id);
134 END IF;
135
136 --Bug 5092560 : To Create Association with Taxes for Reporting Type 'REPORTING_STATUS_TRACKING'
137
138 BEGIN
139 SELECT reporting_type_id
140 INTO l_reporting_type_id
141 FROM zx_reporting_types_b
142 WHERE reporting_type_code = 'REPORTING_STATUS_TRACKING';
143
144 INSERT
145 INTO ZX_REPORT_CODES_ASSOC(
146 REPORTING_CODE_ASSOC_ID,
147 ENTITY_CODE ,
148 ENTITY_ID ,
149 REPORTING_TYPE_ID ,
150 REPORTING_CODE_ID ,
151 EXCEPTION_CODE ,
152 EFFECTIVE_FROM ,
153 EFFECTIVE_TO ,
154 CREATED_BY ,
155 CREATION_DATE ,
156 LAST_UPDATED_BY ,
157 LAST_UPDATE_DATE ,
158 LAST_UPDATE_LOGIN ,
159 REPORTING_CODE_CHAR_VALUE,
160 REPORTING_CODE_DATE_VALUE,
161 REPORTING_CODE_NUM_VALUE,
162 OBJECT_VERSION_NUMBER
163 )
164 SELECT
165 ZX_REPORT_CODES_ASSOC_S.nextval ,
166 'ZX_TAXES' ,--ENTITY_CODE
167 TAX_ID ,--ENTITY_ID
168 l_reporting_type_id ,--REPORTING_TYPE_ID
169 NULL ,--REPORTING_CODE_ID
170 NULL ,--EXCEPTION_CODE
171 EFFECTIVE_FROM ,
172 effective_to ,--EFFECTIVE_TO
173 created_by ,
174 CREATION_DATE ,
175 LAST_UPDATED_BY ,
176 LAST_UPDATE_DATE ,
177 LAST_UPDATE_LOGIN ,
178 'Y' , --REPORTING_CODE_CHAR_VALUE
179 NULL,
180 NULL,
181 1
182 from zx_taxes_b taxes
183 where legal_reporting_status_def_val = '000000000000000'
184 AND not EXISTS
185 ( SELECT 1 from ZX_REPORT_CODES_ASSOC
186 where entity_code = 'ZX_TAXES'
187 and entity_id = taxes.tax_id
188 and reporting_type_id = l_reporting_type_id
189 );
190 EXCEPTION
191 WHEN OTHERS THEN
192 NULL ;
193 END ;
194
195
196
197 arp_util_tax.debug('CREATE_ZX_REPORTING_ASSOC(-)');
198
199 END CREATE_ZX_REPORTING_ASSOC;
200
201
202 /*==========================================================================+
203 | PROCEDURE |
204 | CREATE_ZX_REP_TYPES_CODES |
205 | |
206 | DESCRIPTION |
207 | This routine inserts data into following zx reporting entities based |
208 | on data in AP_TAX_CODES_ALL GDF attributes. |
209 | ZX_REPORTING_TYPES_B |
210 | ZX_REPORTING_TYPES_TL |
211 | ZX_REPORTING_CODES_B |
212 | ZX_REPORTING_CODES_TL |
213 | ZX_REPORT_TYPES_USAGES |
214 | |
215 | SCOPE - PUBLIC |
216 | |
217 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
218 | |
219 | NOTES |
220 | |
221 | MODIFICATION HISTORY |
222 | 01-Jul-04 Arnab Sengupta Created |
223 |==========================================================================*/
224
225
226 PROCEDURE CREATE_ZX_REP_TYPE_CODES(p_tax_id IN NUMBER ) IS
227 l_lookup_code ZX_REPORTING_CODES_B.REPORTING_CODE_CHAR_VALUE%TYPE ; -- Bug 4936036
228 BEGIN
229
230 IF PG_DEBUG = 'Y' THEN
231 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES(+)');
232 END IF;
233
234 -- If AP Installed then
235 IF Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
236 CREATE_ZX_REP_TYPE_CODES_AP(p_tax_id);
237 END IF;
238
239 -- If AR Installed then
240 IF Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
241 CREATE_ZX_REP_TYPE_CODES_AR(p_tax_id);
242 END IF;
243
244
245 -- Following code is common for both AP and AR
246
247 /* Bug 4936036 :
248 Added the Code to create reporting codes for PT_LOCATION for both AP and AR regimes as code is common for both
249 of them */
250 FOR i IN 1..3
251 LOOP
252 IF ( i = 1 ) THEN l_lookup_code := 'A' ;
253 ELSIF ( i = 2 ) THEN l_lookup_code := 'C';
254 ELSE l_lookup_code := 'M';
255 END IF ;
256
257 INSERT
258 INTO ZX_REPORTING_CODES_B(
259 REPORTING_CODE_ID ,
260 EXCEPTION_CODE ,
261 EFFECTIVE_FROM ,
262 EFFECTIVE_TO ,
263 RECORD_TYPE_CODE ,
264 CREATED_BY ,
265 CREATION_DATE ,
266 LAST_UPDATED_BY ,
267 LAST_UPDATE_DATE ,
268 LAST_UPDATE_LOGIN ,
269 REQUEST_ID ,
270 PROGRAM_APPLICATION_ID ,
271 PROGRAM_ID ,
272 PROGRAM_LOGIN_ID ,
273 REPORTING_CODE_CHAR_VALUE ,
274 REPORTING_CODE_DATE_VALUE ,
275 REPORTING_CODE_NUM_VALUE ,
276 REPORTING_TYPE_ID ,
277 OBJECT_VERSION_NUMBER
278 )
279 SELECT
280 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
281 NULL ,--EXCEPTION_CODE
282 report_types.EFFECTIVE_FROM ,
283 NULL ,--EFFECTIVE_TO
284 'MIGRATED' ,--RECORD_TYPE_CODE
285 fnd_global.user_id ,
286 SYSDATE ,
287 fnd_global.user_id ,
288 SYSDATE ,
289 fnd_global.conc_login_id ,
290 fnd_global.conc_request_id , -- Request Id
291 fnd_global.prog_appl_id , -- Program Application ID
292 fnd_global.conc_program_id , -- Program Id
293 fnd_global.conc_login_id , -- Program Login ID
294 l_lookup_code,
295 NULL,
296 NULL,
297 report_types.REPORTING_TYPE_ID,
298 1
299 FROM
300 ZX_REPORTING_TYPES_B report_types
301 WHERE
302 report_types.REPORTING_TYPE_CODE = 'PT_LOCATION'
303 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
304 AND NOT EXISTS
305 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
306 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
307 REPORTING_CODE_CHAR_VALUE= l_lookup_code
308 );
309 END LOOP ;
310 -- End Bug 4936036
311
312 -- Creation of FISCAL PRINTER Reporting Type and Reporting Usage
313 -- Bug # 3587896
314 INSERT ALL
315 WHEN ( NOT EXISTS (select 1 from zx_reporting_types_b
316 where reporting_type_code='FISCAL PRINTER'
317 and tax_regime_code = l_tax_regime_code)
318 )
319 THEN
320 INTO ZX_REPORTING_TYPES_B(
321 REPORTING_TYPE_ID ,
322 REPORTING_TYPE_CODE ,
323 REPORTING_TYPE_DATATYPE_CODE ,
324 TAX_REGIME_CODE ,
325 TAX ,
326 FORMAT_MASK ,
327 MIN_LENGTH ,
328 MAX_LENGTH ,
329 LEGAL_MESSAGE_FLAG ,
330 EFFECTIVE_FROM ,
331 EFFECTIVE_TO ,
332 RECORD_TYPE_CODE ,
333 HAS_REPORTING_CODES_FLAG ,
334 CREATED_BY ,
335 CREATION_DATE ,
336 LAST_UPDATED_BY ,
337 LAST_UPDATE_DATE ,
338 LAST_UPDATE_LOGIN ,
339 REQUEST_ID ,
340 PROGRAM_APPLICATION_ID ,
341 PROGRAM_ID ,
342 PROGRAM_LOGIN_ID ,
343 OBJECT_VERSION_NUMBER
344 )
345 VALUES(
346 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
347 'FISCAL PRINTER' ,--REPORTING_TYPE_CODE
348 'YES_NO' ,--REPORTING_TYPE_DATATYPE
349 l_tax_regime_code ,--TAX_REGIME_CODE
350 NULL ,--TAX
351 NULL ,--FORMAT_MASK
352 1 ,--MIN_LENGTH
353 30 ,--MAX_LENGTH
354 'N' ,--LEGAL_MESSAGE_FLAG
355 effective_from ,
356 NULL ,--EFFECTIVE_TO
357 'MIGRATED' ,--RECORD_TYPE_CODE
358 'N' ,--HAS_REPORTING_CODES_FLAG
359 fnd_global.user_id ,
360 SYSDATE ,
361 fnd_global.user_id ,
362 SYSDATE ,
363 fnd_global.conc_login_id ,
364 fnd_global.conc_request_id , -- Request Id
365 fnd_global.prog_appl_id , -- Program Application ID
366 fnd_global.conc_program_id , -- Program Id
367 fnd_global.conc_login_id , -- Program Login ID
368 1
369 )
370 -- Creation of CAI NUMBER Reporting Type and Usage
371
372 WHEN ( NOT EXISTS (select 1 from zx_reporting_types_b
373 where reporting_type_code='CAI NUMBER'
374 and tax_regime_code = l_tax_regime_code)
375 )
376 THEN
377 INTO ZX_REPORTING_TYPES_B(
378 REPORTING_TYPE_ID ,
379 REPORTING_TYPE_CODE ,
380 REPORTING_TYPE_DATATYPE_CODE ,
381 TAX_REGIME_CODE ,
382 TAX ,
383 FORMAT_MASK ,
384 MIN_LENGTH ,
385 MAX_LENGTH ,
386 LEGAL_MESSAGE_FLAG ,
387 EFFECTIVE_FROM ,
388 EFFECTIVE_TO ,
389 RECORD_TYPE_CODE ,
390 HAS_REPORTING_CODES_FLAG ,
391 CREATED_BY ,
392 CREATION_DATE ,
393 LAST_UPDATED_BY ,
394 LAST_UPDATE_DATE ,
395 LAST_UPDATE_LOGIN ,
396 REQUEST_ID ,
397 PROGRAM_APPLICATION_ID ,
398 PROGRAM_ID ,
399 PROGRAM_LOGIN_ID ,
400 OBJECT_VERSION_NUMBER
401 )
402 VALUES(
403 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
404 'CAI NUMBER' ,--REPORTING_TYPE_CODE
405 --'NUMBER' ,--REPORTING_TYPE_DATATYPE
406 'TEXT' ,--REPORTING_TYPE_DATATYPE (Bug6430516)
407 l_tax_regime_code ,--TAX_REGIME_CODE
408 NULL ,--TAX
409 NULL ,--FORMAT_MASK
410 1 ,--MIN_LENGTH
411 30 ,--MAX_LENGTH
412 'N' ,--LEGAL_MESSAGE_FLAG
413 effective_from ,
414 NULL ,--EFFECTIVE_TO
415 'MIGRATED' ,--RECORD_TYPE_CODE
416 'N' ,--HAS_REPORTING_CODES_FLAG
417 fnd_global.user_id ,
418 SYSDATE ,
419 fnd_global.user_id ,
420 SYSDATE ,
421 fnd_global.conc_login_id ,
422 fnd_global.conc_request_id , -- Request Id
423 fnd_global.prog_appl_id , -- Program Application ID
424 fnd_global.conc_program_id , -- Program Id
425 fnd_global.conc_login_id , -- Program Login ID
426 1
427 )
428
429 --Bug# 3587896
430 SELECT effective_from, tax_regime_code l_tax_regime_code
431 FROM ZX_REPORTING_TYPES_B
432 WHERE REPORTING_TYPE_CODE = 'AR_DGI_TRX_CODE'; --YK:
433
434 -----Creating reporting types for bug fix 3722296-------
435
436 CREATE_REPORT_TYPE_PTP('JA - REG NUMBER', 'TEXT', 'N');
437 CREATE_REPORT_TYPE_PTP('JL - REG NUMBER', 'TEXT', 'N');
438 CREATE_REPORT_TYPE_PTP('JE - REG NUMBER', 'TEXT', 'N');
439 CREATE_REPORT_TYPE_PTP('AR-SYSTEM-PARAM-REG-NUM', 'TEXT', 'N');
440 CREATE_REPORT_TYPE_PTP('FSO-REG-NUM', 'TEXT', 'N');
441
442 INSERT INTO ZX_REPORT_TYPES_USAGES(
443 REPORTING_TYPE_USAGE_ID ,
444 ENTITY_CODE ,
445 ENABLED_FLAG ,
446 CREATED_BY ,
447 CREATION_DATE ,
448 LAST_UPDATED_BY ,
449 LAST_UPDATE_DATE ,
450 LAST_UPDATE_LOGIN ,
451 REPORTING_TYPE_ID ,
452 OBJECT_VERSION_NUMBER
453 )
454 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
455 LOOKUP_CODE ,--ENTITY_CODE
456 decode(LOOKUP_CODE,
457 'ZX_PARTY_TAX_PROFILE',
458 'Y',
459 'N') ,--ENABLED_FLAG
460 fnd_global.user_id ,--CREATED_BY
461 SYSDATE ,--CREATION_DATE
462 fnd_global.user_id ,--LAST_UPDATED_BY
463 SYSDATE ,--LAST_UPDATE_DATE
464 fnd_global.conc_login_id,--LAST_UPDATE_LOGIN
465 reporting_type_id ,--REPORTING_TYPE_ID
466 1
467
468 FROM
469 zx_reporting_types_b rep_type,
470 fnd_lookups
471
472 WHERE
473 reporting_type_code = 'FISCAL PRINTER'
474 AND LOOKUP_TYPE= 'ZX_REPORTING_TABLE_USE'
475
476 AND NOT EXISTS ( select 1 from zx_report_types_usages
477 where reporting_type_id = rep_type.reporting_type_id and
478 entity_code = fnd_lookups.lookup_code );
479
480
481 INSERT INTO ZX_REPORT_TYPES_USAGES(
482 REPORTING_TYPE_USAGE_ID ,
483 ENTITY_CODE ,
484 ENABLED_FLAG ,
485 CREATED_BY ,
486 CREATION_DATE ,
487 LAST_UPDATED_BY ,
488 LAST_UPDATE_DATE ,
489 LAST_UPDATE_LOGIN ,
490 REPORTING_TYPE_ID ,
491 OBJECT_VERSION_NUMBER
492 )
493 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
494 LOOKUP_CODE ,--ENTITY_CODE
495 decode(LOOKUP_CODE,
496 'ZX_PARTY_TAX_PROFILE',
497 'Y',
498 'N') ,--ENABLED_FLAG
499 fnd_global.user_id ,--CREATED_BY
500 SYSDATE ,--CREATION_DATE
501 fnd_global.user_id ,--LAST_UPDATED_BY
502 SYSDATE ,--LAST_UPDATE_DATE
503 fnd_global.conc_login_id,--LAST_UPDATE_LOGIN
504 reporting_type_id ,--REPORTING_TYPE_ID
505 1
506 FROM
507 zx_reporting_types_b rep_type,
508 fnd_lookups
509
510 WHERE
511 reporting_type_code = 'CAI NUMBER'
512 AND LOOKUP_TYPE= 'ZX_REPORTING_TABLE_USE'
513
514 AND NOT EXISTS ( select 1 from zx_report_types_usages
515 where reporting_type_id = rep_type.reporting_type_id and
516 entity_code = fnd_lookups.lookup_code );
517
518 --BugFix 3604885
519 INSERT INTO ZX_REPORT_TYPES_USAGES(
520 REPORTING_TYPE_USAGE_ID,
521 REPORTING_TYPE_ID ,
522 ENTITY_CODE ,
523 ENABLED_FLAG ,
524 CREATED_BY ,
525 CREATION_DATE ,
526 LAST_UPDATED_BY ,
527 LAST_UPDATE_DATE ,
528 LAST_UPDATE_LOGIN ,
529 OBJECT_VERSION_NUMBER
530 )
531 SELECT
532 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
533 types.reporting_type_id ,--REPORTING_TYPE_ID
534 lookups.lookup_code ,--ENTITY_CODE
535 DECODE(lookups.lookup_code,
536 'ZX_RATES','Y', --Bug 5528045
537 'N') ,--ENABLED_FLAG
538 fnd_global.user_id ,
539 SYSDATE ,
540 fnd_global.user_id ,
541 SYSDATE ,
542 fnd_global.conc_login_id,
543 1
544 FROM
545 zx_reporting_types_b types,
546 fnd_lookups lookups
547
548 WHERE
549 types.reporting_type_code IN('PT_LOCATION' ,
550 'PT_PRD_TAXABLE_BOX' ,
551 'PT_PRD_REC_TAX_BOX' ,
552 'PT_ANL_TTL_TAXABLE_BOX',
553 'PT_ANL_REC_TAXABLE' ,
554 'PT_ANL_NON_REC_TAXABLE',
555 'PT_ANL_REC_TAX_BOX' ,
556 'AR_DGI_TRX_CODE' )
557 AND types.record_type_code = 'MIGRATED'
558
559 AND lookups.LOOKUP_TYPE = 'ZX_REPORTING_TABLE_USE'
560
561 AND NOT EXISTS ( select 1 from zx_report_types_usages
562 where reporting_type_id = types.reporting_type_id
563 and entity_code = lookups.lookup_code );
564
565
566 CREATE_REPORTING_CODES('AR_DGI_TRX_CODE', 'JLZZ_AP_DGI_TRX_CODE');
567
568 --Bug# 4952838
569 CREATE_REPORTING_CODES('CZ_TAX_ORIGIN', 'JGZZ_TAX_ORIGIN');
570 CREATE_REPORTING_CODES('HU_TAX_ORIGIN', 'JGZZ_TAX_ORIGIN');
571 CREATE_REPORTING_CODES('PL_TAX_ORIGIN', 'JGZZ_TAX_ORIGIN');
572
573 INSERT
574 INTO ZX_REPORTING_CODES_B(
575 REPORTING_CODE_ID ,
576 EXCEPTION_CODE ,
577 EFFECTIVE_FROM ,
578 EFFECTIVE_TO ,
579 RECORD_TYPE_CODE ,
580 CREATED_BY ,
581 CREATION_DATE ,
582 LAST_UPDATED_BY ,
583 LAST_UPDATE_DATE ,
584 LAST_UPDATE_LOGIN ,
585 REQUEST_ID ,
586 PROGRAM_APPLICATION_ID ,
587 PROGRAM_ID ,
588 PROGRAM_LOGIN_ID ,
589 REPORTING_CODE_CHAR_VALUE ,
590 REPORTING_CODE_DATE_VALUE ,
591 REPORTING_CODE_NUM_VALUE ,
592 REPORTING_TYPE_ID ,
593 OBJECT_VERSION_NUMBER
594 )
595 SELECT
596 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
597 NULL ,--EXCEPTION_CODE
598 EFFECTIVE_FROM ,
599 NULL ,--EFFECTIVE_TO
600 'MIGRATED' ,--RECORD_TYPE_CODE
601 fnd_global.user_id ,
602 SYSDATE ,
603 fnd_global.user_id ,
604 SYSDATE ,
605 fnd_global.conc_login_id ,
606 fnd_global.conc_request_id , -- Request Id
607 fnd_global.prog_appl_id , -- Program Application ID
608 fnd_global.conc_program_id , -- Program Id
609 fnd_global.conc_login_id , -- Program Login ID
610 decode(DATATYPE,'TEXT',LOOKUP_CODE,'YES_NO',LOOKUP_CODE,NULL),
611 decode(DATATYPE,'DATE',LOOKUP_CODE,NULL),
612 decode(DATATYPE,'NUMERIC_VALUE',LOOKUP_CODE,NULL),
613 REPORTING_TYPE_ID,
614 1
615
616 FROM
617 (
618 SELECT
619 lookups.LOOKUP_CODE LOOKUP_CODE ,
620 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
621 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
622 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
623 FROM
624 ZX_REPORTING_TYPES_B report_types,
625 JA_LOOKUPS lookups
626 WHERE
627 report_types.REPORTING_TYPE_CODE = 'TW_GOVERNMENT_TAX_TYPE'
628 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
629 AND lookups.LOOKUP_TYPE = 'JATW_GOVERNMENT_TAX_TYPE'
630 AND NOT EXISTS
631 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
632 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
633 REPORTING_CODE_CHAR_VALUE=lookups.LOOKUP_CODE
634 )
635 );
636
637 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
638
639 INSERT INTO ZX_REPORTING_CODES_TL(
640 REPORTING_CODE_ID ,
641 LANGUAGE ,
642 SOURCE_LANG ,
643 REPORTING_CODE_NAME ,
644 CREATED_BY ,
645 CREATION_DATE ,
646 LAST_UPDATED_BY ,
647 LAST_UPDATE_DATE ,
648 LAST_UPDATE_LOGIN
649 )
650 SELECT
651 codes.reporting_code_id ,
652 lookups.language ,
653 lookups.source_lang ,
654 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
655 THEN Initcap(lookups.meaning)
656 ELSE
657 lookups.meaning
658 END,
659 fnd_global.user_id ,
660 sysdate ,
661 fnd_global.user_id ,
662 sysdate ,
663 fnd_global.conc_login_id
664 FROM
665 ZX_REPORTING_TYPES_B TYPES,
666 ZX_REPORTING_CODES_B CODES,
667 FND_LOOKUP_VALUES lookups,
668 FND_LANGUAGES L
669 WHERE
670
671 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
672 AND TYPES.REPORTING_TYPE_CODE = 'TW_GOVERNMENT_TAX_TYPE'
673 AND lookups.LOOKUP_TYPE = 'JATW_GOVERNMENT_TAX_TYPE'
674 AND CODES.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code
675 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
676 AND lookups.VIEW_APPLICATION_ID = 7000 -- Pl note Application id is different here.
677 AND lookups.SECURITY_GROUP_ID = 0
678 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
679 AND L.INSTALLED_FLAG in ('I', 'B')
680 AND not exists
681 (select NULL
682 from ZX_REPORTING_CODES_TL T
683 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
684 and T.LANGUAGE = L.LANGUAGE_CODE);
685
686
687 INSERT INTO ZX_REPORTING_TYPES_TL(
688 REPORTING_TYPE_ID ,
689 LANGUAGE ,
690 SOURCE_LANG ,
691 REPORTING_TYPE_NAME ,
692 CREATED_BY ,
693 CREATION_DATE ,
694 LAST_UPDATED_BY ,
695 LAST_UPDATE_DATE ,
696 LAST_UPDATE_LOGIN
697 )
698 SELECT
699 REPORTING_TYPE_ID ,
700 LANGUAGE_CODE ,
701 userenv('LANG') ,
702 REPORTING_TYPE_NAME ,
703 fnd_global.user_id ,
704 SYSDATE ,
705 fnd_global.user_id ,
706 SYSDATE ,
707 fnd_global.conc_login_id
708
709 FROM
710 (
711 SELECT
712 types.REPORTING_TYPE_ID ,
713 L.LANGUAGE_CODE ,
714 CASE
715 WHEN types.REPORTING_TYPE_CODE = 'PT_LOCATION'
716 THEN 'Location'
717 WHEN types.REPORTING_TYPE_CODE = 'PT_PRD_TAXABLE_BOX'
718 THEN 'Periodic: Taxable Box'
719 WHEN types.REPORTING_TYPE_CODE = 'PT_PRD_REC_TAX_BOX'
720 THEN 'Periodic: Recoverable Tax Box'
721 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_TTL_TAXABLE_BOX'
722 THEN 'Annual: Total Taxable Box'
723 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAXABLE'
724 THEN 'Annual: Recoverable Taxable'
725 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_NON_REC_TAXABLE'
726 THEN 'Annual: Non Recoverable Taxable'
727 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAX_BOX'
728 THEN 'Annual: Recoverable Tax Box'
729 WHEN types.REPORTING_TYPE_CODE = 'AR_DGI_TRX_CODE'
730 THEN 'DGI Transaction Code'
731 WHEN types.REPORTING_TYPE_CODE = 'FISCAL PRINTER'
732 THEN 'Fiscal Printer Used'
733 WHEN types.REPORTING_TYPE_CODE = 'CAI NUMBER'
734 THEN 'CAI Number'
735 WHEN types.REPORTING_TYPE_CODE = 'TAX_CODE_CLASSIFICATION'
736 THEN 'Tax Code Classification'
737 -- Bug # 4952838
738 WHEN types.REPORTING_TYPE_CODE = 'CZ_TAX_ORIGIN' or
739 types.REPORTING_TYPE_CODE = 'HU_TAX_ORIGIN' or
740 types.REPORTING_TYPE_CODE = 'PL_TAX_ORIGIN'
741 THEN 'Tax Origin'
742 WHEN types.REPORTING_TYPE_CODE = 'CH_VAT_REGIME'
743 THEN 'Tax Regime'
744 WHEN types.REPORTING_TYPE_CODE = 'CL_DEBIT_ACCOUNT'
745 THEN 'Debit Account'
746
747 ELSE types.REPORTING_TYPE_CODE END REPORTING_TYPE_NAME -- Bug 4886324
748
749 FROM
750 ZX_REPORTING_TYPES_B TYPES,
751 FND_LANGUAGES L
752 WHERE
753 TYPES.RECORD_TYPE_CODE = 'MIGRATED'
754 AND L.INSTALLED_FLAG in ('I', 'B')
755 ) TYPES
756
757 WHERE REPORTING_TYPE_NAME is not null
758 AND not exists
759 (select NULL
760 from ZX_REPORTING_TYPES_TL T
761 where T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
762 and T.LANGUAGE = TYPES.LANGUAGE_CODE);
763
764 --BugFix 3557652 REPORTING CODE_TL IMPL FOR ARGENTINE DGI TRANSACTION CODE
765 --Bug# 4952838. Moved this logic to common procedure CREATE_REPORTING_CODES
766 /*
767 INSERT INTO ZX_REPORTING_CODES_TL(
768 REPORTING_CODE_ID ,
769 LANGUAGE ,
770 SOURCE_LANG ,
771 REPORTING_CODE_NAME ,
772 CREATED_BY ,
773 CREATION_DATE ,
774 LAST_UPDATED_BY ,
775 LAST_UPDATE_DATE ,
776 LAST_UPDATE_LOGIN
777 )
778 SELECT
779 codes.reporting_code_id ,
780 lookups.language ,
781 lookups.source_lang ,
782 lookups.meaning ,
783 fnd_global.user_id ,
784 sysdate ,
785 fnd_global.user_id ,
786 sysdate ,
787 fnd_global.conc_login_id
788 FROM
789 ZX_REPORTING_TYPES_B TYPES,
790 ZX_REPORTING_CODES_B CODES,
791 FND_LOOKUP_VALUES lookups,
792 FND_LANGUAGES L
793 WHERE
794
795 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
796 AND TYPES.REPORTING_TYPE_CODE = 'AR_DGI_TRX_CODE'
797 AND lookups.LOOKUP_TYPE = 'JLZZ_AP_DGI_TRX_CODE' --Bug Fix 4930895
798 AND CODES.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code --Bug Fix 4930895
799 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
800 AND lookups.VIEW_APPLICATION_ID = 0
801 AND lookups.SECURITY_GROUP_ID = 0
802 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
803 AND L.INSTALLED_FLAG in ('I', 'B')
804 AND not exists
805 (select NULL
806 from ZX_REPORTING_CODES_TL T
807 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
808 and T.LANGUAGE = L.LANGUAGE_CODE);
809 */
810
811 INSERT INTO ZX_REPORTING_CODES_TL(
812 REPORTING_CODE_ID ,
813 LANGUAGE ,
814 SOURCE_LANG ,
815 REPORTING_CODE_NAME ,
816 CREATED_BY ,
817 CREATION_DATE ,
818 LAST_UPDATED_BY ,
819 LAST_UPDATE_DATE ,
820 LAST_UPDATE_LOGIN
821 )
822 SELECT
823 codes.reporting_code_id,
824 L.LANGUAGE_CODE ,
825 userenv('LANG') ,
826 CASE
827 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'A'
828 THEN Initcap('ACORES')
829 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'C'
830 THEN Initcap('CONTINENTE')
831 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'M'
832 THEN Initcap('MADEIRA')
833 ELSE
834 CASE WHEN CODES.REPORTING_CODE_CHAR_VALUE = UPPER(CODES.REPORTING_CODE_CHAR_VALUE)
835 THEN Initcap(CODES.REPORTING_CODE_CHAR_VALUE)
836 ELSE
837 CODES.REPORTING_CODE_CHAR_VALUE
838 END
839 END ,--REPORTING_CODE_NAME
840 fnd_global.user_id ,
841 SYSDATE ,
842 fnd_global.user_id ,
843 SYSDATE ,
844 fnd_global.conc_login_id
845 FROM
846 ZX_REPORTING_CODES_B CODES,
847 FND_LANGUAGES L
848
849 WHERE
850 CODES.RECORD_TYPE_CODE = 'MIGRATED'
851 AND L.INSTALLED_FLAG in ('I', 'B')
852 AND not exists
853 (select NULL
854 from ZX_REPORTING_CODES_TL T
855 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
856 and T.LANGUAGE = L.LANGUAGE_CODE);
857
858
859 IF PG_DEBUG = 'Y' THEN
860 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES(-)');
861 END IF;
862
863 EXCEPTION
864 WHEN OTHERS THEN
865 IF PG_DEBUG = 'Y' THEN
866 arp_util_tax.debug('EXCEPTION: CREATE_ZX_REP_TYPE_CODES ');
867 arp_util_tax.debug(sqlerrm);
868 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES(-)');
869 END IF;
870 app_exception.raise_exception;
871
872 END CREATE_ZX_REP_TYPE_CODES;
873
874
875 /*THIS IS THE COMMON PROCEDURE USED TO INSERT THE REPORTING TYPES FOR AR*/
876
877 PROCEDURE CREATE_REPORTING_TYPE_AR(
878 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
879 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
880 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE,
881 P_category IN AR_VAT_TAX_ALL_B.GLOBAL_ATTRIBUTE_CATEGORY%TYPE,
882 p_tax_id IN NUMBER
883 )
884 IS
885
886 BEGIN
887
888 arp_util_tax.debug('CREATE_REPORTING_TYPE_AR(+)');
889 arp_util_tax.debug('p_reporting_type_code = '||p_reporting_type_code);
890 INSERT ALL
891 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
892 where reporting_type_code= p_reporting_type_code
893 and tax_regime_code = l_tax_regime_code)
894 ) THEN
895 INTO ZX_REPORTING_TYPES_B(
896 REPORTING_TYPE_ID ,
897 REPORTING_TYPE_CODE ,
898 REPORTING_TYPE_DATATYPE_CODE ,
899 TAX_REGIME_CODE ,
900 TAX ,
901 FORMAT_MASK ,
902 MIN_LENGTH ,
903 MAX_LENGTH ,
904 LEGAL_MESSAGE_FLAG ,
905 EFFECTIVE_FROM ,
906 EFFECTIVE_TO ,
907 RECORD_TYPE_CODE ,
908 HAS_REPORTING_CODES_FLAG ,
909 CREATED_BY ,
910 CREATION_DATE ,
911 LAST_UPDATED_BY ,
912 LAST_UPDATE_DATE ,
913 LAST_UPDATE_LOGIN ,
914 REQUEST_ID ,
915 PROGRAM_APPLICATION_ID ,
916 PROGRAM_ID ,
917 PROGRAM_LOGIN_ID ,
918 OBJECT_VERSION_NUMBER
919 )
920 VALUES(
921 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
922 p_reporting_type_code ,--REPORTING_TYPE_CODE
923 p_datatype , --REPORTING_TYPE_DATATYPE
924 l_tax_regime_code ,
925 NULL ,--TAX
926 NULL ,--FORMAT_MASK
927 1 ,--MIN_LENGTH
928 30 ,--MAX_LENGTH
929 'N' ,--LEGAL_MESSAGE_FLAG
930 effective_from ,
931 NULL ,--EFFECTIVE_TO
932 'MIGRATED' ,--RECORD_TYPE_CODE
933 p_has_rep_code , --HAS_REPORTING_CODES_FLAG
934 fnd_global.user_id ,
935 SYSDATE ,
936 fnd_global.user_id ,
937 SYSDATE ,
938 fnd_global.conc_login_id ,
939 fnd_global.conc_request_id , -- Request Id
940 fnd_global.prog_appl_id , -- Program Application ID
941 fnd_global.conc_program_id , -- Program Id
942 fnd_global.conc_login_id , -- Program Login ID
943 1
944 )
945 SELECT
946 min(zx_rates.effective_from) effective_from,
947 zx_rates.tax_regime_code l_tax_regime_code
948 FROM
949 AR_VAT_TAX_ALL_B vat_tax,
950 zx_rates_b zx_rates
951 WHERE
952 vat_tax.vat_tax_id = zx_rates.tax_rate_id
953 AND vat_tax.global_attribute_category = p_category
954 AND zx_rates.record_type_code = 'MIGRATED'
955 AND vat_tax.vat_tax_id = nvl(p_tax_id, vat_tax.vat_tax_id)
956 GROUP BY
957 zx_rates.tax_regime_code;
958
959 arp_util_tax.debug('CREATE_REPORTING_TYPE_AR(-)');
960
961 END CREATE_REPORTING_TYPE_AR;
962
963
964 /*THIS IS THE COMMON PROCEDURE USED TO INSERT THE REPORTING TYPES FOR AP*/
965
966 PROCEDURE CREATE_REPORTING_TYPE_AP(
967 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
968 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
969 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE,
970 P_category IN AR_VAT_TAX_ALL_B.GLOBAL_ATTRIBUTE_CATEGORY%TYPE,
971 p_tax_id IN NUMBER
972 )
973 IS
974
975 BEGIN
976
977 arp_util_tax.debug('CREATE_REPORTING_TYPE_AP(+)');
978 arp_util_tax.debug('p_reporting_type_code = '||p_reporting_type_code);
979 INSERT ALL
980 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
981 where reporting_type_code= p_reporting_type_code
982 and tax_regime_code = l_tax_regime_code)
983 ) THEN
984 INTO ZX_REPORTING_TYPES_B(
985 REPORTING_TYPE_ID ,
986 REPORTING_TYPE_CODE ,
987 REPORTING_TYPE_DATATYPE_CODE ,
988 TAX_REGIME_CODE ,
989 TAX ,
990 FORMAT_MASK ,
991 MIN_LENGTH ,
992 MAX_LENGTH ,
993 LEGAL_MESSAGE_FLAG ,
994 EFFECTIVE_FROM ,
995 EFFECTIVE_TO ,
996 RECORD_TYPE_CODE ,
997 HAS_REPORTING_CODES_FLAG ,
998 CREATED_BY ,
999 CREATION_DATE ,
1000 LAST_UPDATED_BY ,
1001 LAST_UPDATE_DATE ,
1002 LAST_UPDATE_LOGIN ,
1003 REQUEST_ID ,
1004 PROGRAM_APPLICATION_ID ,
1005 PROGRAM_ID ,
1006 PROGRAM_LOGIN_ID ,
1007 OBJECT_VERSION_NUMBER
1008 )
1009 VALUES(
1010 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
1011 p_reporting_type_code ,--REPORTING_TYPE_CODE
1012 p_datatype , --REPORTING_TYPE_DATATYPE
1013 l_tax_regime_code ,
1014 NULL ,--TAX
1015 NULL ,--FORMAT_MASK
1016 1 ,--MIN_LENGTH
1017 30 ,--MAX_LENGTH
1018 'N' ,--LEGAL_MESSAGE_FLAG
1019 effective_from ,
1020 NULL ,--EFFECTIVE_TO
1021 'MIGRATED' ,--RECORD_TYPE_CODE
1022 p_has_rep_code , --HAS_REPORTING_CODES_FLAG
1023 fnd_global.user_id ,
1024 SYSDATE ,
1025 fnd_global.user_id ,
1026 SYSDATE ,
1027 fnd_global.conc_login_id ,
1028 fnd_global.conc_request_id , -- Request Id
1029 fnd_global.prog_appl_id , -- Program Application ID
1030 fnd_global.conc_program_id , -- Program Id
1031 fnd_global.conc_login_id , -- Program Login ID
1032 1
1033 )
1034 SELECT
1035 min(zx_rates.effective_from) effective_from,
1036 zx_rates.tax_regime_code l_tax_regime_code
1037 FROM
1038 ap_tax_codes_all codes,
1039 zx_rates_b zx_rates
1040 WHERE
1041 codes.tax_id = zx_rates.tax_rate_id
1042 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1043 AND codes.global_attribute_category = p_category
1044 AND zx_rates.record_type_code = 'MIGRATED'
1045
1046 GROUP BY
1047 zx_rates.tax_regime_code;
1048
1049 arp_util_tax.debug('CREATE_REPORTING_TYPE_AP(-)');
1050
1051 END CREATE_REPORTING_TYPE_AP;
1052
1053
1054 /*THIS IS THE COMMON PROCEDURE USED TO INSERT THE REPORTING CODES */
1055
1056 PROCEDURE CREATE_REPORTING_CODES (
1057 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
1058 P_lookup_type IN FND_LOOKUPS.LOOKUP_TYPE%TYPE
1059 ) IS
1060
1061 BEGIN
1062 arp_util_tax.debug('CREATE_REPORTING_CODES(+)');
1063 arp_util_tax.debug('p_reporting_type_code = '||p_reporting_type_code);
1064 arp_util_tax.debug('p_lookup_type = '||p_lookup_type);
1065 INSERT
1066 INTO ZX_REPORTING_CODES_B(
1067 REPORTING_CODE_ID ,
1068 EXCEPTION_CODE ,
1069 EFFECTIVE_FROM ,
1070 EFFECTIVE_TO ,
1071 RECORD_TYPE_CODE ,
1072 CREATED_BY ,
1073 CREATION_DATE ,
1074 LAST_UPDATED_BY ,
1075 LAST_UPDATE_DATE ,
1076 LAST_UPDATE_LOGIN ,
1077 REQUEST_ID ,
1078 PROGRAM_APPLICATION_ID ,
1079 PROGRAM_ID ,
1080 PROGRAM_LOGIN_ID ,
1081 REPORTING_CODE_CHAR_VALUE ,
1082 REPORTING_CODE_DATE_VALUE ,
1083 REPORTING_CODE_NUM_VALUE ,
1084 REPORTING_TYPE_ID ,
1085 OBJECT_VERSION_NUMBER
1086 )
1087 SELECT
1088 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
1089 NULL ,--EXCEPTION_CODE
1090 EFFECTIVE_FROM ,
1091 NULL ,--EFFECTIVE_TO
1092 'MIGRATED' ,--RECORD_TYPE_CODE
1093 fnd_global.user_id ,
1094 SYSDATE ,
1095 fnd_global.user_id ,
1096 SYSDATE ,
1097 fnd_global.conc_login_id ,
1098 fnd_global.conc_request_id , -- Request Id
1099 fnd_global.prog_appl_id , -- Program Application ID
1100 fnd_global.conc_program_id , -- Program Id
1101 fnd_global.conc_login_id , -- Program Login ID
1102 decode(DATATYPE,'TEXT',LOOKUP_CODE,'YES_NO',LOOKUP_CODE,NULL),
1103 decode(DATATYPE,'DATE',LOOKUP_CODE,NULL),
1104 decode(DATATYPE,'NUMERIC_VALUE',LOOKUP_CODE,NULL),
1105 REPORTING_TYPE_ID,
1106 1
1107
1108 FROM
1109 (
1110 SELECT
1111 lookups.LOOKUP_CODE LOOKUP_CODE ,
1112 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
1113 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1114 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
1115 FROM
1116 ZX_REPORTING_TYPES_B report_types,
1117 FND_LOOKUPS lookups
1118 WHERE
1119 report_types.REPORTING_TYPE_CODE = p_reporting_type_code
1120 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
1121 AND lookups.LOOKUP_TYPE = p_lookup_type
1122 AND NOT EXISTS
1123 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
1124 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
1125 REPORTING_CODE_CHAR_VALUE=lookups.LOOKUP_CODE
1126 )
1127 );
1128
1129 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
1130
1131 INSERT INTO ZX_REPORTING_CODES_TL(
1132 REPORTING_CODE_ID ,
1133 LANGUAGE ,
1134 SOURCE_LANG ,
1135 REPORTING_CODE_NAME ,
1136 CREATED_BY ,
1137 CREATION_DATE ,
1138 LAST_UPDATED_BY ,
1139 LAST_UPDATE_DATE ,
1140 LAST_UPDATE_LOGIN
1141 )
1142 SELECT
1143 codes.reporting_code_id ,
1144 lookups.language ,
1145 lookups.source_lang ,
1146 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
1147 THEN Initcap(lookups.meaning)
1148 ELSE
1149 lookups.meaning
1150 END,
1151 fnd_global.user_id ,
1152 sysdate ,
1153 fnd_global.user_id ,
1154 sysdate ,
1155 fnd_global.conc_login_id
1156 FROM
1157 ZX_REPORTING_TYPES_B TYPES,
1158 ZX_REPORTING_CODES_B CODES,
1159 FND_LOOKUP_VALUES lookups,
1160 FND_LANGUAGES L
1161 WHERE
1162
1163 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
1164 AND TYPES.REPORTING_TYPE_CODE = p_reporting_type_code
1165 AND lookups.LOOKUP_TYPE = p_lookup_type --Bug Fix 4930895
1166 AND CODES.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code --Bug Fix 4930895
1167 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
1168 AND lookups.VIEW_APPLICATION_ID = 0
1169 AND lookups.SECURITY_GROUP_ID = 0
1170 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
1171 AND L.INSTALLED_FLAG in ('I', 'B')
1172 AND not exists
1173 (select NULL
1174 from ZX_REPORTING_CODES_TL T
1175 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
1176 and T.LANGUAGE = L.LANGUAGE_CODE);
1177
1178
1179 arp_util_tax.debug('CREATE_REPORTING_CODES(-)');
1180
1181 END CREATE_REPORTING_CODES;
1182
1183
1184 /* Used to create the reporting code association for AP */
1185
1186 PROCEDURE CREATE_ZX_REPORTING_ASSOC_AP(p_tax_id IN NUMBER) IS
1187 l_status fnd_module_installations.status%TYPE;
1188 l_db_status fnd_module_installations.DB_STATUS%TYPE;
1189
1190 BEGIN
1191 arp_util_tax.debug(' CREATE_ZX_REPORTING_ASSOC_AP(+)');
1192 -- Verify Argentina Installation
1193 BEGIN
1194 SELECT STATUS, DB_STATUS
1195 INTO l_status, l_db_status
1196 FROM fnd_module_installations
1197 WHERE APPLICATION_ID = '7004'
1198 And MODULE_SHORT_NAME = 'jlarloc';
1199 EXCEPTION
1200 WHEN OTHERS THEN
1201 IF PG_DEBUG = 'Y' THEN
1202 arp_util_tax.debug('Error in verification of argentina installation ');
1203 END IF;
1204 END;
1205
1206 IF (nvl(l_status,'N') in ('I','S') or
1207 nvl(l_db_status,'N') in ('I','S')) THEN
1208
1209
1210 -- Code for Reporting Code Association. Bug # 3594759
1211 -- Insert the Fiscal Printer Codes into Association table
1212 IF PG_DEBUG = 'Y' THEN
1213 arp_util_tax.debug('Entering into zx_report_codes_assoc insert statement');
1214 END IF;
1215 --Bug 5247324
1216 /*
1217 INSERT INTO ZX_REPORT_CODES_ASSOC(
1218 REPORTING_CODE_ASSOC_ID,
1219 ENTITY_CODE,
1220 ENTITY_ID,
1221 REPORTING_TYPE_ID,
1222 REPORTING_CODE_CHAR_VALUE,
1223 EXCEPTION_CODE,
1224 EFFECTIVE_FROM,
1225 EFFECTIVE_TO,
1226 CREATED_BY,
1227 CREATION_DATE,
1228 LAST_UPDATED_BY,
1229 LAST_UPDATE_DATE,
1230 LAST_UPDATE_LOGIN,
1231 OBJECT_VERSION_NUMBER)
1232 (SELECT
1233 ZX_REPORT_CODES_ASSOC_S.nextval, --REPORTING_CODE_ASSOC_ID
1234 'ZX_PARTY_TAX_PROFILE', --ENTITY_CODE
1235 ptp.Party_Tax_Profile_Id, --ENTITY_ID
1236 REPORTING_TYPE_ID , --REPORTING_TYPE_ID
1237 pvs.GLOBAL_ATTRIBUTE18, --REPORTING_CODE_CHAR_VALUE
1238 null, --EXCEPTION_CODE
1239 sysdate, --EFFECTIVE_FROM
1240 null, --EFFECTIVE_TO
1241 fnd_global.user_id,
1242 sysdate,
1243 fnd_global.user_id,
1244 sysdate,
1245 fnd_global.conc_login_id,
1246 1
1247 FROM
1248 zx_reporting_types_b types,
1249 ap_supplier_sites pvs,
1250 zx_party_tax_profile ptp
1251
1252 WHERE
1253
1254 types.reporting_type_code = 'FISCAL PRINTER' and
1255 pvs.GLOBAL_ATTRIBUTE_CATEGORY='JL.AR.APXVDMVD.SUPPLIER_SITES' and
1256 ptp.Party_Type_Code = 'THIRD_PARTY_SITE' AND -- Bug 4886324
1257 ptp.party_id = pvs.PARTY_SITE_ID
1258
1259 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1260 where entity_code = 'ZX_PARTY_TAX_PROFILE'
1261 and entity_id = ptp.Party_Tax_Profile_Id
1262 and reporting_type_id = types.reporting_type_id));
1263
1264
1265 -- Insert the CAI Number and Date into Association table
1266
1267 INSERT INTO ZX_REPORT_CODES_ASSOC(
1268 REPORTING_CODE_ASSOC_ID,
1269 ENTITY_CODE,
1270 ENTITY_ID,
1271 REPORTING_TYPE_ID,
1272 REPORTING_CODE_NUM_VALUE,
1273 EXCEPTION_CODE,
1274 EFFECTIVE_FROM,
1275 EFFECTIVE_TO,
1276 CREATED_BY,
1277 CREATION_DATE,
1278 LAST_UPDATED_BY,
1279 LAST_UPDATE_DATE,
1280 LAST_UPDATE_LOGIN,
1281 OBJECT_VERSION_NUMBER)
1282 (SELECT
1283 ZX_REPORT_CODES_ASSOC_S.nextval, --REPORTING_CODE_ASSOC_ID
1284 'ZX_PARTY_TAX_PROFILE', --ENTITY_CODE
1285 ptp.Party_Tax_Profile_Id, --ENTITY_ID
1286 REPORTING_TYPE_ID , --REPORTING_TYPE_ID
1287 pvs.GLOBAL_ATTRIBUTE19, --REPORTING_CODE_NUM_VALUE
1288 null, --EXCEPTION_CODE
1289 sysdate, --EFFECTIVE_FROM
1290 to_date(pvs.GLOBAL_ATTRIBUTE20,'yyyy/mm/dd hh24:mi:ss'),--EFFECTIVE_TO
1291 fnd_global.user_id,
1292 sysdate,
1293 fnd_global.user_id,
1294 sysdate,
1295 fnd_global.conc_login_id,
1296 1
1297 FROM
1298 zx_reporting_types_b types,
1299 ap_supplier_sites pvs ,
1300 zx_party_tax_profile ptp
1301
1302 WHERE
1303 types.reporting_type_code = 'CAI NUMBER' and
1304 pvs.GLOBAL_ATTRIBUTE_CATEGORY='JL.AR.APXVDMVD.SUPPLIER_SITES' and
1305 ptp.Party_Type_Code = 'THIRD_PARTY_SITE' AND -- Bug 4886324
1306 ptp.party_id = pvs.PARTY_SITE_ID
1307 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1308 where entity_code = 'ZX_PARTY_TAX_PROFILE'
1309 and entity_id = ptp.Party_Tax_Profile_Id
1310 and reporting_type_id = types.reporting_type_id));
1311 */
1312
1313 --BugFix 3557652 REPORTING CODE ASSOC IMPL FOR ARGENTINE DGI TRANSACTION CODE
1314 --Association for Reporting Type Code AR_DGI_TRX_CODE
1315 INSERT INTO
1316 ZX_REPORT_CODES_ASSOC(
1317 REPORTING_CODE_ASSOC_ID,
1318 ENTITY_CODE ,
1319 ENTITY_ID ,
1320 REPORTING_TYPE_ID ,
1321 REPORTING_CODE_ID ,
1322 EXCEPTION_CODE ,
1323 EFFECTIVE_FROM ,
1324 EFFECTIVE_TO ,
1325 CREATED_BY ,
1326 CREATION_DATE ,
1327 LAST_UPDATED_BY ,
1328 LAST_UPDATE_DATE ,
1329 LAST_UPDATE_LOGIN ,
1330 REPORTING_CODE_CHAR_VALUE,
1331 REPORTING_CODE_DATE_VALUE,
1332 REPORTING_CODE_NUM_VALUE,
1333 OBJECT_VERSION_NUMBER
1334 )
1335 (SELECT
1336 ZX_REPORT_CODES_ASSOC_S.nextval ,
1337 'ZX_RATES' ,--ENTITY_CODE
1338 rates.TAX_RATE_ID ,--ENTITY_ID
1339 report_codes.REPORTING_TYPE_ID ,
1340 report_codes.REPORTING_CODE_ID ,
1341 NULL ,--EXCEPTION_CODE
1342 rates.EFFECTIVE_FROM ,
1343 NULL ,--EFFECTIVE_TO
1344 fnd_global.user_id ,
1345 SYSDATE ,
1346 fnd_global.user_id ,
1347 SYSDATE ,
1348 fnd_global.conc_login_id ,
1349 report_codes.REPORTING_CODE_CHAR_VALUE ,
1350 report_codes.REPORTING_CODE_DATE_VALUE ,
1351 report_codes.REPORTING_CODE_NUM_VALUE ,
1352 1
1353 FROM
1354
1355 AP_TAX_CODES_ALL codes,
1356 ZX_RATES_B rates,
1357 ZX_REPORTING_CODES_B report_codes
1358 WHERE
1359 codes.tax_id = rates.tax_rate_id
1360 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1361 AND codes.global_attribute_category = 'JL.AR.APXTADTC.VAT'
1362 AND codes.global_attribute4 =
1363 report_codes.REPORTING_CODE_CHAR_VALUE
1364 AND rates.record_type_code = 'MIGRATED'
1365 AND report_codes.record_type_code = 'MIGRATED'
1366
1367
1368 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1369 where entity_code = 'ZX_RATES'
1370 and entity_id = rates.tax_rate_id
1371 and reporting_type_id =
1372 report_codes.reporting_type_id)
1373 );
1374
1375
1376 END IF; -- end of Argentina Installation verification
1377
1378 --Association for Reporting Type Code PT_ANL_REC_TAX_BOX
1379 INSERT
1380 INTO ZX_REPORT_CODES_ASSOC(
1381 REPORTING_CODE_ASSOC_ID,
1382 ENTITY_CODE ,
1383 ENTITY_ID ,
1384 REPORTING_TYPE_ID ,
1385 REPORTING_CODE_ID ,
1386 EXCEPTION_CODE ,
1387 EFFECTIVE_FROM ,
1388 EFFECTIVE_TO ,
1389 CREATED_BY ,
1390 CREATION_DATE ,
1391 LAST_UPDATED_BY ,
1392 LAST_UPDATE_DATE ,
1393 LAST_UPDATE_LOGIN ,
1394 REPORTING_CODE_CHAR_VALUE,
1395 REPORTING_CODE_DATE_VALUE,
1396 REPORTING_CODE_NUM_VALUE,
1397 OBJECT_VERSION_NUMBER
1398 )
1399 SELECT
1400 ZX_REPORT_CODES_ASSOC_S.nextval ,
1401 'ZX_RATES' ,--ENTITY_CODE
1402 TAX_RATE_ID ,--ENTITY_ID
1403 REPORTING_TYPE_ID ,
1404 REPORTING_CODE_ID ,
1405 NULL ,--EXCEPTION_CODE
1406 EFFECTIVE_FROM ,
1407 NULL ,--EFFECTIVE_TO
1408 fnd_global.user_id ,
1409 SYSDATE ,
1410 fnd_global.user_id ,
1414 REPORTING_CODE_DATE_VALUE,
1411 SYSDATE ,
1412 fnd_global.conc_login_id ,
1413 REPORTING_CODE_CHAR_VALUE,
1415 REPORTING_CODE_NUM_VALUE,
1416 1
1417 FROM
1418 (
1419 SELECT
1420 rates.TAX_RATE_ID TAX_RATE_ID,
1421 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1422 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1423 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1424 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1425 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1426 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1427 FROM
1428 AP_TAX_CODES_ALL codes,
1429 ZX_RATES_B rates,
1430 ZX_REPORTING_TYPES_B reporting_types,
1431 ZX_REPORTING_CODES_B report_codes
1432 WHERE
1433 codes.tax_id = rates.tax_rate_id
1434 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1435 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1436 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1437 AND rates.record_type_code = 'MIGRATED'
1438 AND reporting_types.reporting_type_code = 'PT_LOCATION'
1439 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1440 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1441 AND report_codes.record_type_code = 'MIGRATED'
1442
1443 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1444 where entity_code = 'ZX_RATES'
1445 and entity_id = rates.tax_rate_id
1446 and reporting_type_id =
1447 report_codes.reporting_type_id)
1448
1449 --Bug# 4952838
1450 UNION ALL
1451 SELECT
1452 rates.TAX_RATE_ID TAX_RATE_ID,
1453 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1454 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1455 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1456 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1457 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1458 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1459 FROM
1460 AP_TAX_CODES_ALL codes,
1461 ZX_RATES_B rates,
1462 ZX_REPORTING_TYPES_B reporting_types,
1463 ZX_REPORTING_CODES_B report_codes
1464 WHERE
1465 codes.tax_id = rates.tax_rate_id
1466 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1467 AND codes.global_attribute_category = 'JE.CZ.APXTADTC.TAX_ORIGIN'
1468 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1469 AND rates.record_type_code = 'MIGRATED'
1470 AND reporting_types.reporting_type_code = 'CZ_TAX_ORIGIN'
1471 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1472 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1473 AND report_codes.record_type_code = 'MIGRATED'
1474
1475 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1476 where entity_code = 'ZX_RATES'
1477 and entity_id = rates.tax_rate_id
1478 and reporting_type_id =
1479 report_codes.reporting_type_id)
1480
1481 UNION ALL
1482 SELECT
1483 rates.TAX_RATE_ID TAX_RATE_ID,
1484 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1485 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1486 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1487 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1488 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1489 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1490 FROM
1491 AP_TAX_CODES_ALL codes,
1492 ZX_RATES_B rates,
1493 ZX_REPORTING_TYPES_B reporting_types,
1494 ZX_REPORTING_CODES_B report_codes
1495 WHERE
1496 codes.tax_id = rates.tax_rate_id
1497 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1498 AND codes.global_attribute_category = 'JE.HU.APXTADTC.TAX_ORIGIN'
1499 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1500 AND rates.record_type_code = 'MIGRATED'
1501 AND reporting_types.reporting_type_code = 'HU_TAX_ORIGIN'
1502 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1503 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1504 AND report_codes.record_type_code = 'MIGRATED'
1505
1506 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1507 where entity_code = 'ZX_RATES'
1508 and entity_id = rates.tax_rate_id
1509 and reporting_type_id =
1510 report_codes.reporting_type_id)
1511
1512 UNION ALL
1513 SELECT
1514 rates.TAX_RATE_ID TAX_RATE_ID,
1515 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1516 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1517 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1518 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1519 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1520 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1521 FROM
1522 AP_TAX_CODES_ALL codes,
1523 ZX_RATES_B rates,
1524 ZX_REPORTING_TYPES_B reporting_types,
1525 ZX_REPORTING_CODES_B report_codes
1526 WHERE
1527 codes.tax_id = rates.tax_rate_id
1528 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1529 AND codes.global_attribute_category = 'JE.PL.APXTADTC.TAX_ORIGIN'
1530 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1531 AND rates.record_type_code = 'MIGRATED'
1532 AND reporting_types.reporting_type_code = 'PL_TAX_ORIGIN'
1533 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1534 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1535 AND report_codes.record_type_code = 'MIGRATED'
1536
1537 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1538 where entity_code = 'ZX_RATES'
1539 and entity_id = rates.tax_rate_id
1540 and reporting_type_id =
1541 report_codes.reporting_type_id)
1542
1543 UNION ALL
1544 SELECT
1545 rates.TAX_RATE_ID TAX_RATE_ID,
1546 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1547 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1548 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1549 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1550 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1551 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1552 FROM
1553 AP_TAX_CODES_ALL codes,
1554 ZX_RATES_B rates,
1555 ZX_REPORTING_TYPES_B reporting_types,
1556 ZX_REPORTING_CODES_B report_codes
1557 WHERE
1558 codes.tax_id = rates.tax_rate_id
1559 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1560 AND codes.global_attribute_category = 'JE.CH.APXTADTC.TAX_INFO'
1561 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1562 AND rates.record_type_code = 'MIGRATED'
1563 AND reporting_types.reporting_type_code = 'CH_VAT_REGIME'
1564 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1565 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1566 AND report_codes.record_type_code = 'MIGRATED'
1567
1568 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1569 where entity_code = 'ZX_RATES'
1570 and entity_id = rates.tax_rate_id
1571 and reporting_type_id =
1572 report_codes.reporting_type_id)
1573
1574 UNION ALL
1575 SELECT
1576 rates.TAX_RATE_ID TAX_RATE_ID,
1577 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
1578 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1579 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1580 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
1581 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
1582 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
1583 FROM
1584 AP_TAX_CODES_ALL codes,
1585 ZX_RATES_B rates,
1586 ZX_REPORTING_TYPES_B reporting_types,
1587 ZX_REPORTING_CODES_B report_codes
1588 WHERE
1589 codes.tax_id = rates.tax_rate_id
1590 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1591 AND codes.global_attribute_category = 'JA.TW.APXTADTC.TAX_CODES'
1592 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
1593 AND rates.record_type_code = 'MIGRATED'
1594 AND reporting_types.reporting_type_code = 'TW_GOVERNMENT_TAX_TYPE'
1595 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1596 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1597 AND report_codes.record_type_code = 'MIGRATED'
1598
1599 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1600 where entity_code = 'ZX_RATES'
1601 and entity_id = rates.tax_rate_id
1602 and reporting_type_id =
1603 report_codes.reporting_type_id)
1604 --End of Bug# 4952838
1605
1606 UNION ALL
1607 /* Bug 4936036 : As reporting codes would not be created for reporting types PT_PRD_TAXABLE_BOX,
1608 PT_PRD_REC_TAX_BOX, PT_ANL_TTL_TAXABLE_BOX, PT_ANL_REC_TAXABLE, PT_ANL_NON_REC_TAXABLE,PT_ANL_REC_TAX_BOX */
1609 SELECT
1610 rates.TAX_RATE_ID TAX_RATE_ID,
1611 null REPORTING_CODE_ID,
1612 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1613 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1614 codes.global_attribute2 REPORTING_CODE_CHAR_VALUE,
1615 NULL REPORTING_CODE_DATE_VALUE,
1616 NULL REPORTING_CODE_NUM_VALUE
1617 FROM
1618 AP_TAX_CODES_ALL codes,
1619 ZX_RATES_B rates,
1620 ZX_REPORTING_TYPES_B reporting_types
1621 -- ZX_REPORTING_CODES_B report_codes
1622 WHERE
1623 codes.tax_id = rates.tax_rate_id
1624 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1625 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1626 AND codes.global_attribute2 IS NOT NULL
1627 -- AND codes.global_attribute2 = report_codes.REPORTING_CODE_CHAR_VALUE
1628 AND rates.record_type_code = 'MIGRATED'
1629 AND reporting_types.reporting_type_code = 'PT_PRD_TAXABLE_BOX'
1630 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1631 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1632 -- AND report_codes.record_type_code = 'MIGRATED'
1633 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1634 where entity_code = 'ZX_RATES'
1635 and entity_id = rates.tax_rate_id
1636 and reporting_type_id =
1637 reporting_types.reporting_type_id)
1638 UNION ALL
1639 SELECT
1640 rates.TAX_RATE_ID TAX_RATE_ID,
1641 null REPORTING_CODE_ID,
1642 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1643 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1644 codes.global_attribute3 REPORTING_CODE_CHAR_VALUE,
1645 NULL REPORTING_CODE_DATE_VALUE,
1646 NULL REPORTING_CODE_NUM_VALUE
1647 FROM
1648 AP_TAX_CODES_ALL codes,
1649 ZX_RATES_B rates,
1650 ZX_REPORTING_TYPES_B reporting_types
1651 -- ZX_REPORTING_CODES_B report_codes
1652 WHERE
1653 codes.tax_id = rates.tax_rate_id
1654 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1655 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1656 AND codes.global_attribute3 IS NOT NULL
1657 -- AND codes.global_attribute3 = report_codes.REPORTING_CODE_CHAR_VALUE
1658 AND rates.record_type_code = 'MIGRATED'
1659 AND reporting_types.reporting_type_code = 'PT_PRD_REC_TAX_BOX'
1660 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1661 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1662 -- AND report_codes.record_type_code = 'MIGRATED'
1663
1664 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1665 where entity_code = 'ZX_RATES'
1666 and entity_id = rates.tax_rate_id
1667 and reporting_type_id =
1668 reporting_types.reporting_type_id)
1669 UNION ALL
1670 SELECT
1671 rates.TAX_RATE_ID TAX_RATE_ID,
1672 null REPORTING_CODE_ID,
1673 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1674 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1675 codes.global_attribute4 REPORTING_CODE_CHAR_VALUE,
1676 NULL REPORTING_CODE_DATE_VALUE,
1677 NULL REPORTING_CODE_NUM_VALUE
1678 FROM
1679 AP_TAX_CODES_ALL codes,
1680 ZX_RATES_B rates,
1681 ZX_REPORTING_TYPES_B reporting_types
1682 -- ZX_REPORTING_CODES_B report_codes
1683 WHERE
1684 codes.tax_id = rates.tax_rate_id
1685 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1686 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1687 AND codes.global_attribute4 IS NOT NULL
1688 -- AND codes.global_attribute4 = report_codes.REPORTING_CODE_CHAR_VALUE
1689 AND rates.record_type_code = 'MIGRATED'
1690 AND reporting_types.reporting_type_code = 'PT_ANL_TTL_TAXABLE_BOX'
1691 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1692 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1693 -- AND report_codes.record_type_code = 'MIGRATED'
1694
1695 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1696 where entity_code = 'ZX_RATES'
1697 and entity_id = rates.tax_rate_id
1698 and reporting_type_id =
1699 reporting_types.reporting_type_id)
1700 UNION ALL
1701 SELECT
1702 rates.TAX_RATE_ID TAX_RATE_ID,
1703 null REPORTING_CODE_ID,
1704 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1705 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1706 codes.global_attribute5 REPORTING_CODE_CHAR_VALUE,
1707 NULL REPORTING_CODE_DATE_VALUE,
1708 NULL REPORTING_CODE_NUM_VALUE
1709 FROM
1710 AP_TAX_CODES_ALL codes,
1711 ZX_RATES_B rates,
1712 ZX_REPORTING_TYPES_B reporting_types
1713 -- ZX_REPORTING_CODES_B report_codes
1714 WHERE
1715 codes.tax_id = rates.tax_rate_id
1716 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1717 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1718 AND codes.global_attribute5 IS NOT NULL
1719 -- AND codes.global_attribute5 = report_codes.REPORTING_CODE_CHAR_VALUE
1720 AND rates.record_type_code = 'MIGRATED'
1721 AND reporting_types.reporting_type_code = 'PT_ANL_REC_TAXABLE'
1722 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1723 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1724 -- AND report_codes.record_type_code = 'MIGRATED'
1725
1726 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1727 where entity_code = 'ZX_RATES'
1728 and entity_id = rates.tax_rate_id
1729 and reporting_type_id =
1730 reporting_types.reporting_type_id)
1731 UNION ALL
1732 SELECT
1733 rates.TAX_RATE_ID TAX_RATE_ID,
1734 null REPORTING_CODE_ID,
1735 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1736 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1737 codes.global_attribute6 REPORTING_CODE_CHAR_VALUE,
1738 NULL REPORTING_CODE_DATE_VALUE,
1739 NULL REPORTING_CODE_NUM_VALUE
1740 FROM
1741 AP_TAX_CODES_ALL codes,
1742 ZX_RATES_B rates,
1743 ZX_REPORTING_TYPES_B reporting_types
1744 -- ZX_REPORTING_CODES_B report_codes
1745 WHERE
1746
1747 codes.tax_id = rates.tax_rate_id
1748 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1749 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1750 AND codes.global_attribute6 IS NOT NULL
1751 -- AND codes.global_attribute6 = report_codes.REPORTING_CODE_CHAR_VALUE
1752 AND reporting_types.reporting_type_code = 'PT_ANL_NON_REC_TAXABLE'
1753 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1754 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1755 AND rates.record_type_code = 'MIGRATED'
1756
1757 -- AND report_codes.record_type_code = 'MIGRATED'
1758
1759 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1760 where entity_code = 'ZX_RATES'
1761 and entity_id = rates.tax_rate_id
1762 and reporting_type_id =
1763 reporting_types.reporting_type_id)
1764 UNION ALL
1765 SELECT
1766 rates.TAX_RATE_ID TAX_RATE_ID,
1767 null REPORTING_CODE_ID,
1768 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
1769 reporting_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
1770 codes.global_attribute7 REPORTING_CODE_CHAR_VALUE,
1771 NULL REPORTING_CODE_DATE_VALUE,
1772 NULL REPORTING_CODE_NUM_VALUE
1773
1774 FROM
1775 AP_TAX_CODES_ALL codes,
1776 ZX_RATES_B rates,
1777 ZX_REPORTING_TYPES_B reporting_types
1778 -- ZX_REPORTING_CODES_B report_codes
1779 WHERE
1780 codes.tax_id = rates.tax_rate_id
1781 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1782 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
1783 AND codes.global_attribute7 IS NOT NULL
1784 -- AND codes.global_attribute7 = report_codes.REPORTING_CODE_CHAR_VALUE
1785 AND rates.record_type_code = 'MIGRATED'
1786 AND reporting_types.reporting_type_code = 'PT_ANL_REC_TAX_BOX'
1787 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1788 -- AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1789 -- AND report_codes.record_type_code = 'MIGRATED'
1790
1791 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1792 where entity_code = 'ZX_RATES'
1793 and entity_id = rates.tax_rate_id
1794 and reporting_type_id =
1795 reporting_types.reporting_type_id));
1796
1797 -- Bug # 3935161. Association for 'MEMBER STATE'
1798 IF L_MULTI_ORG_FLAG = 'Y'
1799 THEN
1800 INSERT INTO ZX_REPORT_CODES_ASSOC(
1801 REPORTING_CODE_ASSOC_ID,
1802 ENTITY_CODE,
1803 ENTITY_ID,
1804 REPORTING_TYPE_ID,
1805 REPORTING_CODE_ID,
1806 EXCEPTION_CODE,
1807 EFFECTIVE_FROM,
1808 EFFECTIVE_TO,
1809 REPORTING_CODE_CHAR_VALUE, -- Bug 14528148
1810 REPORTING_CODE_DATE_VALUE, -- Bug 14528148
1811 REPORTING_CODE_NUM_VALUE, -- Bug 14528148
1812 CREATED_BY,
1813 CREATION_DATE,
1814 LAST_UPDATED_BY,
1815 LAST_UPDATE_DATE,
1816 LAST_UPDATE_LOGIN,
1817 OBJECT_VERSION_NUMBER) -- Bug 5031787
1818 (SELECT
1819 ZX_REPORT_CODES_ASSOC_S.nextval, --REPORTING_CODE_ASSOC_ID
1820 'ZX_PARTY_TAX_PROFILE', --ENTITY_CODE
1821 ptp.Party_Tax_Profile_Id, --ENTITY_ID
1822 codes.REPORTING_TYPE_ID , --REPORTING_TYPE_ID
1823 codes.REPORTING_CODE_ID, --REPORTING_CODE_ID
1824 null, --EXCEPTION_CODE
1825 codes.EFFECTIVE_FROM, --EFFECTIVE_FROM
1826 codes.EFFECTIVE_TO, --EFFECTIVE_TO
1827 codes.REPORTING_CODE_CHAR_VALUE, -- Bug 14528148
1828 codes.REPORTING_CODE_DATE_VALUE, -- Bug 14528148
1829 codes.REPORTING_CODE_NUM_VALUE, -- Bug 14528148
1830 fnd_global.user_id,
1831 sysdate,
1832 fnd_global.user_id,
1833 sysdate,
1834 fnd_global.conc_login_id,
1835 1 -- Bug 5031787
1836 FROM
1837 financials_system_params_all fin_sys_param,
1838 zx_reporting_types_b types,
1839 zx_reporting_codes_b codes,
1840 xle_etb_profiles etb,
1841 zx_party_tax_profile ptp
1842
1843 WHERE
1844 types.reporting_type_id = codes.reporting_type_id
1845 AND types.reporting_type_code = 'MEMBER STATE'
1846 AND fin_sys_param.vat_country_code = codes.reporting_code_char_value
1847 AND etb.legal_entity_id = fin_sys_param.org_id -- Bug 5031787
1848 AND ptp.party_id = etb.party_id
1849 AND ptp.Party_Type_Code = 'LEGAL_ESTABLISHMENT'
1850
1851 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1852 where entity_code = 'ZX_PARTY_TAX_PROFILE'
1853 and entity_id = ptp.Party_Tax_Profile_Id
1854 and reporting_type_id = types.reporting_type_id));
1855 ELSE
1856 INSERT INTO ZX_REPORT_CODES_ASSOC(
1857 REPORTING_CODE_ASSOC_ID,
1858 ENTITY_CODE,
1859 ENTITY_ID,
1860 REPORTING_TYPE_ID,
1861 REPORTING_CODE_ID,
1862 EXCEPTION_CODE,
1863 EFFECTIVE_FROM,
1864 EFFECTIVE_TO,
1865 REPORTING_CODE_CHAR_VALUE, -- Bug 14528148
1866 REPORTING_CODE_DATE_VALUE, -- Bug 14528148
1867 REPORTING_CODE_NUM_VALUE, -- Bug 14528148
1868 CREATED_BY,
1869 CREATION_DATE,
1870 LAST_UPDATED_BY,
1871 LAST_UPDATE_DATE,
1872 LAST_UPDATE_LOGIN,
1873 OBJECT_VERSION_NUMBER) -- Bug 5031787
1874 (SELECT
1875 ZX_REPORT_CODES_ASSOC_S.nextval, --REPORTING_CODE_ASSOC_ID
1876 'ZX_PARTY_TAX_PROFILE', --ENTITY_CODE
1877 ptp.Party_Tax_Profile_Id, --ENTITY_ID
1878 codes.REPORTING_TYPE_ID , --REPORTING_TYPE_ID
1879 codes.REPORTING_CODE_ID, --REPORTING_CODE_ID
1880 null, --EXCEPTION_CODE
1881 codes.EFFECTIVE_FROM, --EFFECTIVE_FROM
1882 codes.EFFECTIVE_TO, --EFFECTIVE_TO
1883 codes.REPORTING_CODE_CHAR_VALUE, -- Bug 14528148
1884 codes.REPORTING_CODE_DATE_VALUE, -- Bug 14528148
1885 codes.REPORTING_CODE_NUM_VALUE, -- Bug 14528148
1886 fnd_global.user_id,
1887 sysdate,
1888 fnd_global.user_id,
1889 sysdate,
1890 fnd_global.conc_login_id,
1891 1 -- Bug 5031787
1892 FROM
1893 financials_system_params_all fin_sys_param,
1894 zx_reporting_types_b types,
1895 zx_reporting_codes_b codes,
1896 xle_etb_profiles etb,
1897 zx_party_tax_profile ptp
1898
1899 WHERE
1900 types.reporting_type_id = codes.reporting_type_id
1901 AND types.reporting_type_code = 'MEMBER STATE'
1902 AND fin_sys_param.vat_country_code = codes.reporting_code_char_value
1903 AND etb.legal_entity_id = fin_sys_param.org_id --Bug 5031787
1904 AND etb.legal_entity_id = l_org_id
1905 AND ptp.party_id = etb.party_id
1906 AND ptp.Party_Type_Code = 'LEGAL_ESTABLISHMENT'
1907
1908 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1909 where entity_code = 'ZX_PARTY_TAX_PROFILE'
1910 and entity_id = ptp.Party_Tax_Profile_Id
1911 and reporting_type_id = types.reporting_type_id));
1912 END IF;
1913
1914
1915
1916 --Bug 3922583
1917 INSERT
1918 INTO ZX_REPORT_CODES_ASSOC(
1919 REPORTING_CODE_ASSOC_ID,
1920 ENTITY_CODE ,
1921 ENTITY_ID ,
1922 REPORTING_TYPE_ID ,
1923 REPORTING_CODE_ID ,
1924 EXCEPTION_CODE ,
1925 EFFECTIVE_FROM ,
1926 EFFECTIVE_TO ,
1927 CREATED_BY ,
1928 CREATION_DATE ,
1929 LAST_UPDATED_BY ,
1930 LAST_UPDATE_DATE ,
1931 LAST_UPDATE_LOGIN ,
1932 REPORTING_CODE_CHAR_VALUE,
1933 REPORTING_CODE_DATE_VALUE,
1934 REPORTING_CODE_NUM_VALUE,
1935 OBJECT_VERSION_NUMBER
1936 )
1937 SELECT
1938 ZX_REPORT_CODES_ASSOC_S.nextval ,
1939 'ZX_RATES' ,--ENTITY_CODE
1940 rates.TAX_RATE_ID ,--ENTITY_ID
1941 report_codes.REPORTING_TYPE_ID, --REPORTING_TYPE_ID
1942 report_codes.REPORTING_CODE_ID ,--REPORTING_CODE_ID
1943 NULL ,--EXCEPTION_CODE
1944 rates.EFFECTIVE_FROM ,
1945 NULL ,--EFFECTIVE_TO
1946 fnd_global.user_id ,
1947 SYSDATE ,
1948 fnd_global.user_id ,
1949 SYSDATE ,
1950 fnd_global.conc_login_id ,
1951 report_codes.REPORTING_CODE_CHAR_VALUE,--REPORTING_CODE_CHAR_VALUE
1952 report_codes.REPORTING_CODE_DATE_VALUE,--REPORTING_CODE_DATE_VALUE
1953 report_codes.REPORTING_CODE_NUM_VALUE , --REPORTING_CODE_NUM_VALUE
1954 1
1955 FROM
1956 AP_TAX_CODES_ALL codes,
1957 ZX_REPORTING_TYPES_B reporting_types,
1958 ZX_REPORTING_CODES_B report_codes,
1959 ZX_RATES_B rates
1960
1961
1962 WHERE
1963 codes.tax_id = rates.tax_rate_id
1964 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
1965 AND codes.global_attribute_category = 'JL.CL.APXTADTC.AP_TAX_CODES'
1966 AND codes.global_attribute19 = report_codes.REPORTING_CODE_CHAR_VALUE --Bug 4928369
1967 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
1968 AND reporting_types.reporting_type_code ='CL_TAX_CODE_CLASSIF'
1969 AND reporting_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
1970 AND report_codes.record_type_code = 'MIGRATED'
1971 AND rates.record_type_code = 'MIGRATED'
1972
1973 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
1974 where entity_code = 'ZX_RATES'
1975 and entity_id = rates.tax_rate_id
1976 and reporting_type_id =
1977 report_codes.reporting_type_id);
1978
1979 arp_util_tax.debug(' CREATE_ZX_REPORTING_ASSOC_AP(-)');
1980
1981 END CREATE_ZX_REPORTING_ASSOC_AP;
1982
1983
1984
1985 /* Used to create the reporting code association for AR */
1986
1987 PROCEDURE CREATE_ZX_REPORTING_ASSOC_AR(p_tax_id IN NUMBER) IS
1988 l_status fnd_module_installations.status%TYPE;
1989 l_db_status fnd_module_installations.DB_STATUS%TYPE;
1990
1991 BEGIN
1992
1993 /* Create the Reporting Code association*/
1994 --Association for Reporting Type Code PT_ANL_TAX_BOX
1995 arp_util_tax.debug('ZX_REPORTING_ASSOC_AR(+)');
1996 INSERT
1997 INTO ZX_REPORT_CODES_ASSOC(
1998 REPORTING_CODE_ASSOC_ID,
1999 ENTITY_CODE ,
2000 ENTITY_ID ,
2001 REPORTING_TYPE_ID ,
2002 REPORTING_CODE_ID ,
2003 EXCEPTION_CODE ,
2004 EFFECTIVE_FROM ,
2005 EFFECTIVE_TO ,
2006 CREATED_BY ,
2007 CREATION_DATE ,
2008 LAST_UPDATED_BY ,
2009 LAST_UPDATE_DATE ,
2010 LAST_UPDATE_LOGIN ,
2011 REPORTING_CODE_CHAR_VALUE,
2012 REPORTING_CODE_DATE_VALUE,
2013 REPORTING_CODE_NUM_VALUE,
2014 OBJECT_VERSION_NUMBER
2018 'ZX_RATES' ,--ENTITY_CODE
2015 )
2016 SELECT
2017 ZX_REPORT_CODES_ASSOC_S.nextval ,
2019 TAX_RATE_ID ,--ENTITY_ID
2020 REPORTING_TYPE_ID ,
2021 REPORTING_CODE_ID ,
2022 NULL ,--EXCEPTION_CODE
2023 EFFECTIVE_FROM ,
2024 NULL ,--EFFECTIVE_TO
2025 fnd_global.user_id ,
2026 SYSDATE ,
2027 fnd_global.user_id ,
2028 SYSDATE ,
2029 fnd_global.conc_login_id ,
2030 REPORTING_CODE_CHAR_VALUE,
2031 REPORTING_CODE_DATE_VALUE,
2032 REPORTING_CODE_NUM_VALUE,
2033 1
2034 FROM
2035 (
2036 SELECT
2037 rates.TAX_RATE_ID TAX_RATE_ID,
2038 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2039 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2040 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2041 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
2042 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
2043 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
2044 FROM
2045
2046 AR_VAT_TAX_ALL_B codes,
2047 ZX_RATES_B rates,
2048 ZX_REPORTING_TYPES_B report_types,
2049 ZX_REPORTING_CODES_B report_codes
2050
2051 WHERE
2052
2053 codes.vat_tax_id = rates.tax_rate_id
2054 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2055 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2056 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
2057 AND rates.record_type_code = 'MIGRATED'
2058 AND report_types.reporting_type_id = report_codes.reporting_type_id
2059 AND report_types.REPORTING_TYPE_CODE= 'PT_LOCATION'
2060 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2061 AND report_codes.record_type_code = 'MIGRATED'
2062
2063
2064 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2065 where entity_code = 'ZX_RATES'
2066 and entity_id = rates.tax_rate_id
2067 and reporting_type_id =
2068 report_codes.reporting_type_id)
2069
2070 --Bug# 4952838
2071
2072 UNION ALL
2073
2074 SELECT
2075 rates.TAX_RATE_ID TAX_RATE_ID,
2076 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2077 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2078 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2079 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
2080 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
2081 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
2082 FROM
2083
2084 AR_VAT_TAX_ALL_B codes,
2085 ZX_RATES_B rates,
2086 ZX_REPORTING_TYPES_B report_types,
2087 ZX_REPORTING_CODES_B report_codes
2088
2089 WHERE
2090
2091 codes.vat_tax_id = rates.tax_rate_id
2092 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2093 AND codes.global_attribute_category = 'JE.CZ.ARXSUVAT.TAX_ORIGIN'
2094 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
2095 AND rates.record_type_code = 'MIGRATED'
2096 AND report_types.reporting_type_id = report_codes.reporting_type_id
2097 AND report_types.REPORTING_TYPE_CODE= 'CZ_TAX_ORIGIN'
2098 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2099 AND report_codes.record_type_code = 'MIGRATED'
2100
2101 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2102 where entity_code = 'ZX_RATES'
2103 and entity_id = rates.tax_rate_id
2104 and reporting_type_id =
2105 report_codes.reporting_type_id)
2106
2107 UNION ALL
2108
2109 SELECT
2110 rates.TAX_RATE_ID TAX_RATE_ID,
2111 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2112 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2113 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2114 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
2115 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
2116 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
2117 FROM
2118
2119 AR_VAT_TAX_ALL_B codes,
2120 ZX_RATES_B rates,
2121 ZX_REPORTING_TYPES_B report_types,
2122 ZX_REPORTING_CODES_B report_codes
2123
2124 WHERE
2125
2126 codes.vat_tax_id = rates.tax_rate_id
2127 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2128 AND codes.global_attribute_category = 'JE.HU.ARXSUVAT.TAX_ORIGIN'
2129 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
2130 AND rates.record_type_code = 'MIGRATED'
2131 AND report_types.reporting_type_id = report_codes.reporting_type_id
2132 AND report_types.REPORTING_TYPE_CODE= 'HU_TAX_ORIGIN'
2133 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2134 AND report_codes.record_type_code = 'MIGRATED'
2135
2139 and reporting_type_id =
2136 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2137 where entity_code = 'ZX_RATES'
2138 and entity_id = rates.tax_rate_id
2140 report_codes.reporting_type_id)
2141
2142 UNION ALL
2143
2144 SELECT
2145 rates.TAX_RATE_ID TAX_RATE_ID,
2146 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2147 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2148 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2149 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
2150 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
2151 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
2152 FROM
2153
2154 AR_VAT_TAX_ALL_B codes,
2155 ZX_RATES_B rates,
2156 ZX_REPORTING_TYPES_B report_types,
2157 ZX_REPORTING_CODES_B report_codes
2158
2159 WHERE
2160
2161 codes.vat_tax_id = rates.tax_rate_id
2162 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2163 AND codes.global_attribute_category = 'JE.PL.ARXSUVAT.TAX_ORIGIN'
2164 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
2165 AND rates.record_type_code = 'MIGRATED'
2166 AND report_types.reporting_type_id = report_codes.reporting_type_id
2167 AND report_types.REPORTING_TYPE_CODE= 'PL_TAX_ORIGIN'
2168 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2169 AND report_codes.record_type_code = 'MIGRATED'
2170
2171 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2172 where entity_code = 'ZX_RATES'
2173 and entity_id = rates.tax_rate_id
2174 and reporting_type_id =
2175 report_codes.reporting_type_id)
2176
2177 UNION ALL
2178
2179 SELECT
2180 rates.TAX_RATE_ID TAX_RATE_ID,
2181 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2182 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2183 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2184 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
2185 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
2186 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
2187 FROM
2188
2189 AR_VAT_TAX_ALL_B codes,
2190 ZX_RATES_B rates,
2191 ZX_REPORTING_TYPES_B report_types,
2192 ZX_REPORTING_CODES_B report_codes
2193
2194 WHERE
2195
2196 codes.vat_tax_id = rates.tax_rate_id
2197 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2198 AND codes.global_attribute_category = 'JA.TW.ARXSUVAT.VAT_TAX'
2199 AND codes.global_attribute1 = report_codes.REPORTING_CODE_CHAR_VALUE
2200 AND rates.record_type_code = 'MIGRATED'
2201 AND report_types.reporting_type_id = report_codes.reporting_type_id
2202 AND report_types.REPORTING_TYPE_CODE= 'TW_GOVERNMENT_TAX_TYPE'
2203 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2204 AND report_codes.record_type_code = 'MIGRATED'
2205
2206 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2207 where entity_code = 'ZX_RATES'
2208 and entity_id = rates.tax_rate_id
2209 and reporting_type_id =
2210 report_codes.reporting_type_id)
2211
2212 UNION ALL
2213
2214 SELECT
2215 rates.TAX_RATE_ID TAX_RATE_ID,
2216 null REPORTING_CODE_ID,
2217 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2218 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2219 codes.global_attribute5 REPORTING_CODE_CHAR_VALUE,
2220 NULL REPORTING_CODE_DATE_VALUE,
2221 NULL REPORTING_CODE_NUM_VALUE
2222
2223 FROM
2224 AR_VAT_TAX_ALL_B codes,
2225 ZX_RATES_B rates,
2226 ZX_REPORTING_TYPES_B report_types
2227 WHERE
2228 codes.vat_tax_id = rates.tax_rate_id
2229 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2230 AND codes.global_attribute_category = 'JL.CL.ARXSUVAT.VAT_TAX'
2231 AND rates.record_type_code = 'MIGRATED'
2232 AND report_types.REPORTING_TYPE_CODE= 'CL_DEBIT_ACCOUNT'
2233 AND report_types.tax_regime_code = rates.tax_regime_code
2234 AND codes.global_attribute5 IS NOT NULL
2235
2236 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2237 where entity_code = 'ZX_RATES'
2238 and entity_id = rates.tax_rate_id
2239 and reporting_type_id =
2240 report_types.reporting_type_id)
2241
2242 --End of Bug# 4952838
2243
2244 UNION ALL
2245 /* Bug 4936036 : As reporting codes would not be created for reporting types PT_PRD_TAXABLE_BOX ,
2246 PT_PRD_REC_TAX_BOX, PT_ANL_TTL_TAXABLE_BOX, PT_ANL_REC_TAXABLE, PT_ANL_NON_REC_TAXABLE,PT_ANL_REC_TAX_BOX */
2247 SELECT
2248 rates.TAX_RATE_ID TAX_RATE_ID,
2249 null REPORTING_CODE_ID,
2250 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2251 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2252 codes.global_attribute2 REPORTING_CODE_CHAR_VALUE,
2253 NULL REPORTING_CODE_DATE_VALUE,
2254 NULL REPORTING_CODE_NUM_VALUE
2255
2256 FROM
2257
2258 AR_VAT_TAX_ALL_B codes,
2259 ZX_RATES_B rates,
2260 ZX_REPORTING_TYPES_B report_types
2261 -- ZX_REPORTING_CODES_B report_codes
2262
2263 WHERE
2264
2265 codes.vat_tax_id = rates.tax_rate_id
2266 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2267 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2268 AND codes.global_attribute2 IS NOT NULL
2269 -- AND codes.global_attribute2 = report_codes.REPORTING_CODE_CHAR_VALUE
2270 AND rates.record_type_code = 'MIGRATED'
2271 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2272 AND report_types.REPORTING_TYPE_CODE= 'PT_PRD_TAXABLE_BOX'
2273 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2274 -- AND report_codes.record_type_code = 'MIGRATED'
2275
2276
2277 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2278 where entity_code = 'ZX_RATES'
2279 and entity_id = rates.tax_rate_id
2280 and reporting_type_id =
2281 report_types.reporting_type_id)
2282 UNION ALL
2283 SELECT
2284 rates.TAX_RATE_ID TAX_RATE_ID,
2285 null REPORTING_CODE_ID,
2286 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2287 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2288 codes.global_attribute3 REPORTING_CODE_CHAR_VALUE,
2289 NULL REPORTING_CODE_DATE_VALUE,
2290 NULL REPORTING_CODE_NUM_VALUE
2291 FROM
2292
2293 AR_VAT_TAX_ALL_B codes,
2294 ZX_RATES_B rates,
2295 ZX_REPORTING_TYPES_B report_types
2296 -- ZX_REPORTING_CODES_B report_codes
2297
2298 WHERE
2299
2300 codes.vat_tax_id = rates.tax_rate_id
2301 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2302 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2303 AND codes.global_attribute3 IS NOT NULL
2304 -- AND codes.global_attribute3 = report_codes.REPORTING_CODE_CHAR_VALUE
2305 AND rates.record_type_code = 'MIGRATED'
2306 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2307 AND report_types.REPORTING_TYPE_CODE= 'PT_PRD_REC_TAX_BOX'
2308 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2309 -- AND report_codes.record_type_code = 'MIGRATED'
2310
2311
2312 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2313 where entity_code = 'ZX_RATES'
2314 and entity_id = rates.tax_rate_id
2315 and reporting_type_id =
2316 report_types.reporting_type_id)
2317 UNION ALL
2318 SELECT
2319 rates.TAX_RATE_ID TAX_RATE_ID,
2320 null REPORTING_CODE_ID,
2321 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2322 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2323 codes.global_attribute4 REPORTING_CODE_CHAR_VALUE,
2324 NULL REPORTING_CODE_DATE_VALUE,
2325 NULL REPORTING_CODE_NUM_VALUE
2326 FROM
2327
2328 AR_VAT_TAX_ALL_B codes,
2329 ZX_RATES_B rates,
2330 ZX_REPORTING_TYPES_B report_types
2331 -- ZX_REPORTING_CODES_B report_codes
2332
2333 WHERE
2334
2335 codes.vat_tax_id = rates.tax_rate_id
2336 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2337 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2338 AND codes.global_attribute4 IS NOT NULL
2339 -- AND codes.global_attribute4 = report_codes.REPORTING_CODE_CHAR_VALUE
2340 AND rates.record_type_code = 'MIGRATED'
2341 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2342 AND report_types.REPORTING_TYPE_CODE= 'PT_ANL_TTL_TAXABLE_BOX'
2343 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2344 -- AND report_codes.record_type_code = 'MIGRATED'
2345
2346
2347 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2348 where entity_code = 'ZX_RATES'
2349 and entity_id = rates.tax_rate_id
2350 and reporting_type_id =
2351 report_types.reporting_type_id)
2352 UNION ALL
2353 SELECT
2354
2355 rates.TAX_RATE_ID TAX_RATE_ID,
2356 null REPORTING_CODE_ID,
2357 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2358 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2359 codes.global_attribute5 REPORTING_CODE_CHAR_VALUE,
2360 NULL REPORTING_CODE_DATE_VALUE,
2361 NULL REPORTING_CODE_NUM_VALUE
2362
2363 FROM
2364
2365 AR_VAT_TAX_ALL_B codes,
2366 ZX_RATES_B rates,
2367 ZX_REPORTING_TYPES_B report_types
2368 -- ZX_REPORTING_CODES_B report_codes
2369
2370 WHERE
2371
2372 codes.vat_tax_id = rates.tax_rate_id
2373 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2374 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2375 AND codes.global_attribute5 IS NOT NULL
2376 -- AND codes.global_attribute5 = report_codes.REPORTING_CODE_CHAR_VALUE
2377 AND rates.record_type_code = 'MIGRATED'
2378 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2379 AND report_types.REPORTING_TYPE_CODE= 'PT_ANL_REC_TAXABLE'
2380 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2381 -- AND report_codes.record_type_code = 'MIGRATED'
2382
2383
2384 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2385 where entity_code = 'ZX_RATES'
2386 and entity_id = rates.tax_rate_id
2387 and reporting_type_id =
2388 report_types.reporting_type_id)
2389 UNION ALL
2390 SELECT
2391 rates.TAX_RATE_ID TAX_RATE_ID,
2392 null REPORTING_CODE_ID,
2393 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2394 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2395 codes.global_attribute6 REPORTING_CODE_CHAR_VALUE,
2396 NULL REPORTING_CODE_DATE_VALUE,
2397 NULL REPORTING_CODE_NUM_VALUE
2398 FROM
2399
2400 AR_VAT_TAX_ALL_B codes,
2401 ZX_RATES_B rates,
2402 ZX_REPORTING_TYPES_B report_types
2403 -- ZX_REPORTING_CODES_B report_codes
2404
2405 WHERE
2406
2407 codes.vat_tax_id = rates.tax_rate_id
2408 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2409 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2410 AND codes.global_attribute6 IS NOT NULL
2411 -- AND codes.global_attribute6 = report_codes.REPORTING_CODE_CHAR_VALUE
2412 AND rates.record_type_code = 'MIGRATED'
2413 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2414 AND report_types.REPORTING_TYPE_CODE= 'PT_ANL_NON_REC_TAXABLE'
2415 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2416 -- AND report_codes.record_type_code = 'MIGRATED'
2417
2418
2419 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2420 where entity_code = 'ZX_RATES'
2421 and entity_id = rates.tax_rate_id
2422 and reporting_type_id =
2423 report_types.reporting_type_id)
2424 UNION ALL
2425 SELECT
2426 rates.TAX_RATE_ID TAX_RATE_ID,
2427 null REPORTING_CODE_ID,
2428 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2429 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2430 codes.global_attribute7 REPORTING_CODE_CHAR_VALUE,
2431 NULL REPORTING_CODE_DATE_VALUE,
2432 NULL REPORTING_CODE_NUM_VALUE
2433
2434 FROM
2435
2436 AR_VAT_TAX_ALL_B codes,
2437 ZX_RATES_B rates,
2438 ZX_REPORTING_TYPES_B report_types
2439 -- ZX_REPORTING_CODES_B report_codes
2440
2441 WHERE
2442
2443 codes.vat_tax_id = rates.tax_rate_id
2444 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2445 AND codes.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
2446 AND codes.global_attribute7 IS NOT NULL
2447 -- AND codes.global_attribute7 = report_codes.REPORTING_CODE_CHAR_VALUE
2448 AND rates.record_type_code = 'MIGRATED'
2449 -- AND report_types.reporting_type_id = report_codes.reporting_type_id
2450 AND report_types.REPORTING_TYPE_CODE= 'PT_ANL_REC_TAX_BOX'
2451 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2452 -- AND report_codes.record_type_code = 'MIGRATED'
2453
2454 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2455 where entity_code = 'ZX_RATES'
2456 and entity_id = rates.tax_rate_id
2457 and reporting_type_id =
2458 report_types.reporting_type_id)
2459 UNION ALL
2460 -- For DGI Transaction Code
2461 SELECT
2462 rates.TAX_RATE_ID TAX_RATE_ID,
2463 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2464 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2465 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2466 report_codes.REPORTING_CODE_CHAR_VALUE,
2467 report_codes.REPORTING_CODE_DATE_VALUE,
2468 report_codes.REPORTING_CODE_NUM_VALUE
2469
2470 FROM
2471
2472 AR_VAT_TAX_ALL_B codes,
2473 ZX_RATES_B rates,
2474 ZX_REPORTING_TYPES_B report_types,
2475 ZX_REPORTING_CODES_B report_codes
2476
2477 WHERE
2478
2479 codes.vat_tax_id = rates.tax_rate_id
2480 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2481 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
2482 AND codes.global_attribute4 = report_codes.REPORTING_CODE_CHAR_VALUE
2483 AND rates.record_type_code = 'MIGRATED'
2484 AND report_types.reporting_type_id = report_codes.reporting_type_id
2485 AND report_types.REPORTING_TYPE_CODE= 'AR_DGI_TRX_CODE'
2486 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2487 AND report_codes.record_type_code = 'MIGRATED'
2488
2489
2490 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2491 where entity_code = 'ZX_RATES'
2492 and entity_id = rates.tax_rate_id
2493 and reporting_type_id =
2494 report_codes.reporting_type_id)
2495
2496 UNION ALL
2497 -- For Turnover Jurisdiction Code
2498 SELECT
2499 rates.TAX_RATE_ID TAX_RATE_ID,
2500 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2501 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2502 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2503 report_codes.REPORTING_CODE_CHAR_VALUE,
2504 report_codes.REPORTING_CODE_DATE_VALUE,
2505 report_codes.REPORTING_CODE_NUM_VALUE
2506
2507 FROM
2508
2509 AR_VAT_TAX_ALL_B codes,
2510 ZX_RATES_B rates,
2511 ZX_REPORTING_TYPES_B report_types,
2512 ZX_REPORTING_CODES_B report_codes
2513
2514 WHERE
2515
2516 codes.vat_tax_id = rates.tax_rate_id
2517 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2518 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
2519 AND codes.global_attribute5 = report_codes.REPORTING_CODE_CHAR_VALUE
2520 AND rates.record_type_code = 'MIGRATED'
2521 AND report_types.reporting_type_id = report_codes.reporting_type_id
2522 AND report_types.REPORTING_TYPE_CODE= 'AR_TURN_OVER_JUR_CODE'
2523 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2524 AND report_codes.record_type_code = 'MIGRATED'
2525
2526
2527 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2528 where entity_code = 'ZX_RATES'
2529 and entity_id = rates.tax_rate_id
2530 and reporting_type_id =
2531 report_codes.reporting_type_id)
2532
2533 UNION ALL
2534 -- For Municipal Jurisdiction
2535 SELECT
2536 rates.TAX_RATE_ID TAX_RATE_ID,
2537 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2538 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2539 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2540 report_codes.REPORTING_CODE_CHAR_VALUE,
2541 report_codes.REPORTING_CODE_DATE_VALUE,
2542 report_codes.REPORTING_CODE_NUM_VALUE
2543
2544 FROM
2545
2546 AR_VAT_TAX_ALL_B codes,
2547 ZX_RATES_B rates,
2548 ZX_REPORTING_TYPES_B report_types,
2549 ZX_REPORTING_CODES_B report_codes
2550
2551 WHERE
2552
2553 codes.vat_tax_id = rates.tax_rate_id
2554 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2555 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
2556 AND codes.global_attribute6 = report_codes.REPORTING_CODE_CHAR_VALUE
2557 AND rates.record_type_code = 'MIGRATED'
2558 AND report_types.reporting_type_id = report_codes.reporting_type_id
2559 AND report_types.REPORTING_TYPE_CODE= 'AR_MUNICIPAL_JUR'
2560 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2561 AND report_codes.record_type_code = 'MIGRATED'
2562
2563
2564 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2565 where entity_code = 'ZX_RATES'
2566 and entity_id = rates.tax_rate_id
2567 and reporting_type_id =
2568 report_codes.reporting_type_id)
2569
2570 UNION ALL
2571 -- For Tax Code Classification
2572 SELECT
2573 rates.TAX_RATE_ID TAX_RATE_ID,
2574 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2575 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2576 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2577 report_codes.REPORTING_CODE_CHAR_VALUE,
2578 report_codes.REPORTING_CODE_DATE_VALUE,
2579 report_codes.REPORTING_CODE_NUM_VALUE
2580
2581 FROM
2582
2583 AR_VAT_TAX_ALL_B codes,
2584 ZX_RATES_B rates,
2585 ZX_REPORTING_TYPES_B report_types,
2586 ZX_REPORTING_CODES_B report_codes
2587
2588 WHERE
2589
2590 codes.vat_tax_id = rates.tax_rate_id
2591 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2592 AND codes.global_attribute_category = 'JL.CL.ARXSUVAT.VAT_TAX'
2593 AND codes.global_attribute4 = report_codes.REPORTING_CODE_CHAR_VALUE
2594 AND rates.record_type_code = 'MIGRATED'
2595 AND report_types.reporting_type_id = report_codes.reporting_type_id
2596 AND report_types.REPORTING_TYPE_CODE= 'CL_TAX_CODE_CLASSIF'
2597 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2598 AND report_codes.record_type_code = 'MIGRATED'
2599
2600
2601 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2602 where entity_code = 'ZX_RATES'
2603 and entity_id = rates.tax_rate_id
2604 and reporting_type_id =
2605 report_codes.reporting_type_id)
2606
2607 UNION ALL
2608 -- For Adjustment Tax Codes Bug Fix 4466085
2609 SELECT
2610 rates.TAX_RATE_ID TAX_RATE_ID,
2611 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2612 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
2613 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2614 report_codes.REPORTING_CODE_CHAR_VALUE,
2615 report_codes.REPORTING_CODE_DATE_VALUE,
2616 report_codes.REPORTING_CODE_NUM_VALUE
2617
2618 FROM
2619
2620 AR_VAT_TAX_ALL_B codes,
2621 ZX_RATES_B rates,
2622 ZX_REPORTING_TYPES_B report_types,
2623 ZX_REPORTING_CODES_B report_codes
2624
2625 WHERE
2626
2627 codes.vat_tax_id = rates.tax_rate_id
2628 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2629 AND rates.record_type_code = 'MIGRATED'
2630 AND codes.adjustment_tax_code = report_codes.reporting_code_char_value
2631 AND rates.tax_regime_code = report_types.tax_regime_code
2632 AND report_types.reporting_type_id = report_codes.reporting_type_id
2633 AND report_types.REPORTING_TYPE_CODE= 'ZX_ADJ_TAX_CLASSIF_CODE'
2634 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2635 AND report_codes.record_type_code = 'MIGRATED'
2636
2637
2638 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2639 where entity_code = 'ZX_RATES'
2640 and entity_id = rates.tax_rate_id
2641 and reporting_type_id =
2642 report_codes.reporting_type_id)
2643 );
2644 --Bug 4705196
2645 /*
2646 UNION ALL
2647 -- For Printed Tax Rate Names [Base Bug 4422813] [Main bug 4653456]
2648 SELECT
2649 rates.TAX_RATE_ID TAX_RATE_ID,
2650 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
2651 report_codes.EFFECTIVE_FROM EFFECTIVE_FROM,
2652 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2653 report_codes.REPORTING_CODE_CHAR_VALUE,
2654 report_codes.REPORTING_CODE_DATE_VALUE,
2655 report_codes.REPORTING_CODE_NUM_VALUE
2656 FROM
2657 AR_VAT_TAX_ALL_TL codes,
2658 ZX_RATES_B rates,
2659 ZX_REPORTING_TYPES_B report_types,
2660 ZX_REPORTING_CODES_B report_codes
2661
2662 WHERE
2663
2664 codes.vat_tax_id = Nvl(rates.source_id,rates.tax_rate_id)
2665 AND rates.record_type_code = 'MIGRATED'
2666 AND report_types.tax_regime_code = rates.tax_regime_code
2667 AND codes.printed_tax_name = report_codes.REPORTING_CODE_CHAR_VALUE
2668 AND codes.LANGUAGE = (select nvl(language_code,'US') from FND_LANGUAGES where installed_flag = 'B' )
2669 AND report_types.reporting_type_id = report_codes.reporting_type_id
2670 AND report_types.REPORTING_TYPE_CODE= 'PRINTED_TAX_RATE_NAME'
2671 AND report_codes.record_type_code = 'MIGRATED'
2672
2673
2674 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2675 where entity_code = 'ZX_RATES'
2676 and entity_id = rates.tax_rate_id
2677 and reporting_type_id =
2678 report_codes.reporting_type_id)
2679 );*/
2680
2681 -- To handle 'YES_NO' DataType - Reporting Type Codes
2682
2683 INSERT
2684 INTO ZX_REPORT_CODES_ASSOC(
2685 REPORTING_CODE_ASSOC_ID,
2686 ENTITY_CODE ,
2687 ENTITY_ID ,
2688 REPORTING_TYPE_ID ,
2689 REPORTING_CODE_ID ,
2690 EXCEPTION_CODE ,
2691 EFFECTIVE_FROM ,
2692 EFFECTIVE_TO ,
2693 CREATED_BY ,
2694 CREATION_DATE ,
2695 LAST_UPDATED_BY ,
2696 LAST_UPDATE_DATE ,
2697 LAST_UPDATE_LOGIN ,
2698 REPORTING_CODE_CHAR_VALUE,
2699 REPORTING_CODE_DATE_VALUE,
2700 REPORTING_CODE_NUM_VALUE,
2701 OBJECT_VERSION_NUMBER
2702 )
2703 SELECT
2704 ZX_REPORT_CODES_ASSOC_S.nextval ,
2705 'ZX_RATES' ,--ENTITY_CODE
2706 TAX_RATE_ID ,--ENTITY_ID
2707 REPORTING_TYPE_ID ,
2708 NULL ,--REPORTING_CODE_ID
2709 NULL ,--EXCEPTION_CODE
2710 EFFECTIVE_FROM ,
2711 NULL ,--EFFECTIVE_TO
2712 fnd_global.user_id ,
2713 SYSDATE ,
2714 fnd_global.user_id ,
2715 SYSDATE ,
2716 fnd_global.conc_login_id ,
2717 REPORTING_CODE_CHAR_VALUE ,
2718 NULL,
2719 NULL,
2720 1
2721 FROM
2722 (
2723 --Bills of Exchange Tax
2724
2725 SELECT TAX_RATE_ID,
2726 REPORTING_TYPE_ID,
2727 rates.EFFECTIVE_FROM,
2728 codes.global_attribute6 REPORTING_CODE_CHAR_VALUE
2729 FROM
2730 ZX_REPORTING_TYPES_B report_types,
2731 AR_VAT_TAX_ALL_B codes,
2732 ZX_RATES_B rates
2733
2734 WHERE
2735 report_types.reporting_type_code= 'CL_BILLS_OF_EXCH_TAX'
2736 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2737 AND codes.vat_tax_id = rates.tax_rate_id
2738 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2739 AND codes.global_attribute_category = 'JL.CL.ARXSUVAT.VAT_TAX'
2740 AND rates.record_type_code = 'MIGRATED'
2741 AND codes.global_attribute6 IS NOT NULL
2742
2743 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2744 where entity_code = 'ZX_RATES'
2745 and entity_id = rates.tax_rate_id
2746 and reporting_type_id =
2747 report_types.reporting_type_id)
2748 UNION ALL
2749
2750 --Municipal Jurisdiction
2751
2752 SELECT TAX_RATE_ID,
2753 REPORTING_TYPE_ID,
2754 rates.EFFECTIVE_FROM,
2755 codes.global_attribute6 REPORTING_CODE_CHAR_VALUE
2756 FROM
2757 ZX_REPORTING_TYPES_B report_types,
2758 AR_VAT_TAX_ALL_B codes,
2759 ZX_RATES_B rates
2760
2761 WHERE
2762 report_types.reporting_type_code= 'AR_MUNICIPAL_JUR'
2763 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2764 AND codes.vat_tax_id = rates.tax_rate_id
2765 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2766 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
2767 AND rates.record_type_code = 'MIGRATED'
2768 AND codes.global_attribute6 IS NOT NULL
2769
2770 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2771 where entity_code = 'ZX_RATES'
2772 and entity_id = rates.tax_rate_id
2773 and reporting_type_id =
2774 report_types.reporting_type_id)
2775
2776 UNION ALL
2777
2778 --Print Tax Line for JL.AR.ARXSUVAT.AR_VAT_TAX context
2779
2780 SELECT TAX_RATE_ID,
2781 REPORTING_TYPE_ID,
2782 rates.EFFECTIVE_FROM,
2783 codes.global_attribute2 REPORTING_CODE_CHAR_VALUE
2784 FROM
2785 ZX_REPORTING_TYPES_B report_types,
2786 AR_VAT_TAX_ALL_B codes,
2787 ZX_RATES_B rates
2788
2789 WHERE
2790 report_types.reporting_type_code= 'PRINT TAX LINE'
2791 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2792 AND codes.vat_tax_id = rates.tax_rate_id
2793 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2794 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
2795 AND rates.record_type_code = 'MIGRATED'
2796 AND codes.global_attribute2 IS NOT NULL
2797
2798
2799 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2800 where entity_code = 'ZX_RATES'
2801 and entity_id = rates.tax_rate_id
2802 and reporting_type_id =
2803 report_types.reporting_type_id)
2804 UNION ALL
2805
2806 --Print Tax Line for JL.BR.ARXSUVAT.Tax Information context
2807
2808 SELECT TAX_RATE_ID,
2809 REPORTING_TYPE_ID,
2810 rates.EFFECTIVE_FROM,
2811 codes.global_attribute2 REPORTING_CODE_CHAR_VALUE
2812 FROM
2813 ZX_REPORTING_TYPES_B report_types,
2814 AR_VAT_TAX_ALL_B codes,
2815 ZX_RATES_B rates
2816
2817 WHERE
2818 report_types.reporting_type_code= 'PRINT TAX LINE'
2819 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2820 AND codes.vat_tax_id = rates.tax_rate_id
2821 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2822 AND codes.global_attribute_category = 'JL.BR.ARXSUVAT.Tax Information'
2823 AND rates.record_type_code = 'MIGRATED'
2824 AND codes.global_attribute2 IS NOT NULL
2825
2826
2827 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2828 where entity_code = 'ZX_RATES'
2829 and entity_id = rates.tax_rate_id
2830 and reporting_type_id =
2831 report_types.reporting_type_id)
2832
2833 UNION ALL
2834
2835 --Print Tax Line for JL.CO.ARXSUVAT.AR_VAT_TAX context
2836
2837 SELECT TAX_RATE_ID,
2838 REPORTING_TYPE_ID,
2839 rates.EFFECTIVE_FROM,
2840 codes.global_attribute2 REPORTING_CODE_CHAR_VALUE
2841 FROM
2842 ZX_REPORTING_TYPES_B report_types,
2843 AR_VAT_TAX_ALL_B codes,
2844 ZX_RATES_B rates
2845
2846 WHERE
2847 report_types.reporting_type_code= 'PRINT TAX LINE'
2848 AND report_types.tax_regime_code = rates.tax_regime_code --Bug 4928369
2849 AND codes.vat_tax_id = rates.tax_rate_id
2850 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2851 AND codes.global_attribute_category = 'JL.CO.ARXSUVAT.AR_VAT_TAX'
2852 AND rates.record_type_code = 'MIGRATED'
2853 AND codes.global_attribute2 IS NOT NULL
2854
2855 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
2856 where entity_code = 'ZX_RATES'
2857 and entity_id = rates.tax_rate_id
2858 and reporting_type_id =
2859 report_types.reporting_type_id)
2860
2861 );
2862
2863 -- YK:9/22/2004: Korean GDF
2864 INSERT
2865 INTO ZX_REPORT_CODES_ASSOC(
2866 REPORTING_CODE_ASSOC_ID,
2867 ENTITY_CODE ,
2868 ENTITY_ID ,
2869 REPORTING_TYPE_ID ,
2870 REPORTING_CODE_CHAR_VALUE,
2871 REPORTING_CODE_DATE_VALUE,
2872 REPORTING_CODE_NUM_VALUE,
2873 EXCEPTION_CODE ,
2874 EFFECTIVE_FROM ,
2875 EFFECTIVE_TO ,
2876 CREATED_BY ,
2877 CREATION_DATE ,
2878 LAST_UPDATED_BY ,
2879 LAST_UPDATE_DATE ,
2880 LAST_UPDATE_LOGIN ,
2881 OBJECT_VERSION_NUMBER
2882 )
2883 SELECT
2884 ZX_REPORT_CODES_ASSOC_S.nextval ,
2885 'ZX_RATES' ,--ENTITY_CODE
2886 TAX_RATE_ID ,--ENTITY_ID
2887 REPORTING_TYPE_ID ,--REPORTING_TYPE_ID
2888 REPORTING_CODE_CHAR_VALUE ,--REPORTING_CODE_CHAR_VALUE
2889 NULL ,--REPORTING_CODE_DATE_VALUE
2890 NULL ,--REPORTING_CODE_NUM_VALUE
2891 NULL ,--EXCEPTION_CODE
2892 EFFECTIVE_FROM ,
2893 NULL ,--EFFECTIVE_TO
2894 fnd_global.user_id ,
2895 SYSDATE ,
2896 fnd_global.user_id ,
2897 SYSDATE ,
2898 fnd_global.conc_login_id ,
2899 1
2900 FROM
2901 (
2902 SELECT rates.TAX_RATE_ID TAX_RATE_ID,
2903 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
2904 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE,
2905 rates.EFFECTIVE_FROM EFFECTIVE_FROM
2906 FROM
2907 AR_VAT_TAX_ALL_B codes,
2908 ZX_RATES_B rates,
2909 ZX_REPORTING_CODES_B report_codes,
2910 hr_locations loc
2911 WHERE
2912 codes.global_attribute_category = 'JA.KR.ARXSUVAT.VAT'
2913 AND codes.vat_tax_id = rates.tax_rate_id
2914 and loc.location_id = codes.global_attribute1
2915 AND report_codes.reporting_code_char_value = loc.location_code
2916 AND report_codes.record_type_code = 'MIGRATED'
2917 AND rates.record_type_code = 'MIGRATED'
2918 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
2919 AND not exists( select 1 from ZX_REPORT_CODES_ASSOC
2920 where entity_code = 'ZX_RATES'
2921 and entity_id = rates.tax_rate_id
2922 and reporting_type_id = report_codes.reporting_type_id)
2923 );
2924
2925
2926
2927
2928
2929 arp_util_tax.debug(' CREATE_ZX_REPORTING_ASSOC_AR(-)');
2930 END CREATE_ZX_REPORTING_ASSOC_AR;
2931
2932
2933 /* Used to create the reporting type and code for AP */
2934
2935 PROCEDURE CREATE_ZX_REP_TYPE_CODES_AP(p_tax_id IN NUMBER ) IS
2936 BEGIN
2937
2938 IF PG_DEBUG = 'Y' THEN
2939 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES_AP(+)');
2940 END IF;
2941
2942 INSERT ALL
2943 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
2944 where reporting_type_code='PT_LOCATION'
2945 and tax_regime_code = l_tax_regime_code)
2946 ) THEN
2947 INTO ZX_REPORTING_TYPES_B(
2948 REPORTING_TYPE_ID ,
2949 REPORTING_TYPE_CODE ,
2950 REPORTING_TYPE_DATATYPE_CODE ,
2951 TAX_REGIME_CODE ,
2952 TAX ,
2953 FORMAT_MASK ,
2954 MIN_LENGTH ,
2955 MAX_LENGTH ,
2956 LEGAL_MESSAGE_FLAG ,
2957 EFFECTIVE_FROM ,
2958 EFFECTIVE_TO ,
2959 RECORD_TYPE_CODE ,
2960 --BugFix 3566148
2961 HAS_REPORTING_CODES_FLAG ,
2962 CREATED_BY ,
2963 CREATION_DATE ,
2964 LAST_UPDATED_BY ,
2965 LAST_UPDATE_DATE ,
2966 LAST_UPDATE_LOGIN ,
2967 REQUEST_ID ,
2968 PROGRAM_APPLICATION_ID ,
2969 PROGRAM_ID ,
2970 PROGRAM_LOGIN_ID ,
2971 OBJECT_VERSION_NUMBER
2972 )
2973 VALUES(
2974 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
2975 'PT_LOCATION' ,--REPORTING_TYPE_CODE
2976 'TEXT' ,--REPORTING_TYPE_DATATYPE
2977 l_tax_regime_code ,
2978 NULL ,--TAX
2979 NULL ,--FORMAT_MASK
2980 1 ,--MIN_LENGTH
2981 30 ,--MAX_LENGTH
2982 'N' ,--LEGAL_MESSAGE_FLAG
2983 effective_from ,
2984 NULL ,--EFFECTIVE_TO
2985 'MIGRATED' ,--RECORD_TYPE_CODE
2986 'Y' ,
2987 fnd_global.user_id ,
2988 SYSDATE ,
2989 fnd_global.user_id ,
2990 SYSDATE ,
2991 fnd_global.conc_login_id ,
2992 fnd_global.conc_request_id , -- Request Id
2993 fnd_global.prog_appl_id , -- Program Application ID
2994 fnd_global.conc_program_id , -- Program Id
2995 fnd_global.conc_login_id , -- Program Login ID
2996 1
2997 )
2998 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
2999 where reporting_type_code='PT_PRD_TAXABLE_BOX'
3000 and tax_regime_code = l_tax_regime_code)
3001 ) THEN
3002 INTO ZX_REPORTING_TYPES_B(
3003 REPORTING_TYPE_ID ,
3004 REPORTING_TYPE_CODE ,
3005 REPORTING_TYPE_DATATYPE_CODE ,
3006 TAX_REGIME_CODE ,
3007 TAX ,
3008 FORMAT_MASK ,
3009 MIN_LENGTH ,
3010 MAX_LENGTH ,
3011 LEGAL_MESSAGE_FLAG ,
3012 EFFECTIVE_FROM ,
3013 EFFECTIVE_TO ,
3014 RECORD_TYPE_CODE ,
3015 --BugFix 3566148
3016 HAS_REPORTING_CODES_FLAG ,
3017 CREATED_BY ,
3018 CREATION_DATE ,
3019 LAST_UPDATED_BY ,
3020 LAST_UPDATE_DATE ,
3021 LAST_UPDATE_LOGIN ,
3022 REQUEST_ID ,
3023 PROGRAM_APPLICATION_ID ,
3024 PROGRAM_ID ,
3025 PROGRAM_LOGIN_ID ,
3026 OBJECT_VERSION_NUMBER
3027 )
3028 VALUES(
3029 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
3030 'PT_PRD_TAXABLE_BOX' ,--REPORTING_TYPE_CODE
3031 'TEXT' ,--REPORTING_TYPE_DATATYPE
3032 l_tax_regime_code ,
3033 NULL ,--TAX
3034 NULL ,--FORMAT_MASK
3035 1 ,--MIN_LENGTH
3036 30 ,--MAX_LENGTH
3037 'N' ,--LEGAL_MESSAGE_FLAG
3038 effective_from ,
3039 NULL ,--EFFECTIVE_TO
3040 'MIGRATED' ,--RECORD_TYPE_CODE
3041 'N' ,
3042 fnd_global.user_id ,
3043 SYSDATE ,
3044 fnd_global.user_id ,
3045 SYSDATE ,
3046 fnd_global.conc_login_id ,
3047 fnd_global.conc_request_id , -- Request Id
3048 fnd_global.prog_appl_id , -- Program Application ID
3049 fnd_global.conc_program_id , -- Program Id
3050 fnd_global.conc_login_id ,-- Program Login ID
3051 1
3052 )
3053 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3054 where reporting_type_code='PT_PRD_REC_TAX_BOX'
3055 and tax_regime_code = l_tax_regime_code)
3056 ) THEN
3057 INTO ZX_REPORTING_TYPES_B(
3058 REPORTING_TYPE_ID ,
3059 REPORTING_TYPE_CODE ,
3060 REPORTING_TYPE_DATATYPE_CODE ,
3061 TAX_REGIME_CODE ,
3062 TAX ,
3063 FORMAT_MASK ,
3064 MIN_LENGTH ,
3065 MAX_LENGTH ,
3066 LEGAL_MESSAGE_FLAG ,
3067 EFFECTIVE_FROM ,
3068 EFFECTIVE_TO ,
3069 RECORD_TYPE_CODE ,
3070 --BugFix 3566148
3071 HAS_REPORTING_CODES_FLAG ,
3072 CREATED_BY ,
3073 CREATION_DATE ,
3074 LAST_UPDATED_BY ,
3075 LAST_UPDATE_DATE ,
3076 LAST_UPDATE_LOGIN ,
3077 REQUEST_ID ,
3078 PROGRAM_APPLICATION_ID ,
3079 PROGRAM_ID ,
3080 PROGRAM_LOGIN_ID ,
3081 OBJECT_VERSION_NUMBER
3082 )
3083 VALUES(
3084 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
3085 'PT_PRD_REC_TAX_BOX' ,--REPORTING_TYPE_CODE
3086 'TEXT' ,--REPORTING_TYPE_DATATYPE
3087 l_tax_regime_code ,
3088 NULL ,--TAX
3089 NULL ,--FORMAT_MASK
3090 1 ,--MIN_LENGTH
3091 30 ,--MAX_LENGTH
3092 'N' ,--LEGAL_MESSAGE_FLAG
3093 effective_from ,
3094 NULL ,--EFFECTIVE_TO
3095 'MIGRATED' ,--RECORD_TYPE_CODE
3096 'N' ,
3097 fnd_global.user_id ,
3098 SYSDATE ,
3099 fnd_global.user_id ,
3100 SYSDATE ,
3101 fnd_global.conc_login_id ,
3102 fnd_global.conc_request_id , -- Request Id
3103 fnd_global.prog_appl_id , -- Program Application ID
3104 fnd_global.conc_program_id , -- Program Id
3105 fnd_global.conc_login_id , -- Program Login ID
3106 1
3107 )
3108 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3109 where reporting_type_code='PT_ANL_TTL_TAXABLE_BOX'
3110 and tax_regime_code = l_tax_regime_code)
3111 ) THEN
3112 INTO ZX_REPORTING_TYPES_B(
3113 REPORTING_TYPE_ID ,
3114 REPORTING_TYPE_CODE ,
3115 REPORTING_TYPE_DATATYPE_CODE ,
3116 TAX_REGIME_CODE ,
3117 TAX ,
3118 FORMAT_MASK ,
3119 MIN_LENGTH ,
3120 MAX_LENGTH ,
3121 LEGAL_MESSAGE_FLAG ,
3122 EFFECTIVE_FROM ,
3123 EFFECTIVE_TO ,
3124 RECORD_TYPE_CODE ,
3125 --BugFix 3566148
3126 HAS_REPORTING_CODES_FLAG ,
3127 CREATED_BY ,
3128 CREATION_DATE ,
3129 LAST_UPDATED_BY ,
3130 LAST_UPDATE_DATE ,
3131 LAST_UPDATE_LOGIN ,
3132 REQUEST_ID ,
3133 PROGRAM_APPLICATION_ID ,
3134 PROGRAM_ID ,
3135 PROGRAM_LOGIN_ID ,
3136 OBJECT_VERSION_NUMBER
3137 )
3138 VALUES(
3139 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
3140 'PT_ANL_TTL_TAXABLE_BOX' ,--REPORTING_TYPE_CODE
3141 'TEXT' ,--REPORTING_TYPE_DATATYPE
3142 l_tax_regime_code ,
3143 NULL ,--TAX
3144 NULL ,--FORMAT_MASK
3145 1 ,--MIN_LENGTH
3146 30 ,--MAX_LENGTH
3147 'N' ,--LEGAL_MESSAGE_FLAG
3148 effective_from ,
3149 NULL ,--EFFECTIVE_TO
3150 'MIGRATED' ,--RECORD_TYPE_CODE
3151 'N' ,
3152 fnd_global.user_id ,
3153 SYSDATE ,
3154 fnd_global.user_id ,
3155 SYSDATE ,
3156 fnd_global.conc_login_id ,
3157 fnd_global.conc_request_id , -- Request Id
3158 fnd_global.prog_appl_id , -- Program Application ID
3159 fnd_global.conc_program_id , -- Program Id
3160 fnd_global.conc_login_id , -- Program Login ID
3161 1
3162 )
3163 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3164 where reporting_type_code='PT_ANL_REC_TAXABLE'
3165 and tax_regime_code = l_tax_regime_code)
3166 ) THEN
3167 INTO ZX_REPORTING_TYPES_B(
3168 REPORTING_TYPE_ID ,
3169 REPORTING_TYPE_CODE ,
3170 REPORTING_TYPE_DATATYPE_CODE ,
3171 TAX_REGIME_CODE ,
3172 TAX ,
3173 FORMAT_MASK ,
3174 MIN_LENGTH ,
3175 MAX_LENGTH ,
3176 LEGAL_MESSAGE_FLAG ,
3177 EFFECTIVE_FROM ,
3178 EFFECTIVE_TO ,
3179 RECORD_TYPE_CODE ,
3180 --BugFix 3566148
3181 HAS_REPORTING_CODES_FLAG ,
3182 CREATED_BY ,
3183 CREATION_DATE ,
3184 LAST_UPDATED_BY ,
3185 LAST_UPDATE_DATE ,
3186 LAST_UPDATE_LOGIN ,
3187 REQUEST_ID ,
3188 PROGRAM_APPLICATION_ID ,
3189 PROGRAM_ID ,
3190 PROGRAM_LOGIN_ID ,
3191 OBJECT_VERSION_NUMBER
3192 )
3193 VALUES(
3194 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
3195 'PT_ANL_REC_TAXABLE' ,--REPORTING_TYPE_CODE
3196 'TEXT' ,--REPORTING_TYPE_DATATYPE
3197 l_tax_regime_code ,
3198 NULL ,--TAX
3199 NULL ,--FORMAT_MASK
3200 1 ,--MIN_LENGTH
3201 30 ,--MAX_LENGTH
3202 'N' ,--LEGAL_MESSAGE_FLAG
3203 effective_from ,
3204 NULL ,--EFFECTIVE_TO
3205 'MIGRATED' ,--RECORD_TYPE_CODE
3206 'N' ,
3207 fnd_global.user_id ,
3208 SYSDATE ,
3209 fnd_global.user_id ,
3210 SYSDATE ,
3211 fnd_global.conc_login_id ,
3212 fnd_global.conc_request_id , -- Request Id
3213 fnd_global.prog_appl_id , -- Program Application ID
3214 fnd_global.conc_program_id , -- Program Id
3215 fnd_global.conc_login_id , -- Program Login ID
3216 1
3217 )
3218 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3219 where reporting_type_code='PT_ANL_NON_REC_TAXABLE'
3220 and tax_regime_code = l_tax_regime_code)
3221 ) THEN
3222 INTO ZX_REPORTING_TYPES_B(
3223 REPORTING_TYPE_ID ,
3224 REPORTING_TYPE_CODE ,
3225 REPORTING_TYPE_DATATYPE_CODE ,
3226 TAX_REGIME_CODE ,
3227 TAX ,
3228 FORMAT_MASK ,
3229 MIN_LENGTH ,
3230 MAX_LENGTH ,
3231 LEGAL_MESSAGE_FLAG ,
3232 EFFECTIVE_FROM ,
3233 EFFECTIVE_TO ,
3234 RECORD_TYPE_CODE ,
3235 --BugFix 3566148
3236 HAS_REPORTING_CODES_FLAG ,
3237 CREATED_BY ,
3238 CREATION_DATE ,
3239 LAST_UPDATED_BY ,
3240 LAST_UPDATE_DATE ,
3241 LAST_UPDATE_LOGIN ,
3242 REQUEST_ID ,
3243 PROGRAM_APPLICATION_ID ,
3244 PROGRAM_ID ,
3245 PROGRAM_LOGIN_ID ,
3246 OBJECT_VERSION_NUMBER
3247 )
3248 VALUES(
3249 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
3250 'PT_ANL_NON_REC_TAXABLE' ,--REPORTING_TYPE_CODE
3251 'TEXT' ,--REPORTING_TYPE_DATATYPE
3252 l_tax_regime_code ,
3253 NULL ,--TAX
3254 NULL ,--FORMAT_MASK
3255 1 ,--MIN_LENGTH
3256 30 ,--MAX_LENGTH
3257 'N' ,--LEGAL_MESSAGE_FLAG
3258 effective_from ,
3259 NULL ,--EFFECTIVE_TO
3260 'MIGRATED' ,--RECORD_TYPE_CODE
3261 'N' ,
3262 fnd_global.user_id ,
3263 SYSDATE ,
3264 fnd_global.user_id ,
3265 SYSDATE ,
3266 fnd_global.conc_login_id ,
3267 fnd_global.conc_request_id , -- Request Id
3268 fnd_global.prog_appl_id , -- Program Application ID
3269 fnd_global.conc_program_id , -- Program Id
3270 fnd_global.conc_login_id , -- Program Login ID
3271 1
3272 )
3273 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3274 where reporting_type_code='PT_ANL_REC_TAX_BOX'
3275 and tax_regime_code = l_tax_regime_code)
3276 ) THEN
3277 INTO ZX_REPORTING_TYPES_B(
3278 REPORTING_TYPE_ID ,
3279 REPORTING_TYPE_CODE ,
3280 REPORTING_TYPE_DATATYPE_CODE ,
3281 TAX_REGIME_CODE ,
3282 TAX ,
3283 FORMAT_MASK ,
3284 MIN_LENGTH ,
3285 MAX_LENGTH ,
3286 LEGAL_MESSAGE_FLAG ,
3287 EFFECTIVE_FROM ,
3288 EFFECTIVE_TO ,
3289 RECORD_TYPE_CODE ,
3290 --BugFix 3566148
3291 HAS_REPORTING_CODES_FLAG ,
3292 CREATED_BY ,
3293 CREATION_DATE ,
3294 LAST_UPDATED_BY ,
3295 LAST_UPDATE_DATE ,
3296 LAST_UPDATE_LOGIN ,
3297 REQUEST_ID ,
3298 PROGRAM_APPLICATION_ID ,
3299 PROGRAM_ID ,
3300 PROGRAM_LOGIN_ID ,
3301 OBJECT_VERSION_NUMBER
3302 )
3303 VALUES(
3304 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
3305 'PT_ANL_REC_TAX_BOX' ,--REPORTING_TYPE_CODE
3306 'TEXT' ,--REPORTING_TYPE_DATATYPE
3307 l_tax_regime_code ,
3308 NULL ,--TAX
3309 NULL ,--FORMAT_MASK
3310 1 ,--MIN_LENGTH
3311 30 ,--MAX_LENGTH
3312 'N' ,--LEGAL_MESSAGE_FLAG
3313 effective_from ,
3314 NULL ,--EFFECTIVE_TO
3315 'MIGRATED' ,--RECORD_TYPE_CODE
3316 'N' ,
3317 fnd_global.user_id ,
3318 SYSDATE ,
3319 fnd_global.user_id ,
3320 SYSDATE ,
3321 fnd_global.conc_login_id ,
3322 fnd_global.conc_request_id , -- Request Id
3323 fnd_global.prog_appl_id , -- Program Application ID
3324 fnd_global.conc_program_id , -- Program Id
3325 fnd_global.conc_login_id , -- Program Login ID
3326 1
3327 )
3328 SELECT
3329 min(zx_rates.effective_from) effective_from,
3330 zx_rates.tax_regime_code l_tax_regime_code
3331 FROM
3332 ap_tax_codes_all codes,
3333 zx_rates_b zx_rates
3334 WHERE
3335 codes.tax_id = zx_rates.tax_rate_id
3336 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3337 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3338 AND zx_rates.record_type_code = 'MIGRATED'
3339
3340 GROUP BY
3341 zx_rates.tax_regime_code;
3342
3343
3344 --BugFix 3557652 REPORTING TYPES IMPL FOR ARGENTINE DGI TRANSACTION CODE
3345 CREATE_REPORTING_TYPE_AP('AR_DGI_TRX_CODE','TEXT','Y', 'JL.AR.APXTADTC.VAT', p_tax_id);
3346
3347 /*
3348 INSERT ALL
3349 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3350 where reporting_type_code='AR_DGI_TRX_CODE'
3351 and tax_regime_code = l_tax_regime_code)
3352 ) THEN
3353 INTO ZX_REPORTING_TYPES_B(
3354 REPORTING_TYPE_ID ,
3355 REPORTING_TYPE_CODE ,
3356 REPORTING_TYPE_DATATYPE_CODE ,
3357 TAX_REGIME_CODE ,
3358 TAX ,
3359 FORMAT_MASK ,
3360 MIN_LENGTH ,
3361 MAX_LENGTH ,
3362 LEGAL_MESSAGE_FLAG ,
3363 EFFECTIVE_FROM ,
3364 EFFECTIVE_TO ,
3365 RECORD_TYPE_CODE ,
3366 HAS_REPORTING_CODES_FLAG ,
3367 CREATED_BY ,
3368 CREATION_DATE ,
3369 LAST_UPDATED_BY ,
3370 LAST_UPDATE_DATE ,
3371 LAST_UPDATE_LOGIN ,
3372 REQUEST_ID ,
3373 PROGRAM_APPLICATION_ID ,
3374 PROGRAM_ID ,
3375 PROGRAM_LOGIN_ID ,
3376 OBJECT_VERSION_NUMBER
3377 )
3378 VALUES(
3379 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
3380 'AR_DGI_TRX_CODE' ,--REPORTING_TYPE_CODE
3381 'TEXT' ,--REPORTING_TYPE_DATATYPE
3382 l_tax_regime_code ,
3383 NULL ,--TAX
3384 NULL ,--FORMAT_MASK
3385 1 ,--MIN_LENGTH
3386 30 ,--MAX_LENGTH
3387 'N' ,--LEGAL_MESSAGE_FLAG
3388 effective_from ,
3389 NULL ,--EFFECTIVE_TO
3390 'MIGRATED' ,--RECORD_TYPE_CODE
3391 'Y' ,
3392 fnd_global.user_id ,
3393 SYSDATE ,
3394 fnd_global.user_id ,
3395 SYSDATE ,
3396 fnd_global.conc_login_id ,
3397 fnd_global.conc_request_id , -- Request Id
3398 fnd_global.prog_appl_id , -- Program Application ID
3399 fnd_global.conc_program_id , -- Program Id
3400 fnd_global.conc_login_id , -- Program Login ID
3401 1
3402 )
3403 SELECT
3404 min(zx_rates.effective_from) effective_from,
3405 zx_rates.tax_regime_code l_tax_regime_code
3406 FROM
3407 ap_tax_codes_all codes,
3408 zx_rates_b zx_rates
3409 WHERE
3410 codes.tax_id = zx_rates.tax_rate_id
3411 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3412 AND codes.global_attribute_category = 'JL.AR.APXTADTC.VAT'
3413 AND zx_rates.record_type_code = 'MIGRATED'
3414
3415 GROUP BY
3416 zx_rates.tax_regime_code;
3417 */
3418
3419 CREATE_REPORTING_TYPE_AP('CL_TAX_CODE_CLASSIF','TEXT','Y', 'JL.CL.APXTADTC.AP_TAX_CODES', p_tax_id);
3420
3421 --Bug Fix : 4928369
3422 /*
3423 INSERT ALL
3424 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3425 where reporting_type_code='CL_TAX_CODE_CLASSIF'
3426 and tax_regime_code = l_tax_regime_code)
3427 ) THEN
3428 INTO ZX_REPORTING_TYPES_B(
3429 REPORTING_TYPE_ID ,
3430 REPORTING_TYPE_CODE ,
3431 REPORTING_TYPE_DATATYPE_CODE ,
3432 TAX_REGIME_CODE ,
3433 TAX ,
3434 FORMAT_MASK ,
3435 MIN_LENGTH ,
3436 MAX_LENGTH ,
3437 LEGAL_MESSAGE_FLAG ,
3438 EFFECTIVE_FROM ,
3439 EFFECTIVE_TO ,
3440 RECORD_TYPE_CODE ,
3441 HAS_REPORTING_CODES_FLAG ,
3442 CREATED_BY ,
3443 CREATION_DATE ,
3444 LAST_UPDATED_BY ,
3445 LAST_UPDATE_DATE ,
3446 LAST_UPDATE_LOGIN ,
3447 REQUEST_ID ,
3448 PROGRAM_APPLICATION_ID ,
3449 PROGRAM_ID ,
3450 PROGRAM_LOGIN_ID ,
3451 OBJECT_VERSION_NUMBER
3452 )
3453 VALUES(
3454 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
3455 'CL_TAX_CODE_CLASSIF' ,--REPORTING_TYPE_CODE
3456 'TEXT' ,--REPORTING_TYPE_DATATYPE
3457 l_tax_regime_code ,
3458 NULL ,--TAX
3459 NULL ,--FORMAT_MASK
3460 1 ,--MIN_LENGTH
3461 30 ,--MAX_LENGTH
3462 'N' ,--LEGAL_MESSAGE_FLAG
3463 effective_from ,
3464 NULL ,--EFFECTIVE_TO
3465 'MIGRATED' ,--RECORD_TYPE_CODE
3466 'Y' ,
3467 fnd_global.user_id ,
3468 SYSDATE ,
3469 fnd_global.user_id ,
3470 SYSDATE ,
3471 fnd_global.conc_login_id ,
3472 fnd_global.conc_request_id , -- Request Id
3473 fnd_global.prog_appl_id , -- Program Application ID
3474 fnd_global.conc_program_id , -- Program Id
3475 fnd_global.conc_login_id , -- Program Login ID
3476 1
3477 )
3478 SELECT
3479 min(zx_rates.effective_from) effective_from,
3480 zx_rates.tax_regime_code l_tax_regime_code
3481 FROM
3482 ap_tax_codes_all codes,
3483 zx_rates_b zx_rates
3484 WHERE
3485 codes.tax_id = zx_rates.tax_rate_id
3486 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3487 AND codes.global_attribute_category = 'JL.CL.APXTADTC.AP_TAX_CODES'
3488 AND zx_rates.record_type_code = 'MIGRATED'
3489 GROUP BY
3490 zx_rates.tax_regime_code;
3491 */
3492
3493 --Bug# 4952838
3494 CREATE_REPORTING_TYPE_AP('CZ_TAX_ORIGIN','TEXT','Y', 'JE.CZ.APXTADTC.TAX_ORIGIN', p_tax_id);
3495
3496 CREATE_REPORTING_TYPE_AP('HU_TAX_ORIGIN','TEXT','Y', 'JE.HU.APXTADTC.TAX_ORIGIN', p_tax_id);
3497
3498 CREATE_REPORTING_TYPE_AP('PL_TAX_ORIGIN','TEXT','Y', 'JE.PL.APXTADTC.TAX_ORIGIN', p_tax_id);
3499
3500 CREATE_REPORTING_TYPE_AP('CH_VAT_REGIME','TEXT','Y', 'JE.CH.APXTADTC.TAX_INFO', p_tax_id);
3501
3502 CREATE_REPORTING_TYPE_AP('TW_GOVERNMENT_TAX_TYPE','TEXT','Y', 'JA.TW.APXTADTC.TAX_CODES', p_tax_id);
3503
3504 CREATE_REPORTING_CODES('CH_VAT_REGIME', 'JECH_VAT_REGIME');
3505
3506 --Bug#3922583 Creating reporting codes for 'CHILEAN GDF'
3507 CREATE_REPORTING_CODES('CL_TAX_CODE_CLASSIF','JLCL_TAX_CODE_CLASS');
3508
3509 --Bug # 3935161
3510 CREATE_REPORT_TYPE_PTP('MEMBER STATE', 'TEXT', 'Y');
3511
3512 -- Create Reporting Codes for 'MEMBER STATE'
3513 INSERT
3514 INTO ZX_REPORTING_CODES_B(
3515 REPORTING_CODE_ID ,
3516 EXCEPTION_CODE ,
3517 EFFECTIVE_FROM ,
3518 EFFECTIVE_TO ,
3519 RECORD_TYPE_CODE ,
3520 CREATED_BY ,
3521 CREATION_DATE ,
3522 LAST_UPDATED_BY ,
3523 LAST_UPDATE_DATE ,
3524 LAST_UPDATE_LOGIN ,
3525 REQUEST_ID ,
3526 PROGRAM_APPLICATION_ID ,
3527 PROGRAM_ID ,
3528 PROGRAM_LOGIN_ID ,
3529 REPORTING_CODE_CHAR_VALUE ,
3530 REPORTING_TYPE_ID ,
3531 OBJECT_VERSION_NUMBER
3532 )
3533 SELECT
3534 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
3535 NULL ,--EXCEPTION_CODE
3536 EFFECTIVE_FROM ,
3537 NULL ,--EFFECTIVE_TO
3538 'MIGRATED' ,--RECORD_TYPE_CODE
3539 fnd_global.user_id ,
3540 SYSDATE ,
3541 fnd_global.user_id ,
3542 SYSDATE ,
3543 fnd_global.conc_login_id ,
3544 fnd_global.conc_request_id , -- Request Id
3545 fnd_global.prog_appl_id , -- Program Application ID
3546 fnd_global.conc_program_id , -- Program Id
3547 fnd_global.conc_login_id , -- Program Login ID
3548 REPORTING_CODE,
3549 REPORTING_TYPE_ID,
3550 1
3551
3552 FROM
3553 (
3554 SELECT
3555 distinct fin_sys_param.VAT_COUNTRY_CODE REPORTING_CODE,
3556 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
3557 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID
3558 FROM
3559
3560 FINANCIALS_SYSTEM_PARAMS_ALL fin_sys_param,
3561 ZX_REPORTING_TYPES_B report_types
3562
3563 WHERE
3564
3565 report_types.REPORTING_TYPE_CODE = 'MEMBER STATE'
3566 AND fin_sys_param.VAT_COUNTRY_CODE is NOT NULL
3567 -- AND report_types.RECORD_TYPE_CODE = 'MIGRATED' -- Bug 5344337
3568 AND NOT EXISTS
3569 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
3570 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
3571 fin_sys_param.VAT_COUNTRY_CODE = REPORTING_CODE_CHAR_VALUE
3572 )
3573 );
3574
3575
3576 /*Insert into ZX_REPORTING_CODES_B for PORTUGAL Global Attribute 1.
3577 BugFix 3557652 REPORTING CODE IMPL FOR ARGENTINE DGI TRANSACTION CODE.
3578 Following Insert will take care of both of ABOVE since for both these
3579 the REPORTING CODES needs to pick up from FND_LOOKUPS */
3580
3581 /* Commented for the Bug 4936036 : as the below logic is wrong and is based on the lookup_type = 'PT_LOCATION'
3582 which doesn't exist
3583 INSERT
3584 INTO ZX_REPORTING_CODES_B(
3585 REPORTING_CODE_ID ,
3586 EXCEPTION_CODE ,
3587 EFFECTIVE_FROM ,
3588 EFFECTIVE_TO ,
3589 RECORD_TYPE_CODE ,
3590 CREATED_BY ,
3591 CREATION_DATE ,
3592 LAST_UPDATED_BY ,
3593 LAST_UPDATE_DATE ,
3594 LAST_UPDATE_LOGIN ,
3595 REQUEST_ID ,
3596 PROGRAM_APPLICATION_ID ,
3597 PROGRAM_ID ,
3598 PROGRAM_LOGIN_ID ,
3599 REPORTING_CODE_CHAR_VALUE ,
3600 REPORTING_CODE_DATE_VALUE ,
3601 REPORTING_CODE_NUM_VALUE ,
3602 REPORTING_TYPE_ID,
3603 OBJECT_VERSION_NUMBER
3604 )
3605 SELECT
3606 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
3607 NULL ,--EXCEPTION_CODE
3608 EFFECTIVE_FROM ,
3609 NULL ,--EFFECTIVE_TO
3610 'MIGRATED' ,--RECORD_TYPE_CODE
3611 fnd_global.user_id ,
3612 SYSDATE ,
3613 fnd_global.user_id ,
3614 SYSDATE ,
3615 fnd_global.conc_login_id ,
3616 fnd_global.conc_request_id , -- Request Id
3617 fnd_global.prog_appl_id , -- Program Application ID
3618 fnd_global.conc_program_id , -- Program Id
3619 fnd_global.conc_login_id , -- Program Login ID
3620 decode(DATATYPE,'TEXT',LOOKUP_CODE,'YES_NO',LOOKUP_CODE,NULL),
3621 decode(DATATYPE,'DATE',LOOKUP_CODE,NULL),
3622 decode(DATATYPE,'NUMERIC_VALUE',LOOKUP_CODE,NULL),
3623 REPORTING_TYPE_ID,
3624 1
3625
3626 FROM
3627 (
3628 SELECT
3629 lookups.LOOKUP_CODE LOOKUP_CODE ,
3630 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
3631 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
3632 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3633
3634 FROM
3635
3636 ZX_REPORTING_TYPES_B report_types,
3637 FND_LOOKUPS lookups
3638
3639 WHERE
3640
3641 report_types.REPORTING_TYPE_CODE = 'PT_LOCATION'
3642 AND report_types.REPORTING_TYPE_CODE = lookups.LOOKUP_TYPE
3643 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
3644
3645 AND NOT EXISTS(SELECT 1 FROM ZX_REPORTING_CODES_B
3646 WHERE REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID
3647 AND REPORTING_CODE_CHAR_VALUE = lookups.LOOKUP_CODE
3648 )
3649
3650 );
3651 */
3652
3653 --Insert into ZX_REPORTING_CODES_B for PORTUGAL Global Attribute 2..7
3654 /* Commented : Bug 4936036 : Reporting Codes should not be created for the below reporting types
3655 as has_reporting_codes_flag = 'N'
3656 INSERT
3657 INTO ZX_REPORTING_CODES_B(
3658 REPORTING_CODE_ID ,
3659 EXCEPTION_CODE ,
3660 EFFECTIVE_FROM ,
3661 EFFECTIVE_TO ,
3662 RECORD_TYPE_CODE ,
3663 CREATED_BY ,
3664 CREATION_DATE ,
3665 LAST_UPDATED_BY ,
3666 LAST_UPDATE_DATE ,
3667 LAST_UPDATE_LOGIN ,
3668 REQUEST_ID ,
3669 PROGRAM_APPLICATION_ID ,
3670 PROGRAM_ID ,
3671 PROGRAM_LOGIN_ID ,
3672 REPORTING_CODE_CHAR_VALUE ,
3673 REPORTING_CODE_DATE_VALUE ,
3674 REPORTING_CODE_NUM_VALUE ,
3675 REPORTING_TYPE_ID ,
3676 OBJECT_VERSION_NUMBER
3677 )
3678 SELECT
3679 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
3680 NULL ,--EXCEPTION_CODE
3681 effective_from ,
3682 NULL ,--EFFECTIVE_TO
3683 'MIGRATED' ,--RECORD_TYPE_CODE
3684 fnd_global.user_id ,
3685 SYSDATE ,
3686 fnd_global.user_id ,
3687 SYSDATE ,
3688 fnd_global.conc_login_id ,
3689 fnd_global.conc_request_id , -- Request
3690 fnd_global.prog_appl_id , -- Program Application ID
3691 fnd_global.conc_program_id , -- Program Id
3692 fnd_global.conc_login_id , -- Program Login ID
3693 decode(DATATYPE,'TEXT',global_attribute,'YES_NO',global_attribute,NULL),
3694 decode(DATATYPE,'DATE',global_attribute,NULL),
3695 decode(DATATYPE,'NUMERIC_VALUE',global_attribute,NULL),
3696 reporting_type_id,
3697 1
3698
3699 FROM
3700 (
3701 SELECT
3702 DISTINCT
3703 codes.global_attribute2 global_attribute,
3704 types.reporting_type_code reporting_type_code,
3705 types.effective_from effective_from,
3706 types.reporting_type_id reporting_type_id,
3707 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3708 FROM
3709 zx_reporting_types_b types,
3710 ap_tax_codes_all codes
3711
3712 WHERE
3713 types.reporting_type_code = 'PT_PRD_TAXABLE_BOX'
3714 AND types.record_type_code = 'MIGRATED'
3715 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3716 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3717 AND codes.global_attribute2 IS NOT NULL
3718
3719 AND (NOT EXISTS
3720 (select 1 from zx_reporting_codes_b where
3721 reporting_type_code = types.reporting_type_code and
3722 REPORTING_CODE_CHAR_VALUE=codes.global_attribute2 )
3723 )
3724
3725 UNION ALL
3726 SELECT
3727 DISTINCT
3728 codes.global_attribute3 global_attribute,
3729 types.reporting_type_code reporting_type_code,
3730 types.effective_from effective_from,
3731 types.reporting_type_id reporting_type_id,
3732 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3733
3734 FROM
3735 zx_reporting_types_b types,
3736 ap_tax_codes_all codes
3737
3738 WHERE
3739 types.reporting_type_code = 'PT_PRD_REC_TAX_BOX'
3740 AND types.record_type_code = 'MIGRATED'
3741 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3742 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3743 AND codes.global_attribute3 IS NOT NULL
3744
3745
3746 AND (NOT EXISTS
3747 (select 1 from zx_reporting_codes_b where
3748 reporting_type_code = types.reporting_type_code and
3749 REPORTING_CODE_CHAR_VALUE=codes.global_attribute3 )
3750 )
3751
3752 UNION ALL
3753 SELECT
3754 DISTINCT
3755 codes.global_attribute4 global_attribute,
3756 types.reporting_type_code reporting_type_code,
3757 types.effective_from effective_from,
3758 types.reporting_type_id reporting_type_id,
3759 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3760 FROM
3761 zx_reporting_types_b types,
3762 ap_tax_codes_all codes
3763
3764 WHERE
3765 types.reporting_type_code = 'PT_ANL_TTL_TAXABLE_BOX'
3766 AND types.record_type_code = 'MIGRATED'
3767 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3768 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3769 AND codes.global_attribute4 IS NOT NULL
3770
3771 AND (NOT EXISTS
3772 (select 1 from zx_reporting_codes_b where
3773 reporting_type_code = types.reporting_type_code and
3774 REPORTING_CODE_CHAR_VALUE=codes.global_attribute4 )
3775 )
3776
3777 UNION ALL
3778 SELECT
3779 DISTINCT
3780 codes.global_attribute5 global_attribute,
3781 types.reporting_type_code l_reporting_type_code,
3782 types.effective_from effective_from,
3783 types.reporting_type_id reporting_type_id,
3784 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3785 FROM
3786 zx_reporting_types_b types,
3787 ap_tax_codes_all codes
3788
3789 WHERE
3790 types.reporting_type_code = 'PT_ANL_REC_TAXABLE'
3791 AND types.record_type_code = 'MIGRATED'
3792 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3793 AND codes.global_attribute5 IS NOT NULL
3794
3795
3796 AND (NOT EXISTS
3797 (select 1 from zx_reporting_codes_b where
3798 reporting_type_code = types.reporting_type_code and
3799 REPORTING_CODE_CHAR_VALUE=codes.global_attribute5 )
3800 )
3801
3802 UNION ALL
3803 SELECT
3804 DISTINCT
3805 codes.global_attribute6 global_attribute,
3806 types.reporting_type_code l_reporting_type_code,
3807 types.effective_from effective_from,
3808 types.reporting_type_id reporting_type_id,
3809 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3810 FROM
3811 zx_reporting_types_b types,
3812 ap_tax_codes_all codes
3813
3814 WHERE
3815 types.reporting_type_code = 'PT_ANL_NON_REC_TAXABLE'
3816 AND types.record_type_code = 'MIGRATED'
3817 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3818 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3819 AND codes.global_attribute6 IS NOT NULL
3820
3821
3822 AND (NOT EXISTS
3823 (select 1 from zx_reporting_codes_b where
3824 reporting_type_code = types.reporting_type_code and
3825 codes.global_attribute6 = REPORTING_CODE_CHAR_VALUE)
3826 )
3827
3828 UNION ALL
3829 SELECT
3830 DISTINCT
3831 codes.global_attribute7 global_attribute,
3832 types.reporting_type_code l_reporting_type_code,
3833 types.effective_from effective_from,
3834 types.reporting_type_id reporting_type_id,
3835 types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
3836 FROM
3837 zx_reporting_types_b types,
3838 ap_tax_codes_all codes
3839
3840 WHERE
3841 types.reporting_type_code = 'PT_ANL_REC_TAX_BOX'
3842 AND types.record_type_code = 'MIGRATED'
3843 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
3844 AND codes.global_attribute_category = 'JE.PT.APXTADTC.TAX_INFO'
3845 AND codes.global_attribute7 IS NOT NULL
3846
3847
3848 AND (NOT EXISTS
3849 (select 1 from zx_reporting_codes_b where
3850 reporting_type_code = types.reporting_type_code and
3851 codes.global_attribute7 = REPORTING_CODE_CHAR_VALUE)
3852 )
3853
3854 );
3855 */
3856
3857 -- Bug Fix 4671652
3858 -- Creation of reporting types for KR_BUSINESS_LOCATIONS
3859
3860 INSERT ALL
3861 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
3862 where reporting_type_code= 'KR_BUSINESS_LOCATIONS'
3863 and tax_regime_code = l_tax_regime_code
3864 )
3865 ) THEN
3866 INTO ZX_REPORTING_TYPES_B(
3867 REPORTING_TYPE_ID ,
3868 REPORTING_TYPE_CODE ,
3869 REPORTING_TYPE_DATATYPE_CODE ,
3870 TAX_REGIME_CODE ,
3871 TAX ,
3872 FORMAT_MASK ,
3873 MIN_LENGTH ,
3874 MAX_LENGTH ,
3875 LEGAL_MESSAGE_FLAG ,
3876 EFFECTIVE_FROM ,
3877 EFFECTIVE_TO ,
3878 RECORD_TYPE_CODE ,
3879 HAS_REPORTING_CODES_FLAG ,
3880 CREATED_BY ,
3881 CREATION_DATE ,
3882 LAST_UPDATED_BY ,
3883 LAST_UPDATE_DATE ,
3884 LAST_UPDATE_LOGIN ,
3885 REQUEST_ID ,
3886 PROGRAM_APPLICATION_ID ,
3887 PROGRAM_ID ,
3888 PROGRAM_LOGIN_ID ,
3889 OBJECT_VERSION_NUMBER
3890 )
3891 VALUES(
3892 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
3893 'KR_BUSINESS_LOCATIONS' ,--REPORTING_TYPE_CODE
3894 --'VARCHAR' ,--REPORTING_TYPE_DATATYPE
3895 'TEXT' ,--REPORTING_TYPE_DATATYPE (Bug6430516)
3896 l_tax_regime_code ,--TAX_REGIME_CODE
3897 NULL ,--TAX
3898 NULL ,--FORMAT_MASK
3899 1 ,--MIN_LENGTH
3900 30 ,--MAX_LENGTH
3901 'N' ,--LEGAL_MESSAGE_FLAG
3902 effective_from ,--EFFECTIVE_FROM
3903 NULL ,--EFFECTIVE_TO
3904 'MIGRATED' ,--RECORD_TYPE_CODE
3905 'Y' ,--HAS_REPORTING_CODES_FLAG
3906 fnd_global.user_id ,--CREATED_BY
3907 SYSDATE ,--CREATION_DATE
3908 fnd_global.user_id ,--LAST_UPDATED_BY
3909 SYSDATE ,--LAST_UPDATE_DATE
3910 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
3911 fnd_global.conc_request_id , -- Request Id
3912 fnd_global.prog_appl_id , -- Program Application ID
3913 fnd_global.conc_program_id , -- Program Id
3914 fnd_global.conc_login_id , -- Program Login ID
3915 1
3916 )
3917 SELECT
3918 min(zx_rates.effective_from) effective_from,
3919 zx_rates.tax_regime_code l_tax_regime_code
3920
3921 FROM
3922 ap_tax_codes_all ap_tax,
3923 zx_rates_b zx_rates
3924 WHERE
3925 ap_tax.tax_id = zx_rates.tax_rate_id
3926 AND ap_tax.global_attribute_category = 'JA.KR.APXTADTC.WITHHOLDING'
3927 AND zx_rates.record_type_code = 'MIGRATED'
3928 AND ap_tax.tax_id = nvl(p_tax_id, ap_tax.tax_id)
3929 GROUP BY
3930 zx_rates.tax_regime_code;
3931
3932 -- Bug Fix 4671652
3933 -- Creation of reporting codes for KR_BUSINESS_LOCATIONS
3934 INSERT ALL
3935 INTO
3936 ZX_REPORTING_CODES_B
3937 (
3938 REPORTING_CODE_ID ,
3939 EXCEPTION_CODE ,
3940 EFFECTIVE_FROM ,
3941 EFFECTIVE_TO ,
3942 RECORD_TYPE_CODE ,
3943 CREATED_BY ,
3944 CREATION_DATE ,
3945 LAST_UPDATED_BY ,
3946 LAST_UPDATE_DATE ,
3947 LAST_UPDATE_LOGIN,
3948 REQUEST_ID ,
3949 PROGRAM_APPLICATION_ID,
3950 PROGRAM_ID ,
3951 PROGRAM_LOGIN_ID ,
3952 REPORTING_CODE_CHAR_VALUE,
3953 REPORTING_CODE_DATE_VALUE,
3954 REPORTING_CODE_NUM_VALUE ,
3955 REPORTING_TYPE_ID ,
3956 OBJECT_VERSION_NUMBER
3957 )
3958 VALUES
3959 (
3960 ZX_REPORTING_CODES_B_S.NEXTVAL,
3961 NULL,
3962 l_start_date,
3963 NULL,
3964 'MIGRATED',
3965 FND_GLOBAL.USER_ID,
3966 SYSDATE,
3967 FND_GLOBAL.USER_ID,
3968 SYSDATE,
3969 fnd_global.conc_login_id ,
3970 fnd_global.conc_request_id , -- Request Id
3971 fnd_global.prog_appl_id , -- Program Application ID
3972 fnd_global.conc_program_id , -- Program Id
3973 fnd_global.conc_login_id , -- Program Login ID
3974 l_location_code,
3975 NULL,
3976 NULL,
3977 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = l_tax_regime_code
3978 and reporting_type_code = 'KR_BUSINESS_LOCATIONS'),
3979 1)
3980
3981 select
3982 distinct
3983 tax_id_values_and_codes.location_code l_location_code,
3984 zxrb.tax_regime_code l_tax_regime_code ,
3985 (SELECT min(r.effective_from) FROM zx_rates_b r WHERE r.tax_regime_code = zxrb.tax_regime_code) l_start_date
3986 from
3987 (
3988 select tax_id,hrloc.location_code location_code
3989 from ap_tax_codes_all aptax, hr_locations hrloc
3990 where aptax.global_attribute_category = 'JA.KR.APXTADTC.WITHHOLDING'
3991 and aptax.global_attribute1 = to_char(hrloc.location_id)
3992 ) tax_id_values_and_codes,
3993 zx_rates_b zxrb
3994 where zxrb.tax_rate_id = tax_id_values_and_codes.tax_id
3995 and tax_id_values_and_codes.tax_id = nvl(p_tax_id,tax_id_values_and_codes.tax_id)
3996 and tax_id_values_and_codes.location_code is not null
3997 and not exists
3998 ( select 1 from zx_reporting_codes_b where reporting_type_id =
3999 (select reporting_type_id FROM zx_reporting_types_b
4000 WHERE tax_regime_code = zxrb.tax_regime_code
4001 AND reporting_type_code = 'KR_BUSINESS_LOCATIONS')
4002 AND reporting_code_char_value = tax_id_values_and_codes.location_code);
4003
4004
4005 -- Bug Fix 4671652
4006 -- Creation of reporting codes associations for KR_BUSINESS_LOCATIONS
4007
4008
4009 INSERT
4010 INTO ZX_REPORT_CODES_ASSOC(
4011 REPORTING_CODE_ASSOC_ID,
4012 ENTITY_CODE ,
4013 ENTITY_ID ,
4014 REPORTING_TYPE_ID ,
4015 REPORTING_CODE_ID ,
4016 EXCEPTION_CODE ,
4017 EFFECTIVE_FROM ,
4018 EFFECTIVE_TO ,
4019 CREATED_BY ,
4020 CREATION_DATE ,
4021 LAST_UPDATED_BY ,
4022 LAST_UPDATE_DATE ,
4023 LAST_UPDATE_LOGIN ,
4024 REPORTING_CODE_CHAR_VALUE,
4025 REPORTING_CODE_DATE_VALUE,
4026 REPORTING_CODE_NUM_VALUE,
4027 OBJECT_VERSION_NUMBER
4028 )
4029 SELECT
4030 ZX_REPORT_CODES_ASSOC_S.nextval ,
4031 'ZX_RATES' ,--ENTITY_CODE
4032 TAX_RATE_ID ,--ENTITY_ID
4033 REPORTING_TYPE_ID ,
4034 REPORTING_CODE_ID ,
4035 NULL ,--EXCEPTION_CODE
4036 EFFECTIVE_FROM ,
4037 NULL ,--EFFECTIVE_TO
4038 fnd_global.user_id ,
4039 SYSDATE ,
4040 fnd_global.user_id ,
4041 SYSDATE ,
4042 fnd_global.conc_login_id ,
4043 REPORTING_CODE_CHAR_VALUE,
4044 REPORTING_CODE_DATE_VALUE,
4045 REPORTING_CODE_NUM_VALUE,
4046 1
4047 FROM
4048 (
4049 SELECT
4050 rates.TAX_RATE_ID TAX_RATE_ID,
4051 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
4052 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
4053 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
4054 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
4055 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
4056 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
4057 FROM
4058 AP_TAX_CODES_ALL codes,
4059 HR_LOCATIONS hrloc,
4060 ZX_RATES_B rates,
4061 ZX_REPORTING_TYPES_B reporting_types,
4062 ZX_REPORTING_CODES_B report_codes
4063 WHERE
4064 codes.tax_id = rates.tax_rate_id
4065 AND codes.tax_id = nvl(p_tax_id,codes.tax_id)
4066 AND codes.global_attribute1 = TO_CHAR(hrloc.location_id)
4067 AND codes.global_attribute_category = 'JA.KR.APXTADTC.WITHHOLDING'
4068 AND hrloc.location_code = report_codes.REPORTING_CODE_CHAR_VALUE
4069 AND rates.record_type_code = 'MIGRATED'
4070 AND rates.tax_regime_code = reporting_types.tax_regime_code
4071 AND reporting_types.reporting_type_code = 'KR_BUSINESS_LOCATIONS'
4072 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
4073 AND report_codes.record_type_code = 'MIGRATED'
4074
4075 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
4076 where entity_code = 'ZX_RATES'
4077 and entity_id = rates.tax_rate_id
4078 and reporting_type_id =
4079 report_codes.reporting_type_id)
4080 );
4081
4082
4083 IF PG_DEBUG = 'Y' THEN
4084 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES_AP(-)');
4085 END IF;
4086
4087 END CREATE_ZX_REP_TYPE_CODES_AP;
4088
4089
4090 /* Used to create the reporting type and code for AR */
4091
4092 PROCEDURE CREATE_ZX_REP_TYPE_CODES_AR(p_tax_id IN NUMBER ) IS
4093 --l_lookup_code ZX_REPORTING_CODES_B.REPORTING_CODE_CHAR_VALUE%TYPE ; -- Bug 4874049
4094 l_exists_cnt NUMBER ; --Bug 5344337
4095 BEGIN
4096
4097 IF PG_DEBUG = 'Y' THEN
4098 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES_AR(+)');
4099 END IF;
4100
4101 -- Call a common procedure to create a reporting types.
4102 CREATE_REPORTING_TYPE_AR('CL_BILLS_OF_EXCH_TAX','YES_NO','N', 'JL.CL.ARXSUVAT.VAT_TAX', p_tax_id);
4103 CREATE_REPORTING_TYPE_AR('CL_TAX_CODE_CLASSIF','TEXT','Y', 'JL.CL.ARXSUVAT.VAT_TAX', p_tax_id);
4104
4105 CREATE_REPORTING_TYPE_AR('PRINT TAX LINE','YES_NO','N','JL.AR.ARXSUVAT.AR_VAT_TAX', p_tax_id);
4106 CREATE_REPORTING_TYPE_AR('PRINT TAX LINE','YES_NO','N','JL.BR.ARXSUVAT.Tax Information', p_tax_id);
4107 CREATE_REPORTING_TYPE_AR('PRINT TAX LINE','YES_NO','N','JL.CO.ARXSUVAT.AR_VAT_TAX', p_tax_id);
4108
4109 -- For Korea
4110 CREATE_REPORTING_TYPE_AR('KR_LOCATION','TEXT','Y', 'JA.KR.ARXSUVAT.VAT', p_tax_id);
4111
4112
4113 --Bug# 4952838
4114 CREATE_REPORTING_TYPE_AR('CZ_TAX_ORIGIN','TEXT','Y', 'JE.CZ.ARXSUVAT.TAX_ORIGIN', p_tax_id);
4115
4116 CREATE_REPORTING_TYPE_AR('HU_TAX_ORIGIN','TEXT','Y', 'JE.HU.ARXSUVAT.TAX_ORIGIN', p_tax_id);
4117
4118 CREATE_REPORTING_TYPE_AR('PL_TAX_ORIGIN','TEXT','Y', 'JE.PL.ARXSUVAT.TAX_ORIGIN', p_tax_id);
4119
4120 CREATE_REPORTING_TYPE_AR('TW_GOVERNMENT_TAX_TYPE','TEXT','Y', 'JA.TW.ARXSUVAT.VAT_TAX', p_tax_id);
4121
4122 CREATE_REPORTING_TYPE_AR('CL_DEBIT_ACCOUNT','TEXT','N', 'JL.CL.ARXSUVAT.VAT_TAX', p_tax_id);
4123
4124 /* In the above methods, we are using different context (global attribute category) to insert into
4125 reporting types. But in the below insert all we are using same context for all the reporting types.
4126 Hence we are using bulk insert only for the same context case. */
4127
4128 INSERT ALL
4129 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4130 where reporting_type_code='PT_LOCATION'
4131 and tax_regime_code = l_tax_regime_code)
4132 ) THEN
4133 INTO
4134 ZX_REPORTING_TYPES_B(
4135 REPORTING_TYPE_ID ,
4136 REPORTING_TYPE_CODE ,
4137 REPORTING_TYPE_DATATYPE_CODE ,
4138 TAX_REGIME_CODE ,
4139 TAX ,
4140 FORMAT_MASK ,
4141 MIN_LENGTH ,
4142 MAX_LENGTH ,
4143 LEGAL_MESSAGE_FLAG ,
4144 EFFECTIVE_FROM ,
4148 HAS_REPORTING_CODES_FLAG ,
4145 EFFECTIVE_TO ,
4146 RECORD_TYPE_CODE ,
4147 --BugFix 3566148
4149 CREATED_BY ,
4150 CREATION_DATE ,
4151 LAST_UPDATED_BY ,
4152 LAST_UPDATE_DATE ,
4153 LAST_UPDATE_LOGIN ,
4154 REQUEST_ID ,
4155 PROGRAM_APPLICATION_ID ,
4156 PROGRAM_ID ,
4157 PROGRAM_LOGIN_ID ,
4158 OBJECT_VERSION_NUMBER
4159 )
4160 VALUES(
4161 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s'),--REPORTING_TYPE_ID
4162 'PT_LOCATION' ,--REPORTING_TYPE_CODE
4163 'TEXT' ,--REPORTING_TYPE_DATATYPE
4164 l_tax_regime_code ,
4165 NULL ,--TAX
4166 NULL ,--FORMAT_MASK
4167 1 ,--MIN_LENGTH
4168 30 ,--MAX_LENGTH
4169 'N' ,--LEGAL_MESSAGE_FLAG
4170 effective_from ,
4171 NULL ,--EFFECTIVE_TO
4172 'MIGRATED' ,--RECORD_TYPE_CODE
4173 'Y' ,
4174 fnd_global.user_id ,
4175 SYSDATE ,
4176 fnd_global.user_id ,
4177 SYSDATE ,
4178 fnd_global.conc_login_id ,
4179 fnd_global.conc_request_id , -- Request Id
4180 fnd_global.prog_appl_id , -- Program Application ID
4181 fnd_global.conc_program_id , -- Program Id
4182 fnd_global.conc_login_id , -- Program Login ID
4183 1
4184 )
4185 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4186 where reporting_type_code='PT_PRD_TAXABLE_BOX'
4187 and tax_regime_code = l_tax_regime_code)
4188 ) THEN
4189 INTO ZX_REPORTING_TYPES_B(
4190 REPORTING_TYPE_ID ,
4191 REPORTING_TYPE_CODE ,
4192 REPORTING_TYPE_DATATYPE_CODE ,
4193 TAX_REGIME_CODE ,
4194 TAX ,
4195 FORMAT_MASK ,
4196 MIN_LENGTH ,
4197 MAX_LENGTH ,
4198 LEGAL_MESSAGE_FLAG ,
4199 EFFECTIVE_FROM ,
4200 EFFECTIVE_TO ,
4201 RECORD_TYPE_CODE ,
4202 --BugFix 3566148
4203 HAS_REPORTING_CODES_FLAG ,
4204 CREATED_BY ,
4205 CREATION_DATE ,
4206 LAST_UPDATED_BY ,
4207 LAST_UPDATE_DATE ,
4208 LAST_UPDATE_LOGIN ,
4209 REQUEST_ID ,
4210 PROGRAM_APPLICATION_ID ,
4211 PROGRAM_ID ,
4212 PROGRAM_LOGIN_ID ,
4213 OBJECT_VERSION_NUMBER
4214 )
4215 VALUES(
4216 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4217 'PT_PRD_TAXABLE_BOX' ,--REPORTING_TYPE_CODE
4218 'TEXT' ,--REPORTING_TYPE_DATATYPE
4219 l_tax_regime_code ,
4220 NULL ,--TAX
4221 NULL ,--FORMAT_MASK
4222 1 ,--MIN_LENGTH
4223 30 ,--MAX_LENGTH
4224 'N' ,--LEGAL_MESSAGE_FLAG
4225 effective_from ,
4226 NULL ,--EFFECTIVE_TO
4227 'MIGRATED' ,--RECORD_TYPE_CODE
4228 'N' ,
4229 fnd_global.user_id ,
4230 SYSDATE ,
4231 fnd_global.user_id ,
4232 SYSDATE ,
4233 fnd_global.conc_login_id ,
4234 fnd_global.conc_request_id , -- Request Id
4235 fnd_global.prog_appl_id , -- Program Application ID
4236 fnd_global.conc_program_id , -- Program Id
4237 fnd_global.conc_login_id , -- Program Login ID
4238 1
4239 )
4240 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4241 where reporting_type_code='PT_PRD_REC_TAX_BOX'
4242 and tax_regime_code = l_tax_regime_code)
4243 ) THEN
4244 INTO ZX_REPORTING_TYPES_B(
4245 REPORTING_TYPE_ID ,
4246 REPORTING_TYPE_CODE ,
4247 REPORTING_TYPE_DATATYPE_CODE ,
4248 TAX_REGIME_CODE ,
4249 TAX ,
4250 FORMAT_MASK ,
4251 MIN_LENGTH ,
4252 MAX_LENGTH ,
4253 LEGAL_MESSAGE_FLAG ,
4254 EFFECTIVE_FROM ,
4255 EFFECTIVE_TO ,
4256 RECORD_TYPE_CODE ,
4257 --BugFix 3566148
4258 HAS_REPORTING_CODES_FLAG ,
4259 CREATED_BY ,
4260 CREATION_DATE ,
4261 LAST_UPDATED_BY ,
4265 PROGRAM_APPLICATION_ID ,
4262 LAST_UPDATE_DATE ,
4263 LAST_UPDATE_LOGIN ,
4264 REQUEST_ID ,
4266 PROGRAM_ID ,
4267 PROGRAM_LOGIN_ID ,
4268 OBJECT_VERSION_NUMBER
4269 )
4270 VALUES(
4271 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4272 'PT_PRD_REC_TAX_BOX' ,--REPORTING_TYPE_CODE
4273 'TEXT' ,--REPORTING_TYPE_DATATYPE
4274 l_tax_regime_code ,
4275 NULL ,--TAX
4276 NULL ,--FORMAT_MASK
4277 1 ,--MIN_LENGTH
4278 30 ,--MAX_LENGTH
4279 'N' ,--LEGAL_MESSAGE_FLAG
4280 effective_from ,
4281 NULL ,--EFFECTIVE_TO
4282 'MIGRATED' ,--RECORD_TYPE_CODE
4283 'N' ,
4284 fnd_global.user_id ,
4285 SYSDATE ,
4286 fnd_global.user_id ,
4287 SYSDATE ,
4288 fnd_global.conc_login_id ,
4289 fnd_global.conc_request_id , -- Request Id
4290 fnd_global.prog_appl_id , -- Program Application ID
4291 fnd_global.conc_program_id , -- Program Id
4292 fnd_global.conc_login_id , -- Program Login ID
4293 1
4294 )
4295 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4296 where reporting_type_code='PT_ANL_TTL_TAXABLE_BOX'
4297 and tax_regime_code = l_tax_regime_code)
4298 ) THEN
4299 INTO ZX_REPORTING_TYPES_B(
4300 REPORTING_TYPE_ID ,
4301 REPORTING_TYPE_CODE ,
4302 REPORTING_TYPE_DATATYPE_CODE ,
4303 TAX_REGIME_CODE ,
4304 TAX ,
4305 FORMAT_MASK ,
4306 MIN_LENGTH ,
4307 MAX_LENGTH ,
4308 LEGAL_MESSAGE_FLAG ,
4309 EFFECTIVE_FROM ,
4310 EFFECTIVE_TO ,
4311 RECORD_TYPE_CODE ,
4312 --BugFix 3566148
4313 HAS_REPORTING_CODES_FLAG ,
4314 CREATED_BY ,
4315 CREATION_DATE ,
4316 LAST_UPDATED_BY ,
4317 LAST_UPDATE_DATE ,
4318 LAST_UPDATE_LOGIN ,
4319 REQUEST_ID ,
4320 PROGRAM_APPLICATION_ID ,
4321 PROGRAM_ID ,
4322 PROGRAM_LOGIN_ID ,
4323 OBJECT_VERSION_NUMBER
4324 )
4325 VALUES(
4326 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4327 'PT_ANL_TTL_TAXABLE_BOX' ,--REPORTING_TYPE_CODE
4328 'TEXT' ,--REPORTING_TYPE_DATATYPE
4329 l_tax_regime_code ,
4330 NULL ,--TAX
4331 NULL ,--FORMAT_MASK
4332 1 ,--MIN_LENGTH
4333 30 ,--MAX_LENGTH
4334 'N' ,--LEGAL_MESSAGE_FLAG
4335 effective_from ,
4336 NULL ,--EFFECTIVE_TO
4337 'MIGRATED' ,--RECORD_TYPE_CODE
4338 'N' ,
4339 fnd_global.user_id ,
4340 SYSDATE ,
4341 fnd_global.user_id ,
4342 SYSDATE ,
4343 fnd_global.conc_login_id ,
4344 fnd_global.conc_request_id , -- Request Id
4345 fnd_global.prog_appl_id , -- Program Application ID
4346 fnd_global.conc_program_id , -- Program Id
4347 fnd_global.conc_login_id , -- Program Login ID
4348 1
4349 )
4350 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4351 where reporting_type_code='PT_ANL_REC_TAXABLE' -- Bug 5031787
4352 and tax_regime_code = l_tax_regime_code)
4353 ) THEN
4354 INTO ZX_REPORTING_TYPES_B(
4355 REPORTING_TYPE_ID ,
4356 REPORTING_TYPE_CODE ,
4357 REPORTING_TYPE_DATATYPE_CODE ,
4358 TAX_REGIME_CODE ,
4359 TAX ,
4360 FORMAT_MASK ,
4361 MIN_LENGTH ,
4362 MAX_LENGTH ,
4363 LEGAL_MESSAGE_FLAG ,
4364 EFFECTIVE_FROM ,
4365 EFFECTIVE_TO ,
4366 RECORD_TYPE_CODE ,
4367 --BugFix 3566148
4368 HAS_REPORTING_CODES_FLAG ,
4369 CREATED_BY ,
4370 CREATION_DATE ,
4371 LAST_UPDATED_BY ,
4372 LAST_UPDATE_DATE ,
4373 LAST_UPDATE_LOGIN ,
4374 REQUEST_ID ,
4375 PROGRAM_APPLICATION_ID ,
4376 PROGRAM_ID ,
4377 PROGRAM_LOGIN_ID ,
4378 OBJECT_VERSION_NUMBER
4379 )
4380 VALUES(
4381 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4382 'PT_ANL_REC_TAXABLE' ,--REPORTING_TYPE_CODE
4383 'TEXT' ,--REPORTING_TYPE_DATATYPE
4384 l_tax_regime_code ,
4385 NULL ,--TAX
4386 NULL ,--FORMAT_MASK
4387 1 ,--MIN_LENGTH
4388 30 ,--MAX_LENGTH
4389 'N' ,--LEGAL_MESSAGE_FLAG
4390 effective_from ,
4391 NULL ,--EFFECTIVE_TO
4392 'MIGRATED' ,--RECORD_TYPE_CODE
4393 'N' ,
4394 fnd_global.user_id ,
4395 SYSDATE ,
4396 fnd_global.user_id ,
4397 SYSDATE ,
4398 fnd_global.conc_login_id ,
4399 fnd_global.conc_request_id , -- Request Id
4400 fnd_global.prog_appl_id , -- Program Application ID
4401 fnd_global.conc_program_id , -- Program Id
4402 fnd_global.conc_login_id , -- Program Login ID
4403 1
4404 )
4405 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4406 where reporting_type_code='PT_ANL_NON_REC_TAXABLE'
4407 and tax_regime_code = l_tax_regime_code)
4408 ) THEN
4409 INTO ZX_REPORTING_TYPES_B(
4410 REPORTING_TYPE_ID ,
4411 REPORTING_TYPE_CODE ,
4412 REPORTING_TYPE_DATATYPE_CODE ,
4413 TAX_REGIME_CODE ,
4414 TAX ,
4415 FORMAT_MASK ,
4416 MIN_LENGTH ,
4417 MAX_LENGTH ,
4418 LEGAL_MESSAGE_FLAG ,
4419 EFFECTIVE_FROM ,
4420 EFFECTIVE_TO ,
4421 RECORD_TYPE_CODE ,
4422 --BugFix 3566148
4423 HAS_REPORTING_CODES_FLAG ,
4424 CREATED_BY ,
4425 CREATION_DATE ,
4426 LAST_UPDATED_BY ,
4427 LAST_UPDATE_DATE ,
4428 LAST_UPDATE_LOGIN ,
4429 REQUEST_ID ,
4430 PROGRAM_APPLICATION_ID ,
4431 PROGRAM_ID ,
4432 PROGRAM_LOGIN_ID ,
4433 OBJECT_VERSION_NUMBER
4434 )
4435 VALUES(
4436 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4437 'PT_ANL_NON_REC_TAXABLE' ,--REPORTING_TYPE_CODE
4438 'TEXT' ,--REPORTING_TYPE_DATATYPE
4439 l_tax_regime_code ,
4440 NULL ,--TAX
4441 NULL ,--FORMAT_MASK
4442 1 ,--MIN_LENGTH
4443 30 ,--MAX_LENGTH
4444 'N' ,--LEGAL_MESSAGE_FLAG
4445 effective_from ,
4446 NULL ,--EFFECTIVE_TO
4447 'MIGRATED' ,--RECORD_TYPE_CODE
4448 'N' ,
4449 fnd_global.user_id ,
4450 SYSDATE ,
4451 fnd_global.user_id ,
4452 SYSDATE ,
4453 fnd_global.conc_login_id ,
4454 fnd_global.conc_request_id , -- Request Id
4455 fnd_global.prog_appl_id , -- Program Application ID
4456 fnd_global.conc_program_id , -- Program Id
4457 fnd_global.conc_login_id , -- Program Login ID
4458 1
4459 )
4460 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4461 where reporting_type_code='PT_ANL_REC_TAX_BOX' -- Bug 5031787
4462 and tax_regime_code = l_tax_regime_code)
4463 ) THEN
4464 INTO ZX_REPORTING_TYPES_B(
4465 REPORTING_TYPE_ID ,
4466 REPORTING_TYPE_CODE ,
4467 REPORTING_TYPE_DATATYPE_CODE ,
4468 TAX_REGIME_CODE ,
4469 TAX ,
4470 FORMAT_MASK ,
4471 MIN_LENGTH ,
4472 MAX_LENGTH ,
4473 LEGAL_MESSAGE_FLAG ,
4474 EFFECTIVE_FROM ,
4475 EFFECTIVE_TO ,
4476 RECORD_TYPE_CODE ,
4477 --BugFix 3566148
4478 HAS_REPORTING_CODES_FLAG ,
4479 CREATED_BY ,
4480 CREATION_DATE ,
4481 LAST_UPDATED_BY ,
4482 LAST_UPDATE_DATE ,
4483 LAST_UPDATE_LOGIN ,
4484 REQUEST_ID ,
4485 PROGRAM_APPLICATION_ID ,
4486 PROGRAM_ID ,
4487 PROGRAM_LOGIN_ID ,
4488 OBJECT_VERSION_NUMBER
4489 )
4490 VALUES(
4491 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4492 'PT_ANL_REC_TAX_BOX' ,--REPORTING_TYPE_CODE
4493 'TEXT' ,--REPORTING_TYPE_DATATYPE
4494 l_tax_regime_code ,
4495 NULL ,--TAX
4496 NULL ,--FORMAT_MASK
4497 1 ,--MIN_LENGTH
4498 30 ,--MAX_LENGTH
4499 'N' ,--LEGAL_MESSAGE_FLAG
4500 effective_from ,
4501 NULL ,--EFFECTIVE_TO
4502 'MIGRATED' ,--RECORD_TYPE_CODE
4503 'N' ,
4504 fnd_global.user_id ,
4505 SYSDATE ,
4506 fnd_global.user_id ,
4507 SYSDATE ,
4508 fnd_global.conc_login_id ,
4509 fnd_global.conc_request_id , -- Request Id
4510 fnd_global.prog_appl_id , -- Program Application ID
4511 fnd_global.conc_program_id , -- Program Id
4512 fnd_global.conc_login_id , -- Program Login ID
4513 1
4514 )
4515
4516 SELECT
4517 min(zx_rates.effective_from) effective_from,
4518 zx_rates.tax_regime_code l_tax_regime_code
4519 FROM
4520 AR_VAT_TAX_ALL_B vat_tax,
4521 zx_rates_b zx_rates
4522 WHERE
4523 vat_tax.vat_tax_id = zx_rates.tax_rate_id
4524 AND vat_tax.vat_tax_id = nvl(p_tax_id, vat_tax.vat_tax_id)
4525 AND vat_tax.global_attribute_category = 'JE.PT.ARXSUVAT.TAX_INFO'
4526 AND zx_rates.record_type_code = 'MIGRATED'
4527
4528 GROUP BY
4529 zx_rates.tax_regime_code;
4530
4531
4532 INSERT ALL
4533 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4534 where reporting_type_code='AR_DGI_TRX_CODE'
4535 and tax_regime_code = l_tax_regime_code)
4536 ) THEN
4537 INTO ZX_REPORTING_TYPES_B(
4538 REPORTING_TYPE_ID ,
4539 REPORTING_TYPE_CODE ,
4540 REPORTING_TYPE_DATATYPE_CODE ,
4541 TAX_REGIME_CODE ,
4542 TAX ,
4543 FORMAT_MASK ,
4544 MIN_LENGTH ,
4545 MAX_LENGTH ,
4546 LEGAL_MESSAGE_FLAG ,
4547 EFFECTIVE_FROM ,
4548 EFFECTIVE_TO ,
4549 RECORD_TYPE_CODE ,
4550 HAS_REPORTING_CODES_FLAG ,
4551 CREATED_BY ,
4552 CREATION_DATE ,
4553 LAST_UPDATED_BY ,
4554 LAST_UPDATE_DATE ,
4555 LAST_UPDATE_LOGIN ,
4556 REQUEST_ID ,
4557 PROGRAM_APPLICATION_ID ,
4558 PROGRAM_ID ,
4559 PROGRAM_LOGIN_ID ,
4560 OBJECT_VERSION_NUMBER
4561 )
4562 VALUES(
4563 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4564 'AR_DGI_TRX_CODE' ,--REPORTING_TYPE_CODE
4565 'TEXT' ,--REPORTING_TYPE_DATATYPE
4566 l_tax_regime_code ,
4567 NULL ,--TAX
4568 NULL ,--FORMAT_MASK
4569 1 ,--MIN_LENGTH
4570 30 ,--MAX_LENGTH
4571 'N' ,--LEGAL_MESSAGE_FLAG
4572 effective_from ,
4573 NULL ,--EFFECTIVE_TO
4574 'MIGRATED' ,--RECORD_TYPE_CODE
4575 'Y' ,
4576 fnd_global.user_id ,
4577 SYSDATE ,
4578 fnd_global.user_id ,
4579 SYSDATE ,
4580 fnd_global.conc_login_id ,
4581 fnd_global.conc_request_id , -- Request Id
4582 fnd_global.prog_appl_id , -- Program Application ID
4583 fnd_global.conc_program_id , -- Program Id
4584 fnd_global.conc_login_id , -- Program Login ID
4585 1
4586 )
4587
4588 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4589 where reporting_type_code='AR_MUNICIPAL_JUR'
4590 and tax_regime_code = l_tax_regime_code)
4591 ) THEN
4592 INTO ZX_REPORTING_TYPES_B(
4593 REPORTING_TYPE_ID ,
4594 REPORTING_TYPE_CODE ,
4595 REPORTING_TYPE_DATATYPE_CODE ,
4596 TAX_REGIME_CODE ,
4597 TAX ,
4598 FORMAT_MASK ,
4599 MIN_LENGTH ,
4600 MAX_LENGTH ,
4601 LEGAL_MESSAGE_FLAG ,
4602 EFFECTIVE_FROM ,
4603 EFFECTIVE_TO ,
4604 RECORD_TYPE_CODE ,
4605 HAS_REPORTING_CODES_FLAG ,
4606 CREATED_BY ,
4607 CREATION_DATE ,
4608 LAST_UPDATED_BY ,
4609 LAST_UPDATE_DATE ,
4610 LAST_UPDATE_LOGIN ,
4611 REQUEST_ID ,
4612 PROGRAM_APPLICATION_ID ,
4613 PROGRAM_ID ,
4614 PROGRAM_LOGIN_ID ,
4615 OBJECT_VERSION_NUMBER
4616 )
4617 VALUES(
4618 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4619 'AR_MUNICIPAL_JUR' ,--REPORTING_TYPE_CODE
4620 'TEXT' ,--REPORTING_TYPE_DATATYPE
4621 l_tax_regime_code ,
4622 NULL ,--TAX
4623 NULL ,--FORMAT_MASK
4624 1 ,--MIN_LENGTH
4625 30 ,--MAX_LENGTH
4626 'N' ,--LEGAL_MESSAGE_FLAG
4627 effective_from ,
4628 NULL ,--EFFECTIVE_TO
4629 'MIGRATED' ,--RECORD_TYPE_CODE
4630 'N' ,
4631 fnd_global.user_id ,
4632 SYSDATE ,
4633 fnd_global.user_id ,
4634 SYSDATE ,
4635 fnd_global.conc_login_id ,
4636 fnd_global.conc_request_id , -- Request Id
4637 fnd_global.prog_appl_id , -- Program Application ID
4638 fnd_global.conc_program_id , -- Program Id
4639 fnd_global.conc_login_id , -- Program Login ID
4640 1
4641 )
4642
4643 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4644 where reporting_type_code='AR_TURN_OVER_JUR_CODE'
4645 and tax_regime_code = l_tax_regime_code)
4646 ) THEN
4647 INTO ZX_REPORTING_TYPES_B(
4648 REPORTING_TYPE_ID ,
4649 REPORTING_TYPE_CODE ,
4650 REPORTING_TYPE_DATATYPE_CODE ,
4651 TAX_REGIME_CODE ,
4652 TAX ,
4653 FORMAT_MASK ,
4654 MIN_LENGTH ,
4655 MAX_LENGTH ,
4656 LEGAL_MESSAGE_FLAG ,
4657 EFFECTIVE_FROM ,
4658 EFFECTIVE_TO ,
4659 RECORD_TYPE_CODE ,
4660 HAS_REPORTING_CODES_FLAG ,
4661 CREATED_BY ,
4662 CREATION_DATE ,
4663 LAST_UPDATED_BY ,
4664 LAST_UPDATE_DATE ,
4665 LAST_UPDATE_LOGIN ,
4666 REQUEST_ID ,
4667 PROGRAM_APPLICATION_ID ,
4668 PROGRAM_ID ,
4669 PROGRAM_LOGIN_ID ,
4670 OBJECT_VERSION_NUMBER
4671 )
4672 VALUES(
4673 zx_migrate_util.get_next_seqid('zx_reporting_types_b_s') ,--REPORTING_TYPE_ID
4674 'AR_TURN_OVER_JUR_CODE' ,--REPORTING_TYPE_CODE
4675 'TEXT' ,--REPORTING_TYPE_DATATYPE
4676 l_tax_regime_code ,
4677 NULL ,--TAX
4678 NULL ,--FORMAT_MASK
4679 1 ,--MIN_LENGTH
4680 30 ,--MAX_LENGTH
4681 'N' ,--LEGAL_MESSAGE_FLAG
4682 effective_from ,
4683 NULL ,--EFFECTIVE_TO
4684 'MIGRATED' ,--RECORD_TYPE_CODE
4685 'Y' ,
4686 fnd_global.user_id ,
4687 SYSDATE ,
4688 fnd_global.user_id ,
4689 SYSDATE ,
4690 fnd_global.conc_login_id ,
4691 fnd_global.conc_request_id , -- Request Id
4692 fnd_global.prog_appl_id , -- Program Application ID
4693 fnd_global.conc_program_id , -- Program Id
4694 fnd_global.conc_login_id , -- Program Login ID
4695 1
4696 )
4697
4698 SELECT
4699 min(zx_rates.effective_from) effective_from,
4700 zx_rates.tax_regime_code l_tax_regime_code
4701 FROM
4702 AR_VAT_TAX_ALL_B codes,
4703 zx_rates_b zx_rates
4704 WHERE
4705 codes.vat_tax_id = zx_rates.tax_rate_id
4706 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
4707 AND codes.global_attribute_category = 'JL.AR.ARXSUVAT.AR_VAT_TAX'
4708 AND zx_rates.record_type_code = 'MIGRATED'
4709
4710 GROUP BY
4711 zx_rates.tax_regime_code;
4712 --Bug 4705196
4713 /*
4714 --Bug 4422813
4715 --The creation of zx_reporting_types_b , zx_reporting_codes_b and zx_reporting_codes_tl has been put together for
4716 --easy understanding
4717
4718 INSERT ALL
4719 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4720 where reporting_type_code= 'PRINTED_TAX_RATE_NAME'
4721 and tax_regime_code = l_tax_regime_code
4722 )
4723 ) THEN
4724 INTO ZX_REPORTING_TYPES_B(
4725 REPORTING_TYPE_ID ,
4726 REPORTING_TYPE_CODE ,
4727 REPORTING_TYPE_DATATYPE_CODE ,
4728 TAX_REGIME_CODE ,
4729 TAX ,
4730 FORMAT_MASK ,
4731 MIN_LENGTH ,
4732 MAX_LENGTH ,
4733 LEGAL_MESSAGE_FLAG ,
4734 EFFECTIVE_FROM ,
4735 EFFECTIVE_TO ,
4736 RECORD_TYPE_CODE ,
4737 HAS_REPORTING_CODES_FLAG ,
4741 LAST_UPDATE_DATE ,
4738 CREATED_BY ,
4739 CREATION_DATE ,
4740 LAST_UPDATED_BY ,
4742 LAST_UPDATE_LOGIN ,
4743 REQUEST_ID ,
4744 PROGRAM_APPLICATION_ID ,
4745 PROGRAM_ID ,
4746 PROGRAM_LOGIN_ID ,
4747 OBJECT_VERSION_NUMBER
4748 )
4749 VALUES(
4750 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
4751 'PRINTED_TAX_RATE_NAME' ,--REPORTING_TYPE_CODE
4752 'VARCHAR' , --REPORTING_TYPE_DATATYPE
4753 l_tax_regime_code ,
4754 NULL ,--TAX
4755 NULL ,--FORMAT_MASK
4756 1 ,--MIN_LENGTH
4757 30 ,--MAX_LENGTH
4758 'N' ,--LEGAL_MESSAGE_FLAG ?? What should this be
4759 effective_from ,
4760 NULL ,--EFFECTIVE_TO
4761 'MIGRATED' ,--RECORD_TYPE_CODE
4762 'Y' ,--HAS_REPORTING_CODES_FLAG
4763 fnd_global.user_id ,
4764 SYSDATE ,
4765 fnd_global.user_id ,
4766 SYSDATE ,
4767 fnd_global.conc_login_id ,
4768 fnd_global.conc_request_id , -- Request Id
4769 fnd_global.prog_appl_id , -- Program Application ID
4770 fnd_global.conc_program_id , -- Program Id
4771 fnd_global.conc_login_id , -- Program Login ID
4772 1
4773 )
4774 SELECT
4775 min(zx_rates.effective_from) effective_from,
4776 zx_rates.tax_regime_code l_tax_regime_code
4777
4778 FROM
4779 ar_vat_tax_all_b vat_tax,
4780 zx_rates_b zx_rates
4781 WHERE
4782 vat_tax.vat_tax_id = zx_rates.tax_rate_id
4783 AND zx_rates.record_type_code = 'MIGRATED'
4784 AND vat_tax.vat_tax_id = nvl(p_tax_id, vat_tax.vat_tax_id)
4785 GROUP BY
4786 zx_rates.tax_regime_code;
4787
4788
4789 declare
4790 l_language_code varchar2(30);
4791 l_seqid number;
4792 begin
4793 select nvl(language_code,'US') into l_language_code from FND_LANGUAGES where installed_flag = 'B' ;
4794
4795
4796 for cursor_rec in
4797 (select vat_tax_id from ar_vat_tax_all_b )
4798
4799
4800 LOOP
4801 select zx_reporting_codes_b_s.nextval into l_seqid from dual;
4802
4803 INSERT ALL
4804 INTO
4805 ZX_REPORTING_CODES_B
4806 (
4807 REPORTING_CODE_ID ,
4808 EXCEPTION_CODE ,
4809 EFFECTIVE_FROM ,
4810 EFFECTIVE_TO ,
4811 RECORD_TYPE_CODE ,
4812 CREATED_BY ,
4813 CREATION_DATE ,
4814 LAST_UPDATED_BY ,
4815 LAST_UPDATE_DATE ,
4816 LAST_UPDATE_LOGIN,
4817 REQUEST_ID ,
4818 PROGRAM_APPLICATION_ID,
4819 PROGRAM_ID ,
4820 PROGRAM_LOGIN_ID ,
4821 REPORTING_CODE_CHAR_VALUE,
4822 REPORTING_CODE_DATE_VALUE,
4823 REPORTING_CODE_NUM_VALUE ,
4824 REPORTING_TYPE_ID ,
4825 OBJECT_VERSION_NUMBER
4826 )
4827 VALUES
4828 (
4829 l_seqid,
4830 NULL,
4831 l_start_date,
4832 NULL,
4833 'MIGRATED',
4834 FND_GLOBAL.USER_ID,
4835 SYSDATE,
4836 FND_GLOBAL.USER_ID,
4837 SYSDATE,
4838 fnd_global.conc_login_id ,
4839 fnd_global.conc_request_id , -- Request Id
4840 fnd_global.prog_appl_id , -- Program Application ID
4841 fnd_global.conc_program_id , -- Program Id
4842 fnd_global.conc_login_id , -- Program Login ID
4843 printed_tax_name,
4844 NULL,
4845 NULL,
4846 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = l_tax_regime_code
4847 and reporting_type_code = 'PRINTED_TAX_RATE_NAME'),
4848 1)
4849
4850 (select
4851 printed_tax_name ,
4852 zxrb.tax_regime_code l_tax_regime_code ,
4853 zxrb.effective_from l_start_date
4854 from ar_vat_tax_all_tl avtl ,
4855 zx_rates_b zxrb
4856 where zxrb.tax_rate_id = cursor_rec.vat_tax_id
4857 and zxrb.tax_rate_id = avtl.vat_tax_id
4858 and language = l_language_code
4859 and printed_tax_name is not null
4860 and not exists
4861 ( select 1 from zx_reporting_codes_b where reporting_type_id =
4862 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = zxrb.tax_regime_code
4863 and reporting_type_code = 'PRINTED_TAX_RATE_NAME')
4864 and reporting_code_char_value = printed_tax_name)
4865 );
4866
4867
4868
4869 INSERT ALL
4870 INTO
4871 ZX_REPORTING_CODES_TL
4872 (
4873 REPORTING_CODE_ID ,
4874 LANGUAGE ,
4875 SOURCE_LANG ,
4876 REPORTING_CODE_NAME,
4877 CREATED_BY ,
4878 CREATION_DATE ,
4879 LAST_UPDATED_BY ,
4880 LAST_UPDATE_DATE ,
4881 LAST_UPDATE_LOGIN
4882 )
4883 VALUES
4884 (
4885 l_seqid,
4886 l_language,
4887 l_source_lang,
4888 CASE WHEN l_printed_tax_name = UPPER(l_printed_tax_name)
4889 THEN Initcap(l_printed_tax_name)
4890 ELSE
4891 l_printed_tax_name
4892 END,
4893 fnd_global.user_id,
4894 sysdate,
4895 fnd_global.user_id,
4896 sysdate,
4897 fnd_global.conc_login_id
4898 )
4899 SELECT
4900 avtl.language l_language,
4904 from
4901 avtl.source_lang l_source_lang,
4902 avtl.printed_tax_name l_printed_tax_name
4903
4905 ar_vat_tax_all_tl avtl
4906 where avtl.vat_tax_id = cursor_rec.vat_tax_id
4907 and avtl.printed_tax_name is not null
4908 and not exists
4909 (select 1 from zx_reporting_codes_tl where reporting_code_id = l_seqid
4910 and language = avtl.language);
4911 END LOOP;
4912
4913
4914 END;
4915
4916 --End of bug fix 4422813
4917
4918 */
4919
4920 --Bug Fix 4466085
4921 --Creation of reporting type for REPORTING_TYPE_CODE ZX_ADJ_TAX_CLASSIF_CODE
4922 -- Bug 5344337
4923 SELECT COUNT(1) INTO l_exists_cnt
4924 FROM
4925 ar_vat_tax_all_b vat_tax,
4926 zx_rates_b zx_rates
4927 WHERE
4928 vat_tax.vat_tax_id = zx_rates.tax_rate_id
4929 AND zx_rates.record_type_code = 'MIGRATED';
4930
4931 --Need to Delete Seeded records if there is a source for reporting type to get created using 11i Migrated Regimes.
4932 IF ( l_exists_cnt > 0 ) THEN
4933 DELETE FROM ZX_REPORTING_TYPES_TL
4934 WHERE reporting_type_id IN ( SELECT reporting_type_id FROM ZX_REPORTING_TYPES_B
4935 WHERE reporting_type_code= 'ZX_ADJ_TAX_CLASSIF_CODE' AND record_type_code = 'SEEDED' );
4936
4937 DELETE FROM ZX_REPORT_TYPES_USAGES
4938 WHERE reporting_type_id IN ( SELECT reporting_type_id FROM ZX_REPORTING_TYPES_B
4939 WHERE reporting_type_code= 'ZX_ADJ_TAX_CLASSIF_CODE' AND record_type_code = 'SEEDED' );
4940
4941 DELETE FROM ZX_REPORTING_TYPES_B WHERE reporting_type_code= 'ZX_ADJ_TAX_CLASSIF_CODE' AND record_type_code = 'SEEDED';
4942 END IF ;
4943
4944 INSERT ALL
4945 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
4946 where reporting_type_code= 'ZX_ADJ_TAX_CLASSIF_CODE'
4947 and tax_regime_code = l_tax_regime_code
4948 )
4949 ) THEN
4950 INTO ZX_REPORTING_TYPES_B(
4951 REPORTING_TYPE_ID ,
4952 REPORTING_TYPE_CODE ,
4953 REPORTING_TYPE_DATATYPE_CODE ,
4954 TAX_REGIME_CODE ,
4955 TAX ,
4956 FORMAT_MASK ,
4957 MIN_LENGTH ,
4958 MAX_LENGTH ,
4959 LEGAL_MESSAGE_FLAG ,
4960 EFFECTIVE_FROM ,
4961 EFFECTIVE_TO ,
4962 RECORD_TYPE_CODE ,
4963 HAS_REPORTING_CODES_FLAG ,
4964 CREATED_BY ,
4965 CREATION_DATE ,
4966 LAST_UPDATED_BY ,
4967 LAST_UPDATE_DATE ,
4968 LAST_UPDATE_LOGIN ,
4969 REQUEST_ID ,
4970 PROGRAM_APPLICATION_ID ,
4971 PROGRAM_ID ,
4972 PROGRAM_LOGIN_ID ,
4973 OBJECT_VERSION_NUMBER
4974 )
4975 VALUES(
4976 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
4977 'ZX_ADJ_TAX_CLASSIF_CODE' ,--REPORTING_TYPE_CODE
4978 --'VARCHAR' ,--REPORTING_TYPE_DATATYPE
4979 'TEXT' ,--REPORTING_TYPE_DATATYPE (bug6430516)
4980 l_tax_regime_code ,--TAX_REGIME_CODE
4981 NULL ,--TAX
4982 NULL ,--FORMAT_MASK
4983 1 ,--MIN_LENGTH
4984 30 ,--MAX_LENGTH
4985 'N' ,--LEGAL_MESSAGE_FLAG
4986 effective_from ,--EFFECTIVE_FROM
4987 NULL ,--EFFECTIVE_TO
4988 'MIGRATED' ,--RECORD_TYPE_CODE
4989 'Y' ,--HAS_REPORTING_CODES_FLAG
4990 fnd_global.user_id ,--CREATED_BY
4991 SYSDATE ,--CREATION_DATE
4992 fnd_global.user_id ,--LAST_UPDATED_BY
4993 SYSDATE ,--LAST_UPDATE_DATE
4994 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
4995 fnd_global.conc_request_id , -- Request Id
4996 fnd_global.prog_appl_id , -- Program Application ID
4997 fnd_global.conc_program_id , -- Program Id
4998 fnd_global.conc_login_id , -- Program Login ID
4999 1
5000 )
5001 SELECT
5002 min(zx_rates.effective_from) effective_from,
5003 zx_rates.tax_regime_code l_tax_regime_code
5004
5005 FROM
5006 ar_vat_tax_all_b vat_tax,
5007 zx_rates_b zx_rates
5008 WHERE
5009 vat_tax.vat_tax_id = zx_rates.tax_rate_id
5010 AND zx_rates.record_type_code = 'MIGRATED'
5011 AND vat_tax.vat_tax_id = nvl(p_tax_id, vat_tax.vat_tax_id)
5012 GROUP BY
5013 zx_rates.tax_regime_code;
5014
5015
5016 --Bug Fix 4466085
5017 --Creation of Reporting Codes for Reporting Type ZX_ADJ_TAX_CLASSIF_CODE
5018
5019 INSERT ALL
5020 INTO
5021 ZX_REPORTING_CODES_B
5022 (
5023 REPORTING_CODE_ID ,
5024 EXCEPTION_CODE ,
5025 EFFECTIVE_FROM ,
5026 EFFECTIVE_TO ,
5027 RECORD_TYPE_CODE ,
5028 CREATED_BY ,
5029 CREATION_DATE ,
5030 LAST_UPDATED_BY ,
5031 LAST_UPDATE_DATE ,
5032 LAST_UPDATE_LOGIN,
5033 REQUEST_ID ,
5034 PROGRAM_APPLICATION_ID,
5035 PROGRAM_ID ,
5036 PROGRAM_LOGIN_ID ,
5037 REPORTING_CODE_CHAR_VALUE,
5038 REPORTING_CODE_DATE_VALUE,
5039 REPORTING_CODE_NUM_VALUE ,
5040 REPORTING_TYPE_ID ,
5041 OBJECT_VERSION_NUMBER
5042 )
5043 VALUES
5044 (
5045 ZX_REPORTING_CODES_B_S.NEXTVAL,
5046 NULL,
5047 l_start_date,
5048 NULL,
5049 'MIGRATED',
5050 FND_GLOBAL.USER_ID,
5051 SYSDATE,
5052 FND_GLOBAL.USER_ID,
5053 SYSDATE,
5054 fnd_global.conc_login_id ,
5055 fnd_global.conc_request_id , -- Request Id
5056 fnd_global.prog_appl_id , -- Program Application ID
5057 fnd_global.conc_program_id , -- Program Id
5058 fnd_global.conc_login_id , -- Program Login ID
5059 adjustment_tax_code,
5060 NULL,
5061 NULL,
5062 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = l_tax_regime_code
5063 and reporting_type_code = 'ZX_ADJ_TAX_CLASSIF_CODE'),
5064 1)
5065
5066 select
5067 adjustment_tax_code ,
5068 zxrb.tax_regime_code l_tax_regime_code ,
5069 min(zxrb.effective_from) l_start_date
5070 from ar_vat_tax_all_b avtb ,
5071 zx_rates_b zxrb
5072 where zxrb.tax_rate_id = avtb.vat_tax_id
5073 and adjustment_tax_code is not null
5074 and not exists
5075 ( select 1 from zx_reporting_codes_b where reporting_type_id =
5076 (select reporting_type_id FROM zx_reporting_types_b
5077 WHERE tax_regime_code = zxrb.tax_regime_code
5078 AND reporting_type_code = 'ZX_ADJ_TAX_CLASSIF_CODE')
5079 AND reporting_code_char_value = adjustment_tax_code)
5080 GROUP BY adjustment_tax_code,zxrb.tax_regime_code;
5081
5082
5083 --Bug# 4952838
5084 /* Bug 5031787 : Commented for the Bug as has_reporting_code_flag is 'N' and no codes creation is redundant
5085 INSERT ALL
5086 INTO
5087 ZX_REPORTING_CODES_B
5088 (
5089 REPORTING_CODE_ID ,
5090 EXCEPTION_CODE ,
5091 EFFECTIVE_FROM ,
5092 EFFECTIVE_TO ,
5093 RECORD_TYPE_CODE ,
5094 CREATED_BY ,
5095 CREATION_DATE ,
5096 LAST_UPDATED_BY ,
5097 LAST_UPDATE_DATE ,
5098 LAST_UPDATE_LOGIN,
5099 REQUEST_ID ,
5100 PROGRAM_APPLICATION_ID,
5101 PROGRAM_ID ,
5102 PROGRAM_LOGIN_ID ,
5103 REPORTING_CODE_CHAR_VALUE,
5104 REPORTING_CODE_DATE_VALUE,
5105 REPORTING_CODE_NUM_VALUE ,
5106 REPORTING_TYPE_ID ,
5107 OBJECT_VERSION_NUMBER
5108 )
5109 VALUES
5110 (
5111 ZX_REPORTING_CODES_B_S.NEXTVAL,
5112 NULL,
5113 l_start_date,
5114 NULL,
5115 'MIGRATED',
5116 FND_GLOBAL.USER_ID,
5117 SYSDATE,
5118 FND_GLOBAL.USER_ID,
5119 SYSDATE,
5120 fnd_global.conc_login_id ,
5121 fnd_global.conc_request_id , -- Request Id
5122 fnd_global.prog_appl_id , -- Program Application ID
5123 fnd_global.conc_program_id , -- Program Id
5124 fnd_global.conc_login_id , -- Program Login ID
5125 global_attribute5,
5126 NULL,
5127 NULL,
5128 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = l_tax_regime_code
5129 and reporting_type_code = 'CL_DEBIT_ACCOUNT'),
5130 1)
5131
5132 select
5133 avtb.global_attribute5,
5134 zxrb.tax_regime_code l_tax_regime_code ,
5135 zxrb.effective_from l_start_date
5136 from ar_vat_tax_all_b avtb ,
5137 zx_rates_b zxrb
5138 where zxrb.tax_rate_id = avtb.vat_tax_id
5139 and avtb.global_attribute_category ='JL.CL.ARXSUVAT.VAT_TAX'
5140 and avtb.global_attribute5 is not null
5141 and not exists
5142 ( select 1 from zx_reporting_codes_b where reporting_type_id =
5143 (select reporting_type_id FROM zx_reporting_types_b
5144 WHERE tax_regime_code = zxrb.tax_regime_code
5145 AND reporting_type_code = 'CL_DEBIT_ACCOUNT')
5146 AND reporting_code_char_value = avtb.global_attribute5);*/
5147
5148 --Note: We have common logic to insert into Codes TL table
5149 --at the end of CREATE_ZX_REP_TYPE_CODES procedure.
5150
5151
5152 --Bug Fix 4466085
5153 --Creation of Reporting Types Usages for Reporting Type ZX_ADJ_TAX_CLASSIF_CODE
5154
5155 INSERT INTO ZX_REPORT_TYPES_USAGES(
5156 REPORTING_TYPE_USAGE_ID ,
5157 ENTITY_CODE ,
5158 ENABLED_FLAG ,
5159 CREATED_BY ,
5160 CREATION_DATE ,
5161 LAST_UPDATED_BY ,
5162 LAST_UPDATE_DATE ,
5163 LAST_UPDATE_LOGIN ,
5164 REPORTING_TYPE_ID ,
5165 OBJECT_VERSION_NUMBER
5166 )
5167 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
5168 lookups.lookup_code , --ENTITY_CODE --Bug 5528045
5169 DECODE(lookups.lookup_code,
5170 'ZX_RATES','Y',
5171 'N') ,--ENABLED_FLAG --Bug 5528045
5172 fnd_global.user_id ,--CREATED_BY
5173 SYSDATE ,--CREATION_DATE
5174 fnd_global.user_id ,--LAST_UPDATED_BY
5175 SYSDATE ,--LAST_UPDATE_DATE
5176 fnd_global.conc_login_id,--LAST_UPDATE_LOGIN
5177 reporting_type_id ,--REPORTING_TYPE_ID
5178 1
5179 FROM
5180 zx_reporting_types_b rep_type,
5181 fnd_lookups lookups
5182 WHERE
5183 reporting_type_code = 'ZX_ADJ_TAX_CLASSIF_CODE'
5184 AND record_type_code = 'MIGRATED'
5185 AND lookup_type = 'ZX_REPORTING_TABLE_USE'
5186 AND NOT EXISTS ( select 1 from zx_report_types_usages
5187 where reporting_type_id = rep_type.reporting_type_id
5188 and entity_code = lookups.lookup_code );
5189
5190
5191
5192
5193 --Creation Of Reporting Type Usages for
5194
5195
5196 INSERT INTO ZX_REPORTING_TYPES_TL(
5197 REPORTING_TYPE_ID ,
5198 LANGUAGE ,
5199 SOURCE_LANG ,
5200 REPORTING_TYPE_NAME ,
5201 CREATED_BY ,
5202 CREATION_DATE ,
5203 LAST_UPDATED_BY ,
5204 LAST_UPDATE_DATE ,
5205 LAST_UPDATE_LOGIN
5206 )
5207
5208 SELECT
5209 REPORTING_TYPE_ID ,
5210 LANGUAGE_CODE ,
5211 userenv('LANG') ,
5212 CASE WHEN REPORTING_TYPE_NAME = UPPER(REPORTING_TYPE_NAME)
5213 THEN Initcap(REPORTING_TYPE_NAME)
5214 ELSE
5215 REPORTING_TYPE_NAME
5216 END,
5217 fnd_global.user_id ,
5218 SYSDATE ,
5219 fnd_global.user_id ,
5220 SYSDATE ,
5221 fnd_global.conc_login_id
5222
5223 FROM
5224 (
5225 SELECT
5226 types.REPORTING_TYPE_ID ,
5227 L.LANGUAGE_CODE ,
5228 CASE
5229 WHEN types.REPORTING_TYPE_CODE = 'PT_PRD_REC_TAX_BOX'
5230 THEN 'Periodic: Tax Box'
5231 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAXABLE'
5232 THEN 'Annual: Taxable'
5233 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAX_BOX'
5234 THEN 'Annual: Tax Box'
5235 WHEN types.REPORTING_TYPE_CODE = 'AR_MUNICIPAL_JUR'
5236 THEN 'Municipal Jurisdiction'
5237 WHEN types.REPORTING_TYPE_CODE = 'CL_TAX_CODE_CLASSIF'
5238 THEN 'Tax Code Classification'
5239 WHEN types.REPORTING_TYPE_CODE = 'AR_TURN_OVER_JUR_CODE'
5240 THEN 'Turnover Jurisdiction Code'
5241 WHEN types.REPORTING_TYPE_CODE = 'CL_BILLS_OF_EXCH_TAX'
5242 THEN 'Bills of Exchange Tax'
5243 WHEN types.REPORTING_TYPE_CODE = 'PRINT TAX LINE'
5244 THEN 'Print Tax Line'
5245 --Bug 4705196
5246 --WHEN types.REPORTING_TYPE_CODE = 'PRINTED_TAX_RATE_NAME' --Bug 4422813
5247 --THEN 'Printed Tax Rate Name'
5248 WHEN types.REPORTING_TYPE_CODE = 'ZX_ADJ_TAX_CLASSIF_CODE' --Bug 4466085
5249 THEN 'Adjustment Tax Classification Code'
5250 WHEN types.REPORTING_TYPE_CODE = 'KR_BUSINESS_LOCATIONS' --Bug 4671652
5251 THEN 'Korean Business Locations'
5252 ELSE types.REPORTING_TYPE_CODE END REPORTING_TYPE_NAME -- Bug 4886324
5253 FROM
5254 ZX_REPORTING_TYPES_B TYPES,
5255 FND_LANGUAGES L
5256 WHERE
5257
5258 TYPES.RECORD_TYPE_CODE = 'MIGRATED'
5259 AND L.INSTALLED_FLAG in ('I', 'B')
5260 ) TYPES
5261
5262 WHERE REPORTING_TYPE_NAME is not null
5263 AND not exists
5264 (select NULL
5265 from ZX_REPORTING_TYPES_TL T
5266 where T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
5267 and T.LANGUAGE = TYPES.LANGUAGE_CODE);
5268
5269 -- Creation of records in Reporting_Usages
5270 INSERT INTO ZX_REPORT_TYPES_USAGES(
5271 REPORTING_TYPE_USAGE_ID,
5272 REPORTING_TYPE_ID ,
5273 ENTITY_CODE ,
5274 ENABLED_FLAG ,
5275 CREATED_BY ,
5276 CREATION_DATE ,
5277 LAST_UPDATED_BY ,
5278 LAST_UPDATE_DATE ,
5279 LAST_UPDATE_LOGIN ,
5280 OBJECT_VERSION_NUMBER
5281 )
5282 SELECT
5283 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
5284 types.reporting_type_id ,--REPORTING_TYPE_ID
5285 lookups.lookup_code ,--ENTITY_CODE
5286 DECODE(lookups.lookup_code,
5287 'ZX_RATES','Y', --Bug 5528045
5288 'N') ,--ENABLED_FLAG
5289 fnd_global.user_id ,
5290 SYSDATE ,
5291 fnd_global.user_id ,
5292 SYSDATE ,
5293 fnd_global.conc_login_id,
5294 1
5295 FROM
5296 zx_reporting_types_b types,
5297 fnd_lookups lookups
5298
5299 WHERE types.reporting_type_code IN(
5300 'AR_MUNICIPAL_JUR',
5301 'CL_TAX_CODE_CLASSIF',
5302 'AR_TURN_OVER_JUR_CODE',
5303 'CL_BILLS_OF_EXCH_TAX',
5304 'PRINT TAX LINE',
5305 'KR_LOCATION' --YK:9/22/2004: Korean GDF
5306 )
5307 AND lookups.LOOKUP_TYPE = 'ZX_REPORTING_TABLE_USE'
5308 AND types.record_type_code = 'MIGRATED'
5309 AND NOT EXISTS ( select 1 from zx_report_types_usages
5310 where reporting_type_id = types.reporting_type_id
5311 and entity_code = lookups.lookup_code );
5312
5313 -- Call the common procedure to create the reporting codes
5314 -- Commented the Call for Bug 4874049
5315 -- CREATE_REPORTING_CODES('PT_LOCATION', 'JLZZ_AP_DGI_TRX_CODE');
5316
5317 /*FOR i IN 1..3
5318 LOOP
5319 IF ( i = 1 ) THEN l_lookup_code := 'A' ;
5320 ELSIF ( i = 2 ) THEN l_lookup_code := 'C';
5321 ELSE l_lookup_code := 'M';
5322 END IF ;
5323
5324 INSERT
5325 INTO ZX_REPORTING_CODES_B(
5326 REPORTING_CODE_ID ,
5327 EXCEPTION_CODE ,
5328 EFFECTIVE_FROM ,
5329 EFFECTIVE_TO ,
5330 RECORD_TYPE_CODE ,
5331 CREATED_BY ,
5332 CREATION_DATE ,
5333 LAST_UPDATED_BY ,
5334 LAST_UPDATE_DATE ,
5335 LAST_UPDATE_LOGIN ,
5336 REQUEST_ID ,
5337 PROGRAM_APPLICATION_ID ,
5338 PROGRAM_ID ,
5339 PROGRAM_LOGIN_ID ,
5340 REPORTING_CODE_CHAR_VALUE ,
5341 REPORTING_CODE_DATE_VALUE ,
5342 REPORTING_CODE_NUM_VALUE ,
5343 REPORTING_TYPE_ID ,
5344 OBJECT_VERSION_NUMBER
5345 )
5346 SELECT
5347 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
5348 NULL ,--EXCEPTION_CODE
5349 report_types.EFFECTIVE_FROM ,
5350 NULL ,--EFFECTIVE_TO
5351 'MIGRATED' ,--RECORD_TYPE_CODE
5352 fnd_global.user_id ,
5353 SYSDATE ,
5354 fnd_global.user_id ,
5355 SYSDATE ,
5356 fnd_global.conc_login_id ,
5357 fnd_global.conc_request_id , -- Request Id
5358 fnd_global.prog_appl_id , -- Program Application ID
5359 fnd_global.conc_program_id , -- Program Id
5360 fnd_global.conc_login_id , -- Program Login ID
5361 l_lookup_code,
5362 NULL,
5363 NULL,
5364 report_types.REPORTING_TYPE_ID,
5365 1
5366 FROM
5367 ZX_REPORTING_TYPES_B report_types
5368 WHERE
5369 report_types.REPORTING_TYPE_CODE = 'PT_LOCATION'
5370 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
5371 AND NOT EXISTS
5372 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
5373 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
5374 REPORTING_CODE_CHAR_VALUE= l_lookup_code
5375 );
5376 END LOOP ; */
5377 -- End for the bug 4874049.
5378
5379
5380 CREATE_REPORTING_CODES('CL_TAX_CODE_CLASSIF', 'JLCL_TAX_CODE_CLASS');
5381
5382 --Bug Fix 4930895 Populate FND_LOOKUPS.MEANING INTO REPORTING_CODE_NAME
5383 -- Moved this logic to common procedure CREATE_REPORTING_CODES
5384 /*
5385 INSERT INTO ZX_REPORTING_CODES_TL (
5386 REPORTING_CODE_ID ,
5387 LANGUAGE ,
5388 SOURCE_LANG ,
5389 REPORTING_CODE_NAME ,
5390 CREATED_BY ,
5391 CREATION_DATE ,
5392 LAST_UPDATED_BY ,
5393 LAST_UPDATE_DATE ,
5394 LAST_UPDATE_LOGIN
5395 )
5396 SELECT
5397 codes.reporting_code_id ,
5398 lookups.language ,
5399 lookups.source_lang ,
5400 lookups.meaning ,
5401 fnd_global.user_id ,
5402 sysdate ,
5403 fnd_global.user_id ,
5404 sysdate ,
5405 fnd_global.conc_login_id
5406 FROM
5407 ZX_REPORTING_TYPES_B TYPES,
5408 ZX_REPORTING_CODES_B CODES,
5409 FND_LOOKUP_VALUES lookups,
5410 FND_LANGUAGES L
5411 WHERE
5412 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
5413 AND TYPES.REPORTING_TYPE_CODE = 'CL_TAX_CODE_CLASSIF'
5414 AND lookups.LOOKUP_TYPE = 'JLCL_TAX_CODE_CLASS'
5415 AND codes.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code
5416 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
5417 AND lookups.VIEW_APPLICATION_ID = 0
5418 AND lookups.SECURITY_GROUP_ID = 0
5419 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
5420 AND L.INSTALLED_FLAG in ('I', 'B')
5421 AND not exists
5422 (select NULL
5423 from ZX_REPORTING_CODES_TL T
5424 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
5425 and T.LANGUAGE = L.LANGUAGE_CODE);
5426 */
5427
5428 CREATE_REPORTING_CODES('AR_TURN_OVER_JUR_CODE', 'JLZZ_AR_TO_JURISDICTION_CODE');
5429
5430 --Bug Fix 4930895 Populate FND_LOOKUPS.MEANING INTO REPORTING_CODE_NAME
5431 -- Moved this logic to common procedure CREATE_REPORTING_CODES
5432 /*
5433 INSERT INTO ZX_REPORTING_CODES_TL (
5434 REPORTING_CODE_ID ,
5435 LANGUAGE ,
5436 SOURCE_LANG ,
5437 REPORTING_CODE_NAME ,
5438 CREATED_BY ,
5439 CREATION_DATE ,
5440 LAST_UPDATED_BY ,
5441 LAST_UPDATE_DATE ,
5442 LAST_UPDATE_LOGIN
5443 )
5444 SELECT
5445 codes.reporting_code_id ,
5446 lookups.language ,
5447 lookups.source_lang ,
5448 lookups.meaning ,
5449 fnd_global.user_id ,
5450 sysdate ,
5451 fnd_global.user_id ,
5452 sysdate ,
5453 fnd_global.conc_login_id
5454 FROM
5455 ZX_REPORTING_TYPES_B TYPES,
5456 ZX_REPORTING_CODES_B CODES,
5457 FND_LOOKUP_VALUES lookups,
5458 FND_LANGUAGES L
5459 WHERE
5460 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
5461 AND TYPES.REPORTING_TYPE_CODE = 'AR_TURN_OVER_JUR_CODE'
5462 AND lookups.LOOKUP_TYPE = 'JLZZ_AR_TO_JURISDICTION_CODE'
5463 AND lookups.lookup_code = codes.REPORTING_CODE_CHAR_VALUE
5464 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
5465 AND lookups.VIEW_APPLICATION_ID = 0
5466 AND lookups.SECURITY_GROUP_ID = 0
5467 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
5468 AND L.INSTALLED_FLAG in ('I', 'B')
5469 AND not exists
5470 (select NULL
5471 from ZX_REPORTING_CODES_TL T
5472 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
5473 and T.LANGUAGE = L.LANGUAGE_CODE);
5474 */
5475
5476 -- YK:9/22/2004: Korean GDF: Reporting Code creation
5477 INSERT
5478 INTO ZX_REPORTING_CODES_B(
5479 REPORTING_CODE_ID ,
5480 REPORTING_CODE_CHAR_VALUE,
5481 REPORTING_CODE_NUM_VALUE,
5482 REPORTING_CODE_DATE_VALUE,
5483 REPORTING_TYPE_ID,
5484 EXCEPTION_CODE ,
5485 EFFECTIVE_FROM ,
5486 EFFECTIVE_TO ,
5487 RECORD_TYPE_CODE ,
5488 CREATED_BY ,
5489 CREATION_DATE ,
5490 LAST_UPDATED_BY ,
5491 LAST_UPDATE_DATE ,
5492 LAST_UPDATE_LOGIN ,
5493 REQUEST_ID ,
5494 PROGRAM_APPLICATION_ID ,
5495 PROGRAM_ID ,
5496 PROGRAM_LOGIN_ID ,
5497 OBJECT_VERSION_NUMBER
5498 )
5499 SELECT
5500 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
5501 global_attribute ,--REPORTING_CODE_CHAR_VALUE
5502 NULL ,--REPORTING_CODE_NUM_VALUE
5503 NULL ,--REPORTING_CODE_DATE_VALUE
5504 reporting_type_id ,--REPORTING_TYPE_ID
5505 NULL ,--EXCEPTION_CODE
5506 effective_from ,
5507 NULL ,--EFFECTIVE_TO
5508 'MIGRATED' ,--RECORD_TYPE_CODE
5509 fnd_global.user_id ,
5510 SYSDATE ,
5511 fnd_global.user_id ,
5512 SYSDATE ,
5513 fnd_global.conc_login_id ,
5514 fnd_global.conc_request_id , -- Request
5515 fnd_global.prog_appl_id , -- Program Application ID
5516 fnd_global.conc_program_id , -- Program Id
5517 fnd_global.conc_login_id , -- Program Login ID
5518 1
5519 FROM
5520 (
5521 SELECT
5522 DISTINCT
5523 locations.location_code global_attribute,
5524 types.reporting_type_id reporting_type_id,
5525 types.effective_from effective_from
5526 FROM
5527 zx_reporting_types_b types,
5528 hr_locations locations
5529 WHERE
5530 types.reporting_type_code = 'KR_LOCATION'
5531 AND types.record_type_code = 'MIGRATED'
5532 AND locations.global_attribute_category = 'JA.KR.PERWSLOC.WITHHOLDING'
5533 AND locations.global_attribute1 IS NOT NULL
5534
5535 AND (NOT EXISTS (select 1 from zx_reporting_codes_b
5536 where reporting_type_id = types.reporting_type_id
5537 and reporting_code_char_value = locations.location_code
5538 /*(select location_code
5539 from hr_locations
5540 where global_attribute_category = 'JA.KR.PERWSLOC.WITHHOLDING'
5541 and global_attribute1 is not null)*/
5542 )
5543 )
5544
5545 ); --YK:9/22/2004: Synch is taken care by checking NOT EXISTS.
5546 /* Bug 5031787
5547 INSERT INTO ZX_REPORTING_CODES_TL(
5548 REPORTING_CODE_ID ,
5549 LANGUAGE ,
5550 SOURCE_LANG ,
5551 REPORTING_CODE_NAME ,
5552 CREATED_BY ,
5553 CREATION_DATE ,
5554 LAST_UPDATED_BY ,
5555 LAST_UPDATE_DATE ,
5556 LAST_UPDATE_LOGIN
5557 )
5558 SELECT
5559 codes.reporting_code_id ,
5560 lookups.language ,
5561 lookups.source_lang ,
5562 lookups.meaning ,
5563 fnd_global.user_id ,
5564 sysdate ,
5565 fnd_global.user_id ,
5566 sysdate ,
5567 fnd_global.conc_login_id
5568 FROM
5569 ZX_REPORTING_TYPES_B TYPES,
5570 ZX_REPORTING_CODES_B CODES,
5571 FND_LOOKUP_VALUES lookups,
5572 FND_LANGUAGES L
5573 WHERE
5574
5575 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
5576 AND TYPES.REPORTING_TYPE_CODE = 'KR_LOCATION'
5577 AND TYPES.REPORTING_TYPE_CODE = lookups.LOOKUP_TYPE
5578 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
5579 AND lookups.VIEW_APPLICATION_ID = 0
5580 AND lookups.SECURITY_GROUP_ID = 0
5581 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
5582 AND L.INSTALLED_FLAG in ('I', 'B')
5583 AND not exists
5584 (select NULL
5585 from ZX_REPORTING_CODES_TL T
5586 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
5587 and T.LANGUAGE = L.LANGUAGE_CODE);
5588 */
5589 -- End of Korean GDF
5590
5591
5592 --Bug Fix 4671652
5593 --Creation of Reporting Types for KR_BUSINESS_LOCATIONS
5594
5595 INSERT ALL
5596 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
5597 where reporting_type_code= 'KR_BUSINESS_LOCATIONS'
5598 and tax_regime_code = l_tax_regime_code
5599 )
5600 ) THEN
5601 INTO ZX_REPORTING_TYPES_B(
5602 REPORTING_TYPE_ID ,
5603 REPORTING_TYPE_CODE ,
5604 REPORTING_TYPE_DATATYPE_CODE ,
5605 TAX_REGIME_CODE ,
5606 TAX ,
5607 FORMAT_MASK ,
5608 MIN_LENGTH ,
5609 MAX_LENGTH ,
5610 LEGAL_MESSAGE_FLAG ,
5611 EFFECTIVE_FROM ,
5612 EFFECTIVE_TO ,
5613 RECORD_TYPE_CODE ,
5614 HAS_REPORTING_CODES_FLAG ,
5615 CREATED_BY ,
5616 CREATION_DATE ,
5617 LAST_UPDATED_BY ,
5618 LAST_UPDATE_DATE ,
5619 LAST_UPDATE_LOGIN ,
5620 REQUEST_ID ,
5621 PROGRAM_APPLICATION_ID ,
5622 PROGRAM_ID ,
5623 PROGRAM_LOGIN_ID ,
5624 OBJECT_VERSION_NUMBER
5625 )
5626 VALUES(
5627 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
5628 'KR_BUSINESS_LOCATIONS' ,--REPORTING_TYPE_CODE
5629 --'VARCHAR' ,--REPORTING_TYPE_DATATYPE
5630 'TEXT' ,--REPORTING_TYPE_DATATYPE (Bug6430516)
5631 l_tax_regime_code ,--TAX_REGIME_CODE
5632 NULL ,--TAX
5633 NULL ,--FORMAT_MASK
5634 1 ,--MIN_LENGTH
5635 30 ,--MAX_LENGTH
5636 'N' ,--LEGAL_MESSAGE_FLAG
5637 effective_from ,--EFFECTIVE_FROM
5638 NULL ,--EFFECTIVE_TO
5639 'MIGRATED' ,--RECORD_TYPE_CODE
5640 'Y' ,--HAS_REPORTING_CODES_FLAG
5641 fnd_global.user_id ,--CREATED_BY
5642 SYSDATE ,--CREATION_DATE
5643 fnd_global.user_id ,--LAST_UPDATED_BY
5644 SYSDATE ,--LAST_UPDATE_DATE
5645 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
5646 fnd_global.conc_request_id , -- Request Id
5647 fnd_global.prog_appl_id , -- Program Application ID
5648 fnd_global.conc_program_id , -- Program Id
5649 fnd_global.conc_login_id , -- Program Login ID
5650 1
5651 )
5652 SELECT
5653 min(zx_rates.effective_from) effective_from,
5654 zx_rates.tax_regime_code l_tax_regime_code
5655
5656 FROM
5657 ar_vat_tax_all_b ar_vat,
5658 zx_rates_b zx_rates
5659 WHERE
5660 ar_vat.vat_tax_id = zx_rates.tax_rate_id
5661 AND ar_vat.global_attribute_category = 'JA.KR.ARXSUVAT.VAT'
5662 AND zx_rates.record_type_code = 'MIGRATED'
5663 AND ar_vat.vat_tax_id = nvl(p_tax_id, ar_vat.vat_tax_id)
5664 GROUP BY
5665 zx_rates.tax_regime_code;
5666
5667 --Bug Fix 4671652
5668 --Creation of Reporting Codes for KR_BUSINESS_LOCATIONS
5669
5670 INSERT ALL
5671 INTO
5672 ZX_REPORTING_CODES_B
5673 (
5674 REPORTING_CODE_ID ,
5675 EXCEPTION_CODE ,
5676 EFFECTIVE_FROM ,
5677 EFFECTIVE_TO ,
5678 RECORD_TYPE_CODE ,
5679 CREATED_BY ,
5680 CREATION_DATE ,
5681 LAST_UPDATED_BY ,
5682 LAST_UPDATE_DATE ,
5683 LAST_UPDATE_LOGIN,
5684 REQUEST_ID ,
5685 PROGRAM_APPLICATION_ID,
5686 PROGRAM_ID ,
5687 PROGRAM_LOGIN_ID ,
5688 REPORTING_CODE_CHAR_VALUE,
5689 REPORTING_CODE_DATE_VALUE,
5690 REPORTING_CODE_NUM_VALUE ,
5691 REPORTING_TYPE_ID ,
5692 OBJECT_VERSION_NUMBER
5693 )
5694 VALUES
5695 (
5696 ZX_REPORTING_CODES_B_S.NEXTVAL,
5697 NULL,
5698 l_start_date,
5699 NULL,
5700 'MIGRATED',
5701 FND_GLOBAL.USER_ID,
5702 SYSDATE,
5703 FND_GLOBAL.USER_ID,
5704 SYSDATE,
5705 fnd_global.conc_login_id ,
5706 fnd_global.conc_request_id , -- Request Id
5707 fnd_global.prog_appl_id , -- Program Application ID
5708 fnd_global.conc_program_id , -- Program Id
5709 fnd_global.conc_login_id , -- Program Login ID
5710 l_location_code,
5711 NULL,
5712 NULL,
5713 (select reporting_type_id FROM zx_reporting_types_b where tax_regime_code = l_tax_regime_code
5714 and reporting_type_code = 'KR_BUSINESS_LOCATIONS'),
5715 1)
5716
5717 select
5718 distinct
5719 tax_id_values_and_codes.location_code l_location_code,
5720 zxrb.tax_regime_code l_tax_regime_code ,
5721 (SELECT min(r.effective_from) FROM zx_rates_b r WHERE r.tax_regime_code = zxrb.tax_regime_code) l_start_date
5722 from
5723 (
5724 select vat_tax_id,hrloc.location_code location_code
5725 from ar_vat_tax_all_b artax, hr_locations hrloc
5726 where artax.global_attribute_category = 'JA.KR.ARXSUVAT.VAT' -- Bug 5031787
5727 and artax.global_attribute1 = to_char(hrloc.location_id)
5728 ) tax_id_values_and_codes,
5729 zx_rates_b zxrb
5730 where zxrb.tax_rate_id = tax_id_values_and_codes.vat_tax_id
5731 and tax_id_values_and_codes.vat_tax_id = nvl(p_tax_id,tax_id_values_and_codes.vat_tax_id)
5732 and tax_id_values_and_codes.location_code is not null
5733 and not exists
5734 ( select 1 from zx_reporting_codes_b where reporting_type_id =
5735 (select reporting_type_id FROM zx_reporting_types_b
5736 WHERE tax_regime_code = zxrb.tax_regime_code
5737 AND reporting_type_code = 'KR_BUSINESS_LOCATIONS')
5738 AND reporting_code_char_value = tax_id_values_and_codes.location_code);
5739
5740
5741 --Bug Fix 4671652
5742 --Creation of Reporting Codes Associations for KR_BUSINESS_LOCATIONS
5743
5744 INSERT
5745 INTO ZX_REPORT_CODES_ASSOC(
5746 REPORTING_CODE_ASSOC_ID,
5747 ENTITY_CODE ,
5748 ENTITY_ID ,
5749 REPORTING_TYPE_ID ,
5750 REPORTING_CODE_ID ,
5751 EXCEPTION_CODE ,
5752 EFFECTIVE_FROM ,
5753 EFFECTIVE_TO ,
5754 CREATED_BY ,
5755 CREATION_DATE ,
5756 LAST_UPDATED_BY ,
5757 LAST_UPDATE_DATE ,
5758 LAST_UPDATE_LOGIN ,
5759 REPORTING_CODE_CHAR_VALUE,
5760 REPORTING_CODE_DATE_VALUE,
5761 REPORTING_CODE_NUM_VALUE,
5762 OBJECT_VERSION_NUMBER
5763 )
5764 SELECT
5765 ZX_REPORT_CODES_ASSOC_S.nextval ,
5766 'ZX_RATES' ,--ENTITY_CODE
5767 TAX_RATE_ID ,--ENTITY_ID
5768 REPORTING_TYPE_ID ,
5769 REPORTING_CODE_ID ,
5770 NULL ,--EXCEPTION_CODE
5771 EFFECTIVE_FROM ,
5772 NULL ,--EFFECTIVE_TO
5773 fnd_global.user_id ,
5774 SYSDATE ,
5775 fnd_global.user_id ,
5776 SYSDATE ,
5777 fnd_global.conc_login_id ,
5778 REPORTING_CODE_CHAR_VALUE,
5779 REPORTING_CODE_DATE_VALUE,
5780 REPORTING_CODE_NUM_VALUE,
5781 1
5782 FROM
5783 (
5784 SELECT
5785 rates.TAX_RATE_ID TAX_RATE_ID,
5786 report_codes.REPORTING_CODE_ID REPORTING_CODE_ID,
5787 rates.EFFECTIVE_FROM EFFECTIVE_FROM,
5788 report_codes.REPORTING_TYPE_ID REPORTING_TYPE_ID,
5789 report_codes.REPORTING_CODE_CHAR_VALUE REPORTING_CODE_CHAR_VALUE ,
5790 report_codes.REPORTING_CODE_DATE_VALUE REPORTING_CODE_DATE_VALUE,
5791 report_codes.REPORTING_CODE_NUM_VALUE REPORTING_CODE_NUM_VALUE
5792 FROM
5793 AR_VAT_TAX_ALL_B codes,
5794 HR_LOCATIONS hrloc,
5795 ZX_RATES_B rates,
5796 ZX_REPORTING_TYPES_B reporting_types,
5797 ZX_REPORTING_CODES_B report_codes
5798 WHERE
5799 codes.vat_tax_id = rates.tax_rate_id
5800 AND codes.vat_tax_id = nvl(p_tax_id,codes.vat_tax_id)
5801 AND codes.global_attribute1 = TO_CHAR(hrloc.location_id)
5802 AND codes.global_attribute_category = 'JA.KR.ARXSUVAT.VAT'
5803 AND hrloc.location_code = report_codes.REPORTING_CODE_CHAR_VALUE
5804 AND rates.record_type_code = 'MIGRATED'
5805 AND rates.tax_regime_code = reporting_types.tax_regime_code
5806 AND reporting_types.reporting_type_code = 'KR_BUSINESS_LOCATIONS'
5807 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
5808 AND report_codes.record_type_code = 'MIGRATED'
5809
5810 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
5811 where entity_code = 'ZX_RATES'
5812 and entity_id = rates.tax_rate_id
5813 and reporting_type_id =
5814 report_codes.reporting_type_id)
5815 );
5816
5817
5818 --Bug Fix 4716057
5819 /*
5820 -- Bug Fix 4671652
5821 -- Creation of reporting types usages for KR_BUSINESS_LOCATIONS
5822
5823
5824 INSERT INTO ZX_REPORT_TYPES_USAGES(
5825 REPORTING_TYPE_USAGE_ID ,
5826 ENTITY_CODE ,
5827 ENABLED_FLAG ,
5828 CREATED_BY ,
5829 CREATION_DATE ,
5830 LAST_UPDATED_BY ,
5831 LAST_UPDATE_DATE ,
5832 LAST_UPDATE_LOGIN ,
5833 REPORTING_TYPE_ID ,
5834 OBJECT_VERSION_NUMBER
5835 )
5836 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
5837 'ZX_RATES_B' ,--ENTITY_CODE
5838 'Y' ,--ENABLED_FLAG
5839 fnd_global.user_id ,--CREATED_BY
5840 SYSDATE ,--CREATION_DATE
5841 fnd_global.user_id ,--LAST_UPDATED_BY
5842 SYSDATE ,--LAST_UPDATE_DATE
5843 fnd_global.conc_login_id,--LAST_UPDATE_LOGIN
5844 reporting_type_id ,--REPORTING_TYPE_ID
5845 1
5846
5847 FROM
5848 zx_reporting_types_b rep_type
5849
5850 WHERE
5851 reporting_type_code = 'KR_BUSINESS_LOCATIONS'
5852 AND NOT EXISTS ( select 1 from zx_report_types_usages
5853 where reporting_type_id = rep_type.reporting_type_id and
5854 entity_code = 'ZX_RATES_B' );
5855 */
5856
5857 IF PG_DEBUG = 'Y' THEN
5858 arp_util_tax.debug('CREATE_ZX_REP_TYPE_CODES_AR(-)');
5859 END IF;
5860
5861
5862
5863 END CREATE_ZX_REP_TYPE_CODES_AR;
5864
5865
5866
5867 /*=========================================================================+
5868 | PROCEDURE |
5869 | ZX_CREATE_REP_ASSOCIATION_PTP |
5870 | |
5871 | DESCRIPTION |
5872 | |
5873 | Used to create the reporting type associations |
5874 | for various entities like |
5875 | 1.HR Organization Information |
5876 | 2.Hr Locations |
5877 | 3.AR System Parameters All |
5878 | 4.Financial Systems Parameters All |
5879 | |
5880 | SCOPE - PUBLIC |
5881 | |
5882 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
5883 | |
5884 | CALLED FROM |
5885 | REG_REP_DRIVER_PROC |
5886 | NOTES |
5887 | |
5888 | MODIFICATION HISTORY |
5889 | 23-Sep-04 Arnab Sengupta Created. |
5890 | |
5891 |=========================================================================*/
5892
5893
5894 PROCEDURE ZX_CREATE_REP_ASSOCIATION_PTP
5895 (
5896
5897 p_rep_type_info varchar2,
5898 p_ptp_id zx_party_tax_profile.party_tax_profile_id%type,
5899 p_reporting_type_code zx_reporting_types_b.reporting_type_code%type
5900 )
5901
5902 IS
5903
5904 BEGIN
5905 arp_util_tax.debug('ZX_CREATE_REP_ASSOCIATION_PTP(+)');
5906 arp_util_tax.debug('p_rep_type_info='||p_rep_type_info);
5907
5908 INSERT INTO ZX_REPORT_CODES_ASSOC(
5909 REPORTING_CODE_ASSOC_ID,
5910 ENTITY_CODE,
5911 ENTITY_ID,
5912 REPORTING_TYPE_ID,
5913 REPORTING_CODE_CHAR_VALUE,
5914 EXCEPTION_CODE,
5915 EFFECTIVE_FROM,
5916 EFFECTIVE_TO,
5917 CREATED_BY,
5918 CREATION_DATE,
5919 LAST_UPDATED_BY,
5920 LAST_UPDATE_DATE,
5921 LAST_UPDATE_LOGIN,
5922 OBJECT_VERSION_NUMBER)
5923 SELECT
5924 ZX_REPORT_CODES_ASSOC_S.nextval, --REPORTING_CODE_ASSOC_ID
5925 'ZX_PARTY_TAX_PROFILE' , --ENTITY_CODE
5926 p_ptp_id , --ENTITY_ID
5927 REPORTING_TYPE_ID , --REPORTING_TYPE_ID
5928 p_rep_type_info, --REPORTING_CODE_CHAR_VALUE
5929 null, --EXCEPTION_CODE
5930 sysdate, --EFFECTIVE_FROM
5931 null, --EFFECTIVE_TO
5932 fnd_global.user_id,
5933 sysdate,
5934 fnd_global.user_id,
5935 sysdate,
5936 fnd_global.conc_login_id,
5937 1
5938
5939 FROM ZX_REPORTING_TYPES_B
5940 WHERE REPORTING_TYPE_CODE=p_reporting_type_code
5941
5942 AND NOT EXISTS (SELECT 1 FROM
5943 ZX_REPORTING_TYPES_B RTB,
5944 ZX_REPORT_CODES_ASSOC RCA
5945 WHERE
5946
5947 RTB.REPORTING_TYPE_ID = RCA.REPORTING_TYPE_ID
5948 AND RTB.REPORTING_TYPE_CODE = p_reporting_type_code
5949 AND RCA.ENTITY_ID = p_ptp_id
5950 AND RCA.REPORTING_CODE_CHAR_VALUE = p_rep_type_info);
5951
5952
5953 arp_util_tax.debug('ZX_CREATE_REP_ASSOCIATION_PTP(-)');
5954 END ZX_CREATE_REP_ASSOCIATION_PTP;
5955
5956
5957 /*=========================================================================+
5958 | PROCEDURE |
5959 | ZX_CREATE_REPORT_TYPE_PTP |
5960 | |
5961 | DESCRIPTION |
5962 | |
5963 | Used to create the reporting types. |
5964 | |
5965 | |
5966 | |
5967 | |
5968 | |
5969 | SCOPE - PUBLIC |
5970 | |
5971 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
5972 | |
5973 | CALLED FROM |
5974 | |
5975 | NOTES |
5976 | |
5977 | MODIFICATION HISTORY |
5978 | 23-Sep-04 Arnab Sengupta Created. |
5979 | |
5980 |=========================================================================*/
5981 PROCEDURE CREATE_REPORT_TYPE_PTP
5982 (
5983 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
5984 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
5985 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE
5986 )
5987 IS
5988
5989 BEGIN
5990
5991 arp_util_tax.debug('CREATE_REPORT_TYPE_PTP(+)');
5992 arp_util_tax.debug('p_reporting_type_code='||p_reporting_type_code);
5993
5994 INSERT
5995 INTO ZX_REPORTING_TYPES_B(
5996 REPORTING_TYPE_ID ,
5997 REPORTING_TYPE_CODE ,
5998 REPORTING_TYPE_DATATYPE_CODE ,
5999 TAX_REGIME_CODE ,
6000 TAX ,
6001 FORMAT_MASK ,
6002 MIN_LENGTH ,
6003 MAX_LENGTH ,
6004 LEGAL_MESSAGE_FLAG ,
6005 EFFECTIVE_FROM ,
6006 EFFECTIVE_TO ,
6007 RECORD_TYPE_CODE ,
6008 HAS_REPORTING_CODES_FLAG ,
6009 CREATED_BY ,
6010 CREATION_DATE ,
6011 LAST_UPDATED_BY ,
6012 LAST_UPDATE_DATE ,
6013 LAST_UPDATE_LOGIN ,
6014 REQUEST_ID ,
6015 PROGRAM_APPLICATION_ID ,
6016 PROGRAM_ID ,
6017 PROGRAM_LOGIN_ID ,
6018 OBJECT_VERSION_NUMBER
6019 )
6020 SELECT
6021 zx_reporting_types_b_s.nextval, --REPORTING_TYPE_ID
6022 p_reporting_type_code, --REPORTING_TYPE_CODE
6023 p_datatype, --REPORTING_TYPE_DATATYPE
6024 NULL, --TAX REGIME CODE
6025 NULL, --TAX
6026 NULL, --FORMAT_MASK
6027 1, --MIN_LENGTH
6028 30, --MAX_LENGTH
6029 'N', --LEGAL_MESSAGE_FLAG
6030 SYSDATE, --EFFECTIVE_FROM
6031 NULL, --EFFECTIVE_TO
6032 'MIGRATED', --RECORD_TYPE_CODE
6033 p_has_rep_code , --HAS_REPORTING_CODES_FLAG
6034 fnd_global.user_id ,
6035 SYSDATE ,
6036 fnd_global.user_id ,
6037 SYSDATE ,
6038 fnd_global.conc_login_id ,
6039 fnd_global.conc_request_id , -- Request Id
6040 fnd_global.prog_appl_id , -- Program Application ID
6041 fnd_global.conc_program_id , -- Program Id
6042 fnd_global.conc_login_id , -- Program Login ID
6043 1
6044
6045 FROM DUAL
6046
6047 WHERE NOT EXISTS (select 1 from zx_reporting_types_b
6048 where reporting_type_code= p_reporting_type_code
6049 and tax_regime_code IS NULL);
6050
6051
6052 arp_util_tax.debug('CREATE_REPORT_TYPE_PTP(+)');
6053 END CREATE_REPORT_TYPE_PTP;
6054
6055 /*=========================================================================+
6056 | PROCEDURE |
6057 | CREATE_REPORT_TYPE_SEED |
6058 | |
6059 | DESCRIPTION |
6060 | |
6061 | Used to create seeded reporting types. |
6062 | |
6063 | |
6064 | |
6065 | |
6066 | |
6067 | SCOPE - PRIVATE |
6068 | |
6069 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
6070 | |
6071 | CALLED FROM : CREATE_SEEDED_REPORTING_TYPES |
6072 | |
6073 | NOTES |
6074 | |
6075 | MODIFICATION HISTORY |
6076 | 25-May-2006 Ashwin Gurram Created. |
6077 | |
6078 |=========================================================================*/
6079 PROCEDURE CREATE_REPORT_TYPE_SEED
6080 (
6081 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
6082 p_datatype IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_DATATYPE_CODE%TYPE,
6083 p_has_rep_code IN ZX_REPORTING_TYPES_B.HAS_REPORTING_CODES_FLAG%TYPE
6084 )
6085 IS
6086
6087 BEGIN
6088
6089 arp_util_tax.debug('CREATE_REPORT_TYPE_PTP(+)');
6090 arp_util_tax.debug('p_reporting_type_code='||p_reporting_type_code);
6091
6092 INSERT
6093 INTO ZX_REPORTING_TYPES_B(
6094 REPORTING_TYPE_ID ,
6095 REPORTING_TYPE_CODE ,
6096 REPORTING_TYPE_DATATYPE_CODE ,
6097 TAX_REGIME_CODE ,
6098 TAX ,
6099 FORMAT_MASK ,
6100 MIN_LENGTH ,
6101 MAX_LENGTH ,
6102 LEGAL_MESSAGE_FLAG ,
6103 EFFECTIVE_FROM ,
6104 EFFECTIVE_TO ,
6105 RECORD_TYPE_CODE ,
6106 HAS_REPORTING_CODES_FLAG ,
6107 CREATED_BY ,
6108 CREATION_DATE ,
6109 LAST_UPDATED_BY ,
6110 LAST_UPDATE_DATE ,
6111 LAST_UPDATE_LOGIN ,
6112 REQUEST_ID ,
6113 PROGRAM_APPLICATION_ID ,
6114 PROGRAM_ID ,
6115 PROGRAM_LOGIN_ID ,
6116 OBJECT_VERSION_NUMBER
6117 )
6118 SELECT
6119 zx_reporting_types_b_s.nextval, --REPORTING_TYPE_ID
6120 p_reporting_type_code, --REPORTING_TYPE_CODE
6121 p_datatype, --REPORTING_TYPE_DATATYPE
6122 NULL, --TAX REGIME CODE
6123 NULL, --TAX
6124 NULL, --FORMAT_MASK
6125 1, --MIN_LENGTH
6126 30, --MAX_LENGTH
6127 'N', --LEGAL_MESSAGE_FLAG
6128 SYSDATE, --EFFECTIVE_FROM
6129 NULL, --EFFECTIVE_TO
6130 'SEEDED', --RECORD_TYPE_CODE
6131 p_has_rep_code , --HAS_REPORTING_CODES_FLAG
6132 120 ,
6133 SYSDATE ,
6134 120 ,
6135 SYSDATE ,
6136 0 ,
6137 fnd_global.conc_request_id , -- Request Id
6138 fnd_global.prog_appl_id , -- Program Application ID
6139 fnd_global.conc_program_id , -- Program Id
6140 fnd_global.conc_login_id , -- Program Login ID
6141 1
6142 FROM DUAL
6143 WHERE NOT EXISTS (select 1 from zx_reporting_types_b
6144 where reporting_type_code= p_reporting_type_code
6145 );
6146
6147 -- Insert into ZX_REPORTING_TYPES_TL
6148
6149 INSERT INTO ZX_REPORTING_TYPES_TL(
6150 REPORTING_TYPE_ID ,
6151 LANGUAGE ,
6152 SOURCE_LANG ,
6153 REPORTING_TYPE_NAME ,
6154 CREATED_BY ,
6155 CREATION_DATE ,
6156 LAST_UPDATED_BY ,
6157 LAST_UPDATE_DATE ,
6158 LAST_UPDATE_LOGIN
6159 )
6160 SELECT
6161 REPORTING_TYPE_ID ,
6162 LANGUAGE_CODE ,
6163 userenv('LANG') ,
6164 CASE WHEN REPORTING_TYPE_NAME = UPPER(REPORTING_TYPE_NAME)
6165 THEN Initcap(REPORTING_TYPE_NAME)
6166 ELSE
6167 REPORTING_TYPE_NAME
6168 END,
6169 120 ,
6170 SYSDATE ,
6171 120 ,
6172 SYSDATE ,
6173 0
6174
6175 FROM
6176 (
6177 SELECT
6178 types.REPORTING_TYPE_ID ,
6179 L.LANGUAGE_CODE ,
6180 CASE
6181 WHEN types.REPORTING_TYPE_CODE = 'PT_LOCATION'
6182 THEN 'Location'
6183 WHEN types.REPORTING_TYPE_CODE = 'PT_PRD_TAXABLE_BOX'
6184 THEN 'Periodic: Taxable Box'
6185 WHEN types.REPORTING_TYPE_CODE = 'PT_PRD_REC_TAX_BOX'
6186 THEN 'Periodic: Recoverable Tax Box'
6187 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_TTL_TAXABLE_BOX'
6188 THEN 'Annual: Total Taxable Box'
6189 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAXABLE'
6190 THEN 'Annual: Recoverable Taxable'
6191 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_NON_REC_TAXABLE'
6192 THEN 'Annual: Non Recoverable Taxable'
6193 WHEN types.REPORTING_TYPE_CODE = 'PT_ANL_REC_TAX_BOX'
6194 THEN 'Annual: Recoverable Tax Box'
6195 WHEN types.REPORTING_TYPE_CODE = 'AR_DGI_TRX_CODE'
6196 THEN 'DGI Transaction Code'
6197 WHEN types.REPORTING_TYPE_CODE = 'FISCAL PRINTER'
6198 THEN 'Fiscal Printer Used'
6199 WHEN types.REPORTING_TYPE_CODE = 'CAI NUMBER'
6200 THEN 'CAI Number'
6201 WHEN types.REPORTING_TYPE_CODE = 'TAX_CODE_CLASSIFICATION'
6202 THEN 'Tax Code Classification'
6203 -- Bug # 4952838
6204 WHEN types.REPORTING_TYPE_CODE = 'CZ_TAX_ORIGIN' or
6205 types.REPORTING_TYPE_CODE = 'HU_TAX_ORIGIN' or
6206 types.REPORTING_TYPE_CODE = 'PL_TAX_ORIGIN'
6207 THEN 'Tax Origin'
6208 WHEN types.REPORTING_TYPE_CODE = 'CH_VAT_REGIME'
6209 THEN 'Tax Regime'
6210 WHEN types.REPORTING_TYPE_CODE = 'CL_DEBIT_ACCOUNT'
6211 THEN 'Debit Account'
6212 WHEN types.REPORTING_TYPE_CODE = 'AR_MUNICIPAL_JUR'
6213 THEN 'Municipal Jurisdiction'
6214 WHEN types.REPORTING_TYPE_CODE = 'CL_TAX_CODE_CLASSIF'
6215 THEN 'Tax Code Classification'
6216 WHEN types.REPORTING_TYPE_CODE = 'AR_TURN_OVER_JUR_CODE'
6217 THEN 'Turnover Jurisdiction Code'
6218 WHEN types.REPORTING_TYPE_CODE = 'CL_BILLS_OF_EXCH_TAX'
6219 THEN 'Bills of Exchange Tax'
6220 WHEN types.REPORTING_TYPE_CODE = 'PRINT TAX LINE'
6221 THEN 'Print Tax Line'
6222 WHEN types.REPORTING_TYPE_CODE = 'KR_BUSINESS_LOCATIONS'
6223 THEN 'Korean Business Locations'
6224 ELSE types.REPORTING_TYPE_CODE END REPORTING_TYPE_NAME
6225
6226 FROM
6227 ZX_REPORTING_TYPES_B TYPES,
6228 FND_LANGUAGES L
6229 WHERE
6230 TYPES.RECORD_TYPE_CODE = 'SEEDED'
6231 AND L.INSTALLED_FLAG in ('I', 'B')
6232 ) TYPES
6233 WHERE REPORTING_TYPE_NAME is not null
6234 AND not exists
6235 (select NULL
6236 from ZX_REPORTING_TYPES_TL T
6237 where T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
6238 and T.LANGUAGE = TYPES.LANGUAGE_CODE);
6239
6240 arp_util_tax.debug('CREATE_REPORT_TYPE_PTP(+)');
6241
6242 END CREATE_REPORT_TYPE_SEED;
6243
6244 /*=========================================================================+
6245 | PROCEDURE |
6246 | CREATE_REPORTING_CODES_SEED |
6247 | |
6248 | DESCRIPTION |
6249 | |
6250 | Used to create seeded reporting types. |
6251 | |
6252 | |
6253 | |
6254 | |
6255 | |
6256 | SCOPE - PRIVATE |
6257 | |
6258 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
6259 | |
6260 | CALLED FROM : CREATE_SEEDED_REPORTING_TYPES |
6261 | |
6262 | NOTES |
6263 | |
6264 | MODIFICATION HISTORY |
6265 | 25-May-2006 Ashwin Gurram Created. |
6266 | |
6267 |=========================================================================*/
6268 PROCEDURE CREATE_REPORTING_CODES_SEED (
6269 p_reporting_type_code IN ZX_REPORTING_TYPES_B.REPORTING_TYPE_CODE %TYPE,
6270 P_lookup_type IN FND_LOOKUPS.LOOKUP_TYPE%TYPE
6271 ) IS
6272
6273 BEGIN
6274 arp_util_tax.debug('CREATE_REPORTING_CODES(+)');
6275 arp_util_tax.debug('p_reporting_type_code = '||p_reporting_type_code);
6276 arp_util_tax.debug('p_lookup_type = '||p_lookup_type);
6277 INSERT
6278 INTO ZX_REPORTING_CODES_B(
6279 REPORTING_CODE_ID ,
6280 EXCEPTION_CODE ,
6281 EFFECTIVE_FROM ,
6282 EFFECTIVE_TO ,
6283 RECORD_TYPE_CODE ,
6284 CREATED_BY ,
6285 CREATION_DATE ,
6286 LAST_UPDATED_BY ,
6287 LAST_UPDATE_DATE ,
6288 LAST_UPDATE_LOGIN ,
6289 REQUEST_ID ,
6290 PROGRAM_APPLICATION_ID ,
6291 PROGRAM_ID ,
6292 PROGRAM_LOGIN_ID ,
6293 REPORTING_CODE_CHAR_VALUE ,
6294 REPORTING_CODE_DATE_VALUE ,
6295 REPORTING_CODE_NUM_VALUE ,
6296 REPORTING_TYPE_ID ,
6297 OBJECT_VERSION_NUMBER
6298 )
6299 SELECT
6300 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
6301 NULL ,--EXCEPTION_CODE
6302 EFFECTIVE_FROM ,
6303 NULL ,--EFFECTIVE_TO
6304 'SEEDED' ,--RECORD_TYPE_CODE
6305 120 ,
6306 SYSDATE ,
6307 120 ,
6308 SYSDATE ,
6309 0 ,
6310 fnd_global.conc_request_id , -- Request Id
6311 fnd_global.prog_appl_id , -- Program Application ID
6312 fnd_global.conc_program_id , -- Program Id
6313 fnd_global.conc_login_id , -- Program Login ID
6314 decode(DATATYPE,'TEXT',LOOKUP_CODE,'YES_NO',LOOKUP_CODE,NULL),
6315 decode(DATATYPE,'DATE',LOOKUP_CODE,NULL),
6316 decode(DATATYPE,'NUMERIC_VALUE',LOOKUP_CODE,NULL),
6317 REPORTING_TYPE_ID,
6318 1
6319
6320 FROM
6321 (
6322 SELECT
6323 lookups.LOOKUP_CODE LOOKUP_CODE ,
6324 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
6325 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
6326 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
6327 FROM
6328 ZX_REPORTING_TYPES_B report_types,
6329 FND_LOOKUPS lookups
6330 WHERE
6331 report_types.REPORTING_TYPE_CODE = p_reporting_type_code
6332 AND report_types.RECORD_TYPE_CODE = 'SEEDED'
6333 AND lookups.LOOKUP_TYPE = p_lookup_type
6334 AND NOT EXISTS
6335 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
6336 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
6337 REPORTING_CODE_CHAR_VALUE=lookups.LOOKUP_CODE
6338 )
6339 );
6340
6341 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
6342
6343 INSERT INTO ZX_REPORTING_CODES_TL(
6344 REPORTING_CODE_ID ,
6345 LANGUAGE ,
6346 SOURCE_LANG ,
6347 REPORTING_CODE_NAME ,
6348 CREATED_BY ,
6349 CREATION_DATE ,
6350 LAST_UPDATED_BY ,
6351 LAST_UPDATE_DATE ,
6352 LAST_UPDATE_LOGIN
6353 )
6354 SELECT
6355 codes.reporting_code_id ,
6356 lookups.language ,
6357 lookups.source_lang ,
6358 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
6359 THEN Initcap(lookups.meaning)
6360 ELSE
6361 lookups.meaning
6362 END,
6363 120 ,
6364 sysdate ,
6365 120 ,
6366 sysdate ,
6367 0
6368 FROM
6369 ZX_REPORTING_TYPES_B TYPES,
6370 ZX_REPORTING_CODES_B CODES,
6371 FND_LOOKUP_VALUES lookups,
6372 FND_LANGUAGES L
6373 WHERE
6374
6375 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
6376 AND TYPES.REPORTING_TYPE_CODE = p_reporting_type_code
6377 AND lookups.LOOKUP_TYPE = p_lookup_type --Bug Fix 4930895
6378 AND CODES.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code --Bug Fix 4930895
6379 AND CODES.RECORD_TYPE_CODE = 'SEEDED'
6380 AND lookups.VIEW_APPLICATION_ID = 0
6381 AND lookups.SECURITY_GROUP_ID = 0
6382 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
6383 AND L.INSTALLED_FLAG in ('I', 'B')
6384 AND not exists
6385 (select NULL
6386 from ZX_REPORTING_CODES_TL T
6387 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
6388 and T.LANGUAGE = L.LANGUAGE_CODE);
6389
6390
6391 arp_util_tax.debug('CREATE_REPORTING_CODES(-)');
6392
6393 END CREATE_REPORTING_CODES_SEED;
6394
6395 /*=========================================================================+
6396 | PROCEDURE |
6397 | CREATE_REPORTTYPE_USAGES_SEED |
6398 | |
6399 | DESCRIPTION |
6400 | |
6401 | Used to create seeded reporting types. |
6402 | |
6403 | |
6404 | |
6405 | |
6406 | |
6407 | SCOPE - PRIVATE |
6408 | |
6409 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
6410 | |
6411 | CALLED FROM : CREATE_SEEDED_REPORTING_TYPES |
6412 | |
6413 | NOTES |
6414 | |
6415 | MODIFICATION HISTORY |
6416 | 25-May-2006 Ashwin Gurram Created. |
6417 | |
6418 |=========================================================================*/
6419
6420 PROCEDURE CREATE_REPORTTYPE_USAGES_SEED IS
6421
6422 BEGIN
6423 INSERT INTO ZX_REPORT_TYPES_USAGES(
6424 REPORTING_TYPE_USAGE_ID ,
6425 ENTITY_CODE ,
6426 ENABLED_FLAG ,
6427 CREATED_BY ,
6428 CREATION_DATE ,
6429 LAST_UPDATED_BY ,
6430 LAST_UPDATE_DATE ,
6431 LAST_UPDATE_LOGIN ,
6432 REPORTING_TYPE_ID ,
6433 OBJECT_VERSION_NUMBER
6434 )
6435 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
6436 'ZX_RATES' ,--ENTITY_CODE --Bug 5528484
6437 'Y' ,--ENABLED_FLAG
6438 120 ,--CREATED_BY
6439 SYSDATE ,--CREATION_DATE
6440 120 ,--LAST_UPDATED_BY
6441 SYSDATE ,--LAST_UPDATE_DATE
6442 0,--LAST_UPDATE_LOGIN
6443 reporting_type_id ,--REPORTING_TYPE_ID
6444 1
6445 FROM
6446 zx_reporting_types_b rep_type
6447 WHERE
6448 reporting_type_code IN
6449 (
6450 'PT_LOCATION','PT_PRD_TAXABLE_BOX','PT_PRD_REC_TAX_BOX','PT_ANL_TTL_TAXABLE_BOX',
6451 'PT_ANL_REC_TAXABLE','PT_ANL_NON_REC_TAXABLE','PT_ANL_REC_TAX_BOX','AR_DGI_TRX_CODE',
6452 'PRINT TAX LINE','AR_MUNICIPAL_JUR','AR_TURN_OVER_JUR_CODE',
6453 'CL_TAX_CODE_CLASSIF','CL_BILLS_OF_EXCH_TAX','KR_LOCATION'
6454 )
6455 AND record_type_code = 'SEEDED'
6456 AND NOT EXISTS ( select 1 from zx_report_types_usages
6457 where reporting_type_id = rep_type.reporting_type_id and
6458 entity_code = 'ZX_RATES' );
6459
6460
6461 INSERT INTO ZX_REPORT_TYPES_USAGES(
6462 REPORTING_TYPE_USAGE_ID ,
6463 ENTITY_CODE ,
6464 ENABLED_FLAG ,
6465 CREATED_BY ,
6466 CREATION_DATE ,
6467 LAST_UPDATED_BY ,
6468 LAST_UPDATE_DATE ,
6469 LAST_UPDATE_LOGIN ,
6470 REPORTING_TYPE_ID ,
6471 OBJECT_VERSION_NUMBER
6472 )
6473 SELECT zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
6474 'ZX_PARTY_TAX_PROFILE' ,--ENTITY_CODE
6475 'Y' ,--ENABLED_FLAG
6476 120 ,--CREATED_BY
6477 SYSDATE ,--CREATION_DATE
6478 120 ,--LAST_UPDATED_BY
6479 SYSDATE ,--LAST_UPDATE_DATE
6480 0,--LAST_UPDATE_LOGIN
6481 reporting_type_id ,--REPORTING_TYPE_ID
6482 1
6483 FROM
6484 zx_reporting_types_b rep_type
6485 WHERE
6486 reporting_type_code IN ('FISCAL PRINTER','CAI NUMBER')
6487 AND record_type_code = 'SEEDED'
6488 AND NOT EXISTS ( select 1 from zx_report_types_usages
6489 where reporting_type_id = rep_type.reporting_type_id and
6490 entity_code = 'ZX_PARTY_TAX_PROFILE' );
6491
6492 END CREATE_REPORTTYPE_USAGES_SEED;
6493
6494 /*=========================================================================+
6495 | PROCEDURE |
6496 | CREATE_SEEDED_REPORTING_TYPES |
6497 | |
6498 | DESCRIPTION |
6499 | |
6500 | Used to create the reporting types FOR SEED data from UI |
6501 | called from the Country defaults UI. |
6502 | |
6503 | SCOPE - PUBLIC |
6504 | |
6505 | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
6506 | |
6507 | CALLED FROM : Country Defaults UI |
6508 | |
6509 | NOTES |
6510 | |
6511 | MODIFICATION HISTORY |
6512 | 19-May-06 Ashwin Gurram Created. |
6513 | |
6514 |=========================================================================*/
6515
6516 PROCEDURE CREATE_SEEDED_REPORTING_TYPES
6517 (
6518 p_country_code IN VARCHAR2,
6519 x_return_status OUT NOCOPY VARCHAR2
6520 ) IS
6521 l_lookup_code varchar2(1);
6522
6523 BEGIN
6524 x_return_status := 'S';
6525
6526 IF ( p_country_code = 'PT' ) THEN
6527 --Create Reporting Types
6528 CREATE_REPORT_TYPE_SEED('PT_LOCATION','TEXT','Y');
6529 CREATE_REPORT_TYPE_SEED('PT_PRD_TAXABLE_BOX','TEXT','N');
6530 CREATE_REPORT_TYPE_SEED('PT_PRD_REC_TAX_BOX','TEXT','N');
6531 CREATE_REPORT_TYPE_SEED('PT_ANL_TTL_TAXABLE_BOX','TEXT','N');
6532 CREATE_REPORT_TYPE_SEED('PT_ANL_REC_TAXABLE','TEXT','N');
6533 CREATE_REPORT_TYPE_SEED('PT_ANL_NON_REC_TAXABLE','TEXT','N');
6534 CREATE_REPORT_TYPE_SEED('PT_ANL_REC_TAX_BOX','TEXT','N');
6535
6536 -- Create Reporting Codes
6537 FOR i IN 1..3
6538 LOOP
6539 IF ( i = 1 ) THEN l_lookup_code := 'A' ;
6540 ELSIF ( i = 2 ) THEN l_lookup_code := 'C';
6541 ELSE l_lookup_code := 'M';
6542 END IF ;
6543
6544 INSERT
6545 INTO ZX_REPORTING_CODES_B(
6546 REPORTING_CODE_ID ,
6547 EXCEPTION_CODE ,
6548 EFFECTIVE_FROM ,
6549 EFFECTIVE_TO ,
6550 RECORD_TYPE_CODE ,
6551 CREATED_BY ,
6552 CREATION_DATE ,
6553 LAST_UPDATED_BY ,
6554 LAST_UPDATE_DATE ,
6555 LAST_UPDATE_LOGIN ,
6556 REQUEST_ID ,
6557 PROGRAM_APPLICATION_ID ,
6558 PROGRAM_ID ,
6559 PROGRAM_LOGIN_ID ,
6560 REPORTING_CODE_CHAR_VALUE ,
6561 REPORTING_CODE_DATE_VALUE ,
6562 REPORTING_CODE_NUM_VALUE ,
6563 REPORTING_TYPE_ID ,
6564 OBJECT_VERSION_NUMBER
6565 )
6566 SELECT
6567 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
6568 NULL ,--EXCEPTION_CODE
6569 report_types.EFFECTIVE_FROM ,
6570 NULL ,--EFFECTIVE_TO
6571 'SEEDED' ,--RECORD_TYPE_CODE
6572 120 ,
6573 SYSDATE ,
6574 120 ,
6575 SYSDATE ,
6576 0 ,
6577 fnd_global.conc_request_id , -- Request Id
6578 fnd_global.prog_appl_id , -- Program Application ID
6579 fnd_global.conc_program_id , -- Program Id
6580 fnd_global.conc_login_id , -- Program Login ID
6581 l_lookup_code,
6582 NULL,
6583 NULL,
6584 report_types.REPORTING_TYPE_ID,
6585 1
6586 FROM
6587 ZX_REPORTING_TYPES_B report_types
6588 WHERE
6589 report_types.REPORTING_TYPE_CODE = 'PT_LOCATION'
6590 AND report_types.RECORD_TYPE_CODE = 'SEEDED'
6591 AND NOT EXISTS
6592 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
6593 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
6594 REPORTING_CODE_CHAR_VALUE= l_lookup_code
6595 );
6596 END LOOP ;
6597
6598 --Create Reporting Codes TL for PT_LOCATION
6599 INSERT INTO ZX_REPORTING_CODES_TL(
6600 REPORTING_CODE_ID ,
6601 LANGUAGE ,
6602 SOURCE_LANG ,
6603 REPORTING_CODE_NAME ,
6604 CREATED_BY ,
6605 CREATION_DATE ,
6606 LAST_UPDATED_BY ,
6607 LAST_UPDATE_DATE ,
6608 LAST_UPDATE_LOGIN
6609 )
6610 SELECT
6611 codes.reporting_code_id,
6612 L.LANGUAGE_CODE ,
6613 userenv('LANG') ,
6614 CASE
6615 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'A'
6616 THEN Initcap('ACORES')
6617 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'C'
6618 THEN Initcap('CONTINENTE')
6619 WHEN CODES.REPORTING_CODE_CHAR_VALUE = 'M'
6620 THEN Initcap('MADEIRA')
6621 ELSE
6622 CASE WHEN CODES.REPORTING_CODE_CHAR_VALUE = UPPER(CODES.REPORTING_CODE_CHAR_VALUE)
6623 THEN Initcap(CODES.REPORTING_CODE_CHAR_VALUE)
6624 ELSE
6625 CODES.REPORTING_CODE_CHAR_VALUE
6626 END
6627 END ,--REPORTING_CODE_NAME
6628 120 ,
6629 SYSDATE ,
6630 120 ,
6631 SYSDATE ,
6632 0
6633 FROM
6634 ZX_REPORTING_CODES_B CODES,
6635 FND_LANGUAGES L
6636 WHERE
6637 CODES.RECORD_TYPE_CODE = 'SEEDED'
6638 AND codes.reporting_type_id = ( SELECT reporting_type_id FROM ZX_REPORTING_TYPES_B
6639 WHERE REPORTING_TYPE_CODE = 'PT_LOCATION' AND record_type_code = 'SEEDED' )
6640 AND L.INSTALLED_FLAG in ('I', 'B')
6641 AND not exists
6642 (select NULL
6643 from ZX_REPORTING_CODES_TL T
6644 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
6645 and T.LANGUAGE = L.LANGUAGE_CODE);
6646 END IF ;
6647
6648 IF ( p_country_code = 'AR') THEN
6649 CREATE_REPORT_TYPE_SEED('AR_DGI_TRX_CODE','TEXT','Y');
6650 CREATE_REPORT_TYPE_SEED('PRINT TAX LINE','YES_NO','N');
6651 CREATE_REPORT_TYPE_SEED('AR_MUNICIPAL_JUR','TEXT','N');
6652 CREATE_REPORT_TYPE_SEED('AR_TURN_OVER_JUR_CODE','TEXT','Y');
6653 CREATE_REPORT_TYPE_SEED('FISCAL PRINTER','YES_NO','N');
6654 CREATE_REPORT_TYPE_SEED('CAI NUMBER','TEXT','N'); --bug6430516
6655
6656 CREATE_REPORTING_CODES_SEED('AR_DGI_TRX_CODE','JLZZ_AP_DGI_TRX_CODE');
6657 CREATE_REPORTING_CODES_SEED('AR_TURN_OVER_JUR_CODE','JLZZ_AR_TO_JURISDICTION_CODE');
6658 END IF ;
6659
6660 IF ( p_country_code = 'CL') THEN
6661 CREATE_REPORT_TYPE_SEED('CL_TAX_CODE_CLASSIF','TEXT','Y');
6662 CREATE_REPORT_TYPE_SEED('CL_BILLS_OF_EXCH_TAX','YES_NO','N');
6663 CREATE_REPORT_TYPE_SEED('CL_DEBIT_ACCOUNT','TEXT','N');
6664
6665 CREATE_REPORTING_CODES_SEED('CL_TAX_CODE_CLASSIF','JLCL_TAX_CODE_CLASS');
6666
6667 END IF ;
6668
6669 IF ( p_country_code = 'CZ') THEN
6670 CREATE_REPORT_TYPE_SEED('CZ_TAX_ORIGIN','TEXT','Y');
6671
6672 CREATE_REPORTING_CODES_SEED('CZ_TAX_ORIGIN','JGZZ_TAX_ORIGIN');
6673 END IF ;
6674
6675 IF ( p_country_code = 'HU') THEN
6676 CREATE_REPORT_TYPE_SEED('HU_TAX_ORIGIN','TEXT','Y');
6677
6678 CREATE_REPORTING_CODES_SEED('HU_TAX_ORIGIN','JGZZ_TAX_ORIGIN');
6679 END IF ;
6680
6681 IF ( p_country_code = 'PL') THEN
6682 CREATE_REPORT_TYPE_SEED('PL_TAX_ORIGIN','TEXT','Y');
6683
6684 CREATE_REPORTING_CODES_SEED('PL_TAX_ORIGIN','JGZZ_TAX_ORIGIN');
6685 END IF ;
6686
6687 IF ( p_country_code = 'CH') THEN
6688 CREATE_REPORT_TYPE_SEED('CH_VAT_REGIME','TEXT','Y');
6689
6690 CREATE_REPORTING_CODES_SEED('CH_VAT_REGIME','JECH_VAT_REGIME');
6691 END IF ;
6692
6693 IF ( p_country_code = 'TW') THEN
6694 CREATE_REPORT_TYPE_SEED('TW_GOVERNMENT_TAX_TYPE','TEXT','Y');
6695
6696 --Create Reporting Codes
6697 INSERT
6698 INTO ZX_REPORTING_CODES_B(
6699 REPORTING_CODE_ID ,
6700 EXCEPTION_CODE ,
6701 EFFECTIVE_FROM ,
6702 EFFECTIVE_TO ,
6703 RECORD_TYPE_CODE ,
6704 CREATED_BY ,
6705 CREATION_DATE ,
6706 LAST_UPDATED_BY ,
6707 LAST_UPDATE_DATE ,
6708 LAST_UPDATE_LOGIN ,
6709 REQUEST_ID ,
6710 PROGRAM_APPLICATION_ID ,
6711 PROGRAM_ID ,
6712 PROGRAM_LOGIN_ID ,
6713 REPORTING_CODE_CHAR_VALUE ,
6714 REPORTING_CODE_DATE_VALUE ,
6715 REPORTING_CODE_NUM_VALUE ,
6716 REPORTING_TYPE_ID ,
6717 OBJECT_VERSION_NUMBER
6718 )
6719 SELECT
6720 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
6721 NULL ,--EXCEPTION_CODE
6722 EFFECTIVE_FROM ,
6723 NULL ,--EFFECTIVE_TO
6724 'SEEDED' ,--RECORD_TYPE_CODE
6725 120 ,
6726 SYSDATE ,
6727 120 ,
6728 SYSDATE ,
6729 0 ,
6730 fnd_global.conc_request_id , -- Request Id
6731 fnd_global.prog_appl_id , -- Program Application ID
6732 fnd_global.conc_program_id , -- Program Id
6733 fnd_global.conc_login_id , -- Program Login ID
6734 decode(DATATYPE,'TEXT',LOOKUP_CODE,'YES_NO',LOOKUP_CODE,NULL),
6735 decode(DATATYPE,'DATE',LOOKUP_CODE,NULL),
6736 decode(DATATYPE,'NUMERIC_VALUE',LOOKUP_CODE,NULL),
6737 REPORTING_TYPE_ID,
6738 1
6739
6740 FROM
6741 (
6742 SELECT
6743 lookups.LOOKUP_CODE LOOKUP_CODE ,
6744 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
6745 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
6746 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
6747 FROM
6748 ZX_REPORTING_TYPES_B report_types,
6749 JA_LOOKUPS lookups
6750 WHERE
6751 report_types.REPORTING_TYPE_CODE = 'TW_GOVERNMENT_TAX_TYPE'
6752 AND report_types.RECORD_TYPE_CODE = 'SEEDED'
6753 AND lookups.LOOKUP_TYPE = 'JATW_GOVERNMENT_TAX_TYPE'
6754 AND NOT EXISTS
6755 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
6756 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
6757 REPORTING_CODE_CHAR_VALUE=lookups.LOOKUP_CODE
6758 )
6759 );
6760
6761 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
6762
6763 INSERT INTO ZX_REPORTING_CODES_TL(
6764 REPORTING_CODE_ID ,
6765 LANGUAGE ,
6766 SOURCE_LANG ,
6767 REPORTING_CODE_NAME ,
6768 CREATED_BY ,
6769 CREATION_DATE ,
6770 LAST_UPDATED_BY ,
6771 LAST_UPDATE_DATE ,
6772 LAST_UPDATE_LOGIN
6773 )
6774 SELECT
6775 codes.reporting_code_id ,
6776 lookups.language ,
6777 lookups.source_lang ,
6778 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
6779 THEN Initcap(lookups.meaning)
6780 ELSE
6781 lookups.meaning
6782 END,
6783 120 ,
6784 sysdate ,
6785 120 ,
6786 sysdate ,
6787 0
6788 FROM
6789 ZX_REPORTING_TYPES_B TYPES,
6790 ZX_REPORTING_CODES_B CODES,
6791 FND_LOOKUP_VALUES lookups,
6792 FND_LANGUAGES L
6793 WHERE
6794
6795 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
6796 AND TYPES.REPORTING_TYPE_CODE = 'TW_GOVERNMENT_TAX_TYPE'
6797 AND lookups.LOOKUP_TYPE = 'JATW_GOVERNMENT_TAX_TYPE'
6798 AND CODES.REPORTING_CODE_CHAR_VALUE = lookups.lookup_code
6799 AND CODES.RECORD_TYPE_CODE = 'SEEDED'
6800 AND lookups.VIEW_APPLICATION_ID = 7000 -- Pl note Application id is different here.
6801 AND lookups.SECURITY_GROUP_ID = 0
6802 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
6803 AND L.INSTALLED_FLAG in ('I', 'B')
6804 AND not exists
6805 (select NULL
6806 from ZX_REPORTING_CODES_TL T
6807 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
6808 and T.LANGUAGE = L.LANGUAGE_CODE);
6809
6810 END IF ;
6811
6812 IF ( p_country_code = 'KR') THEN
6813 CREATE_REPORT_TYPE_SEED('KR_BUSINESS_LOCATIONS','TEXT','Y'); ----bug6430516
6814 CREATE_REPORT_TYPE_SEED('KR_LOCATION','TEXT','Y');
6815
6816 END IF ;
6817
6818 IF ( p_country_code = 'BR') THEN
6819 CREATE_REPORT_TYPE_SEED('PRINT TAX LINE ','YES_NO','N');
6820
6821 END IF ;
6822
6823 IF ( p_country_code = 'CO' ) THEN
6824 CREATE_REPORT_TYPE_SEED('PRINT TAX LINE ','YES_NO','N');
6825
6826 END IF ;
6827
6828 --Create Reporting Types Usages
6829 CREATE_REPORTTYPE_USAGES_SEED;
6830
6831 EXCEPTION
6832 WHEN OTHERS THEN
6833 --NULL ;
6834 x_return_status := 'E';
6835 END CREATE_SEEDED_REPORTING_TYPES;
6836 /*===========================================================================+
6837 | Procedure: CREATE_REPORT_TYPES_USAGES |
6838 | Description: This is the procedure that creates report_types_usages |
6839 | for the following reporting types |
6840 | PL_TAX_ORIGIN |
6841 | CH_VAT_REGIME |
6842 | CL_DEBIT_ACCOUNT |
6843 | HU_TAX_ORIGIN |
6844 | CZ_TAX_ORIGIN |
6845 | TW_GOVERNMENT_TAX_TYPE |
6846 | |
6847 | ARGUMENTS : |
6848 | |
6849 | NOTES |
6850 | |
6851 | History |
6852 | 29-Sep-04 Arnab Created |
6853 | |
6854 +===========================================================================*/
6855
6856 PROCEDURE CREATE_REPORT_TYPES_USAGES
6857 IS
6858 BEGIN
6859 INSERT INTO ZX_REPORT_TYPES_USAGES(
6860 REPORTING_TYPE_USAGE_ID ,
6861 REPORTING_TYPE_ID ,
6862 ENTITY_CODE ,
6863 ENABLED_FLAG ,
6864 CREATED_BY ,
6865 CREATION_DATE ,
6866 LAST_UPDATED_BY ,
6867 LAST_UPDATE_DATE ,
6868 LAST_UPDATE_LOGIN ,
6869 OBJECT_VERSION_NUMBER
6870 )
6871 SELECT
6872 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
6873 types.reporting_type_id ,--REPORTING_TYPE_ID
6874 lookups.lookup_code ,--ENTITY_CODE
6875 DECODE(lookups.lookup_code,
6876 'ZX_RATES','Y',
6877 'N') ,--ENABLED_FLAG
6878 fnd_global.user_id ,
6879 SYSDATE ,
6880 fnd_global.user_id ,
6881 SYSDATE ,
6882 fnd_global.conc_login_id,
6883 1
6884 FROM
6885 zx_reporting_types_b types,
6886 fnd_lookups lookups
6887
6888 WHERE
6889 types.reporting_type_code IN('PL_TAX_ORIGIN',
6890 'CH_VAT_REGIME',
6891 'CL_DEBIT_ACCOUNT',
6892 'HU_TAX_ORIGIN',
6893 'CZ_TAX_ORIGIN',
6894 'TW_GOVERNMENT_TAX_TYPE'
6895 )
6896 AND types.record_type_code = 'MIGRATED'
6897
6898 AND lookups.LOOKUP_TYPE = 'ZX_REPORTING_TABLE_USE'
6899
6900 AND NOT EXISTS ( select 1 from zx_report_types_usages
6901 where reporting_type_id = types.reporting_type_id
6902 and entity_code = lookups.lookup_code );
6903
6904 INSERT INTO ZX_REPORT_TYPES_USAGES(
6905 REPORTING_TYPE_USAGE_ID ,
6906 REPORTING_TYPE_ID,
6907 ENTITY_CODE ,
6908 ENABLED_FLAG ,
6909 CREATED_BY ,
6910 CREATION_DATE ,
6911 LAST_UPDATED_BY ,
6912 LAST_UPDATE_DATE ,
6913 LAST_UPDATE_LOGIN ,
6914 OBJECT_VERSION_NUMBER
6915 )
6916 SELECT
6917 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
6918 types.reporting_type_id ,--REPORTING_TYPE_ID
6919 lookups.lookup_code ,--ENTITY_CODE
6920 DECODE(lookups.lookup_code,
6921 'ZX_PARTY_TAX_PROFILE','Y',
6922 'N') ,--ENABLED_FLAG
6923 fnd_global.user_id ,
6924 SYSDATE ,
6925 fnd_global.user_id ,
6926 SYSDATE ,
6927 fnd_global.conc_login_id,
6928 1
6929 FROM
6930 zx_reporting_types_b types,
6931 fnd_lookups lookups
6932
6933 WHERE
6934 types.reporting_type_code IN('MEMBER STATE',
6935 'AR-SYSTEM-PARAM-REG-NUM',
6939 'JE - REG NUMBER'
6936 'JA - REG NUMBER',
6937 'FSO-REG-NUM',
6938 'JE - REG NUMBER',
6940 )
6941 AND types.record_type_code = 'MIGRATED'
6942
6943 AND lookups.LOOKUP_TYPE = 'ZX_REPORTING_TABLE_USE'
6944
6945 AND NOT EXISTS ( select 1 from zx_report_types_usages
6946 where reporting_type_id = types.reporting_type_id
6947 and entity_code = lookups.lookup_code );
6948
6949
6950 END;
6951
6952 /*Code included for EMEA VAT reporting */
6953
6954 /*==========================================================================+
6955 | Procedure: CREATE_REPORTING_TYPE_EMEA |
6956 | Description: This is the procedure that creates reporting_type |
6957 | EMEA_VAT_REPORTING_TYPE |
6958 | for the following EMEA countries |
6959 | BE,CH,CZ, |
6960 | DE,ES,FR, |
6961 | HU,IT,KP, |
6962 | KR,NO,PL, |
6963 | PT,SK |
6964 | |
6965 | ARGUMENTS : |
6966 | |
6967 | NOTES |
6968 | |
6969 | History |
6970 | 29-Sep-04 Taniya Created |
6971 | |
6972 +===========================================================================*/
6973
6974 PROCEDURE CREATE_REPORTING_TYPE_EMEA
6975 IS
6976 BEGIN
6977 arp_util_tax.debug('CREATE_REPORTING_TYPE_EMEA(+)');
6978 arp_util_tax.debug('p_reporting_type_code = '||'EMEA_VAT_REPORTING_TYPE');
6979 INSERT
6980 WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
6981 where reporting_type_code= 'EMEA_VAT_REPORTING_TYPE'
6982 and tax_regime_code is NULL)
6983 ) THEN
6984 INTO ZX_REPORTING_TYPES_B(
6985 REPORTING_TYPE_ID ,
6986 REPORTING_TYPE_CODE ,
6987 REPORTING_TYPE_DATATYPE_CODE ,
6988 TAX_REGIME_CODE ,
6989 TAX ,
6990 FORMAT_MASK ,
6991 MIN_LENGTH ,
6992 MAX_LENGTH ,
6993 LEGAL_MESSAGE_FLAG ,
6994 EFFECTIVE_FROM ,
6995 EFFECTIVE_TO ,
6996 RECORD_TYPE_CODE ,
6997 HAS_REPORTING_CODES_FLAG ,
6998 CREATED_BY ,
6999 CREATION_DATE ,
7000 LAST_UPDATED_BY ,
7001 LAST_UPDATE_DATE ,
7002 LAST_UPDATE_LOGIN ,
7003 REQUEST_ID ,
7004 PROGRAM_APPLICATION_ID ,
7005 PROGRAM_ID ,
7006 PROGRAM_LOGIN_ID ,
7007 OBJECT_VERSION_NUMBER
7008 )
7009 VALUES(
7010 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
7011 'EMEA_VAT_REPORTING_TYPE' ,--REPORTING_TYPE_CODE
7012 --'VARCHAR' ,--REPORTING_TYPE_DATATYPE
7013 'TEXT' ,--REPORTING_TYPE_DATATYPE (Bug6430516)
7014 NULL ,--TAX_REGIME_CODE
7015 NULL ,--TAX
7016 NULL ,--FORMAT_MASK
7017 1 ,--MIN_LENGTH
7018 30 ,--MAX_LENGTH
7019 'N' ,--LEGAL_MESSAGE_FLAG
7020 effective_from ,--EFFECTIVE_FROM
7021 NULL ,--EFFECTIVE_TO
7022 'MIGRATED' ,--RECORD_TYPE_CODE
7023 'Y' ,--HAS_REPORTING_CODES_FLAG
7024 fnd_global.user_id ,--CREATED_BY
7025 SYSDATE ,--CREATION_DATE
7026 fnd_global.user_id ,--LAST_UPDATED_BY
7027 SYSDATE ,--LAST_UPDATE_DATE
7028 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7029 fnd_global.conc_request_id ,--REQUEST_ID
7030 fnd_global.prog_appl_id ,--PROGRAM_APPLICATION_ID
7031 fnd_global.conc_program_id ,--PROGRAM_ID
7032 fnd_global.conc_login_id ,--PROGRAM_LOGIN_ID
7033 1 --OBJECT_VERSION_NUMBER
7034 )
7035 SELECT min(zx_rates.effective_from) effective_from
7036 FROM zx_rates_b zx_rates,
7037 zx_regimes_b zx_regimes
7038 WHERE zx_rates.tax_regime_code = zx_regimes.tax_regime_code
7039 AND zx_regimes.country_code in ('BE','CH','CZ','DE','ES','FR','HU',
7040 'IT','KP','KR','NO','PL','PT','SK', 'IL')
7041 AND zx_rates.record_type_code = 'MIGRATED';
7042
7043 arp_util_tax.debug('Inserting into ZX_REPORTING_TYPES_TL table');
7044
7045 INSERT INTO ZX_REPORTING_TYPES_TL(
7046 REPORTING_TYPE_ID ,
7047 LANGUAGE ,
7048 SOURCE_LANG ,
7049 REPORTING_TYPE_NAME ,
7050 CREATED_BY ,
7051 CREATION_DATE ,
7052 LAST_UPDATED_BY ,
7053 LAST_UPDATE_DATE ,
7054 LAST_UPDATE_LOGIN
7055 )
7059 userenv('LANG') ,
7056 SELECT
7057 REPORTING_TYPE_ID ,
7058 LANGUAGE_CODE ,
7060 'EMEA VAT Reporting Type' ,
7061 fnd_global.user_id ,
7062 SYSDATE ,
7063 fnd_global.user_id ,
7064 SYSDATE ,
7065 fnd_global.conc_login_id
7066 FROM
7067 (
7068 SELECT
7069 TYPES.REPORTING_TYPE_ID ,
7070 L.LANGUAGE_CODE
7071 FROM
7072 ZX_REPORTING_TYPES_B TYPES,
7073 FND_LANGUAGES L
7074 WHERE TYPES.RECORD_TYPE_CODE = 'MIGRATED'
7075 AND TYPES.REPORTING_TYPE_CODE = 'EMEA_VAT_REPORTING_TYPE'
7076 AND L.INSTALLED_FLAG in ('I', 'B')
7077 ) TYPES
7078
7079 WHERE not exists
7080 (select NULL
7081 from ZX_REPORTING_TYPES_TL T
7082 where T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
7083 and T.LANGUAGE = TYPES.LANGUAGE_CODE);
7084
7085 arp_util_tax.debug('CREATE_REPORTING_TYPE_EMEA(-)');
7086
7087 END CREATE_REPORTING_TYPE_EMEA;
7088
7089 /*==========================================================================+
7090 | Procedure: CREATE_REPORT_TYP_USAGES_EMEA |
7091 | Description: This is the procedure that creates report_type_usages |
7092 | for the reporting type EMEA_VAT_REPORTING_TYPE |
7093 | |
7094 | ARGUMENTS : |
7095 | |
7096 | NOTES |
7097 | |
7098 | History |
7099 | 29-Sep-04 Taniya Created |
7100 | |
7101 +===========================================================================*/
7102
7103 PROCEDURE CREATE_REPORT_TYP_USAGES_EMEA
7104 IS
7105 BEGIN
7106 arp_util_tax.debug('CREATE_REPORT_TYP_USAGES_EMEA(+)');
7107
7108 INSERT INTO ZX_REPORT_TYPES_USAGES(
7109 REPORTING_TYPE_USAGE_ID,
7110 REPORTING_TYPE_ID ,
7111 ENTITY_CODE ,
7112 ENABLED_FLAG ,
7113 CREATED_BY ,
7114 CREATION_DATE ,
7115 LAST_UPDATED_BY ,
7116 LAST_UPDATE_DATE ,
7117 LAST_UPDATE_LOGIN ,
7118 OBJECT_VERSION_NUMBER
7119 )
7120 SELECT
7121 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
7122 types.reporting_type_id ,--REPORTING_TYPE_ID
7123 'ZX_RATES' ,--ENTITY_CODE
7124 'Y' ,--ENABLED_FLAG
7125 fnd_global.user_id ,--CREATED_BY
7126 SYSDATE ,--CREATION_DATE
7127 fnd_global.user_id ,--LAST_UPDATED_BY
7128 SYSDATE ,--LAST_UPDATE_DATE
7129 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7130 1 --OBJECT_VERSION_NUMBER
7131 FROM
7132 zx_reporting_types_b types
7133 WHERE types.reporting_type_code IN('EMEA_VAT_REPORTING_TYPE')
7134 --AND types.record_type_code = 'MIGRATED'
7135 AND NOT EXISTS ( select 1 from zx_report_types_usages
7136 where reporting_type_id = types.reporting_type_id
7137 and entity_code = 'ZX_RATES');
7138
7139 arp_util_tax.debug('CREATE_REPORT_TYP_USAGES_EMEA(-)');
7140
7141 END CREATE_REPORT_TYP_USAGES_EMEA;
7142
7143 /*==========================================================================+
7144 | Procedure: CREATE_REPORTING_CODES_EMEA |
7145 | Description: This is the procedure that creates reporting_codes |
7146 | for the reporting type EMEA_VAT_REPORTING_TYPE |
7147 | and lookup_type ZX_TAX_TYPE_CATEGORY |
7148 | |
7149 | ARGUMENTS : |
7150 | |
7151 | NOTES |
7152 | |
7153 | History |
7154 | 29-Sep-04 Taniya Created |
7155 | |
7156 +===========================================================================*/
7157
7158 PROCEDURE CREATE_REPORTING_CODES_EMEA
7159 IS
7160 BEGIN
7161 arp_util_tax.debug('CREATE_REPORTING_CODES_EMEA(+)');
7162 arp_util_tax.debug('p_reporting_type_code = '||'EMEA_VAT_REPORTING_TYPE');
7163 arp_util_tax.debug('p_lookup_type = '||'ZX_TAX_TYPE_CATEGORY');
7164 INSERT
7165 INTO ZX_REPORTING_CODES_B(
7166 REPORTING_CODE_ID ,
7167 EXCEPTION_CODE ,
7168 EFFECTIVE_FROM ,
7169 EFFECTIVE_TO ,
7170 RECORD_TYPE_CODE ,
7171 CREATED_BY ,
7172 CREATION_DATE ,
7173 LAST_UPDATED_BY ,
7174 LAST_UPDATE_DATE ,
7175 LAST_UPDATE_LOGIN ,
7176 REQUEST_ID ,
7177 PROGRAM_APPLICATION_ID ,
7178 PROGRAM_ID ,
7179 PROGRAM_LOGIN_ID ,
7180 REPORTING_CODE_CHAR_VALUE ,
7181 REPORTING_CODE_DATE_VALUE ,
7182 REPORTING_CODE_NUM_VALUE ,
7183 REPORTING_TYPE_ID ,
7184 OBJECT_VERSION_NUMBER
7185 )
7186 SELECT
7187 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
7188 NULL ,--EXCEPTION_CODE
7189 EFFECTIVE_FROM ,--EFFECTIVE_FROM
7190 NULL ,--EFFECTIVE_TO
7191 'MIGRATED' ,--RECORD_TYPE_CODE
7192 fnd_global.user_id ,--CREATED_BY
7193 SYSDATE ,--CREATION_DATE
7194 fnd_global.user_id ,--LAST_UPDATED_BY
7195 SYSDATE ,--LAST_UPDATE_DATE
7196 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7197 fnd_global.conc_request_id ,--REQUEST_ID
7198 fnd_global.prog_appl_id ,--PROGRAM_APPLICATION_ID
7199 fnd_global.conc_program_id ,--PROGRAM_ID
7200 fnd_global.conc_login_id ,--PROGRAM_LOGIN_ID
7201 DECODE(DATATYPE,'TEXT',REPORTING_CODE_CHAR_VALUE,NULL),--REPORTING_CODE_CHAR_VALUE --Bug#6615621
7202 NULL ,--REPORTING_CODE_DATE_VALUE
7203 NULL ,--REPORTING_CODE_NUM_VALUE
7204 REPORTING_TYPE_ID ,--REPORTING_TYPE_ID
7205 1 --OBJECT_VERSION_NUMBER
7206
7207 FROM
7208 (
7209 SELECT
7210 DISTINCT Decode (lookup_code,
7211 'SALES','SALES_TAX',
7212 'Exempt Vat','EXEMPT',
7213 'SERV','SERVICES',
7214 Upper(lookup_code)) REPORTING_CODE_CHAR_VALUE,
7215 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
7216 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
7217 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
7218 FROM
7219 ZX_REPORTING_TYPES_B report_types,
7220 FND_LOOKUPS lookups
7221 WHERE
7222 report_types.REPORTING_TYPE_CODE = 'EMEA_VAT_REPORTING_TYPE'
7223 --AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
7224 AND lookups.LOOKUP_TYPE = 'ZX_TAX_TYPE_CATEGORY'
7225 --Consider only the following lookup_codes
7226 AND lookups.LOOKUP_CODE IN ('EXEMPT','LOCATION','NON TAXABLE','SALES_TAX',
7227 'VAT','Custom Bill','Exempt Vat','ICMS','IPI',
7228 'Non Taxable','SALES','Self Invoice','USE',
7229 'SERVICES','SERV','INTER EC','VAT-A','VAT-S',
7230 'VAT-KA','VAT-KS','VAT-RA','VAT-RS','VAT-NO-REP',
7231 'IL_VAT_EXEMPT','IL_VAT','VAT-C','VAT-P','VAT-H','VAT-0',
7232 'VAT-L','VAT-M','VAT-Y','VAT-I','VAT-EXEMPT')
7233 AND NOT EXISTS
7234 (SELECT 1 FROM ZX_REPORTING_CODES_B WHERE
7235 REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID AND
7236 REPORTING_CODE_CHAR_VALUE = DECODE(lookups.LOOKUP_CODE,
7237 'SALES','SALES_TAX',
7238 'Exempt Vat','EXEMPT',
7239 'SERV','SERVICES',
7240 UPPER(lookups.lookup_code))
7241 )
7242 );
7243
7244 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
7245
7246 INSERT INTO ZX_REPORTING_CODES_TL(
7247 REPORTING_CODE_ID ,
7248 LANGUAGE ,
7249 SOURCE_LANG ,
7250 REPORTING_CODE_NAME ,
7251 CREATED_BY ,
7252 CREATION_DATE ,
7253 LAST_UPDATED_BY ,
7254 LAST_UPDATE_DATE ,
7255 LAST_UPDATE_LOGIN
7256 )
7257 SELECT
7258 codes.reporting_code_id ,
7259 lookups.language ,
7260 lookups.source_lang ,
7261 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
7262 THEN Initcap(lookups.meaning)
7263 ELSE
7264 lookups.meaning
7265 END,
7266 fnd_global.user_id ,
7267 sysdate ,
7268 fnd_global.user_id ,
7269 sysdate ,
7270 fnd_global.conc_login_id
7271 FROM
7272 ZX_REPORTING_TYPES_B TYPES,
7273 ZX_REPORTING_CODES_B CODES,
7274 FND_LOOKUP_VALUES lookups,
7275 FND_LANGUAGES L
7276 WHERE
7277
7278 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
7279 AND TYPES.REPORTING_TYPE_CODE = 'EMEA_VAT_REPORTING_TYPE'
7280 AND lookups.LOOKUP_TYPE = 'ZX_TAX_TYPE_CATEGORY'
7281 AND CODES.REPORTING_CODE_CHAR_VALUE = Decode(lookups.lookup_code,
7282 'Exempt',NULL,
7283 'Non Taxable', NULL,
7284 'SERV',NULL,
7285 'SALES',NULL,
7286 'Exempt Vat',NULL,
7287 Upper(lookups.lookup_code))
7288 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
7289 AND lookups.VIEW_APPLICATION_ID = 0
7290 AND lookups.SECURITY_GROUP_ID = 0
7291 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
7292 AND L.INSTALLED_FLAG in ('I', 'B')
7293 AND not exists
7294 (select NULL
7295 from ZX_REPORTING_CODES_TL T
7296 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
7297 and T.LANGUAGE = L.LANGUAGE_CODE);
7298
7299 arp_util_tax.debug('CREATE_REPORTING_CODES_EMEA(-)');
7300
7301 END CREATE_REPORTING_CODES_EMEA;
7302
7303 /*==========================================================================+
7304 | Procedure: CREATE_REP_CODE_ASSOC_EMEA |
7305 | Description: This is the procedure that creates reporting_codes |
7306 | for the reporting type EMEA_VAT_REPORTING_TYPE, |
7307 | for both AP and AR rates |
7308 | |
7309 | ARGUMENTS : |
7310 | |
7311 | NOTES |
7312 | |
7313 | History |
7314 | 29-Sep-04 Taniya Created |
7315 | |
7316 +===========================================================================*/
7317
7318 PROCEDURE CREATE_REP_CODE_ASSOC_EMEA
7319 IS
7320 BEGIN
7321 arp_util_tax.debug('CREATE_REP_CODE_ASSOC_EMEA(+)');
7322 arp_util_tax.debug('p_reporting_type_code = '||'EMEA_VAT_REPORTING_TYPE');
7323
7324 arp_util_tax.debug('Inserting into ZX_REPORT_CODES_ASSOC table for AP tax codes');
7325
7326 INSERT
7327 INTO ZX_REPORT_CODES_ASSOC(
7328 REPORTING_CODE_ASSOC_ID,
7329 ENTITY_CODE ,
7330 ENTITY_ID ,
7331 REPORTING_TYPE_ID ,
7332 REPORTING_CODE_ID ,
7333 EXCEPTION_CODE ,
7334 EFFECTIVE_FROM ,
7335 EFFECTIVE_TO ,
7336 CREATED_BY ,
7337 CREATION_DATE ,
7338 LAST_UPDATED_BY ,
7339 LAST_UPDATE_DATE ,
7340 LAST_UPDATE_LOGIN ,
7341 REPORTING_CODE_CHAR_VALUE,
7342 REPORTING_CODE_DATE_VALUE,
7343 REPORTING_CODE_NUM_VALUE,
7344 OBJECT_VERSION_NUMBER
7345 )
7346 SELECT
7347 ZX_REPORT_CODES_ASSOC_S.nextval ,
7348 'ZX_RATES' ,--ENTITY_CODE
7349 rates.TAX_RATE_ID ,--ENTITY_ID
7350 report_codes.REPORTING_TYPE_ID, --REPORTING_TYPE_ID
7351 report_codes.REPORTING_CODE_ID ,--REPORTING_CODE_ID
7352 NULL ,--EXCEPTION_CODE
7353 rates.EFFECTIVE_FROM ,
7354 NULL ,--EFFECTIVE_TO
7355 fnd_global.user_id ,
7356 SYSDATE ,
7357 fnd_global.user_id ,
7358 SYSDATE ,
7359 fnd_global.conc_login_id ,
7360 report_codes.REPORTING_CODE_CHAR_VALUE,--REPORTING_CODE_CHAR_VALUE
7361 report_codes.REPORTING_CODE_DATE_VALUE,--REPORTING_CODE_DATE_VALUE
7362 report_codes.REPORTING_CODE_NUM_VALUE , --REPORTING_CODE_NUM_VALUE
7363 1
7364 FROM
7365 AP_TAX_CODES_ALL codes,
7366 ZX_REPORTING_TYPES_B reporting_types,
7367 ZX_REPORTING_CODES_B report_codes,
7368 ZX_RATES_B rates,
7369 -- Bug 7620818
7370 ZX_REGIMES_B reg
7371 WHERE
7372 codes.tax_id = rates.tax_rate_id
7373 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
7374 AND reporting_types.reporting_type_code ='EMEA_VAT_REPORTING_TYPE'
7375 AND codes.tax_type = Decode(report_codes.REPORTING_CODE_CHAR_VALUE,
7376 'SALES_TAX','SALES',
7377 'EXEMPT','Exempt Vat',
7378 'CUSTOM BILL',InitCap(report_codes.REPORTING_CODE_CHAR_VALUE),
7379 'NON TAXABLE',InitCap(report_codes.REPORTING_CODE_CHAR_VALUE),
7380 report_codes.REPORTING_CODE_CHAR_VALUE)
7381 AND reporting_types.tax_regime_code IS NULL
7382 AND reporting_types.tax IS NULL
7383 --AND report_codes.record_type_code = 'MIGRATED'
7384 AND rates.record_type_code = 'MIGRATED'
7385 -- Bug 7620818
7386 AND rates.tax_regime_code = reg.tax_regime_code
7387 AND reg.country_code in ('BE','CH','CZ','DE','ES','FR','HU',
7388 'IT','KP','KR','NO','PL','PT','SK', 'IL')
7389 -- End Bug 7620818
7390 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
7391 where entity_code = 'ZX_RATES'
7392 and entity_id = rates.tax_rate_id
7393 and reporting_type_id =
7394 report_codes.reporting_type_id);
7395
7396 arp_util_tax.debug('Inserting into ZX_REPORT_CODES_ASSOC table for AR tax codes');
7397
7398 INSERT
7399 INTO ZX_REPORT_CODES_ASSOC(
7400 REPORTING_CODE_ASSOC_ID,
7401 ENTITY_CODE ,
7402 ENTITY_ID ,
7403 REPORTING_TYPE_ID ,
7404 REPORTING_CODE_ID ,
7405 EXCEPTION_CODE ,
7406 EFFECTIVE_FROM ,
7407 EFFECTIVE_TO ,
7408 CREATED_BY ,
7409 CREATION_DATE ,
7410 LAST_UPDATED_BY ,
7411 LAST_UPDATE_DATE ,
7412 LAST_UPDATE_LOGIN ,
7413 REPORTING_CODE_CHAR_VALUE,
7414 REPORTING_CODE_DATE_VALUE,
7415 REPORTING_CODE_NUM_VALUE,
7416 OBJECT_VERSION_NUMBER
7417 )
7418 SELECT
7419 ZX_REPORT_CODES_ASSOC_S.nextval ,
7420 'ZX_RATES' ,--ENTITY_CODE
7421 rates.TAX_RATE_ID ,--ENTITY_ID
7422 report_codes.REPORTING_TYPE_ID, --REPORTING_TYPE_ID
7423 report_codes.REPORTING_CODE_ID ,--REPORTING_CODE_ID
7424 NULL ,--EXCEPTION_CODE
7425 rates.EFFECTIVE_FROM ,
7426 NULL ,--EFFECTIVE_TO
7427 fnd_global.user_id ,
7428 SYSDATE ,
7429 fnd_global.user_id ,
7430 SYSDATE ,
7431 fnd_global.conc_login_id ,
7432 report_codes.REPORTING_CODE_CHAR_VALUE,--REPORTING_CODE_CHAR_VALUE
7433 report_codes.REPORTING_CODE_DATE_VALUE,--REPORTING_CODE_DATE_VALUE
7434 report_codes.REPORTING_CODE_NUM_VALUE , --REPORTING_CODE_NUM_VALUE
7435 1
7436 FROM
7437 AR_VAT_TAX_ALL codes,
7438 ZX_REPORTING_TYPES_B reporting_types,
7439 ZX_REPORTING_CODES_B report_codes,
7440 ZX_RATES_B rates,
7441 -- Bug 7620818
7442 ZX_REGIMES_B reg
7443 WHERE
7444 codes.vat_tax_id = rates.tax_rate_id
7445 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
7446 AND reporting_types.reporting_type_code ='EMEA_VAT_REPORTING_TYPE'
7447 AND codes.tax_type = DECODE(report_codes.REPORTING_CODE_CHAR_VALUE,
7448 'SERVICES','SERV',
7449 report_codes.REPORTING_CODE_CHAR_VALUE)
7450 AND reporting_types.tax_regime_code IS NULL
7451 AND reporting_types.tax IS NULL
7452 --AND report_codes.record_type_code = 'MIGRATED'
7453 AND rates.record_type_code = 'MIGRATED'
7454 -- Bug 7620818
7455 AND rates.tax_regime_code = reg.tax_regime_code
7456 AND reg.country_code in ('BE','CH','CZ','DE','ES','FR','HU',
7457 'IT','KP','KR','NO','PL','PT','SK', 'IL')
7458 -- End Bug 7620818
7459 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
7460 where entity_code = 'ZX_RATES'
7461 and entity_id = rates.tax_rate_id
7462 and reporting_type_id = report_codes.reporting_type_id);
7463
7464 arp_util_tax.debug('CREATE_REP_CODE_ASSOC_EMEA(-)');
7465
7466 END CREATE_REP_CODE_ASSOC_EMEA;
7467
7468 /*===========================================================================+
7469 | Procedure: CREATE_REP_ENT_REVERSE_VAT |
7470 | Description: This is the procedure for Reporting Entities migration |
7471 | for UK Reverse Vat |
7472 | |
7473 | ARGUMENTS : None |
7474 | |
7475 | NOTES |
7476 | |
7477 | History |
7478 | 14-May-08 Taniya Sen Created |
7479 | |
7480 +===========================================================================*/
7481
7482 PROCEDURE CREATE_REP_ENT_REVERSE_VAT
7483 IS
7484 BEGIN
7485 arp_util_tax.debug('CREATE_REP_ENT_REVERSE_VAT(+)');
7486 arp_util_tax.debug('p_reporting_type_code = '||'REVERSE_CHARGE_VAT');
7487
7488 arp_util_tax.debug('Inserting into ZX_REPORTING_TYPES_B table...');
7489
7490 INSERT WHEN (NOT EXISTS (select 1 from zx_reporting_types_b
7491 where reporting_type_code = l_reporting_type_code
7492 and tax_regime_code = l_tax_regime_code
7493 and tax = l_tax)
7494 ) THEN
7495 INTO ZX_REPORTING_TYPES_B(
7496 REPORTING_TYPE_ID ,
7497 REPORTING_TYPE_CODE ,
7498 REPORTING_TYPE_DATATYPE_CODE ,
7499 TAX_REGIME_CODE ,
7500 TAX ,
7501 FORMAT_MASK ,
7502 MIN_LENGTH ,
7503 MAX_LENGTH ,
7504 LEGAL_MESSAGE_FLAG ,
7505 EFFECTIVE_FROM ,
7506 EFFECTIVE_TO ,
7507 RECORD_TYPE_CODE ,
7508 HAS_REPORTING_CODES_FLAG ,
7509 CREATED_BY ,
7510 CREATION_DATE ,
7511 LAST_UPDATED_BY ,
7512 LAST_UPDATE_DATE ,
7513 LAST_UPDATE_LOGIN ,
7514 REQUEST_ID ,
7515 PROGRAM_APPLICATION_ID ,
7516 PROGRAM_ID ,
7517 PROGRAM_LOGIN_ID ,
7518 OBJECT_VERSION_NUMBER
7519 )
7520 VALUES(
7521 zx_reporting_types_b_s.nextval ,--REPORTING_TYPE_ID
7522 l_reporting_type_code ,--REPORTING_TYPE_CODE
7523 'YES_NO' ,--REPORTING_TYPE_DATATYPE
7524 l_tax_regime_code ,--TAX_REGIME_CODE
7525 l_tax ,--TAX
7526 NULL ,--FORMAT_MASK
7527 1 ,--MIN_LENGTH
7528 30 ,--MAX_LENGTH
7529 'N' ,--LEGAL_MESSAGE_FLAG
7530 l_effective_from ,--EFFECTIVE_FROM
7531 NULL ,--EFFECTIVE_TO
7532 'MIGRATED' ,--RECORD_TYPE_CODE
7536 fnd_global.user_id ,--LAST_UPDATED_BY
7533 'N' ,--HAS_REPORTING_CODES_FLAG
7534 fnd_global.user_id ,--CREATED_BY
7535 SYSDATE ,--CREATION_DATE
7537 SYSDATE ,--LAST_UPDATE_DATE
7538 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7539 fnd_global.conc_request_id ,--REQUEST_ID
7540 fnd_global.prog_appl_id ,--PROGRAM_APPLICATION_ID
7541 fnd_global.conc_program_id ,--PROGRAM_ID
7542 fnd_global.conc_login_id ,--PROGRAM_LOGIN_ID
7543 1 --OBJECT_VERSION_NUMBER
7544 )
7545 SELECT
7546 'REVERSE_CHARGE_VAT' l_reporting_type_code,
7547 rates.tax_regime_code l_tax_regime_code,
7548 rates.tax l_tax,
7549 min(rates.effective_from) l_effective_from
7550 FROM zx_rates_b rates,
7551 ar_vat_tax_all codes
7552 WHERE rates.tax_rate_id = codes.vat_tax_id
7553 AND codes.tax_type = 'REVERSE_CHARGE_VAT'
7554 AND rates.record_type_code = 'MIGRATED'
7555 GROUP BY rates.tax_regime_code, rates.tax;
7556
7557 arp_util_tax.debug('Inserting into ZX_REPORTING_TYPES_TL table...');
7558
7559 INSERT INTO ZX_REPORTING_TYPES_TL(
7560 REPORTING_TYPE_ID ,
7561 LANGUAGE ,
7562 SOURCE_LANG ,
7563 REPORTING_TYPE_NAME ,
7564 CREATED_BY ,
7565 CREATION_DATE ,
7566 LAST_UPDATED_BY ,
7567 LAST_UPDATE_DATE ,
7568 LAST_UPDATE_LOGIN
7569 )
7570 SELECT
7571 REPORTING_TYPE_ID ,
7572 LANGUAGE_CODE ,
7573 userenv('LANG') ,
7574 'Reverse Charge VAT' ,
7575 fnd_global.user_id ,
7576 SYSDATE ,
7577 fnd_global.user_id ,
7578 SYSDATE ,
7579 fnd_global.conc_login_id
7580 FROM
7581 (
7582 SELECT
7583 TYPES.REPORTING_TYPE_ID ,
7584 L.LANGUAGE_CODE
7585 FROM
7586 ZX_REPORTING_TYPES_B TYPES,
7587 FND_LANGUAGES L
7588 WHERE TYPES.RECORD_TYPE_CODE = 'MIGRATED'
7589 AND TYPES.REPORTING_TYPE_CODE = 'REVERSE_CHARGE_VAT'
7590 AND L.INSTALLED_FLAG in ('I', 'B')
7591 ) TYPES
7592 WHERE not exists
7593 (select NULL
7594 from ZX_REPORTING_TYPES_TL T
7595 where T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
7596 and T.LANGUAGE = TYPES.LANGUAGE_CODE);
7597
7598 arp_util_tax.debug('Inserting into ZX_REPORT_TYPES_USAGES table...');
7599
7600 INSERT INTO ZX_REPORT_TYPES_USAGES(
7601 REPORTING_TYPE_USAGE_ID,
7602 REPORTING_TYPE_ID ,
7603 ENTITY_CODE ,
7604 ENABLED_FLAG ,
7605 CREATED_BY ,
7606 CREATION_DATE ,
7607 LAST_UPDATED_BY ,
7608 LAST_UPDATE_DATE ,
7609 LAST_UPDATE_LOGIN ,
7610 OBJECT_VERSION_NUMBER
7611 )
7612 SELECT
7613 zx_report_types_usages_s.nextval,--REPORTING_TYPE_USAGE_ID
7614 types.reporting_type_id ,--REPORTING_TYPE_ID
7615 'ZX_RATES' ,--ENTITY_CODE
7616 'Y' ,--ENABLED_FLAG
7617 fnd_global.user_id ,--CREATED_BY
7618 SYSDATE ,--CREATION_DATE
7619 fnd_global.user_id ,--LAST_UPDATED_BY
7620 SYSDATE ,--LAST_UPDATE_DATE
7621 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7622 1 --OBJECT_VERSION_NUMBER
7623 FROM
7624 zx_reporting_types_b types
7625 WHERE types.reporting_type_code = 'REVERSE_CHARGE_VAT'
7626 --AND types.record_type_code = 'MIGRATED'
7627 AND NOT EXISTS ( select 1 from zx_report_types_usages
7628 where reporting_type_id = types.reporting_type_id
7629 and entity_code = 'ZX_RATES');
7630
7631 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_B table...');
7632
7633 INSERT
7634 INTO ZX_REPORTING_CODES_B(
7635 REPORTING_CODE_ID ,
7636 EXCEPTION_CODE ,
7637 EFFECTIVE_FROM ,
7638 EFFECTIVE_TO ,
7639 RECORD_TYPE_CODE ,
7640 CREATED_BY ,
7641 CREATION_DATE ,
7642 LAST_UPDATED_BY ,
7643 LAST_UPDATE_DATE ,
7644 LAST_UPDATE_LOGIN ,
7645 REQUEST_ID ,
7646 PROGRAM_APPLICATION_ID ,
7647 PROGRAM_ID ,
7648 PROGRAM_LOGIN_ID ,
7649 REPORTING_CODE_CHAR_VALUE ,
7650 REPORTING_CODE_DATE_VALUE ,
7651 REPORTING_CODE_NUM_VALUE ,
7652 REPORTING_TYPE_ID ,
7653 OBJECT_VERSION_NUMBER
7654 )
7655 SELECT
7656 zx_reporting_codes_b_s.nextval,--REPORTING_CODE_ID
7657 NULL ,--EXCEPTION_CODE
7658 EFFECTIVE_FROM ,--EFFECTIVE_FROM
7659 NULL ,--EFFECTIVE_TO
7660 'MIGRATED' ,--RECORD_TYPE_CODE
7661 fnd_global.user_id ,--CREATED_BY
7662 SYSDATE ,--CREATION_DATE
7663 fnd_global.user_id ,--LAST_UPDATED_BY
7664 SYSDATE ,--LAST_UPDATE_DATE
7665 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
7666 fnd_global.conc_request_id ,--REQUEST_ID
7667 fnd_global.prog_appl_id ,--PROGRAM_APPLICATION_ID
7668 fnd_global.conc_program_id ,--PROGRAM_ID
7669 fnd_global.conc_login_id ,--PROGRAM_LOGIN_ID
7670 REPORTING_CODE_CHAR_VALUE ,--REPORTING_CODE_CHAR_VALUE
7671 NULL ,--REPORTING_CODE_DATE_VALUE
7672 NULL ,--REPORTING_CODE_NUM_VALUE
7673 REPORTING_TYPE_ID ,--REPORTING_TYPE_ID
7674 1 --OBJECT_VERSION_NUMBER
7675
7676 FROM
7677 (
7678 SELECT
7679 DISTINCT Upper(lookup_code) REPORTING_CODE_CHAR_VALUE,
7680 report_types.EFFECTIVE_FROM EFFECTIVE_FROM,
7681 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID,
7682 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
7683 FROM
7684 ZX_REPORTING_TYPES_B report_types,
7685 FND_LOOKUPS lookups
7686 WHERE
7687 report_types.REPORTING_TYPE_CODE = 'REVERSE_CHARGE_VAT'
7688 --AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
7689 AND lookups.LOOKUP_TYPE = 'ZX_TAX_TYPE_CATEGORY'
7690 --Consider only the following lookup_codes
7691 AND lookups.LOOKUP_CODE = 'REVERSE_CHARGE_VAT'
7692 AND NOT EXISTS
7693 (SELECT 1
7694 FROM ZX_REPORTING_CODES_B
7695 WHERE REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID
7696 AND REPORTING_CODE_CHAR_VALUE = UPPER(lookups.lookup_code)
7697 )
7698 );
7699
7700 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table...');
7701
7702 INSERT INTO ZX_REPORTING_CODES_TL(
7703 REPORTING_CODE_ID ,
7704 LANGUAGE ,
7705 SOURCE_LANG ,
7706 REPORTING_CODE_NAME ,
7707 CREATED_BY ,
7708 CREATION_DATE ,
7709 LAST_UPDATED_BY ,
7710 LAST_UPDATE_DATE ,
7711 LAST_UPDATE_LOGIN
7712 )
7713 SELECT
7714 codes.reporting_code_id ,
7715 lookups.language ,
7716 lookups.source_lang ,
7717 CASE WHEN lookups.meaning = UPPER(lookups.meaning)
7718 THEN Initcap(lookups.meaning)
7719 ELSE
7720 lookups.meaning
7721 END,
7722 fnd_global.user_id ,
7723 sysdate ,
7724 fnd_global.user_id ,
7725 sysdate ,
7726 fnd_global.conc_login_id
7727 FROM
7728 ZX_REPORTING_TYPES_B TYPES,
7729 ZX_REPORTING_CODES_B CODES,
7730 FND_LOOKUP_VALUES lookups,
7731 FND_LANGUAGES L
7732 WHERE
7733
7734 TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
7735 AND TYPES.REPORTING_TYPE_CODE = 'REVERSE_CHARGE_VAT'
7736 AND lookups.LOOKUP_TYPE = 'ZX_TAX_TYPE_CATEGORY'
7737 AND CODES.REPORTING_CODE_CHAR_VALUE = Upper(lookups.lookup_code)
7738 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
7739 AND lookups.VIEW_APPLICATION_ID = 0
7740 AND lookups.SECURITY_GROUP_ID = 0
7741 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
7742 AND L.INSTALLED_FLAG in ('I', 'B')
7743 AND not exists
7744 (select NULL
7745 from ZX_REPORTING_CODES_TL T
7746 where T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
7747 and T.LANGUAGE = L.LANGUAGE_CODE);
7748
7749 arp_util_tax.debug('Inserting into ZX_REPORT_CODES_ASSOC table...');
7750
7751 INSERT
7752 INTO ZX_REPORT_CODES_ASSOC(
7753 REPORTING_CODE_ASSOC_ID,
7754 ENTITY_CODE ,
7755 ENTITY_ID ,
7756 REPORTING_TYPE_ID ,
7757 REPORTING_CODE_ID ,
7758 EXCEPTION_CODE ,
7759 EFFECTIVE_FROM ,
7760 EFFECTIVE_TO ,
7761 CREATED_BY ,
7762 CREATION_DATE ,
7763 LAST_UPDATED_BY ,
7764 LAST_UPDATE_DATE ,
7765 LAST_UPDATE_LOGIN ,
7766 REPORTING_CODE_CHAR_VALUE,
7767 REPORTING_CODE_DATE_VALUE,
7768 REPORTING_CODE_NUM_VALUE,
7769 OBJECT_VERSION_NUMBER
7770 )
7771 SELECT
7772 ZX_REPORT_CODES_ASSOC_S.nextval ,
7773 'ZX_RATES' ,--ENTITY_CODE
7774 rates.TAX_RATE_ID ,--ENTITY_ID
7775 report_codes.REPORTING_TYPE_ID, --REPORTING_TYPE_ID
7776 report_codes.REPORTING_CODE_ID ,--REPORTING_CODE_ID
7777 NULL ,--EXCEPTION_CODE
7778 rates.EFFECTIVE_FROM ,
7779 NULL ,--EFFECTIVE_TO
7780 fnd_global.user_id ,
7781 SYSDATE ,
7782 fnd_global.user_id ,
7783 SYSDATE ,
7784 fnd_global.conc_login_id ,
7785 report_codes.REPORTING_CODE_CHAR_VALUE,--REPORTING_CODE_CHAR_VALUE
7786 report_codes.REPORTING_CODE_DATE_VALUE,--REPORTING_CODE_DATE_VALUE
7787 report_codes.REPORTING_CODE_NUM_VALUE , --REPORTING_CODE_NUM_VALUE
7788 1
7789 FROM
7790 AR_VAT_TAX_ALL codes,
7791 ZX_REPORTING_TYPES_B reporting_types,
7792 ZX_REPORTING_CODES_B report_codes,
7793 ZX_RATES_B rates
7794 WHERE
7795 codes.vat_tax_id = rates.tax_rate_id
7796 AND reporting_types.reporting_type_id = report_codes.reporting_type_id
7797 AND reporting_types.reporting_type_code ='REVERSE_CHARGE_VAT'
7798 AND codes.tax_type = report_codes.REPORTING_CODE_CHAR_VALUE
7799 AND reporting_types.tax_regime_code = rates.tax_regime_code
7800 AND reporting_types.tax = rates.tax
7801 --AND report_codes.record_type_code = 'MIGRATED'
7802 AND rates.record_type_code = 'MIGRATED'
7803 AND not exists(select 1 from ZX_REPORT_CODES_ASSOC
7804 where entity_code = 'ZX_RATES'
7805 and entity_id = rates.tax_rate_id
7806 and reporting_type_id = report_codes.reporting_type_id);
7807
7808 arp_util_tax.debug('CREATE_REP_ENT_REVERSE_VAT(-)');
7809
7810 END CREATE_REP_ENT_REVERSE_VAT;
7811
7812 /*===========================================================================+
7813 | Procedure: ZX_MIGRATE_REP_ENTITIES_MAIN |
7814 | Description: This is the main procedure for Reporting Entities migration|
7815 | |
7816 | ARGUMENTS : |
7817 | |
7818 | NOTES |
7819 | |
7820 | History |
7821 | 29-Sep-04 Venkatavaradhan Created |
7822 | |
7823 +===========================================================================*/
7824
7825 /*==========================================================================+
7826 | Procedure: CREATE_REPORTING_TYPE_EUVAT |
7827 | Description: This is the procedure that creates reporting_type |
7828 | ZX_INTRA_EU_TRX_TYPE , ZX_LGL_JUSTIFICATN_MSG_TYPE |
7829 | for the Customers who have used EUVAT feature in 11i |
7830 | |
7831 | ARGUMENTS: |
7832 | |
7833 | History |
7834 | 28-Sep-2010 Mahesh Sakalabhaktula Created |
7835 | |
7836 +===========================================================================*/
7837
7838 PROCEDURE CREATE_REPORTING_TYPE_EUVAT
7839 IS
7840 dyn_sql_stmt VARCHAR2(2000);
7841 BEGIN
7842 arp_util_tax.debug('CREATE_REPORTING_TYPE_EUVAT(+)');
7843 arp_util_tax.debug('p_reporting_type_code = '||'ZX_INTRA_EU_TRX_TYPE');
7844
7845 dyn_sql_stmt:=
7846 'INSERT WHEN
7847 (NOT EXISTS
7848 (SELECT 1 FROM zx_reporting_types_b
7849 WHERE reporting_type_code = ''ZX_INTRA_EU_TRX_TYPE''
7850 AND tax_regime_code IS NULL)
7851 ) THEN
7852 INTO ZX_REPORTING_TYPES_B
7853 (REPORTING_TYPE_ID,
7854 REPORTING_TYPE_CODE,
7855 REPORTING_TYPE_DATATYPE_CODE,
7856 TAX_REGIME_CODE,
7857 TAX,
7858 FORMAT_MASK,
7859 MIN_LENGTH,
7860 MAX_LENGTH,
7861 LEGAL_MESSAGE_FLAG,
7862 EFFECTIVE_FROM,
7863 EFFECTIVE_TO,
7864 RECORD_TYPE_CODE,
7865 HAS_REPORTING_CODES_FLAG,
7866 CREATED_BY,
7867 CREATION_DATE,
7868 LAST_UPDATED_BY,
7869 LAST_UPDATE_DATE,
7870 LAST_UPDATE_LOGIN,
7871 REQUEST_ID,
7872 PROGRAM_APPLICATION_ID,
7873 PROGRAM_ID,
7874 PROGRAM_LOGIN_ID,
7875 OBJECT_VERSION_NUMBER
7876 )
7877 VALUES
7878 (zx_reporting_types_b_s.nextval,
7879 ''ZX_INTRA_EU_TRX_TYPE'',
7880 ''TEXT'',
7881 NULL,
7882 NULL,
7883 NULL,
7884 1,
7885 30,
7886 ''N'',
7887 effective_from,
7888 NULL,
7889 ''MIGRATED'',
7890 ''Y'',
7891 fnd_global.user_id,
7892 SYSDATE,
7893 fnd_global.user_id,
7894 SYSDATE,
7895 fnd_global.conc_login_id,
7896 fnd_global.conc_request_id,
7897 fnd_global.prog_appl_id,
7898 fnd_global.conc_program_id,
7899 fnd_global.conc_login_id,
7900 1
7901 )
7902 SELECT MIN(zx_rates.effective_from) effective_from
7903 FROM AR_VAT_TAX_ALL_B vat_tax,
7904 zx_rates_b zx_rates
7905 WHERE vat_tax.vat_tax_id = zx_rates.tax_rate_id
7906 AND zx_rates.record_type_code = ''MIGRATED''
7907 AND vat_tax.INTRA_EU_TRX_TYPE_CODE IS NOT NULL';
7908
7909 EXECUTE IMMEDIATE dyn_sql_stmt;
7910
7911 arp_util_tax.debug('p_reporting_type_code = '||'ZX_LGL_JUSTIFICATN_MSG_TYPE');
7912
7913 dyn_sql_stmt:=
7914 'INSERT WHEN
7915 (NOT EXISTS
7916 (SELECT 1 FROM zx_reporting_types_b
7917 WHERE reporting_type_code = ''ZX_LGL_JUSTIFICATN_MSG_TYPE''
7918 AND tax_regime_code IS NULL)
7919 ) THEN
7920 INTO ZX_REPORTING_TYPES_B
7921 (REPORTING_TYPE_ID,
7922 REPORTING_TYPE_CODE,
7923 REPORTING_TYPE_DATATYPE_CODE,
7924 TAX_REGIME_CODE,
7925 TAX,
7926 FORMAT_MASK,
7927 MIN_LENGTH,
7928 MAX_LENGTH,
7929 LEGAL_MESSAGE_FLAG,
7930 EFFECTIVE_FROM,
7931 EFFECTIVE_TO,
7932 RECORD_TYPE_CODE,
7933 HAS_REPORTING_CODES_FLAG,
7934 CREATED_BY,
7935 CREATION_DATE,
7936 LAST_UPDATED_BY,
7937 LAST_UPDATE_DATE,
7938 LAST_UPDATE_LOGIN,
7939 REQUEST_ID,
7940 PROGRAM_APPLICATION_ID,
7941 PROGRAM_ID,
7942 PROGRAM_LOGIN_ID,
7943 OBJECT_VERSION_NUMBER
7944 )
7945 VALUES
7946 (zx_reporting_types_b_s.nextval,
7947 ''ZX_LGL_JUSTIFICATN_MSG_TYPE'',
7948 ''TEXT'',
7949 NULL,
7950 NULL,
7951 NULL,
7952 1,
7953 30,
7954 ''Y'',
7955 effective_from,
7956 NULL,
7957 ''MIGRATED'',
7958 ''Y'',
7959 fnd_global.user_id,
7960 SYSDATE,
7961 fnd_global.user_id,
7962 SYSDATE,
7963 fnd_global.conc_login_id,
7964 fnd_global.conc_request_id,
7965 fnd_global.prog_appl_id,
7966 fnd_global.conc_program_id,
7967 fnd_global.conc_login_id,
7968 1
7969 )
7970 SELECT MIN(zx_rates.effective_from) effective_from
7971 FROM AR_VAT_TAX_ALL_B vat_tax,
7972 zx_rates_b zx_rates
7973 WHERE vat_tax.vat_tax_id = zx_rates.tax_rate_id
7974 AND zx_rates.record_type_code = ''MIGRATED''
7975 AND vat_tax.LGL_JUSTIFICATION_MSG_CODE IS NOT NULL';
7976
7977 EXECUTE IMMEDIATE dyn_sql_stmt;
7978
7979 arp_util_tax.debug('Inserting into ZX_REPORTING_TYPES_TL table');
7980
7981 INSERT
7982 INTO ZX_REPORTING_TYPES_TL
7983 (
7984 REPORTING_TYPE_ID ,
7985 LANGUAGE ,
7986 SOURCE_LANG ,
7987 REPORTING_TYPE_NAME ,
7988 CREATED_BY ,
7989 CREATION_DATE ,
7990 LAST_UPDATED_BY ,
7991 LAST_UPDATE_DATE ,
7992 LAST_UPDATE_LOGIN
7993 )
7994 SELECT REPORTING_TYPE_ID ,
7995 LANGUAGE_CODE ,
7996 userenv('LANG') ,
7997 decode(REPORTING_TYPE_CODE,
7998 'ZX_INTRA_EU_TRX_TYPE','Intra EU Transaction Type',
7999 'ZX_LGL_JUSTIFICATN_MSG_TYPE','Intra EU Legal Message Type') ,
8000 fnd_global.user_id ,
8001 SYSDATE ,
8002 fnd_global.user_id ,
8003 SYSDATE ,
8004 fnd_global.conc_login_id
8005 FROM ( SELECT TYPES.REPORTING_TYPE_ID ,
8006 L.LANGUAGE_CODE,
8007 TYPES.REPORTING_TYPE_CODE
8008 FROM ZX_REPORTING_TYPES_B TYPES,
8009 FND_LANGUAGES L
8010 WHERE TYPES.RECORD_TYPE_CODE = 'MIGRATED'
8011 AND TYPES.REPORTING_TYPE_CODE in ('ZX_INTRA_EU_TRX_TYPE',
8012 'ZX_LGL_JUSTIFICATN_MSG_TYPE')
8013 AND L.INSTALLED_FLAG IN ('I',
8014 'B')
8015 )
8016 TYPES
8017 WHERE NOT EXISTS
8018 (SELECT NULL
8019 FROM ZX_REPORTING_TYPES_TL T
8020 WHERE T.REPORTING_TYPE_ID = TYPES.REPORTING_TYPE_ID
8021 AND T.LANGUAGE = TYPES.LANGUAGE_CODE
8022 );
8023
8024 arp_util_tax.debug('CREATE_REPORTING_TYPE_EUVAT(-)');
8025 EXCEPTION
8026 WHEN OTHERS THEN
8027 arp_util_tax.debug('Exception in CREATE_REPORTING_TYPE_EUVAT '||
8028 sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
8029 END CREATE_REPORTING_TYPE_EUVAT;
8030
8031 /*==========================================================================+
8032 | Procedure: CREATE_REPORT_TYP_USAGES_EUVAT |
8033 | Description: This is the procedure that creates report_type_usages |
8034 | for the reporting typed |
8035 | ZX_INTRA_EU_TRX_TYPE , ZX_LGL_JUSTIFICATN_MSG_TYPE |
8036 | |
8037 | ARGUMENTS: |
8038 | |
8039 | History |
8040 | 28-Sep-2010 Mahesh Sakalabhaktula Created |
8041 | |
8042 +===========================================================================*/
8043
8044 PROCEDURE CREATE_REPORT_TYP_USAGES_EUVAT
8045 IS
8046 BEGIN
8047 arp_util_tax.debug('CREATE_REPORT_TYP_USAGES_EUVAT(+)');
8048
8049 INSERT
8050 INTO ZX_REPORT_TYPES_USAGES
8051 (
8052 REPORTING_TYPE_USAGE_ID ,
8053 ENTITY_CODE ,
8054 ENABLED_FLAG ,
8055 CREATED_BY ,
8056 CREATION_DATE ,
8057 LAST_UPDATED_BY ,
8058 LAST_UPDATE_DATE ,
8059 LAST_UPDATE_LOGIN ,
8060 REPORTING_TYPE_ID ,
8061 OBJECT_VERSION_NUMBER
8062 )
8063 SELECT zx_report_types_usages_s.nextval , --REPORTING_TYPE_USAGE_ID
8064 lookups.lookup_code , --ENTITY_CODE
8065 DECODE(lookups.lookup_code,
8066 'ZX_RATES','Y',
8067 'ZX_STATUS','Y',
8068 'ZX_PROCESS_RESULTS','Y',
8069 'N') , --ENABLED_FLAG
8070 fnd_global.user_id , --CREATED_BY
8071 SYSDATE , --CREATION_DATE
8072 fnd_global.user_id , --LAST_UPDATED_BY
8073 SYSDATE , --LAST_UPDATE_DATE
8074 fnd_global.conc_login_id , --LAST_UPDATE_LOGIN
8075 reporting_type_id , --REPORTING_TYPE_ID
8076 1 --OBJECT_VERSION_NUMBER
8077 FROM zx_reporting_types_b rep_type,
8078 fnd_lookups lookups
8079 WHERE reporting_type_code in ('ZX_INTRA_EU_TRX_TYPE',
8080 'ZX_LGL_JUSTIFICATN_MSG_TYPE')
8081 AND record_type_code = 'MIGRATED'
8082 AND lookup_type = 'ZX_REPORTING_TABLE_USE'
8083 AND NOT EXISTS
8084 ( SELECT 1
8085 FROM zx_report_types_usages
8086 WHERE reporting_type_id = rep_type.reporting_type_id
8087 AND entity_code = lookups.lookup_code
8088 );
8089
8090 arp_util_tax.debug('CREATE_REPORT_TYP_USAGES_EUVAT(-)');
8091
8092 END CREATE_REPORT_TYP_USAGES_EUVAT;
8093
8094 /*==========================================================================+
8095 | Procedure: CREATE_REPORTING_CODES_EUVAT |
8096 | Description: This is the procedure that creates reporting_codes |
8097 | for the reporting types |
8098 | ZX_INTRA_EU_TRX_TYPE , ZX_LGL_JUSTIFICATN_MSG_TYPE |
8099 | |
8100 | ARGUMENTS: |
8101 | |
8102 | History |
8103 | 28-Sep-2010 Mahesh Sakalabhaktula Created |
8104 | |
8105 +===========================================================================*/
8106
8107 PROCEDURE CREATE_REPORTING_CODES_EUVAT
8108 IS
8109 BEGIN
8110 arp_util_tax.debug('CREATE_REPORTING_CODES_EUVAT(+)');
8111
8112 INSERT
8113 INTO ZX_REPORTING_CODES_B
8114 (
8115 REPORTING_CODE_ID ,
8116 EXCEPTION_CODE ,
8117 EFFECTIVE_FROM ,
8118 EFFECTIVE_TO ,
8119 RECORD_TYPE_CODE ,
8120 CREATED_BY ,
8121 CREATION_DATE ,
8122 LAST_UPDATED_BY ,
8123 LAST_UPDATE_DATE ,
8124 LAST_UPDATE_LOGIN ,
8125 REQUEST_ID ,
8126 PROGRAM_APPLICATION_ID ,
8127 PROGRAM_ID ,
8128 PROGRAM_LOGIN_ID ,
8129 REPORTING_CODE_CHAR_VALUE ,
8130 REPORTING_CODE_DATE_VALUE ,
8131 REPORTING_CODE_NUM_VALUE ,
8132 REPORTING_TYPE_ID ,
8133 OBJECT_VERSION_NUMBER
8134 )
8135 SELECT zx_reporting_codes_b_s.nextval ,--REPORTING_CODE_ID
8136 NULL ,--EXCEPTION_CODE
8137 EFFECTIVE_FROM ,--EFFECTIVE_FROM
8138 NULL ,--EFFECTIVE_TO
8139 'MIGRATED' ,--RECORD_TYPE_CODE
8140 fnd_global.user_id ,--CREATED_BY
8141 SYSDATE ,--CREATION_DATE
8142 fnd_global.user_id ,--LAST_UPDATED_BY
8143 SYSDATE ,--LAST_UPDATE_DATE
8144 fnd_global.conc_login_id ,--LAST_UPDATE_LOGIN
8145 fnd_global.conc_request_id ,--REQUEST_ID
8146 fnd_global.prog_appl_id ,--PROGRAM_APPLICATION_ID
8147 fnd_global.conc_program_id ,--PROGRAM_ID
8148 fnd_global.conc_login_id ,--PROGRAM_LOGIN_ID
8149 DECODE(DATATYPE,'TEXT',REPORTING_CODE_CHAR_VALUE,NULL),--REPORTING_CODE_CHAR_VALUE
8150 NULL ,--REPORTING_CODE_DATE_VALUE
8151 NULL ,--REPORTING_CODE_NUM_VALUE
8152 REPORTING_TYPE_ID ,--REPORTING_TYPE_ID
8153 1 --OBJECT_VERSION_NUMBER
8154 FROM ( SELECT UPPER(lookup_code) REPORTING_CODE_CHAR_VALUE,
8155 report_types.EFFECTIVE_FROM EFFECTIVE_FROM ,
8156 report_types.REPORTING_TYPE_ID REPORTING_TYPE_ID ,
8157 report_types.REPORTING_TYPE_DATATYPE_CODE DATATYPE
8158 FROM ZX_REPORTING_TYPES_B report_types,
8159 AR_LOOKUPS lookups
8160 WHERE report_types.REPORTING_TYPE_CODE in ('ZX_INTRA_EU_TRX_TYPE',
8161 'ZX_LGL_JUSTIFICATN_MSG_TYPE')
8162 AND report_types.RECORD_TYPE_CODE = 'MIGRATED'
8163 AND lookups.LOOKUP_TYPE = decode(report_types.REPORTING_TYPE_CODE,
8164 'ZX_INTRA_EU_TRX_TYPE','AR_TX_INTRA_EU_TRX_TYPE',
8165 'ZX_LGL_JUSTIFICATN_MSG_TYPE','AR_TX_LGL_JUSTIFICATN_MSG')
8166 AND NOT EXISTS
8167 (SELECT 1
8168 FROM ZX_REPORTING_CODES_B
8169 WHERE REPORTING_TYPE_ID = report_types.REPORTING_TYPE_ID
8170 AND REPORTING_CODE_CHAR_VALUE = UPPER(lookups.lookup_code)
8171 )
8172 );
8173
8174 arp_util_tax.debug('Inserting into ZX_REPORTING_CODES_TL table');
8175
8176 INSERT
8177 INTO ZX_REPORTING_CODES_TL
8178 (
8179 REPORTING_CODE_ID ,
8180 LANGUAGE ,
8181 SOURCE_LANG ,
8182 REPORTING_CODE_NAME ,
8183 CREATED_BY ,
8184 CREATION_DATE ,
8185 LAST_UPDATED_BY ,
8186 LAST_UPDATE_DATE ,
8187 LAST_UPDATE_LOGIN
8188 )
8189 SELECT codes.reporting_code_id ,
8190 lookups.language ,
8191 lookups.source_lang ,
8192 CASE
8193 WHEN lookups.meaning = UPPER(lookups.meaning)
8194 THEN Initcap(lookups.meaning)
8195 ELSE lookups.meaning
8196 END ,
8197 fnd_global.user_id ,
8198 SYSDATE ,
8199 fnd_global.user_id ,
8200 SYSDATE ,
8201 fnd_global.conc_login_id
8202 FROM ZX_REPORTING_TYPES_B TYPES,
8203 ZX_REPORTING_CODES_B CODES,
8204 FND_LOOKUP_VALUES lookups ,
8205 FND_LANGUAGES L
8206 WHERE TYPES.REPORTING_TYPE_ID = CODES.REPORTING_TYPE_ID
8207 AND TYPES.REPORTING_TYPE_CODE in ('ZX_INTRA_EU_TRX_TYPE',
8208 'ZX_LGL_JUSTIFICATN_MSG_TYPE')
8209 AND lookups.LOOKUP_TYPE = decode(types.REPORTING_TYPE_CODE,
8210 'ZX_INTRA_EU_TRX_TYPE','AR_TX_INTRA_EU_TRX_TYPE',
8211 'ZX_LGL_JUSTIFICATN_MSG_TYPE','AR_TX_LGL_JUSTIFICATN_MSG')
8212 AND CODES.REPORTING_CODE_CHAR_VALUE = UPPER(lookups.lookup_code)
8213 AND CODES.RECORD_TYPE_CODE = 'MIGRATED'
8214 AND lookups.VIEW_APPLICATION_ID = 222
8215 AND lookups.SECURITY_GROUP_ID = 0
8216 AND lookups.LANGUAGE = L.LANGUAGE_CODE(+)
8217 AND L.INSTALLED_FLAG IN ('I',
8218 'B')
8219 AND NOT EXISTS
8220 (SELECT NULL
8221 FROM ZX_REPORTING_CODES_TL T
8222 WHERE T.REPORTING_CODE_ID = CODES.REPORTING_CODE_ID
8223 AND T.LANGUAGE = L.LANGUAGE_CODE
8224 );
8225 arp_util_tax.debug('CREATE_REPORTING_CODES_EUVAT(-)');
8226
8227 END CREATE_REPORTING_CODES_EUVAT;
8228
8229 /*==========================================================================+
8230 | Procedure: CREATE_REP_CODE_ASSOC_EUVAT |
8231 | Description: This is the procedure that creates reporting_codes |
8232 | for the reporting types |
8233 | ZX_INTRA_EU_TRX_TYPE , ZX_LGL_JUSTIFICATN_MSG_TYPE |
8234 | |
8235 | ARGUMENTS: |
8236 | |
8237 | History |
8238 | 28-Sep-2010 Mahesh Sakalabhaktula Created |
8239 | |
8240 +===========================================================================*/
8241
8242 PROCEDURE CREATE_REP_CODE_ASSOC_EUVAT
8243 IS
8244 dyn_sql_stmt VARCHAR2(2500);
8245 BEGIN
8246
8247 arp_util_tax.debug('CREATE_REP_CODE_ASSOC_EUVAT(+)');
8248
8249 dyn_sql_stmt:=
8250 'INSERT INTO ZX_REPORT_CODES_ASSOC
8251 (REPORTING_CODE_ASSOC_ID,
8252 ENTITY_CODE,
8253 ENTITY_ID,
8254 REPORTING_TYPE_ID,
8255 REPORTING_CODE_ID,
8256 EXCEPTION_CODE,
8257 EFFECTIVE_FROM,
8258 EFFECTIVE_TO,
8259 CREATED_BY,
8260 CREATION_DATE,
8261 LAST_UPDATED_BY,
8262 LAST_UPDATE_DATE,
8263 LAST_UPDATE_LOGIN,
8264 REPORTING_CODE_CHAR_VALUE,
8265 REPORTING_CODE_DATE_VALUE,
8266 REPORTING_CODE_NUM_VALUE,
8267 OBJECT_VERSION_NUMBER)
8268 SELECT
8269 ZX_REPORT_CODES_ASSOC_S.nextval,
8270 ''ZX_RATES'',
8271 TAX_RATE_ID,
8272 REPORTING_TYPE_ID,
8273 REPORTING_CODE_ID,
8274 NULL,
8275 EFFECTIVE_FROM,
8276 NULL,
8277 fnd_global.user_id,
8278 SYSDATE,
8279 fnd_global.user_id,
8280 SYSDATE,
8281 fnd_global.conc_login_id,
8282 REPORTING_CODE_CHAR_VALUE,
8283 REPORTING_CODE_DATE_VALUE,
8284 REPORTING_CODE_NUM_VALUE,
8285 1
8286 FROM
8287 (SELECT
8288 rates.TAX_RATE_ID,
8289 report_codes.REPORTING_CODE_ID,
8290 rates.EFFECTIVE_FROM,
8291 report_codes.REPORTING_TYPE_ID,
8292 report_codes.REPORTING_CODE_CHAR_VALUE,
8293 report_codes.REPORTING_CODE_DATE_VALUE,
8294 report_codes.REPORTING_CODE_NUM_VALUE
8295 FROM
8296 AR_VAT_TAX_ALL_B codes,
8297 ZX_RATES_B rates,
8298 ZX_REPORTING_TYPES_B report_types,
8299 ZX_REPORTING_CODES_B report_codes
8300 WHERE
8301 codes.vat_tax_id = rates.tax_rate_id AND
8302 Upper(codes.LGL_JUSTIFICATION_MSG_CODE) = report_codes.REPORTING_CODE_CHAR_VALUE AND
8303 rates.record_type_code = ''MIGRATED'' AND
8304 report_types.reporting_type_id = report_codes.reporting_type_id AND
8305 report_types.REPORTING_TYPE_CODE = ''ZX_LGL_JUSTIFICATN_MSG_TYPE'' AND
8306 report_codes.record_type_code = ''MIGRATED'' AND
8307 NOT EXISTS
8308 (SELECT 1
8309 FROM ZX_REPORT_CODES_ASSOC
8310 WHERE entity_code = ''ZX_RATES''
8311 AND entity_id = rates.tax_rate_id
8312 AND reporting_type_id = report_codes.reporting_type_id
8313 AND reporting_code_id = report_codes.reporting_code_id))';
8314
8315 EXECUTE IMMEDIATE dyn_sql_stmt;
8316
8317 dyn_sql_stmt:=
8318 'INSERT INTO ZX_REPORT_CODES_ASSOC
8319 (REPORTING_CODE_ASSOC_ID,
8320 ENTITY_CODE,
8321 ENTITY_ID,
8322 REPORTING_TYPE_ID,
8323 REPORTING_CODE_ID,
8324 EXCEPTION_CODE,
8325 EFFECTIVE_FROM,
8326 EFFECTIVE_TO,
8327 CREATED_BY,
8328 CREATION_DATE,
8329 LAST_UPDATED_BY,
8330 LAST_UPDATE_DATE,
8331 LAST_UPDATE_LOGIN,
8332 REPORTING_CODE_CHAR_VALUE,
8333 REPORTING_CODE_DATE_VALUE,
8334 REPORTING_CODE_NUM_VALUE,
8335 OBJECT_VERSION_NUMBER)
8336 SELECT
8337 ZX_REPORT_CODES_ASSOC_S.nextval,
8338 ''ZX_RATES'',
8339 TAX_RATE_ID,
8340 REPORTING_TYPE_ID,
8341 REPORTING_CODE_ID,
8342 NULL,
8343 EFFECTIVE_FROM,
8344 NULL,
8345 fnd_global.user_id,
8346 SYSDATE,
8347 fnd_global.user_id,
8348 SYSDATE,
8349 fnd_global.conc_login_id,
8350 REPORTING_CODE_CHAR_VALUE,
8351 REPORTING_CODE_DATE_VALUE,
8352 REPORTING_CODE_NUM_VALUE,
8353 1
8354 FROM
8355 (SELECT
8356 rates.TAX_RATE_ID,
8357 report_codes.REPORTING_CODE_ID,
8358 rates.EFFECTIVE_FROM,
8359 report_codes.REPORTING_TYPE_ID,
8360 report_codes.REPORTING_CODE_CHAR_VALUE,
8361 report_codes.REPORTING_CODE_DATE_VALUE,
8362 report_codes.REPORTING_CODE_NUM_VALUE
8363 FROM
8364 AR_VAT_TAX_ALL_B codes,
8365 ZX_RATES_B rates,
8366 ZX_REPORTING_TYPES_B report_types,
8367 ZX_REPORTING_CODES_B report_codes
8368 WHERE
8369 codes.vat_tax_id = rates.tax_rate_id AND
8370 Upper(codes.INTRA_EU_TRX_TYPE_CODE) = report_codes.REPORTING_CODE_CHAR_VALUE AND
8371 rates.record_type_code = ''MIGRATED'' AND
8372 report_types.reporting_type_id = report_codes.reporting_type_id AND
8373 report_types.REPORTING_TYPE_CODE = ''ZX_INTRA_EU_TRX_TYPE'' AND
8374 report_codes.record_type_code = ''MIGRATED'' AND
8375 NOT EXISTS
8376 (SELECT 1
8377 FROM ZX_REPORT_CODES_ASSOC
8378 WHERE entity_code = ''ZX_RATES''
8379 AND entity_id = rates.tax_rate_id
8380 AND reporting_type_id = report_codes.reporting_type_id
8381 AND reporting_code_id = report_codes.reporting_code_id))';
8382
8383 EXECUTE IMMEDIATE dyn_sql_stmt;
8384
8385 arp_util_tax.debug('CREATE_REP_CODE_ASSOC_EUVAT(-)');
8386 EXCEPTION
8387 WHEN OTHERS THEN
8388 arp_util_tax.debug('Exception in CREATE_REP_CODE_ASSOC_EUVAT '||
8389 sqlcode || ': ' || SUBSTR(SQLERRM, 1, 80));
8390 END CREATE_REP_CODE_ASSOC_EUVAT;
8391
8392 /*==========================================================================+
8393 | Procedure: CREATE_REP_ENT_EUVAT |
8394 | Description: This is the procedure that calls all API to individually |
8395 | create Reporting Types, Reporting Usages, Reporting Codes |
8396 | Reporting associations for below Rep Types |
8397 | ZX_INTRA_EU_TRX_TYPE , ZX_LGL_JUSTIFICATN_MSG_TYPE |
8398 | |
8399 | ARGUMENTS: |
8400 | |
8401 | History |
8402 | 28-Sep-2010 Mahesh Sakalabhaktula Created |
8403 | |
8404 +===========================================================================*/
8405
8406 PROCEDURE CREATE_REP_ENT_EUVAT IS
8407 CURSOR decide_euvat_upgrade IS
8408 SELECT NVL(SUM(1),0) result
8409 FROM sys.all_tab_columns
8410 WHERE table_name = 'AR_VAT_TAX_ALL_B'
8411 AND COLUMN_NAME IN ('INTRA_EU_TRX_TYPE_CODE','LGL_JUSTIFICATION_MSG_CODE');
8412
8413 l_result NUMBER;
8414
8415 BEGIN
8416
8417 OPEN decide_euvat_upgrade;
8418 FETCH decide_euvat_upgrade INTO l_result;
8419 CLOSE decide_euvat_upgrade;
8420
8421
8422 IF (l_result <> 0) THEN
8423
8424 arp_util_tax.debug('CREATE_REP_ENT_EUVAT(+) ' );
8425
8426 arp_util_tax.debug('Now calling Reporting Type Code for EUVAT...' );
8427
8428 CREATE_REPORTING_TYPE_EUVAT;
8429
8430 arp_util_tax.debug('Now calling Usages for EUVAT...' );
8431
8432 CREATE_REPORT_TYP_USAGES_EUVAT;
8433
8434 arp_util_tax.debug('Now calling Reporting Codes for EUVAT...' );
8435
8436 CREATE_REPORTING_CODES_EUVAT;
8437
8438 arp_util_tax.debug('Now calling Reporting Association for EUVAT...' );
8439
8440 CREATE_REP_CODE_ASSOC_EUVAT;
8441
8442 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_FOR_EMEA(-) ' );
8443
8444 ELSE
8445
8446 arp_util_tax.debug('EUVAT Setup does not exist. Migration is not required.' );
8447
8448 END IF;
8449
8450 END CREATE_REP_ENT_EUVAT;
8451
8452
8453 PROCEDURE ZX_MIGRATE_REP_ENTITIES_MAIN IS
8454
8455 BEGIN
8456
8457 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_MAIN(+) ' );
8458
8459 arp_util_tax.debug('Now calling Reporting Type Code...' );
8460
8461 CREATE_ZX_REP_TYPE_CODES(null);
8462
8463 arp_util_tax.debug('Now calling Reporting Association...' );
8464
8465 CREATE_ZX_REPORTING_ASSOC(null);
8466
8467 arp_util_tax.debug('Now calling Usages...' );
8468
8469 CREATE_REPORT_TYPES_USAGES;
8470
8471 /* Calling the procedures for EMEA VAT reporting type */
8472 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_FOR_EMEA(+) ' );
8473
8474 arp_util_tax.debug('Now calling Reporting Type Code for EMEA...' );
8475
8476 CREATE_REPORTING_TYPE_EMEA;
8477
8478 arp_util_tax.debug('Now calling Usages for EMEA...' );
8479
8480 CREATE_REPORT_TYP_USAGES_EMEA;
8481
8482 arp_util_tax.debug('Now calling Reporting Codes for EMEA...' );
8483
8484 CREATE_REPORTING_CODES_EMEA;
8485
8486 arp_util_tax.debug('Now calling Reporting Association...' );
8487
8488 CREATE_REP_CODE_ASSOC_EMEA;
8489
8490 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_FOR_EMEA(-) ' );
8491
8492 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_REVERSE_VAT(+) ' );
8493
8494 CREATE_REP_ENT_REVERSE_VAT;
8495
8496 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_REVERSE_VAT(-) ' );
8497
8498 arp_util_tax.debug('CREATE_REP_ENT_EUVAT(+) ' );
8499
8500 CREATE_REP_ENT_EUVAT;
8501
8502 arp_util_tax.debug('CREATE_REP_ENT_EUVAT(-) ' );
8503
8504 arp_util_tax.debug('ZX_MIGRATE_REP_ENTITIES_MAIN(-) ');
8505
8506
8507 END ZX_MIGRATE_REP_ENTITIES_MAIN;
8508
8509 BEGIN
8510
8511 SELECT NVL(MULTI_ORG_FLAG,'N') INTO L_MULTI_ORG_FLAG FROM
8512 FND_PRODUCT_GROUPS;
8513
8514 IF L_MULTI_ORG_FLAG = 'N' THEN
8515
8516 FND_PROFILE.GET('ORG_ID',L_ORG_ID);
8517
8518 IF L_ORG_ID IS NULL THEN
8519 arp_util_tax.debug('MO: Operating Units site level profile option value not set , resulted in Null Org Id');
8520 END IF;
8521 ELSE
8522 L_ORG_ID := NULL;
8523 END IF;
8524
8525
8526
8527 EXCEPTION
8528 WHEN OTHERS THEN
8529 arp_util_tax.debug('Exception in constructor of Reporting Types Codes and Associations '||sqlerrm);
8530
8531 END ZX_MIGRATE_REP_ENTITIES_PKG ;