44: END IF;
45: SavePoint Ap_Tax_Setup;
46:
47: BEGIN
48: arp_util_tax.debug('b:Migrate FND LOOKUPS');
49: BEGIN
50: migrate_fnd_lookups;
51: EXCEPTION
52: WHEN OTHERS THEN
46:
47: BEGIN
48: arp_util_tax.debug('b:Migrate FND LOOKUPS');
49: BEGIN
50: migrate_fnd_lookups;
51: EXCEPTION
52: WHEN OTHERS THEN
53: arp_util_tax.debug('Exception encountered in migrate_fnd_lookups:'||sqlerrm);
54: END;
49: BEGIN
50: migrate_fnd_lookups;
51: EXCEPTION
52: WHEN OTHERS THEN
53: arp_util_tax.debug('Exception encountered in migrate_fnd_lookups:'||sqlerrm);
54: END;
55: arp_util_tax.debug('a:Migrate FND LOOKUPS');
56:
57: --BugFix 3557681
51: EXCEPTION
52: WHEN OTHERS THEN
53: arp_util_tax.debug('Exception encountered in migrate_fnd_lookups:'||sqlerrm);
54: END;
55: arp_util_tax.debug('a:Migrate FND LOOKUPS');
56:
57: --BugFix 3557681
58: arp_util_tax.debug('b:Create Tax Classifications');
59: BEGIN
238: END migrate_ap_tax_codes_setup;
239:
240: /*===========================================================================+
241: | PROCEDURE |
242: | migrate_fnd_lookups |
243: | |
244: | DESCRIPTION |
245: | This routine processes AP Tax_setup related fnd_lookups and creates |
246: | appropriate ZX lookups in FND_LOOKUPS. |
241: | PROCEDURE |
242: | migrate_fnd_lookups |
243: | |
244: | DESCRIPTION |
245: | This routine processes AP Tax_setup related fnd_lookups and creates |
246: | appropriate ZX lookups in FND_LOOKUPS. |
247: | For Instance |
248: | AP_TAX_CODES_ALL.VAT_TRANSACTION_TYPE --> ZX_RATES.VAT_TRANSACTION_TYPE|
249: | |
242: | migrate_fnd_lookups |
243: | |
244: | DESCRIPTION |
245: | This routine processes AP Tax_setup related fnd_lookups and creates |
246: | appropriate ZX lookups in FND_LOOKUPS. |
247: | For Instance |
248: | AP_TAX_CODES_ALL.VAT_TRANSACTION_TYPE --> ZX_RATES.VAT_TRANSACTION_TYPE|
249: | |
250: | SCOPE - PUBLIC |
259: | 24-Dec-03 Srinivas Lokam Created. |
260: | |
261: |==========================================================================*/
262:
263: PROCEDURE migrate_fnd_lookups IS
264:
265: l_cnt PLS_INTEGER := 0;
266:
267: BEGIN
265: l_cnt PLS_INTEGER := 0;
266:
267: BEGIN
268: IF PG_DEBUG = 'Y' THEN
269: arp_util_tax.debug('Migrate_fnd_lookups(+)');
270: END IF;
271: /* For VAT_TRANSACTION_TYPE Lookup */
272:
273: /*SELECT count(vat_transaction_type)
356: and lookup_code = ap_lookups.lookup_code);
357: EXCEPTION
358: WHEN OTHERS THEN
359: IF PG_DEBUG = 'Y' THEN
360: arp_util_tax.debug('EXCEPTION: Migrate_fnd_lookups : JEBE_VAT_TRANS_TYPE');
361: arp_util_tax.debug(sqlerrm);
362: arp_util_tax.debug('Migrate_fnd_lookups(-)');
363: END IF;
364: END ;
358: WHEN OTHERS THEN
359: IF PG_DEBUG = 'Y' THEN
360: arp_util_tax.debug('EXCEPTION: Migrate_fnd_lookups : JEBE_VAT_TRANS_TYPE');
361: arp_util_tax.debug(sqlerrm);
362: arp_util_tax.debug('Migrate_fnd_lookups(-)');
363: END IF;
364: END ;
365:
366: --END IF;
459:
460: --END IF;
461:
462: IF PG_DEBUG = 'Y' THEN
463: arp_util_tax.debug('Migrate_fnd_lookups(-)');
464: END IF;
465:
466:
467:
467:
468: EXCEPTION
469: WHEN OTHERS THEN
470: IF PG_DEBUG = 'Y' THEN
471: arp_util_tax.debug('EXCEPTION: Migrate_fnd_lookups ');
472: arp_util_tax.debug(sqlerrm);
473: arp_util_tax.debug('Migrate_fnd_lookups(-)');
474: END IF;
475: --app_exception.raise_exception;
469: WHEN OTHERS THEN
470: IF PG_DEBUG = 'Y' THEN
471: arp_util_tax.debug('EXCEPTION: Migrate_fnd_lookups ');
472: arp_util_tax.debug(sqlerrm);
473: arp_util_tax.debug('Migrate_fnd_lookups(-)');
474: END IF;
475: --app_exception.raise_exception;
476:
477: END migrate_fnd_lookups;
473: arp_util_tax.debug('Migrate_fnd_lookups(-)');
474: END IF;
475: --app_exception.raise_exception;
476:
477: END migrate_fnd_lookups;
478:
479: /*===========================================================================+
480: | PROCEDURE |
481: | Create_Tax_Classifications |
481: | Create_Tax_Classifications |
482: | |
483: | DESCRIPTION |
484: | This routine processes AP Tax Codes and creates associated |
485: | Tax Classification records in FND_LOOKUPS. |
486: | |
487: | SCOPE - PUBLIC |
488: | |
489: | EXTERNAL PROCEDURES/FUNCTIONS ACCESSED |
7984: (
7985: SELECT
7986: lookup_code,lookup_type
7987: FROM
7988: FND_LOOKUPS
7989: WHERE
7990: lookup_type = 'JGZZ_TAX_ORIGIN'
7991: OR lookup_type = 'JECH_VAT_REGIME'
7992: OR lookup_type = 'JLCL_TAX_CODE_CLASS'
7994: SELECT
7995: lookup_code,lookup_type
7996: FROM
7997: ap_tax_codes_all,
7998: fnd_lookups
7999: WHERE
8000: (lookup_type = 'JGZZ_TAX_ORIGIN'
8001: AND global_attribute_category = 'JE.CZ.APXTADTC.TAX_ORIGIN'
8002: AND global_attribute1 = lookup_code) --Review1 changes
8410: (
8411: SELECT
8412: lookup_code,lookup_type
8413: FROM
8414: FND_LOOKUPS
8415: WHERE
8416: lookup_type = 'JGZZ_TAX_ORIGIN'
8417: OR lookup_type = 'JECH_VAT_REGIME'
8418: OR lookup_type = 'JLCL_TAX_CODE_CLASS'
8420: SELECT
8421: lookup_code,lookup_type
8422: FROM
8423: ap_tax_codes_all,
8424: fnd_lookups
8425: WHERE
8426: (lookup_type = 'JGZZ_TAX_ORIGIN'
8427: AND global_attribute_category = 'JE.CZ.APXTADTC.TAX_ORIGIN'
8428: AND global_attribute1 = lookup_code) --Review1 changes