eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.OKL_VIP_PVT dependencies on OKC_API

Line 132: x_return_status := OKC_API.G_RET_STS_SUCCESS;

128: ) RETURN vipv_rec_type IS
129: l_vipv_rec vipv_rec_type;
130: l_row_notfound BOOLEAN := TRUE;
131: BEGIN
132: x_return_status := OKC_API.G_RET_STS_SUCCESS;
133: l_vipv_rec := get_rec(p_vipv_rec, l_row_notfound);
134: IF (l_row_notfound) THEN
135: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
136: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 135: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

131: BEGIN
132: x_return_status := OKC_API.G_RET_STS_SUCCESS;
133: l_vipv_rec := get_rec(p_vipv_rec, l_row_notfound);
134: IF (l_row_notfound) THEN
135: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
136: x_return_status := OKC_API.G_RET_STS_ERROR;
137: END IF;
138: RETURN(l_vipv_rec);
139: END get_rec;

Line 136: x_return_status := OKC_API.G_RET_STS_ERROR;

132: x_return_status := OKC_API.G_RET_STS_SUCCESS;
133: l_vipv_rec := get_rec(p_vipv_rec, l_row_notfound);
134: IF (l_row_notfound) THEN
135: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
136: x_return_status := OKC_API.G_RET_STS_ERROR;
137: END IF;
138: RETURN(l_vipv_rec);
139: END get_rec;
140: -----------------------------------------------------------

Line 247: x_return_status := OKC_API.G_RET_STS_SUCCESS;

243: ) RETURN vip_rec_type IS
244: l_vip_rec vip_rec_type;
245: l_row_notfound BOOLEAN := TRUE;
246: BEGIN
247: x_return_status := OKC_API.G_RET_STS_SUCCESS;
248: l_vip_rec := get_rec(p_vip_rec, l_row_notfound);
249: IF (l_row_notfound) THEN
250: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
251: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 250: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

246: BEGIN
247: x_return_status := OKC_API.G_RET_STS_SUCCESS;
248: l_vip_rec := get_rec(p_vip_rec, l_row_notfound);
249: IF (l_row_notfound) THEN
250: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
251: x_return_status := OKC_API.G_RET_STS_ERROR;
252: END IF;
253: RETURN(l_vip_rec);
254: END get_rec;

Line 251: x_return_status := OKC_API.G_RET_STS_ERROR;

247: x_return_status := OKC_API.G_RET_STS_SUCCESS;
248: l_vip_rec := get_rec(p_vip_rec, l_row_notfound);
249: IF (l_row_notfound) THEN
250: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
251: x_return_status := OKC_API.G_RET_STS_ERROR;
252: END IF;
253: RETURN(l_vip_rec);
254: END get_rec;
255: -----------------------------------------------------------

Line 273: IF (l_vipv_rec.id = OKC_API.G_MISS_NUM ) THEN

269: p_vipv_rec IN vipv_rec_type
270: ) RETURN vipv_rec_type IS
271: l_vipv_rec vipv_rec_type := p_vipv_rec;
272: BEGIN
273: IF (l_vipv_rec.id = OKC_API.G_MISS_NUM ) THEN
274: l_vipv_rec.id := NULL;
275: END IF;
276: IF (l_vipv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
277: l_vipv_rec.object_version_number := NULL;

Line 276: IF (l_vipv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN

272: BEGIN
273: IF (l_vipv_rec.id = OKC_API.G_MISS_NUM ) THEN
274: l_vipv_rec.id := NULL;
275: END IF;
276: IF (l_vipv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
277: l_vipv_rec.object_version_number := NULL;
278: END IF;
279: IF (l_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM ) THEN
280: l_vipv_rec.parent_trx_id := NULL;

Line 279: IF (l_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM ) THEN

275: END IF;
276: IF (l_vipv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
277: l_vipv_rec.object_version_number := NULL;
278: END IF;
279: IF (l_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM ) THEN
280: l_vipv_rec.parent_trx_id := NULL;
281: END IF;
282: IF (l_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM ) THEN
283: l_vipv_rec.child_trx_id := NULL;

Line 282: IF (l_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM ) THEN

278: END IF;
279: IF (l_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM ) THEN
280: l_vipv_rec.parent_trx_id := NULL;
281: END IF;
282: IF (l_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM ) THEN
283: l_vipv_rec.child_trx_id := NULL;
284: END IF;
285: IF (l_vipv_rec.contract_number = OKC_API.G_MISS_CHAR ) THEN
286: l_vipv_rec.contract_number := NULL;

Line 285: IF (l_vipv_rec.contract_number = OKC_API.G_MISS_CHAR ) THEN

281: END IF;
282: IF (l_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM ) THEN
283: l_vipv_rec.child_trx_id := NULL;
284: END IF;
285: IF (l_vipv_rec.contract_number = OKC_API.G_MISS_CHAR ) THEN
286: l_vipv_rec.contract_number := NULL;
287: END IF;
288: IF (l_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR ) THEN
289: l_vipv_rec.rebook_status := NULL;

Line 288: IF (l_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR ) THEN

284: END IF;
285: IF (l_vipv_rec.contract_number = OKC_API.G_MISS_CHAR ) THEN
286: l_vipv_rec.contract_number := NULL;
287: END IF;
288: IF (l_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR ) THEN
289: l_vipv_rec.rebook_status := NULL;
290: END IF;
291: IF (l_vipv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
292: l_vipv_rec.request_id := NULL;

Line 306: IF (l_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN

302: END IF;
303: IF (l_vipv_rec.org_id = Okl_Api.G_MISS_NUM) THEN
304: l_vipv_rec.org_id := NULL;
305: END IF;
306: IF (l_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN
307: l_vipv_rec.attribute_category := NULL;
308: END IF;
309: IF (l_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
310: l_vipv_rec.attribute1 := NULL;

Line 309: IF (l_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN

305: END IF;
306: IF (l_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR ) THEN
307: l_vipv_rec.attribute_category := NULL;
308: END IF;
309: IF (l_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
310: l_vipv_rec.attribute1 := NULL;
311: END IF;
312: IF (l_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
313: l_vipv_rec.attribute2 := NULL;

Line 312: IF (l_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN

308: END IF;
309: IF (l_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR ) THEN
310: l_vipv_rec.attribute1 := NULL;
311: END IF;
312: IF (l_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
313: l_vipv_rec.attribute2 := NULL;
314: END IF;
315: IF (l_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
316: l_vipv_rec.attribute3 := NULL;

Line 315: IF (l_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN

311: END IF;
312: IF (l_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR ) THEN
313: l_vipv_rec.attribute2 := NULL;
314: END IF;
315: IF (l_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
316: l_vipv_rec.attribute3 := NULL;
317: END IF;
318: IF (l_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
319: l_vipv_rec.attribute4 := NULL;

Line 318: IF (l_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN

314: END IF;
315: IF (l_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR ) THEN
316: l_vipv_rec.attribute3 := NULL;
317: END IF;
318: IF (l_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
319: l_vipv_rec.attribute4 := NULL;
320: END IF;
321: IF (l_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
322: l_vipv_rec.attribute5 := NULL;

Line 321: IF (l_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN

317: END IF;
318: IF (l_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR ) THEN
319: l_vipv_rec.attribute4 := NULL;
320: END IF;
321: IF (l_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
322: l_vipv_rec.attribute5 := NULL;
323: END IF;
324: IF (l_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
325: l_vipv_rec.attribute6 := NULL;

Line 324: IF (l_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN

320: END IF;
321: IF (l_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR ) THEN
322: l_vipv_rec.attribute5 := NULL;
323: END IF;
324: IF (l_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
325: l_vipv_rec.attribute6 := NULL;
326: END IF;
327: IF (l_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
328: l_vipv_rec.attribute7 := NULL;

Line 327: IF (l_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN

323: END IF;
324: IF (l_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR ) THEN
325: l_vipv_rec.attribute6 := NULL;
326: END IF;
327: IF (l_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
328: l_vipv_rec.attribute7 := NULL;
329: END IF;
330: IF (l_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
331: l_vipv_rec.attribute8 := NULL;

Line 330: IF (l_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN

326: END IF;
327: IF (l_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR ) THEN
328: l_vipv_rec.attribute7 := NULL;
329: END IF;
330: IF (l_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
331: l_vipv_rec.attribute8 := NULL;
332: END IF;
333: IF (l_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
334: l_vipv_rec.attribute9 := NULL;

Line 333: IF (l_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN

329: END IF;
330: IF (l_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR ) THEN
331: l_vipv_rec.attribute8 := NULL;
332: END IF;
333: IF (l_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
334: l_vipv_rec.attribute9 := NULL;
335: END IF;
336: IF (l_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
337: l_vipv_rec.attribute10 := NULL;

Line 336: IF (l_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN

332: END IF;
333: IF (l_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR ) THEN
334: l_vipv_rec.attribute9 := NULL;
335: END IF;
336: IF (l_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
337: l_vipv_rec.attribute10 := NULL;
338: END IF;
339: IF (l_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
340: l_vipv_rec.attribute11 := NULL;

Line 339: IF (l_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN

335: END IF;
336: IF (l_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR ) THEN
337: l_vipv_rec.attribute10 := NULL;
338: END IF;
339: IF (l_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
340: l_vipv_rec.attribute11 := NULL;
341: END IF;
342: IF (l_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
343: l_vipv_rec.attribute12 := NULL;

Line 342: IF (l_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN

338: END IF;
339: IF (l_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR ) THEN
340: l_vipv_rec.attribute11 := NULL;
341: END IF;
342: IF (l_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
343: l_vipv_rec.attribute12 := NULL;
344: END IF;
345: IF (l_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
346: l_vipv_rec.attribute13 := NULL;

Line 345: IF (l_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN

341: END IF;
342: IF (l_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR ) THEN
343: l_vipv_rec.attribute12 := NULL;
344: END IF;
345: IF (l_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
346: l_vipv_rec.attribute13 := NULL;
347: END IF;
348: IF (l_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
349: l_vipv_rec.attribute14 := NULL;

Line 348: IF (l_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN

344: END IF;
345: IF (l_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR ) THEN
346: l_vipv_rec.attribute13 := NULL;
347: END IF;
348: IF (l_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
349: l_vipv_rec.attribute14 := NULL;
350: END IF;
351: IF (l_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
352: l_vipv_rec.attribute15 := NULL;

Line 351: IF (l_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN

347: END IF;
348: IF (l_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR ) THEN
349: l_vipv_rec.attribute14 := NULL;
350: END IF;
351: IF (l_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
352: l_vipv_rec.attribute15 := NULL;
353: END IF;
354: IF (l_vipv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
355: l_vipv_rec.created_by := NULL;

Line 354: IF (l_vipv_rec.created_by = OKC_API.G_MISS_NUM ) THEN

350: END IF;
351: IF (l_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR ) THEN
352: l_vipv_rec.attribute15 := NULL;
353: END IF;
354: IF (l_vipv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
355: l_vipv_rec.created_by := NULL;
356: END IF;
357: IF (l_vipv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
358: l_vipv_rec.creation_date := NULL;

Line 357: IF (l_vipv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN

353: END IF;
354: IF (l_vipv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
355: l_vipv_rec.created_by := NULL;
356: END IF;
357: IF (l_vipv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
358: l_vipv_rec.creation_date := NULL;
359: END IF;
360: IF (l_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
361: l_vipv_rec.last_updated_by := NULL;

Line 360: IF (l_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN

356: END IF;
357: IF (l_vipv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
358: l_vipv_rec.creation_date := NULL;
359: END IF;
360: IF (l_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
361: l_vipv_rec.last_updated_by := NULL;
362: END IF;
363: IF (l_vipv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
364: l_vipv_rec.last_update_date := NULL;

Line 363: IF (l_vipv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN

359: END IF;
360: IF (l_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
361: l_vipv_rec.last_updated_by := NULL;
362: END IF;
363: IF (l_vipv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
364: l_vipv_rec.last_update_date := NULL;
365: END IF;
366: IF (l_vipv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
367: l_vipv_rec.last_update_login := NULL;

Line 366: IF (l_vipv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN

362: END IF;
363: IF (l_vipv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
364: l_vipv_rec.last_update_date := NULL;
365: END IF;
366: IF (l_vipv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
367: l_vipv_rec.last_update_login := NULL;
368: END IF;
369: RETURN(l_vipv_rec);
370: END null_out_defaults;

Line 378: x_return_status := OKC_API.G_RET_STS_SUCCESS;

374: PROCEDURE validate_id(
375: x_return_status OUT NOCOPY VARCHAR2,
376: p_id IN NUMBER) IS
377: BEGIN
378: x_return_status := OKC_API.G_RET_STS_SUCCESS;
379: IF (p_id = OKC_API.G_MISS_NUM OR
380: p_id IS NULL)
381: THEN
382: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

Line 379: IF (p_id = OKC_API.G_MISS_NUM OR

375: x_return_status OUT NOCOPY VARCHAR2,
376: p_id IN NUMBER) IS
377: BEGIN
378: x_return_status := OKC_API.G_RET_STS_SUCCESS;
379: IF (p_id = OKC_API.G_MISS_NUM OR
380: p_id IS NULL)
381: THEN
382: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
383: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 382: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

378: x_return_status := OKC_API.G_RET_STS_SUCCESS;
379: IF (p_id = OKC_API.G_MISS_NUM OR
380: p_id IS NULL)
381: THEN
382: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
383: x_return_status := OKC_API.G_RET_STS_ERROR;
384: RAISE G_EXCEPTION_HALT_VALIDATION;
385: END IF;
386: EXCEPTION

Line 383: x_return_status := OKC_API.G_RET_STS_ERROR;

379: IF (p_id = OKC_API.G_MISS_NUM OR
380: p_id IS NULL)
381: THEN
382: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
383: x_return_status := OKC_API.G_RET_STS_ERROR;
384: RAISE G_EXCEPTION_HALT_VALIDATION;
385: END IF;
386: EXCEPTION
387: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 390: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

386: EXCEPTION
387: WHEN G_EXCEPTION_HALT_VALIDATION THEN
388: null;
389: WHEN OTHERS THEN
390: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
391: ,p_msg_name => G_UNEXPECTED_ERROR
392: ,p_token1 => G_SQLCODE_TOKEN
393: ,p_token1_value => SQLCODE
394: ,p_token2 => G_SQLERRM_TOKEN

Line 396: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

392: ,p_token1 => G_SQLCODE_TOKEN
393: ,p_token1_value => SQLCODE
394: ,p_token2 => G_SQLERRM_TOKEN
395: ,p_token2_value => SQLERRM);
396: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
397: END validate_id;
398: ----------------------------------------------------
399: -- Validate_Attributes for: OBJECT_VERSION_NUMBER --
400: ----------------------------------------------------

Line 405: x_return_status := OKC_API.G_RET_STS_SUCCESS;

401: PROCEDURE validate_object_version_number(
402: x_return_status OUT NOCOPY VARCHAR2,
403: p_object_version_number IN NUMBER) IS
404: BEGIN
405: x_return_status := OKC_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

Line 406: IF (p_object_version_number = OKC_API.G_MISS_NUM OR

402: x_return_status OUT NOCOPY VARCHAR2,
403: p_object_version_number IN NUMBER) IS
404: BEGIN
405: x_return_status := OKC_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 409: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

405: x_return_status := OKC_API.G_RET_STS_SUCCESS;
406: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKC_API.G_RET_STS_ERROR;
411: RAISE G_EXCEPTION_HALT_VALIDATION;
412: END IF;
413: EXCEPTION

Line 410: x_return_status := OKC_API.G_RET_STS_ERROR;

406: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
407: p_object_version_number IS NULL)
408: THEN
409: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
410: x_return_status := OKC_API.G_RET_STS_ERROR;
411: RAISE G_EXCEPTION_HALT_VALIDATION;
412: END IF;
413: EXCEPTION
414: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 417: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

413: EXCEPTION
414: WHEN G_EXCEPTION_HALT_VALIDATION THEN
415: null;
416: WHEN OTHERS THEN
417: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
418: ,p_msg_name => G_UNEXPECTED_ERROR
419: ,p_token1 => G_SQLCODE_TOKEN
420: ,p_token1_value => SQLCODE
421: ,p_token2 => G_SQLERRM_TOKEN

Line 423: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

419: ,p_token1 => G_SQLCODE_TOKEN
420: ,p_token1_value => SQLCODE
421: ,p_token2 => G_SQLERRM_TOKEN
422: ,p_token2_value => SQLERRM);
423: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
424: END validate_object_version_number;
425: --------------------------------------------
426: -- Validate_Attributes for: PARENT_TRX_ID --
427: --------------------------------------------

Line 432: x_return_status := OKC_API.G_RET_STS_SUCCESS;

428: PROCEDURE validate_parent_trx_id(
429: x_return_status OUT NOCOPY VARCHAR2,
430: p_parent_trx_id IN NUMBER) IS
431: BEGIN
432: x_return_status := OKC_API.G_RET_STS_SUCCESS;
433: IF (p_parent_trx_id = OKC_API.G_MISS_NUM OR
434: p_parent_trx_id IS NULL)
435: THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'parent_trx_id');

Line 433: IF (p_parent_trx_id = OKC_API.G_MISS_NUM OR

429: x_return_status OUT NOCOPY VARCHAR2,
430: p_parent_trx_id IN NUMBER) IS
431: BEGIN
432: x_return_status := OKC_API.G_RET_STS_SUCCESS;
433: IF (p_parent_trx_id = OKC_API.G_MISS_NUM OR
434: p_parent_trx_id IS NULL)
435: THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'parent_trx_id');
437: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'parent_trx_id');

432: x_return_status := OKC_API.G_RET_STS_SUCCESS;
433: IF (p_parent_trx_id = OKC_API.G_MISS_NUM OR
434: p_parent_trx_id IS NULL)
435: THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'parent_trx_id');
437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: RAISE G_EXCEPTION_HALT_VALIDATION;
439: END IF;
440: EXCEPTION

Line 437: x_return_status := OKC_API.G_RET_STS_ERROR;

433: IF (p_parent_trx_id = OKC_API.G_MISS_NUM OR
434: p_parent_trx_id IS NULL)
435: THEN
436: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'parent_trx_id');
437: x_return_status := OKC_API.G_RET_STS_ERROR;
438: RAISE G_EXCEPTION_HALT_VALIDATION;
439: END IF;
440: EXCEPTION
441: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 444: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

440: EXCEPTION
441: WHEN G_EXCEPTION_HALT_VALIDATION THEN
442: null;
443: WHEN OTHERS THEN
444: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
445: ,p_msg_name => G_UNEXPECTED_ERROR
446: ,p_token1 => G_SQLCODE_TOKEN
447: ,p_token1_value => SQLCODE
448: ,p_token2 => G_SQLERRM_TOKEN

Line 450: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

446: ,p_token1 => G_SQLCODE_TOKEN
447: ,p_token1_value => SQLCODE
448: ,p_token2 => G_SQLERRM_TOKEN
449: ,p_token2_value => SQLERRM);
450: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
451: END validate_parent_trx_id;
452: ----------------------------------------------
453: -- Validate_Attributes for: CONTRACT_NUMBER --
454: ----------------------------------------------

Line 459: x_return_status := OKC_API.G_RET_STS_SUCCESS;

455: PROCEDURE validate_contract_number(
456: x_return_status OUT NOCOPY VARCHAR2,
457: p_contract_number IN VARCHAR2) IS
458: BEGIN
459: x_return_status := OKC_API.G_RET_STS_SUCCESS;
460: IF (p_contract_number = OKC_API.G_MISS_CHAR OR
461: p_contract_number IS NULL)
462: THEN
463: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'contract_number');

Line 460: IF (p_contract_number = OKC_API.G_MISS_CHAR OR

456: x_return_status OUT NOCOPY VARCHAR2,
457: p_contract_number IN VARCHAR2) IS
458: BEGIN
459: x_return_status := OKC_API.G_RET_STS_SUCCESS;
460: IF (p_contract_number = OKC_API.G_MISS_CHAR OR
461: p_contract_number IS NULL)
462: THEN
463: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'contract_number');
464: x_return_status := OKC_API.G_RET_STS_ERROR;

Line 463: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'contract_number');

459: x_return_status := OKC_API.G_RET_STS_SUCCESS;
460: IF (p_contract_number = OKC_API.G_MISS_CHAR OR
461: p_contract_number IS NULL)
462: THEN
463: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'contract_number');
464: x_return_status := OKC_API.G_RET_STS_ERROR;
465: RAISE G_EXCEPTION_HALT_VALIDATION;
466: END IF;
467: EXCEPTION

Line 464: x_return_status := OKC_API.G_RET_STS_ERROR;

460: IF (p_contract_number = OKC_API.G_MISS_CHAR OR
461: p_contract_number IS NULL)
462: THEN
463: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'contract_number');
464: x_return_status := OKC_API.G_RET_STS_ERROR;
465: RAISE G_EXCEPTION_HALT_VALIDATION;
466: END IF;
467: EXCEPTION
468: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 471: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

467: EXCEPTION
468: WHEN G_EXCEPTION_HALT_VALIDATION THEN
469: null;
470: WHEN OTHERS THEN
471: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
472: ,p_msg_name => G_UNEXPECTED_ERROR
473: ,p_token1 => G_SQLCODE_TOKEN
474: ,p_token1_value => SQLCODE
475: ,p_token2 => G_SQLERRM_TOKEN

Line 477: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

473: ,p_token1 => G_SQLCODE_TOKEN
474: ,p_token1_value => SQLCODE
475: ,p_token2 => G_SQLERRM_TOKEN
476: ,p_token2_value => SQLERRM);
477: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
478: END validate_contract_number;
479: ---------------------------------------------------------------------------
480: -- FUNCTION Validate_Attributes
481: ---------------------------------------------------------------------------

Line 488: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

484: ---------------------------------------------------
485: FUNCTION Validate_Attributes (
486: p_vipv_rec IN vipv_rec_type
487: ) RETURN VARCHAR2 IS
488: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
489: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
490: BEGIN
491: -----------------------------
492: -- Column Level Validation --

Line 489: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

485: FUNCTION Validate_Attributes (
486: p_vipv_rec IN vipv_rec_type
487: ) RETURN VARCHAR2 IS
488: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
489: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
490: BEGIN
491: -----------------------------
492: -- Column Level Validation --
493: -----------------------------

Line 498: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

494: -- ***
495: -- id
496: -- ***
497: validate_id(x_return_status, p_vipv_rec.id);
498: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
499: l_return_status := x_return_status;
500: END IF;
501:
502: -- ***

Line 506: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

502: -- ***
503: -- object_version_number
504: -- ***
505: validate_object_version_number(x_return_status, p_vipv_rec.object_version_number);
506: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
507: l_return_status := x_return_status;
508: END IF;
509:
510: -- ***

Line 514: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

510: -- ***
511: -- parent_trx_id
512: -- ***
513: validate_parent_trx_id(x_return_status, p_vipv_rec.parent_trx_id);
514: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
515: l_return_status := x_return_status;
516: END IF;
517:
518: -- ***

Line 522: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN

518: -- ***
519: -- contract_number
520: -- ***
521: validate_contract_number(x_return_status, p_vipv_rec.contract_number);
522: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
523: l_return_status := x_return_status;
524: END IF;
525:
526: -- ***

Line 529: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN

525:
526: -- ***
527: -- Post-TAPI changes to make sure all fields are validated
528: -- ***
529: IF l_return_status <> OKC_API.G_RET_STS_SUCCESS THEN
530: RAISE G_EXCEPTION_HALT_VALIDATION;
531: END IF;
532:
533: RETURN(l_return_status);

Line 538: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

534: EXCEPTION
535: WHEN G_EXCEPTION_HALT_VALIDATION THEN
536: RETURN(l_return_status);
537: WHEN OTHERS THEN
538: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
539: ,p_msg_name => G_UNEXPECTED_ERROR
540: ,p_token1 => G_SQLCODE_TOKEN
541: ,p_token1_value => SQLCODE
542: ,p_token2 => G_SQLERRM_TOKEN

Line 544: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

540: ,p_token1 => G_SQLCODE_TOKEN
541: ,p_token1_value => SQLCODE
542: ,p_token2 => G_SQLERRM_TOKEN
543: ,p_token2_value => SQLERRM);
544: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
545: RETURN(l_return_status);
546: END Validate_Attributes;
547: ---------------------------------------------------------------------------
548: -- PROCEDURE Validate_Record

Line 557: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

553: FUNCTION Validate_Record (
554: p_vipv_rec IN vipv_rec_type,
555: p_db_vipv_rec IN vipv_rec_type
556: ) RETURN VARCHAR2 IS
557: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
558: BEGIN
559: RETURN (l_return_status);
560: END Validate_Record;
561: FUNCTION Validate_Record (

Line 564: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

560: END Validate_Record;
561: FUNCTION Validate_Record (
562: p_vipv_rec IN vipv_rec_type
563: ) RETURN VARCHAR2 IS
564: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
565: l_db_vipv_rec vipv_rec_type := get_rec(p_vipv_rec);
566: BEGIN
567: l_return_status := Validate_Record(p_vipv_rec => p_vipv_rec,
568: p_db_vipv_rec => l_db_vipv_rec);

Line 659: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

655: -- validate_row for:OKL_VAR_INT_PROCESS_V --
656: --------------------------------------------
657: PROCEDURE validate_row(
658: p_api_version IN NUMBER,
659: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
660: x_return_status OUT NOCOPY VARCHAR2,
661: x_msg_count OUT NOCOPY NUMBER,
662: x_msg_data OUT NOCOPY VARCHAR2,
663: p_vipv_rec IN vipv_rec_type) IS

Line 667: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

663: p_vipv_rec IN vipv_rec_type) IS
664:
665: l_api_version CONSTANT NUMBER := 1;
666: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
667: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
668: l_vipv_rec vipv_rec_type := p_vipv_rec;
669: l_vip_rec vip_rec_type;
670: l_vip_rec vip_rec_type;
671: BEGIN

Line 672: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

668: l_vipv_rec vipv_rec_type := p_vipv_rec;
669: l_vip_rec vip_rec_type;
670: l_vip_rec vip_rec_type;
671: BEGIN
672: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
673: G_PKG_NAME,
674: p_init_msg_list,
675: l_api_version,
676: p_api_version,

Line 679: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

675: l_api_version,
676: p_api_version,
677: '_PVT',
678: x_return_status);
679: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
680: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
681: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
682: RAISE OKC_API.G_EXCEPTION_ERROR;
683: END IF;

Line 680: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

676: p_api_version,
677: '_PVT',
678: x_return_status);
679: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
680: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
681: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
682: RAISE OKC_API.G_EXCEPTION_ERROR;
683: END IF;
684: --- Validate all non-missing attributes (Item Level Validation)

Line 681: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

677: '_PVT',
678: x_return_status);
679: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
680: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
681: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
682: RAISE OKC_API.G_EXCEPTION_ERROR;
683: END IF;
684: --- Validate all non-missing attributes (Item Level Validation)
685: l_return_status := Validate_Attributes(l_vipv_rec);

Line 682: RAISE OKC_API.G_EXCEPTION_ERROR;

678: x_return_status);
679: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
680: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
681: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
682: RAISE OKC_API.G_EXCEPTION_ERROR;
683: END IF;
684: --- Validate all non-missing attributes (Item Level Validation)
685: l_return_status := Validate_Attributes(l_vipv_rec);
686: --- If any errors happen abort API

Line 687: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

683: END IF;
684: --- Validate all non-missing attributes (Item Level Validation)
685: l_return_status := Validate_Attributes(l_vipv_rec);
686: --- If any errors happen abort API
687: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
688: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;

Line 688: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

684: --- Validate all non-missing attributes (Item Level Validation)
685: l_return_status := Validate_Attributes(l_vipv_rec);
686: --- If any errors happen abort API
687: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
688: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);

Line 689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

685: l_return_status := Validate_Attributes(l_vipv_rec);
686: --- If any errors happen abort API
687: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
688: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 690: RAISE OKC_API.G_EXCEPTION_ERROR;

686: --- If any errors happen abort API
687: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
688: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

689: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: RAISE OKC_API.G_EXCEPTION_ERROR;
697: END IF;

Line 694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

690: RAISE OKC_API.G_EXCEPTION_ERROR;
691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: RAISE OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: x_return_status := l_return_status;

Line 695: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

691: END IF;
692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: RAISE OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: x_return_status := l_return_status;
699: EXCEPTION

Line 696: RAISE OKC_API.G_EXCEPTION_ERROR;

692: l_return_status := Validate_Record(l_vipv_rec);
693: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
694: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
695: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
696: RAISE OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: x_return_status := l_return_status;
699: EXCEPTION
700: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 700: WHEN OKC_API.G_EXCEPTION_ERROR THEN

696: RAISE OKC_API.G_EXCEPTION_ERROR;
697: END IF;
698: x_return_status := l_return_status;
699: EXCEPTION
700: WHEN OKC_API.G_EXCEPTION_ERROR THEN
701: x_return_status := OKC_API.HANDLE_EXCEPTIONS
702: (
703: l_api_name,
704: G_PKG_NAME,

Line 701: x_return_status := OKC_API.HANDLE_EXCEPTIONS

697: END IF;
698: x_return_status := l_return_status;
699: EXCEPTION
700: WHEN OKC_API.G_EXCEPTION_ERROR THEN
701: x_return_status := OKC_API.HANDLE_EXCEPTIONS
702: (
703: l_api_name,
704: G_PKG_NAME,
705: 'OKC_API.G_RET_STS_ERROR',

Line 705: 'OKC_API.G_RET_STS_ERROR',

701: x_return_status := OKC_API.HANDLE_EXCEPTIONS
702: (
703: l_api_name,
704: G_PKG_NAME,
705: 'OKC_API.G_RET_STS_ERROR',
706: x_msg_count,
707: x_msg_data,
708: '_PVT'
709: );

Line 710: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

706: x_msg_count,
707: x_msg_data,
708: '_PVT'
709: );
710: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
711: x_return_status := OKC_API.HANDLE_EXCEPTIONS
712: (
713: l_api_name,
714: G_PKG_NAME,

Line 711: x_return_status := OKC_API.HANDLE_EXCEPTIONS

707: x_msg_data,
708: '_PVT'
709: );
710: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
711: x_return_status := OKC_API.HANDLE_EXCEPTIONS
712: (
713: l_api_name,
714: G_PKG_NAME,
715: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 715: 'OKC_API.G_RET_STS_UNEXP_ERROR',

711: x_return_status := OKC_API.HANDLE_EXCEPTIONS
712: (
713: l_api_name,
714: G_PKG_NAME,
715: 'OKC_API.G_RET_STS_UNEXP_ERROR',
716: x_msg_count,
717: x_msg_data,
718: '_PVT'
719: );

Line 721: x_return_status := OKC_API.HANDLE_EXCEPTIONS

717: x_msg_data,
718: '_PVT'
719: );
720: WHEN OTHERS THEN
721: x_return_status := OKC_API.HANDLE_EXCEPTIONS
722: (
723: l_api_name,
724: G_PKG_NAME,
725: 'OTHERS',

Line 736: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

732: -- PL/SQL TBL validate_row for:OKL_VAR_INT_PROCESS_V --
733: -------------------------------------------------------
734: PROCEDURE validate_row(
735: p_api_version IN NUMBER,
736: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
737: x_return_status OUT NOCOPY VARCHAR2,
738: x_msg_count OUT NOCOPY NUMBER,
739: x_msg_data OUT NOCOPY VARCHAR2,
740: p_vipv_tbl IN vipv_tbl_type) IS

Line 746: OKC_API.init_msg_list(p_init_msg_list);

742: l_api_version CONSTANT NUMBER := 1;
743: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
744: i NUMBER := 0;
745: BEGIN
746: OKC_API.init_msg_list(p_init_msg_list);
747: -- Make sure PL/SQL table has records in it before passing
748: IF (p_vipv_tbl.COUNT > 0) THEN
749: i := p_vipv_tbl.FIRST;
750: LOOP

Line 753: p_init_msg_list => OKC_API.G_FALSE,

749: i := p_vipv_tbl.FIRST;
750: LOOP
751: validate_row (
752: p_api_version => p_api_version,
753: p_init_msg_list => OKC_API.G_FALSE,
754: x_return_status => x_return_status,
755: x_msg_count => x_msg_count,
756: x_msg_data => x_msg_data,
757: p_vipv_rec => p_vipv_tbl(i));

Line 766: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

762: END IF;
763: EXIT WHEN (i = p_vipv_tbl.LAST);
764: i := p_vipv_tbl.NEXT(i);
765: END LOOP;
766: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
769: RAISE OKC_API.G_EXCEPTION_ERROR;
770: END IF;

Line 767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

763: EXIT WHEN (i = p_vipv_tbl.LAST);
764: i := p_vipv_tbl.NEXT(i);
765: END LOOP;
766: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
769: RAISE OKC_API.G_EXCEPTION_ERROR;
770: END IF;
771: END IF;

Line 768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

764: i := p_vipv_tbl.NEXT(i);
765: END LOOP;
766: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
769: RAISE OKC_API.G_EXCEPTION_ERROR;
770: END IF;
771: END IF;
772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 769: RAISE OKC_API.G_EXCEPTION_ERROR;

765: END LOOP;
766: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
767: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
769: RAISE OKC_API.G_EXCEPTION_ERROR;
770: END IF;
771: END IF;
772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
773: EXCEPTION

Line 772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

768: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
769: RAISE OKC_API.G_EXCEPTION_ERROR;
770: END IF;
771: END IF;
772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (

Line 774: WHEN OKC_API.G_EXCEPTION_ERROR THEN

770: END IF;
771: END IF;
772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (
777: l_api_name,
778: G_PKG_NAME,

Line 775: x_return_status := OKC_API.HANDLE_EXCEPTIONS

771: END IF;
772: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
773: EXCEPTION
774: WHEN OKC_API.G_EXCEPTION_ERROR THEN
775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (
777: l_api_name,
778: G_PKG_NAME,
779: 'OKC_API.G_RET_STS_ERROR',

Line 779: 'OKC_API.G_RET_STS_ERROR',

775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
776: (
777: l_api_name,
778: G_PKG_NAME,
779: 'OKC_API.G_RET_STS_ERROR',
780: x_msg_count,
781: x_msg_data,
782: '_PVT'
783: );

Line 784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

780: x_msg_count,
781: x_msg_data,
782: '_PVT'
783: );
784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
786: (
787: l_api_name,
788: G_PKG_NAME,

Line 785: x_return_status := OKC_API.HANDLE_EXCEPTIONS

781: x_msg_data,
782: '_PVT'
783: );
784: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
786: (
787: l_api_name,
788: G_PKG_NAME,
789: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 789: 'OKC_API.G_RET_STS_UNEXP_ERROR',

785: x_return_status := OKC_API.HANDLE_EXCEPTIONS
786: (
787: l_api_name,
788: G_PKG_NAME,
789: 'OKC_API.G_RET_STS_UNEXP_ERROR',
790: x_msg_count,
791: x_msg_data,
792: '_PVT'
793: );

Line 795: x_return_status := OKC_API.HANDLE_EXCEPTIONS

791: x_msg_data,
792: '_PVT'
793: );
794: WHEN OTHERS THEN
795: x_return_status := OKC_API.HANDLE_EXCEPTIONS
796: (
797: l_api_name,
798: G_PKG_NAME,
799: 'OTHERS',

Line 813: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

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,
815: x_msg_count OUT NOCOPY NUMBER,
816: x_msg_data OUT NOCOPY VARCHAR2,
817: p_vip_rec IN vip_rec_type,

Line 822: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

818: x_vip_rec OUT NOCOPY vip_rec_type) IS
819:
820: l_api_version CONSTANT NUMBER := 1;
821: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
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 --

Line 832: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

828: FUNCTION Set_Attributes (
829: p_vip_rec IN vip_rec_type,
830: x_vip_rec OUT NOCOPY vip_rec_type
831: ) RETURN VARCHAR2 IS
832: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
833: BEGIN
834: x_vip_rec := p_vip_rec;
835: x_vip_rec.OBJECT_VERSION_NUMBER := 1;
836:

Line 853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

849: END IF;
850: RETURN(l_return_status);
851: END Set_Attributes;
852: BEGIN
853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
854: p_init_msg_list,
855: '_PVT',
856: x_return_status);
857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

853: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
854: p_init_msg_list,
855: '_PVT',
856: x_return_status);
857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
860: RAISE OKC_API.G_EXCEPTION_ERROR;
861: END IF;

Line 858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

854: p_init_msg_list,
855: '_PVT',
856: x_return_status);
857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
860: RAISE OKC_API.G_EXCEPTION_ERROR;
861: END IF;
862: --- Setting item atributes

Line 859: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

855: '_PVT',
856: x_return_status);
857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
860: RAISE OKC_API.G_EXCEPTION_ERROR;
861: END IF;
862: --- Setting item atributes
863: l_return_status := Set_Attributes(

Line 860: RAISE OKC_API.G_EXCEPTION_ERROR;

856: x_return_status);
857: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
858: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
859: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
860: RAISE OKC_API.G_EXCEPTION_ERROR;
861: END IF;
862: --- Setting item atributes
863: l_return_status := Set_Attributes(
864: p_vip_rec, -- IN

Line 867: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

863: l_return_status := Set_Attributes(
864: p_vip_rec, -- IN
865: l_vip_rec); -- OUT
866: --- If any errors happen abort API
867: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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;

Line 868: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

864: p_vip_rec, -- IN
865: l_vip_rec); -- OUT
866: --- If any errors happen abort API
867: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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(

Line 869: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

865: l_vip_rec); -- OUT
866: --- If any errors happen abort API
867: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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,

Line 870: RAISE OKC_API.G_EXCEPTION_ERROR;

866: --- If any errors happen abort API
867: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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,

Line 941: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

937: l_vip_rec.object_version_number);
938: -- Set OUT values
939: x_vip_rec := l_vip_rec;
940: x_return_status := l_return_status;
941: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
942: EXCEPTION
943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (

Line 943: WHEN OKC_API.G_EXCEPTION_ERROR THEN

939: x_vip_rec := l_vip_rec;
940: x_return_status := l_return_status;
941: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
942: EXCEPTION
943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (
946: l_api_name,
947: G_PKG_NAME,

Line 944: x_return_status := OKC_API.HANDLE_EXCEPTIONS

940: x_return_status := l_return_status;
941: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
942: EXCEPTION
943: WHEN OKC_API.G_EXCEPTION_ERROR THEN
944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (
946: l_api_name,
947: G_PKG_NAME,
948: 'OKC_API.G_RET_STS_ERROR',

Line 948: 'OKC_API.G_RET_STS_ERROR',

944: x_return_status := OKC_API.HANDLE_EXCEPTIONS
945: (
946: l_api_name,
947: G_PKG_NAME,
948: 'OKC_API.G_RET_STS_ERROR',
949: x_msg_count,
950: x_msg_data,
951: '_PVT'
952: );

Line 953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

949: x_msg_count,
950: x_msg_data,
951: '_PVT'
952: );
953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
954: x_return_status := OKC_API.HANDLE_EXCEPTIONS
955: (
956: l_api_name,
957: G_PKG_NAME,

Line 954: x_return_status := OKC_API.HANDLE_EXCEPTIONS

950: x_msg_data,
951: '_PVT'
952: );
953: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
954: x_return_status := OKC_API.HANDLE_EXCEPTIONS
955: (
956: l_api_name,
957: G_PKG_NAME,
958: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 958: 'OKC_API.G_RET_STS_UNEXP_ERROR',

954: x_return_status := OKC_API.HANDLE_EXCEPTIONS
955: (
956: l_api_name,
957: G_PKG_NAME,
958: 'OKC_API.G_RET_STS_UNEXP_ERROR',
959: x_msg_count,
960: x_msg_data,
961: '_PVT'
962: );

Line 964: x_return_status := OKC_API.HANDLE_EXCEPTIONS

960: x_msg_data,
961: '_PVT'
962: );
963: WHEN OTHERS THEN
964: x_return_status := OKC_API.HANDLE_EXCEPTIONS
965: (
966: l_api_name,
967: G_PKG_NAME,
968: 'OTHERS',

Line 979: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

975: -- insert_row for :OKL_VAR_INT_PROCESS_V --
976: -------------------------------------------
977: PROCEDURE insert_row(
978: p_api_version IN NUMBER,
979: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
980: x_return_status OUT NOCOPY VARCHAR2,
981: x_msg_count OUT NOCOPY NUMBER,
982: x_msg_data OUT NOCOPY VARCHAR2,
983: p_vipv_rec IN vipv_rec_type,

Line 988: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

984: x_vipv_rec OUT NOCOPY vipv_rec_type) IS
985:
986: l_api_version CONSTANT NUMBER := 1;
987: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
988: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
989: l_vipv_rec vipv_rec_type := p_vipv_rec;
990: l_def_vipv_rec vipv_rec_type;
991: l_vip_rec vip_rec_type;
992: lx_vip_rec vip_rec_type;

Line 1015: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1011: FUNCTION Set_Attributes (
1012: p_vipv_rec IN vipv_rec_type,
1013: x_vipv_rec OUT NOCOPY vipv_rec_type
1014: ) RETURN VARCHAR2 IS
1015: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1016: BEGIN
1017: x_vipv_rec := p_vipv_rec;
1018: x_vipv_rec.OBJECT_VERSION_NUMBER := 1;
1019: RETURN(l_return_status);

Line 1022: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1018: x_vipv_rec.OBJECT_VERSION_NUMBER := 1;
1019: RETURN(l_return_status);
1020: END Set_Attributes;
1021: BEGIN
1022: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1023: G_PKG_NAME,
1024: p_init_msg_list,
1025: l_api_version,
1026: p_api_version,

Line 1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1025: l_api_version,
1026: p_api_version,
1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;

Line 1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1026: p_api_version,
1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: l_vipv_rec := null_out_defaults(p_vipv_rec);

Line 1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1027: '_PVT',
1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: l_vipv_rec := null_out_defaults(p_vipv_rec);
1035: -- Set primary key value

Line 1032: RAISE OKC_API.G_EXCEPTION_ERROR;

1028: x_return_status);
1029: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1032: RAISE OKC_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: l_vipv_rec := null_out_defaults(p_vipv_rec);
1035: -- Set primary key value
1036: l_vipv_rec.ID := get_seq_id;

Line 1042: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1038: l_return_Status := Set_Attributes(
1039: l_vipv_rec, -- IN
1040: l_def_vipv_rec); -- OUT
1041: --- If any errors happen abort API
1042: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1043: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1045: RAISE OKC_API.G_EXCEPTION_ERROR;
1046: END IF;

Line 1043: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1039: l_vipv_rec, -- IN
1040: l_def_vipv_rec); -- OUT
1041: --- If any errors happen abort API
1042: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1043: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1045: RAISE OKC_API.G_EXCEPTION_ERROR;
1046: END IF;
1047: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);

Line 1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1040: l_def_vipv_rec); -- OUT
1041: --- If any errors happen abort API
1042: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1043: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1045: RAISE OKC_API.G_EXCEPTION_ERROR;
1046: END IF;
1047: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1048: --- Validate all non-missing attributes (Item Level Validation)

Line 1045: RAISE OKC_API.G_EXCEPTION_ERROR;

1041: --- If any errors happen abort API
1042: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1043: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1044: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1045: RAISE OKC_API.G_EXCEPTION_ERROR;
1046: END IF;
1047: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1048: --- Validate all non-missing attributes (Item Level Validation)
1049: l_return_status := Validate_Attributes(l_def_vipv_rec);

Line 1051: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1047: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1048: --- Validate all non-missing attributes (Item Level Validation)
1049: l_return_status := Validate_Attributes(l_def_vipv_rec);
1050: --- If any errors happen abort API
1051: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1052: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;

Line 1052: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1048: --- Validate all non-missing attributes (Item Level Validation)
1049: l_return_status := Validate_Attributes(l_def_vipv_rec);
1050: --- If any errors happen abort API
1051: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1052: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);

Line 1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1049: l_return_status := Validate_Attributes(l_def_vipv_rec);
1050: --- If any errors happen abort API
1051: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1052: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1054: RAISE OKC_API.G_EXCEPTION_ERROR;

1050: --- If any errors happen abort API
1051: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1052: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1053: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;

Line 1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1054: RAISE OKC_API.G_EXCEPTION_ERROR;
1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: -----------------------------------------

Line 1059: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1055: END IF;
1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: -----------------------------------------
1063: -- Move VIEW record to "Child" records --

Line 1060: RAISE OKC_API.G_EXCEPTION_ERROR;

1056: l_return_status := Validate_Record(l_def_vipv_rec);
1057: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1058: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1059: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1060: RAISE OKC_API.G_EXCEPTION_ERROR;
1061: END IF;
1062: -----------------------------------------
1063: -- Move VIEW record to "Child" records --
1064: -----------------------------------------

Line 1077: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1073: x_msg_data,
1074: l_vip_rec,
1075: lx_vip_rec
1076: );
1077: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1078: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1079: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: END IF;

Line 1078: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1074: l_vip_rec,
1075: lx_vip_rec
1076: );
1077: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1078: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1079: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: END IF;
1082: migrate(lx_vip_rec, l_def_vipv_rec);

Line 1079: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1075: lx_vip_rec
1076: );
1077: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1078: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1079: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: END IF;
1082: migrate(lx_vip_rec, l_def_vipv_rec);
1083: -- Set OUT values

Line 1080: RAISE OKC_API.G_EXCEPTION_ERROR;

1076: );
1077: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1078: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1079: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1080: RAISE OKC_API.G_EXCEPTION_ERROR;
1081: END IF;
1082: migrate(lx_vip_rec, l_def_vipv_rec);
1083: -- Set OUT values
1084: x_vipv_rec := l_def_vipv_rec;

Line 1086: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1082: migrate(lx_vip_rec, l_def_vipv_rec);
1083: -- Set OUT values
1084: x_vipv_rec := l_def_vipv_rec;
1085: x_return_status := l_return_status;
1086: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1087: EXCEPTION
1088: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (

Line 1088: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1084: x_vipv_rec := l_def_vipv_rec;
1085: x_return_status := l_return_status;
1086: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1087: EXCEPTION
1088: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,

Line 1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1085: x_return_status := l_return_status;
1086: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1087: EXCEPTION
1088: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_ERROR',

Line 1093: 'OKC_API.G_RET_STS_ERROR',

1089: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1090: (
1091: l_api_name,
1092: G_PKG_NAME,
1093: 'OKC_API.G_RET_STS_ERROR',
1094: x_msg_count,
1095: x_msg_data,
1096: '_PVT'
1097: );

Line 1098: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1094: x_msg_count,
1095: x_msg_data,
1096: '_PVT'
1097: );
1098: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,

Line 1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1095: x_msg_data,
1096: '_PVT'
1097: );
1098: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,
1103: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1103: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,
1103: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1104: x_msg_count,
1105: x_msg_data,
1106: '_PVT'
1107: );

Line 1109: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1105: x_msg_data,
1106: '_PVT'
1107: );
1108: WHEN OTHERS THEN
1109: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1110: (
1111: l_api_name,
1112: G_PKG_NAME,
1113: 'OTHERS',

Line 1124: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1120: -- PL/SQL TBL insert_row for:VIPV_TBL --
1121: ----------------------------------------
1122: PROCEDURE insert_row(
1123: p_api_version IN NUMBER,
1124: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1125: x_return_status OUT NOCOPY VARCHAR2,
1126: x_msg_count OUT NOCOPY NUMBER,
1127: x_msg_data OUT NOCOPY VARCHAR2,
1128: p_vipv_tbl IN vipv_tbl_type,

Line 1135: OKC_API.init_msg_list(p_init_msg_list);

1131: l_api_version CONSTANT NUMBER := 1;
1132: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1133: i NUMBER := 0;
1134: BEGIN
1135: OKC_API.init_msg_list(p_init_msg_list);
1136: -- Make sure PL/SQL table has records in it before passing
1137: IF (p_vipv_tbl.COUNT > 0) THEN
1138: i := p_vipv_tbl.FIRST;
1139: LOOP

Line 1142: p_init_msg_list => OKC_API.G_FALSE,

1138: i := p_vipv_tbl.FIRST;
1139: LOOP
1140: insert_row (
1141: p_api_version => p_api_version,
1142: p_init_msg_list => OKC_API.G_FALSE,
1143: x_return_status => x_return_status,
1144: x_msg_count => x_msg_count,
1145: x_msg_data => x_msg_data,
1146: p_vipv_rec => p_vipv_tbl(i),

Line 1156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1152: END IF;
1153: EXIT WHEN (i = p_vipv_tbl.LAST);
1154: i := p_vipv_tbl.NEXT(i);
1155: END LOOP;
1156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1159: RAISE OKC_API.G_EXCEPTION_ERROR;
1160: END IF;

Line 1157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1153: EXIT WHEN (i = p_vipv_tbl.LAST);
1154: i := p_vipv_tbl.NEXT(i);
1155: END LOOP;
1156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1159: RAISE OKC_API.G_EXCEPTION_ERROR;
1160: END IF;
1161: END IF;

Line 1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1154: i := p_vipv_tbl.NEXT(i);
1155: END LOOP;
1156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1159: RAISE OKC_API.G_EXCEPTION_ERROR;
1160: END IF;
1161: END IF;
1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1159: RAISE OKC_API.G_EXCEPTION_ERROR;

1155: END LOOP;
1156: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1157: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1159: RAISE OKC_API.G_EXCEPTION_ERROR;
1160: END IF;
1161: END IF;
1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1163: EXCEPTION

Line 1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1158: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1159: RAISE OKC_API.G_EXCEPTION_ERROR;
1160: END IF;
1161: END IF;
1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1163: EXCEPTION
1164: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1166: (

Line 1164: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1160: END IF;
1161: END IF;
1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1163: EXCEPTION
1164: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1166: (
1167: l_api_name,
1168: G_PKG_NAME,

Line 1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1161: END IF;
1162: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1163: EXCEPTION
1164: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1166: (
1167: l_api_name,
1168: G_PKG_NAME,
1169: 'OKC_API.G_RET_STS_ERROR',

Line 1169: 'OKC_API.G_RET_STS_ERROR',

1165: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1166: (
1167: l_api_name,
1168: G_PKG_NAME,
1169: 'OKC_API.G_RET_STS_ERROR',
1170: x_msg_count,
1171: x_msg_data,
1172: '_PVT'
1173: );

Line 1174: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1170: x_msg_count,
1171: x_msg_data,
1172: '_PVT'
1173: );
1174: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1175: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1176: (
1177: l_api_name,
1178: G_PKG_NAME,

Line 1175: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1171: x_msg_data,
1172: '_PVT'
1173: );
1174: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1175: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1176: (
1177: l_api_name,
1178: G_PKG_NAME,
1179: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1179: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1175: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1176: (
1177: l_api_name,
1178: G_PKG_NAME,
1179: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1180: x_msg_count,
1181: x_msg_data,
1182: '_PVT'
1183: );

Line 1185: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1181: x_msg_data,
1182: '_PVT'
1183: );
1184: WHEN OTHERS THEN
1185: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1186: (
1187: l_api_name,
1188: G_PKG_NAME,
1189: 'OTHERS',

Line 1203: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

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,
1205: x_msg_count OUT NOCOPY NUMBER,
1206: x_msg_data OUT NOCOPY VARCHAR2,
1207: p_vip_rec IN vip_rec_type) IS

Line 1224: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

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;
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;

Line 1230: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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,
1231: p_init_msg_list,
1232: '_PVT',
1233: x_return_status);
1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1230: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1231: p_init_msg_list,
1232: '_PVT',
1233: x_return_status);
1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1236: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1237: RAISE OKC_API.G_EXCEPTION_ERROR;
1238: END IF;

Line 1235: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1231: p_init_msg_list,
1232: '_PVT',
1233: x_return_status);
1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1236: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1237: RAISE OKC_API.G_EXCEPTION_ERROR;
1238: END IF;
1239: BEGIN

Line 1236: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1232: '_PVT',
1233: x_return_status);
1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1236: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1237: RAISE OKC_API.G_EXCEPTION_ERROR;
1238: END IF;
1239: BEGIN
1240: OPEN lock_csr(p_vip_rec);

Line 1237: RAISE OKC_API.G_EXCEPTION_ERROR;

1233: x_return_status);
1234: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1236: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1237: RAISE OKC_API.G_EXCEPTION_ERROR;
1238: END IF;
1239: BEGIN
1240: OPEN lock_csr(p_vip_rec);
1241: FETCH lock_csr INTO l_object_version_number;

Line 1249: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1245: WHEN E_Resource_Busy THEN
1246: IF (lock_csr%ISOPEN) THEN
1247: CLOSE lock_csr;
1248: END IF;
1249: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1250: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1251: END;
1252:
1253: IF ( l_row_notfound ) THEN

Line 1260: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1256: lc_row_notfound := lchk_csr%NOTFOUND;
1257: CLOSE lchk_csr;
1258: END IF;
1259: IF (lc_row_notfound) THEN
1260: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1261: RAISE OKC_API.G_EXCEPTION_ERROR;
1262: ELSIF lc_object_version_number > p_vip_rec.object_version_number THEN
1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1261: RAISE OKC_API.G_EXCEPTION_ERROR;

1257: CLOSE lchk_csr;
1258: END IF;
1259: IF (lc_row_notfound) THEN
1260: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1261: RAISE OKC_API.G_EXCEPTION_ERROR;
1262: ELSIF lc_object_version_number > p_vip_rec.object_version_number THEN
1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;
1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN

Line 1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1259: IF (lc_row_notfound) THEN
1260: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1261: RAISE OKC_API.G_EXCEPTION_ERROR;
1262: ELSIF lc_object_version_number > p_vip_rec.object_version_number THEN
1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;
1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN
1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1264: RAISE OKC_API.G_EXCEPTION_ERROR;

1260: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1261: RAISE OKC_API.G_EXCEPTION_ERROR;
1262: ELSIF lc_object_version_number > p_vip_rec.object_version_number THEN
1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;
1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN
1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;
1268: ELSIF lc_object_version_number = -1 THEN

Line 1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1262: ELSIF lc_object_version_number > p_vip_rec.object_version_number THEN
1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;
1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN
1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;
1268: ELSIF lc_object_version_number = -1 THEN
1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1270: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1267: RAISE OKC_API.G_EXCEPTION_ERROR;

1263: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1264: RAISE OKC_API.G_EXCEPTION_ERROR;
1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN
1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;
1268: ELSIF lc_object_version_number = -1 THEN
1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1270: RAISE OKC_API.G_EXCEPTION_ERROR;
1271: END IF;

Line 1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1265: ELSIF lc_object_version_number <> p_vip_rec.object_version_number THEN
1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;
1268: ELSIF lc_object_version_number = -1 THEN
1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1270: RAISE OKC_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: x_return_status := l_return_status;
1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1270: RAISE OKC_API.G_EXCEPTION_ERROR;

1266: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1267: RAISE OKC_API.G_EXCEPTION_ERROR;
1268: ELSIF lc_object_version_number = -1 THEN
1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1270: RAISE OKC_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: x_return_status := l_return_status;
1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1274: EXCEPTION

Line 1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1269: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1270: RAISE OKC_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: x_return_status := l_return_status;
1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1274: EXCEPTION
1275: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1277: (

Line 1275: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1271: END IF;
1272: x_return_status := l_return_status;
1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1274: EXCEPTION
1275: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1277: (
1278: l_api_name,
1279: G_PKG_NAME,

Line 1276: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1272: x_return_status := l_return_status;
1273: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1274: EXCEPTION
1275: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1277: (
1278: l_api_name,
1279: G_PKG_NAME,
1280: 'OKC_API.G_RET_STS_ERROR',

Line 1280: 'OKC_API.G_RET_STS_ERROR',

1276: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1277: (
1278: l_api_name,
1279: G_PKG_NAME,
1280: 'OKC_API.G_RET_STS_ERROR',
1281: x_msg_count,
1282: x_msg_data,
1283: '_PVT'
1284: );

Line 1285: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1281: x_msg_count,
1282: x_msg_data,
1283: '_PVT'
1284: );
1285: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1286: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1287: (
1288: l_api_name,
1289: G_PKG_NAME,

Line 1286: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1282: x_msg_data,
1283: '_PVT'
1284: );
1285: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1286: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1287: (
1288: l_api_name,
1289: G_PKG_NAME,
1290: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1290: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1286: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1287: (
1288: l_api_name,
1289: G_PKG_NAME,
1290: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1291: x_msg_count,
1292: x_msg_data,
1293: '_PVT'
1294: );

Line 1296: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1292: x_msg_data,
1293: '_PVT'
1294: );
1295: WHEN OTHERS THEN
1296: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1297: (
1298: l_api_name,
1299: G_PKG_NAME,
1300: 'OTHERS',

Line 1311: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1307: -- lock_row for: OKL_VAR_INT_PROCESS_V --
1308: -----------------------------------------
1309: PROCEDURE lock_row(
1310: p_api_version IN NUMBER,
1311: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1312: x_return_status OUT NOCOPY VARCHAR2,
1313: x_msg_count OUT NOCOPY NUMBER,
1314: x_msg_data OUT NOCOPY VARCHAR2,
1315: p_vipv_rec IN vipv_rec_type) IS

Line 1319: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1315: p_vipv_rec IN vipv_rec_type) IS
1316:
1317: l_api_version CONSTANT NUMBER := 1;
1318: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1319: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1320: l_vip_rec vip_rec_type;
1321: BEGIN
1322: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1323: G_PKG_NAME,

Line 1322: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1318: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1319: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1320: l_vip_rec vip_rec_type;
1321: BEGIN
1322: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1323: G_PKG_NAME,
1324: p_init_msg_list,
1325: l_api_version,
1326: p_api_version,

Line 1329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1325: l_api_version,
1326: p_api_version,
1327: '_PVT',
1328: x_return_status);
1329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1332: RAISE OKC_API.G_EXCEPTION_ERROR;
1333: END IF;

Line 1330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1326: p_api_version,
1327: '_PVT',
1328: x_return_status);
1329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1332: RAISE OKC_API.G_EXCEPTION_ERROR;
1333: END IF;
1334: -----------------------------------------

Line 1331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1327: '_PVT',
1328: x_return_status);
1329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1332: RAISE OKC_API.G_EXCEPTION_ERROR;
1333: END IF;
1334: -----------------------------------------
1335: -- Move VIEW record to "Child" records --

Line 1332: RAISE OKC_API.G_EXCEPTION_ERROR;

1328: x_return_status);
1329: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1330: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1331: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1332: RAISE OKC_API.G_EXCEPTION_ERROR;
1333: END IF;
1334: -----------------------------------------
1335: -- Move VIEW record to "Child" records --
1336: -----------------------------------------

Line 1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1344: x_msg_count,
1345: x_msg_data,
1346: l_vip_rec
1347: );
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;

Line 1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1345: x_msg_data,
1346: l_vip_rec
1347: );
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: x_return_status := l_return_status;

Line 1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1346: l_vip_rec
1347: );
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: x_return_status := l_return_status;
1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1351: RAISE OKC_API.G_EXCEPTION_ERROR;

1347: );
1348: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1349: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: x_return_status := l_return_status;
1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1355: EXCEPTION

Line 1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1350: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1351: RAISE OKC_API.G_EXCEPTION_ERROR;
1352: END IF;
1353: x_return_status := l_return_status;
1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1355: EXCEPTION
1356: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1357: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1358: (

Line 1356: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1352: END IF;
1353: x_return_status := l_return_status;
1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1355: EXCEPTION
1356: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1357: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1358: (
1359: l_api_name,
1360: G_PKG_NAME,

Line 1357: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1353: x_return_status := l_return_status;
1354: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1355: EXCEPTION
1356: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1357: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1358: (
1359: l_api_name,
1360: G_PKG_NAME,
1361: 'OKC_API.G_RET_STS_ERROR',

Line 1361: 'OKC_API.G_RET_STS_ERROR',

1357: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1358: (
1359: l_api_name,
1360: G_PKG_NAME,
1361: 'OKC_API.G_RET_STS_ERROR',
1362: x_msg_count,
1363: x_msg_data,
1364: '_PVT'
1365: );

Line 1366: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1362: x_msg_count,
1363: x_msg_data,
1364: '_PVT'
1365: );
1366: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1368: (
1369: l_api_name,
1370: G_PKG_NAME,

Line 1367: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1363: x_msg_data,
1364: '_PVT'
1365: );
1366: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1368: (
1369: l_api_name,
1370: G_PKG_NAME,
1371: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1371: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1367: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1368: (
1369: l_api_name,
1370: G_PKG_NAME,
1371: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1372: x_msg_count,
1373: x_msg_data,
1374: '_PVT'
1375: );

Line 1377: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1373: x_msg_data,
1374: '_PVT'
1375: );
1376: WHEN OTHERS THEN
1377: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1378: (
1379: l_api_name,
1380: G_PKG_NAME,
1381: 'OTHERS',

Line 1392: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1388: -- PL/SQL TBL lock_row for:VIPV_TBL --
1389: --------------------------------------
1390: PROCEDURE lock_row(
1391: p_api_version IN NUMBER,
1392: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1393: x_return_status OUT NOCOPY VARCHAR2,
1394: x_msg_count OUT NOCOPY NUMBER,
1395: x_msg_data OUT NOCOPY VARCHAR2,
1396: p_vipv_tbl IN vipv_tbl_type) IS

Line 1402: OKC_API.init_msg_list(p_init_msg_list);

1398: l_api_version CONSTANT NUMBER := 1;
1399: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1400: i NUMBER := 0;
1401: BEGIN
1402: OKC_API.init_msg_list(p_init_msg_list);
1403: -- Make sure PL/SQL table has recrods in it before passing
1404: IF (p_vipv_tbl.COUNT > 0) THEN
1405: i := p_vipv_tbl.FIRST;
1406: LOOP

Line 1409: p_init_msg_list => OKC_API.G_FALSE,

1405: i := p_vipv_tbl.FIRST;
1406: LOOP
1407: lock_row (
1408: p_api_version => p_api_version,
1409: p_init_msg_list => OKC_API.G_FALSE,
1410: x_return_status => x_return_status,
1411: x_msg_count => x_msg_count,
1412: x_msg_data => x_msg_data,
1413: p_vipv_rec => p_vipv_tbl(i));

Line 1422: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1418: END IF;
1419: EXIT WHEN (i = p_vipv_tbl.LAST);
1420: i := p_vipv_tbl.NEXT(i);
1421: END LOOP;
1422: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1423: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1425: RAISE OKC_API.G_EXCEPTION_ERROR;
1426: END IF;

Line 1423: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1419: EXIT WHEN (i = p_vipv_tbl.LAST);
1420: i := p_vipv_tbl.NEXT(i);
1421: END LOOP;
1422: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1423: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1425: RAISE OKC_API.G_EXCEPTION_ERROR;
1426: END IF;
1427: END IF;

Line 1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

1420: i := p_vipv_tbl.NEXT(i);
1421: END LOOP;
1422: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1423: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1425: RAISE OKC_API.G_EXCEPTION_ERROR;
1426: END IF;
1427: END IF;
1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1425: RAISE OKC_API.G_EXCEPTION_ERROR;

1421: END LOOP;
1422: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1423: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1425: RAISE OKC_API.G_EXCEPTION_ERROR;
1426: END IF;
1427: END IF;
1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1429: EXCEPTION

Line 1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1424: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
1425: RAISE OKC_API.G_EXCEPTION_ERROR;
1426: END IF;
1427: END IF;
1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1429: EXCEPTION
1430: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1431: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1432: (

Line 1430: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1426: END IF;
1427: END IF;
1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1429: EXCEPTION
1430: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1431: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1432: (
1433: l_api_name,
1434: G_PKG_NAME,

Line 1431: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1427: END IF;
1428: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1429: EXCEPTION
1430: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1431: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1432: (
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OKC_API.G_RET_STS_ERROR',

Line 1435: 'OKC_API.G_RET_STS_ERROR',

1431: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1432: (
1433: l_api_name,
1434: G_PKG_NAME,
1435: 'OKC_API.G_RET_STS_ERROR',
1436: x_msg_count,
1437: x_msg_data,
1438: '_PVT'
1439: );

Line 1440: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1436: x_msg_count,
1437: x_msg_data,
1438: '_PVT'
1439: );
1440: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1442: (
1443: l_api_name,
1444: G_PKG_NAME,

Line 1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1437: x_msg_data,
1438: '_PVT'
1439: );
1440: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1442: (
1443: l_api_name,
1444: G_PKG_NAME,
1445: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1445: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1441: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1442: (
1443: l_api_name,
1444: G_PKG_NAME,
1445: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1446: x_msg_count,
1447: x_msg_data,
1448: '_PVT'
1449: );

Line 1451: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1447: x_msg_data,
1448: '_PVT'
1449: );
1450: WHEN OTHERS THEN
1451: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1452: (
1453: l_api_name,
1454: G_PKG_NAME,
1455: 'OTHERS',

Line 1468: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

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,
1470: x_msg_count OUT NOCOPY NUMBER,
1471: x_msg_data OUT NOCOPY VARCHAR2,
1472: p_vip_rec IN vip_rec_type,

Line 1477: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1473: x_vip_rec OUT NOCOPY vip_rec_type) IS
1474:
1475: l_api_version CONSTANT NUMBER := 1;
1476: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
1477: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1478: l_vip_rec vip_rec_type := p_vip_rec;
1479: l_def_vip_rec vip_rec_type;
1480: l_row_notfound BOOLEAN := TRUE;
1481: ----------------------------------

Line 1490: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1486: x_vip_rec OUT NOCOPY vip_rec_type
1487: ) RETURN VARCHAR2 IS
1488: l_vip_rec vip_rec_type;
1489: l_row_notfound BOOLEAN := TRUE;
1490: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1491: BEGIN
1492: x_vip_rec := p_vip_rec;
1493: -- Get current database values
1494: l_vip_rec := get_rec(p_vip_rec, l_return_status);

Line 1495: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

1491: BEGIN
1492: x_vip_rec := p_vip_rec;
1493: -- Get current database values
1494: l_vip_rec := get_rec(p_vip_rec, l_return_status);
1495: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1496: IF (x_vip_rec.id = OKC_API.G_MISS_NUM)
1497: THEN
1498: x_vip_rec.id := l_vip_rec.id;
1499: END IF;

Line 1496: IF (x_vip_rec.id = OKC_API.G_MISS_NUM)

1492: x_vip_rec := p_vip_rec;
1493: -- Get current database values
1494: l_vip_rec := get_rec(p_vip_rec, l_return_status);
1495: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1496: IF (x_vip_rec.id = OKC_API.G_MISS_NUM)
1497: THEN
1498: x_vip_rec.id := l_vip_rec.id;
1499: END IF;
1500: IF (x_vip_rec.parent_trx_id = OKC_API.G_MISS_NUM)

Line 1500: IF (x_vip_rec.parent_trx_id = OKC_API.G_MISS_NUM)

1496: IF (x_vip_rec.id = OKC_API.G_MISS_NUM)
1497: THEN
1498: x_vip_rec.id := l_vip_rec.id;
1499: END IF;
1500: IF (x_vip_rec.parent_trx_id = OKC_API.G_MISS_NUM)
1501: THEN
1502: x_vip_rec.parent_trx_id := l_vip_rec.parent_trx_id;
1503: END IF;
1504: IF (x_vip_rec.child_trx_id = OKC_API.G_MISS_NUM)

Line 1504: IF (x_vip_rec.child_trx_id = OKC_API.G_MISS_NUM)

1500: IF (x_vip_rec.parent_trx_id = OKC_API.G_MISS_NUM)
1501: THEN
1502: x_vip_rec.parent_trx_id := l_vip_rec.parent_trx_id;
1503: END IF;
1504: IF (x_vip_rec.child_trx_id = OKC_API.G_MISS_NUM)
1505: THEN
1506: x_vip_rec.child_trx_id := l_vip_rec.child_trx_id;
1507: END IF;
1508: IF (x_vip_rec.contract_number = OKC_API.G_MISS_CHAR)

Line 1508: IF (x_vip_rec.contract_number = OKC_API.G_MISS_CHAR)

1504: IF (x_vip_rec.child_trx_id = OKC_API.G_MISS_NUM)
1505: THEN
1506: x_vip_rec.child_trx_id := l_vip_rec.child_trx_id;
1507: END IF;
1508: IF (x_vip_rec.contract_number = OKC_API.G_MISS_CHAR)
1509: THEN
1510: x_vip_rec.contract_number := l_vip_rec.contract_number;
1511: END IF;
1512: IF (x_vip_rec.rebook_status = OKC_API.G_MISS_CHAR)

Line 1512: IF (x_vip_rec.rebook_status = OKC_API.G_MISS_CHAR)

1508: IF (x_vip_rec.contract_number = OKC_API.G_MISS_CHAR)
1509: THEN
1510: x_vip_rec.contract_number := l_vip_rec.contract_number;
1511: END IF;
1512: IF (x_vip_rec.rebook_status = OKC_API.G_MISS_CHAR)
1513: THEN
1514: x_vip_rec.rebook_status := l_vip_rec.rebook_status;
1515: END IF;
1516: IF (x_vip_rec.request_id = Okl_Api.G_MISS_NUM)

Line 1536: IF (x_vip_rec.attribute_category = OKC_API.G_MISS_CHAR)

1532: IF (x_vip_rec.org_id = Okl_Api.G_MISS_NUM)
1533: THEN
1534: x_vip_rec.org_id := l_vip_rec.org_id;
1535: END IF;
1536: IF (x_vip_rec.attribute_category = OKC_API.G_MISS_CHAR)
1537: THEN
1538: x_vip_rec.attribute_category := l_vip_rec.attribute_category;
1539: END IF;
1540: IF (x_vip_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 1540: IF (x_vip_rec.attribute1 = OKC_API.G_MISS_CHAR)

1536: IF (x_vip_rec.attribute_category = OKC_API.G_MISS_CHAR)
1537: THEN
1538: x_vip_rec.attribute_category := l_vip_rec.attribute_category;
1539: END IF;
1540: IF (x_vip_rec.attribute1 = OKC_API.G_MISS_CHAR)
1541: THEN
1542: x_vip_rec.attribute1 := l_vip_rec.attribute1;
1543: END IF;
1544: IF (x_vip_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 1544: IF (x_vip_rec.attribute2 = OKC_API.G_MISS_CHAR)

1540: IF (x_vip_rec.attribute1 = OKC_API.G_MISS_CHAR)
1541: THEN
1542: x_vip_rec.attribute1 := l_vip_rec.attribute1;
1543: END IF;
1544: IF (x_vip_rec.attribute2 = OKC_API.G_MISS_CHAR)
1545: THEN
1546: x_vip_rec.attribute2 := l_vip_rec.attribute2;
1547: END IF;
1548: IF (x_vip_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 1548: IF (x_vip_rec.attribute3 = OKC_API.G_MISS_CHAR)

1544: IF (x_vip_rec.attribute2 = OKC_API.G_MISS_CHAR)
1545: THEN
1546: x_vip_rec.attribute2 := l_vip_rec.attribute2;
1547: END IF;
1548: IF (x_vip_rec.attribute3 = OKC_API.G_MISS_CHAR)
1549: THEN
1550: x_vip_rec.attribute3 := l_vip_rec.attribute3;
1551: END IF;
1552: IF (x_vip_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 1552: IF (x_vip_rec.attribute4 = OKC_API.G_MISS_CHAR)

1548: IF (x_vip_rec.attribute3 = OKC_API.G_MISS_CHAR)
1549: THEN
1550: x_vip_rec.attribute3 := l_vip_rec.attribute3;
1551: END IF;
1552: IF (x_vip_rec.attribute4 = OKC_API.G_MISS_CHAR)
1553: THEN
1554: x_vip_rec.attribute4 := l_vip_rec.attribute4;
1555: END IF;
1556: IF (x_vip_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 1556: IF (x_vip_rec.attribute5 = OKC_API.G_MISS_CHAR)

1552: IF (x_vip_rec.attribute4 = OKC_API.G_MISS_CHAR)
1553: THEN
1554: x_vip_rec.attribute4 := l_vip_rec.attribute4;
1555: END IF;
1556: IF (x_vip_rec.attribute5 = OKC_API.G_MISS_CHAR)
1557: THEN
1558: x_vip_rec.attribute5 := l_vip_rec.attribute5;
1559: END IF;
1560: IF (x_vip_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 1560: IF (x_vip_rec.attribute6 = OKC_API.G_MISS_CHAR)

1556: IF (x_vip_rec.attribute5 = OKC_API.G_MISS_CHAR)
1557: THEN
1558: x_vip_rec.attribute5 := l_vip_rec.attribute5;
1559: END IF;
1560: IF (x_vip_rec.attribute6 = OKC_API.G_MISS_CHAR)
1561: THEN
1562: x_vip_rec.attribute6 := l_vip_rec.attribute6;
1563: END IF;
1564: IF (x_vip_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 1564: IF (x_vip_rec.attribute7 = OKC_API.G_MISS_CHAR)

1560: IF (x_vip_rec.attribute6 = OKC_API.G_MISS_CHAR)
1561: THEN
1562: x_vip_rec.attribute6 := l_vip_rec.attribute6;
1563: END IF;
1564: IF (x_vip_rec.attribute7 = OKC_API.G_MISS_CHAR)
1565: THEN
1566: x_vip_rec.attribute7 := l_vip_rec.attribute7;
1567: END IF;
1568: IF (x_vip_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 1568: IF (x_vip_rec.attribute8 = OKC_API.G_MISS_CHAR)

1564: IF (x_vip_rec.attribute7 = OKC_API.G_MISS_CHAR)
1565: THEN
1566: x_vip_rec.attribute7 := l_vip_rec.attribute7;
1567: END IF;
1568: IF (x_vip_rec.attribute8 = OKC_API.G_MISS_CHAR)
1569: THEN
1570: x_vip_rec.attribute8 := l_vip_rec.attribute8;
1571: END IF;
1572: IF (x_vip_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 1572: IF (x_vip_rec.attribute9 = OKC_API.G_MISS_CHAR)

1568: IF (x_vip_rec.attribute8 = OKC_API.G_MISS_CHAR)
1569: THEN
1570: x_vip_rec.attribute8 := l_vip_rec.attribute8;
1571: END IF;
1572: IF (x_vip_rec.attribute9 = OKC_API.G_MISS_CHAR)
1573: THEN
1574: x_vip_rec.attribute9 := l_vip_rec.attribute9;
1575: END IF;
1576: IF (x_vip_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 1576: IF (x_vip_rec.attribute10 = OKC_API.G_MISS_CHAR)

1572: IF (x_vip_rec.attribute9 = OKC_API.G_MISS_CHAR)
1573: THEN
1574: x_vip_rec.attribute9 := l_vip_rec.attribute9;
1575: END IF;
1576: IF (x_vip_rec.attribute10 = OKC_API.G_MISS_CHAR)
1577: THEN
1578: x_vip_rec.attribute10 := l_vip_rec.attribute10;
1579: END IF;
1580: IF (x_vip_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 1580: IF (x_vip_rec.attribute11 = OKC_API.G_MISS_CHAR)

1576: IF (x_vip_rec.attribute10 = OKC_API.G_MISS_CHAR)
1577: THEN
1578: x_vip_rec.attribute10 := l_vip_rec.attribute10;
1579: END IF;
1580: IF (x_vip_rec.attribute11 = OKC_API.G_MISS_CHAR)
1581: THEN
1582: x_vip_rec.attribute11 := l_vip_rec.attribute11;
1583: END IF;
1584: IF (x_vip_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 1584: IF (x_vip_rec.attribute12 = OKC_API.G_MISS_CHAR)

1580: IF (x_vip_rec.attribute11 = OKC_API.G_MISS_CHAR)
1581: THEN
1582: x_vip_rec.attribute11 := l_vip_rec.attribute11;
1583: END IF;
1584: IF (x_vip_rec.attribute12 = OKC_API.G_MISS_CHAR)
1585: THEN
1586: x_vip_rec.attribute12 := l_vip_rec.attribute12;
1587: END IF;
1588: IF (x_vip_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 1588: IF (x_vip_rec.attribute13 = OKC_API.G_MISS_CHAR)

1584: IF (x_vip_rec.attribute12 = OKC_API.G_MISS_CHAR)
1585: THEN
1586: x_vip_rec.attribute12 := l_vip_rec.attribute12;
1587: END IF;
1588: IF (x_vip_rec.attribute13 = OKC_API.G_MISS_CHAR)
1589: THEN
1590: x_vip_rec.attribute13 := l_vip_rec.attribute13;
1591: END IF;
1592: IF (x_vip_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 1592: IF (x_vip_rec.attribute14 = OKC_API.G_MISS_CHAR)

1588: IF (x_vip_rec.attribute13 = OKC_API.G_MISS_CHAR)
1589: THEN
1590: x_vip_rec.attribute13 := l_vip_rec.attribute13;
1591: END IF;
1592: IF (x_vip_rec.attribute14 = OKC_API.G_MISS_CHAR)
1593: THEN
1594: x_vip_rec.attribute14 := l_vip_rec.attribute14;
1595: END IF;
1596: IF (x_vip_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 1596: IF (x_vip_rec.attribute15 = OKC_API.G_MISS_CHAR)

1592: IF (x_vip_rec.attribute14 = OKC_API.G_MISS_CHAR)
1593: THEN
1594: x_vip_rec.attribute14 := l_vip_rec.attribute14;
1595: END IF;
1596: IF (x_vip_rec.attribute15 = OKC_API.G_MISS_CHAR)
1597: THEN
1598: x_vip_rec.attribute15 := l_vip_rec.attribute15;
1599: END IF;
1600: IF (x_vip_rec.created_by = OKC_API.G_MISS_NUM)

Line 1600: IF (x_vip_rec.created_by = OKC_API.G_MISS_NUM)

1596: IF (x_vip_rec.attribute15 = OKC_API.G_MISS_CHAR)
1597: THEN
1598: x_vip_rec.attribute15 := l_vip_rec.attribute15;
1599: END IF;
1600: IF (x_vip_rec.created_by = OKC_API.G_MISS_NUM)
1601: THEN
1602: x_vip_rec.created_by := l_vip_rec.created_by;
1603: END IF;
1604: IF (x_vip_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1604: IF (x_vip_rec.creation_date = OKC_API.G_MISS_DATE)

1600: IF (x_vip_rec.created_by = OKC_API.G_MISS_NUM)
1601: THEN
1602: x_vip_rec.created_by := l_vip_rec.created_by;
1603: END IF;
1604: IF (x_vip_rec.creation_date = OKC_API.G_MISS_DATE)
1605: THEN
1606: x_vip_rec.creation_date := l_vip_rec.creation_date;
1607: END IF;
1608: IF (x_vip_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1608: IF (x_vip_rec.last_updated_by = OKC_API.G_MISS_NUM)

1604: IF (x_vip_rec.creation_date = OKC_API.G_MISS_DATE)
1605: THEN
1606: x_vip_rec.creation_date := l_vip_rec.creation_date;
1607: END IF;
1608: IF (x_vip_rec.last_updated_by = OKC_API.G_MISS_NUM)
1609: THEN
1610: x_vip_rec.last_updated_by := l_vip_rec.last_updated_by;
1611: END IF;
1612: IF (x_vip_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1612: IF (x_vip_rec.last_update_date = OKC_API.G_MISS_DATE)

1608: IF (x_vip_rec.last_updated_by = OKC_API.G_MISS_NUM)
1609: THEN
1610: x_vip_rec.last_updated_by := l_vip_rec.last_updated_by;
1611: END IF;
1612: IF (x_vip_rec.last_update_date = OKC_API.G_MISS_DATE)
1613: THEN
1614: x_vip_rec.last_update_date := l_vip_rec.last_update_date;
1615: END IF;
1616: IF (x_vip_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1616: IF (x_vip_rec.last_update_login = OKC_API.G_MISS_NUM)

1612: IF (x_vip_rec.last_update_date = OKC_API.G_MISS_DATE)
1613: THEN
1614: x_vip_rec.last_update_date := l_vip_rec.last_update_date;
1615: END IF;
1616: IF (x_vip_rec.last_update_login = OKC_API.G_MISS_NUM)
1617: THEN
1618: x_vip_rec.last_update_login := l_vip_rec.last_update_login;
1619: END IF;
1620: IF (x_vip_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1620: IF (x_vip_rec.object_version_number = OKC_API.G_MISS_NUM)

1616: IF (x_vip_rec.last_update_login = OKC_API.G_MISS_NUM)
1617: THEN
1618: x_vip_rec.last_update_login := l_vip_rec.last_update_login;
1619: END IF;
1620: IF (x_vip_rec.object_version_number = OKC_API.G_MISS_NUM)
1621: THEN
1622: x_vip_rec.object_version_number := l_vip_rec.object_version_number;
1623: END IF;
1624: END IF;

Line 1634: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1630: FUNCTION Set_Attributes (
1631: p_vip_rec IN vip_rec_type,
1632: x_vip_rec OUT NOCOPY vip_rec_type
1633: ) RETURN VARCHAR2 IS
1634: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1635: BEGIN
1636: x_vip_rec := p_vip_rec;
1637: x_vip_rec.OBJECT_VERSION_NUMBER := p_vip_rec.OBJECT_VERSION_NUMBER + 1;
1638: RETURN(l_return_status);

Line 1641: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1637: x_vip_rec.OBJECT_VERSION_NUMBER := p_vip_rec.OBJECT_VERSION_NUMBER + 1;
1638: RETURN(l_return_status);
1639: END Set_Attributes;
1640: BEGIN
1641: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1642: p_init_msg_list,
1643: '_PVT',
1644: x_return_status);
1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1641: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1642: p_init_msg_list,
1643: '_PVT',
1644: x_return_status);
1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1648: RAISE OKC_API.G_EXCEPTION_ERROR;
1649: END IF;

Line 1646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1642: p_init_msg_list,
1643: '_PVT',
1644: x_return_status);
1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1648: RAISE OKC_API.G_EXCEPTION_ERROR;
1649: END IF;
1650: --- Setting item attributes

Line 1647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1643: '_PVT',
1644: x_return_status);
1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1648: RAISE OKC_API.G_EXCEPTION_ERROR;
1649: END IF;
1650: --- Setting item attributes
1651: l_return_status := Set_Attributes(

Line 1648: RAISE OKC_API.G_EXCEPTION_ERROR;

1644: x_return_status);
1645: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1646: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1647: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1648: RAISE OKC_API.G_EXCEPTION_ERROR;
1649: END IF;
1650: --- Setting item attributes
1651: l_return_status := Set_Attributes(
1652: p_vip_rec, -- IN

Line 1655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1651: l_return_status := Set_Attributes(
1652: p_vip_rec, -- IN
1653: l_vip_rec); -- OUT
1654: --- If any errors happen abort API
1655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;

Line 1656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1652: p_vip_rec, -- IN
1653: l_vip_rec); -- OUT
1654: --- If any errors happen abort API
1655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);

Line 1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1653: l_vip_rec); -- OUT
1654: --- If any errors happen abort API
1655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1658: RAISE OKC_API.G_EXCEPTION_ERROR;

1654: --- If any errors happen abort API
1655: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1656: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1662: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1657: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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;

Line 1662: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1658: RAISE OKC_API.G_EXCEPTION_ERROR;
1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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

Line 1663: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1659: END IF;
1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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,

Line 1664: RAISE OKC_API.G_EXCEPTION_ERROR;

1660: l_return_status := populate_new_record(l_vip_rec, l_def_vip_rec);
1661: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
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,

Line 1702: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

1698: WHERE ID = l_def_vip_rec.id;
1699:
1700: x_vip_rec := l_vip_rec;
1701: x_return_status := l_return_status;
1702: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1703: EXCEPTION
1704: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1705: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1706: (

Line 1704: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1700: x_vip_rec := l_vip_rec;
1701: x_return_status := l_return_status;
1702: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1703: EXCEPTION
1704: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1705: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1708: G_PKG_NAME,

Line 1705: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1701: x_return_status := l_return_status;
1702: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1703: EXCEPTION
1704: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1705: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1708: G_PKG_NAME,
1709: 'OKC_API.G_RET_STS_ERROR',

Line 1709: 'OKC_API.G_RET_STS_ERROR',

1705: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1706: (
1707: l_api_name,
1708: G_PKG_NAME,
1709: 'OKC_API.G_RET_STS_ERROR',
1710: x_msg_count,
1711: x_msg_data,
1712: '_PVT'
1713: );

Line 1714: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1710: x_msg_count,
1711: x_msg_data,
1712: '_PVT'
1713: );
1714: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1715: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1716: (
1717: l_api_name,
1718: G_PKG_NAME,

Line 1715: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1711: x_msg_data,
1712: '_PVT'
1713: );
1714: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1715: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1716: (
1717: l_api_name,
1718: G_PKG_NAME,
1719: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1719: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1715: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1716: (
1717: l_api_name,
1718: G_PKG_NAME,
1719: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1720: x_msg_count,
1721: x_msg_data,
1722: '_PVT'
1723: );

Line 1725: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1721: x_msg_data,
1722: '_PVT'
1723: );
1724: WHEN OTHERS THEN
1725: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1726: (
1727: l_api_name,
1728: G_PKG_NAME,
1729: 'OTHERS',

Line 1740: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

1736: -- update_row for:OKL_VAR_INT_PROCESS_V --
1737: ------------------------------------------
1738: PROCEDURE update_row(
1739: p_api_version IN NUMBER,
1740: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1741: x_return_status OUT NOCOPY VARCHAR2,
1742: x_msg_count OUT NOCOPY NUMBER,
1743: x_msg_data OUT NOCOPY VARCHAR2,
1744: p_vipv_rec IN vipv_rec_type,

Line 1749: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1745: x_vipv_rec OUT NOCOPY vipv_rec_type) IS
1746:
1747: l_api_version CONSTANT NUMBER := 1;
1748: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
1749: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1750: l_vipv_rec vipv_rec_type := p_vipv_rec;
1751: l_def_vipv_rec vipv_rec_type;
1752: l_db_vipv_rec vipv_rec_type;
1753: l_vip_rec vip_rec_type;

Line 1776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1772: p_vipv_rec IN vipv_rec_type,
1773: x_vipv_rec OUT NOCOPY vipv_rec_type
1774: ) RETURN VARCHAR2 IS
1775: l_row_notfound BOOLEAN := TRUE;
1776: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1777: BEGIN
1778: x_vipv_rec := p_vipv_rec;
1779: -- Get current database values
1780: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it

Line 1783: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN

1779: -- Get current database values
1780: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
1781: -- so it may be verified through LOCK_ROW.
1782: l_db_vipv_rec := get_rec(p_vipv_rec, l_return_status);
1783: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1784: -- Post-TAPI changes - Added for object version compatibility for now
1785: IF (x_vipv_rec.object_version_number = OKL_API.G_MISS_NUM)
1786: THEN
1787: x_vipv_rec.object_version_number := l_db_vipv_rec.object_version_number;

Line 1789: IF (x_vipv_rec.id = OKC_API.G_MISS_NUM)

1785: IF (x_vipv_rec.object_version_number = OKL_API.G_MISS_NUM)
1786: THEN
1787: x_vipv_rec.object_version_number := l_db_vipv_rec.object_version_number;
1788: END IF;
1789: IF (x_vipv_rec.id = OKC_API.G_MISS_NUM)
1790: THEN
1791: x_vipv_rec.id := l_db_vipv_rec.id;
1792: END IF;
1793: IF (x_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM)

Line 1793: IF (x_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM)

1789: IF (x_vipv_rec.id = OKC_API.G_MISS_NUM)
1790: THEN
1791: x_vipv_rec.id := l_db_vipv_rec.id;
1792: END IF;
1793: IF (x_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM)
1794: THEN
1795: x_vipv_rec.parent_trx_id := l_db_vipv_rec.parent_trx_id;
1796: END IF;
1797: IF (x_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM)

Line 1797: IF (x_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM)

1793: IF (x_vipv_rec.parent_trx_id = OKC_API.G_MISS_NUM)
1794: THEN
1795: x_vipv_rec.parent_trx_id := l_db_vipv_rec.parent_trx_id;
1796: END IF;
1797: IF (x_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM)
1798: THEN
1799: x_vipv_rec.child_trx_id := l_db_vipv_rec.child_trx_id;
1800: END IF;
1801: IF (x_vipv_rec.contract_number = OKC_API.G_MISS_CHAR)

Line 1801: IF (x_vipv_rec.contract_number = OKC_API.G_MISS_CHAR)

1797: IF (x_vipv_rec.child_trx_id = OKC_API.G_MISS_NUM)
1798: THEN
1799: x_vipv_rec.child_trx_id := l_db_vipv_rec.child_trx_id;
1800: END IF;
1801: IF (x_vipv_rec.contract_number = OKC_API.G_MISS_CHAR)
1802: THEN
1803: x_vipv_rec.contract_number := l_db_vipv_rec.contract_number;
1804: END IF;
1805: IF (x_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR)

Line 1805: IF (x_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR)

1801: IF (x_vipv_rec.contract_number = OKC_API.G_MISS_CHAR)
1802: THEN
1803: x_vipv_rec.contract_number := l_db_vipv_rec.contract_number;
1804: END IF;
1805: IF (x_vipv_rec.rebook_status = OKC_API.G_MISS_CHAR)
1806: THEN
1807: x_vipv_rec.rebook_status := l_db_vipv_rec.rebook_status;
1808: END IF;
1809: IF (x_vipv_rec.request_id = Okl_Api.G_MISS_NUM)

Line 1829: IF (x_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR)

1825: IF (x_vipv_rec.org_id = Okl_Api.G_MISS_NUM)
1826: THEN
1827: x_vipv_rec.org_id := l_db_vipv_rec.org_id;
1828: END IF;
1829: IF (x_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR)
1830: THEN
1831: x_vipv_rec.attribute_category := l_db_vipv_rec.attribute_category;
1832: END IF;
1833: IF (x_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR)

Line 1833: IF (x_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR)

1829: IF (x_vipv_rec.attribute_category = OKC_API.G_MISS_CHAR)
1830: THEN
1831: x_vipv_rec.attribute_category := l_db_vipv_rec.attribute_category;
1832: END IF;
1833: IF (x_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR)
1834: THEN
1835: x_vipv_rec.attribute1 := l_db_vipv_rec.attribute1;
1836: END IF;
1837: IF (x_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR)

Line 1837: IF (x_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR)

1833: IF (x_vipv_rec.attribute1 = OKC_API.G_MISS_CHAR)
1834: THEN
1835: x_vipv_rec.attribute1 := l_db_vipv_rec.attribute1;
1836: END IF;
1837: IF (x_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR)
1838: THEN
1839: x_vipv_rec.attribute2 := l_db_vipv_rec.attribute2;
1840: END IF;
1841: IF (x_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR)

Line 1841: IF (x_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR)

1837: IF (x_vipv_rec.attribute2 = OKC_API.G_MISS_CHAR)
1838: THEN
1839: x_vipv_rec.attribute2 := l_db_vipv_rec.attribute2;
1840: END IF;
1841: IF (x_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR)
1842: THEN
1843: x_vipv_rec.attribute3 := l_db_vipv_rec.attribute3;
1844: END IF;
1845: IF (x_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR)

Line 1845: IF (x_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR)

1841: IF (x_vipv_rec.attribute3 = OKC_API.G_MISS_CHAR)
1842: THEN
1843: x_vipv_rec.attribute3 := l_db_vipv_rec.attribute3;
1844: END IF;
1845: IF (x_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR)
1846: THEN
1847: x_vipv_rec.attribute4 := l_db_vipv_rec.attribute4;
1848: END IF;
1849: IF (x_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR)

Line 1849: IF (x_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR)

1845: IF (x_vipv_rec.attribute4 = OKC_API.G_MISS_CHAR)
1846: THEN
1847: x_vipv_rec.attribute4 := l_db_vipv_rec.attribute4;
1848: END IF;
1849: IF (x_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR)
1850: THEN
1851: x_vipv_rec.attribute5 := l_db_vipv_rec.attribute5;
1852: END IF;
1853: IF (x_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR)

Line 1853: IF (x_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR)

1849: IF (x_vipv_rec.attribute5 = OKC_API.G_MISS_CHAR)
1850: THEN
1851: x_vipv_rec.attribute5 := l_db_vipv_rec.attribute5;
1852: END IF;
1853: IF (x_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR)
1854: THEN
1855: x_vipv_rec.attribute6 := l_db_vipv_rec.attribute6;
1856: END IF;
1857: IF (x_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR)

Line 1857: IF (x_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR)

1853: IF (x_vipv_rec.attribute6 = OKC_API.G_MISS_CHAR)
1854: THEN
1855: x_vipv_rec.attribute6 := l_db_vipv_rec.attribute6;
1856: END IF;
1857: IF (x_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR)
1858: THEN
1859: x_vipv_rec.attribute7 := l_db_vipv_rec.attribute7;
1860: END IF;
1861: IF (x_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR)

Line 1861: IF (x_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR)

1857: IF (x_vipv_rec.attribute7 = OKC_API.G_MISS_CHAR)
1858: THEN
1859: x_vipv_rec.attribute7 := l_db_vipv_rec.attribute7;
1860: END IF;
1861: IF (x_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR)
1862: THEN
1863: x_vipv_rec.attribute8 := l_db_vipv_rec.attribute8;
1864: END IF;
1865: IF (x_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR)

Line 1865: IF (x_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR)

1861: IF (x_vipv_rec.attribute8 = OKC_API.G_MISS_CHAR)
1862: THEN
1863: x_vipv_rec.attribute8 := l_db_vipv_rec.attribute8;
1864: END IF;
1865: IF (x_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR)
1866: THEN
1867: x_vipv_rec.attribute9 := l_db_vipv_rec.attribute9;
1868: END IF;
1869: IF (x_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR)

Line 1869: IF (x_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR)

1865: IF (x_vipv_rec.attribute9 = OKC_API.G_MISS_CHAR)
1866: THEN
1867: x_vipv_rec.attribute9 := l_db_vipv_rec.attribute9;
1868: END IF;
1869: IF (x_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR)
1870: THEN
1871: x_vipv_rec.attribute10 := l_db_vipv_rec.attribute10;
1872: END IF;
1873: IF (x_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR)

Line 1873: IF (x_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR)

1869: IF (x_vipv_rec.attribute10 = OKC_API.G_MISS_CHAR)
1870: THEN
1871: x_vipv_rec.attribute10 := l_db_vipv_rec.attribute10;
1872: END IF;
1873: IF (x_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR)
1874: THEN
1875: x_vipv_rec.attribute11 := l_db_vipv_rec.attribute11;
1876: END IF;
1877: IF (x_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR)

Line 1877: IF (x_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR)

1873: IF (x_vipv_rec.attribute11 = OKC_API.G_MISS_CHAR)
1874: THEN
1875: x_vipv_rec.attribute11 := l_db_vipv_rec.attribute11;
1876: END IF;
1877: IF (x_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR)
1878: THEN
1879: x_vipv_rec.attribute12 := l_db_vipv_rec.attribute12;
1880: END IF;
1881: IF (x_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR)

Line 1881: IF (x_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR)

1877: IF (x_vipv_rec.attribute12 = OKC_API.G_MISS_CHAR)
1878: THEN
1879: x_vipv_rec.attribute12 := l_db_vipv_rec.attribute12;
1880: END IF;
1881: IF (x_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR)
1882: THEN
1883: x_vipv_rec.attribute13 := l_db_vipv_rec.attribute13;
1884: END IF;
1885: IF (x_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR)

Line 1885: IF (x_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR)

1881: IF (x_vipv_rec.attribute13 = OKC_API.G_MISS_CHAR)
1882: THEN
1883: x_vipv_rec.attribute13 := l_db_vipv_rec.attribute13;
1884: END IF;
1885: IF (x_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR)
1886: THEN
1887: x_vipv_rec.attribute14 := l_db_vipv_rec.attribute14;
1888: END IF;
1889: IF (x_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR)

Line 1889: IF (x_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR)

1885: IF (x_vipv_rec.attribute14 = OKC_API.G_MISS_CHAR)
1886: THEN
1887: x_vipv_rec.attribute14 := l_db_vipv_rec.attribute14;
1888: END IF;
1889: IF (x_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR)
1890: THEN
1891: x_vipv_rec.attribute15 := l_db_vipv_rec.attribute15;
1892: END IF;
1893: IF (x_vipv_rec.created_by = OKC_API.G_MISS_NUM)

Line 1893: IF (x_vipv_rec.created_by = OKC_API.G_MISS_NUM)

1889: IF (x_vipv_rec.attribute15 = OKC_API.G_MISS_CHAR)
1890: THEN
1891: x_vipv_rec.attribute15 := l_db_vipv_rec.attribute15;
1892: END IF;
1893: IF (x_vipv_rec.created_by = OKC_API.G_MISS_NUM)
1894: THEN
1895: x_vipv_rec.created_by := l_db_vipv_rec.created_by;
1896: END IF;
1897: IF (x_vipv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1897: IF (x_vipv_rec.creation_date = OKC_API.G_MISS_DATE)

1893: IF (x_vipv_rec.created_by = OKC_API.G_MISS_NUM)
1894: THEN
1895: x_vipv_rec.created_by := l_db_vipv_rec.created_by;
1896: END IF;
1897: IF (x_vipv_rec.creation_date = OKC_API.G_MISS_DATE)
1898: THEN
1899: x_vipv_rec.creation_date := l_db_vipv_rec.creation_date;
1900: END IF;
1901: IF (x_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1901: IF (x_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM)

1897: IF (x_vipv_rec.creation_date = OKC_API.G_MISS_DATE)
1898: THEN
1899: x_vipv_rec.creation_date := l_db_vipv_rec.creation_date;
1900: END IF;
1901: IF (x_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1902: THEN
1903: x_vipv_rec.last_updated_by := l_db_vipv_rec.last_updated_by;
1904: END IF;
1905: IF (x_vipv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1905: IF (x_vipv_rec.last_update_date = OKC_API.G_MISS_DATE)

1901: IF (x_vipv_rec.last_updated_by = OKC_API.G_MISS_NUM)
1902: THEN
1903: x_vipv_rec.last_updated_by := l_db_vipv_rec.last_updated_by;
1904: END IF;
1905: IF (x_vipv_rec.last_update_date = OKC_API.G_MISS_DATE)
1906: THEN
1907: x_vipv_rec.last_update_date := l_db_vipv_rec.last_update_date;
1908: END IF;
1909: IF (x_vipv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1909: IF (x_vipv_rec.last_update_login = OKC_API.G_MISS_NUM)

1905: IF (x_vipv_rec.last_update_date = OKC_API.G_MISS_DATE)
1906: THEN
1907: x_vipv_rec.last_update_date := l_db_vipv_rec.last_update_date;
1908: END IF;
1909: IF (x_vipv_rec.last_update_login = OKC_API.G_MISS_NUM)
1910: THEN
1911: x_vipv_rec.last_update_login := l_db_vipv_rec.last_update_login;
1912: END IF;
1913: END IF;

Line 1923: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

1919: FUNCTION Set_Attributes (
1920: p_vipv_rec IN vipv_rec_type,
1921: x_vipv_rec OUT NOCOPY vipv_rec_type
1922: ) RETURN VARCHAR2 IS
1923: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1924: BEGIN
1925: x_vipv_rec := p_vipv_rec;
1926: RETURN(l_return_status);
1927: END Set_Attributes;

Line 1929: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

1925: x_vipv_rec := p_vipv_rec;
1926: RETURN(l_return_status);
1927: END Set_Attributes;
1928: BEGIN
1929: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1930: G_PKG_NAME,
1931: p_init_msg_list,
1932: l_api_version,
1933: p_api_version,

Line 1936: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1932: l_api_version,
1933: p_api_version,
1934: '_PVT',
1935: x_return_status);
1936: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1937: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1938: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1939: RAISE OKC_API.G_EXCEPTION_ERROR;
1940: END IF;

Line 1937: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1933: p_api_version,
1934: '_PVT',
1935: x_return_status);
1936: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1937: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1938: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1939: RAISE OKC_API.G_EXCEPTION_ERROR;
1940: END IF;
1941: --- Setting item attributes

Line 1938: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1934: '_PVT',
1935: x_return_status);
1936: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1937: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1938: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1939: RAISE OKC_API.G_EXCEPTION_ERROR;
1940: END IF;
1941: --- Setting item attributes
1942: l_return_status := Set_Attributes(

Line 1939: RAISE OKC_API.G_EXCEPTION_ERROR;

1935: x_return_status);
1936: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1937: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1938: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1939: RAISE OKC_API.G_EXCEPTION_ERROR;
1940: END IF;
1941: --- Setting item attributes
1942: l_return_status := Set_Attributes(
1943: p_vipv_rec, -- IN

Line 1946: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1942: l_return_status := Set_Attributes(
1943: p_vipv_rec, -- IN
1944: x_vipv_rec); -- OUT
1945: --- If any errors happen abort API
1946: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;

Line 1947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1943: p_vipv_rec, -- IN
1944: x_vipv_rec); -- OUT
1945: --- If any errors happen abort API
1946: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);

Line 1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1944: x_vipv_rec); -- OUT
1945: --- If any errors happen abort API
1946: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1949: RAISE OKC_API.G_EXCEPTION_ERROR;

1945: --- If any errors happen abort API
1946: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1947: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1948: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1954: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1955: RAISE OKC_API.G_EXCEPTION_ERROR;
1956: END IF;

Line 1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1949: RAISE OKC_API.G_EXCEPTION_ERROR;
1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1954: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1955: RAISE OKC_API.G_EXCEPTION_ERROR;
1956: END IF;
1957: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);

Line 1954: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1950: END IF;
1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1954: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1955: RAISE OKC_API.G_EXCEPTION_ERROR;
1956: END IF;
1957: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1958: --- Validate all non-missing attributes (Item Level Validation)

Line 1955: RAISE OKC_API.G_EXCEPTION_ERROR;

1951: l_return_status := populate_new_record(l_vipv_rec, l_def_vipv_rec);
1952: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1953: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1954: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1955: RAISE OKC_API.G_EXCEPTION_ERROR;
1956: END IF;
1957: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1958: --- Validate all non-missing attributes (Item Level Validation)
1959: l_return_status := Validate_Attributes(l_def_vipv_rec);

Line 1961: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1957: l_def_vipv_rec := fill_who_columns(l_def_vipv_rec);
1958: --- Validate all non-missing attributes (Item Level Validation)
1959: l_return_status := Validate_Attributes(l_def_vipv_rec);
1960: --- If any errors happen abort API
1961: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1962: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;

Line 1962: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1958: --- Validate all non-missing attributes (Item Level Validation)
1959: l_return_status := Validate_Attributes(l_def_vipv_rec);
1960: --- If any errors happen abort API
1961: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1962: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);

Line 1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1959: l_return_status := Validate_Attributes(l_def_vipv_rec);
1960: --- If any errors happen abort API
1961: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1962: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1964: RAISE OKC_API.G_EXCEPTION_ERROR;

1960: --- If any errors happen abort API
1961: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1962: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1963: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1969: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1970: RAISE OKC_API.G_EXCEPTION_ERROR;
1971: END IF;

Line 1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1964: RAISE OKC_API.G_EXCEPTION_ERROR;
1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1969: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1970: RAISE OKC_API.G_EXCEPTION_ERROR;
1971: END IF;
1972:

Line 1969: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1965: END IF;
1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1969: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1970: RAISE OKC_API.G_EXCEPTION_ERROR;
1971: END IF;
1972:
1973: /* Post-TAPI changes - Remove for object_version_compitability

Line 1970: RAISE OKC_API.G_EXCEPTION_ERROR;

1966: l_return_status := Validate_Record(l_def_vipv_rec, l_db_vipv_rec);
1967: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1968: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1969: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1970: RAISE OKC_API.G_EXCEPTION_ERROR;
1971: END IF;
1972:
1973: /* Post-TAPI changes - Remove for object_version_compitability
1974: -- Lock the Record

Line 1982: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

1978: x_return_status => l_return_status,
1979: x_msg_count => x_msg_count,
1980: x_msg_data => x_msg_data,
1981: p_vipv_rec => p_vipv_rec);
1982: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1983: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1984: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1985: RAISE OKC_API.G_EXCEPTION_ERROR;
1986: END IF;

Line 1983: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1979: x_msg_count => x_msg_count,
1980: x_msg_data => x_msg_data,
1981: p_vipv_rec => p_vipv_rec);
1982: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1983: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1984: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1985: RAISE OKC_API.G_EXCEPTION_ERROR;
1986: END IF;
1987: */

Line 1984: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

1980: x_msg_data => x_msg_data,
1981: p_vipv_rec => p_vipv_rec);
1982: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1983: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1984: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1985: RAISE OKC_API.G_EXCEPTION_ERROR;
1986: END IF;
1987: */
1988:

Line 1985: RAISE OKC_API.G_EXCEPTION_ERROR;

1981: p_vipv_rec => p_vipv_rec);
1982: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1983: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1984: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1985: RAISE OKC_API.G_EXCEPTION_ERROR;
1986: END IF;
1987: */
1988:
1989: -----------------------------------------

Line 2004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2000: x_msg_data,
2001: l_vip_rec,
2002: lx_vip_rec
2003: );
2004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2007: RAISE OKC_API.G_EXCEPTION_ERROR;
2008: END IF;

Line 2005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2001: l_vip_rec,
2002: lx_vip_rec
2003: );
2004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2007: RAISE OKC_API.G_EXCEPTION_ERROR;
2008: END IF;
2009: migrate(lx_vip_rec, l_def_vipv_rec);

Line 2006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2002: lx_vip_rec
2003: );
2004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2007: RAISE OKC_API.G_EXCEPTION_ERROR;
2008: END IF;
2009: migrate(lx_vip_rec, l_def_vipv_rec);
2010: x_vipv_rec := l_def_vipv_rec;

Line 2007: RAISE OKC_API.G_EXCEPTION_ERROR;

2003: );
2004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2007: RAISE OKC_API.G_EXCEPTION_ERROR;
2008: END IF;
2009: migrate(lx_vip_rec, l_def_vipv_rec);
2010: x_vipv_rec := l_def_vipv_rec;
2011: x_return_status := l_return_status;

Line 2012: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2008: END IF;
2009: migrate(lx_vip_rec, l_def_vipv_rec);
2010: x_vipv_rec := l_def_vipv_rec;
2011: x_return_status := l_return_status;
2012: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2013: EXCEPTION
2014: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2015: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2016: (

Line 2014: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2010: x_vipv_rec := l_def_vipv_rec;
2011: x_return_status := l_return_status;
2012: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2013: EXCEPTION
2014: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2015: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2016: (
2017: l_api_name,
2018: G_PKG_NAME,

Line 2015: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2011: x_return_status := l_return_status;
2012: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2013: EXCEPTION
2014: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2015: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2016: (
2017: l_api_name,
2018: G_PKG_NAME,
2019: 'OKC_API.G_RET_STS_ERROR',

Line 2019: 'OKC_API.G_RET_STS_ERROR',

2015: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2016: (
2017: l_api_name,
2018: G_PKG_NAME,
2019: 'OKC_API.G_RET_STS_ERROR',
2020: x_msg_count,
2021: x_msg_data,
2022: '_PVT'
2023: );

Line 2024: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2020: x_msg_count,
2021: x_msg_data,
2022: '_PVT'
2023: );
2024: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2026: (
2027: l_api_name,
2028: G_PKG_NAME,

Line 2025: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2021: x_msg_data,
2022: '_PVT'
2023: );
2024: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2026: (
2027: l_api_name,
2028: G_PKG_NAME,
2029: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2029: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2025: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2026: (
2027: l_api_name,
2028: G_PKG_NAME,
2029: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2030: x_msg_count,
2031: x_msg_data,
2032: '_PVT'
2033: );

Line 2035: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2031: x_msg_data,
2032: '_PVT'
2033: );
2034: WHEN OTHERS THEN
2035: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2036: (
2037: l_api_name,
2038: G_PKG_NAME,
2039: 'OTHERS',

Line 2050: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2046: -- PL/SQL TBL update_row for:VIPV_TBL --
2047: ----------------------------------------
2048: PROCEDURE update_row(
2049: p_api_version IN NUMBER,
2050: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2051: x_return_status OUT NOCOPY VARCHAR2,
2052: x_msg_count OUT NOCOPY NUMBER,
2053: x_msg_data OUT NOCOPY VARCHAR2,
2054: p_vipv_tbl IN vipv_tbl_type,

Line 2061: OKC_API.init_msg_list(p_init_msg_list);

2057: l_api_version CONSTANT NUMBER := 1;
2058: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2059: i NUMBER := 0;
2060: BEGIN
2061: OKC_API.init_msg_list(p_init_msg_list);
2062: -- Make sure PL/SQL table has records in it before passing
2063: IF (p_vipv_tbl.COUNT > 0) THEN
2064: i := p_vipv_tbl.FIRST;
2065: LOOP

Line 2068: p_init_msg_list => OKC_API.G_FALSE,

2064: i := p_vipv_tbl.FIRST;
2065: LOOP
2066: update_row (
2067: p_api_version => p_api_version,
2068: p_init_msg_list => OKC_API.G_FALSE,
2069: x_return_status => x_return_status,
2070: x_msg_count => x_msg_count,
2071: x_msg_data => x_msg_data,
2072: p_vipv_rec => p_vipv_tbl(i),

Line 2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2078: END IF;
2079: EXIT WHEN (i = p_vipv_tbl.LAST);
2080: i := p_vipv_tbl.NEXT(i);
2081: END LOOP;
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;

Line 2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2079: EXIT WHEN (i = p_vipv_tbl.LAST);
2080: i := p_vipv_tbl.NEXT(i);
2081: END LOOP;
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: END IF;

Line 2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2080: i := p_vipv_tbl.NEXT(i);
2081: END LOOP;
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: END IF;
2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2085: RAISE OKC_API.G_EXCEPTION_ERROR;

2081: END LOOP;
2082: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2083: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: END IF;
2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2089: EXCEPTION

Line 2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2084: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2085: RAISE OKC_API.G_EXCEPTION_ERROR;
2086: END IF;
2087: END IF;
2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2089: EXCEPTION
2090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2092: (

Line 2090: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2086: END IF;
2087: END IF;
2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2089: EXCEPTION
2090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2092: (
2093: l_api_name,
2094: G_PKG_NAME,

Line 2091: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2087: END IF;
2088: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2089: EXCEPTION
2090: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2092: (
2093: l_api_name,
2094: G_PKG_NAME,
2095: 'OKC_API.G_RET_STS_ERROR',

Line 2095: 'OKC_API.G_RET_STS_ERROR',

2091: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2092: (
2093: l_api_name,
2094: G_PKG_NAME,
2095: 'OKC_API.G_RET_STS_ERROR',
2096: x_msg_count,
2097: x_msg_data,
2098: '_PVT'
2099: );

Line 2100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2096: x_msg_count,
2097: x_msg_data,
2098: '_PVT'
2099: );
2100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2101: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2102: (
2103: l_api_name,
2104: G_PKG_NAME,

Line 2101: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2097: x_msg_data,
2098: '_PVT'
2099: );
2100: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2101: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2102: (
2103: l_api_name,
2104: G_PKG_NAME,
2105: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2105: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2101: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2102: (
2103: l_api_name,
2104: G_PKG_NAME,
2105: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2106: x_msg_count,
2107: x_msg_data,
2108: '_PVT'
2109: );

Line 2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2107: x_msg_data,
2108: '_PVT'
2109: );
2110: WHEN OTHERS THEN
2111: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2112: (
2113: l_api_name,
2114: G_PKG_NAME,
2115: 'OTHERS',

Line 2129: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

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,
2131: x_msg_count OUT NOCOPY NUMBER,
2132: x_msg_data OUT NOCOPY VARCHAR2,
2133: p_vip_rec IN vip_rec_type) IS

Line 2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2133: p_vip_rec IN vip_rec_type) IS
2134:
2135: l_api_version CONSTANT NUMBER := 1;
2136: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2138: l_vip_rec vip_rec_type := p_vip_rec;
2139: l_row_notfound BOOLEAN := TRUE;
2140: BEGIN
2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2137: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2138: l_vip_rec vip_rec_type := p_vip_rec;
2139: l_row_notfound BOOLEAN := TRUE;
2140: BEGIN
2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2142: p_init_msg_list,
2143: '_PVT',
2144: x_return_status);
2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2141: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2142: p_init_msg_list,
2143: '_PVT',
2144: x_return_status);
2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2148: RAISE OKC_API.G_EXCEPTION_ERROR;
2149: END IF;

Line 2146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2142: p_init_msg_list,
2143: '_PVT',
2144: x_return_status);
2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2148: RAISE OKC_API.G_EXCEPTION_ERROR;
2149: END IF;
2150:

Line 2147: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2143: '_PVT',
2144: x_return_status);
2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
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

Line 2148: RAISE OKC_API.G_EXCEPTION_ERROR;

2144: x_return_status);
2145: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2146: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
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;

Line 2155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

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);
2156: EXCEPTION
2157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2159: (

Line 2157: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2153:
2154: x_return_status := l_return_status;
2155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2156: EXCEPTION
2157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2159: (
2160: l_api_name,
2161: G_PKG_NAME,

Line 2158: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2154: x_return_status := l_return_status;
2155: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2156: EXCEPTION
2157: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2159: (
2160: l_api_name,
2161: G_PKG_NAME,
2162: 'OKC_API.G_RET_STS_ERROR',

Line 2162: 'OKC_API.G_RET_STS_ERROR',

2158: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2159: (
2160: l_api_name,
2161: G_PKG_NAME,
2162: 'OKC_API.G_RET_STS_ERROR',
2163: x_msg_count,
2164: x_msg_data,
2165: '_PVT'
2166: );

Line 2167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2163: x_msg_count,
2164: x_msg_data,
2165: '_PVT'
2166: );
2167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2169: (
2170: l_api_name,
2171: G_PKG_NAME,

Line 2168: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2164: x_msg_data,
2165: '_PVT'
2166: );
2167: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2169: (
2170: l_api_name,
2171: G_PKG_NAME,
2172: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2172: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2168: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2169: (
2170: l_api_name,
2171: G_PKG_NAME,
2172: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2173: x_msg_count,
2174: x_msg_data,
2175: '_PVT'
2176: );

Line 2178: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2174: x_msg_data,
2175: '_PVT'
2176: );
2177: WHEN OTHERS THEN
2178: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2179: (
2180: l_api_name,
2181: G_PKG_NAME,
2182: 'OTHERS',

Line 2193: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2189: -- delete_row for:OKL_VAR_INT_PROCESS_V --
2190: ------------------------------------------
2191: PROCEDURE delete_row(
2192: p_api_version IN NUMBER,
2193: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2194: x_return_status OUT NOCOPY VARCHAR2,
2195: x_msg_count OUT NOCOPY NUMBER,
2196: x_msg_data OUT NOCOPY VARCHAR2,
2197: p_vipv_rec IN vipv_rec_type) IS

Line 2201: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

2197: p_vipv_rec IN vipv_rec_type) IS
2198:
2199: l_api_version CONSTANT NUMBER := 1;
2200: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2201: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2202: l_vipv_rec vipv_rec_type := p_vipv_rec;
2203: l_vip_rec vip_rec_type;
2204: BEGIN
2205: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

Line 2205: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

2201: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2202: l_vipv_rec vipv_rec_type := p_vipv_rec;
2203: l_vip_rec vip_rec_type;
2204: BEGIN
2205: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2206: G_PKG_NAME,
2207: p_init_msg_list,
2208: l_api_version,
2209: p_api_version,

Line 2212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2208: l_api_version,
2209: p_api_version,
2210: '_PVT',
2211: x_return_status);
2212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;

Line 2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2209: p_api_version,
2210: '_PVT',
2211: x_return_status);
2212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: -----------------------------------------

Line 2214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2210: '_PVT',
2211: x_return_status);
2212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: -----------------------------------------
2218: -- Move VIEW record to "Child" records --

Line 2215: RAISE OKC_API.G_EXCEPTION_ERROR;

2211: x_return_status);
2212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2215: RAISE OKC_API.G_EXCEPTION_ERROR;
2216: END IF;
2217: -----------------------------------------
2218: -- Move VIEW record to "Child" records --
2219: -----------------------------------------

Line 2231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2227: x_msg_count,
2228: x_msg_data,
2229: l_vip_rec
2230: );
2231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2234: RAISE OKC_API.G_EXCEPTION_ERROR;
2235: END IF;

Line 2232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2228: x_msg_data,
2229: l_vip_rec
2230: );
2231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2234: RAISE OKC_API.G_EXCEPTION_ERROR;
2235: END IF;
2236: x_return_status := l_return_status;

Line 2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN

2229: l_vip_rec
2230: );
2231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2234: RAISE OKC_API.G_EXCEPTION_ERROR;
2235: END IF;
2236: x_return_status := l_return_status;
2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2234: RAISE OKC_API.G_EXCEPTION_ERROR;

2230: );
2231: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2232: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2234: RAISE OKC_API.G_EXCEPTION_ERROR;
2235: END IF;
2236: x_return_status := l_return_status;
2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2238: EXCEPTION

Line 2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2233: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2234: RAISE OKC_API.G_EXCEPTION_ERROR;
2235: END IF;
2236: x_return_status := l_return_status;
2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2238: EXCEPTION
2239: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2240: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2241: (

Line 2239: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2235: END IF;
2236: x_return_status := l_return_status;
2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2238: EXCEPTION
2239: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2240: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2241: (
2242: l_api_name,
2243: G_PKG_NAME,

Line 2240: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2236: x_return_status := l_return_status;
2237: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2238: EXCEPTION
2239: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2240: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2241: (
2242: l_api_name,
2243: G_PKG_NAME,
2244: 'OKC_API.G_RET_STS_ERROR',

Line 2244: 'OKC_API.G_RET_STS_ERROR',

2240: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2241: (
2242: l_api_name,
2243: G_PKG_NAME,
2244: 'OKC_API.G_RET_STS_ERROR',
2245: x_msg_count,
2246: x_msg_data,
2247: '_PVT'
2248: );

Line 2249: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2245: x_msg_count,
2246: x_msg_data,
2247: '_PVT'
2248: );
2249: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,

Line 2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2246: x_msg_data,
2247: '_PVT'
2248: );
2249: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,
2254: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2254: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2250: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2251: (
2252: l_api_name,
2253: G_PKG_NAME,
2254: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2255: x_msg_count,
2256: x_msg_data,
2257: '_PVT'
2258: );

Line 2260: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2256: x_msg_data,
2257: '_PVT'
2258: );
2259: WHEN OTHERS THEN
2260: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2261: (
2262: l_api_name,
2263: G_PKG_NAME,
2264: 'OTHERS',

Line 2275: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,

2271: -- PL/SQL TBL delete_row for:OKL_VAR_INT_PROCESS_V --
2272: -----------------------------------------------------
2273: PROCEDURE delete_row(
2274: p_api_version IN NUMBER,
2275: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2276: x_return_status OUT NOCOPY VARCHAR2,
2277: x_msg_count OUT NOCOPY NUMBER,
2278: x_msg_data OUT NOCOPY VARCHAR2,
2279: p_vipv_tbl IN vipv_tbl_type) IS

Line 2285: OKC_API.init_msg_list(p_init_msg_list);

2281: l_api_version CONSTANT NUMBER := 1;
2282: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2283: i NUMBER := 0;
2284: BEGIN
2285: OKC_API.init_msg_list(p_init_msg_list);
2286: -- Make sure PL/SQL table has records in it before passing
2287: IF (p_vipv_tbl.COUNT > 0) THEN
2288: i := p_vipv_tbl.FIRST;
2289: LOOP

Line 2292: p_init_msg_list => OKC_API.G_FALSE,

2288: i := p_vipv_tbl.FIRST;
2289: LOOP
2290: delete_row (
2291: p_api_version => p_api_version,
2292: p_init_msg_list => OKC_API.G_FALSE,
2293: x_return_status => x_return_status,
2294: x_msg_count => x_msg_count,
2295: x_msg_data => x_msg_data,
2296: p_vipv_rec => p_vipv_tbl(i));

Line 2305: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

2301: END IF;
2302: EXIT WHEN (i = p_vipv_tbl.LAST);
2303: i := p_vipv_tbl.NEXT(i);
2304: END LOOP;
2305: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2306: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2308: RAISE OKC_API.G_EXCEPTION_ERROR;
2309: END IF;

Line 2306: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2302: EXIT WHEN (i = p_vipv_tbl.LAST);
2303: i := p_vipv_tbl.NEXT(i);
2304: END LOOP;
2305: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2306: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2308: RAISE OKC_API.G_EXCEPTION_ERROR;
2309: END IF;
2310: END IF;

Line 2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN

2303: i := p_vipv_tbl.NEXT(i);
2304: END LOOP;
2305: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2306: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2308: RAISE OKC_API.G_EXCEPTION_ERROR;
2309: END IF;
2310: END IF;
2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2308: RAISE OKC_API.G_EXCEPTION_ERROR;

2304: END LOOP;
2305: IF (x_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2306: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2308: RAISE OKC_API.G_EXCEPTION_ERROR;
2309: END IF;
2310: END IF;
2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2312: EXCEPTION

Line 2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

2307: ELSIF (x_return_status = OKC_API.G_RET_STS_ERROR) THEN
2308: RAISE OKC_API.G_EXCEPTION_ERROR;
2309: END IF;
2310: END IF;
2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2312: EXCEPTION
2313: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2314: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2315: (

Line 2313: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2309: END IF;
2310: END IF;
2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2312: EXCEPTION
2313: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2314: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2315: (
2316: l_api_name,
2317: G_PKG_NAME,

Line 2314: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2310: END IF;
2311: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2312: EXCEPTION
2313: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2314: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2315: (
2316: l_api_name,
2317: G_PKG_NAME,
2318: 'OKC_API.G_RET_STS_ERROR',

Line 2318: 'OKC_API.G_RET_STS_ERROR',

2314: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2315: (
2316: l_api_name,
2317: G_PKG_NAME,
2318: 'OKC_API.G_RET_STS_ERROR',
2319: x_msg_count,
2320: x_msg_data,
2321: '_PVT'
2322: );

Line 2323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2319: x_msg_count,
2320: x_msg_data,
2321: '_PVT'
2322: );
2323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2325: (
2326: l_api_name,
2327: G_PKG_NAME,

Line 2324: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2320: x_msg_data,
2321: '_PVT'
2322: );
2323: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2325: (
2326: l_api_name,
2327: G_PKG_NAME,
2328: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2328: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2324: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2325: (
2326: l_api_name,
2327: G_PKG_NAME,
2328: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2329: x_msg_count,
2330: x_msg_data,
2331: '_PVT'
2332: );

Line 2334: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2330: x_msg_data,
2331: '_PVT'
2332: );
2333: WHEN OTHERS THEN
2334: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2335: (
2336: l_api_name,
2337: G_PKG_NAME,
2338: 'OTHERS',