[Home] [Help]
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;
193: END ;
194:
195:
196:
197: arp_util_tax.debug('CREATE_ZX_REPORTING_ASSOC(-)');
198:
199: END CREATE_ZX_REPORTING_ASSOC;
200:
201:
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
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 ,
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
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;
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:
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;
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
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)
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:
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
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)
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:
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(
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 ,
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 ,
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 ,
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:
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
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
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(
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:
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 ,
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 */
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
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:
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);
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:
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,
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,
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: /*=========================================================================+
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(
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 ,
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 |
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(
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 ,
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: /*=========================================================================+
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(
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 ,
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 ,
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 ,
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: /*=========================================================================+
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 ,
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'
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)
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 ,
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: /*==========================================================================+
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 ,
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: /*==========================================================================+
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(
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 ,
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 ,
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 ,
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: /*==========================================================================+
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:
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
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,
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,
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: /*===========================================================================+
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:
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
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
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 ,
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 ,
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 ,
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 ,
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,
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: /*===========================================================================+
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
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
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
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: (
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));
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: /*==========================================================================+
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: (
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: /*==========================================================================+
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: (
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: (
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: /*==========================================================================+
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,
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));
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: /*==========================================================================+
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;
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...' );
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...' );
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...' );
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(-) ' );
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.' );
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;
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);
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...' );
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...' );
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 */
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;
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...' );
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...' );
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...' );
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(-) ' );
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;
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(-) ' );
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;
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(-) ' );
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:
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:
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;
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 ;