DBA Data[Home] [Help]

APPS.OKL_VIP_PVT dependencies on OKL_VAR_INT_PROCESS_B

Line 151: -- FUNCTION get_rec for: OKL_VAR_INT_PROCESS_B

147: BEGIN
148: RETURN(get_rec(p_vipv_rec, l_row_not_found));
149: END get_rec;
150: ---------------------------------------------------------------------------
151: -- FUNCTION get_rec for: OKL_VAR_INT_PROCESS_B
152: ---------------------------------------------------------------------------
153: FUNCTION get_rec (
154: p_vip_rec IN vip_rec_type,
155: x_no_data_found OUT NOCOPY BOOLEAN

Line 157: CURSOR okl_var_int_process_b_pk_csr (p_id IN NUMBER) IS

153: FUNCTION get_rec (
154: p_vip_rec IN vip_rec_type,
155: x_no_data_found OUT NOCOPY BOOLEAN
156: ) RETURN vip_rec_type IS
157: CURSOR okl_var_int_process_b_pk_csr (p_id IN NUMBER) IS
158: SELECT
159: ID,
160: PARENT_TRX_ID,
161: CHILD_TRX_ID,

Line 191: FROM Okl_Var_Int_Process_B

187: LAST_UPDATED_BY,
188: LAST_UPDATE_DATE,
189: LAST_UPDATE_LOGIN,
190: OBJECT_VERSION_NUMBER
191: FROM Okl_Var_Int_Process_B
192: WHERE okl_var_int_process_b.id = p_id;
193: l_okl_var_int_process_b_pk okl_var_int_process_b_pk_csr%ROWTYPE;
194: l_vip_rec vip_rec_type;
195: BEGIN

Line 192: WHERE okl_var_int_process_b.id = p_id;

188: LAST_UPDATE_DATE,
189: LAST_UPDATE_LOGIN,
190: OBJECT_VERSION_NUMBER
191: FROM Okl_Var_Int_Process_B
192: WHERE okl_var_int_process_b.id = p_id;
193: l_okl_var_int_process_b_pk okl_var_int_process_b_pk_csr%ROWTYPE;
194: l_vip_rec vip_rec_type;
195: BEGIN
196: x_no_data_found := TRUE;

Line 193: l_okl_var_int_process_b_pk okl_var_int_process_b_pk_csr%ROWTYPE;

189: LAST_UPDATE_LOGIN,
190: OBJECT_VERSION_NUMBER
191: FROM Okl_Var_Int_Process_B
192: WHERE okl_var_int_process_b.id = p_id;
193: l_okl_var_int_process_b_pk okl_var_int_process_b_pk_csr%ROWTYPE;
194: l_vip_rec vip_rec_type;
195: BEGIN
196: x_no_data_found := TRUE;
197: -- Get current database values

Line 198: OPEN okl_var_int_process_b_pk_csr (p_vip_rec.id);

194: l_vip_rec vip_rec_type;
195: BEGIN
196: x_no_data_found := TRUE;
197: -- Get current database values
198: OPEN okl_var_int_process_b_pk_csr (p_vip_rec.id);
199: FETCH okl_var_int_process_b_pk_csr INTO
200: l_vip_rec.id,
201: l_vip_rec.parent_trx_id,
202: l_vip_rec.child_trx_id,

Line 199: FETCH okl_var_int_process_b_pk_csr INTO

195: BEGIN
196: x_no_data_found := TRUE;
197: -- Get current database values
198: OPEN okl_var_int_process_b_pk_csr (p_vip_rec.id);
199: FETCH okl_var_int_process_b_pk_csr INTO
200: l_vip_rec.id,
201: l_vip_rec.parent_trx_id,
202: l_vip_rec.child_trx_id,
203: l_vip_rec.contract_number,

Line 232: x_no_data_found := okl_var_int_process_b_pk_csr%NOTFOUND;

228: l_vip_rec.last_updated_by,
229: l_vip_rec.last_update_date,
230: l_vip_rec.last_update_login,
231: l_vip_rec.object_version_number;
232: x_no_data_found := okl_var_int_process_b_pk_csr%NOTFOUND;
233: CLOSE okl_var_int_process_b_pk_csr;
234: RETURN(l_vip_rec);
235: END get_rec;
236:

Line 233: CLOSE okl_var_int_process_b_pk_csr;

229: l_vip_rec.last_update_date,
230: l_vip_rec.last_update_login,
231: l_vip_rec.object_version_number;
232: x_no_data_found := okl_var_int_process_b_pk_csr%NOTFOUND;
233: CLOSE okl_var_int_process_b_pk_csr;
234: RETURN(l_vip_rec);
235: END get_rec;
236:
237: ------------------------------------------------------------------

Line 810: -- insert_row for:OKL_VAR_INT_PROCESS_B --

806: ---------------------------------------------------------------------------
807: -- PROCEDURE insert_row
808: ---------------------------------------------------------------------------
809: ------------------------------------------
810: -- insert_row for:OKL_VAR_INT_PROCESS_B --
811: ------------------------------------------
812: PROCEDURE insert_row(
813: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
814: x_return_status OUT NOCOPY VARCHAR2,

Line 826: -- Set_Attributes for:OKL_VAR_INT_PROCESS_B --

822: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
823: l_vip_rec vip_rec_type := p_vip_rec;
824: l_def_vip_rec vip_rec_type;
825: ----------------------------------------------
826: -- Set_Attributes for:OKL_VAR_INT_PROCESS_B --
827: ----------------------------------------------
828: FUNCTION Set_Attributes (
829: p_vip_rec IN vip_rec_type,
830: x_vip_rec OUT NOCOPY vip_rec_type

Line 872: INSERT INTO OKL_VAR_INT_PROCESS_B(

868: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
869: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
870: RAISE OKC_API.G_EXCEPTION_ERROR;
871: END IF;
872: INSERT INTO OKL_VAR_INT_PROCESS_B(
873: id,
874: parent_trx_id,
875: child_trx_id,
876: contract_number,

Line 1200: -- lock_row for:OKL_VAR_INT_PROCESS_B --

1196: ---------------------------------------------------------------------------
1197: -- PROCEDURE lock_row
1198: ---------------------------------------------------------------------------
1199: ----------------------------------------
1200: -- lock_row for:OKL_VAR_INT_PROCESS_B --
1201: ----------------------------------------
1202: PROCEDURE lock_row(
1203: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1204: x_return_status OUT NOCOPY VARCHAR2,

Line 1213: FROM OKL_VAR_INT_PROCESS_B

1209: E_Resource_Busy EXCEPTION;
1210: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1211: CURSOR lock_csr (p_vip_rec IN vip_rec_type) IS
1212: SELECT OBJECT_VERSION_NUMBER
1213: FROM OKL_VAR_INT_PROCESS_B
1214: WHERE ID = p_vip_rec.id
1215: AND OBJECT_VERSION_NUMBER = p_vip_rec.object_version_number
1216: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1217:

Line 1220: FROM OKL_VAR_INT_PROCESS_B

1216: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1217:
1218: CURSOR lchk_csr (p_vip_rec IN vip_rec_type) IS
1219: SELECT OBJECT_VERSION_NUMBER
1220: FROM OKL_VAR_INT_PROCESS_B
1221: WHERE ID = p_vip_rec.id;
1222: l_api_version CONSTANT NUMBER := 1;
1223: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1224: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

Line 1225: l_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;

1221: WHERE ID = p_vip_rec.id;
1222: l_api_version CONSTANT NUMBER := 1;
1223: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1224: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1225: l_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;
1226: lc_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;
1227: l_row_notfound BOOLEAN := FALSE;
1228: lc_row_notfound BOOLEAN := FALSE;
1229: BEGIN

Line 1226: lc_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;

1222: l_api_version CONSTANT NUMBER := 1;
1223: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1224: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1225: l_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;
1226: lc_object_version_number OKL_VAR_INT_PROCESS_B.OBJECT_VERSION_NUMBER%TYPE;
1227: l_row_notfound BOOLEAN := FALSE;
1228: lc_row_notfound BOOLEAN := FALSE;
1229: BEGIN
1230: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 1465: -- update_row for:OKL_VAR_INT_PROCESS_B --

1461: ---------------------------------------------------------------------------
1462: -- PROCEDURE update_row
1463: ---------------------------------------------------------------------------
1464: ------------------------------------------
1465: -- update_row for:OKL_VAR_INT_PROCESS_B --
1466: ------------------------------------------
1467: PROCEDURE update_row(
1468: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1469: x_return_status OUT NOCOPY VARCHAR2,

Line 1628: -- Set_Attributes for:OKL_VAR_INT_PROCESS_B --

1624: END IF;
1625: RETURN(l_return_status);
1626: END populate_new_record;
1627: ----------------------------------------------
1628: -- Set_Attributes for:OKL_VAR_INT_PROCESS_B --
1629: ----------------------------------------------
1630: FUNCTION Set_Attributes (
1631: p_vip_rec IN vip_rec_type,
1632: x_vip_rec OUT NOCOPY vip_rec_type

Line 1666: UPDATE OKL_VAR_INT_PROCESS_B

1662: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1663: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1664: RAISE OKC_API.G_EXCEPTION_ERROR;
1665: END IF;
1666: UPDATE OKL_VAR_INT_PROCESS_B
1667: SET PARENT_TRX_ID = l_def_vip_rec.parent_trx_id,
1668: CHILD_TRX_ID = l_def_vip_rec.child_trx_id,
1669: CONTRACT_NUMBER = l_def_vip_rec.contract_number,
1670: REBOOK_STATUS = l_def_vip_rec.rebook_status,

Line 2126: -- delete_row for:OKL_VAR_INT_PROCESS_B --

2122: ---------------------------------------------------------------------------
2123: -- PROCEDURE delete_row
2124: ---------------------------------------------------------------------------
2125: ------------------------------------------
2126: -- delete_row for:OKL_VAR_INT_PROCESS_B --
2127: ------------------------------------------
2128: PROCEDURE delete_row(
2129: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2130: x_return_status OUT NOCOPY VARCHAR2,

Line 2151: DELETE FROM OKL_VAR_INT_PROCESS_B

2147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2148: RAISE OKC_API.G_EXCEPTION_ERROR;
2149: END IF;
2150:
2151: DELETE FROM OKL_VAR_INT_PROCESS_B
2152: WHERE ID = p_vip_rec.id;
2153:
2154: x_return_status := l_return_status;
2155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);