[Home] [Help]
676: l_MSG_DATA varchar2(200);
677:
678: BEGIN
679:
680: arp_util_tax.debug( ' MTL_SYSTEM_ITEMS.. (+) ' );
681:
682: -- Bug # 5300607. We need to remove Inventory installed check.
683: -- IF Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' THEN
684:
684:
685: -- If Hungary is installed then
686: IF Is_Country_Installed(7002, 'jehuloc') THEN
687:
688: arp_util_tax.debug( 'Initialized the category set value.. ');
689:
690: -- Call Create Categories
691: Create_Category_Sets;
692: CREATE_MTL_CATEGORIES('JGZZ_STATISTICAL_CODE','STATISTICAL_CODE',l_category_status,l_category_set,l_structure_id);
697: /* Create Association to items move to zxitemcatmig.sql */
698:
699: /* Regime Association to Fiscal Type */
700:
701: arp_util_tax.debug( 'Creating the regime association to fiscal type.. ');
702:
703: INSERT ALL INTO ZX_FC_TYPES_REG_ASSOC
704: (Tax_regime_code,
705: classification_type_code,
744: IF Is_Country_Installed(7004, 'jlarloc') THEN
745:
746: --Bug # 3587896
747: /* Create Codes under Intended Use Fiscal Classifications */
748: arp_util_tax.debug( 'Creating the Codes under Intended Use Fiscal Classifications ');
749:
750: FC_CODE_FROM_FND_LOOKUP('INTENDED_USE','JLZZ_AP_DESTINATION_CODE','AR',NULL,NULL,NULL,1);
751:
752: END IF;
754: -- If Hungary is installed then
755: IF Is_Country_Installed(7002, 'jehuloc') THEN
756:
757: /* Create Codes under Product Category Statistical Code */
758: arp_util_tax.debug( 'Creating the Statistical Code.. ');
759:
760: --select zx_fc_codes_b_s.nextval into l_fc_id from dual;
761:
762: FIRST_LEVEL_FC_CODE_INSERT('PRODUCT_CATEGORY','STATISTICAL_CODE','Statistical Code',NULL,l_fc_id);
762: FIRST_LEVEL_FC_CODE_INSERT('PRODUCT_CATEGORY','STATISTICAL_CODE','Statistical Code',NULL,l_fc_id);
763:
764: FC_CODE_FROM_FND_LOOKUP('PRODUCT_CATEGORY','JGZZ_STATISTICAL_CODE',NULL,l_fc_id,'STATISTICAL_CODE','Statistical Code',2);
765:
766: arp_util_tax.debug( ' MTL_SYSTEM_ITEMS end of hungary ');
767:
768: END IF;
769:
770: -- If Brazil is installed then
983: and codes.classification_code = fl.lookup_code
984: and codes.ancestor_id = nvl(l_fc_id,codes.ancestor_id)
985: and codes.language = l.language_code);
986:
987: arp_util_tax.debug( ' Calling the bulk api to create categories..(+)');
988:
989: Create_Category_Set ('FISCAL_CLASSIFICATION',
990: 'Fiscal Classification',
991: 'FISCAL_CLASSIFICATION',
997: -- Call a common procedure to create FC Types
998: FC_TYPE_INSERT('FISCAL_CLASSIFICATION','Fiscal Classification Code',l_category_set);
999:
1000: -- Create Regime Association for 'FISCAL CLASSIFICATION CODE'
1001: arp_util_tax.debug( 'Creating the regime association to fiscal type.. ');
1002:
1003: INSERT ALL INTO
1004: ZX_FC_TYPES_REG_ASSOC
1005: (Tax_regime_code,
1040: from ZX_FC_TYPES_REG_ASSOC
1041: where classification_type_code = 'FISCAL_CLASSIFICATION'
1042: and tax_regime_code = rates.tax_regime_code);
1043:
1044: arp_util_tax.debug( ' Calling the bulk api to create categories..(-)');
1045:
1046: END IF; -- End of Brazil checking
1047:
1048: arp_util_tax.debug( 'MTL_SYSTEM_ITEMS (-) ');
1044: arp_util_tax.debug( ' Calling the bulk api to create categories..(-)');
1045:
1046: END IF; -- End of Brazil checking
1047:
1048: arp_util_tax.debug( 'MTL_SYSTEM_ITEMS (-) ');
1049:
1050: END MTL_SYSTEM_ITEMS ;
1051:
1052: /*===========================================================================+
1090: v_RECORD_TYPE zx_Fc_codes_b.RECORD_TYPE_CODE%type;
1091:
1092: BEGIN
1093:
1094: arp_util_tax.debug( ' FC_ENTITIES .. (+) ' );
1095:
1096: -- If Brazil is installed then
1097: IF Is_Country_Installed(7004, 'jlbrloc') THEN
1098:
1098:
1099: /* Create Codes under User Defined Fiscal Classifications */
1100:
1101: --Bug # 3588145
1102: arp_util_tax.debug( 'Creating the Codes under User Defined Fiscal Classifications ');
1103:
1104: OPEN G_C_GET_TYPES_INFO('USER_DEFINED');
1105:
1106: FETCH G_C_GET_TYPES_INFO INTO
1295: and codes.classification_code = JLBR.cfo_code
1296: and codes.ancestor_id is null
1297: and codes.language = l.language_code);
1298:
1299: arp_util_tax.debug( 'Create OPERATION FISCAL CODE under the Transaction Business Category Type-Level 2: BR');
1300:
1301: -- Insert the GDF under TBC FC TYPE - 2nd level
1302: GDF_PROMPT_INSERT('OPERATION FISCAL CODE', 'Operation Fiscal Code', 'BR', 'PURCHASE_TRANSACTION');
1303:
1313: CLOSE G_C_GET_TYPES_INFO;
1314:
1315: --Create a Code under the Transaction Business Category Type, 3rd Level
1316:
1317: arp_util_tax.debug( 'Create Code under the Transaction Business Category Type-Level 3: BR');
1318:
1319: INSERT
1320: INTO ZX_FC_CODES_B (
1321: classification_type_code,
1534: IF Is_Country_Installed(7000, 'jatwloc') THEN
1535:
1536: -- Deductible Type Extract - Under Level 2
1537:
1538: arp_util_tax.debug( 'Create the Deductible type extract for country : TAIWAN ');
1539: FC_CODE_GDF_INSERT('DEDUCTIBLE TYPE','Deductible Type','TW','JATW_DEDUCTIBLE_TYPE','PURCHASE_TRANSACTION','MIGRATED');
1540:
1541: -- Document Subtype GUI Extract
1542:
1539: FC_CODE_GDF_INSERT('DEDUCTIBLE TYPE','Deductible Type','TW','JATW_DEDUCTIBLE_TYPE','PURCHASE_TRANSACTION','MIGRATED');
1540:
1541: -- Document Subtype GUI Extract
1542:
1543: arp_util_tax.debug( 'Create the Document Subtype GUI Extract for country : TAIWAN ');
1544:
1545:
1546: /* Create rows for Parent Records */
1547:
1560:
1561:
1562: /* Create Codes on level 2*/
1563:
1564: arp_util_tax.debug( 'Create Codes on level 2 for country : TAIWAN ');
1565:
1566: INSERT
1567: INTO ZX_FC_CODES_B (
1568: classification_type_code,
1764: /*
1765: Wine/ Cigarette Extract
1766: */
1767:
1768: arp_util_tax.debug( 'Create Wine/ Cigarette Extract for country : TAIWAN ');
1769:
1770: /* Get the Seeded Item Category Set Value */
1771: Create_Category_Set ('WINE_CIGARRETE_CATEGORY',
1772: 'Wine Cigarrete',
1808:
1809:
1810: END IF; -- End of Taiwan checking
1811:
1812: arp_util_tax.debug( ' FC_ENTITIES ...(-) ' );
1813:
1814: END FC_ENTITIES;
1815:
1816: /*===========================================================================+
1832: PROCEDURE COUNTRY_DEFAULT IS
1833:
1834: BEGIN
1835:
1836: arp_util_tax.debug( ' COUNTRY_DEFAULT .. (+) ' );
1837:
1838: If Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' then
1839:
1840: -- If Hungary is installed then
1839:
1840: -- If Hungary is installed then
1841: IF Is_Country_Installed(7002, 'jehuloc') THEN
1842:
1843: arp_util_tax.debug( ' Creating data for Hungary..' );
1844:
1845: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1846: COUNTRY_CODE,
1847: PRIMARY_INVENTORY_CATEGORY_SET,
1879:
1880: -- If Poland is installed then
1881: IF Is_Country_Installed(7002, 'jeplloc') THEN
1882:
1883: arp_util_tax.debug( ' Creating data for Poland..' );
1884:
1885: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1886: COUNTRY_CODE,
1887: PRIMARY_INVENTORY_CATEGORY_SET,
1919: END IF; -- End of Poland checking
1920:
1921: IF Is_Country_Installed(7004, 'jlarloc') THEN
1922:
1923: arp_util_tax.debug( ' Creating data for Argentina..' );
1924:
1925: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1926: COUNTRY_CODE,
1927: PRIMARY_INVENTORY_CATEGORY_SET,
1958:
1959: -- If Hungary is installed then
1960: IF Is_Country_Installed(7004, 'jlbrloc') THEN
1961:
1962: arp_util_tax.debug( ' Creating data for Brazil..' );
1963:
1964: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
1965: COUNTRY_CODE,
1966: PRIMARY_INVENTORY_CATEGORY_SET,
1995: END IF;
1996:
1997: IF Is_Country_Installed(7004, 'jlcoloc') THEN
1998:
1999: arp_util_tax.debug( ' Creating data for Colombia..' );
2000: INSERT INTO ZX_FC_COUNTRY_DEFAULTS (
2001: COUNTRY_CODE,
2002: PRIMARY_INVENTORY_CATEGORY_SET,
2003: INTENDED_USE_DEFAULT,
2031: END IF;
2032:
2033: End if; -- End of Inventory checking
2034:
2035: arp_util_tax.debug( ' COUNTRY_DEFAULT .. (-) ' );
2036:
2037: END COUNTRY_DEFAULT ;
2038:
2039: /*THIS IS THE COMMON PROCEDURE USED TO INSERT THE FIRST LEVEL FC CODES*/
2048: IS
2049:
2050: BEGIN
2051:
2052: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2053: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2054: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2055:
2056: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2049:
2050: BEGIN
2051:
2052: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2053: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2054: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2055:
2056: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2057:
2050: BEGIN
2051:
2052: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(+)');
2053: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2054: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2055:
2056: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2057:
2058: FETCH G_C_GET_TYPES_INFO INTO
2255: codes.classification_type_code = p_classification_type_code
2256: and codes.parent_classification_id is null
2257: and codes.classification_code = p_classification_code;
2258:
2259: arp_util_tax.debug('FIRST_LEVEL_FC_CODE_INSERT(-)');
2260:
2261: END FIRST_LEVEL_FC_CODE_INSERT;
2262:
2263:
2275: IS
2276:
2277: BEGIN
2278:
2279: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2280:
2281: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2282: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2283:
2277: BEGIN
2278:
2279: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2280:
2281: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2282: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2283:
2284: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2285:
2278:
2279: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(+)');
2280:
2281: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
2282: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2283:
2284: OPEN G_C_GET_TYPES_INFO(p_classification_type_code);
2285:
2286: FETCH G_C_GET_TYPES_INFO INTO
2494: and (codes.ancestor_id = p_parent_fc_id or
2495: p_parent_fc_id is null)
2496: and codes.language = l.language_code);
2497:
2498: arp_util_tax.debug('FC_CODE_FROM_FND_LOOKUP(-)');
2499:
2500: END FC_CODE_FROM_FND_LOOKUP;
2501:
2502:
2515: IS
2516:
2517: BEGIN
2518:
2519: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2520:
2521: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2522: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2523:
2517: BEGIN
2518:
2519: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2520:
2521: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2522: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2523:
2524:
2525: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2518:
2519: arp_util_tax.debug('FC_CODE_GDF_INSERT(+)');
2520:
2521: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2522: arp_util_tax.debug('p_lookup_type = ' || p_lookup_type);
2523:
2524:
2525: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2526:
2540: /*
2541: Create a Code under the Transaction Business Category Type, 3rd Level
2542: */
2543:
2544: arp_util_tax.debug( 'Create Code under the Transaction Business Category Type-Level 3: ' || p_country_code);
2545:
2546: INSERT
2547: INTO ZX_FC_CODES_B (
2548: classification_type_code,
2789: and codes.effective_from = nvl(fl.start_date_active,to_date('01/01/1951','DD/MM/YYYY'))
2790: and NVL(codes.enabled_flag,chr(0)) = fl.enabled_flag
2791: );
2792:
2793: arp_util_tax.debug('FC_CODE_GDF_INSERT(-)');
2794:
2795: END FC_CODE_GDF_INSERT;
2796:
2797:
2807: IS
2808:
2809: BEGIN
2810:
2811: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2812:
2813: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2814:
2815: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2809: BEGIN
2810:
2811: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2812:
2813: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2814:
2815: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2816:
2817: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2811: arp_util_tax.debug('GDF_PROMPT_INSERT(+)');
2812:
2813: arp_util_tax.debug('p_classification_code = ' || p_classification_code);
2814:
2815: arp_util_tax.debug( 'Create the Second Level of Classification Codes for :'||p_country_code);
2816:
2817: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
2818:
2819: fetch G_C_GET_TYPES_INFO into
3042: and codes.ancestor_id = nvl(fc.classification_id,codes.ancestor_id)
3043: and codes.language = l.language_code
3044: );
3045:
3046: arp_util_tax.debug('GDF_PROMPT_INSERT(-)');
3047:
3048: END GDF_PROMPT_INSERT;
3049:
3050:
3052: PROCEDURE ASSOCIATE_ITEMS(p_global_attribute_category
3053: in varchar2) IS
3054: BEGIN
3055:
3056: arp_util_tax.debug('ASSOCIATE_ITEMS(+)');
3057:
3058: arp_util_tax.debug('p_global_attribute_category = ' || p_global_attribute_category);
3059:
3060: /* Regime Association to Fiscal Type */
3054: BEGIN
3055:
3056: arp_util_tax.debug('ASSOCIATE_ITEMS(+)');
3057:
3058: arp_util_tax.debug('p_global_attribute_category = ' || p_global_attribute_category);
3059:
3060: /* Regime Association to Fiscal Type */
3061: INSERT ALL INTO
3062: ZX_FC_TYPES_REG_ASSOC
3097: (select null from ZX_FC_TYPES_REG_ASSOC
3098: where classification_type_code = 'STATISTICAL CODE' and
3099: tax_regime_code = rates.tax_regime_code);
3100:
3101: arp_util_tax.debug('ASSOCIATE_ITEMS(-)');
3102:
3103: End Associate_items;
3104:
3105:
3110: p_owner_id_num IN ZX_FC_TYPES_B.OWNER_ID_NUM%TYPE
3111: ) IS
3112: BEGIN
3113:
3114: arp_util_tax.debug('Creating the fiscal classification types ');
3115:
3116: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3117:
3118: INSERT
3112: BEGIN
3113:
3114: arp_util_tax.debug('Creating the fiscal classification types ');
3115:
3116: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3117:
3118: INSERT
3119: INTO ZX_FC_TYPES_B(
3120: classification_type_id,
3302:
3303: BEGIN
3304: -- Get the Party Classification ID
3305:
3306: arp_util_tax.debug('Creating the party fiscal classification types ');
3307:
3308: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3309:
3310: INSERT
3304: -- Get the Party Classification ID
3305:
3306: arp_util_tax.debug('Creating the party fiscal classification types ');
3307:
3308: arp_util_tax.debug('p_classification_type_code = ' || p_classification_type_code);
3309:
3310: INSERT
3311: INTO ZX_FC_TYPES_B(
3312: classification_type_id,
3496: l_category_set mtl_category_sets_b.Category_set_ID%TYPE;
3497:
3498: BEGIN
3499:
3500: arp_util_tax.debug('ZX_MIGRATE_AP(+)');
3501:
3502: -- Creating the regime association for Vendor Type rules
3503: -- Bug 13963357
3504:
3673:
3674: --Bug # 3587896
3675: IF Is_Country_Installed(7004, 'jlarloc') THEN
3676:
3677: arp_util_tax.debug('Mapping the INTENDED_USE FC Type to category set value.. ');
3678:
3679: Create_Category_Set ('INTENDED_USE',
3680: 'Intended Use',
3681: 'INTENDED_USE',
3708: END IF;
3709:
3710: EXCEPTION
3711: WHEN OTHERS THEN
3712: arp_util_tax.debug('Error while getting category set id for INTENDED_USE ');
3713: END;
3714:
3715: END IF;-- Argentina Installed
3716:
3717: -- If Poland is installed then
3718: IF Is_Country_Installed(7002, 'jeplloc') THEN
3719:
3720: /* Call Inventory Item Categories BULK API */
3721: arp_util_tax.debug( 'Calling the inventory item category BULK API ');
3722: Create_Category_Sets;
3723:
3724: CREATE_MTL_CATEGORIES('JGZZ_STATISTICAL_CODE', 'STATISTICAL_CODE',l_category_status, l_category_set, l_structure_id);
3725:
3772: -- If Spain is installed then
3773: IF Is_Country_Installed(7002, 'jeesloc') THEN
3774:
3775: /* Create the Second Level of Classification Codes */
3776: arp_util_tax.debug( 'Create the Second Level of Classification Codes : SPAIN ');
3777: FC_CODE_GDF_INSERT('INVOICE TYPE','Invoice Type','ES','JEES_INVOICE_CATEGORY', 'PURCHASE_TRANSACTION','MIGRATED');
3778: -- Bug # 5219856
3779: FC_CODE_GDF_INSERT('INVOICE TYPE','Invoice Type','ES','JEES_INVOICE_CATEGORY', 'SALES_TRANSACTION','MIGRATED');
3780:
3783:
3784: -- If France is installed then
3785: IF Is_Country_Installed(7002, 'jefrloc') THEN
3786:
3787: arp_util_tax.debug( 'Create the First Level of Classification Codes : FRANCE ');
3788:
3789: OPEN G_C_GET_TYPES_INFO('DOCUMENT_SUBTYPE');
3790:
3791: FETCH G_C_GET_TYPES_INFO INTO
3802: /*
3803: Create Codes (level 2) under the Document Subtype for France Fiscal Type.
3804: */
3805:
3806: arp_util_tax.debug( 'Create the Document Subtype for Fiscal Type : FRANCE ');
3807:
3808: INSERT
3809: INTO ZX_FC_CODES_B (
3810: classification_type_code,
4013:
4014: -- Begin for CHILE..
4015: /* Create rows for Parent Records */
4016:
4017: arp_util_tax.debug( 'Create rows for Parent Records for country : CHILE ');
4018:
4019: OPEN G_C_GET_TYPES_INFO('DOCUMENT_SUBTYPE');
4020:
4021: FETCH G_C_GET_TYPES_INFO INTO
4029: FIRST_LEVEL_FC_CODE_INSERT('DOCUMENT_SUBTYPE','DOCUMENT TYPE','Document Type','CL',l_fc_id);
4030:
4031: /* Create a Code under the Document Subtype Fiscal Type. */
4032:
4033: arp_util_tax.debug( 'Create a Code under the Document Subtype Fiscal Type for country : CHILE ');
4034:
4035: INSERT
4036: INTO ZX_FC_CODES_B (
4037: classification_type_code,
4233: and codes.language = l.language_code);
4234:
4235: END IF; -- End for Chile checking
4236:
4237: arp_util_tax.debug('ZX_MIGRATE_AP(-)');
4238:
4239: END ZX_MIGRATE_AP;
4240:
4241:
4243:
4244: PROCEDURE ZX_MIGRATE_AR IS
4245:
4246: BEGIN
4247: arp_util_tax.debug('ZX_MIGRATE_AR(+)');
4248:
4249: -- If Hungary is installed then
4250: IF Is_Country_Installed(7002, 'jehuloc') THEN
4251:
4330: where classification_type_code = 'FISCAL_CLASSIFICATION' and
4331: tax_regime_code = rates.tax_regime_code);
4332:
4333: -- Create the Second Level of Classification Codes for Transaction Condition Class
4334: arp_util_tax.debug( 'Create the Second Level of Classification Codes for Transaction Condition Class');
4335:
4336: OPEN G_C_GET_TYPES_INFO('TRX_BUSINESS_CATEGORY');
4337: FETCH G_C_GET_TYPES_INFO INTO
4338: G_CLASSIFICATION_TYPE_ID,
4591: where fctl.classification_id = fc.classification_id
4592: and fctl.language = codes.language);
4593:
4594:
4595: arp_util_tax.debug('ZX_MIGRATE_AR(-)');
4596:
4597: END ZX_MIGRATE_AR;
4598:
4599:
4621: l_db_status FND_PRODUCT_INSTALLATIONS.DB_STATUS%TYPE;
4622:
4623: BEGIN
4624:
4625: arp_util_tax.debug( ' Is_Country_Installed .. (+) ' );
4626:
4627: BEGIN
4628: SELECT STATUS, DB_STATUS
4629: into l_status, l_db_status
4633: APPLICATION_ID = p_application_id AND
4634: MODULE_SHORT_NAME = p_module_short_name;
4635: EXCEPTION
4636: WHEN OTHERS THEN
4637: arp_util_tax.debug('Error while getting status and db status value from fnd_module_installations');
4638: END;
4639:
4640: IF (nvl(l_status,'N') in ('I','S') or
4641: nvl(l_db_status,'N') in ('I','S')) THEN
4643: ELSE
4644: return FALSE;
4645: END IF;
4646:
4647: arp_util_tax.debug( ' Is_Country_Installed .. (-) ' );
4648:
4649: END Is_Country_Installed;
4650:
4651:
4665:
4666: PROCEDURE ZX_GDF_TO_ARMEMO_LINES IS
4667:
4668: BEGIN
4669: arp_util_tax.debug( ' ZX_GDF_TO_ARMEMO_LINES .. (+) ' );
4670:
4671: -- Bug#8304834- update tax_product_category from
4672: -- global_attribute1 only if it is null
4673: --
4710: WHERE global_attribute_category = 'JL.CO.ARXSTDML.AR_MEMO_LINES'
4711: AND tax_product_category IS NULL;
4712: END IF;
4713:
4714: arp_util_tax.debug( ' ZX_GDF_TO_ARMEMO_LINES .. (-) ' );
4715:
4716:
4717: END ZX_GDF_TO_ARMEMO_LINES;
4718:
4857: -- l_next_val NUMBER;
4858:
4859: BEGIN
4860:
4861: arp_util_tax.debug( 'OKL Migration ... (+) ' );
4862: /* Check for Inventory Installed or not, if so, create under Inventory, if not Create Product Category */
4863:
4864: IF Zx_Migrate_Util.IS_INSTALLED('INV') = 'Y' THEN
4865:
4871:
4872: -- Call a common procedure to create FC Types
4873: IF l_category_status = 'EXISTS' then
4874:
4875: arp_util_tax.debug( 'Creating Lease Product Fiscal Type');
4876:
4877: FC_TYPE_INSERT('LEASE_MGT_PROD_FISC_CLASS','Lease Management Product Fiscal Class',l_category_set);
4878:
4879: -- Regime Association
4999: FC_PARTY_TYPE_INSERT('LEASE_MGT_PTY_FISC_CLASS','Lease Management Party Fiscal Class','AR_TAX_PARTY_FISCAL_CLASS');
5000:
5001: -- Create User Defined Codes
5002:
5003: arp_util_tax.debug( 'Creating the Codes under User Defined Fiscal Classifications ');
5004:
5005: OPEN G_C_GET_TYPES_INFO('USER_DEFINED');
5006:
5007: FETCH G_C_GET_TYPES_INFO INTO
5209: and codes.language = l.language_code);
5210:
5211: -- Disable Lookup Type
5212: -- Create Country defaults ?
5213: arp_util_tax.debug( 'OKL Migration ... (-) ' );
5214:
5215: END OKL_MIGRATION;
5216:
5217:
5233: PROCEDURE ZX_FC_MIGRATE IS
5234:
5235: BEGIN
5236:
5237: arp_util_tax.debug( ' ZX_FC_MIGRATE .. (+) ' );
5238: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5239:
5240: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5241:
5234:
5235: BEGIN
5236:
5237: arp_util_tax.debug( ' ZX_FC_MIGRATE .. (+) ' );
5238: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5239:
5240: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5241:
5242: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5238: arp_util_tax.debug( ' Now calling MTL system items .. ' );
5239:
5240: ZX_FC_MIGRATE_PKG.MTL_SYSTEM_ITEMS;
5241:
5242: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5243:
5244: ZX_FC_MIGRATE_PKG.FC_ENTITIES;
5245:
5246: arp_util_tax.debug( ' Now calling Migrate AP .. ' );
5242: arp_util_tax.debug( ' Now calling FC Entities .. ' );
5243:
5244: ZX_FC_MIGRATE_PKG.FC_ENTITIES;
5245:
5246: arp_util_tax.debug( ' Now calling Migrate AP .. ' );
5247:
5248: If Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
5249: ZX_MIGRATE_AP;
5250: End if;
5248: If Zx_Migrate_Util.IS_INSTALLED('AP') = 'Y' THEN
5249: ZX_MIGRATE_AP;
5250: End if;
5251:
5252: arp_util_tax.debug( ' Now calling Migrate AR .. ' );
5253:
5254: If Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
5255: ZX_MIGRATE_AR;
5256: End if;
5254: If Zx_Migrate_Util.IS_INSTALLED('AR') = 'Y' THEN
5255: ZX_MIGRATE_AR;
5256: End if;
5257:
5258: arp_util_tax.debug( ' Now calling Migrate OKL .. ' );
5259: OKL_MIGRATION;
5260:
5261: arp_util_tax.debug( ' Now calling country default.. ' );
5262:
5257:
5258: arp_util_tax.debug( ' Now calling Migrate OKL .. ' );
5259: OKL_MIGRATION;
5260:
5261: arp_util_tax.debug( ' Now calling country default.. ' );
5262:
5263: ZX_FC_MIGRATE_PKG.COUNTRY_DEFAULT;
5264:
5265: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5261: arp_util_tax.debug( ' Now calling country default.. ' );
5262:
5263: ZX_FC_MIGRATE_PKG.COUNTRY_DEFAULT;
5264:
5265: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5266:
5267: ZX_GDF_TO_ARMEMO_LINES;
5268:
5269: arp_util_tax.debug('ZX_FC_MIGRATE_PKG...(-)');
5265: arp_util_tax.debug( ' Now calling ZX_GDF_TO_ARMEMO_LINES...' );
5266:
5267: ZX_GDF_TO_ARMEMO_LINES;
5268:
5269: arp_util_tax.debug('ZX_FC_MIGRATE_PKG...(-)');
5270:
5271: END ZX_FC_MIGRATE;
5272:
5273: BEGIN
5279:
5280: FND_PROFILE.GET('ORG_ID',L_ORG_ID);
5281:
5282: IF L_ORG_ID IS NULL THEN
5283: arp_util_tax.debug('MO: Operating Units site level profile option value not set , resulted in Null Org Id');
5284: END IF;
5285: ELSE
5286: L_ORG_ID := NULL;
5287: END IF;
5289:
5290:
5291: EXCEPTION
5292: WHEN OTHERS THEN
5293: arp_util_tax.debug('Exception in constructor of Fiscal Classification '||sqlerrm);
5294:
5295: END ZX_FC_MIGRATE_PKG ;