[Home] [Help]
90: null;
91: END api_copy;
92:
93: ---------------------------------------------------------------------------
94: -- FUNCTION get_rec for: OKL_TAX_TRX_DETAILS_V
95: ---------------------------------------------------------------------------
96: FUNCTION get_rec (
97: p_ttdv_rec IN ttdv_rec_type,
98: x_no_data_found OUT NOCOPY BOOLEAN
170: CURRENCY_CONVERSION_TYPE,
171: CURRENCY_CONVERSION_RATE,
172: CURRENCY_CONVERSION_DATE
173: -- Modified by dcshanmu for eBTax - modification end
174: FROM Okl_Tax_Trx_Details
175: WHERE okl_tax_trx_details.id = p_id;
176: l_okl_ttdv_pk okl_ttdv_pk_csr%ROWTYPE;
177: l_ttdv_rec ttdv_rec_type;
178: BEGIN
171: CURRENCY_CONVERSION_RATE,
172: CURRENCY_CONVERSION_DATE
173: -- Modified by dcshanmu for eBTax - modification end
174: FROM Okl_Tax_Trx_Details
175: WHERE okl_tax_trx_details.id = p_id;
176: l_okl_ttdv_pk okl_ttdv_pk_csr%ROWTYPE;
177: l_ttdv_rec ttdv_rec_type;
178: BEGIN
179: x_no_data_found := TRUE;
285: BEGIN
286: RETURN(get_rec(p_ttdv_rec, l_row_not_found));
287: END get_rec;
288: ---------------------------------------------------------------------------
289: -- FUNCTION get_rec for: OKL_TAX_TRX_DETAILS
290: ---------------------------------------------------------------------------
291: FUNCTION get_rec (
292: p_ttd_rec IN ttd_rec_type,
293: x_no_data_found OUT NOCOPY BOOLEAN
366: CURRENCY_CONVERSION_RATE,
367: CURRENCY_CONVERSION_DATE
368: -- Modified by dcshanmu for eBTax - modification end
369:
370: FROM Okl_Tax_Trx_Details
371: WHERE okl_tax_trx_details.id = p_id;
372: l_okl_ttd_pk okl_ttd_pk_csr%ROWTYPE;
373: l_ttd_rec ttd_rec_type;
374: BEGIN
367: CURRENCY_CONVERSION_DATE
368: -- Modified by dcshanmu for eBTax - modification end
369:
370: FROM Okl_Tax_Trx_Details
371: WHERE okl_tax_trx_details.id = p_id;
372: l_okl_ttd_pk okl_ttd_pk_csr%ROWTYPE;
373: l_ttd_rec ttd_rec_type;
374: BEGIN
375: x_no_data_found := TRUE;
481: BEGIN
482: RETURN(get_rec(p_ttd_rec, l_row_not_found));
483: END get_rec;
484: ---------------------------------------------------------------------------
485: -- FUNCTION null_out_defaults for: OKL_TAX_TRX_DETAILS_V
486: ---------------------------------------------------------------------------
487: FUNCTION null_out_defaults (
488: p_ttdv_rec IN ttdv_rec_type
489: ) RETURN ttdv_rec_type IS
764: g_no_parent_record,
765: g_col_name_token,
766: 'txs_id',
767: g_child_table_token ,
768: 'OKL_TAX_TRX_DETAILS',
769: g_parent_table_token ,
770: 'OKL_TAX_SOURCES');
771: l_return_status := OKC_API.G_RET_STS_ERROR;
772:
815: g_no_parent_record,
816: g_col_name_token,
817: 'tax_call_type_code',
818: g_child_table_token ,
819: 'OKL_TAX_TRX_DETAILS',
820: g_parent_table_token ,
821: 'FND_LOOKUP_VALUES');
822: l_return_status := OKC_API.G_RET_STS_ERROR;
823:
869: g_no_parent_record,
870: g_col_name_token,
871: 'tax_rate_id',
872: g_child_table_token ,
873: 'OKL_TAX_TRX_DETAILS',
874: g_parent_table_token ,
875: 'ZX_RATES_B');
876: l_return_status := OKC_API.G_RET_STS_ERROR;
877:
920: g_no_parent_record,
921: g_col_name_token,
922: 'tax_rate_code',
923: g_child_table_token ,
924: 'OKL_TAX_TRX_DETAILS',
925: g_parent_table_token ,
926: 'ZX_RATES_B');
927: l_return_status := OKC_API.G_RET_STS_ERROR;
928:
971: g_no_parent_record,
972: g_col_name_token,
973: 'tax_exemption_id',
974: g_child_table_token ,
975: 'OKL_TAX_TRX_DETAILS',
976: g_parent_table_token ,
977: 'ZX_EXEMPTIONS');
978: l_return_status := OKC_API.G_RET_STS_ERROR;
979:
1022: g_no_parent_record,
1023: g_col_name_token,
1024: 'internal_organization_id',
1025: g_child_table_token ,
1026: 'OKL_TAX_TRX_DETAILS',
1027: g_parent_table_token ,
1028: 'HR_ALL_ORGANIZATION_UNITS');
1029: l_return_status := OKC_API.G_RET_STS_ERROR;
1030:
1077: g_no_parent_record,
1078: g_col_name_token,
1079: 'application_id',
1080: g_child_table_token ,
1081: 'OKL_TAX_TRX_DETAILS',
1082: g_parent_table_token ,
1083: 'FND_APPLICATION');
1084: l_return_status := OKC_API.G_RET_STS_ERROR;
1085:
1312: g_no_parent_record,
1313: g_col_name_token,
1314: 'tax_regime_id',
1315: g_child_table_token ,
1316: 'OKL_TAX_TRX_DETAILS',
1317: g_parent_table_token ,
1318: 'ZX_REGIMES_B');
1319: l_return_status := OKC_API.G_RET_STS_ERROR;
1320:
1360: g_no_parent_record,
1361: g_col_name_token,
1362: 'tax_regime_code',
1363: g_child_table_token ,
1364: 'OKL_TAX_TRX_DETAILS',
1365: g_parent_table_token ,
1366: 'ZX_REGIMES_B');
1367: l_return_status := OKC_API.G_RET_STS_ERROR;
1368:
1408: g_no_parent_record,
1409: g_col_name_token,
1410: 'tax_id',
1411: g_child_table_token ,
1412: 'OKL_TAX_TRX_DETAILS',
1413: g_parent_table_token ,
1414: 'ZX_TAXES_B');
1415: l_return_status := OKC_API.G_RET_STS_ERROR;
1416:
1456: g_no_parent_record,
1457: g_col_name_token,
1458: 'tax_status_id',
1459: g_child_table_token ,
1460: 'OKL_TAX_TRX_DETAILS',
1461: g_parent_table_token ,
1462: 'ZX_STATUS_B');
1463: l_return_status := OKC_API.G_RET_STS_ERROR;
1464:
1504: g_no_parent_record,
1505: g_col_name_token,
1506: 'tax_jurisdiction_id',
1507: g_child_table_token ,
1508: 'OKL_TAX_TRX_DETAILS',
1509: g_parent_table_token ,
1510: 'ZX_JURISDICTIONS_B');
1511: l_return_status := OKC_API.G_RET_STS_ERROR;
1512:
1552: g_no_parent_record,
1553: g_col_name_token,
1554: 'tax_currency_code',
1555: g_child_table_token ,
1556: 'OKL_TAX_TRX_DETAILS',
1557: g_parent_table_token ,
1558: 'FND_CURRENCIES');
1559: l_return_status := OKC_API.G_RET_STS_ERROR;
1560:
1600: g_no_parent_record,
1601: g_col_name_token,
1602: 'trx_currency_code',
1603: g_child_table_token ,
1604: 'OKL_TAX_TRX_DETAILS',
1605: g_parent_table_token ,
1606: 'FND_CURRENCIES');
1607: l_return_status := OKC_API.G_RET_STS_ERROR;
1608:
1626: ---------------------------------------------------------------------------
1627: -- FUNCTION Validate_Attributes
1628: ---------------------------------------------------------------------------
1629: ---------------------------------------------------
1630: -- Validate_Attributes for:OKL_TAX_TRX_DETAILS_V --
1631: ---------------------------------------------------
1632: FUNCTION Validate_Attributes (
1633: p_ttdv_rec IN ttdv_rec_type
1634: ) RETURN VARCHAR2 IS
1944: ---------------------------------------------------------------------------
1945: -- PROCEDURE Validate_Record
1946: ---------------------------------------------------------------------------
1947: /*-----------------------------------------------
1948: -- Validate Record for:OKL_TAX_TRX_DETAILS_V --
1949: -----------------------------------------------
1950: FUNCTION Validate_Record (
1951: p_ttdv_rec IN ttdv_rec_type,
1952: p_db_okl_tax_trx_details_v_rec IN ttdv_rec_type
1948: -- Validate Record for:OKL_TAX_TRX_DETAILS_V --
1949: -----------------------------------------------
1950: FUNCTION Validate_Record (
1951: p_ttdv_rec IN ttdv_rec_type,
1952: p_db_okl_tax_trx_details_v_rec IN ttdv_rec_type
1953: ) RETURN VARCHAR2 IS
1954: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1955: ------------------------------------
1956: -- FUNCTION validate_foreign_keys --
1956: -- FUNCTION validate_foreign_keys --
1957: ------------------------------------
1958: FUNCTION validate_foreign_keys (
1959: p_ttdv_rec IN ttdv_rec_type,
1960: p_db_okl_tax_trx_details_v_rec IN ttdv_rec_type
1961: ) RETURN VARCHAR2 IS
1962: item_not_found_error EXCEPTION;
1963:
1964: CURSOR okl_ttdv_tax_call_t1 (p_lookup_code IN VARCHAR2) IS
2051: BEGIN
2052:
2053: IF ((p_ttdv_rec.TXS_ID IS NOT NULL)
2054: AND
2055: (p_ttdv_rec.TXS_ID <> p_db_okl_tax_trx_details_v_rec.TXS_ID))
2056: THEN
2057: OPEN okl_ttdv_txs_id_csr (p_ttdv_rec.TXS_ID);
2058: FETCH okl_ttdv_txs_id_csr INTO l_okl_ttdv_txs_id;
2059: l_row_notfound := okl_ttdv_txs_id_csr%NOTFOUND;
2065: END IF;
2066:
2067: IF ((p_ttdv_rec.TAX_CALL_TYPE_CODE IS NOT NULL)
2068: AND
2069: (p_ttdv_rec.TAX_CALL_TYPE_CODE <> p_db_okl_tax_trx_details_v_rec.TAX_CALL_TYPE_CODE))
2070: THEN
2071: OPEN okl_ttdv_tax_call_t1 (p_ttdv_rec.TAX_CALL_TYPE_CODE);
2072: FETCH okl_ttdv_tax_call_t1 INTO l_okl_ttdv_tax_call_type_code;
2073: l_row_notfound := okl_ttdv_tax_call_t1%NOTFOUND;
2079: END IF;
2080:
2081: IF ((p_ttdv_rec.TAX_RATE_ID IS NOT NULL)
2082: AND
2083: (p_ttdv_rec.TAX_RATE_ID <> p_db_okl_tax_trx_details_v_rec.TAX_RATE_ID))
2084: THEN
2085: OPEN okl_ttdv_tri_fk_csr (p_ttdv_rec.TAX_RATE_ID);
2086: FETCH okl_ttdv_tri_fk_csr INTO l_okl_ttdv_tri;
2087: l_row_notfound := okl_ttdv_tri_fk_csr%NOTFOUND;
2093: END IF;
2094:
2095: IF ((p_ttdv_rec.TAX_RATE_CODE IS NOT NULL)
2096: AND
2097: (p_ttdv_rec.TAX_RATE_CODE <> p_db_okl_tax_trx_details_v_rec.TAX_RATE_CODE))
2098: THEN
2099: OPEN okl_ttdv_trc_fk_csr (p_ttdv_rec.TAX_RATE_CODE);
2100: FETCH okl_ttdv_trc_fk_csr INTO l_okl_ttdv_trc;
2101: l_row_notfound := okl_ttdv_trc_fk_csr%NOTFOUND;
2107: END IF;
2108:
2109: IF ((p_ttdv_rec.TAX_EXEMPTION_ID IS NOT NULL)
2110: AND
2111: (p_ttdv_rec.TAX_EXEMPTION_ID <> p_db_okl_tax_trx_details_v_rec.TAX_EXEMPTION_ID))
2112: THEN
2113: OPEN okl_ttdv_tei_fk_csr (p_ttdv_rec.TAX_EXEMPTION_ID);
2114: FETCH okl_ttdv_tei_fk_csr INTO l_okl_ttdv_tei;
2115: l_row_notfound := okl_ttdv_tei_fk_csr%NOTFOUND;
2121: END IF;
2122:
2123: IF ((p_ttdv_rec.INTERNAL_ORGANIZATION_ID IS NOT NULL)
2124: AND
2125: (p_ttdv_rec.INTERNAL_ORGANIZATION_ID <> p_db_okl_tax_trx_details_v_rec.INTERNAL_ORGANIZATION_ID))
2126: THEN
2127: OPEN okl_ttdv_ioi_fk_csr (p_ttdv_rec.INTERNAL_ORGANIZATION_ID);
2128: FETCH okl_ttdv_ioi_fk_csr INTO l_okl_ttdv_ioi;
2129: l_row_notfound := okl_ttdv_ioi_fk_csr%NOTFOUND;
2135: END IF;
2136:
2137: IF ((p_ttdv_rec.APPLICATION_ID IS NOT NULL)
2138: AND
2139: (p_ttdv_rec.APPLICATION_ID <> p_db_okl_tax_trx_details_v_rec.APPLICATION_ID))
2140: THEN
2141: OPEN okl_ttdv_app_id_fk_csr (p_ttdv_rec.APPLICATION_ID);
2142: FETCH okl_ttdv_app_id_fk_csr INTO l_okl_ttdv_app_id;
2143: l_row_notfound := okl_ttdv_app_id_fk_csr%NOTFOUND;
2149: END IF;
2150:
2151: IF ((p_ttdv_rec.TAX_REGIME_ID IS NOT NULL)
2152: AND
2153: (p_ttdv_rec.TAX_REGIME_ID <> p_db_okl_tax_trx_details_v_rec.TAX_REGIME_ID))
2154: THEN
2155: OPEN okl_ttdv_tx_reg_id_fk_csr (p_ttdv_rec.TAX_REGIME_ID);
2156: FETCH okl_ttdv_tx_reg_id_fk_csr INTO l_okl_ttdv_tx_reg_id;
2157: l_row_notfound := okl_ttdv_tx_reg_id_fk_csr%NOTFOUND;
2163: END IF;
2164:
2165: IF ((p_ttdv_rec.TAX_REGIME_CODE IS NOT NULL)
2166: AND
2167: (p_ttdv_rec.TAX_REGIME_CODE <> p_db_okl_tax_trx_details_v_rec.TAX_REGIME_CODE))
2168: THEN
2169: OPEN okl_ttdv_tx_reg_cd_fk_csr (p_ttdv_rec.TAX_REGIME_CODE);
2170: FETCH okl_ttdv_tx_reg_cd_fk_csr INTO l_okl_ttdv_tx_reg_cd;
2171: l_row_notfound := okl_ttdv_tx_reg_cd_fk_csr%NOTFOUND;
2177: END IF;
2178:
2179: IF ((p_ttdv_rec.TAX_ID IS NOT NULL)
2180: AND
2181: (p_ttdv_rec.TAX_ID <> p_db_okl_tax_trx_details_v_rec.TAX_ID))
2182: THEN
2183: OPEN okl_ttdv_tx_id_fk_csr (p_ttdv_rec.TAX_ID);
2184: FETCH okl_ttdv_tx_id_fk_csr INTO l_okl_ttdv_tx_id;
2185: l_row_notfound := okl_ttdv_tx_id_fk_csr%NOTFOUND;
2191: END IF;
2192:
2193: IF ((p_ttdv_rec.TAX_STATUS_ID IS NOT NULL)
2194: AND
2195: (p_ttdv_rec.TAX_STATUS_ID <> p_db_okl_tax_trx_details_v_rec.TAX_STATUS_ID))
2196: THEN
2197: OPEN okl_ttdv_tx_st_id_fk_csr (p_ttdv_rec.TAX_STATUS_ID);
2198: FETCH okl_ttdv_tx_st_id_fk_csr INTO l_okl_ttdv_tx_st_id;
2199: l_row_notfound := okl_ttdv_tx_st_id_fk_csr%NOTFOUND;
2205: END IF;
2206:
2207: IF ((p_ttdv_rec.TAX_JURISDICTION_ID IS NOT NULL)
2208: AND
2209: (p_ttdv_rec.TAX_JURISDICTION_ID <> p_db_okl_tax_trx_details_v_rec.TAX_JURISDICTION_ID))
2210: THEN
2211: OPEN okl_ttdv_tx_jur_id_fk_csr (p_ttdv_rec.TAX_JURISDICTION_ID);
2212: FETCH okl_ttdv_tx_jur_id_fk_csr INTO l_okl_ttdv_tx_jur_id;
2213: l_row_notfound := okl_ttdv_tx_jur_id_fk_csr%NOTFOUND;
2219: END IF;
2220:
2221: IF ((p_ttdv_rec.TAX_CURRENCY_CODE IS NOT NULL)
2222: AND
2223: (p_ttdv_rec.TAX_CURRENCY_CODE <> p_db_okl_tax_trx_details_v_rec.TAX_CURRENCY_CODE))
2224: THEN
2225: OPEN okl_ttdv_tx_cur_cd_fk_csr (p_ttdv_rec.TAX_CURRENCY_CODE);
2226: FETCH okl_ttdv_tx_cur_cd_fk_csr INTO l_okl_ttdv_tx_cur_cd;
2227: l_row_notfound := okl_ttdv_tx_cur_cd_fk_csr%NOTFOUND;
2233: END IF;
2234:
2235: IF ((p_ttdv_rec.TRX_CURRENCY_CODE IS NOT NULL)
2236: AND
2237: (p_ttdv_rec.TRX_CURRENCY_CODE <> p_db_okl_tax_trx_details_v_rec.TRX_CURRENCY_CODE))
2238: THEN
2239: OPEN okl_ttdv_trx_cur_cd_fk_csr (p_ttdv_rec.TRX_CURRENCY_CODE);
2240: FETCH okl_ttdv_trx_cur_cd_fk_csr INTO l_okl_ttdv_trx_cur_cd;
2241: l_row_notfound := okl_ttdv_trx_cur_cd_fk_csr%NOTFOUND;
2252: l_return_status := OKL_API.G_RET_STS_ERROR;
2253: RETURN (l_return_status);
2254: END validate_foreign_keys;
2255: BEGIN
2256: l_return_status := validate_foreign_keys(p_ttdv_rec, p_db_okl_tax_trx_details_v_rec);
2257: RETURN (l_return_status);
2258: END Validate_Record;
2259: FUNCTION Validate_Record (
2260: p_ttdv_rec IN ttdv_rec_type
2259: FUNCTION Validate_Record (
2260: p_ttdv_rec IN ttdv_rec_type
2261: ) RETURN VARCHAR2 IS
2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2263: l_db_okl_tax_trx_details_v_rec ttdv_rec_type := get_rec(p_ttdv_rec);
2264: BEGIN
2265: l_return_status := Validate_Record(p_ttdv_rec => p_ttdv_rec,
2266: p_db_okl_tax_trx_details_v_rec => l_db_okl_tax_trx_details_v_rec);
2267: RETURN (l_return_status);
2262: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2263: l_db_okl_tax_trx_details_v_rec ttdv_rec_type := get_rec(p_ttdv_rec);
2264: BEGIN
2265: l_return_status := Validate_Record(p_ttdv_rec => p_ttdv_rec,
2266: p_db_okl_tax_trx_details_v_rec => l_db_okl_tax_trx_details_v_rec);
2267: RETURN (l_return_status);
2268: END Validate_Record;
2269: */
2270: ---------------------------------------------------------------------------
2431: ---------------------------------------------------------------------------
2432: -- PROCEDURE validate_row
2433: ---------------------------------------------------------------------------
2434: --------------------------------------------
2435: -- validate_row for:OKL_TAX_TRX_DETAILS_V --
2436: --------------------------------------------
2437: PROCEDURE validate_row(
2438: p_api_version IN NUMBER,
2439: p_init_msg_list IN VARCHAR2,
2511: '_PVT'
2512: );
2513: END validate_row;
2514: -------------------------------------------------------
2515: -- PL/SQL TBL validate_row for:OKL_TAX_TRX_DETAILS_V --
2516: -------------------------------------------------------
2517: PROCEDURE validate_row(
2518: p_api_version IN NUMBER,
2519: p_init_msg_list IN VARCHAR2,
2607: );
2608: END validate_row;
2609:
2610: -------------------------------------------------------
2611: -- PL/SQL TBL validate_row for:OKL_TAX_TRX_DETAILS_V --
2612: -------------------------------------------------------
2613: PROCEDURE validate_row(
2614: p_api_version IN NUMBER,
2615: p_init_msg_list IN VARCHAR2,
2672: ---------------------------------------------------------------------------
2673: -- PROCEDURE insert_row
2674: ---------------------------------------------------------------------------
2675: ----------------------------------------
2676: -- insert_row for:OKL_TAX_TRX_DETAILS --
2677: ----------------------------------------
2678: PROCEDURE insert_row(
2679: p_init_msg_list IN VARCHAR2,
2680: x_return_status OUT NOCOPY VARCHAR2,
2688: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2689: l_ttd_rec ttd_rec_type := p_ttd_rec;
2690: l_def_ttd_rec ttd_rec_type;
2691: --------------------------------------------
2692: -- Set_Attributes for:OKL_TAX_TRX_DETAILS --
2693: --------------------------------------------
2694: FUNCTION Set_Attributes (
2695: p_ttd_rec IN ttd_rec_type,
2696: x_ttd_rec OUT NOCOPY ttd_rec_type
2719: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2720: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2721: RAISE OKL_API.G_EXCEPTION_ERROR;
2722: END IF;
2723: INSERT INTO OKL_TAX_TRX_DETAILS(
2724: id,
2725: txs_id,
2726: tax_determine_date,
2727: tax_rate_id,
2902: '_PVT'
2903: );
2904: END insert_row;
2905: -------------------------------------------
2906: -- insert_row for :OKL_TAX_TRX_DETAILS_V --
2907: -------------------------------------------
2908: PROCEDURE insert_row(
2909: p_api_version IN NUMBER,
2910: p_init_msg_list IN VARCHAR2,
2936: l_ttdv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
2937: RETURN(l_ttdv_rec);
2938: END fill_who_columns;
2939: ----------------------------------------------
2940: -- Set_Attributes for:OKL_TAX_TRX_DETAILS_V --
2941: ----------------------------------------------
2942: FUNCTION Set_Attributes (
2943: p_ttdv_rec IN ttdv_rec_type,
2944: x_ttdv_rec OUT NOCOPY ttdv_rec_type
3049: '_PVT'
3050: );
3051: END insert_row;
3052: ---------------------------------------------------------
3053: -- PL/SQL TBL insert_row for:OKL_TAX_TRX_DETAILS_V_TBL --
3054: ---------------------------------------------------------
3055: PROCEDURE insert_row(
3056: p_api_version IN NUMBER,
3057: p_init_msg_list IN VARCHAR2,
3147: );
3148: END insert_row;
3149:
3150: ---------------------------------------------------------
3151: -- PL/SQL TBL insert_row for:OKL_TAX_TRX_DETAILS_V_TBL --
3152: ---------------------------------------------------------
3153: -- This procedure is the same as the one above except it does not have a "px_error_tbl" argument.
3154: -- This procedure was create for backward compatibility and simply is a wrapper for the one above.
3155: PROCEDURE insert_row(
3216: ---------------------------------------------------------------------------
3217: -- PROCEDURE lock_row
3218: ---------------------------------------------------------------------------
3219: --------------------------------------
3220: -- lock_row for:OKL_TAX_TRX_DETAILS --
3221: --------------------------------------
3222: PROCEDURE lock_row(
3223: p_init_msg_list IN VARCHAR2,
3224: x_return_status OUT NOCOPY VARCHAR2,
3229: E_Resource_Busy EXCEPTION;
3230: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
3231: CURSOR lock_csr (p_ttd_rec IN ttd_rec_type) IS
3232: SELECT OBJECT_VERSION_NUMBER
3233: FROM OKL_TAX_TRX_DETAILS
3234: WHERE ID = p_ttd_rec.id
3235: AND OBJECT_VERSION_NUMBER = p_ttd_rec.object_version_number
3236: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
3237:
3236: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
3237:
3238: CURSOR lchk_csr (p_ttd_rec IN ttd_rec_type) IS
3239: SELECT OBJECT_VERSION_NUMBER
3240: FROM OKL_TAX_TRX_DETAILS
3241: WHERE ID = p_ttd_rec.id;
3242: l_api_version CONSTANT NUMBER := 1;
3243: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
3244: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3241: WHERE ID = p_ttd_rec.id;
3242: l_api_version CONSTANT NUMBER := 1;
3243: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
3244: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3245: l_object_version_number OKL_TAX_TRX_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
3246: lc_object_version_number OKL_TAX_TRX_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
3247: l_row_notfound BOOLEAN := FALSE;
3248: lc_row_notfound BOOLEAN := FALSE;
3249: BEGIN
3242: l_api_version CONSTANT NUMBER := 1;
3243: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
3244: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3245: l_object_version_number OKL_TAX_TRX_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
3246: lc_object_version_number OKL_TAX_TRX_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
3247: l_row_notfound BOOLEAN := FALSE;
3248: lc_row_notfound BOOLEAN := FALSE;
3249: BEGIN
3250: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3323: '_PVT'
3324: );
3325: END lock_row;
3326: -----------------------------------------
3327: -- lock_row for: OKL_TAX_TRX_DETAILS_V --
3328: -----------------------------------------
3329: PROCEDURE lock_row(
3330: p_api_version IN NUMBER,
3331: p_init_msg_list IN VARCHAR2,
3404: '_PVT'
3405: );
3406: END lock_row;
3407: -------------------------------------------------------
3408: -- PL/SQL TBL lock_row for:OKL_TAX_TRX_DETAILS_V_TBL --
3409: -------------------------------------------------------
3410: PROCEDURE lock_row(
3411: p_api_version IN NUMBER,
3412: p_init_msg_list IN VARCHAR2,
3499: '_PVT'
3500: );
3501: END lock_row;
3502: -------------------------------------------------------
3503: -- PL/SQL TBL lock_row for:OKL_TAX_TRX_DETAILS_V_TBL --
3504: -------------------------------------------------------
3505: PROCEDURE lock_row(
3506: p_api_version IN NUMBER,
3507: p_init_msg_list IN VARCHAR2,
3563: ---------------------------------------------------------------------------
3564: -- PROCEDURE update_row
3565: ---------------------------------------------------------------------------
3566: ----------------------------------------
3567: -- update_row for:OKL_TAX_TRX_DETAILS --
3568: ----------------------------------------
3569: PROCEDURE update_row(
3570: p_init_msg_list IN VARCHAR2,
3571: x_return_status OUT NOCOPY VARCHAR2,
3884: END IF;
3885: RETURN(l_return_status);
3886: END populate_new_record;
3887: --------------------------------------------
3888: -- Set_Attributes for:OKL_TAX_TRX_DETAILS --
3889: --------------------------------------------
3890: FUNCTION Set_Attributes (
3891: p_ttd_rec IN ttd_rec_type,
3892: x_ttd_rec OUT NOCOPY ttd_rec_type
3922: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3923: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3924: RAISE OKL_API.G_EXCEPTION_ERROR;
3925: END IF;
3926: UPDATE OKL_TAX_TRX_DETAILS
3927: SET TXS_ID = l_def_ttd_rec.txs_id,
3928: TAX_DETERMINE_DATE = l_def_ttd_rec.tax_determine_date,
3929: TAX_RATE_ID = l_def_ttd_rec.tax_rate_id,
3930: TAX_RATE_CODE = l_def_ttd_rec.tax_rate_code,
4033: '_PVT'
4034: );
4035: END update_row;
4036: ------------------------------------------
4037: -- update_row for:OKL_TAX_TRX_DETAILS_V --
4038: ------------------------------------------
4039: PROCEDURE update_row(
4040: p_api_version IN NUMBER,
4041: p_init_msg_list IN VARCHAR2,
4373: END IF;
4374: RETURN(l_return_status);
4375: END populate_new_record;
4376: ----------------------------------------------
4377: -- Set_Attributes for:OKL_TAX_TRX_DETAILS_V --
4378: ----------------------------------------------
4379: FUNCTION Set_Attributes (
4380: p_ttdv_rec IN ttdv_rec_type,
4381: x_ttdv_rec OUT NOCOPY ttdv_rec_type
4502: '_PVT'
4503: );
4504: END update_row;
4505: ---------------------------------------------------------
4506: -- PL/SQL TBL update_row for:okl_tax_trx_details_v_tbl --
4507: ---------------------------------------------------------
4508: PROCEDURE update_row(
4509: p_api_version IN NUMBER,
4510: p_init_msg_list IN VARCHAR2,
4600: );
4601: END update_row;
4602:
4603: ---------------------------------------------------------
4604: -- PL/SQL TBL update_row for:OKL_TAX_TRX_DETAILS_V_TBL --
4605: ---------------------------------------------------------
4606: -- This procedure is the same as the one above except it does not have a "px_error_tbl" argument.
4607: -- This procedure was create for backward compatibility and simply is a wrapper for the one above.
4608: PROCEDURE update_row(
4669: ---------------------------------------------------------------------------
4670: -- PROCEDURE delete_row
4671: ---------------------------------------------------------------------------
4672: ----------------------------------------
4673: -- delete_row for:OKL_TAX_TRX_DETAILS --
4674: ----------------------------------------
4675: PROCEDURE delete_row(
4676: p_init_msg_list IN VARCHAR2,
4677: x_return_status OUT NOCOPY VARCHAR2,
4694: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4695: RAISE OKL_API.G_EXCEPTION_ERROR;
4696: END IF;
4697:
4698: DELETE FROM OKL_TAX_TRX_DETAILS
4699: WHERE ID = p_ttd_rec.id;
4700:
4701: x_return_status := l_return_status;
4702: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4732: '_PVT'
4733: );
4734: END delete_row;
4735: ------------------------------------------
4736: -- delete_row for:OKL_TAX_TRX_DETAILS_V --
4737: ------------------------------------------
4738: PROCEDURE delete_row(
4739: p_api_version IN NUMBER,
4740: p_init_msg_list IN VARCHAR2,
4814: '_PVT'
4815: );
4816: END delete_row;
4817: -----------------------------------------------------
4818: -- PL/SQL TBL delete_row for:OKL_TAX_TRX_DETAILS_V --
4819: -----------------------------------------------------
4820: PROCEDURE delete_row(
4821: p_api_version IN NUMBER,
4822: p_init_msg_list IN VARCHAR2,
4910: );
4911: END delete_row;
4912:
4913: -----------------------------------------------------
4914: -- PL/SQL TBL delete_row for:OKL_TAX_TRX_DETAILS_V --
4915: -----------------------------------------------------
4916: PROCEDURE delete_row(
4917: p_api_version IN NUMBER,
4918: p_init_msg_list IN VARCHAR2,