[Home] [Help]
502: l_SUPP_AWT_CODE_ID_CD JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_CODE_ID%TYPE;
503: l_SUPP_AWT_TYPE_ID_CD JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_TYPE_ID%TYPE;
504: l_SUPP_AWT_CODE_ID_SEQ JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_CODE_ID%TYPE;
505: l_SUPP_AWT_TYPE_ID_SEQ JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_TYPE_ID%TYPE;
506: l_tax_id ap_tax_codes.tax_id%TYPE;
507: l_SUPP_AWT_TYPE_ID_TYPES JL_ZZ_AP_SUPP_AWT_TYPES.SUPP_AWT_TYPE_ID%TYPE;
508: l_VENDOR_ID PO_VENDORS.VENDOR_ID%TYPE;
509: l_INV_DISTRIB_AWT_ID_INV JL_ZZ_AP_INV_DIS_WH_ALL.INV_DISTRIB_AWT_ID%TYPE;
510: l_INVOICE_ID_INA AP_INVOICES_ALL.INVOICE_ID%TYPE;
527: WHERE PV.VENDOR_ID = APINA.VENDOR_ID
528: AND NVL(pv.employee_id, - 99) = papf.person_id (+)
529: AND NVL(papf.EFFECTIVE_START_DATE, SYSDATE) <= SYSDATE
530: AND NVL(papf.EFFECTIVE_END_DATE, SYSDATE) >= SYSDATE
531: --AND APIND.TAX_CODE_ID in (SELECT TAX_ID FROM AP_TAX_CODES WHERE name like 'TURN_BSAS_GRP%')
532: AND APINA.INVOICE_ID = APIND.INVOICE_ID
533: AND APIND.LINE_TYPE_LOOKUP_CODE = 'ITEM'
534: AND APIND.GLOBAL_ATTRIBUTE3 IN
535: -- (SELECT LOCATION_ID FROM HR_LOCATIONS_ALL WHERE UPPER(LOCATION_CODE) = 'BUENOS AIRES' --bug 8622329
727: AND tax_rate = l_WHT_RATE_ALL;
728:
729: SELECT tax_id
730: INTO l_tax_id
731: FROM AP_TAX_CODES
732: WHERE name = l_WHT_GROUP_NUM_ALL
733: AND tax_type = 'AWT';
734:
735: EXCEPTION
1061: AND NVL(papf.EFFECTIVE_START_DATE, SYSDATE) <= SYSDATE
1062: AND NVL(papf.EFFECTIVE_END_DATE, SYSDATE) >= SYSDATE
1063: AND SAWT.AWT_TYPE_CODE = l_AWT_TAX_TYPE
1064: AND SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1065: --AND SAWTC.TAX_ID in (SELECT TAX_ID FROM AP_TAX_CODES WHERE name like 'TURN_BSAS_GRP%')
1066: AND SAWTC.TAX_ID = l_tax_id
1067: AND SAWTC.EFFECTIVE_START_DATE = l_START_DATE
1068: AND SAWTC.primary_tax_flag = 'Y'
1069: AND sawtc.effective_end_DATE IS NULL
1107: AND SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD;
1108: /*(SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
1109: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1110: -- AND SAWTC.EFFECTIVE_START_DATE = l_START_DATE
1111: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')); */
1112:
1113: EXCEPTION
1114: WHEN NO_DATA_FOUND THEN
1115: AWT_CODE_INV_AVAIL_FLAG := 'N';
1194: AND SUPP_AWT_CODE_ID IN
1195: (SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
1196: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1197: AND SAWTC.primary_tax_flag = 'Y'
1198: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')
1199: AND sawtc.effective_end_DATE IS NULL);*/
1200:
1201:
1202: UPDATE JL_ZZ_AP_INV_DIS_WH SET SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD
1587: AND NVL(papf.EFFECTIVE_START_DATE, SYSDATE) <= SYSDATE
1588: AND NVL(papf.EFFECTIVE_END_DATE, SYSDATE) >= SYSDATE
1589: AND SAWT.AWT_TYPE_CODE = l_AWT_TAX_TYPE
1590: AND SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1591: --AND SAWTC.TAX_ID in (SELECT TAX_ID FROM AP_TAX_CODES WHERE name like 'TURN_BSAS_GRP%')
1592: AND SAWTC.TAX_ID = l_tax_id
1593: AND SAWTC.primary_tax_flag = 'Y'
1594: AND SAWTC.EFFECTIVE_START_DATE = l_START_DATE
1595: AND sawtc.effective_end_DATE IS NULL
1631: AND INVOICE_DISTRIBUTION_ID = INV_REC.INVOICE_DISTRIBUTION_ID
1632: AND SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD;
1633: /*(SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
1634: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1635: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')); */
1636:
1637: EXCEPTION
1638: WHEN NO_DATA_FOUND THEN
1639: AWT_CODE_INV_AVAIL_FLAG := 'N';
1715: AND SUPP_AWT_CODE_ID IN
1716: (SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
1717: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
1718: AND SAWTC.primary_tax_flag = 'Y'
1719: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')
1720: AND sawtc.effective_end_DATE IS NULL);*/
1721:
1722:
1723: UPDATE JL_ZZ_AP_INV_DIS_WH SET SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD
1852: l_WHT_GROUP_NUM_DEF_NO NUMBER;
1853: def_taxtype_code_check VARCHAR2(1) := 'N';
1854: AWT_CODE_INV_AVAIL_FLAG VARCHAR2(1) := 'N';
1855:
1856: l_WHT_GROUP_NUM_DEF_ATC AP_TAX_CODES_ALL.NAME%TYPE;
1857: l_TAX_ID_DEF_ATC AP_TAX_CODES_ALL.TAX_ID%TYPE;
1858: l_WHT_RATE_DEF_ATR AP_AWT_TAX_RATES_ALL.TAX_RATE%TYPE;
1859: ALL_REC JL_AR_TURN_UPL%ROWTYPE;
1860:
1853: def_taxtype_code_check VARCHAR2(1) := 'N';
1854: AWT_CODE_INV_AVAIL_FLAG VARCHAR2(1) := 'N';
1855:
1856: l_WHT_GROUP_NUM_DEF_ATC AP_TAX_CODES_ALL.NAME%TYPE;
1857: l_TAX_ID_DEF_ATC AP_TAX_CODES_ALL.TAX_ID%TYPE;
1858: l_WHT_RATE_DEF_ATR AP_AWT_TAX_RATES_ALL.TAX_RATE%TYPE;
1859: ALL_REC JL_AR_TURN_UPL%ROWTYPE;
1860:
1861: l_SUPP_AWT_CODE_ID_CD JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_CODE_ID%TYPE;
1859: ALL_REC JL_AR_TURN_UPL%ROWTYPE;
1860:
1861: l_SUPP_AWT_CODE_ID_CD JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_CODE_ID%TYPE;
1862: l_SUPP_AWT_TYPE_ID_CD JL_ZZ_AP_SUP_AWT_CD_ALL.SUPP_AWT_TYPE_ID%TYPE;
1863: l_tax_id ap_tax_codes.tax_id%TYPE;
1864: l_SUPP_AWT_TYPE_ID_TYPES JL_ZZ_AP_SUPP_AWT_TYPES.SUPP_AWT_TYPE_ID%TYPE;
1865: l_VENDOR_ID PO_VENDORS.VENDOR_ID%TYPE;
1866: l_INV_DISTRIB_AWT_ID_INV JL_ZZ_AP_INV_DIS_WH_ALL.INV_DISTRIB_AWT_ID%TYPE;
1867: l_INVOICE_ID_INA AP_INVOICES_ALL.INVOICE_ID%TYPE;
1892: WHERE PV.VENDOR_ID = APINA.VENDOR_ID
1893: AND NVL(pv.employee_id, - 99) = papf.person_id (+)
1894: AND NVL(papf.EFFECTIVE_START_DATE, SYSDATE) <= SYSDATE
1895: AND NVL(papf.EFFECTIVE_END_DATE, SYSDATE) >= SYSDATE
1896: --AND APIND.TAX_CODE_ID in (SELECT TAX_ID FROM AP_TAX_CODES WHERE name like 'TURN_BSAS_GRP%')
1897: AND APINA.INVOICE_ID = APIND.INVOICE_ID
1898: AND APIND.LINE_TYPE_LOOKUP_CODE = 'ITEM'
1899: AND APIND.GLOBAL_ATTRIBUTE3 IN
1900: -- (SELECT LOCATION_ID FROM HR_LOCATIONS_ALL WHERE UPPER(LOCATION_CODE) = 'BUENOS AIRES' AND trunc(SYSDATE) <= NVL(inactive_DATE, trunc(SYSDATE))) --bug 8622329
1934: SELECT MAX(END_DATE) INTO l_END_DATE_CURR_MAX FROM JL_AR_TURN_UPL;
1935: --SELECT MAX(PUBLISH_DATE) INTO l_PUBLISH_DATE_CURR_MAX FROM JL_AR_TURN_UPL;
1936: SELECT name
1937: INTO l_WHT_GROUP_NUM_DEF_ATC
1938: FROM AP_TAX_CODES ATC
1939: WHERE global_attribute1 = 'Y'
1940: AND tax_type = 'AWT';
1941:
1942: SELECT tax_id
1940: AND tax_type = 'AWT';
1941:
1942: SELECT tax_id
1943: INTO l_TAX_ID_DEF_ATC
1944: FROM AP_TAX_CODES
1945: WHERE name = l_WHT_GROUP_NUM_DEF_ATC
1946: AND tax_type = 'AWT';
1947:
1948: SELECT TAX_RATE
2119: AND SAWT.AWT_TYPE_CODE = l_AWT_TAX_TYPE
2120: AND SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
2121: AND SAWTC.primary_tax_flag = 'Y'
2122: --AND SAWT.WH_SUBJECT_FLAG = 'Y' -- Indicates whether the supplier is subject to the withholding tax type
2123: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')
2124: AND SAWTC.EFFECTIVE_END_DATE IS NULL
2125: --bug 8530918 AND NVL(papf.national_identifier, NVL(pv.individual_1099, pv.num_1099)) = TO_CHAR(l_TAXPAYER_ID);
2126: AND rtrim(
2127: substr(
2285: AND INVOICE_DISTRIBUTION_ID = INV_REC.INVOICE_DISTRIBUTION_ID
2286: AND SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD;
2287: /*(SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
2288: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
2289: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')); */
2290:
2291: EXCEPTION
2292: WHEN NO_DATA_FOUND THEN
2293: AWT_CODE_INV_AVAIL_FLAG := 'N';
2369: AND SUPP_AWT_CODE_ID IN
2370: (SELECT SUPP_AWT_CODE_ID FROM JL_ZZ_AP_SUP_AWT_CD SAWTC, JL_ZZ_AP_SUPP_AWT_TYPES SAWT
2371: WHERE SAWT.SUPP_AWT_TYPE_ID = SAWTC.SUPP_AWT_TYPE_ID
2372: AND SAWTC.primary_tax_flag = 'Y'
2373: AND SAWTC.TAX_ID IN (SELECT TAX_ID FROM AP_TAX_CODES WHERE name LIKE 'TURN_BSAS_GRP%')
2374: AND sawtc.effective_end_DATE IS NULL);*/
2375:
2376: UPDATE JL_ZZ_AP_INV_DIS_WH SET SUPP_AWT_CODE_ID = l_SUPP_AWT_CODE_ID_CD
2377: WHERE INV_DISTRIB_AWT_ID = l_INV_DISTRIB_AWT_ID_DIS;