128: BEGIN
129: RETURN(get_rec(p_pdt_rec, l_row_notfound));
130: END get_rec;
131: ---------------------------------------------------------------------------
132: -- FUNCTION get_rec for: OKL_PRODUCTS_V
133: ---------------------------------------------------------------------------
134: FUNCTION get_rec (
135: p_pdtv_rec IN pdtv_rec_type,
136: x_no_data_found OUT NOCOPY BOOLEAN
169: CREATION_DATE,
170: LAST_UPDATED_BY,
171: LAST_UPDATE_DATE,
172: LAST_UPDATE_LOGIN
173: FROM Okl_Products_V
174: WHERE okl_products_v.id = p_id;
175: l_okl_pdtv_pk okl_pdtv_pk_csr%ROWTYPE;
176: l_pdtv_rec pdtv_rec_type;
177: BEGIN
170: LAST_UPDATED_BY,
171: LAST_UPDATE_DATE,
172: LAST_UPDATE_LOGIN
173: FROM Okl_Products_V
174: WHERE okl_products_v.id = p_id;
175: l_okl_pdtv_pk okl_pdtv_pk_csr%ROWTYPE;
176: l_pdtv_rec pdtv_rec_type;
177: BEGIN
178: x_no_data_found := TRUE;
225: RETURN(get_rec(p_pdtv_rec, l_row_notfound));
226: END get_rec;
227:
228: ----------------------------------------------------
229: -- FUNCTION null_out_defaults for: OKL_PRODUCTS_V --
230: ----------------------------------------------------
231: FUNCTION null_out_defaults (
232: p_pdtv_rec IN pdtv_rec_type
233: ) RETURN pdtv_rec_type IS
338: ---------------------------------------------------------------------------
339: -- PROCEDURE Validate_Attributes
340: ---------------------------------------------------------------------------
341: --------------------------------------------
342: -- Validate_Attributes for:OKL_PRODUCTS_V --
343: --------------------------------------------
344: FUNCTION Validate_Attributes (
345: p_pdtv_rec IN pdtv_rec_type
346: ) RETURN VARCHAR2 IS
388: ---------------------------------------------------------------------------
389: -- PROCEDURE Validate_Record
390: ---------------------------------------------------------------------------
391: ----------------------------------------
392: -- Validate_Record for:OKL_PRODUCTS_V --
393: ----------------------------------------
394: FUNCTION Validate_Record (
395: p_pdtv_rec IN pdtv_rec_type
396: ) RETURN VARCHAR2 IS
689: l_ptl_status VARCHAR2(1);
690: l_row_notfound BOOLEAN := TRUE;
691: CURSOR okl_pdtv_pk_csr1 (p_rep_pdt_id IN NUMBER) IS
692: SELECT '1'
693: FROM okl_products_v pdt
694: WHERE pdt.id = p_rep_pdt_id;
695:
696: BEGIN
697: -- initialize return status
1249: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1250: l_unq_tbl OKC_UTIL.unq_tbl_type;
1251: l_pdt_status VARCHAR2(1);
1252: l_row_found BOOLEAN := FALSE;
1253: CURSOR c1(p_name okl_products_v.name%TYPE,
1254: p_version okl_products_v.version%TYPE) IS
1255: SELECT '1'
1256: FROM okl_products_v
1257: WHERE name = p_name
1250: l_unq_tbl OKC_UTIL.unq_tbl_type;
1251: l_pdt_status VARCHAR2(1);
1252: l_row_found BOOLEAN := FALSE;
1253: CURSOR c1(p_name okl_products_v.name%TYPE,
1254: p_version okl_products_v.version%TYPE) IS
1255: SELECT '1'
1256: FROM okl_products_v
1257: WHERE name = p_name
1258: AND version = p_version
1252: l_row_found BOOLEAN := FALSE;
1253: CURSOR c1(p_name okl_products_v.name%TYPE,
1254: p_version okl_products_v.version%TYPE) IS
1255: SELECT '1'
1256: FROM okl_products_v
1257: WHERE name = p_name
1258: AND version = p_version
1259: AND id <> NVL(p_pdtv_rec.id,-9999);
1260: BEGIN
1266: FETCH c1 INTO l_pdt_status;
1267: l_row_found := c1%FOUND;
1268: CLOSE c1;
1269: IF l_row_found THEN
1270: OKC_API.set_message('OKL',G_UNQS, G_TABLE_TOKEN, 'Okl_Products_V');
1271: x_return_status := OKC_API.G_RET_STS_ERROR;
1272: END IF;
1273: EXCEPTION
1274: WHEN G_EXCEPTION_HALT_VALIDATION THEN
1443: ---------------------------------------------------------------------------
1444: -- PROCEDURE validate_row
1445: ---------------------------------------------------------------------------
1446: -------------------------------------
1447: -- validate_row for:OKL_PRODUCTS_V --
1448: -------------------------------------
1449: PROCEDURE validate_row(
1450: p_api_version IN NUMBER,
1451: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1751: '_PVT'
1752: );
1753: END insert_row;
1754: -----------------------------------
1755: -- insert_row for:OKL_PRODUCTS_V --
1756: -----------------------------------
1757: PROCEDURE insert_row(
1758: p_api_version IN NUMBER,
1759: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1786: l_pdtv_rec.LAST_UPDATE_LOGIN := FND_GLOBAL.LOGIN_ID;
1787: RETURN(l_pdtv_rec);
1788: END fill_who_columns;
1789: ---------------------------------------
1790: -- Set_Attributes for:OKL_PRODUCTS_V --
1791: ---------------------------------------
1792: FUNCTION Set_Attributes (
1793: p_pdtv_rec IN pdtv_rec_type,
1794: x_pdtv_rec OUT NOCOPY pdtv_rec_type
2085:
2086: );
2087: END lock_row;
2088: ---------------------------------
2089: -- lock_row for:OKL_PRODUCTS_V --
2090: ---------------------------------
2091: PROCEDURE lock_row(
2092: p_api_version IN NUMBER,
2093: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2525: '_PVT'
2526: );
2527: END update_row;
2528: -----------------------------------
2529: -- update_row for:OKL_PRODUCTS_V --
2530: -----------------------------------
2531: PROCEDURE update_row(
2532: p_api_version IN NUMBER,
2533: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2713: END IF;
2714: RETURN(l_return_status);
2715: END populate_new_record;
2716: ---------------------------------------
2717: -- Set_Attributes for:OKL_PRODUCTS_V --
2718: ---------------------------------------
2719: FUNCTION Set_Attributes (
2720: p_pdtv_rec IN pdtv_rec_type,
2721: x_pdtv_rec OUT NOCOPY pdtv_rec_type
2969: '_PVT'
2970: );
2971: END delete_row;
2972: -----------------------------------
2973: -- delete_row for:OKL_PRODUCTS_V --
2974: -----------------------------------
2975: PROCEDURE delete_row(
2976: p_api_version IN NUMBER,
2977: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,