[Home] [Help]
663:
664:
665: BEGIN
666:
667: arp_util_tax.debug( ' MTL_SYSTEM_ITEMS.. (+) ' );
668:
669: -- Bug # 5300607. We need to remove Inventory installed check.
670: -- IF Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' THEN
671:
671:
672: -- If Hungary is installed then
673: IF Is_Country_Installed(7002, 'jehuloc') THEN
674:
675: arp_util_tax.debug( 'Initialized the category set value.. ');
676:
677: -- Call Create Categories
678: Create_Category_Sets;
679: CREATE_MTL_CATEGORIES('JGZZ_STATISTICAL_CODE','STATISTICAL_CODE',l_category_status,l_category_set,l_structure_id);
684: /* Create Association to items move to zxitemcatmig.sql */
685:
686: /* Regime Association to Fiscal Type */
687:
688: arp_util_tax.debug( 'Creating the regime association to fiscal type.. ');
689:
690: INSERT ALL INTO ZX_FC_TYPES_REG_ASSOC
691: (Tax_regime_code,
692: classification_type_code,
731: IF Is_Country_Installed(7004, 'jlarloc') THEN
732:
733: --Bug # 3587896
734: /* Create Codes under Intended Use Fiscal Classifications */
735: arp_util_tax.debug( 'Creating the Codes under Intended Use Fiscal Classifications ');
736:
737: FC_CODE_FROM_FND_LOOKUP('INTENDED_USE','JLZZ_AP_DESTINATION_CODE','AR',NULL,NULL,NULL,1);
738:
739: END IF;
741: -- If Hungary is installed then
742: IF Is_Country_Installed(7002, 'jehuloc') THEN
743:
744: /* Create Codes under Product Category Statistical Code */
745: arp_util_tax.debug( 'Creating the Statistical Code.. ');
746:
747: --select zx_fc_codes_b_s.nextval into l_fc_id from dual;
748:
749: FIRST_LEVEL_FC_CODE_INSERT('PRODUCT_CATEGORY','STATISTICAL_CODE','Statistical Code',NULL,l_fc_id);
749: FIRST_LEVEL_FC_CODE_INSERT('PRODUCT_CATEGORY','STATISTICAL_CODE','Statistical Code',NULL,l_fc_id);
750:
751: FC_CODE_FROM_FND_LOOKUP('PRODUCT_CATEGORY','JGZZ_STATISTICAL_CODE',NULL,l_fc_id,'STATISTICAL_CODE','Statistical Code',2);
752:
753: arp_util_tax.debug( ' MTL_SYSTEM_ITEMS end of hungary ');
754:
755: END IF;
756:
757: -- If Brazil is installed then
972: and codes.classification_code = fl.lookup_code
973: and codes.ancestor_id = nvl(l_fc_id,codes.ancestor_id)
974: and codes.language = l.language_code);
975:
976: arp_util_tax.debug( ' Calling the bulk api to create categories..(+)');
977:
978: Create_Category_Set ('FISCAL_CLASSIFICATION',
979: 'Fiscal Classification',
980: 'FISCAL_CLASSIFICATION',
986: -- Call a common procedure to create FC Types
987: FC_TYPE_INSERT('FISCAL_CLASSIFICATION','Fiscal Classification Code',l_category_set);
988:
989: -- Create Regime Association for 'FISCAL CLASSIFICATION CODE'
990: arp_util_tax.debug( 'Creating the regime association to fiscal type.. ');
991:
992: INSERT ALL INTO
993: ZX_FC_TYPES_REG_ASSOC
994: (Tax_regime_code,
1030: where classification_type_code = 'FISCAL_CLASSIFICATION' and
1031: tax_regime_code = rates.tax_regime_code);
1032:
1033:
1034: arp_util_tax.debug( ' Calling the bulk api to create categories..(-)');
1035:
1036: END IF; -- End of Brazil checking
1037:
1038: arp_util_tax.debug( 'MTL_SYSTEM_ITEMS (-) ');
1034: arp_util_tax.debug( ' Calling the bulk api to create categories..(-)');
1035:
1036: END IF; -- End of Brazil checking
1037:
1038: arp_util_tax.debug( 'MTL_SYSTEM_ITEMS (-) ');
1039:
1040: END MTL_SYSTEM_ITEMS ;
1041:
1042: /*===========================================================================+
1085: v_RECORD_TYPE zx_Fc_codes_b.RECORD_TYPE_CODE%type;
1086:
1087: BEGIN
1088:
1089: arp_util_tax.debug( ' FC_ENTITIES .. (+) ' );
1090:
1091: -- If Brazil is installed then
1092: IF Is_Country_Installed(7004, 'jlbrloc') THEN
1093:
1093:
1094: /* Create Codes under User Defined Fiscal Classifications */
1095:
1096: --Bug # 3588145
1097: arp_util_tax.debug( 'Creating the Codes under User Defined Fiscal Classifications ');
1098:
1099: OPEN G_C_GET_TYPES_INFO('USER_DEFINED');
1100:
1101: FETCH G_C_GET_TYPES_INFO INTO
1291: and codes.classification_code = JLBR.cfo_code
1292: and codes.ancestor_id is null
1293: and codes.language = l.language_code);
1294:
1295: arp_util_tax.debug( 'Create OPERATION FISCAL CODE under the Transaction Business Category Type-Level 2: BR');
1296:
1297: -- Insert the GDF under TBC FC TYPE - 2nd level
1298: GDF_PROMPT_INSERT('OPERATION FISCAL CODE', 'Operation Fiscal Code', 'BR', 'PURCHASE_TRANSACTION');
1299:
1310:
1311:
1312: --Create a Code under the Transaction Business Category Type, 3rd Level
1313:
1314: arp_util_tax.debug( 'Create Code under the Transaction Business Category Type-Level 3: BR');
1315:
1316: INSERT
1317: INTO ZX_FC_CODES_B (
1318: classification_type_code,
1533:
1534:
1535: -- Deductible Type Extract - Under Level 2
1536:
1537: arp_util_tax.debug( 'Create the Deductible type extract for country : TAIWAN ');
1538: FC_CODE_GDF_INSERT('DEDUCTIBLE TYPE','Deductible Type','TW','JATW_DEDUCTIBLE_TYPE','PURCHASE_TRANSACTION','MIGRATED');
1539:
1540: -- Document Subtype GUI Extract
1541:
1538: FC_CODE_GDF_INSERT('DEDUCTIBLE TYPE','Deductible Type','TW','JATW_DEDUCTIBLE_TYPE','PURCHASE_TRANSACTION','MIGRATED');
1539:
1540: -- Document Subtype GUI Extract
1541:
1542: arp_util_tax.debug( 'Create the Document Subtype GUI Extract for country : TAIWAN ');
1543:
1544:
1545: /* Create rows for Parent Records */
1546:
1559:
1560:
1561: /* Create Codes on level 2*/
1562:
1563: arp_util_tax.debug( 'Create Codes on level 2 for country : TAIWAN ');
1564:
1565: INSERT
1566: INTO ZX_FC_CODES_B (
1567: classification_type_code,
1765: /*
1766: Wine/ Cigarette Extract
1767: */
1768:
1769: arp_util_tax.debug( 'Create Wine/ Cigarette Extract for country : TAIWAN ');
1770:
1771: /* Get the Seeded Item Category Set Value */
1772: Create_Category_Set ('WINE_CIGARRETE_CATEGORY',
1773: 'Wine Cigarrete',
1809:
1810:
1811: END IF; -- End of Taiwan checking
1812:
1813: arp_util_tax.debug( ' FC_ENTITIES ...(-) ' );
1814:
1815: END FC_ENTITIES;
1816:
1817: /*===========================================================================+
1839: PROCEDURE COUNTRY_DEFAULT IS
1840:
1841: BEGIN
1842:
1843: arp_util_tax.debug( ' COUNTRY_DEFAULT .. (+) ' );
1844:
1845: If Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' then
1846:
1847: -- If Hungary is installed then
1846:
1847: -- If Hungary is installed then
1848: IF Is_Country_Installed(7002, 'jehuloc') THEN
1849:
1850: arp_util_tax.debug( ' Creating data for Hungary..' );
1851:
1852: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1853: COUNTRY_CODE,
1854: PRIMARY_INVENTORY_CATEGORY_SET,
1886:
1887: -- If Poland is installed then
1888: IF Is_Country_Installed(7002, 'jeplloc') THEN
1889:
1890: arp_util_tax.debug( ' Creating data for Poland..' );
1891:
1892: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1893: COUNTRY_CODE,
1894: PRIMARY_INVENTORY_CATEGORY_SET,
1926: END IF; -- End of Poland checking
1927:
1928: IF Is_Country_Installed(7004, 'jlarloc') THEN
1929:
1930: arp_util_tax.debug( ' Creating data for Argentina..' );
1931:
1932: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1933: COUNTRY_CODE,
1934: PRIMARY_INVENTORY_CATEGORY_SET,
1965:
1966: -- If Hungary is installed then
1967: IF Is_Country_Installed(7004, 'jlbrloc') THEN
1968:
1969: arp_util_tax.debug( ' Creating data for Brazil..' );
1970:
1971: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1972: COUNTRY_CODE,
1973: PRIMARY_INVENTORY_CATEGORY_SET,
2002: END IF;
2003:
2004: IF Is_Country_Installed(7004, 'jlcoloc') THEN
2005:
2006: arp_util_tax.debug( ' Creating data for Colombia..' );
2007: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
2008: COUNTRY_CODE,
2009: PRIMARY_INVENTORY_CATEGORY_SET,
2010: INTENDED_USE_DEFAULT,
2038: END IF;
2039:
2040: End if; -- End of Inventory checking
2041:
2042: arp_util_tax.debug( ' COUNTRY_DEFAULT .. (-) ' );
2043:
2044: END COUNTRY_DEFAULT ;
2045:
2046: /*THIS IS THE COMMON PROCEDURE USED TO INSERT THE FIRST LEVEL FC CODES*/
2055: IS
2056:
2057: BEGIN
2058:
2059: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2060: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2061: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2062:
2063: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2056:
2057: BEGIN
2058:
2059: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2060: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2061: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2062:
2063: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2064:
2057: BEGIN
2058:
2059: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2060: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2061: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2062:
2063: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2064:
2065: FETCH G_C_GET_TYPES_INFO INTO
2262: codes.classification_type_code = p_classification_type_code
2263: and codes.parent_classification_id is null
2264: and codes.classification_code = p_classification_code;
2265:
2266: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(-)');
2267:
2268: END FIRST_LEVEL_FC_CODE_INSERT;
2269:
2270:
2282: IS
2283:
2284: BEGIN
2285:
2286: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2287:
2288: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2289: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2290:
2284: BEGIN
2285:
2286: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2287:
2288: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2289: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2290:
2291: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2292:
2285:
2286: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2287:
2288: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2289: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2290:
2291: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2292:
2293: FETCH G_C_GET_TYPES_INFO INTO
2501: and (codes.ancestor_id = p_parent_fc_id or
2502: p_parent_fc_id is null)
2503: and codes.language = l.language_code);
2504:
2505: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(-)');
2506:
2507: END FC_CODE_FROM_FND_LOOKUP;
2508:
2509:
2522: IS
2523:
2524: BEGIN
2525:
2526: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2527:
2528: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2529: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2530:
2524: BEGIN
2525:
2526: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2527:
2528: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2529: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2530:
2531:
2532: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2525:
2526: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2527:
2528: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2529: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2530:
2531:
2532: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2533:
2547: /*
2548: Create a Code under the Transaction Business Category Type, 3rd Level
2549: */
2550:
2551: arp_util_tax.debug( 'Create Code under the Transaction Business Category Type-Level 3: ' || p_country_code);
2552:
2553: INSERT
2554: INTO ZX_FC_CODES_B (
2555: classification_type_code,
2769: and codes.classification_code = fl.lookup_code
2770: and codes.ancestor_id = nvl(fc.classification_id,codes.ancestor_id)
2771: and codes.language = l.language_code);
2772:
2773: arp_util_tax.debug('FC_CODE_GDF_INSERT(-)');
2774:
2775: END FC_CODE_GDF_INSERT;
2776:
2777:
2787: IS
2788:
2789: BEGIN
2790:
2791: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2792:
2793: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2794:
2795: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2789: BEGIN
2790:
2791: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2792:
2793: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2794:
2795: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2796:
2797: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2791: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2792:
2793: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2794:
2795: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2796:
2797: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2798:
2799: fetch G_C_GET_TYPES_INFO into
3011: and codes.ancestor_id = nvl(fc.classification_id,codes.ancestor_id)
3012: and codes.language = l.language_code
3013: );
3014:
3015: arp_util_tax.debug('GDF_PROMPT_INSERT(-)');
3016:
3017: END GDF_PROMPT_INSERT;
3018:
3019:
3021: PROCEDURE ASSOCIATE_ITEMS(p_global_attribute_category
3022: in varchar2) IS
3023: BEGIN
3024:
3025: arp_util_tax.debug('ASSOCIATE_ITEMS(+)');
3026:
3027: arp_util_tax.debug('p_global_attribute_category = ' || p_global_attribute_category);
3028:
3029: /* Regime Association to Fiscal Type */
3023: BEGIN
3024:
3025: arp_util_tax.debug('ASSOCIATE_ITEMS(+)');
3026:
3027: arp_util_tax.debug('p_global_attribute_category = ' || p_global_attribute_category);
3028:
3029: /* Regime Association to Fiscal Type */
3030: INSERT ALL INTO
3031: ZX_FC_TYPES_REG_ASSOC
3066: (select null from ZX_FC_TYPES_REG_ASSOC
3067: where classification_type_code = 'STATISTICAL CODE' and
3068: tax_regime_code = rates.tax_regime_code);
3069:
3070: arp_util_tax.debug('ASSOCIATE_ITEMS(-)');
3071:
3072: End Associate_items;
3073:
3074:
3079: p_owner_id_num IN ZX_FC_TYPES_B.OWNER_ID_NUM%TYPE
3080: ) IS
3081: BEGIN
3082:
3083: arp_util_tax.debug('Creating the fiscal classification types ');
3084:
3085: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3086:
3087: INSERT
3081: BEGIN
3082:
3083: arp_util_tax.debug('Creating the fiscal classification types ');
3084:
3085: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3086:
3087: INSERT
3088: INTO ZX_FC_TYPES_B(
3089: classification_type_id,
3273:
3274: BEGIN
3275: -- Get the Party Classification ID
3276:
3277: arp_util_tax.debug('Creating the party fiscal classification types ');
3278:
3279: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3280:
3281: INSERT
3275: -- Get the Party Classification ID
3276:
3277: arp_util_tax.debug('Creating the party fiscal classification types ');
3278:
3279: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3280:
3281: INSERT
3282: INTO ZX_FC_TYPES_B(
3283: classification_type_id,
3469: l_category_set mtl_category_sets_b.Category_set_ID%TYPE;
3470:
3471: BEGIN
3472:
3473: arp_util_tax.debug('ZX_MIGRATE_AP(+)');
3474:
3475: --Bug # 3587896
3476: IF Is_Country_Installed(7004, 'jlarloc') THEN
3477:
3474:
3475: --Bug # 3587896
3476: IF Is_Country_Installed(7004, 'jlarloc') THEN
3477:
3478: arp_util_tax.debug('Mapping the INTENDED_USE FC Type to category set value.. ');
3479:
3480: Create_Category_Set ('INTENDED_USE',
3481: 'Intended Use',
3482: 'INTENDED_USE',
3509: END IF;
3510:
3511: EXCEPTION
3512: WHEN OTHERS THEN
3513: arp_util_tax.debug('Error while getting category set id for INTENDED_USE ');
3514: END;
3515:
3516: END IF;-- Argentina Installed
3517:
3518: -- If Poland is installed then
3519: IF Is_Country_Installed(7002, 'jeplloc') THEN
3520:
3521: /* Call Inventory Item Categories BULK API */
3522: arp_util_tax.debug( 'Calling the inventory item category BULK API ');
3523: Create_Category_Sets;
3524:
3525: CREATE_MTL_CATEGORIES('JGZZ_STATISTICAL_CODE', 'STATISTICAL_CODE',l_category_status, l_category_set, l_structure_id);
3526:
3573: -- If Spain is installed then
3574: IF Is_Country_Installed(7002, 'jeesloc') THEN
3575:
3576: /* Create the Second Level of Classification Codes */
3577: arp_util_tax.debug( 'Create the Second Level of Classification Codes : SPAIN ');
3578: FC_CODE_GDF_INSERT('INVOICE TYPE','Invoice Type','ES','JEES_INVOICE_CATEGORY', 'PURCHASE_TRANSACTION','MIGRATED');
3579: -- Bug # 5219856
3580: FC_CODE_GDF_INSERT('INVOICE TYPE','Invoice Type','ES','JEES_INVOICE_CATEGORY', 'SALES_TRANSACTION','MIGRATED');
3581:
3584:
3585: -- If France is installed then
3586: IF Is_Country_Installed(7002, 'jefrloc') THEN
3587:
3588: arp_util_tax.debug( 'Create the First Level of Classification Codes : FRANCE ');
3589:
3590: OPEN G_C_GET_TYPES_INFO('DOCUMENT_SUBTYPE');
3591:
3592: FETCH G_C_GET_TYPES_INFO INTO
3603: /*
3604: Create Codes (level 2) under the Document Subtype for France Fiscal Type.
3605: */
3606:
3607: arp_util_tax.debug( 'Create the Document Subtype for Fiscal Type : FRANCE ');
3608:
3609: INSERT
3610: INTO ZX_FC_CODES_B (
3611: classification_type_code,
3813:
3814: -- Begin for CHILE..
3815: /* Create rows for Parent Records */
3816:
3817: arp_util_tax.debug( 'Create rows for Parent Records for country : CHILE ');
3818:
3819: OPEN G_C_GET_TYPES_INFO('DOCUMENT_SUBTYPE');
3820:
3821: FETCH G_C_GET_TYPES_INFO INTO
3829: FIRST_LEVEL_FC_CODE_INSERT('DOCUMENT_SUBTYPE','DOCUMENT TYPE','Document Type','CL',l_fc_id);
3830:
3831: /* Create a Code under the Document Subtype Fiscal Type. */
3832:
3833: arp_util_tax.debug( 'Create a Code under the Document Subtype Fiscal Type for country : CHILE ');
3834:
3835: INSERT
3836: INTO ZX_FC_CODES_B (
3837: classification_type_code,
4032: and codes.language = l.language_code);
4033:
4034: END IF; -- End for Chile checking
4035:
4036: arp_util_tax.debug('ZX_MIGRATE_AP(-)');
4037:
4038: END ZX_MIGRATE_AP;
4039:
4040:
4042:
4043: PROCEDURE ZX_MIGRATE_AR IS
4044:
4045: BEGIN
4046: arp_util_tax.debug('ZX_MIGRATE_AR(+)');
4047:
4048: -- If Hungary is installed then
4049: IF Is_Country_Installed(7002, 'jehuloc') THEN
4050:
4129: where classification_type_code = 'FISCAL_CLASSIFICATION' and
4130: tax_regime_code = rates.tax_regime_code);
4131:
4132: -- Create the Second Level of Classification Codes for Transaction Condition Class
4133: arp_util_tax.debug( 'Create the Second Level of Classification Codes for Transaction Condition Class');
4134: INSERT
4135: INTO ZX_FC_CODES_B
4136: (classification_type_code,
4137: classification_id,
4375: and denorm.ancestor_id = fc.classification_id
4376: and denorm.language = codes.language);
4377:
4378:
4379: arp_util_tax.debug('ZX_MIGRATE_AR(-)');
4380:
4381: END ZX_MIGRATE_AR;
4382:
4383:
4405: l_db_status FND_PRODUCT_INSTALLATIONS.DB_STATUS%TYPE;
4406:
4407: BEGIN
4408:
4409: arp_util_tax.debug( ' Is_Country_Installed .. (+) ' );
4410:
4411: BEGIN
4412: SELECT STATUS, DB_STATUS
4413: into l_status, l_db_status
4417: APPLICATION_ID = p_application_id AND
4418: MODULE_SHORT_NAME = p_module_short_name;
4419: EXCEPTION
4420: WHEN OTHERS THEN
4421: arp_util_tax.debug('Error while getting status and db status value from fnd_module_installations');
4422: END;
4423:
4424: IF (nvl(l_status,'N') in ('I','S') or
4425: nvl(l_db_status,'N') in ('I','S')) THEN
4427: ELSE
4428: return FALSE;
4429: END IF;
4430:
4431: arp_util_tax.debug( ' Is_Country_Installed .. (-) ' );
4432:
4433: END Is_Country_Installed;
4434:
4435:
4449:
4450: PROCEDURE ZX_GDF_TO_ARMEMO_LINES IS
4451:
4452: BEGIN
4453: arp_util_tax.debug( ' ZX_GDF_TO_ARMEMO_LINES .. (+) ' );
4454:
4455: -- If Hungary is installed then migrate Statistical Code GDF
4456: IF Is_Country_Installed(7002, 'jehuloc') THEN
4457: UPDATE ar_memo_lines_all_b
4486: SET tax_product_category = global_attribute1
4487: WHERE global_attribute_category = 'JL.CO.ARXSTDML.AR_MEMO_LINES';
4488: END IF;
4489:
4490: arp_util_tax.debug( ' ZX_GDF_TO_ARMEMO_LINES .. (-) ' );
4491:
4492:
4493: END ZX_GDF_TO_ARMEMO_LINES;
4494:
4633: -- l_next_val NUMBER;
4634:
4635: BEGIN
4636:
4637: arp_util_tax.debug( 'OKL Migration ... (+) ' );
4638: /* Check for Inventory Installed or not, if so, create under Inventory, if not Create Product Category */
4639:
4640: IF Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' THEN
4641:
4647:
4648: -- Call a common procedure to create FC Types
4649: IF l_category_status = 'EXISTS' then
4650:
4651: arp_util_tax.debug( 'Creating Lease Product Fiscal Type');
4652:
4653: FC_TYPE_INSERT('LEASE_MGT_PROD_FISC_CLASS','Lease Management Product Fiscal Class',l_category_set);
4654:
4655: -- Regime Association
4775: FC_PARTY_TYPE_INSERT('LEASE_MGT_PTY_FISC_CLASS','Lease Management Party Fiscal Class','AR_TAX_PARTY_FISCAL_CLASS');
4776:
4777: -- Create User Defined Codes
4778:
4779: arp_util_tax.debug( 'Creating the Codes under User Defined Fiscal Classifications ');
4780:
4781: OPEN G_C_GET_TYPES_INFO('USER_DEFINED');
4782:
4783: FETCH G_C_GET_TYPES_INFO INTO
4985: and codes.language = l.language_code);
4986:
4987: -- Disable Lookup Type
4988: -- Create Country defaults ?
4989: arp_util_tax.debug( 'OKL Migration ... (-) ' );
4990:
4991: END OKL_MIGRATION;
4992:
4993:
5010: PROCEDURE ZX_FC_MIGRATE IS
5011:
5012: BEGIN
5013:
5014: arp_util_tax.debug( ' ZX_FC_MIGRATE .. (+) ' );
5015: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5016:
5017: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5018:
5011:
5012: BEGIN
5013:
5014: arp_util_tax.debug( ' ZX_FC_MIGRATE .. (+) ' );
5015: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5016:
5017: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5018:
5019: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5015: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5016:
5017: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5018:
5019: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5020:
5021: ZX_FC_MIGRATE_PKG.FC_ENTITIES;
5022:
5023: arp_util_tax.debug( ' Now calling Migrate AP .. ' );
5019: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5020:
5021: ZX_FC_MIGRATE_PKG.FC_ENTITIES;
5022:
5023: arp_util_tax.debug( ' Now calling Migrate AP .. ' );
5024:
5025: If Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
5026: ZX_MIGRATE_AP;
5027: End if;
5025: If Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
5026: ZX_MIGRATE_AP;
5027: End if;
5028:
5029: arp_util_tax.debug( ' Now calling Migrate AR .. ' );
5030:
5031: If Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
5032: ZX_MIGRATE_AR;
5033: End if;
5031: If Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
5032: ZX_MIGRATE_AR;
5033: End if;
5034:
5035: arp_util_tax.debug( ' Now calling Migrate OKL .. ' );
5036: OKL_MIGRATION;
5037:
5038: arp_util_tax.debug( ' Now calling country default.. ' );
5039:
5034:
5035: arp_util_tax.debug( ' Now calling Migrate OKL .. ' );
5036: OKL_MIGRATION;
5037:
5038: arp_util_tax.debug( ' Now calling country default.. ' );
5039:
5040: ZX_FC_MIGRATE_PKG.COUNTRY_DEFAULT;
5041:
5042: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5038: arp_util_tax.debug( ' Now calling country default.. ' );
5039:
5040: ZX_FC_MIGRATE_PKG.COUNTRY_DEFAULT;
5041:
5042: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5043:
5044: ZX_GDF_TO_ARMEMO_LINES;
5045:
5046: arp_util_tax.debug('ZX_FC_MIGRATE_PKG...(-)');
5042: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5043:
5044: ZX_GDF_TO_ARMEMO_LINES;
5045:
5046: arp_util_tax.debug('ZX_FC_MIGRATE_PKG...(-)');
5047:
5048: END ZX_FC_MIGRATE;
5049:
5050: BEGIN
5056:
5057: FND_PROFILE.GET('ORG_ID',L_ORG_ID);
5058:
5059: IF L_ORG_ID IS NULL THEN
5060: arp_util_tax.debug('MO: Operating Units site level profile option value not set , resulted in Null Org Id');
5061: END IF;
5062: ELSE
5063: L_ORG_ID := NULL;
5064: END IF;
5066:
5067:
5068: EXCEPTION
5069: WHEN OTHERS THEN
5070: arp_util_tax.debug('Exception in constructor of Fiscal Classification '||sqlerrm);
5071:
5072: END ZX_FC_MIGRATE_PKG ;