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_CBL_PVT dependencies on OKL_API

Line 7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,

3: ---------------------------------------------------------------------------
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;

Line 8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;
12: l_msg_idx INTEGER := FND_MSG_PUB.G_NEXT;

Line 40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.

36: ---------------------------------------------------------------------------
37: -- FUNCTION find_highest_exception
38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

Line 42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE

38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN

Line 44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;

Line 50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;

Line 51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN

47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;
55: EXIT WHEN (i = p_error_tbl.LAST);

Line 210: x_return_status := OKL_API.G_RET_STS_SUCCESS;

206: ) RETURN cblv_rec_type IS
207: l_cblv_rec cblv_rec_type;
208: l_row_notfound BOOLEAN := TRUE;
209: BEGIN
210: x_return_status := OKL_API.G_RET_STS_SUCCESS;
211: l_cblv_rec := get_rec(p_cblv_rec, l_row_notfound);
212: IF (l_row_notfound) THEN
213: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
214: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 213: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

209: BEGIN
210: x_return_status := OKL_API.G_RET_STS_SUCCESS;
211: l_cblv_rec := get_rec(p_cblv_rec, l_row_notfound);
212: IF (l_row_notfound) THEN
213: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
214: x_return_status := OKL_API.G_RET_STS_ERROR;
215: END IF;
216: RETURN(l_cblv_rec);
217: END get_rec;

Line 214: x_return_status := OKL_API.G_RET_STS_ERROR;

210: x_return_status := OKL_API.G_RET_STS_SUCCESS;
211: l_cblv_rec := get_rec(p_cblv_rec, l_row_notfound);
212: IF (l_row_notfound) THEN
213: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
214: x_return_status := OKL_API.G_RET_STS_ERROR;
215: END IF;
216: RETURN(l_cblv_rec);
217: END get_rec;
218: -----------------------------------------------------------

Line 345: x_return_status := OKL_API.G_RET_STS_SUCCESS;

341: ) RETURN cbl_rec_type IS
342: l_cbl_rec cbl_rec_type;
343: l_row_notfound BOOLEAN := TRUE;
344: BEGIN
345: x_return_status := OKL_API.G_RET_STS_SUCCESS;
346: l_cbl_rec := get_rec(p_cbl_rec, l_row_notfound);
347: IF (l_row_notfound) THEN
348: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
349: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 348: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');

344: BEGIN
345: x_return_status := OKL_API.G_RET_STS_SUCCESS;
346: l_cbl_rec := get_rec(p_cbl_rec, l_row_notfound);
347: IF (l_row_notfound) THEN
348: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
349: x_return_status := OKL_API.G_RET_STS_ERROR;
350: END IF;
351: RETURN(l_cbl_rec);
352: END get_rec;

Line 349: x_return_status := OKL_API.G_RET_STS_ERROR;

345: x_return_status := OKL_API.G_RET_STS_SUCCESS;
346: l_cbl_rec := get_rec(p_cbl_rec, l_row_notfound);
347: IF (l_row_notfound) THEN
348: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
349: x_return_status := OKL_API.G_RET_STS_ERROR;
350: END IF;
351: RETURN(l_cbl_rec);
352: END get_rec;
353: -----------------------------------------------------------

Line 371: IF (l_cblv_rec.id = OKL_API.G_MISS_NUM ) THEN

367: p_cblv_rec IN cblv_rec_type
368: ) RETURN cblv_rec_type IS
369: l_cblv_rec cblv_rec_type := p_cblv_rec;
370: BEGIN
371: IF (l_cblv_rec.id = OKL_API.G_MISS_NUM ) THEN
372: l_cblv_rec.id := NULL;
373: END IF;
374: IF (l_cblv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
375: l_cblv_rec.khr_id := NULL;

Line 374: IF (l_cblv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN

370: BEGIN
371: IF (l_cblv_rec.id = OKL_API.G_MISS_NUM ) THEN
372: l_cblv_rec.id := NULL;
373: END IF;
374: IF (l_cblv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
375: l_cblv_rec.khr_id := NULL;
376: END IF;
377: IF (l_cblv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
378: l_cblv_rec.kle_id := NULL;

Line 377: IF (l_cblv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN

373: END IF;
374: IF (l_cblv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
375: l_cblv_rec.khr_id := NULL;
376: END IF;
377: IF (l_cblv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
378: l_cblv_rec.kle_id := NULL;
379: END IF;
380: IF (l_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM ) THEN
381: l_cblv_rec.actual_principal_balance_amt := NULL;

Line 380: IF (l_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM ) THEN

376: END IF;
377: IF (l_cblv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
378: l_cblv_rec.kle_id := NULL;
379: END IF;
380: IF (l_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM ) THEN
381: l_cblv_rec.actual_principal_balance_amt := NULL;
382: END IF;
383: IF (l_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE ) THEN
384: l_cblv_rec.actual_principal_balance_date := NULL;

Line 383: IF (l_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE ) THEN

379: END IF;
380: IF (l_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM ) THEN
381: l_cblv_rec.actual_principal_balance_amt := NULL;
382: END IF;
383: IF (l_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE ) THEN
384: l_cblv_rec.actual_principal_balance_date := NULL;
385: END IF;
386: IF (l_cblv_rec.interest_amt = OKL_API.G_MISS_NUM ) THEN
387: l_cblv_rec.interest_amt := NULL;

Line 386: IF (l_cblv_rec.interest_amt = OKL_API.G_MISS_NUM ) THEN

382: END IF;
383: IF (l_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE ) THEN
384: l_cblv_rec.actual_principal_balance_date := NULL;
385: END IF;
386: IF (l_cblv_rec.interest_amt = OKL_API.G_MISS_NUM ) THEN
387: l_cblv_rec.interest_amt := NULL;
388: END IF;
389: IF (l_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE ) THEN
390: l_cblv_rec.interest_calc_date := NULL;

Line 389: IF (l_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE ) THEN

385: END IF;
386: IF (l_cblv_rec.interest_amt = OKL_API.G_MISS_NUM ) THEN
387: l_cblv_rec.interest_amt := NULL;
388: END IF;
389: IF (l_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE ) THEN
390: l_cblv_rec.interest_calc_date := NULL;
391: END IF;
392: IF (l_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM ) THEN
393: l_cblv_rec.interest_accrued_amt := NULL;

Line 392: IF (l_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM ) THEN

388: END IF;
389: IF (l_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE ) THEN
390: l_cblv_rec.interest_calc_date := NULL;
391: END IF;
392: IF (l_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM ) THEN
393: l_cblv_rec.interest_accrued_amt := NULL;
394: END IF;
395: IF (l_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE ) THEN
396: l_cblv_rec.interest_accrued_date := NULL;

Line 395: IF (l_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE ) THEN

391: END IF;
392: IF (l_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM ) THEN
393: l_cblv_rec.interest_accrued_amt := NULL;
394: END IF;
395: IF (l_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE ) THEN
396: l_cblv_rec.interest_accrued_date := NULL;
397: END IF;
398: IF (l_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM ) THEN
399: l_cblv_rec.interest_billed_amt := NULL;

Line 398: IF (l_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM ) THEN

394: END IF;
395: IF (l_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE ) THEN
396: l_cblv_rec.interest_accrued_date := NULL;
397: END IF;
398: IF (l_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM ) THEN
399: l_cblv_rec.interest_billed_amt := NULL;
400: END IF;
401: IF (l_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE ) THEN
402: l_cblv_rec.interest_billed_date := NULL;

Line 401: IF (l_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE ) THEN

397: END IF;
398: IF (l_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM ) THEN
399: l_cblv_rec.interest_billed_amt := NULL;
400: END IF;
401: IF (l_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE ) THEN
402: l_cblv_rec.interest_billed_date := NULL;
403: END IF;
404: IF (l_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM ) THEN
405: l_cblv_rec.interest_received_amt := NULL;

Line 404: IF (l_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM ) THEN

400: END IF;
401: IF (l_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE ) THEN
402: l_cblv_rec.interest_billed_date := NULL;
403: END IF;
404: IF (l_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM ) THEN
405: l_cblv_rec.interest_received_amt := NULL;
406: END IF;
407: IF (l_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE ) THEN
408: l_cblv_rec.interest_received_date := NULL;

Line 407: IF (l_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE ) THEN

403: END IF;
404: IF (l_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM ) THEN
405: l_cblv_rec.interest_received_amt := NULL;
406: END IF;
407: IF (l_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE ) THEN
408: l_cblv_rec.interest_received_date := NULL;
409: END IF;
410: IF (l_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM ) THEN
411: l_cblv_rec.termination_value_amt := NULL;

Line 410: IF (l_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM ) THEN

406: END IF;
407: IF (l_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE ) THEN
408: l_cblv_rec.interest_received_date := NULL;
409: END IF;
410: IF (l_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM ) THEN
411: l_cblv_rec.termination_value_amt := NULL;
412: END IF;
413: IF (l_cblv_rec.termination_date = OKL_API.G_MISS_DATE ) THEN
414: l_cblv_rec.termination_date := NULL;

Line 413: IF (l_cblv_rec.termination_date = OKL_API.G_MISS_DATE ) THEN

409: END IF;
410: IF (l_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM ) THEN
411: l_cblv_rec.termination_value_amt := NULL;
412: END IF;
413: IF (l_cblv_rec.termination_date = OKL_API.G_MISS_DATE ) THEN
414: l_cblv_rec.termination_date := NULL;
415: END IF;
416: IF (l_cblv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
417: l_cblv_rec.object_version_number := NULL;

Line 416: IF (l_cblv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN

412: END IF;
413: IF (l_cblv_rec.termination_date = OKL_API.G_MISS_DATE ) THEN
414: l_cblv_rec.termination_date := NULL;
415: END IF;
416: IF (l_cblv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
417: l_cblv_rec.object_version_number := NULL;
418: END IF;
419: IF (l_cblv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
420: l_cblv_rec.org_id := NULL;

Line 419: IF (l_cblv_rec.org_id = OKL_API.G_MISS_NUM ) THEN

415: END IF;
416: IF (l_cblv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
417: l_cblv_rec.object_version_number := NULL;
418: END IF;
419: IF (l_cblv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
420: l_cblv_rec.org_id := NULL;
421: END IF;
422: IF (l_cblv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
423: l_cblv_rec.request_id := NULL;

Line 422: IF (l_cblv_rec.request_id = OKL_API.G_MISS_NUM ) THEN

418: END IF;
419: IF (l_cblv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
420: l_cblv_rec.org_id := NULL;
421: END IF;
422: IF (l_cblv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
423: l_cblv_rec.request_id := NULL;
424: END IF;
425: IF (l_cblv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
426: l_cblv_rec.program_application_id := NULL;

Line 425: IF (l_cblv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN

421: END IF;
422: IF (l_cblv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
423: l_cblv_rec.request_id := NULL;
424: END IF;
425: IF (l_cblv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
426: l_cblv_rec.program_application_id := NULL;
427: END IF;
428: IF (l_cblv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
429: l_cblv_rec.program_id := NULL;

Line 428: IF (l_cblv_rec.program_id = OKL_API.G_MISS_NUM ) THEN

424: END IF;
425: IF (l_cblv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
426: l_cblv_rec.program_application_id := NULL;
427: END IF;
428: IF (l_cblv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
429: l_cblv_rec.program_id := NULL;
430: END IF;
431: IF (l_cblv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
432: l_cblv_rec.program_update_date := NULL;

Line 431: IF (l_cblv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN

427: END IF;
428: IF (l_cblv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
429: l_cblv_rec.program_id := NULL;
430: END IF;
431: IF (l_cblv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
432: l_cblv_rec.program_update_date := NULL;
433: END IF;
434: IF (l_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
435: l_cblv_rec.attribute_category := NULL;

Line 434: IF (l_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN

430: END IF;
431: IF (l_cblv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
432: l_cblv_rec.program_update_date := NULL;
433: END IF;
434: IF (l_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
435: l_cblv_rec.attribute_category := NULL;
436: END IF;
437: IF (l_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
438: l_cblv_rec.attribute1 := NULL;

Line 437: IF (l_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN

433: END IF;
434: IF (l_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
435: l_cblv_rec.attribute_category := NULL;
436: END IF;
437: IF (l_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
438: l_cblv_rec.attribute1 := NULL;
439: END IF;
440: IF (l_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
441: l_cblv_rec.attribute2 := NULL;

Line 440: IF (l_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN

436: END IF;
437: IF (l_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
438: l_cblv_rec.attribute1 := NULL;
439: END IF;
440: IF (l_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
441: l_cblv_rec.attribute2 := NULL;
442: END IF;
443: IF (l_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
444: l_cblv_rec.attribute3 := NULL;

Line 443: IF (l_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN

439: END IF;
440: IF (l_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
441: l_cblv_rec.attribute2 := NULL;
442: END IF;
443: IF (l_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
444: l_cblv_rec.attribute3 := NULL;
445: END IF;
446: IF (l_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
447: l_cblv_rec.attribute4 := NULL;

Line 446: IF (l_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN

442: END IF;
443: IF (l_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
444: l_cblv_rec.attribute3 := NULL;
445: END IF;
446: IF (l_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
447: l_cblv_rec.attribute4 := NULL;
448: END IF;
449: IF (l_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
450: l_cblv_rec.attribute5 := NULL;

Line 449: IF (l_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN

445: END IF;
446: IF (l_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
447: l_cblv_rec.attribute4 := NULL;
448: END IF;
449: IF (l_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
450: l_cblv_rec.attribute5 := NULL;
451: END IF;
452: IF (l_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
453: l_cblv_rec.attribute6 := NULL;

Line 452: IF (l_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN

448: END IF;
449: IF (l_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
450: l_cblv_rec.attribute5 := NULL;
451: END IF;
452: IF (l_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
453: l_cblv_rec.attribute6 := NULL;
454: END IF;
455: IF (l_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
456: l_cblv_rec.attribute7 := NULL;

Line 455: IF (l_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN

451: END IF;
452: IF (l_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
453: l_cblv_rec.attribute6 := NULL;
454: END IF;
455: IF (l_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
456: l_cblv_rec.attribute7 := NULL;
457: END IF;
458: IF (l_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
459: l_cblv_rec.attribute8 := NULL;

Line 458: IF (l_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN

454: END IF;
455: IF (l_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
456: l_cblv_rec.attribute7 := NULL;
457: END IF;
458: IF (l_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
459: l_cblv_rec.attribute8 := NULL;
460: END IF;
461: IF (l_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
462: l_cblv_rec.attribute9 := NULL;

Line 461: IF (l_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN

457: END IF;
458: IF (l_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
459: l_cblv_rec.attribute8 := NULL;
460: END IF;
461: IF (l_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
462: l_cblv_rec.attribute9 := NULL;
463: END IF;
464: IF (l_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
465: l_cblv_rec.attribute10 := NULL;

Line 464: IF (l_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN

460: END IF;
461: IF (l_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
462: l_cblv_rec.attribute9 := NULL;
463: END IF;
464: IF (l_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
465: l_cblv_rec.attribute10 := NULL;
466: END IF;
467: IF (l_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
468: l_cblv_rec.attribute11 := NULL;

Line 467: IF (l_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN

463: END IF;
464: IF (l_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
465: l_cblv_rec.attribute10 := NULL;
466: END IF;
467: IF (l_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
468: l_cblv_rec.attribute11 := NULL;
469: END IF;
470: IF (l_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
471: l_cblv_rec.attribute12 := NULL;

Line 470: IF (l_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN

466: END IF;
467: IF (l_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
468: l_cblv_rec.attribute11 := NULL;
469: END IF;
470: IF (l_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
471: l_cblv_rec.attribute12 := NULL;
472: END IF;
473: IF (l_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
474: l_cblv_rec.attribute13 := NULL;

Line 473: IF (l_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN

469: END IF;
470: IF (l_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
471: l_cblv_rec.attribute12 := NULL;
472: END IF;
473: IF (l_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
474: l_cblv_rec.attribute13 := NULL;
475: END IF;
476: IF (l_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
477: l_cblv_rec.attribute14 := NULL;

Line 476: IF (l_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN

472: END IF;
473: IF (l_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
474: l_cblv_rec.attribute13 := NULL;
475: END IF;
476: IF (l_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
477: l_cblv_rec.attribute14 := NULL;
478: END IF;
479: IF (l_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
480: l_cblv_rec.attribute15 := NULL;

Line 479: IF (l_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN

475: END IF;
476: IF (l_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
477: l_cblv_rec.attribute14 := NULL;
478: END IF;
479: IF (l_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
480: l_cblv_rec.attribute15 := NULL;
481: END IF;
482: IF (l_cblv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
483: l_cblv_rec.created_by := NULL;

Line 482: IF (l_cblv_rec.created_by = OKL_API.G_MISS_NUM ) THEN

478: END IF;
479: IF (l_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
480: l_cblv_rec.attribute15 := NULL;
481: END IF;
482: IF (l_cblv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
483: l_cblv_rec.created_by := NULL;
484: END IF;
485: IF (l_cblv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
486: l_cblv_rec.creation_date := NULL;

Line 485: IF (l_cblv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN

481: END IF;
482: IF (l_cblv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
483: l_cblv_rec.created_by := NULL;
484: END IF;
485: IF (l_cblv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
486: l_cblv_rec.creation_date := NULL;
487: END IF;
488: IF (l_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
489: l_cblv_rec.last_updated_by := NULL;

Line 488: IF (l_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN

484: END IF;
485: IF (l_cblv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
486: l_cblv_rec.creation_date := NULL;
487: END IF;
488: IF (l_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
489: l_cblv_rec.last_updated_by := NULL;
490: END IF;
491: IF (l_cblv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
492: l_cblv_rec.last_update_date := NULL;

Line 491: IF (l_cblv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN

487: END IF;
488: IF (l_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
489: l_cblv_rec.last_updated_by := NULL;
490: END IF;
491: IF (l_cblv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
492: l_cblv_rec.last_update_date := NULL;
493: END IF;
494: IF (l_cblv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
495: l_cblv_rec.last_update_login := NULL;

Line 494: IF (l_cblv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN

490: END IF;
491: IF (l_cblv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
492: l_cblv_rec.last_update_date := NULL;
493: END IF;
494: IF (l_cblv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
495: l_cblv_rec.last_update_login := NULL;
496: END IF;
497: RETURN(l_cblv_rec);
498: END null_out_defaults;

Line 506: x_return_status := OKL_API.G_RET_STS_SUCCESS;

502: PROCEDURE validate_id(
503: x_return_status OUT NOCOPY VARCHAR2,
504: p_id IN NUMBER) IS
505: BEGIN
506: x_return_status := OKL_API.G_RET_STS_SUCCESS;
507: IF (p_id = OKL_API.G_MISS_NUM OR
508: p_id IS NULL)
509: THEN
510: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

Line 507: IF (p_id = OKL_API.G_MISS_NUM OR

503: x_return_status OUT NOCOPY VARCHAR2,
504: p_id IN NUMBER) IS
505: BEGIN
506: x_return_status := OKL_API.G_RET_STS_SUCCESS;
507: IF (p_id = OKL_API.G_MISS_NUM OR
508: p_id IS NULL)
509: THEN
510: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
511: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 510: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');

506: x_return_status := OKL_API.G_RET_STS_SUCCESS;
507: IF (p_id = OKL_API.G_MISS_NUM OR
508: p_id IS NULL)
509: THEN
510: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
511: x_return_status := OKL_API.G_RET_STS_ERROR;
512: RAISE G_EXCEPTION_HALT_VALIDATION;
513: END IF;
514: EXCEPTION

Line 511: x_return_status := OKL_API.G_RET_STS_ERROR;

507: IF (p_id = OKL_API.G_MISS_NUM OR
508: p_id IS NULL)
509: THEN
510: OKL_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
511: x_return_status := OKL_API.G_RET_STS_ERROR;
512: RAISE G_EXCEPTION_HALT_VALIDATION;
513: END IF;
514: EXCEPTION
515: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 518: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

514: EXCEPTION
515: WHEN G_EXCEPTION_HALT_VALIDATION THEN
516: null;
517: WHEN OTHERS THEN
518: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
519: ,p_msg_name => G_UNEXPECTED_ERROR
520: ,p_token1 => G_SQLCODE_TOKEN
521: ,p_token1_value => SQLCODE
522: ,p_token2 => G_SQLERRM_TOKEN

Line 524: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

520: ,p_token1 => G_SQLCODE_TOKEN
521: ,p_token1_value => SQLCODE
522: ,p_token2 => G_SQLERRM_TOKEN
523: ,p_token2_value => SQLERRM);
524: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
525: END validate_id;
526:
527: -- smadhava added validation of other fields in the table on 29-Jul-05 - Start
528: ---------------------------------

Line 542: x_return_status := OKL_API.G_RET_STS_SUCCESS;

538: FROM OKL_K_HEADERS
539: WHERE id = p_khr_id;
540:
541: BEGIN
542: x_return_status := OKL_API.G_RET_STS_SUCCESS;
543:
544: IF (p_khr_id = OKL_API.G_MISS_NUM OR p_khr_id IS NULL) THEN
545: OKL_API.set_message(G_APP_NAME,
546: G_REQUIRED_VALUE,

Line 544: IF (p_khr_id = OKL_API.G_MISS_NUM OR p_khr_id IS NULL) THEN

540:
541: BEGIN
542: x_return_status := OKL_API.G_RET_STS_SUCCESS;
543:
544: IF (p_khr_id = OKL_API.G_MISS_NUM OR p_khr_id IS NULL) THEN
545: OKL_API.set_message(G_APP_NAME,
546: G_REQUIRED_VALUE,
547: G_COL_NAME_TOKEN,
548: 'khr_id');

Line 545: OKL_API.set_message(G_APP_NAME,

541: BEGIN
542: x_return_status := OKL_API.G_RET_STS_SUCCESS;
543:
544: IF (p_khr_id = OKL_API.G_MISS_NUM OR p_khr_id IS NULL) THEN
545: OKL_API.set_message(G_APP_NAME,
546: G_REQUIRED_VALUE,
547: G_COL_NAME_TOKEN,
548: 'khr_id');
549: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 549: x_return_status := OKL_API.G_RET_STS_ERROR;

545: OKL_API.set_message(G_APP_NAME,
546: G_REQUIRED_VALUE,
547: G_COL_NAME_TOKEN,
548: 'khr_id');
549: x_return_status := OKL_API.G_RET_STS_ERROR;
550: RAISE G_EXCEPTION_HALT_VALIDATION;
551: END IF;
552: OPEN chk_khr_id(p_khr_id);
553: FETCH chk_khr_id INTO l_khr_id ;

Line 556: OKL_API.set_message(G_APP_NAME,

552: OPEN chk_khr_id(p_khr_id);
553: FETCH chk_khr_id INTO l_khr_id ;
554:
555: IF chk_khr_id%NOTFOUND THEN
556: OKL_API.set_message(G_APP_NAME,
557: G_INVALID_VALUE,
558: G_COL_NAME_TOKEN,
559: 'khr_id');
560: x_return_status := OKL_API.G_RET_STS_ERROR;

Line 560: x_return_status := OKL_API.G_RET_STS_ERROR;

556: OKL_API.set_message(G_APP_NAME,
557: G_INVALID_VALUE,
558: G_COL_NAME_TOKEN,
559: 'khr_id');
560: x_return_status := OKL_API.G_RET_STS_ERROR;
561: RAISE G_EXCEPTION_HALT_VALIDATION;
562: END IF;
563: CLOSE chk_khr_id;
564: EXCEPTION

Line 568: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,

564: EXCEPTION
565: WHEN G_EXCEPTION_HALT_VALIDATION THEN
566: NULL;
567: WHEN OTHERS THEN
568: OKL_API.SET_MESSAGE(p_app_name => G_APP_NAME,
569: p_msg_name => G_UNEXPECTED_ERROR,
570: p_token1 => G_SQLCODE_TOKEN,
571: p_token1_value => SQLCODE,
572: p_token2 => G_SQLERRM_TOKEN,

Line 574: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

570: p_token1 => G_SQLCODE_TOKEN,
571: p_token1_value => SQLCODE,
572: p_token2 => G_SQLERRM_TOKEN,
573: p_token2_value => SQLERRM);
574: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
575: END validate_khr_id;
576:
577: -- smadhava added validation of other fields in the table on 29-Jul-05 - End
578:

Line 588: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

584: -----------------------------------------------------
585: FUNCTION Validate_Attributes (
586: p_cblv_rec IN cblv_rec_type
587: ) RETURN VARCHAR2 IS
588: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
589: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
590: BEGIN
591: -----------------------------
592: -- Column Level Validation --

Line 589: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

585: FUNCTION Validate_Attributes (
586: p_cblv_rec IN cblv_rec_type
587: ) RETURN VARCHAR2 IS
588: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
589: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
590: BEGIN
591: -----------------------------
592: -- Column Level Validation --
593: -----------------------------

Line 598: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

594: -- ***
595: -- id
596: -- ***
597: validate_id(x_return_status, p_cblv_rec.id);
598: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
599: l_return_status := x_return_status;
600: RAISE G_EXCEPTION_HALT_VALIDATION;
601: END IF;
602:

Line 610: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN

606: -- ***
607:
608: validate_khr_id(x_return_status, p_cblv_rec.khr_id);
609:
610: IF (x_return_status <> OKL_API.G_RET_STS_SUCCESS) THEN
611: l_return_status := x_return_status;
612: RAISE G_EXCEPTION_HALT_VALIDATION;
613: END IF;
614:

Line 622: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME

618: EXCEPTION
619: WHEN G_EXCEPTION_HALT_VALIDATION THEN
620: RETURN(l_return_status);
621: WHEN OTHERS THEN
622: OKL_API.SET_MESSAGE( p_app_name => G_APP_NAME
623: ,p_msg_name => G_UNEXPECTED_ERROR
624: ,p_token1 => G_SQLCODE_TOKEN
625: ,p_token1_value => SQLCODE
626: ,p_token2 => G_SQLERRM_TOKEN

Line 628: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;

624: ,p_token1 => G_SQLCODE_TOKEN
625: ,p_token1_value => SQLCODE
626: ,p_token2 => G_SQLERRM_TOKEN
627: ,p_token2_value => SQLERRM);
628: l_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
629: RETURN(l_return_status);
630: END Validate_Attributes;
631: ---------------------------------------------------------------------------
632: -- PROCEDURE Validate_Record

Line 641: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

637: FUNCTION Validate_Record (
638: p_cblv_rec IN cblv_rec_type,
639: p_db_cblv_rec IN cblv_rec_type
640: ) RETURN VARCHAR2 IS
641: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
642: BEGIN
643: RETURN (l_return_status);
644: END Validate_Record;
645: FUNCTION Validate_Record (

Line 648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

644: END Validate_Record;
645: FUNCTION Validate_Record (
646: p_cblv_rec IN cblv_rec_type
647: ) RETURN VARCHAR2 IS
648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
649: l_db_cblv_rec cblv_rec_type := get_rec(p_cblv_rec);
650: BEGIN
651: l_return_status := Validate_Record(p_cblv_rec => p_cblv_rec,
652: p_db_cblv_rec => l_db_cblv_rec);

Line 763: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

759: -- validate_row for:OKL_CONTRACT_BALANCES_V --
760: ----------------------------------------------
761: PROCEDURE validate_row(
762: p_api_version IN NUMBER,
763: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
764: x_return_status OUT NOCOPY VARCHAR2,
765: x_msg_count OUT NOCOPY NUMBER,
766: x_msg_data OUT NOCOPY VARCHAR2,
767: p_cblv_rec IN cblv_rec_type) IS

Line 771: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

767: p_cblv_rec IN cblv_rec_type) IS
768:
769: l_api_version CONSTANT NUMBER := 1;
770: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
771: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
772: l_cblv_rec cblv_rec_type := p_cblv_rec;
773: l_cbl_rec cbl_rec_type;
774: l_cbl_rec cbl_rec_type;
775: BEGIN

Line 776: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

772: l_cblv_rec cblv_rec_type := p_cblv_rec;
773: l_cbl_rec cbl_rec_type;
774: l_cbl_rec cbl_rec_type;
775: BEGIN
776: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
777: G_PKG_NAME,
778: p_init_msg_list,
779: l_api_version,
780: p_api_version,

Line 783: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

779: l_api_version,
780: p_api_version,
781: 'PVT',
782: x_return_status);
783: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
784: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
785: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
786: RAISE OKL_API.G_EXCEPTION_ERROR;
787: END IF;

Line 784: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

780: p_api_version,
781: 'PVT',
782: x_return_status);
783: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
784: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
785: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
786: RAISE OKL_API.G_EXCEPTION_ERROR;
787: END IF;
788: --- Validate all non-missing attributes (Item Level Validation)

Line 785: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

781: 'PVT',
782: x_return_status);
783: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
784: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
785: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
786: RAISE OKL_API.G_EXCEPTION_ERROR;
787: END IF;
788: --- Validate all non-missing attributes (Item Level Validation)
789: l_return_status := Validate_Attributes(l_cblv_rec);

Line 786: RAISE OKL_API.G_EXCEPTION_ERROR;

782: x_return_status);
783: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
784: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
785: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
786: RAISE OKL_API.G_EXCEPTION_ERROR;
787: END IF;
788: --- Validate all non-missing attributes (Item Level Validation)
789: l_return_status := Validate_Attributes(l_cblv_rec);
790: --- If any errors happen abort API

Line 791: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

787: END IF;
788: --- Validate all non-missing attributes (Item Level Validation)
789: l_return_status := Validate_Attributes(l_cblv_rec);
790: --- If any errors happen abort API
791: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
792: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;

Line 792: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

788: --- Validate all non-missing attributes (Item Level Validation)
789: l_return_status := Validate_Attributes(l_cblv_rec);
790: --- If any errors happen abort API
791: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
792: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);

Line 793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

789: l_return_status := Validate_Attributes(l_cblv_rec);
790: --- If any errors happen abort API
791: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
792: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 794: RAISE OKL_API.G_EXCEPTION_ERROR;

790: --- If any errors happen abort API
791: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
792: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

793: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
799: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
800: RAISE OKL_API.G_EXCEPTION_ERROR;
801: END IF;

Line 798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

794: RAISE OKL_API.G_EXCEPTION_ERROR;
795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
799: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
800: RAISE OKL_API.G_EXCEPTION_ERROR;
801: END IF;
802: x_return_status := l_return_status;

Line 799: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

795: END IF;
796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
799: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
800: RAISE OKL_API.G_EXCEPTION_ERROR;
801: END IF;
802: x_return_status := l_return_status;
803: EXCEPTION

Line 800: RAISE OKL_API.G_EXCEPTION_ERROR;

796: l_return_status := Validate_Record(l_cblv_rec);
797: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
798: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
799: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
800: RAISE OKL_API.G_EXCEPTION_ERROR;
801: END IF;
802: x_return_status := l_return_status;
803: EXCEPTION
804: WHEN OKL_API.G_EXCEPTION_ERROR THEN

Line 804: WHEN OKL_API.G_EXCEPTION_ERROR THEN

800: RAISE OKL_API.G_EXCEPTION_ERROR;
801: END IF;
802: x_return_status := l_return_status;
803: EXCEPTION
804: WHEN OKL_API.G_EXCEPTION_ERROR THEN
805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
806: (
807: l_api_name,
808: G_PKG_NAME,

Line 805: x_return_status := OKL_API.HANDLE_EXCEPTIONS

801: END IF;
802: x_return_status := l_return_status;
803: EXCEPTION
804: WHEN OKL_API.G_EXCEPTION_ERROR THEN
805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
806: (
807: l_api_name,
808: G_PKG_NAME,
809: 'OKL_API.G_RET_STS_ERROR',

Line 809: 'OKL_API.G_RET_STS_ERROR',

805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
806: (
807: l_api_name,
808: G_PKG_NAME,
809: 'OKL_API.G_RET_STS_ERROR',
810: x_msg_count,
811: x_msg_data,
812: '_PVT'
813: );

Line 814: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

810: x_msg_count,
811: x_msg_data,
812: '_PVT'
813: );
814: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
815: x_return_status := OKL_API.HANDLE_EXCEPTIONS
816: (
817: l_api_name,
818: G_PKG_NAME,

Line 815: x_return_status := OKL_API.HANDLE_EXCEPTIONS

811: x_msg_data,
812: '_PVT'
813: );
814: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
815: x_return_status := OKL_API.HANDLE_EXCEPTIONS
816: (
817: l_api_name,
818: G_PKG_NAME,
819: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 819: 'OKL_API.G_RET_STS_UNEXP_ERROR',

815: x_return_status := OKL_API.HANDLE_EXCEPTIONS
816: (
817: l_api_name,
818: G_PKG_NAME,
819: 'OKL_API.G_RET_STS_UNEXP_ERROR',
820: x_msg_count,
821: x_msg_data,
822: '_PVT'
823: );

Line 825: x_return_status := OKL_API.HANDLE_EXCEPTIONS

821: x_msg_data,
822: '_PVT'
823: );
824: WHEN OTHERS THEN
825: x_return_status := OKL_API.HANDLE_EXCEPTIONS
826: (
827: l_api_name,
828: G_PKG_NAME,
829: 'OTHERS',

Line 840: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

836: -- PL/SQL TBL validate_row for:OKL_CONTRACT_BALANCES_V --
837: ---------------------------------------------------------
838: PROCEDURE validate_row(
839: p_api_version IN NUMBER,
840: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
841: x_return_status OUT NOCOPY VARCHAR2,
842: x_msg_count OUT NOCOPY NUMBER,
843: x_msg_data OUT NOCOPY VARCHAR2,
844: p_cblv_tbl IN cblv_tbl_type,

Line 845: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

841: x_return_status OUT NOCOPY VARCHAR2,
842: x_msg_count OUT NOCOPY NUMBER,
843: x_msg_data OUT NOCOPY VARCHAR2,
844: p_cblv_tbl IN cblv_tbl_type,
845: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
846:
847: l_api_version CONSTANT NUMBER := 1;
848: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
849: i NUMBER := 0;

Line 851: OKL_API.init_msg_list(p_init_msg_list);

847: l_api_version CONSTANT NUMBER := 1;
848: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
849: i NUMBER := 0;
850: BEGIN
851: OKL_API.init_msg_list(p_init_msg_list);
852: -- Make sure PL/SQL table has records in it before passing
853: IF (p_cblv_tbl.COUNT > 0) THEN
854: i := p_cblv_tbl.FIRST;
855: LOOP

Line 857: l_error_rec OKL_API.ERROR_REC_TYPE;

853: IF (p_cblv_tbl.COUNT > 0) THEN
854: i := p_cblv_tbl.FIRST;
855: LOOP
856: DECLARE
857: l_error_rec OKL_API.ERROR_REC_TYPE;
858: BEGIN
859: l_error_rec.api_name := l_api_name;
860: l_error_rec.api_package := G_PKG_NAME;
861: l_error_rec.idx := i;

Line 864: p_init_msg_list => OKL_API.G_FALSE,

860: l_error_rec.api_package := G_PKG_NAME;
861: l_error_rec.idx := i;
862: validate_row (
863: p_api_version => p_api_version,
864: p_init_msg_list => OKL_API.G_FALSE,
865: x_return_status => l_error_rec.error_type,
866: x_msg_count => l_error_rec.msg_count,
867: x_msg_data => l_error_rec.msg_data,
868: p_cblv_rec => p_cblv_tbl(i));

Line 869: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

865: x_return_status => l_error_rec.error_type,
866: x_msg_count => l_error_rec.msg_count,
867: x_msg_data => l_error_rec.msg_data,
868: p_cblv_rec => p_cblv_tbl(i));
869: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
870: l_error_rec.sqlcode := SQLCODE;
871: load_error_tbl(l_error_rec, px_error_tbl);
872: ELSE
873: x_msg_count := l_error_rec.msg_count;

Line 877: WHEN OKL_API.G_EXCEPTION_ERROR THEN

873: x_msg_count := l_error_rec.msg_count;
874: x_msg_data := l_error_rec.msg_data;
875: END IF;
876: EXCEPTION
877: WHEN OKL_API.G_EXCEPTION_ERROR THEN
878: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
879: l_error_rec.sqlcode := SQLCODE;
880: load_error_tbl(l_error_rec, px_error_tbl);
881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 878: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

874: x_msg_data := l_error_rec.msg_data;
875: END IF;
876: EXCEPTION
877: WHEN OKL_API.G_EXCEPTION_ERROR THEN
878: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
879: l_error_rec.sqlcode := SQLCODE;
880: load_error_tbl(l_error_rec, px_error_tbl);
881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
882: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

877: WHEN OKL_API.G_EXCEPTION_ERROR THEN
878: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
879: l_error_rec.sqlcode := SQLCODE;
880: load_error_tbl(l_error_rec, px_error_tbl);
881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
882: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
883: l_error_rec.sqlcode := SQLCODE;
884: load_error_tbl(l_error_rec, px_error_tbl);
885: WHEN OTHERS THEN

Line 882: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

878: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
879: l_error_rec.sqlcode := SQLCODE;
880: load_error_tbl(l_error_rec, px_error_tbl);
881: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
882: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
883: l_error_rec.sqlcode := SQLCODE;
884: load_error_tbl(l_error_rec, px_error_tbl);
885: WHEN OTHERS THEN
886: l_error_rec.error_type := 'OTHERS';

Line 897: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

893: END IF;
894: -- Loop through the error_tbl to find the error with the highest severity
895: -- and return it.
896: x_return_status := find_highest_exception(px_error_tbl);
897: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
898: EXCEPTION
899: WHEN OKL_API.G_EXCEPTION_ERROR THEN
900: x_return_status := OKL_API.HANDLE_EXCEPTIONS
901: (

Line 899: WHEN OKL_API.G_EXCEPTION_ERROR THEN

895: -- and return it.
896: x_return_status := find_highest_exception(px_error_tbl);
897: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
898: EXCEPTION
899: WHEN OKL_API.G_EXCEPTION_ERROR THEN
900: x_return_status := OKL_API.HANDLE_EXCEPTIONS
901: (
902: l_api_name,
903: G_PKG_NAME,

Line 900: x_return_status := OKL_API.HANDLE_EXCEPTIONS

896: x_return_status := find_highest_exception(px_error_tbl);
897: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
898: EXCEPTION
899: WHEN OKL_API.G_EXCEPTION_ERROR THEN
900: x_return_status := OKL_API.HANDLE_EXCEPTIONS
901: (
902: l_api_name,
903: G_PKG_NAME,
904: 'OKL_API.G_RET_STS_ERROR',

Line 904: 'OKL_API.G_RET_STS_ERROR',

900: x_return_status := OKL_API.HANDLE_EXCEPTIONS
901: (
902: l_api_name,
903: G_PKG_NAME,
904: 'OKL_API.G_RET_STS_ERROR',
905: x_msg_count,
906: x_msg_data,
907: '_PVT'
908: );

Line 909: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

905: x_msg_count,
906: x_msg_data,
907: '_PVT'
908: );
909: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
910: x_return_status := OKL_API.HANDLE_EXCEPTIONS
911: (
912: l_api_name,
913: G_PKG_NAME,

Line 910: x_return_status := OKL_API.HANDLE_EXCEPTIONS

906: x_msg_data,
907: '_PVT'
908: );
909: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
910: x_return_status := OKL_API.HANDLE_EXCEPTIONS
911: (
912: l_api_name,
913: G_PKG_NAME,
914: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 914: 'OKL_API.G_RET_STS_UNEXP_ERROR',

910: x_return_status := OKL_API.HANDLE_EXCEPTIONS
911: (
912: l_api_name,
913: G_PKG_NAME,
914: 'OKL_API.G_RET_STS_UNEXP_ERROR',
915: x_msg_count,
916: x_msg_data,
917: '_PVT'
918: );

Line 920: x_return_status := OKL_API.HANDLE_EXCEPTIONS

916: x_msg_data,
917: '_PVT'
918: );
919: WHEN OTHERS THEN
920: x_return_status := OKL_API.HANDLE_EXCEPTIONS
921: (
922: l_api_name,
923: G_PKG_NAME,
924: 'OTHERS',

Line 936: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

932: -- PL/SQL TBL validate_row for:OKL_CONTRACT_BALANCES_V --
933: ---------------------------------------------------------
934: PROCEDURE validate_row(
935: p_api_version IN NUMBER,
936: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
937: x_return_status OUT NOCOPY VARCHAR2,
938: x_msg_count OUT NOCOPY NUMBER,
939: x_msg_data OUT NOCOPY VARCHAR2,
940: p_cblv_tbl IN cblv_tbl_type) IS

Line 944: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

940: p_cblv_tbl IN cblv_tbl_type) IS
941:
942: l_api_version CONSTANT NUMBER := 1;
943: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
944: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
945: l_error_tbl OKL_API.ERROR_TBL_TYPE;
946: BEGIN
947: OKL_API.init_msg_list(p_init_msg_list);
948: -- Make sure PL/SQL table has records in it before passing

Line 945: l_error_tbl OKL_API.ERROR_TBL_TYPE;

941:
942: l_api_version CONSTANT NUMBER := 1;
943: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
944: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
945: l_error_tbl OKL_API.ERROR_TBL_TYPE;
946: BEGIN
947: OKL_API.init_msg_list(p_init_msg_list);
948: -- Make sure PL/SQL table has records in it before passing
949: IF (p_cblv_tbl.COUNT > 0) THEN

Line 947: OKL_API.init_msg_list(p_init_msg_list);

943: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
944: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
945: l_error_tbl OKL_API.ERROR_TBL_TYPE;
946: BEGIN
947: OKL_API.init_msg_list(p_init_msg_list);
948: -- Make sure PL/SQL table has records in it before passing
949: IF (p_cblv_tbl.COUNT > 0) THEN
950: validate_row (
951: p_api_version => p_api_version,

Line 952: p_init_msg_list => OKL_API.G_FALSE,

948: -- Make sure PL/SQL table has records in it before passing
949: IF (p_cblv_tbl.COUNT > 0) THEN
950: validate_row (
951: p_api_version => p_api_version,
952: p_init_msg_list => OKL_API.G_FALSE,
953: x_return_status => x_return_status,
954: x_msg_count => x_msg_count,
955: x_msg_data => x_msg_data,
956: p_cblv_tbl => p_cblv_tbl,

Line 959: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

955: x_msg_data => x_msg_data,
956: p_cblv_tbl => p_cblv_tbl,
957: px_error_tbl => l_error_tbl);
958: END IF;
959: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
960: EXCEPTION
961: WHEN OKL_API.G_EXCEPTION_ERROR THEN
962: x_return_status := OKL_API.HANDLE_EXCEPTIONS
963: (

Line 961: WHEN OKL_API.G_EXCEPTION_ERROR THEN

957: px_error_tbl => l_error_tbl);
958: END IF;
959: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
960: EXCEPTION
961: WHEN OKL_API.G_EXCEPTION_ERROR THEN
962: x_return_status := OKL_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,

Line 962: x_return_status := OKL_API.HANDLE_EXCEPTIONS

958: END IF;
959: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
960: EXCEPTION
961: WHEN OKL_API.G_EXCEPTION_ERROR THEN
962: x_return_status := OKL_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,
966: 'OKL_API.G_RET_STS_ERROR',

Line 966: 'OKL_API.G_RET_STS_ERROR',

962: x_return_status := OKL_API.HANDLE_EXCEPTIONS
963: (
964: l_api_name,
965: G_PKG_NAME,
966: 'OKL_API.G_RET_STS_ERROR',
967: x_msg_count,
968: x_msg_data,
969: '_PVT'
970: );

Line 971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

967: x_msg_count,
968: x_msg_data,
969: '_PVT'
970: );
971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
972: x_return_status := OKL_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,

Line 972: x_return_status := OKL_API.HANDLE_EXCEPTIONS

968: x_msg_data,
969: '_PVT'
970: );
971: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
972: x_return_status := OKL_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 976: 'OKL_API.G_RET_STS_UNEXP_ERROR',

972: x_return_status := OKL_API.HANDLE_EXCEPTIONS
973: (
974: l_api_name,
975: G_PKG_NAME,
976: 'OKL_API.G_RET_STS_UNEXP_ERROR',
977: x_msg_count,
978: x_msg_data,
979: '_PVT'
980: );

Line 982: x_return_status := OKL_API.HANDLE_EXCEPTIONS

978: x_msg_data,
979: '_PVT'
980: );
981: WHEN OTHERS THEN
982: x_return_status := OKL_API.HANDLE_EXCEPTIONS
983: (
984: l_api_name,
985: G_PKG_NAME,
986: 'OTHERS',

Line 1000: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

996: ------------------------------------------
997: -- insert_row for:OKL_CONTRACT_BALANCES --
998: ------------------------------------------
999: PROCEDURE insert_row(
1000: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1001: x_return_status OUT NOCOPY VARCHAR2,
1002: x_msg_count OUT NOCOPY NUMBER,
1003: x_msg_data OUT NOCOPY VARCHAR2,
1004: p_cbl_rec IN cbl_rec_type,

Line 1009: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1005: x_cbl_rec OUT NOCOPY cbl_rec_type) IS
1006:
1007: l_api_version CONSTANT NUMBER := 1;
1008: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
1009: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1010: l_cbl_rec cbl_rec_type := p_cbl_rec;
1011: l_def_cbl_rec cbl_rec_type;
1012: ----------------------------------------------
1013: -- Set_Attributes for:OKL_CONTRACT_BALANCES --

Line 1019: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1015: FUNCTION Set_Attributes (
1016: p_cbl_rec IN cbl_rec_type,
1017: x_cbl_rec OUT NOCOPY cbl_rec_type
1018: ) RETURN VARCHAR2 IS
1019: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1020: BEGIN
1021: x_cbl_rec := p_cbl_rec;
1022: RETURN(l_return_status);
1023: END Set_Attributes;

Line 1025: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1021: x_cbl_rec := p_cbl_rec;
1022: RETURN(l_return_status);
1023: END Set_Attributes;
1024: BEGIN
1025: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1026: p_init_msg_list,
1027: 'PVT',
1028: x_return_status);
1029: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

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

1025: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1026: p_init_msg_list,
1027: 'PVT',
1028: x_return_status);
1029: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1032: RAISE OKL_API.G_EXCEPTION_ERROR;
1033: END IF;

Line 1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1026: p_init_msg_list,
1027: 'PVT',
1028: x_return_status);
1029: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1032: RAISE OKL_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item atributes

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

1027: 'PVT',
1028: x_return_status);
1029: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1032: RAISE OKL_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item atributes
1035: l_return_status := Set_Attributes(

Line 1032: RAISE OKL_API.G_EXCEPTION_ERROR;

1028: x_return_status);
1029: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1030: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1031: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1032: RAISE OKL_API.G_EXCEPTION_ERROR;
1033: END IF;
1034: --- Setting item atributes
1035: l_return_status := Set_Attributes(
1036: p_cbl_rec, -- IN

Line 1039: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1035: l_return_status := Set_Attributes(
1036: p_cbl_rec, -- IN
1037: l_cbl_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1042: RAISE OKL_API.G_EXCEPTION_ERROR;
1043: END IF;

Line 1040: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1036: p_cbl_rec, -- IN
1037: l_cbl_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1042: RAISE OKL_API.G_EXCEPTION_ERROR;
1043: END IF;
1044: INSERT INTO OKL_CONTRACT_BALANCES(

Line 1041: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1037: l_cbl_rec); -- OUT
1038: --- If any errors happen abort API
1039: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1042: RAISE OKL_API.G_EXCEPTION_ERROR;
1043: END IF;
1044: INSERT INTO OKL_CONTRACT_BALANCES(
1045: id,

Line 1042: RAISE OKL_API.G_EXCEPTION_ERROR;

1038: --- If any errors happen abort API
1039: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1040: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1041: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1042: RAISE OKL_API.G_EXCEPTION_ERROR;
1043: END IF;
1044: INSERT INTO OKL_CONTRACT_BALANCES(
1045: id,
1046: khr_id,

Line 1133: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1129: l_cbl_rec.last_update_login);
1130: -- Set OUT values
1131: x_cbl_rec := l_cbl_rec;
1132: x_return_status := l_return_status;
1133: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1134: EXCEPTION
1135: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1136: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1137: (

Line 1135: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1131: x_cbl_rec := l_cbl_rec;
1132: x_return_status := l_return_status;
1133: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1134: EXCEPTION
1135: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1136: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1137: (
1138: l_api_name,
1139: G_PKG_NAME,

Line 1136: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1132: x_return_status := l_return_status;
1133: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1134: EXCEPTION
1135: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1136: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1137: (
1138: l_api_name,
1139: G_PKG_NAME,
1140: 'OKL_API.G_RET_STS_ERROR',

Line 1140: 'OKL_API.G_RET_STS_ERROR',

1136: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1137: (
1138: l_api_name,
1139: G_PKG_NAME,
1140: 'OKL_API.G_RET_STS_ERROR',
1141: x_msg_count,
1142: x_msg_data,
1143: '_PVT'
1144: );

Line 1145: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1141: x_msg_count,
1142: x_msg_data,
1143: '_PVT'
1144: );
1145: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1146: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1147: (
1148: l_api_name,
1149: G_PKG_NAME,

Line 1146: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1142: x_msg_data,
1143: '_PVT'
1144: );
1145: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1146: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1147: (
1148: l_api_name,
1149: G_PKG_NAME,
1150: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1150: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1146: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1147: (
1148: l_api_name,
1149: G_PKG_NAME,
1150: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1151: x_msg_count,
1152: x_msg_data,
1153: '_PVT'
1154: );

Line 1156: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1152: x_msg_data,
1153: '_PVT'
1154: );
1155: WHEN OTHERS THEN
1156: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1157: (
1158: l_api_name,
1159: G_PKG_NAME,
1160: 'OTHERS',

Line 1171: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1167: -- insert_row for :OKL_CONTRACT_BALANCES_V --
1168: ---------------------------------------------
1169: PROCEDURE insert_row(
1170: p_api_version IN NUMBER,
1171: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1172: x_return_status OUT NOCOPY VARCHAR2,
1173: x_msg_count OUT NOCOPY NUMBER,
1174: x_msg_data OUT NOCOPY VARCHAR2,
1175: p_cblv_rec IN cblv_rec_type,

Line 1180: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1176: x_cblv_rec OUT NOCOPY cblv_rec_type) IS
1177:
1178: l_api_version CONSTANT NUMBER := 1;
1179: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1180: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1181: l_cblv_rec cblv_rec_type := p_cblv_rec;
1182: l_def_cblv_rec cblv_rec_type;
1183: l_cbl_rec cbl_rec_type;
1184: lx_cbl_rec cbl_rec_type;

Line 1207: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1203: FUNCTION Set_Attributes (
1204: p_cblv_rec IN cblv_rec_type,
1205: x_cblv_rec OUT NOCOPY cblv_rec_type
1206: ) RETURN VARCHAR2 IS
1207: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1208: BEGIN
1209: x_cblv_rec := p_cblv_rec;
1210: x_cblv_rec.OBJECT_VERSION_NUMBER := 1;
1211: --start code added by dkagrawa on 20 OCT 2005

Line 1212: IF (x_cblv_rec.request_id IS NULL OR x_cblv_rec.request_id = Okl_Api.G_MISS_NUM) THEN

1208: BEGIN
1209: x_cblv_rec := p_cblv_rec;
1210: x_cblv_rec.OBJECT_VERSION_NUMBER := 1;
1211: --start code added by dkagrawa on 20 OCT 2005
1212: IF (x_cblv_rec.request_id IS NULL OR x_cblv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1213: SELECT
1214: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1215: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1216: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),

Line 1225: IF x_cblv_rec.org_id IS NULL OR x_cblv_rec.org_id = Okl_Api.G_MISS_NUM THEN

1221: x_cblv_rec.program_id,
1222: x_cblv_rec.program_update_date
1223: FROM dual;
1224: END IF;
1225: IF x_cblv_rec.org_id IS NULL OR x_cblv_rec.org_id = Okl_Api.G_MISS_NUM THEN
1226: x_cblv_rec.org_id := mo_global.get_current_org_id();
1227: END IF;
1228: --end code added by dkagrawa on 20 OCT 2005
1229: RETURN(l_return_status);

Line 1232: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1228: --end code added by dkagrawa on 20 OCT 2005
1229: RETURN(l_return_status);
1230: END Set_Attributes;
1231: BEGIN
1232: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1233: G_PKG_NAME,
1234: p_init_msg_list,
1235: l_api_version,
1236: p_api_version,

Line 1239: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1235: l_api_version,
1236: p_api_version,
1237: 'PVT',
1238: x_return_status);
1239: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1242: RAISE OKL_API.G_EXCEPTION_ERROR;
1243: END IF;

Line 1240: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1236: p_api_version,
1237: 'PVT',
1238: x_return_status);
1239: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1242: RAISE OKL_API.G_EXCEPTION_ERROR;
1243: END IF;
1244: l_cblv_rec := null_out_defaults(p_cblv_rec);

Line 1241: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1237: 'PVT',
1238: x_return_status);
1239: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1242: RAISE OKL_API.G_EXCEPTION_ERROR;
1243: END IF;
1244: l_cblv_rec := null_out_defaults(p_cblv_rec);
1245: -- Set primary key value

Line 1242: RAISE OKL_API.G_EXCEPTION_ERROR;

1238: x_return_status);
1239: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1240: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1241: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1242: RAISE OKL_API.G_EXCEPTION_ERROR;
1243: END IF;
1244: l_cblv_rec := null_out_defaults(p_cblv_rec);
1245: -- Set primary key value
1246: l_cblv_rec.ID := get_seq_id;

Line 1252: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1248: l_return_Status := Set_Attributes(
1249: l_cblv_rec, -- IN
1250: l_def_cblv_rec); -- OUT
1251: --- If any errors happen abort API
1252: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1255: RAISE OKL_API.G_EXCEPTION_ERROR;
1256: END IF;

Line 1253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1249: l_cblv_rec, -- IN
1250: l_def_cblv_rec); -- OUT
1251: --- If any errors happen abort API
1252: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1255: RAISE OKL_API.G_EXCEPTION_ERROR;
1256: END IF;
1257: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);

Line 1254: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1250: l_def_cblv_rec); -- OUT
1251: --- If any errors happen abort API
1252: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1255: RAISE OKL_API.G_EXCEPTION_ERROR;
1256: END IF;
1257: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
1258: --- Validate all non-missing attributes (Item Level Validation)

Line 1255: RAISE OKL_API.G_EXCEPTION_ERROR;

1251: --- If any errors happen abort API
1252: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1253: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1254: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1255: RAISE OKL_API.G_EXCEPTION_ERROR;
1256: END IF;
1257: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
1258: --- Validate all non-missing attributes (Item Level Validation)
1259: l_return_status := Validate_Attributes(l_def_cblv_rec);

Line 1261: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1257: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
1258: --- Validate all non-missing attributes (Item Level Validation)
1259: l_return_status := Validate_Attributes(l_def_cblv_rec);
1260: --- If any errors happen abort API
1261: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;

Line 1262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1258: --- Validate all non-missing attributes (Item Level Validation)
1259: l_return_status := Validate_Attributes(l_def_cblv_rec);
1260: --- If any errors happen abort API
1261: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);

Line 1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1259: l_return_status := Validate_Attributes(l_def_cblv_rec);
1260: --- If any errors happen abort API
1261: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1264: RAISE OKL_API.G_EXCEPTION_ERROR;

1260: --- If any errors happen abort API
1261: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1262: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1263: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1269: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1270: RAISE OKL_API.G_EXCEPTION_ERROR;
1271: END IF;

Line 1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1264: RAISE OKL_API.G_EXCEPTION_ERROR;
1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1269: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1270: RAISE OKL_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: -----------------------------------------

Line 1269: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1265: END IF;
1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1269: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1270: RAISE OKL_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: -----------------------------------------
1273: -- Move VIEW record to "Child" records --

Line 1270: RAISE OKL_API.G_EXCEPTION_ERROR;

1266: l_return_status := Validate_Record(l_def_cblv_rec);
1267: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1268: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1269: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1270: RAISE OKL_API.G_EXCEPTION_ERROR;
1271: END IF;
1272: -----------------------------------------
1273: -- Move VIEW record to "Child" records --
1274: -----------------------------------------

Line 1287: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1283: x_msg_data,
1284: l_cbl_rec,
1285: lx_cbl_rec
1286: );
1287: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1290: RAISE OKL_API.G_EXCEPTION_ERROR;
1291: END IF;

Line 1288: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1284: l_cbl_rec,
1285: lx_cbl_rec
1286: );
1287: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1290: RAISE OKL_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: migrate(lx_cbl_rec, l_def_cblv_rec);

Line 1289: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1285: lx_cbl_rec
1286: );
1287: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1290: RAISE OKL_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: migrate(lx_cbl_rec, l_def_cblv_rec);
1293: -- Set OUT values

Line 1290: RAISE OKL_API.G_EXCEPTION_ERROR;

1286: );
1287: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1288: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1289: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1290: RAISE OKL_API.G_EXCEPTION_ERROR;
1291: END IF;
1292: migrate(lx_cbl_rec, l_def_cblv_rec);
1293: -- Set OUT values
1294: x_cblv_rec := l_def_cblv_rec;

Line 1296: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1292: migrate(lx_cbl_rec, l_def_cblv_rec);
1293: -- Set OUT values
1294: x_cblv_rec := l_def_cblv_rec;
1295: x_return_status := l_return_status;
1296: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1297: EXCEPTION
1298: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1300: (

Line 1298: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1294: x_cblv_rec := l_def_cblv_rec;
1295: x_return_status := l_return_status;
1296: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1297: EXCEPTION
1298: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1300: (
1301: l_api_name,
1302: G_PKG_NAME,

Line 1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1295: x_return_status := l_return_status;
1296: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1297: EXCEPTION
1298: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1300: (
1301: l_api_name,
1302: G_PKG_NAME,
1303: 'OKL_API.G_RET_STS_ERROR',

Line 1303: 'OKL_API.G_RET_STS_ERROR',

1299: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1300: (
1301: l_api_name,
1302: G_PKG_NAME,
1303: 'OKL_API.G_RET_STS_ERROR',
1304: x_msg_count,
1305: x_msg_data,
1306: '_PVT'
1307: );

Line 1308: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1304: x_msg_count,
1305: x_msg_data,
1306: '_PVT'
1307: );
1308: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1310: (
1311: l_api_name,
1312: G_PKG_NAME,

Line 1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1305: x_msg_data,
1306: '_PVT'
1307: );
1308: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1310: (
1311: l_api_name,
1312: G_PKG_NAME,
1313: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1313: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1309: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1310: (
1311: l_api_name,
1312: G_PKG_NAME,
1313: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1314: x_msg_count,
1315: x_msg_data,
1316: '_PVT'
1317: );

Line 1319: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1315: x_msg_data,
1316: '_PVT'
1317: );
1318: WHEN OTHERS THEN
1319: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1320: (
1321: l_api_name,
1322: G_PKG_NAME,
1323: 'OTHERS',

Line 1334: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1330: -- PL/SQL TBL insert_row for:CBLV_TBL --
1331: ----------------------------------------
1332: PROCEDURE insert_row(
1333: p_api_version IN NUMBER,
1334: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1335: x_return_status OUT NOCOPY VARCHAR2,
1336: x_msg_count OUT NOCOPY NUMBER,
1337: x_msg_data OUT NOCOPY VARCHAR2,
1338: p_cblv_tbl IN cblv_tbl_type,

Line 1340: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

1336: x_msg_count OUT NOCOPY NUMBER,
1337: x_msg_data OUT NOCOPY VARCHAR2,
1338: p_cblv_tbl IN cblv_tbl_type,
1339: x_cblv_tbl OUT NOCOPY cblv_tbl_type,
1340: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
1341:
1342: l_api_version CONSTANT NUMBER := 1;
1343: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1344: i NUMBER := 0;

Line 1346: OKL_API.init_msg_list(p_init_msg_list);

1342: l_api_version CONSTANT NUMBER := 1;
1343: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1344: i NUMBER := 0;
1345: BEGIN
1346: OKL_API.init_msg_list(p_init_msg_list);
1347: -- Make sure PL/SQL table has records in it before passing
1348: IF (p_cblv_tbl.COUNT > 0) THEN
1349: i := p_cblv_tbl.FIRST;
1350: LOOP

Line 1352: l_error_rec OKL_API.ERROR_REC_TYPE;

1348: IF (p_cblv_tbl.COUNT > 0) THEN
1349: i := p_cblv_tbl.FIRST;
1350: LOOP
1351: DECLARE
1352: l_error_rec OKL_API.ERROR_REC_TYPE;
1353: BEGIN
1354: l_error_rec.api_name := l_api_name;
1355: l_error_rec.api_package := G_PKG_NAME;
1356: l_error_rec.idx := i;

Line 1359: p_init_msg_list => OKL_API.G_FALSE,

1355: l_error_rec.api_package := G_PKG_NAME;
1356: l_error_rec.idx := i;
1357: insert_row (
1358: p_api_version => p_api_version,
1359: p_init_msg_list => OKL_API.G_FALSE,
1360: x_return_status => l_error_rec.error_type,
1361: x_msg_count => l_error_rec.msg_count,
1362: x_msg_data => l_error_rec.msg_data,
1363: p_cblv_rec => p_cblv_tbl(i),

Line 1365: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

1361: x_msg_count => l_error_rec.msg_count,
1362: x_msg_data => l_error_rec.msg_data,
1363: p_cblv_rec => p_cblv_tbl(i),
1364: x_cblv_rec => x_cblv_tbl(i));
1365: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
1366: l_error_rec.sqlcode := SQLCODE;
1367: load_error_tbl(l_error_rec, px_error_tbl);
1368: ELSE
1369: x_msg_count := l_error_rec.msg_count;

Line 1373: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1369: x_msg_count := l_error_rec.msg_count;
1370: x_msg_data := l_error_rec.msg_data;
1371: END IF;
1372: EXCEPTION
1373: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1374: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1375: l_error_rec.sqlcode := SQLCODE;
1376: load_error_tbl(l_error_rec, px_error_tbl);
1377: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1374: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

1370: x_msg_data := l_error_rec.msg_data;
1371: END IF;
1372: EXCEPTION
1373: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1374: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1375: l_error_rec.sqlcode := SQLCODE;
1376: load_error_tbl(l_error_rec, px_error_tbl);
1377: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1378: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 1377: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1373: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1374: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1375: l_error_rec.sqlcode := SQLCODE;
1376: load_error_tbl(l_error_rec, px_error_tbl);
1377: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1378: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1379: l_error_rec.sqlcode := SQLCODE;
1380: load_error_tbl(l_error_rec, px_error_tbl);
1381: WHEN OTHERS THEN

Line 1378: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

1374: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1375: l_error_rec.sqlcode := SQLCODE;
1376: load_error_tbl(l_error_rec, px_error_tbl);
1377: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1378: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1379: l_error_rec.sqlcode := SQLCODE;
1380: load_error_tbl(l_error_rec, px_error_tbl);
1381: WHEN OTHERS THEN
1382: l_error_rec.error_type := 'OTHERS';

Line 1393: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1389: END IF;
1390: -- Loop through the error_tbl to find the error with the highest severity
1391: -- and return it.
1392: x_return_status := find_highest_exception(px_error_tbl);
1393: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1394: EXCEPTION
1395: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1396: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1397: (

Line 1395: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1391: -- and return it.
1392: x_return_status := find_highest_exception(px_error_tbl);
1393: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1394: EXCEPTION
1395: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1396: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1397: (
1398: l_api_name,
1399: G_PKG_NAME,

Line 1396: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1392: x_return_status := find_highest_exception(px_error_tbl);
1393: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1394: EXCEPTION
1395: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1396: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1397: (
1398: l_api_name,
1399: G_PKG_NAME,
1400: 'OKL_API.G_RET_STS_ERROR',

Line 1400: 'OKL_API.G_RET_STS_ERROR',

1396: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1397: (
1398: l_api_name,
1399: G_PKG_NAME,
1400: 'OKL_API.G_RET_STS_ERROR',
1401: x_msg_count,
1402: x_msg_data,
1403: '_PVT'
1404: );

Line 1405: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1401: x_msg_count,
1402: x_msg_data,
1403: '_PVT'
1404: );
1405: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,

Line 1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1402: x_msg_data,
1403: '_PVT'
1404: );
1405: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,
1410: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1410: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1406: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1407: (
1408: l_api_name,
1409: G_PKG_NAME,
1410: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1411: x_msg_count,
1412: x_msg_data,
1413: '_PVT'
1414: );

Line 1416: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1412: x_msg_data,
1413: '_PVT'
1414: );
1415: WHEN OTHERS THEN
1416: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1417: (
1418: l_api_name,
1419: G_PKG_NAME,
1420: 'OTHERS',

Line 1432: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1428: -- PL/SQL TBL insert_row for:CBLV_TBL --
1429: ----------------------------------------
1430: PROCEDURE insert_row(
1431: p_api_version IN NUMBER,
1432: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1433: x_return_status OUT NOCOPY VARCHAR2,
1434: x_msg_count OUT NOCOPY NUMBER,
1435: x_msg_data OUT NOCOPY VARCHAR2,
1436: p_cblv_tbl IN cblv_tbl_type,

Line 1441: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1437: x_cblv_tbl OUT NOCOPY cblv_tbl_type) IS
1438:
1439: l_api_version CONSTANT NUMBER := 1;
1440: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1441: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1442: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1443: BEGIN
1444: OKL_API.init_msg_list(p_init_msg_list);
1445: -- Make sure PL/SQL table has records in it before passing

Line 1442: l_error_tbl OKL_API.ERROR_TBL_TYPE;

1438:
1439: l_api_version CONSTANT NUMBER := 1;
1440: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1441: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1442: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1443: BEGIN
1444: OKL_API.init_msg_list(p_init_msg_list);
1445: -- Make sure PL/SQL table has records in it before passing
1446: IF (p_cblv_tbl.COUNT > 0) THEN

Line 1444: OKL_API.init_msg_list(p_init_msg_list);

1440: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1441: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1442: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1443: BEGIN
1444: OKL_API.init_msg_list(p_init_msg_list);
1445: -- Make sure PL/SQL table has records in it before passing
1446: IF (p_cblv_tbl.COUNT > 0) THEN
1447: insert_row (
1448: p_api_version => p_api_version,

Line 1449: p_init_msg_list => OKL_API.G_FALSE,

1445: -- Make sure PL/SQL table has records in it before passing
1446: IF (p_cblv_tbl.COUNT > 0) THEN
1447: insert_row (
1448: p_api_version => p_api_version,
1449: p_init_msg_list => OKL_API.G_FALSE,
1450: x_return_status => x_return_status,
1451: x_msg_count => x_msg_count,
1452: x_msg_data => x_msg_data,
1453: p_cblv_tbl => p_cblv_tbl,

Line 1457: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1453: p_cblv_tbl => p_cblv_tbl,
1454: x_cblv_tbl => x_cblv_tbl,
1455: px_error_tbl => l_error_tbl);
1456: END IF;
1457: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1458: EXCEPTION
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (

Line 1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1455: px_error_tbl => l_error_tbl);
1456: END IF;
1457: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1458: EXCEPTION
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,

Line 1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1456: END IF;
1457: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1458: EXCEPTION
1459: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,
1464: 'OKL_API.G_RET_STS_ERROR',

Line 1464: 'OKL_API.G_RET_STS_ERROR',

1460: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1461: (
1462: l_api_name,
1463: G_PKG_NAME,
1464: 'OKL_API.G_RET_STS_ERROR',
1465: x_msg_count,
1466: x_msg_data,
1467: '_PVT'
1468: );

Line 1469: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1465: x_msg_count,
1466: x_msg_data,
1467: '_PVT'
1468: );
1469: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,

Line 1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1466: x_msg_data,
1467: '_PVT'
1468: );
1469: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,
1474: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1474: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1470: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1471: (
1472: l_api_name,
1473: G_PKG_NAME,
1474: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1475: x_msg_count,
1476: x_msg_data,
1477: '_PVT'
1478: );

Line 1480: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1476: x_msg_data,
1477: '_PVT'
1478: );
1479: WHEN OTHERS THEN
1480: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1481: (
1482: l_api_name,
1483: G_PKG_NAME,
1484: 'OTHERS',

Line 1498: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1494: ----------------------------------------
1495: -- lock_row for:OKL_CONTRACT_BALANCES --
1496: ----------------------------------------
1497: PROCEDURE lock_row(
1498: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1499: x_return_status OUT NOCOPY VARCHAR2,
1500: x_msg_count OUT NOCOPY NUMBER,
1501: x_msg_data OUT NOCOPY VARCHAR2,
1502: p_cbl_rec IN cbl_rec_type) IS

Line 1519: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1515: FROM OKL_CONTRACT_BALANCES
1516: WHERE ID = p_cbl_rec.id;
1517: l_api_version CONSTANT NUMBER := 1;
1518: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1519: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1520: l_object_version_number OKL_CONTRACT_BALANCES.OBJECT_VERSION_NUMBER%TYPE;
1521: lc_object_version_number OKL_CONTRACT_BALANCES.OBJECT_VERSION_NUMBER%TYPE;
1522: l_row_notfound BOOLEAN := FALSE;
1523: lc_row_notfound BOOLEAN := FALSE;

Line 1525: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1521: lc_object_version_number OKL_CONTRACT_BALANCES.OBJECT_VERSION_NUMBER%TYPE;
1522: l_row_notfound BOOLEAN := FALSE;
1523: lc_row_notfound BOOLEAN := FALSE;
1524: BEGIN
1525: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1526: p_init_msg_list,
1527: 'PVT',
1528: x_return_status);
1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1525: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1526: p_init_msg_list,
1527: 'PVT',
1528: x_return_status);
1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1530: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1531: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1532: RAISE OKL_API.G_EXCEPTION_ERROR;
1533: END IF;

Line 1530: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1526: p_init_msg_list,
1527: 'PVT',
1528: x_return_status);
1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1530: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1531: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1532: RAISE OKL_API.G_EXCEPTION_ERROR;
1533: END IF;
1534: BEGIN

Line 1531: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1527: 'PVT',
1528: x_return_status);
1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1530: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1531: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1532: RAISE OKL_API.G_EXCEPTION_ERROR;
1533: END IF;
1534: BEGIN
1535: OPEN lock_csr(p_cbl_rec);

Line 1532: RAISE OKL_API.G_EXCEPTION_ERROR;

1528: x_return_status);
1529: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1530: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1531: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1532: RAISE OKL_API.G_EXCEPTION_ERROR;
1533: END IF;
1534: BEGIN
1535: OPEN lock_csr(p_cbl_rec);
1536: FETCH lock_csr INTO l_object_version_number;

Line 1544: OKL_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);

1540: WHEN E_Resource_Busy THEN
1541: IF (lock_csr%ISOPEN) THEN
1542: CLOSE lock_csr;
1543: END IF;
1544: OKL_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1545: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1546: END;
1547:
1548: IF ( l_row_notfound ) THEN

Line 1555: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);

1551: lc_row_notfound := lchk_csr%NOTFOUND;
1552: CLOSE lchk_csr;
1553: END IF;
1554: IF (lc_row_notfound) THEN
1555: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1556: RAISE OKL_API.G_EXCEPTION_ERROR;
1557: ELSIF lc_object_version_number > p_cbl_rec.object_version_number THEN
1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1556: RAISE OKL_API.G_EXCEPTION_ERROR;

1552: CLOSE lchk_csr;
1553: END IF;
1554: IF (lc_row_notfound) THEN
1555: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1556: RAISE OKL_API.G_EXCEPTION_ERROR;
1557: ELSIF lc_object_version_number > p_cbl_rec.object_version_number THEN
1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;
1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN

Line 1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1554: IF (lc_row_notfound) THEN
1555: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1556: RAISE OKL_API.G_EXCEPTION_ERROR;
1557: ELSIF lc_object_version_number > p_cbl_rec.object_version_number THEN
1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;
1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN
1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1559: RAISE OKL_API.G_EXCEPTION_ERROR;

1555: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1556: RAISE OKL_API.G_EXCEPTION_ERROR;
1557: ELSIF lc_object_version_number > p_cbl_rec.object_version_number THEN
1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;
1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN
1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;
1563: ELSIF lc_object_version_number = -1 THEN

Line 1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);

1557: ELSIF lc_object_version_number > p_cbl_rec.object_version_number THEN
1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;
1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN
1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;
1563: ELSIF lc_object_version_number = -1 THEN
1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1565: RAISE OKL_API.G_EXCEPTION_ERROR;

Line 1562: RAISE OKL_API.G_EXCEPTION_ERROR;

1558: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1559: RAISE OKL_API.G_EXCEPTION_ERROR;
1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN
1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;
1563: ELSIF lc_object_version_number = -1 THEN
1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1565: RAISE OKL_API.G_EXCEPTION_ERROR;
1566: END IF;

Line 1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);

1560: ELSIF lc_object_version_number <> p_cbl_rec.object_version_number THEN
1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;
1563: ELSIF lc_object_version_number = -1 THEN
1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1565: RAISE OKL_API.G_EXCEPTION_ERROR;
1566: END IF;
1567: x_return_status := l_return_status;
1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1565: RAISE OKL_API.G_EXCEPTION_ERROR;

1561: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1562: RAISE OKL_API.G_EXCEPTION_ERROR;
1563: ELSIF lc_object_version_number = -1 THEN
1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1565: RAISE OKL_API.G_EXCEPTION_ERROR;
1566: END IF;
1567: x_return_status := l_return_status;
1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1569: EXCEPTION

Line 1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1564: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1565: RAISE OKL_API.G_EXCEPTION_ERROR;
1566: END IF;
1567: x_return_status := l_return_status;
1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1569: EXCEPTION
1570: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1571: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1572: (

Line 1570: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1566: END IF;
1567: x_return_status := l_return_status;
1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1569: EXCEPTION
1570: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1571: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1572: (
1573: l_api_name,
1574: G_PKG_NAME,

Line 1571: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1567: x_return_status := l_return_status;
1568: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1569: EXCEPTION
1570: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1571: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1572: (
1573: l_api_name,
1574: G_PKG_NAME,
1575: 'OKL_API.G_RET_STS_ERROR',

Line 1575: 'OKL_API.G_RET_STS_ERROR',

1571: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1572: (
1573: l_api_name,
1574: G_PKG_NAME,
1575: 'OKL_API.G_RET_STS_ERROR',
1576: x_msg_count,
1577: x_msg_data,
1578: '_PVT'
1579: );

Line 1580: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1576: x_msg_count,
1577: x_msg_data,
1578: '_PVT'
1579: );
1580: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1581: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1582: (
1583: l_api_name,
1584: G_PKG_NAME,

Line 1581: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1577: x_msg_data,
1578: '_PVT'
1579: );
1580: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1581: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1582: (
1583: l_api_name,
1584: G_PKG_NAME,
1585: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1585: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1581: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1582: (
1583: l_api_name,
1584: G_PKG_NAME,
1585: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1586: x_msg_count,
1587: x_msg_data,
1588: '_PVT'
1589: );

Line 1591: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1587: x_msg_data,
1588: '_PVT'
1589: );
1590: WHEN OTHERS THEN
1591: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1592: (
1593: l_api_name,
1594: G_PKG_NAME,
1595: 'OTHERS',

Line 1606: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1602: -- lock_row for: OKL_CONTRACT_BALANCES_V --
1603: -------------------------------------------
1604: PROCEDURE lock_row(
1605: p_api_version IN NUMBER,
1606: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1607: x_return_status OUT NOCOPY VARCHAR2,
1608: x_msg_count OUT NOCOPY NUMBER,
1609: x_msg_data OUT NOCOPY VARCHAR2,
1610: p_cblv_rec IN cblv_rec_type) IS

Line 1614: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1610: p_cblv_rec IN cblv_rec_type) IS
1611:
1612: l_api_version CONSTANT NUMBER := 1;
1613: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1614: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1615: l_cbl_rec cbl_rec_type;
1616: BEGIN
1617: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1618: G_PKG_NAME,

Line 1617: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

1613: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1614: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1615: l_cbl_rec cbl_rec_type;
1616: BEGIN
1617: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
1618: G_PKG_NAME,
1619: p_init_msg_list,
1620: l_api_version,
1621: p_api_version,

Line 1624: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1620: l_api_version,
1621: p_api_version,
1622: 'PVT',
1623: x_return_status);
1624: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1626: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1627: RAISE OKL_API.G_EXCEPTION_ERROR;
1628: END IF;

Line 1625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1621: p_api_version,
1622: 'PVT',
1623: x_return_status);
1624: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1626: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1627: RAISE OKL_API.G_EXCEPTION_ERROR;
1628: END IF;
1629: -----------------------------------------

Line 1626: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1622: 'PVT',
1623: x_return_status);
1624: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1626: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1627: RAISE OKL_API.G_EXCEPTION_ERROR;
1628: END IF;
1629: -----------------------------------------
1630: -- Move VIEW record to "Child" records --

Line 1627: RAISE OKL_API.G_EXCEPTION_ERROR;

1623: x_return_status);
1624: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1625: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1626: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1627: RAISE OKL_API.G_EXCEPTION_ERROR;
1628: END IF;
1629: -----------------------------------------
1630: -- Move VIEW record to "Child" records --
1631: -----------------------------------------

Line 1643: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

1639: x_msg_count,
1640: x_msg_data,
1641: l_cbl_rec
1642: );
1643: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1646: RAISE OKL_API.G_EXCEPTION_ERROR;
1647: END IF;

Line 1644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

1640: x_msg_data,
1641: l_cbl_rec
1642: );
1643: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1646: RAISE OKL_API.G_EXCEPTION_ERROR;
1647: END IF;
1648: x_return_status := l_return_status;

Line 1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

1641: l_cbl_rec
1642: );
1643: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1646: RAISE OKL_API.G_EXCEPTION_ERROR;
1647: END IF;
1648: x_return_status := l_return_status;
1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1646: RAISE OKL_API.G_EXCEPTION_ERROR;

1642: );
1643: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
1644: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1646: RAISE OKL_API.G_EXCEPTION_ERROR;
1647: END IF;
1648: x_return_status := l_return_status;
1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1650: EXCEPTION

Line 1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1645: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
1646: RAISE OKL_API.G_EXCEPTION_ERROR;
1647: END IF;
1648: x_return_status := l_return_status;
1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1650: EXCEPTION
1651: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1652: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1653: (

Line 1651: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1647: END IF;
1648: x_return_status := l_return_status;
1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1650: EXCEPTION
1651: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1652: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1653: (
1654: l_api_name,
1655: G_PKG_NAME,

Line 1652: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1648: x_return_status := l_return_status;
1649: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1650: EXCEPTION
1651: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1652: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1653: (
1654: l_api_name,
1655: G_PKG_NAME,
1656: 'OKL_API.G_RET_STS_ERROR',

Line 1656: 'OKL_API.G_RET_STS_ERROR',

1652: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1653: (
1654: l_api_name,
1655: G_PKG_NAME,
1656: 'OKL_API.G_RET_STS_ERROR',
1657: x_msg_count,
1658: x_msg_data,
1659: '_PVT'
1660: );

Line 1661: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1657: x_msg_count,
1658: x_msg_data,
1659: '_PVT'
1660: );
1661: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1662: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1663: (
1664: l_api_name,
1665: G_PKG_NAME,

Line 1662: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1658: x_msg_data,
1659: '_PVT'
1660: );
1661: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1662: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1663: (
1664: l_api_name,
1665: G_PKG_NAME,
1666: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1666: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1662: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1663: (
1664: l_api_name,
1665: G_PKG_NAME,
1666: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1667: x_msg_count,
1668: x_msg_data,
1669: '_PVT'
1670: );

Line 1672: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1668: x_msg_data,
1669: '_PVT'
1670: );
1671: WHEN OTHERS THEN
1672: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1673: (
1674: l_api_name,
1675: G_PKG_NAME,
1676: 'OTHERS',

Line 1687: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1683: -- PL/SQL TBL lock_row for:CBLV_TBL --
1684: --------------------------------------
1685: PROCEDURE lock_row(
1686: p_api_version IN NUMBER,
1687: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1688: x_return_status OUT NOCOPY VARCHAR2,
1689: x_msg_count OUT NOCOPY NUMBER,
1690: x_msg_data OUT NOCOPY VARCHAR2,
1691: p_cblv_tbl IN cblv_tbl_type,

Line 1692: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

1688: x_return_status OUT NOCOPY VARCHAR2,
1689: x_msg_count OUT NOCOPY NUMBER,
1690: x_msg_data OUT NOCOPY VARCHAR2,
1691: p_cblv_tbl IN cblv_tbl_type,
1692: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
1693:
1694: l_api_version CONSTANT NUMBER := 1;
1695: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1696: i NUMBER := 0;

Line 1698: OKL_API.init_msg_list(p_init_msg_list);

1694: l_api_version CONSTANT NUMBER := 1;
1695: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1696: i NUMBER := 0;
1697: BEGIN
1698: OKL_API.init_msg_list(p_init_msg_list);
1699: -- Make sure PL/SQL table has recrods in it before passing
1700: IF (p_cblv_tbl.COUNT > 0) THEN
1701: i := p_cblv_tbl.FIRST;
1702: LOOP

Line 1704: l_error_rec OKL_API.ERROR_REC_TYPE;

1700: IF (p_cblv_tbl.COUNT > 0) THEN
1701: i := p_cblv_tbl.FIRST;
1702: LOOP
1703: DECLARE
1704: l_error_rec OKL_API.ERROR_REC_TYPE;
1705: BEGIN
1706: l_error_rec.api_name := l_api_name;
1707: l_error_rec.api_package := G_PKG_NAME;
1708: l_error_rec.idx := i;

Line 1711: p_init_msg_list => OKL_API.G_FALSE,

1707: l_error_rec.api_package := G_PKG_NAME;
1708: l_error_rec.idx := i;
1709: lock_row(
1710: p_api_version => p_api_version,
1711: p_init_msg_list => OKL_API.G_FALSE,
1712: x_return_status => l_error_rec.error_type,
1713: x_msg_count => l_error_rec.msg_count,
1714: x_msg_data => l_error_rec.msg_data,
1715: p_cblv_rec => p_cblv_tbl(i));

Line 1716: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

1712: x_return_status => l_error_rec.error_type,
1713: x_msg_count => l_error_rec.msg_count,
1714: x_msg_data => l_error_rec.msg_data,
1715: p_cblv_rec => p_cblv_tbl(i));
1716: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
1717: l_error_rec.sqlcode := SQLCODE;
1718: load_error_tbl(l_error_rec, px_error_tbl);
1719: ELSE
1720: x_msg_count := l_error_rec.msg_count;

Line 1724: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1720: x_msg_count := l_error_rec.msg_count;
1721: x_msg_data := l_error_rec.msg_data;
1722: END IF;
1723: EXCEPTION
1724: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1725: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1726: l_error_rec.sqlcode := SQLCODE;
1727: load_error_tbl(l_error_rec, px_error_tbl);
1728: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1725: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

1721: x_msg_data := l_error_rec.msg_data;
1722: END IF;
1723: EXCEPTION
1724: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1725: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1726: l_error_rec.sqlcode := SQLCODE;
1727: load_error_tbl(l_error_rec, px_error_tbl);
1728: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1729: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 1728: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1724: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1725: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1726: l_error_rec.sqlcode := SQLCODE;
1727: load_error_tbl(l_error_rec, px_error_tbl);
1728: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1729: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1730: l_error_rec.sqlcode := SQLCODE;
1731: load_error_tbl(l_error_rec, px_error_tbl);
1732: WHEN OTHERS THEN

Line 1729: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

1725: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
1726: l_error_rec.sqlcode := SQLCODE;
1727: load_error_tbl(l_error_rec, px_error_tbl);
1728: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1729: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
1730: l_error_rec.sqlcode := SQLCODE;
1731: load_error_tbl(l_error_rec, px_error_tbl);
1732: WHEN OTHERS THEN
1733: l_error_rec.error_type := 'OTHERS';

Line 1744: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1740: END IF;
1741: -- Loop through the error_tbl to find the error with the highest severity
1742: -- and return it.
1743: x_return_status := find_highest_exception(px_error_tbl);
1744: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1745: EXCEPTION
1746: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1747: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1748: (

Line 1746: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1742: -- and return it.
1743: x_return_status := find_highest_exception(px_error_tbl);
1744: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1745: EXCEPTION
1746: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1747: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1748: (
1749: l_api_name,
1750: G_PKG_NAME,

Line 1747: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1743: x_return_status := find_highest_exception(px_error_tbl);
1744: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1745: EXCEPTION
1746: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1747: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1748: (
1749: l_api_name,
1750: G_PKG_NAME,
1751: 'OKL_API.G_RET_STS_ERROR',

Line 1751: 'OKL_API.G_RET_STS_ERROR',

1747: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1748: (
1749: l_api_name,
1750: G_PKG_NAME,
1751: 'OKL_API.G_RET_STS_ERROR',
1752: x_msg_count,
1753: x_msg_data,
1754: '_PVT'
1755: );

Line 1756: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1752: x_msg_count,
1753: x_msg_data,
1754: '_PVT'
1755: );
1756: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1757: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1758: (
1759: l_api_name,
1760: G_PKG_NAME,

Line 1757: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1753: x_msg_data,
1754: '_PVT'
1755: );
1756: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1757: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1758: (
1759: l_api_name,
1760: G_PKG_NAME,
1761: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1761: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1757: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1758: (
1759: l_api_name,
1760: G_PKG_NAME,
1761: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1762: x_msg_count,
1763: x_msg_data,
1764: '_PVT'
1765: );

Line 1767: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1763: x_msg_data,
1764: '_PVT'
1765: );
1766: WHEN OTHERS THEN
1767: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1768: (
1769: l_api_name,
1770: G_PKG_NAME,
1771: 'OTHERS',

Line 1782: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1778: -- PL/SQL TBL lock_row for:CBLV_TBL --
1779: --------------------------------------
1780: PROCEDURE lock_row(
1781: p_api_version IN NUMBER,
1782: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1783: x_return_status OUT NOCOPY VARCHAR2,
1784: x_msg_count OUT NOCOPY NUMBER,
1785: x_msg_data OUT NOCOPY VARCHAR2,
1786: p_cblv_tbl IN cblv_tbl_type) IS

Line 1790: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1786: p_cblv_tbl IN cblv_tbl_type) IS
1787:
1788: l_api_version CONSTANT NUMBER := 1;
1789: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1790: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1791: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1792: BEGIN
1793: OKL_API.init_msg_list(p_init_msg_list);
1794: -- Make sure PL/SQL table has recrods in it before passing

Line 1791: l_error_tbl OKL_API.ERROR_TBL_TYPE;

1787:
1788: l_api_version CONSTANT NUMBER := 1;
1789: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1790: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1791: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1792: BEGIN
1793: OKL_API.init_msg_list(p_init_msg_list);
1794: -- Make sure PL/SQL table has recrods in it before passing
1795: IF (p_cblv_tbl.COUNT > 0) THEN

Line 1793: OKL_API.init_msg_list(p_init_msg_list);

1789: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1790: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1791: l_error_tbl OKL_API.ERROR_TBL_TYPE;
1792: BEGIN
1793: OKL_API.init_msg_list(p_init_msg_list);
1794: -- Make sure PL/SQL table has recrods in it before passing
1795: IF (p_cblv_tbl.COUNT > 0) THEN
1796: lock_row(
1797: p_api_version => p_api_version,

Line 1798: p_init_msg_list => OKL_API.G_FALSE,

1794: -- Make sure PL/SQL table has recrods in it before passing
1795: IF (p_cblv_tbl.COUNT > 0) THEN
1796: lock_row(
1797: p_api_version => p_api_version,
1798: p_init_msg_list => OKL_API.G_FALSE,
1799: x_return_status => x_return_status,
1800: x_msg_count => x_msg_count,
1801: x_msg_data => x_msg_data,
1802: p_cblv_tbl => p_cblv_tbl,

Line 1805: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

1801: x_msg_data => x_msg_data,
1802: p_cblv_tbl => p_cblv_tbl,
1803: px_error_tbl => l_error_tbl);
1804: END IF;
1805: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1806: EXCEPTION
1807: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1808: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1809: (

Line 1807: WHEN OKL_API.G_EXCEPTION_ERROR THEN

1803: px_error_tbl => l_error_tbl);
1804: END IF;
1805: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1806: EXCEPTION
1807: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1808: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1809: (
1810: l_api_name,
1811: G_PKG_NAME,

Line 1808: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1804: END IF;
1805: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
1806: EXCEPTION
1807: WHEN OKL_API.G_EXCEPTION_ERROR THEN
1808: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1809: (
1810: l_api_name,
1811: G_PKG_NAME,
1812: 'OKL_API.G_RET_STS_ERROR',

Line 1812: 'OKL_API.G_RET_STS_ERROR',

1808: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1809: (
1810: l_api_name,
1811: G_PKG_NAME,
1812: 'OKL_API.G_RET_STS_ERROR',
1813: x_msg_count,
1814: x_msg_data,
1815: '_PVT'
1816: );

Line 1817: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1813: x_msg_count,
1814: x_msg_data,
1815: '_PVT'
1816: );
1817: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1818: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1819: (
1820: l_api_name,
1821: G_PKG_NAME,

Line 1818: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1814: x_msg_data,
1815: '_PVT'
1816: );
1817: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1818: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1819: (
1820: l_api_name,
1821: G_PKG_NAME,
1822: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 1822: 'OKL_API.G_RET_STS_UNEXP_ERROR',

1818: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1819: (
1820: l_api_name,
1821: G_PKG_NAME,
1822: 'OKL_API.G_RET_STS_UNEXP_ERROR',
1823: x_msg_count,
1824: x_msg_data,
1825: '_PVT'
1826: );

Line 1828: x_return_status := OKL_API.HANDLE_EXCEPTIONS

1824: x_msg_data,
1825: '_PVT'
1826: );
1827: WHEN OTHERS THEN
1828: x_return_status := OKL_API.HANDLE_EXCEPTIONS
1829: (
1830: l_api_name,
1831: G_PKG_NAME,
1832: 'OTHERS',

Line 1845: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

1841: ------------------------------------------
1842: -- update_row for:OKL_CONTRACT_BALANCES --
1843: ------------------------------------------
1844: PROCEDURE update_row(
1845: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
1846: x_return_status OUT NOCOPY VARCHAR2,
1847: x_msg_count OUT NOCOPY NUMBER,
1848: x_msg_data OUT NOCOPY VARCHAR2,
1849: p_cbl_rec IN cbl_rec_type,

Line 1854: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1850: x_cbl_rec OUT NOCOPY cbl_rec_type) IS
1851:
1852: l_api_version CONSTANT NUMBER := 1;
1853: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
1854: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1855: l_cbl_rec cbl_rec_type := p_cbl_rec;
1856: l_def_cbl_rec cbl_rec_type;
1857: l_row_notfound BOOLEAN := TRUE;
1858: ----------------------------------

Line 1867: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

1863: x_cbl_rec OUT NOCOPY cbl_rec_type
1864: ) RETURN VARCHAR2 IS
1865: l_cbl_rec cbl_rec_type;
1866: l_row_notfound BOOLEAN := TRUE;
1867: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
1868: BEGIN
1869: x_cbl_rec := p_cbl_rec;
1870: -- Get current database values
1871: l_cbl_rec := get_rec(p_cbl_rec, l_return_status);

Line 1872: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

1868: BEGIN
1869: x_cbl_rec := p_cbl_rec;
1870: -- Get current database values
1871: l_cbl_rec := get_rec(p_cbl_rec, l_return_status);
1872: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1873: IF (x_cbl_rec.id = OKL_API.G_MISS_NUM)
1874: THEN
1875: x_cbl_rec.id := l_cbl_rec.id;
1876: END IF;

Line 1873: IF (x_cbl_rec.id = OKL_API.G_MISS_NUM)

1869: x_cbl_rec := p_cbl_rec;
1870: -- Get current database values
1871: l_cbl_rec := get_rec(p_cbl_rec, l_return_status);
1872: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
1873: IF (x_cbl_rec.id = OKL_API.G_MISS_NUM)
1874: THEN
1875: x_cbl_rec.id := l_cbl_rec.id;
1876: END IF;
1877: IF (x_cbl_rec.khr_id = OKL_API.G_MISS_NUM)

Line 1877: IF (x_cbl_rec.khr_id = OKL_API.G_MISS_NUM)

1873: IF (x_cbl_rec.id = OKL_API.G_MISS_NUM)
1874: THEN
1875: x_cbl_rec.id := l_cbl_rec.id;
1876: END IF;
1877: IF (x_cbl_rec.khr_id = OKL_API.G_MISS_NUM)
1878: THEN
1879: x_cbl_rec.khr_id := l_cbl_rec.khr_id;
1880: END IF;
1881: IF (x_cbl_rec.kle_id = OKL_API.G_MISS_NUM)

Line 1881: IF (x_cbl_rec.kle_id = OKL_API.G_MISS_NUM)

1877: IF (x_cbl_rec.khr_id = OKL_API.G_MISS_NUM)
1878: THEN
1879: x_cbl_rec.khr_id := l_cbl_rec.khr_id;
1880: END IF;
1881: IF (x_cbl_rec.kle_id = OKL_API.G_MISS_NUM)
1882: THEN
1883: x_cbl_rec.kle_id := l_cbl_rec.kle_id;
1884: END IF;
1885: IF (x_cbl_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)

Line 1885: IF (x_cbl_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)

1881: IF (x_cbl_rec.kle_id = OKL_API.G_MISS_NUM)
1882: THEN
1883: x_cbl_rec.kle_id := l_cbl_rec.kle_id;
1884: END IF;
1885: IF (x_cbl_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)
1886: THEN
1887: x_cbl_rec.actual_principal_balance_amt := l_cbl_rec.actual_principal_balance_amt;
1888: END IF;
1889: IF (x_cbl_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)

Line 1889: IF (x_cbl_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)

1885: IF (x_cbl_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)
1886: THEN
1887: x_cbl_rec.actual_principal_balance_amt := l_cbl_rec.actual_principal_balance_amt;
1888: END IF;
1889: IF (x_cbl_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)
1890: THEN
1891: x_cbl_rec.actual_principal_balance_date := l_cbl_rec.actual_principal_balance_date;
1892: END IF;
1893: IF (x_cbl_rec.interest_amt = OKL_API.G_MISS_NUM)

Line 1893: IF (x_cbl_rec.interest_amt = OKL_API.G_MISS_NUM)

1889: IF (x_cbl_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)
1890: THEN
1891: x_cbl_rec.actual_principal_balance_date := l_cbl_rec.actual_principal_balance_date;
1892: END IF;
1893: IF (x_cbl_rec.interest_amt = OKL_API.G_MISS_NUM)
1894: THEN
1895: x_cbl_rec.interest_amt := l_cbl_rec.interest_amt;
1896: END IF;
1897: IF (x_cbl_rec.interest_calc_date = OKL_API.G_MISS_DATE)

Line 1897: IF (x_cbl_rec.interest_calc_date = OKL_API.G_MISS_DATE)

1893: IF (x_cbl_rec.interest_amt = OKL_API.G_MISS_NUM)
1894: THEN
1895: x_cbl_rec.interest_amt := l_cbl_rec.interest_amt;
1896: END IF;
1897: IF (x_cbl_rec.interest_calc_date = OKL_API.G_MISS_DATE)
1898: THEN
1899: x_cbl_rec.interest_calc_date := l_cbl_rec.interest_calc_date;
1900: END IF;
1901: IF (x_cbl_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)

Line 1901: IF (x_cbl_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)

1897: IF (x_cbl_rec.interest_calc_date = OKL_API.G_MISS_DATE)
1898: THEN
1899: x_cbl_rec.interest_calc_date := l_cbl_rec.interest_calc_date;
1900: END IF;
1901: IF (x_cbl_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)
1902: THEN
1903: x_cbl_rec.interest_accrued_amt := l_cbl_rec.interest_accrued_amt;
1904: END IF;
1905: IF (x_cbl_rec.interest_accrued_date = OKL_API.G_MISS_DATE)

Line 1905: IF (x_cbl_rec.interest_accrued_date = OKL_API.G_MISS_DATE)

1901: IF (x_cbl_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)
1902: THEN
1903: x_cbl_rec.interest_accrued_amt := l_cbl_rec.interest_accrued_amt;
1904: END IF;
1905: IF (x_cbl_rec.interest_accrued_date = OKL_API.G_MISS_DATE)
1906: THEN
1907: x_cbl_rec.interest_accrued_date := l_cbl_rec.interest_accrued_date;
1908: END IF;
1909: IF (x_cbl_rec.interest_billed_amt = OKL_API.G_MISS_NUM)

Line 1909: IF (x_cbl_rec.interest_billed_amt = OKL_API.G_MISS_NUM)

1905: IF (x_cbl_rec.interest_accrued_date = OKL_API.G_MISS_DATE)
1906: THEN
1907: x_cbl_rec.interest_accrued_date := l_cbl_rec.interest_accrued_date;
1908: END IF;
1909: IF (x_cbl_rec.interest_billed_amt = OKL_API.G_MISS_NUM)
1910: THEN
1911: x_cbl_rec.interest_billed_amt := l_cbl_rec.interest_billed_amt;
1912: END IF;
1913: IF (x_cbl_rec.interest_billed_date = OKL_API.G_MISS_DATE)

Line 1913: IF (x_cbl_rec.interest_billed_date = OKL_API.G_MISS_DATE)

1909: IF (x_cbl_rec.interest_billed_amt = OKL_API.G_MISS_NUM)
1910: THEN
1911: x_cbl_rec.interest_billed_amt := l_cbl_rec.interest_billed_amt;
1912: END IF;
1913: IF (x_cbl_rec.interest_billed_date = OKL_API.G_MISS_DATE)
1914: THEN
1915: x_cbl_rec.interest_billed_date := l_cbl_rec.interest_billed_date;
1916: END IF;
1917: IF (x_cbl_rec.interest_received_amt = OKL_API.G_MISS_NUM)

Line 1917: IF (x_cbl_rec.interest_received_amt = OKL_API.G_MISS_NUM)

1913: IF (x_cbl_rec.interest_billed_date = OKL_API.G_MISS_DATE)
1914: THEN
1915: x_cbl_rec.interest_billed_date := l_cbl_rec.interest_billed_date;
1916: END IF;
1917: IF (x_cbl_rec.interest_received_amt = OKL_API.G_MISS_NUM)
1918: THEN
1919: x_cbl_rec.interest_received_amt := l_cbl_rec.interest_received_amt;
1920: END IF;
1921: IF (x_cbl_rec.interest_received_date = OKL_API.G_MISS_DATE)

Line 1921: IF (x_cbl_rec.interest_received_date = OKL_API.G_MISS_DATE)

1917: IF (x_cbl_rec.interest_received_amt = OKL_API.G_MISS_NUM)
1918: THEN
1919: x_cbl_rec.interest_received_amt := l_cbl_rec.interest_received_amt;
1920: END IF;
1921: IF (x_cbl_rec.interest_received_date = OKL_API.G_MISS_DATE)
1922: THEN
1923: x_cbl_rec.interest_received_date := l_cbl_rec.interest_received_date;
1924: END IF;
1925: IF (x_cbl_rec.termination_value_amt = OKL_API.G_MISS_NUM)

Line 1925: IF (x_cbl_rec.termination_value_amt = OKL_API.G_MISS_NUM)

1921: IF (x_cbl_rec.interest_received_date = OKL_API.G_MISS_DATE)
1922: THEN
1923: x_cbl_rec.interest_received_date := l_cbl_rec.interest_received_date;
1924: END IF;
1925: IF (x_cbl_rec.termination_value_amt = OKL_API.G_MISS_NUM)
1926: THEN
1927: x_cbl_rec.termination_value_amt := l_cbl_rec.termination_value_amt;
1928: END IF;
1929: IF (x_cbl_rec.termination_date = OKL_API.G_MISS_DATE)

Line 1929: IF (x_cbl_rec.termination_date = OKL_API.G_MISS_DATE)

1925: IF (x_cbl_rec.termination_value_amt = OKL_API.G_MISS_NUM)
1926: THEN
1927: x_cbl_rec.termination_value_amt := l_cbl_rec.termination_value_amt;
1928: END IF;
1929: IF (x_cbl_rec.termination_date = OKL_API.G_MISS_DATE)
1930: THEN
1931: x_cbl_rec.termination_date := l_cbl_rec.termination_date;
1932: END IF;
1933: IF (x_cbl_rec.object_version_number = OKL_API.G_MISS_NUM)

Line 1933: IF (x_cbl_rec.object_version_number = OKL_API.G_MISS_NUM)

1929: IF (x_cbl_rec.termination_date = OKL_API.G_MISS_DATE)
1930: THEN
1931: x_cbl_rec.termination_date := l_cbl_rec.termination_date;
1932: END IF;
1933: IF (x_cbl_rec.object_version_number = OKL_API.G_MISS_NUM)
1934: THEN
1935: x_cbl_rec.object_version_number := l_cbl_rec.object_version_number;
1936: END IF;
1937: IF (x_cbl_rec.org_id = OKL_API.G_MISS_NUM)

Line 1937: IF (x_cbl_rec.org_id = OKL_API.G_MISS_NUM)

1933: IF (x_cbl_rec.object_version_number = OKL_API.G_MISS_NUM)
1934: THEN
1935: x_cbl_rec.object_version_number := l_cbl_rec.object_version_number;
1936: END IF;
1937: IF (x_cbl_rec.org_id = OKL_API.G_MISS_NUM)
1938: THEN
1939: x_cbl_rec.org_id := l_cbl_rec.org_id;
1940: END IF;
1941: IF (x_cbl_rec.request_id = OKL_API.G_MISS_NUM)

Line 1941: IF (x_cbl_rec.request_id = OKL_API.G_MISS_NUM)

1937: IF (x_cbl_rec.org_id = OKL_API.G_MISS_NUM)
1938: THEN
1939: x_cbl_rec.org_id := l_cbl_rec.org_id;
1940: END IF;
1941: IF (x_cbl_rec.request_id = OKL_API.G_MISS_NUM)
1942: THEN
1943: x_cbl_rec.request_id := l_cbl_rec.request_id;
1944: END IF;
1945: IF (x_cbl_rec.program_application_id = OKL_API.G_MISS_NUM)

Line 1945: IF (x_cbl_rec.program_application_id = OKL_API.G_MISS_NUM)

1941: IF (x_cbl_rec.request_id = OKL_API.G_MISS_NUM)
1942: THEN
1943: x_cbl_rec.request_id := l_cbl_rec.request_id;
1944: END IF;
1945: IF (x_cbl_rec.program_application_id = OKL_API.G_MISS_NUM)
1946: THEN
1947: x_cbl_rec.program_application_id := l_cbl_rec.program_application_id;
1948: END IF;
1949: IF (x_cbl_rec.program_id = OKL_API.G_MISS_NUM)

Line 1949: IF (x_cbl_rec.program_id = OKL_API.G_MISS_NUM)

1945: IF (x_cbl_rec.program_application_id = OKL_API.G_MISS_NUM)
1946: THEN
1947: x_cbl_rec.program_application_id := l_cbl_rec.program_application_id;
1948: END IF;
1949: IF (x_cbl_rec.program_id = OKL_API.G_MISS_NUM)
1950: THEN
1951: x_cbl_rec.program_id := l_cbl_rec.program_id;
1952: END IF;
1953: IF (x_cbl_rec.program_update_date = OKL_API.G_MISS_DATE)

Line 1953: IF (x_cbl_rec.program_update_date = OKL_API.G_MISS_DATE)

1949: IF (x_cbl_rec.program_id = OKL_API.G_MISS_NUM)
1950: THEN
1951: x_cbl_rec.program_id := l_cbl_rec.program_id;
1952: END IF;
1953: IF (x_cbl_rec.program_update_date = OKL_API.G_MISS_DATE)
1954: THEN
1955: x_cbl_rec.program_update_date := l_cbl_rec.program_update_date;
1956: END IF;
1957: IF (x_cbl_rec.attribute_category = OKL_API.G_MISS_CHAR)

Line 1957: IF (x_cbl_rec.attribute_category = OKL_API.G_MISS_CHAR)

1953: IF (x_cbl_rec.program_update_date = OKL_API.G_MISS_DATE)
1954: THEN
1955: x_cbl_rec.program_update_date := l_cbl_rec.program_update_date;
1956: END IF;
1957: IF (x_cbl_rec.attribute_category = OKL_API.G_MISS_CHAR)
1958: THEN
1959: x_cbl_rec.attribute_category := l_cbl_rec.attribute_category;
1960: END IF;
1961: IF (x_cbl_rec.attribute1 = OKL_API.G_MISS_CHAR)

Line 1961: IF (x_cbl_rec.attribute1 = OKL_API.G_MISS_CHAR)

1957: IF (x_cbl_rec.attribute_category = OKL_API.G_MISS_CHAR)
1958: THEN
1959: x_cbl_rec.attribute_category := l_cbl_rec.attribute_category;
1960: END IF;
1961: IF (x_cbl_rec.attribute1 = OKL_API.G_MISS_CHAR)
1962: THEN
1963: x_cbl_rec.attribute1 := l_cbl_rec.attribute1;
1964: END IF;
1965: IF (x_cbl_rec.attribute2 = OKL_API.G_MISS_CHAR)

Line 1965: IF (x_cbl_rec.attribute2 = OKL_API.G_MISS_CHAR)

1961: IF (x_cbl_rec.attribute1 = OKL_API.G_MISS_CHAR)
1962: THEN
1963: x_cbl_rec.attribute1 := l_cbl_rec.attribute1;
1964: END IF;
1965: IF (x_cbl_rec.attribute2 = OKL_API.G_MISS_CHAR)
1966: THEN
1967: x_cbl_rec.attribute2 := l_cbl_rec.attribute2;
1968: END IF;
1969: IF (x_cbl_rec.attribute3 = OKL_API.G_MISS_CHAR)

Line 1969: IF (x_cbl_rec.attribute3 = OKL_API.G_MISS_CHAR)

1965: IF (x_cbl_rec.attribute2 = OKL_API.G_MISS_CHAR)
1966: THEN
1967: x_cbl_rec.attribute2 := l_cbl_rec.attribute2;
1968: END IF;
1969: IF (x_cbl_rec.attribute3 = OKL_API.G_MISS_CHAR)
1970: THEN
1971: x_cbl_rec.attribute3 := l_cbl_rec.attribute3;
1972: END IF;
1973: IF (x_cbl_rec.attribute4 = OKL_API.G_MISS_CHAR)

Line 1973: IF (x_cbl_rec.attribute4 = OKL_API.G_MISS_CHAR)

1969: IF (x_cbl_rec.attribute3 = OKL_API.G_MISS_CHAR)
1970: THEN
1971: x_cbl_rec.attribute3 := l_cbl_rec.attribute3;
1972: END IF;
1973: IF (x_cbl_rec.attribute4 = OKL_API.G_MISS_CHAR)
1974: THEN
1975: x_cbl_rec.attribute4 := l_cbl_rec.attribute4;
1976: END IF;
1977: IF (x_cbl_rec.attribute5 = OKL_API.G_MISS_CHAR)

Line 1977: IF (x_cbl_rec.attribute5 = OKL_API.G_MISS_CHAR)

1973: IF (x_cbl_rec.attribute4 = OKL_API.G_MISS_CHAR)
1974: THEN
1975: x_cbl_rec.attribute4 := l_cbl_rec.attribute4;
1976: END IF;
1977: IF (x_cbl_rec.attribute5 = OKL_API.G_MISS_CHAR)
1978: THEN
1979: x_cbl_rec.attribute5 := l_cbl_rec.attribute5;
1980: END IF;
1981: IF (x_cbl_rec.attribute6 = OKL_API.G_MISS_CHAR)

Line 1981: IF (x_cbl_rec.attribute6 = OKL_API.G_MISS_CHAR)

1977: IF (x_cbl_rec.attribute5 = OKL_API.G_MISS_CHAR)
1978: THEN
1979: x_cbl_rec.attribute5 := l_cbl_rec.attribute5;
1980: END IF;
1981: IF (x_cbl_rec.attribute6 = OKL_API.G_MISS_CHAR)
1982: THEN
1983: x_cbl_rec.attribute6 := l_cbl_rec.attribute6;
1984: END IF;
1985: IF (x_cbl_rec.attribute7 = OKL_API.G_MISS_CHAR)

Line 1985: IF (x_cbl_rec.attribute7 = OKL_API.G_MISS_CHAR)

1981: IF (x_cbl_rec.attribute6 = OKL_API.G_MISS_CHAR)
1982: THEN
1983: x_cbl_rec.attribute6 := l_cbl_rec.attribute6;
1984: END IF;
1985: IF (x_cbl_rec.attribute7 = OKL_API.G_MISS_CHAR)
1986: THEN
1987: x_cbl_rec.attribute7 := l_cbl_rec.attribute7;
1988: END IF;
1989: IF (x_cbl_rec.attribute8 = OKL_API.G_MISS_CHAR)

Line 1989: IF (x_cbl_rec.attribute8 = OKL_API.G_MISS_CHAR)

1985: IF (x_cbl_rec.attribute7 = OKL_API.G_MISS_CHAR)
1986: THEN
1987: x_cbl_rec.attribute7 := l_cbl_rec.attribute7;
1988: END IF;
1989: IF (x_cbl_rec.attribute8 = OKL_API.G_MISS_CHAR)
1990: THEN
1991: x_cbl_rec.attribute8 := l_cbl_rec.attribute8;
1992: END IF;
1993: IF (x_cbl_rec.attribute9 = OKL_API.G_MISS_CHAR)

Line 1993: IF (x_cbl_rec.attribute9 = OKL_API.G_MISS_CHAR)

1989: IF (x_cbl_rec.attribute8 = OKL_API.G_MISS_CHAR)
1990: THEN
1991: x_cbl_rec.attribute8 := l_cbl_rec.attribute8;
1992: END IF;
1993: IF (x_cbl_rec.attribute9 = OKL_API.G_MISS_CHAR)
1994: THEN
1995: x_cbl_rec.attribute9 := l_cbl_rec.attribute9;
1996: END IF;
1997: IF (x_cbl_rec.attribute10 = OKL_API.G_MISS_CHAR)

Line 1997: IF (x_cbl_rec.attribute10 = OKL_API.G_MISS_CHAR)

1993: IF (x_cbl_rec.attribute9 = OKL_API.G_MISS_CHAR)
1994: THEN
1995: x_cbl_rec.attribute9 := l_cbl_rec.attribute9;
1996: END IF;
1997: IF (x_cbl_rec.attribute10 = OKL_API.G_MISS_CHAR)
1998: THEN
1999: x_cbl_rec.attribute10 := l_cbl_rec.attribute10;
2000: END IF;
2001: IF (x_cbl_rec.attribute11 = OKL_API.G_MISS_CHAR)

Line 2001: IF (x_cbl_rec.attribute11 = OKL_API.G_MISS_CHAR)

1997: IF (x_cbl_rec.attribute10 = OKL_API.G_MISS_CHAR)
1998: THEN
1999: x_cbl_rec.attribute10 := l_cbl_rec.attribute10;
2000: END IF;
2001: IF (x_cbl_rec.attribute11 = OKL_API.G_MISS_CHAR)
2002: THEN
2003: x_cbl_rec.attribute11 := l_cbl_rec.attribute11;
2004: END IF;
2005: IF (x_cbl_rec.attribute12 = OKL_API.G_MISS_CHAR)

Line 2005: IF (x_cbl_rec.attribute12 = OKL_API.G_MISS_CHAR)

2001: IF (x_cbl_rec.attribute11 = OKL_API.G_MISS_CHAR)
2002: THEN
2003: x_cbl_rec.attribute11 := l_cbl_rec.attribute11;
2004: END IF;
2005: IF (x_cbl_rec.attribute12 = OKL_API.G_MISS_CHAR)
2006: THEN
2007: x_cbl_rec.attribute12 := l_cbl_rec.attribute12;
2008: END IF;
2009: IF (x_cbl_rec.attribute13 = OKL_API.G_MISS_CHAR)

Line 2009: IF (x_cbl_rec.attribute13 = OKL_API.G_MISS_CHAR)

2005: IF (x_cbl_rec.attribute12 = OKL_API.G_MISS_CHAR)
2006: THEN
2007: x_cbl_rec.attribute12 := l_cbl_rec.attribute12;
2008: END IF;
2009: IF (x_cbl_rec.attribute13 = OKL_API.G_MISS_CHAR)
2010: THEN
2011: x_cbl_rec.attribute13 := l_cbl_rec.attribute13;
2012: END IF;
2013: IF (x_cbl_rec.attribute14 = OKL_API.G_MISS_CHAR)

Line 2013: IF (x_cbl_rec.attribute14 = OKL_API.G_MISS_CHAR)

2009: IF (x_cbl_rec.attribute13 = OKL_API.G_MISS_CHAR)
2010: THEN
2011: x_cbl_rec.attribute13 := l_cbl_rec.attribute13;
2012: END IF;
2013: IF (x_cbl_rec.attribute14 = OKL_API.G_MISS_CHAR)
2014: THEN
2015: x_cbl_rec.attribute14 := l_cbl_rec.attribute14;
2016: END IF;
2017: IF (x_cbl_rec.attribute15 = OKL_API.G_MISS_CHAR)

Line 2017: IF (x_cbl_rec.attribute15 = OKL_API.G_MISS_CHAR)

2013: IF (x_cbl_rec.attribute14 = OKL_API.G_MISS_CHAR)
2014: THEN
2015: x_cbl_rec.attribute14 := l_cbl_rec.attribute14;
2016: END IF;
2017: IF (x_cbl_rec.attribute15 = OKL_API.G_MISS_CHAR)
2018: THEN
2019: x_cbl_rec.attribute15 := l_cbl_rec.attribute15;
2020: END IF;
2021: IF (x_cbl_rec.created_by = OKL_API.G_MISS_NUM)

Line 2021: IF (x_cbl_rec.created_by = OKL_API.G_MISS_NUM)

2017: IF (x_cbl_rec.attribute15 = OKL_API.G_MISS_CHAR)
2018: THEN
2019: x_cbl_rec.attribute15 := l_cbl_rec.attribute15;
2020: END IF;
2021: IF (x_cbl_rec.created_by = OKL_API.G_MISS_NUM)
2022: THEN
2023: x_cbl_rec.created_by := l_cbl_rec.created_by;
2024: END IF;
2025: IF (x_cbl_rec.creation_date = OKL_API.G_MISS_DATE)

Line 2025: IF (x_cbl_rec.creation_date = OKL_API.G_MISS_DATE)

2021: IF (x_cbl_rec.created_by = OKL_API.G_MISS_NUM)
2022: THEN
2023: x_cbl_rec.created_by := l_cbl_rec.created_by;
2024: END IF;
2025: IF (x_cbl_rec.creation_date = OKL_API.G_MISS_DATE)
2026: THEN
2027: x_cbl_rec.creation_date := l_cbl_rec.creation_date;
2028: END IF;
2029: IF (x_cbl_rec.last_updated_by = OKL_API.G_MISS_NUM)

Line 2029: IF (x_cbl_rec.last_updated_by = OKL_API.G_MISS_NUM)

2025: IF (x_cbl_rec.creation_date = OKL_API.G_MISS_DATE)
2026: THEN
2027: x_cbl_rec.creation_date := l_cbl_rec.creation_date;
2028: END IF;
2029: IF (x_cbl_rec.last_updated_by = OKL_API.G_MISS_NUM)
2030: THEN
2031: x_cbl_rec.last_updated_by := l_cbl_rec.last_updated_by;
2032: END IF;
2033: IF (x_cbl_rec.last_update_date = OKL_API.G_MISS_DATE)

Line 2033: IF (x_cbl_rec.last_update_date = OKL_API.G_MISS_DATE)

2029: IF (x_cbl_rec.last_updated_by = OKL_API.G_MISS_NUM)
2030: THEN
2031: x_cbl_rec.last_updated_by := l_cbl_rec.last_updated_by;
2032: END IF;
2033: IF (x_cbl_rec.last_update_date = OKL_API.G_MISS_DATE)
2034: THEN
2035: x_cbl_rec.last_update_date := l_cbl_rec.last_update_date;
2036: END IF;
2037: IF (x_cbl_rec.last_update_login = OKL_API.G_MISS_NUM)

Line 2037: IF (x_cbl_rec.last_update_login = OKL_API.G_MISS_NUM)

2033: IF (x_cbl_rec.last_update_date = OKL_API.G_MISS_DATE)
2034: THEN
2035: x_cbl_rec.last_update_date := l_cbl_rec.last_update_date;
2036: END IF;
2037: IF (x_cbl_rec.last_update_login = OKL_API.G_MISS_NUM)
2038: THEN
2039: x_cbl_rec.last_update_login := l_cbl_rec.last_update_login;
2040: END IF;
2041: END IF;

Line 2051: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2047: FUNCTION Set_Attributes (
2048: p_cbl_rec IN cbl_rec_type,
2049: x_cbl_rec OUT NOCOPY cbl_rec_type
2050: ) RETURN VARCHAR2 IS
2051: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2052: BEGIN
2053: x_cbl_rec := p_cbl_rec;
2054: x_cbl_rec.OBJECT_VERSION_NUMBER := p_cbl_rec.OBJECT_VERSION_NUMBER + 1;
2055: RETURN(l_return_status);

Line 2058: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2054: x_cbl_rec.OBJECT_VERSION_NUMBER := p_cbl_rec.OBJECT_VERSION_NUMBER + 1;
2055: RETURN(l_return_status);
2056: END Set_Attributes;
2057: BEGIN
2058: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2059: p_init_msg_list,
2060: 'PVT',
2061: x_return_status);
2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2058: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2059: p_init_msg_list,
2060: 'PVT',
2061: x_return_status);
2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2065: RAISE OKL_API.G_EXCEPTION_ERROR;
2066: END IF;

Line 2063: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2059: p_init_msg_list,
2060: 'PVT',
2061: x_return_status);
2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2065: RAISE OKL_API.G_EXCEPTION_ERROR;
2066: END IF;
2067: --- Setting item attributes

Line 2064: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2060: 'PVT',
2061: x_return_status);
2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2065: RAISE OKL_API.G_EXCEPTION_ERROR;
2066: END IF;
2067: --- Setting item attributes
2068: l_return_status := Set_Attributes(

Line 2065: RAISE OKL_API.G_EXCEPTION_ERROR;

2061: x_return_status);
2062: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2063: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2064: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2065: RAISE OKL_API.G_EXCEPTION_ERROR;
2066: END IF;
2067: --- Setting item attributes
2068: l_return_status := Set_Attributes(
2069: p_cbl_rec, -- IN

Line 2072: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2068: l_return_status := Set_Attributes(
2069: p_cbl_rec, -- IN
2070: l_cbl_rec); -- OUT
2071: --- If any errors happen abort API
2072: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2073: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;

Line 2073: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2069: p_cbl_rec, -- IN
2070: l_cbl_rec); -- OUT
2071: --- If any errors happen abort API
2072: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2073: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);

Line 2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2070: l_cbl_rec); -- OUT
2071: --- If any errors happen abort API
2072: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2073: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2075: RAISE OKL_API.G_EXCEPTION_ERROR;

2071: --- If any errors happen abort API
2072: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2073: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2074: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2081: RAISE OKL_API.G_EXCEPTION_ERROR;
2082: END IF;

Line 2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2075: RAISE OKL_API.G_EXCEPTION_ERROR;
2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2081: RAISE OKL_API.G_EXCEPTION_ERROR;
2082: END IF;
2083: UPDATE OKL_CONTRACT_BALANCES

Line 2080: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2076: END IF;
2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2081: RAISE OKL_API.G_EXCEPTION_ERROR;
2082: END IF;
2083: UPDATE OKL_CONTRACT_BALANCES
2084: SET KHR_ID = l_def_cbl_rec.khr_id,

Line 2081: RAISE OKL_API.G_EXCEPTION_ERROR;

2077: l_return_status := populate_new_record(l_cbl_rec, l_def_cbl_rec);
2078: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2079: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2080: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2081: RAISE OKL_API.G_EXCEPTION_ERROR;
2082: END IF;
2083: UPDATE OKL_CONTRACT_BALANCES
2084: SET KHR_ID = l_def_cbl_rec.khr_id,
2085: KLE_ID = l_def_cbl_rec.kle_id,

Line 2129: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2125: WHERE ID = l_def_cbl_rec.id;
2126:
2127: x_cbl_rec := l_cbl_rec;
2128: x_return_status := l_return_status;
2129: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2130: EXCEPTION
2131: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2132: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2133: (

Line 2131: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2127: x_cbl_rec := l_cbl_rec;
2128: x_return_status := l_return_status;
2129: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2130: EXCEPTION
2131: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2132: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2133: (
2134: l_api_name,
2135: G_PKG_NAME,

Line 2132: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2128: x_return_status := l_return_status;
2129: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2130: EXCEPTION
2131: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2132: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2133: (
2134: l_api_name,
2135: G_PKG_NAME,
2136: 'OKL_API.G_RET_STS_ERROR',

Line 2136: 'OKL_API.G_RET_STS_ERROR',

2132: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2133: (
2134: l_api_name,
2135: G_PKG_NAME,
2136: 'OKL_API.G_RET_STS_ERROR',
2137: x_msg_count,
2138: x_msg_data,
2139: '_PVT'
2140: );

Line 2141: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2137: x_msg_count,
2138: x_msg_data,
2139: '_PVT'
2140: );
2141: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2142: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2143: (
2144: l_api_name,
2145: G_PKG_NAME,

Line 2142: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2138: x_msg_data,
2139: '_PVT'
2140: );
2141: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2142: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2143: (
2144: l_api_name,
2145: G_PKG_NAME,
2146: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2146: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2142: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2143: (
2144: l_api_name,
2145: G_PKG_NAME,
2146: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2147: x_msg_count,
2148: x_msg_data,
2149: '_PVT'
2150: );

Line 2152: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2148: x_msg_data,
2149: '_PVT'
2150: );
2151: WHEN OTHERS THEN
2152: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2153: (
2154: l_api_name,
2155: G_PKG_NAME,
2156: 'OTHERS',

Line 2167: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2163: -- update_row for:OKL_CONTRACT_BALANCES_V --
2164: --------------------------------------------
2165: PROCEDURE update_row(
2166: p_api_version IN NUMBER,
2167: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2168: x_return_status OUT NOCOPY VARCHAR2,
2169: x_msg_count OUT NOCOPY NUMBER,
2170: x_msg_data OUT NOCOPY VARCHAR2,
2171: p_cblv_rec IN cblv_rec_type,

Line 2176: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2172: x_cblv_rec OUT NOCOPY cblv_rec_type) IS
2173:
2174: l_api_version CONSTANT NUMBER := 1;
2175: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2176: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2177: l_cblv_rec cblv_rec_type := p_cblv_rec;
2178: l_def_cblv_rec cblv_rec_type;
2179: l_db_cblv_rec cblv_rec_type;
2180: l_cbl_rec cbl_rec_type;

Line 2203: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2199: p_cblv_rec IN cblv_rec_type,
2200: x_cblv_rec OUT NOCOPY cblv_rec_type
2201: ) RETURN VARCHAR2 IS
2202: l_row_notfound BOOLEAN := TRUE;
2203: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2204: BEGIN
2205: x_cblv_rec := p_cblv_rec;
2206: -- Get current database values
2207: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it

Line 2210: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN

2206: -- Get current database values
2207: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2208: -- so it may be verified through LOCK_ROW.
2209: l_db_cblv_rec := get_rec(p_cblv_rec, l_return_status);
2210: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
2211: IF (x_cblv_rec.id = OKL_API.G_MISS_NUM)
2212: THEN
2213: x_cblv_rec.id := l_db_cblv_rec.id;
2214: END IF;

Line 2211: IF (x_cblv_rec.id = OKL_API.G_MISS_NUM)

2207: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2208: -- so it may be verified through LOCK_ROW.
2209: l_db_cblv_rec := get_rec(p_cblv_rec, l_return_status);
2210: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
2211: IF (x_cblv_rec.id = OKL_API.G_MISS_NUM)
2212: THEN
2213: x_cblv_rec.id := l_db_cblv_rec.id;
2214: END IF;
2215: IF (x_cblv_rec.khr_id = OKL_API.G_MISS_NUM)

Line 2215: IF (x_cblv_rec.khr_id = OKL_API.G_MISS_NUM)

2211: IF (x_cblv_rec.id = OKL_API.G_MISS_NUM)
2212: THEN
2213: x_cblv_rec.id := l_db_cblv_rec.id;
2214: END IF;
2215: IF (x_cblv_rec.khr_id = OKL_API.G_MISS_NUM)
2216: THEN
2217: x_cblv_rec.khr_id := l_db_cblv_rec.khr_id;
2218: END IF;
2219: IF (x_cblv_rec.kle_id = OKL_API.G_MISS_NUM)

Line 2219: IF (x_cblv_rec.kle_id = OKL_API.G_MISS_NUM)

2215: IF (x_cblv_rec.khr_id = OKL_API.G_MISS_NUM)
2216: THEN
2217: x_cblv_rec.khr_id := l_db_cblv_rec.khr_id;
2218: END IF;
2219: IF (x_cblv_rec.kle_id = OKL_API.G_MISS_NUM)
2220: THEN
2221: x_cblv_rec.kle_id := l_db_cblv_rec.kle_id;
2222: END IF;
2223: IF (x_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)

Line 2223: IF (x_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)

2219: IF (x_cblv_rec.kle_id = OKL_API.G_MISS_NUM)
2220: THEN
2221: x_cblv_rec.kle_id := l_db_cblv_rec.kle_id;
2222: END IF;
2223: IF (x_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)
2224: THEN
2225: x_cblv_rec.actual_principal_balance_amt := l_db_cblv_rec.actual_principal_balance_amt;
2226: END IF;
2227: IF (x_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)

Line 2227: IF (x_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)

2223: IF (x_cblv_rec.actual_principal_balance_amt = OKL_API.G_MISS_NUM)
2224: THEN
2225: x_cblv_rec.actual_principal_balance_amt := l_db_cblv_rec.actual_principal_balance_amt;
2226: END IF;
2227: IF (x_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)
2228: THEN
2229: x_cblv_rec.actual_principal_balance_date := l_db_cblv_rec.actual_principal_balance_date;
2230: END IF;
2231: IF (x_cblv_rec.interest_amt = OKL_API.G_MISS_NUM)

Line 2231: IF (x_cblv_rec.interest_amt = OKL_API.G_MISS_NUM)

2227: IF (x_cblv_rec.actual_principal_balance_date = OKL_API.G_MISS_DATE)
2228: THEN
2229: x_cblv_rec.actual_principal_balance_date := l_db_cblv_rec.actual_principal_balance_date;
2230: END IF;
2231: IF (x_cblv_rec.interest_amt = OKL_API.G_MISS_NUM)
2232: THEN
2233: x_cblv_rec.interest_amt := l_db_cblv_rec.interest_amt;
2234: END IF;
2235: IF (x_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE)

Line 2235: IF (x_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE)

2231: IF (x_cblv_rec.interest_amt = OKL_API.G_MISS_NUM)
2232: THEN
2233: x_cblv_rec.interest_amt := l_db_cblv_rec.interest_amt;
2234: END IF;
2235: IF (x_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE)
2236: THEN
2237: x_cblv_rec.interest_calc_date := l_db_cblv_rec.interest_calc_date;
2238: END IF;
2239: IF (x_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)

Line 2239: IF (x_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)

2235: IF (x_cblv_rec.interest_calc_date = OKL_API.G_MISS_DATE)
2236: THEN
2237: x_cblv_rec.interest_calc_date := l_db_cblv_rec.interest_calc_date;
2238: END IF;
2239: IF (x_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)
2240: THEN
2241: x_cblv_rec.interest_accrued_amt := l_db_cblv_rec.interest_accrued_amt;
2242: END IF;
2243: IF (x_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE)

Line 2243: IF (x_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE)

2239: IF (x_cblv_rec.interest_accrued_amt = OKL_API.G_MISS_NUM)
2240: THEN
2241: x_cblv_rec.interest_accrued_amt := l_db_cblv_rec.interest_accrued_amt;
2242: END IF;
2243: IF (x_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE)
2244: THEN
2245: x_cblv_rec.interest_accrued_date := l_db_cblv_rec.interest_accrued_date;
2246: END IF;
2247: IF (x_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM)

Line 2247: IF (x_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM)

2243: IF (x_cblv_rec.interest_accrued_date = OKL_API.G_MISS_DATE)
2244: THEN
2245: x_cblv_rec.interest_accrued_date := l_db_cblv_rec.interest_accrued_date;
2246: END IF;
2247: IF (x_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM)
2248: THEN
2249: x_cblv_rec.interest_billed_amt := l_db_cblv_rec.interest_billed_amt;
2250: END IF;
2251: IF (x_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE)

Line 2251: IF (x_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE)

2247: IF (x_cblv_rec.interest_billed_amt = OKL_API.G_MISS_NUM)
2248: THEN
2249: x_cblv_rec.interest_billed_amt := l_db_cblv_rec.interest_billed_amt;
2250: END IF;
2251: IF (x_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE)
2252: THEN
2253: x_cblv_rec.interest_billed_date := l_db_cblv_rec.interest_billed_date;
2254: END IF;
2255: IF (x_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM)

Line 2255: IF (x_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM)

2251: IF (x_cblv_rec.interest_billed_date = OKL_API.G_MISS_DATE)
2252: THEN
2253: x_cblv_rec.interest_billed_date := l_db_cblv_rec.interest_billed_date;
2254: END IF;
2255: IF (x_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM)
2256: THEN
2257: x_cblv_rec.interest_received_amt := l_db_cblv_rec.interest_received_amt;
2258: END IF;
2259: IF (x_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE)

Line 2259: IF (x_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE)

2255: IF (x_cblv_rec.interest_received_amt = OKL_API.G_MISS_NUM)
2256: THEN
2257: x_cblv_rec.interest_received_amt := l_db_cblv_rec.interest_received_amt;
2258: END IF;
2259: IF (x_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE)
2260: THEN
2261: x_cblv_rec.interest_received_date := l_db_cblv_rec.interest_received_date;
2262: END IF;
2263: IF (x_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM)

Line 2263: IF (x_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM)

2259: IF (x_cblv_rec.interest_received_date = OKL_API.G_MISS_DATE)
2260: THEN
2261: x_cblv_rec.interest_received_date := l_db_cblv_rec.interest_received_date;
2262: END IF;
2263: IF (x_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM)
2264: THEN
2265: x_cblv_rec.termination_value_amt := l_db_cblv_rec.termination_value_amt;
2266: END IF;
2267: IF (x_cblv_rec.termination_date = OKL_API.G_MISS_DATE)

Line 2267: IF (x_cblv_rec.termination_date = OKL_API.G_MISS_DATE)

2263: IF (x_cblv_rec.termination_value_amt = OKL_API.G_MISS_NUM)
2264: THEN
2265: x_cblv_rec.termination_value_amt := l_db_cblv_rec.termination_value_amt;
2266: END IF;
2267: IF (x_cblv_rec.termination_date = OKL_API.G_MISS_DATE)
2268: THEN
2269: x_cblv_rec.termination_date := l_db_cblv_rec.termination_date;
2270: END IF;
2271: IF (x_cblv_rec.org_id = OKL_API.G_MISS_NUM)

Line 2271: IF (x_cblv_rec.org_id = OKL_API.G_MISS_NUM)

2267: IF (x_cblv_rec.termination_date = OKL_API.G_MISS_DATE)
2268: THEN
2269: x_cblv_rec.termination_date := l_db_cblv_rec.termination_date;
2270: END IF;
2271: IF (x_cblv_rec.org_id = OKL_API.G_MISS_NUM)
2272: THEN
2273: x_cblv_rec.org_id := l_db_cblv_rec.org_id;
2274: END IF;
2275: IF (x_cblv_rec.request_id = OKL_API.G_MISS_NUM)

Line 2275: IF (x_cblv_rec.request_id = OKL_API.G_MISS_NUM)

2271: IF (x_cblv_rec.org_id = OKL_API.G_MISS_NUM)
2272: THEN
2273: x_cblv_rec.org_id := l_db_cblv_rec.org_id;
2274: END IF;
2275: IF (x_cblv_rec.request_id = OKL_API.G_MISS_NUM)
2276: THEN
2277: x_cblv_rec.request_id := l_db_cblv_rec.request_id;
2278: END IF;
2279: IF (x_cblv_rec.program_application_id = OKL_API.G_MISS_NUM)

Line 2279: IF (x_cblv_rec.program_application_id = OKL_API.G_MISS_NUM)

2275: IF (x_cblv_rec.request_id = OKL_API.G_MISS_NUM)
2276: THEN
2277: x_cblv_rec.request_id := l_db_cblv_rec.request_id;
2278: END IF;
2279: IF (x_cblv_rec.program_application_id = OKL_API.G_MISS_NUM)
2280: THEN
2281: x_cblv_rec.program_application_id := l_db_cblv_rec.program_application_id;
2282: END IF;
2283: IF (x_cblv_rec.program_id = OKL_API.G_MISS_NUM)

Line 2283: IF (x_cblv_rec.program_id = OKL_API.G_MISS_NUM)

2279: IF (x_cblv_rec.program_application_id = OKL_API.G_MISS_NUM)
2280: THEN
2281: x_cblv_rec.program_application_id := l_db_cblv_rec.program_application_id;
2282: END IF;
2283: IF (x_cblv_rec.program_id = OKL_API.G_MISS_NUM)
2284: THEN
2285: x_cblv_rec.program_id := l_db_cblv_rec.program_id;
2286: END IF;
2287: IF (x_cblv_rec.program_update_date = OKL_API.G_MISS_DATE)

Line 2287: IF (x_cblv_rec.program_update_date = OKL_API.G_MISS_DATE)

2283: IF (x_cblv_rec.program_id = OKL_API.G_MISS_NUM)
2284: THEN
2285: x_cblv_rec.program_id := l_db_cblv_rec.program_id;
2286: END IF;
2287: IF (x_cblv_rec.program_update_date = OKL_API.G_MISS_DATE)
2288: THEN
2289: x_cblv_rec.program_update_date := l_db_cblv_rec.program_update_date;
2290: END IF;
2291: IF (x_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR)

Line 2291: IF (x_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR)

2287: IF (x_cblv_rec.program_update_date = OKL_API.G_MISS_DATE)
2288: THEN
2289: x_cblv_rec.program_update_date := l_db_cblv_rec.program_update_date;
2290: END IF;
2291: IF (x_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR)
2292: THEN
2293: x_cblv_rec.attribute_category := l_db_cblv_rec.attribute_category;
2294: END IF;
2295: IF (x_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR)

Line 2295: IF (x_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR)

2291: IF (x_cblv_rec.attribute_category = OKL_API.G_MISS_CHAR)
2292: THEN
2293: x_cblv_rec.attribute_category := l_db_cblv_rec.attribute_category;
2294: END IF;
2295: IF (x_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR)
2296: THEN
2297: x_cblv_rec.attribute1 := l_db_cblv_rec.attribute1;
2298: END IF;
2299: IF (x_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR)

Line 2299: IF (x_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR)

2295: IF (x_cblv_rec.attribute1 = OKL_API.G_MISS_CHAR)
2296: THEN
2297: x_cblv_rec.attribute1 := l_db_cblv_rec.attribute1;
2298: END IF;
2299: IF (x_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR)
2300: THEN
2301: x_cblv_rec.attribute2 := l_db_cblv_rec.attribute2;
2302: END IF;
2303: IF (x_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR)

Line 2303: IF (x_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR)

2299: IF (x_cblv_rec.attribute2 = OKL_API.G_MISS_CHAR)
2300: THEN
2301: x_cblv_rec.attribute2 := l_db_cblv_rec.attribute2;
2302: END IF;
2303: IF (x_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR)
2304: THEN
2305: x_cblv_rec.attribute3 := l_db_cblv_rec.attribute3;
2306: END IF;
2307: IF (x_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR)

Line 2307: IF (x_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR)

2303: IF (x_cblv_rec.attribute3 = OKL_API.G_MISS_CHAR)
2304: THEN
2305: x_cblv_rec.attribute3 := l_db_cblv_rec.attribute3;
2306: END IF;
2307: IF (x_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR)
2308: THEN
2309: x_cblv_rec.attribute4 := l_db_cblv_rec.attribute4;
2310: END IF;
2311: IF (x_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR)

Line 2311: IF (x_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR)

2307: IF (x_cblv_rec.attribute4 = OKL_API.G_MISS_CHAR)
2308: THEN
2309: x_cblv_rec.attribute4 := l_db_cblv_rec.attribute4;
2310: END IF;
2311: IF (x_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR)
2312: THEN
2313: x_cblv_rec.attribute5 := l_db_cblv_rec.attribute5;
2314: END IF;
2315: IF (x_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR)

Line 2315: IF (x_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR)

2311: IF (x_cblv_rec.attribute5 = OKL_API.G_MISS_CHAR)
2312: THEN
2313: x_cblv_rec.attribute5 := l_db_cblv_rec.attribute5;
2314: END IF;
2315: IF (x_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR)
2316: THEN
2317: x_cblv_rec.attribute6 := l_db_cblv_rec.attribute6;
2318: END IF;
2319: IF (x_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR)

Line 2319: IF (x_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR)

2315: IF (x_cblv_rec.attribute6 = OKL_API.G_MISS_CHAR)
2316: THEN
2317: x_cblv_rec.attribute6 := l_db_cblv_rec.attribute6;
2318: END IF;
2319: IF (x_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR)
2320: THEN
2321: x_cblv_rec.attribute7 := l_db_cblv_rec.attribute7;
2322: END IF;
2323: IF (x_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR)

Line 2323: IF (x_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR)

2319: IF (x_cblv_rec.attribute7 = OKL_API.G_MISS_CHAR)
2320: THEN
2321: x_cblv_rec.attribute7 := l_db_cblv_rec.attribute7;
2322: END IF;
2323: IF (x_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR)
2324: THEN
2325: x_cblv_rec.attribute8 := l_db_cblv_rec.attribute8;
2326: END IF;
2327: IF (x_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR)

Line 2327: IF (x_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR)

2323: IF (x_cblv_rec.attribute8 = OKL_API.G_MISS_CHAR)
2324: THEN
2325: x_cblv_rec.attribute8 := l_db_cblv_rec.attribute8;
2326: END IF;
2327: IF (x_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR)
2328: THEN
2329: x_cblv_rec.attribute9 := l_db_cblv_rec.attribute9;
2330: END IF;
2331: IF (x_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR)

Line 2331: IF (x_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR)

2327: IF (x_cblv_rec.attribute9 = OKL_API.G_MISS_CHAR)
2328: THEN
2329: x_cblv_rec.attribute9 := l_db_cblv_rec.attribute9;
2330: END IF;
2331: IF (x_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR)
2332: THEN
2333: x_cblv_rec.attribute10 := l_db_cblv_rec.attribute10;
2334: END IF;
2335: IF (x_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR)

Line 2335: IF (x_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR)

2331: IF (x_cblv_rec.attribute10 = OKL_API.G_MISS_CHAR)
2332: THEN
2333: x_cblv_rec.attribute10 := l_db_cblv_rec.attribute10;
2334: END IF;
2335: IF (x_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR)
2336: THEN
2337: x_cblv_rec.attribute11 := l_db_cblv_rec.attribute11;
2338: END IF;
2339: IF (x_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR)

Line 2339: IF (x_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR)

2335: IF (x_cblv_rec.attribute11 = OKL_API.G_MISS_CHAR)
2336: THEN
2337: x_cblv_rec.attribute11 := l_db_cblv_rec.attribute11;
2338: END IF;
2339: IF (x_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR)
2340: THEN
2341: x_cblv_rec.attribute12 := l_db_cblv_rec.attribute12;
2342: END IF;
2343: IF (x_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR)

Line 2343: IF (x_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR)

2339: IF (x_cblv_rec.attribute12 = OKL_API.G_MISS_CHAR)
2340: THEN
2341: x_cblv_rec.attribute12 := l_db_cblv_rec.attribute12;
2342: END IF;
2343: IF (x_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR)
2344: THEN
2345: x_cblv_rec.attribute13 := l_db_cblv_rec.attribute13;
2346: END IF;
2347: IF (x_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR)

Line 2347: IF (x_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR)

2343: IF (x_cblv_rec.attribute13 = OKL_API.G_MISS_CHAR)
2344: THEN
2345: x_cblv_rec.attribute13 := l_db_cblv_rec.attribute13;
2346: END IF;
2347: IF (x_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR)
2348: THEN
2349: x_cblv_rec.attribute14 := l_db_cblv_rec.attribute14;
2350: END IF;
2351: IF (x_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR)

Line 2351: IF (x_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR)

2347: IF (x_cblv_rec.attribute14 = OKL_API.G_MISS_CHAR)
2348: THEN
2349: x_cblv_rec.attribute14 := l_db_cblv_rec.attribute14;
2350: END IF;
2351: IF (x_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR)
2352: THEN
2353: x_cblv_rec.attribute15 := l_db_cblv_rec.attribute15;
2354: END IF;
2355: IF (x_cblv_rec.created_by = OKL_API.G_MISS_NUM)

Line 2355: IF (x_cblv_rec.created_by = OKL_API.G_MISS_NUM)

2351: IF (x_cblv_rec.attribute15 = OKL_API.G_MISS_CHAR)
2352: THEN
2353: x_cblv_rec.attribute15 := l_db_cblv_rec.attribute15;
2354: END IF;
2355: IF (x_cblv_rec.created_by = OKL_API.G_MISS_NUM)
2356: THEN
2357: x_cblv_rec.created_by := l_db_cblv_rec.created_by;
2358: END IF;
2359: IF (x_cblv_rec.creation_date = OKL_API.G_MISS_DATE)

Line 2359: IF (x_cblv_rec.creation_date = OKL_API.G_MISS_DATE)

2355: IF (x_cblv_rec.created_by = OKL_API.G_MISS_NUM)
2356: THEN
2357: x_cblv_rec.created_by := l_db_cblv_rec.created_by;
2358: END IF;
2359: IF (x_cblv_rec.creation_date = OKL_API.G_MISS_DATE)
2360: THEN
2361: x_cblv_rec.creation_date := l_db_cblv_rec.creation_date;
2362: END IF;
2363: IF (x_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM)

Line 2363: IF (x_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM)

2359: IF (x_cblv_rec.creation_date = OKL_API.G_MISS_DATE)
2360: THEN
2361: x_cblv_rec.creation_date := l_db_cblv_rec.creation_date;
2362: END IF;
2363: IF (x_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM)
2364: THEN
2365: x_cblv_rec.last_updated_by := l_db_cblv_rec.last_updated_by;
2366: END IF;
2367: IF (x_cblv_rec.last_update_date = OKL_API.G_MISS_DATE)

Line 2367: IF (x_cblv_rec.last_update_date = OKL_API.G_MISS_DATE)

2363: IF (x_cblv_rec.last_updated_by = OKL_API.G_MISS_NUM)
2364: THEN
2365: x_cblv_rec.last_updated_by := l_db_cblv_rec.last_updated_by;
2366: END IF;
2367: IF (x_cblv_rec.last_update_date = OKL_API.G_MISS_DATE)
2368: THEN
2369: x_cblv_rec.last_update_date := l_db_cblv_rec.last_update_date;
2370: END IF;
2371: IF (x_cblv_rec.last_update_login = OKL_API.G_MISS_NUM)

Line 2371: IF (x_cblv_rec.last_update_login = OKL_API.G_MISS_NUM)

2367: IF (x_cblv_rec.last_update_date = OKL_API.G_MISS_DATE)
2368: THEN
2369: x_cblv_rec.last_update_date := l_db_cblv_rec.last_update_date;
2370: END IF;
2371: IF (x_cblv_rec.last_update_login = OKL_API.G_MISS_NUM)
2372: THEN
2373: x_cblv_rec.last_update_login := l_db_cblv_rec.last_update_login;
2374: END IF;
2375:

Line 2377: IF (x_cblv_rec.object_version_number = OKL_API.G_MISS_NUM)

2373: x_cblv_rec.last_update_login := l_db_cblv_rec.last_update_login;
2374: END IF;
2375:
2376: --start code added by pgomes on 18 OCT 2005
2377: IF (x_cblv_rec.object_version_number = OKL_API.G_MISS_NUM)
2378: THEN
2379: x_cblv_rec.object_version_number := l_db_cblv_rec.object_version_number;
2380: END IF;
2381: --end code added by pgomes on 18 OCT 2005

Line 2392: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2388: FUNCTION Set_Attributes (
2389: p_cblv_rec IN cblv_rec_type,
2390: x_cblv_rec OUT NOCOPY cblv_rec_type
2391: ) RETURN VARCHAR2 IS
2392: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2393: BEGIN
2394: x_cblv_rec := p_cblv_rec;
2395: --start code added by dkagrawa on 20 OCT 2005
2396: IF (x_cblv_rec.request_id IS NULL OR x_cblv_rec.request_id = Okl_Api.G_MISS_NUM) THEN

Line 2396: IF (x_cblv_rec.request_id IS NULL OR x_cblv_rec.request_id = Okl_Api.G_MISS_NUM) THEN

2392: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2393: BEGIN
2394: x_cblv_rec := p_cblv_rec;
2395: --start code added by dkagrawa on 20 OCT 2005
2396: IF (x_cblv_rec.request_id IS NULL OR x_cblv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
2397: SELECT
2398: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2399: x_cblv_rec.request_id),
2400: NVL(DECODE(Fnd_Global.PROG_APPL_ID, -1,NULL,Fnd_Global.PROG_APPL_ID),

Line 2413: IF x_cblv_rec.org_id IS NULL OR x_cblv_rec.org_id = Okl_Api.G_MISS_NUM THEN

2409: x_cblv_rec.program_id,
2410: x_cblv_rec.program_update_date
2411: FROM dual;
2412: END IF;
2413: IF x_cblv_rec.org_id IS NULL OR x_cblv_rec.org_id = Okl_Api.G_MISS_NUM THEN
2414: x_cblv_rec.org_id := mo_global.get_current_org_id();
2415: END IF;
2416: --end code added by dkagrawa on 20 OCT 2005
2417: RETURN(l_return_status);

Line 2420: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2416: --end code added by dkagrawa on 20 OCT 2005
2417: RETURN(l_return_status);
2418: END Set_Attributes;
2419: BEGIN
2420: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2421: G_PKG_NAME,
2422: p_init_msg_list,
2423: l_api_version,
2424: p_api_version,

Line 2427: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2423: l_api_version,
2424: p_api_version,
2425: 'PVT',
2426: x_return_status);
2427: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2428: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2429: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2430: RAISE OKL_API.G_EXCEPTION_ERROR;
2431: END IF;

Line 2428: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2424: p_api_version,
2425: 'PVT',
2426: x_return_status);
2427: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2428: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2429: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2430: RAISE OKL_API.G_EXCEPTION_ERROR;
2431: END IF;
2432: --- Setting item attributes

Line 2429: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2425: 'PVT',
2426: x_return_status);
2427: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2428: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2429: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2430: RAISE OKL_API.G_EXCEPTION_ERROR;
2431: END IF;
2432: --- Setting item attributes
2433: l_return_status := Set_Attributes(

Line 2430: RAISE OKL_API.G_EXCEPTION_ERROR;

2426: x_return_status);
2427: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2428: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2429: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2430: RAISE OKL_API.G_EXCEPTION_ERROR;
2431: END IF;
2432: --- Setting item attributes
2433: l_return_status := Set_Attributes(
2434: p_cblv_rec, -- IN

Line 2437: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2433: l_return_status := Set_Attributes(
2434: p_cblv_rec, -- IN
2435: l_cblv_rec); --dkagrawa changed x_cblv_rec to l_cblv_rec -- OUT
2436: --- If any errors happen abort API
2437: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2438: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;

Line 2438: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2434: p_cblv_rec, -- IN
2435: l_cblv_rec); --dkagrawa changed x_cblv_rec to l_cblv_rec -- OUT
2436: --- If any errors happen abort API
2437: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2438: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);

Line 2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2435: l_cblv_rec); --dkagrawa changed x_cblv_rec to l_cblv_rec -- OUT
2436: --- If any errors happen abort API
2437: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2438: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2440: RAISE OKL_API.G_EXCEPTION_ERROR;

2436: --- If any errors happen abort API
2437: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2438: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2439: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2445: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2446: RAISE OKL_API.G_EXCEPTION_ERROR;
2447: END IF;

Line 2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2440: RAISE OKL_API.G_EXCEPTION_ERROR;
2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2445: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2446: RAISE OKL_API.G_EXCEPTION_ERROR;
2447: END IF;
2448: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);

Line 2445: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2441: END IF;
2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2445: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2446: RAISE OKL_API.G_EXCEPTION_ERROR;
2447: END IF;
2448: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
2449: --- Validate all non-missing attributes (Item Level Validation)

Line 2446: RAISE OKL_API.G_EXCEPTION_ERROR;

2442: l_return_status := populate_new_record(l_cblv_rec, l_def_cblv_rec);
2443: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2444: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2445: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2446: RAISE OKL_API.G_EXCEPTION_ERROR;
2447: END IF;
2448: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
2449: --- Validate all non-missing attributes (Item Level Validation)
2450: l_return_status := Validate_Attributes(l_def_cblv_rec);

Line 2452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2448: l_def_cblv_rec := fill_who_columns(l_def_cblv_rec);
2449: --- Validate all non-missing attributes (Item Level Validation)
2450: l_return_status := Validate_Attributes(l_def_cblv_rec);
2451: --- If any errors happen abort API
2452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;

Line 2453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2449: --- Validate all non-missing attributes (Item Level Validation)
2450: l_return_status := Validate_Attributes(l_def_cblv_rec);
2451: --- If any errors happen abort API
2452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);

Line 2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2450: l_return_status := Validate_Attributes(l_def_cblv_rec);
2451: --- If any errors happen abort API
2452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2455: RAISE OKL_API.G_EXCEPTION_ERROR;

2451: --- If any errors happen abort API
2452: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2453: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

Line 2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2454: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2460: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2461: RAISE OKL_API.G_EXCEPTION_ERROR;
2462: END IF;

Line 2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2455: RAISE OKL_API.G_EXCEPTION_ERROR;
2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2460: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2461: RAISE OKL_API.G_EXCEPTION_ERROR;
2462: END IF;
2463:

Line 2460: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2456: END IF;
2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2460: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2461: RAISE OKL_API.G_EXCEPTION_ERROR;
2462: END IF;
2463:
2464: -- Lock the Record

Line 2461: RAISE OKL_API.G_EXCEPTION_ERROR;

2457: l_return_status := Validate_Record(l_def_cblv_rec, l_db_cblv_rec);
2458: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2459: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2460: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2461: RAISE OKL_API.G_EXCEPTION_ERROR;
2462: END IF;
2463:
2464: -- Lock the Record
2465: lock_row(

Line 2474: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2470: x_msg_data => x_msg_data,
2471: --code changed by pgomes on 18 OCT 2005
2472: --p_cblv_rec => p_cblv_rec);
2473: p_cblv_rec => l_def_cblv_rec);
2474: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2476: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2477: RAISE OKL_API.G_EXCEPTION_ERROR;
2478: END IF;

Line 2475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2471: --code changed by pgomes on 18 OCT 2005
2472: --p_cblv_rec => p_cblv_rec);
2473: p_cblv_rec => l_def_cblv_rec);
2474: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2476: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2477: RAISE OKL_API.G_EXCEPTION_ERROR;
2478: END IF;
2479:

Line 2476: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2472: --p_cblv_rec => p_cblv_rec);
2473: p_cblv_rec => l_def_cblv_rec);
2474: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2476: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2477: RAISE OKL_API.G_EXCEPTION_ERROR;
2478: END IF;
2479:
2480: -----------------------------------------

Line 2477: RAISE OKL_API.G_EXCEPTION_ERROR;

2473: p_cblv_rec => l_def_cblv_rec);
2474: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2475: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2476: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2477: RAISE OKL_API.G_EXCEPTION_ERROR;
2478: END IF;
2479:
2480: -----------------------------------------
2481: -- Move VIEW record to "Child" records --

Line 2495: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2491: x_msg_data,
2492: l_cbl_rec,
2493: lx_cbl_rec
2494: );
2495: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2497: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2498: RAISE OKL_API.G_EXCEPTION_ERROR;
2499: END IF;

Line 2496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2492: l_cbl_rec,
2493: lx_cbl_rec
2494: );
2495: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2497: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2498: RAISE OKL_API.G_EXCEPTION_ERROR;
2499: END IF;
2500: migrate(lx_cbl_rec, l_def_cblv_rec);

Line 2497: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2493: lx_cbl_rec
2494: );
2495: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2497: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2498: RAISE OKL_API.G_EXCEPTION_ERROR;
2499: END IF;
2500: migrate(lx_cbl_rec, l_def_cblv_rec);
2501: x_cblv_rec := l_def_cblv_rec;

Line 2498: RAISE OKL_API.G_EXCEPTION_ERROR;

2494: );
2495: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2496: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2497: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2498: RAISE OKL_API.G_EXCEPTION_ERROR;
2499: END IF;
2500: migrate(lx_cbl_rec, l_def_cblv_rec);
2501: x_cblv_rec := l_def_cblv_rec;
2502: x_return_status := l_return_status;

Line 2503: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2499: END IF;
2500: migrate(lx_cbl_rec, l_def_cblv_rec);
2501: x_cblv_rec := l_def_cblv_rec;
2502: x_return_status := l_return_status;
2503: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2504: EXCEPTION
2505: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2507: (

Line 2505: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2501: x_cblv_rec := l_def_cblv_rec;
2502: x_return_status := l_return_status;
2503: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2504: EXCEPTION
2505: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2507: (
2508: l_api_name,
2509: G_PKG_NAME,

Line 2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2502: x_return_status := l_return_status;
2503: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2504: EXCEPTION
2505: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2507: (
2508: l_api_name,
2509: G_PKG_NAME,
2510: 'OKL_API.G_RET_STS_ERROR',

Line 2510: 'OKL_API.G_RET_STS_ERROR',

2506: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2507: (
2508: l_api_name,
2509: G_PKG_NAME,
2510: 'OKL_API.G_RET_STS_ERROR',
2511: x_msg_count,
2512: x_msg_data,
2513: '_PVT'
2514: );

Line 2515: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2511: x_msg_count,
2512: x_msg_data,
2513: '_PVT'
2514: );
2515: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2516: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2517: (
2518: l_api_name,
2519: G_PKG_NAME,

Line 2516: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2512: x_msg_data,
2513: '_PVT'
2514: );
2515: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2516: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2517: (
2518: l_api_name,
2519: G_PKG_NAME,
2520: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2520: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2516: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2517: (
2518: l_api_name,
2519: G_PKG_NAME,
2520: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2521: x_msg_count,
2522: x_msg_data,
2523: '_PVT'
2524: );

Line 2526: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2522: x_msg_data,
2523: '_PVT'
2524: );
2525: WHEN OTHERS THEN
2526: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2527: (
2528: l_api_name,
2529: G_PKG_NAME,
2530: 'OTHERS',

Line 2541: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2537: -- PL/SQL TBL update_row for:cblv_tbl --
2538: ----------------------------------------
2539: PROCEDURE update_row(
2540: p_api_version IN NUMBER,
2541: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2542: x_return_status OUT NOCOPY VARCHAR2,
2543: x_msg_count OUT NOCOPY NUMBER,
2544: x_msg_data OUT NOCOPY VARCHAR2,
2545: p_cblv_tbl IN cblv_tbl_type,

Line 2547: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

2543: x_msg_count OUT NOCOPY NUMBER,
2544: x_msg_data OUT NOCOPY VARCHAR2,
2545: p_cblv_tbl IN cblv_tbl_type,
2546: x_cblv_tbl OUT NOCOPY cblv_tbl_type,
2547: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
2548:
2549: l_api_version CONSTANT NUMBER := 1;
2550: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2551: i NUMBER := 0;

Line 2553: OKL_API.init_msg_list(p_init_msg_list);

2549: l_api_version CONSTANT NUMBER := 1;
2550: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2551: i NUMBER := 0;
2552: BEGIN
2553: OKL_API.init_msg_list(p_init_msg_list);
2554: -- Make sure PL/SQL table has records in it before passing
2555: IF (p_cblv_tbl.COUNT > 0) THEN
2556: i := p_cblv_tbl.FIRST;
2557: LOOP

Line 2559: l_error_rec OKL_API.ERROR_REC_TYPE;

2555: IF (p_cblv_tbl.COUNT > 0) THEN
2556: i := p_cblv_tbl.FIRST;
2557: LOOP
2558: DECLARE
2559: l_error_rec OKL_API.ERROR_REC_TYPE;
2560: BEGIN
2561: l_error_rec.api_name := l_api_name;
2562: l_error_rec.api_package := G_PKG_NAME;
2563: l_error_rec.idx := i;

Line 2566: p_init_msg_list => OKL_API.G_FALSE,

2562: l_error_rec.api_package := G_PKG_NAME;
2563: l_error_rec.idx := i;
2564: update_row (
2565: p_api_version => p_api_version,
2566: p_init_msg_list => OKL_API.G_FALSE,
2567: x_return_status => l_error_rec.error_type,
2568: x_msg_count => l_error_rec.msg_count,
2569: x_msg_data => l_error_rec.msg_data,
2570: p_cblv_rec => p_cblv_tbl(i),

Line 2572: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

2568: x_msg_count => l_error_rec.msg_count,
2569: x_msg_data => l_error_rec.msg_data,
2570: p_cblv_rec => p_cblv_tbl(i),
2571: x_cblv_rec => x_cblv_tbl(i));
2572: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
2573: l_error_rec.sqlcode := SQLCODE;
2574: load_error_tbl(l_error_rec, px_error_tbl);
2575: ELSE
2576: x_msg_count := l_error_rec.msg_count;

Line 2580: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2576: x_msg_count := l_error_rec.msg_count;
2577: x_msg_data := l_error_rec.msg_data;
2578: END IF;
2579: EXCEPTION
2580: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2581: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2582: l_error_rec.sqlcode := SQLCODE;
2583: load_error_tbl(l_error_rec, px_error_tbl);
2584: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2581: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

2577: x_msg_data := l_error_rec.msg_data;
2578: END IF;
2579: EXCEPTION
2580: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2581: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2582: l_error_rec.sqlcode := SQLCODE;
2583: load_error_tbl(l_error_rec, px_error_tbl);
2584: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2585: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 2584: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2580: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2581: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2582: l_error_rec.sqlcode := SQLCODE;
2583: load_error_tbl(l_error_rec, px_error_tbl);
2584: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2585: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2586: l_error_rec.sqlcode := SQLCODE;
2587: load_error_tbl(l_error_rec, px_error_tbl);
2588: WHEN OTHERS THEN

Line 2585: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

2581: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2582: l_error_rec.sqlcode := SQLCODE;
2583: load_error_tbl(l_error_rec, px_error_tbl);
2584: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2585: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2586: l_error_rec.sqlcode := SQLCODE;
2587: load_error_tbl(l_error_rec, px_error_tbl);
2588: WHEN OTHERS THEN
2589: l_error_rec.error_type := 'OTHERS';

Line 2600: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2596: END IF;
2597: -- Loop through the error_tbl to find the error with the highest severity
2598: -- and return it.
2599: x_return_status := find_highest_exception(px_error_tbl);
2600: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2601: EXCEPTION
2602: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2603: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2604: (

Line 2602: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2598: -- and return it.
2599: x_return_status := find_highest_exception(px_error_tbl);
2600: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2601: EXCEPTION
2602: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2603: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2604: (
2605: l_api_name,
2606: G_PKG_NAME,

Line 2603: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2599: x_return_status := find_highest_exception(px_error_tbl);
2600: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2601: EXCEPTION
2602: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2603: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2604: (
2605: l_api_name,
2606: G_PKG_NAME,
2607: 'OKL_API.G_RET_STS_ERROR',

Line 2607: 'OKL_API.G_RET_STS_ERROR',

2603: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2604: (
2605: l_api_name,
2606: G_PKG_NAME,
2607: 'OKL_API.G_RET_STS_ERROR',
2608: x_msg_count,
2609: x_msg_data,
2610: '_PVT'
2611: );

Line 2612: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2608: x_msg_count,
2609: x_msg_data,
2610: '_PVT'
2611: );
2612: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2613: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2614: (
2615: l_api_name,
2616: G_PKG_NAME,

Line 2613: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2609: x_msg_data,
2610: '_PVT'
2611: );
2612: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2613: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2614: (
2615: l_api_name,
2616: G_PKG_NAME,
2617: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2617: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2613: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2614: (
2615: l_api_name,
2616: G_PKG_NAME,
2617: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2618: x_msg_count,
2619: x_msg_data,
2620: '_PVT'
2621: );

Line 2623: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2619: x_msg_data,
2620: '_PVT'
2621: );
2622: WHEN OTHERS THEN
2623: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2624: (
2625: l_api_name,
2626: G_PKG_NAME,
2627: 'OTHERS',

Line 2639: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2635: -- PL/SQL TBL update_row for:CBLV_TBL --
2636: ----------------------------------------
2637: PROCEDURE update_row(
2638: p_api_version IN NUMBER,
2639: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2640: x_return_status OUT NOCOPY VARCHAR2,
2641: x_msg_count OUT NOCOPY NUMBER,
2642: x_msg_data OUT NOCOPY VARCHAR2,
2643: p_cblv_tbl IN cblv_tbl_type,

Line 2648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2644: x_cblv_tbl OUT NOCOPY cblv_tbl_type) IS
2645:
2646: l_api_version CONSTANT NUMBER := 1;
2647: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2649: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2650: BEGIN
2651: OKL_API.init_msg_list(p_init_msg_list);
2652: -- Make sure PL/SQL table has records in it before passing

Line 2649: l_error_tbl OKL_API.ERROR_TBL_TYPE;

2645:
2646: l_api_version CONSTANT NUMBER := 1;
2647: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2649: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2650: BEGIN
2651: OKL_API.init_msg_list(p_init_msg_list);
2652: -- Make sure PL/SQL table has records in it before passing
2653: IF (p_cblv_tbl.COUNT > 0) THEN

Line 2651: OKL_API.init_msg_list(p_init_msg_list);

2647: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2648: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2649: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2650: BEGIN
2651: OKL_API.init_msg_list(p_init_msg_list);
2652: -- Make sure PL/SQL table has records in it before passing
2653: IF (p_cblv_tbl.COUNT > 0) THEN
2654: update_row (
2655: p_api_version => p_api_version,

Line 2656: p_init_msg_list => OKL_API.G_FALSE,

2652: -- Make sure PL/SQL table has records in it before passing
2653: IF (p_cblv_tbl.COUNT > 0) THEN
2654: update_row (
2655: p_api_version => p_api_version,
2656: p_init_msg_list => OKL_API.G_FALSE,
2657: x_return_status => x_return_status,
2658: x_msg_count => x_msg_count,
2659: x_msg_data => x_msg_data,
2660: p_cblv_tbl => p_cblv_tbl,

Line 2664: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2660: p_cblv_tbl => p_cblv_tbl,
2661: x_cblv_tbl => x_cblv_tbl,
2662: px_error_tbl => l_error_tbl);
2663: END IF;
2664: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2665: EXCEPTION
2666: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2668: (

Line 2666: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2662: px_error_tbl => l_error_tbl);
2663: END IF;
2664: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2665: EXCEPTION
2666: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2668: (
2669: l_api_name,
2670: G_PKG_NAME,

Line 2667: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2663: END IF;
2664: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2665: EXCEPTION
2666: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2668: (
2669: l_api_name,
2670: G_PKG_NAME,
2671: 'OKL_API.G_RET_STS_ERROR',

Line 2671: 'OKL_API.G_RET_STS_ERROR',

2667: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2668: (
2669: l_api_name,
2670: G_PKG_NAME,
2671: 'OKL_API.G_RET_STS_ERROR',
2672: x_msg_count,
2673: x_msg_data,
2674: '_PVT'
2675: );

Line 2676: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2672: x_msg_count,
2673: x_msg_data,
2674: '_PVT'
2675: );
2676: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2677: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2678: (
2679: l_api_name,
2680: G_PKG_NAME,

Line 2677: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2673: x_msg_data,
2674: '_PVT'
2675: );
2676: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2677: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2678: (
2679: l_api_name,
2680: G_PKG_NAME,
2681: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2681: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2677: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2678: (
2679: l_api_name,
2680: G_PKG_NAME,
2681: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2682: x_msg_count,
2683: x_msg_data,
2684: '_PVT'
2685: );

Line 2687: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2683: x_msg_data,
2684: '_PVT'
2685: );
2686: WHEN OTHERS THEN
2687: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2688: (
2689: l_api_name,
2690: G_PKG_NAME,
2691: 'OTHERS',

Line 2705: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2701: ------------------------------------------
2702: -- delete_row for:OKL_CONTRACT_BALANCES --
2703: ------------------------------------------
2704: PROCEDURE delete_row(
2705: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2706: x_return_status OUT NOCOPY VARCHAR2,
2707: x_msg_count OUT NOCOPY NUMBER,
2708: x_msg_data OUT NOCOPY VARCHAR2,
2709: p_cbl_rec IN cbl_rec_type) IS

Line 2713: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2709: p_cbl_rec IN cbl_rec_type) IS
2710:
2711: l_api_version CONSTANT NUMBER := 1;
2712: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
2713: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2714: l_cbl_rec cbl_rec_type := p_cbl_rec;
2715: l_row_notfound BOOLEAN := TRUE;
2716: BEGIN
2717: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

Line 2717: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2713: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2714: l_cbl_rec cbl_rec_type := p_cbl_rec;
2715: l_row_notfound BOOLEAN := TRUE;
2716: BEGIN
2717: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2718: p_init_msg_list,
2719: 'PVT',
2720: x_return_status);
2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2717: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2718: p_init_msg_list,
2719: 'PVT',
2720: x_return_status);
2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2724: RAISE OKL_API.G_EXCEPTION_ERROR;
2725: END IF;

Line 2722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2718: p_init_msg_list,
2719: 'PVT',
2720: x_return_status);
2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2724: RAISE OKL_API.G_EXCEPTION_ERROR;
2725: END IF;
2726:

Line 2723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2719: 'PVT',
2720: x_return_status);
2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2724: RAISE OKL_API.G_EXCEPTION_ERROR;
2725: END IF;
2726:
2727: DELETE FROM OKL_CONTRACT_BALANCES

Line 2724: RAISE OKL_API.G_EXCEPTION_ERROR;

2720: x_return_status);
2721: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2722: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2723: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2724: RAISE OKL_API.G_EXCEPTION_ERROR;
2725: END IF;
2726:
2727: DELETE FROM OKL_CONTRACT_BALANCES
2728: WHERE ID = p_cbl_rec.id;

Line 2731: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2727: DELETE FROM OKL_CONTRACT_BALANCES
2728: WHERE ID = p_cbl_rec.id;
2729:
2730: x_return_status := l_return_status;
2731: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2732: EXCEPTION
2733: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2734: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2735: (

Line 2733: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2729:
2730: x_return_status := l_return_status;
2731: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2732: EXCEPTION
2733: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2734: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2735: (
2736: l_api_name,
2737: G_PKG_NAME,

Line 2734: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2730: x_return_status := l_return_status;
2731: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2732: EXCEPTION
2733: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2734: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2735: (
2736: l_api_name,
2737: G_PKG_NAME,
2738: 'OKL_API.G_RET_STS_ERROR',

Line 2738: 'OKL_API.G_RET_STS_ERROR',

2734: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2735: (
2736: l_api_name,
2737: G_PKG_NAME,
2738: 'OKL_API.G_RET_STS_ERROR',
2739: x_msg_count,
2740: x_msg_data,
2741: '_PVT'
2742: );

Line 2743: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2739: x_msg_count,
2740: x_msg_data,
2741: '_PVT'
2742: );
2743: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2744: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2745: (
2746: l_api_name,
2747: G_PKG_NAME,

Line 2744: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2740: x_msg_data,
2741: '_PVT'
2742: );
2743: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2744: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2745: (
2746: l_api_name,
2747: G_PKG_NAME,
2748: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2748: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2744: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2745: (
2746: l_api_name,
2747: G_PKG_NAME,
2748: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2749: x_msg_count,
2750: x_msg_data,
2751: '_PVT'
2752: );

Line 2754: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2750: x_msg_data,
2751: '_PVT'
2752: );
2753: WHEN OTHERS THEN
2754: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2755: (
2756: l_api_name,
2757: G_PKG_NAME,
2758: 'OTHERS',

Line 2769: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2765: -- delete_row for:OKL_CONTRACT_BALANCES_V --
2766: --------------------------------------------
2767: PROCEDURE delete_row(
2768: p_api_version IN NUMBER,
2769: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2770: x_return_status OUT NOCOPY VARCHAR2,
2771: x_msg_count OUT NOCOPY NUMBER,
2772: x_msg_data OUT NOCOPY VARCHAR2,
2773: p_cblv_rec IN cblv_rec_type) IS

Line 2777: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2773: p_cblv_rec IN cblv_rec_type) IS
2774:
2775: l_api_version CONSTANT NUMBER := 1;
2776: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2777: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2778: l_cblv_rec cblv_rec_type := p_cblv_rec;
2779: l_cbl_rec cbl_rec_type;
2780: BEGIN
2781: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

Line 2781: l_return_status := OKL_API.START_ACTIVITY(l_api_name,

2777: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2778: l_cblv_rec cblv_rec_type := p_cblv_rec;
2779: l_cbl_rec cbl_rec_type;
2780: BEGIN
2781: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
2782: G_PKG_NAME,
2783: p_init_msg_list,
2784: l_api_version,
2785: p_api_version,

Line 2788: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2784: l_api_version,
2785: p_api_version,
2786: 'PVT',
2787: x_return_status);
2788: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2790: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2791: RAISE OKL_API.G_EXCEPTION_ERROR;
2792: END IF;

Line 2789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2785: p_api_version,
2786: 'PVT',
2787: x_return_status);
2788: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2790: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2791: RAISE OKL_API.G_EXCEPTION_ERROR;
2792: END IF;
2793: -----------------------------------------

Line 2790: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2786: 'PVT',
2787: x_return_status);
2788: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2790: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2791: RAISE OKL_API.G_EXCEPTION_ERROR;
2792: END IF;
2793: -----------------------------------------
2794: -- Move VIEW record to "Child" records --

Line 2791: RAISE OKL_API.G_EXCEPTION_ERROR;

2787: x_return_status);
2788: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2789: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2790: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2791: RAISE OKL_API.G_EXCEPTION_ERROR;
2792: END IF;
2793: -----------------------------------------
2794: -- Move VIEW record to "Child" records --
2795: -----------------------------------------

Line 2807: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN

2803: x_msg_count,
2804: x_msg_data,
2805: l_cbl_rec
2806: );
2807: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2810: RAISE OKL_API.G_EXCEPTION_ERROR;
2811: END IF;

Line 2808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;

2804: x_msg_data,
2805: l_cbl_rec
2806: );
2807: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2810: RAISE OKL_API.G_EXCEPTION_ERROR;
2811: END IF;
2812: x_return_status := l_return_status;

Line 2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN

2805: l_cbl_rec
2806: );
2807: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2810: RAISE OKL_API.G_EXCEPTION_ERROR;
2811: END IF;
2812: x_return_status := l_return_status;
2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2810: RAISE OKL_API.G_EXCEPTION_ERROR;

2806: );
2807: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
2808: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2810: RAISE OKL_API.G_EXCEPTION_ERROR;
2811: END IF;
2812: x_return_status := l_return_status;
2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2814: EXCEPTION

Line 2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2809: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
2810: RAISE OKL_API.G_EXCEPTION_ERROR;
2811: END IF;
2812: x_return_status := l_return_status;
2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2814: EXCEPTION
2815: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2816: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2817: (

Line 2815: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2811: END IF;
2812: x_return_status := l_return_status;
2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2814: EXCEPTION
2815: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2816: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2817: (
2818: l_api_name,
2819: G_PKG_NAME,

Line 2816: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2812: x_return_status := l_return_status;
2813: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2814: EXCEPTION
2815: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2816: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2817: (
2818: l_api_name,
2819: G_PKG_NAME,
2820: 'OKL_API.G_RET_STS_ERROR',

Line 2820: 'OKL_API.G_RET_STS_ERROR',

2816: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2817: (
2818: l_api_name,
2819: G_PKG_NAME,
2820: 'OKL_API.G_RET_STS_ERROR',
2821: x_msg_count,
2822: x_msg_data,
2823: '_PVT'
2824: );

Line 2825: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2821: x_msg_count,
2822: x_msg_data,
2823: '_PVT'
2824: );
2825: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2826: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2827: (
2828: l_api_name,
2829: G_PKG_NAME,

Line 2826: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2822: x_msg_data,
2823: '_PVT'
2824: );
2825: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2826: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2827: (
2828: l_api_name,
2829: G_PKG_NAME,
2830: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2830: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2826: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2827: (
2828: l_api_name,
2829: G_PKG_NAME,
2830: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2831: x_msg_count,
2832: x_msg_data,
2833: '_PVT'
2834: );

Line 2836: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2832: x_msg_data,
2833: '_PVT'
2834: );
2835: WHEN OTHERS THEN
2836: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2837: (
2838: l_api_name,
2839: G_PKG_NAME,
2840: 'OTHERS',

Line 2851: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2847: -- PL/SQL TBL delete_row for:OKL_CONTRACT_BALANCES_V --
2848: -------------------------------------------------------
2849: PROCEDURE delete_row(
2850: p_api_version IN NUMBER,
2851: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2852: x_return_status OUT NOCOPY VARCHAR2,
2853: x_msg_count OUT NOCOPY NUMBER,
2854: x_msg_data OUT NOCOPY VARCHAR2,
2855: p_cblv_tbl IN cblv_tbl_type,

Line 2856: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS

2852: x_return_status OUT NOCOPY VARCHAR2,
2853: x_msg_count OUT NOCOPY NUMBER,
2854: x_msg_data OUT NOCOPY VARCHAR2,
2855: p_cblv_tbl IN cblv_tbl_type,
2856: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
2857:
2858: l_api_version CONSTANT NUMBER := 1;
2859: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2860: i NUMBER := 0;

Line 2862: OKL_API.init_msg_list(p_init_msg_list);

2858: l_api_version CONSTANT NUMBER := 1;
2859: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2860: i NUMBER := 0;
2861: BEGIN
2862: OKL_API.init_msg_list(p_init_msg_list);
2863: -- Make sure PL/SQL table has records in it before passing
2864: IF (p_cblv_tbl.COUNT > 0) THEN
2865: i := p_cblv_tbl.FIRST;
2866: LOOP

Line 2868: l_error_rec OKL_API.ERROR_REC_TYPE;

2864: IF (p_cblv_tbl.COUNT > 0) THEN
2865: i := p_cblv_tbl.FIRST;
2866: LOOP
2867: DECLARE
2868: l_error_rec OKL_API.ERROR_REC_TYPE;
2869: BEGIN
2870: l_error_rec.api_name := l_api_name;
2871: l_error_rec.api_package := G_PKG_NAME;
2872: l_error_rec.idx := i;

Line 2875: p_init_msg_list => OKL_API.G_FALSE,

2871: l_error_rec.api_package := G_PKG_NAME;
2872: l_error_rec.idx := i;
2873: delete_row (
2874: p_api_version => p_api_version,
2875: p_init_msg_list => OKL_API.G_FALSE,
2876: x_return_status => l_error_rec.error_type,
2877: x_msg_count => l_error_rec.msg_count,
2878: x_msg_data => l_error_rec.msg_data,
2879: p_cblv_rec => p_cblv_tbl(i));

Line 2880: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN

2876: x_return_status => l_error_rec.error_type,
2877: x_msg_count => l_error_rec.msg_count,
2878: x_msg_data => l_error_rec.msg_data,
2879: p_cblv_rec => p_cblv_tbl(i));
2880: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
2881: l_error_rec.sqlcode := SQLCODE;
2882: load_error_tbl(l_error_rec, px_error_tbl);
2883: ELSE
2884: x_msg_count := l_error_rec.msg_count;

Line 2888: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2884: x_msg_count := l_error_rec.msg_count;
2885: x_msg_data := l_error_rec.msg_data;
2886: END IF;
2887: EXCEPTION
2888: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2889: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2890: l_error_rec.sqlcode := SQLCODE;
2891: load_error_tbl(l_error_rec, px_error_tbl);
2892: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2889: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;

2885: x_msg_data := l_error_rec.msg_data;
2886: END IF;
2887: EXCEPTION
2888: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2889: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2890: l_error_rec.sqlcode := SQLCODE;
2891: load_error_tbl(l_error_rec, px_error_tbl);
2892: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2893: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

Line 2892: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2888: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2889: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2890: l_error_rec.sqlcode := SQLCODE;
2891: load_error_tbl(l_error_rec, px_error_tbl);
2892: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2893: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2894: l_error_rec.sqlcode := SQLCODE;
2895: load_error_tbl(l_error_rec, px_error_tbl);
2896: WHEN OTHERS THEN

Line 2893: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;

2889: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
2890: l_error_rec.sqlcode := SQLCODE;
2891: load_error_tbl(l_error_rec, px_error_tbl);
2892: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2893: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
2894: l_error_rec.sqlcode := SQLCODE;
2895: load_error_tbl(l_error_rec, px_error_tbl);
2896: WHEN OTHERS THEN
2897: l_error_rec.error_type := 'OTHERS';

Line 2908: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2904: END IF;
2905: -- Loop through the error_tbl to find the error with the highest severity
2906: -- and return it.
2907: x_return_status := find_highest_exception(px_error_tbl);
2908: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2909: EXCEPTION
2910: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2912: (

Line 2910: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2906: -- and return it.
2907: x_return_status := find_highest_exception(px_error_tbl);
2908: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2909: EXCEPTION
2910: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2912: (
2913: l_api_name,
2914: G_PKG_NAME,

Line 2911: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2907: x_return_status := find_highest_exception(px_error_tbl);
2908: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2909: EXCEPTION
2910: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2912: (
2913: l_api_name,
2914: G_PKG_NAME,
2915: 'OKL_API.G_RET_STS_ERROR',

Line 2915: 'OKL_API.G_RET_STS_ERROR',

2911: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2912: (
2913: l_api_name,
2914: G_PKG_NAME,
2915: 'OKL_API.G_RET_STS_ERROR',
2916: x_msg_count,
2917: x_msg_data,
2918: '_PVT'
2919: );

Line 2920: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2916: x_msg_count,
2917: x_msg_data,
2918: '_PVT'
2919: );
2920: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2921: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2922: (
2923: l_api_name,
2924: G_PKG_NAME,

Line 2921: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2917: x_msg_data,
2918: '_PVT'
2919: );
2920: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2921: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2922: (
2923: l_api_name,
2924: G_PKG_NAME,
2925: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2925: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2921: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2922: (
2923: l_api_name,
2924: G_PKG_NAME,
2925: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2926: x_msg_count,
2927: x_msg_data,
2928: '_PVT'
2929: );

Line 2931: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2927: x_msg_data,
2928: '_PVT'
2929: );
2930: WHEN OTHERS THEN
2931: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2932: (
2933: l_api_name,
2934: G_PKG_NAME,
2935: 'OTHERS',

Line 2947: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,

2943: -- PL/SQL TBL delete_row for:OKL_CONTRACT_BALANCES_V --
2944: -------------------------------------------------------
2945: PROCEDURE delete_row(
2946: p_api_version IN NUMBER,
2947: p_init_msg_list IN VARCHAR2 DEFAULT OKL_API.G_FALSE,
2948: x_return_status OUT NOCOPY VARCHAR2,
2949: x_msg_count OUT NOCOPY NUMBER,
2950: x_msg_data OUT NOCOPY VARCHAR2,
2951: p_cblv_tbl IN cblv_tbl_type) IS

Line 2955: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;

2951: p_cblv_tbl IN cblv_tbl_type) IS
2952:
2953: l_api_version CONSTANT NUMBER := 1;
2954: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2955: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2956: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2957: BEGIN
2958: OKL_API.init_msg_list(p_init_msg_list);
2959: -- Make sure PL/SQL table has records in it before passing

Line 2956: l_error_tbl OKL_API.ERROR_TBL_TYPE;

2952:
2953: l_api_version CONSTANT NUMBER := 1;
2954: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2955: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2956: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2957: BEGIN
2958: OKL_API.init_msg_list(p_init_msg_list);
2959: -- Make sure PL/SQL table has records in it before passing
2960: IF (p_cblv_tbl.COUNT > 0) THEN

Line 2958: OKL_API.init_msg_list(p_init_msg_list);

2954: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2955: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2956: l_error_tbl OKL_API.ERROR_TBL_TYPE;
2957: BEGIN
2958: OKL_API.init_msg_list(p_init_msg_list);
2959: -- Make sure PL/SQL table has records in it before passing
2960: IF (p_cblv_tbl.COUNT > 0) THEN
2961: delete_row (
2962: p_api_version => p_api_version,

Line 2963: p_init_msg_list => OKL_API.G_FALSE,

2959: -- Make sure PL/SQL table has records in it before passing
2960: IF (p_cblv_tbl.COUNT > 0) THEN
2961: delete_row (
2962: p_api_version => p_api_version,
2963: p_init_msg_list => OKL_API.G_FALSE,
2964: x_return_status => x_return_status,
2965: x_msg_count => x_msg_count,
2966: x_msg_data => x_msg_data,
2967: p_cblv_tbl => p_cblv_tbl,

Line 2970: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);

2966: x_msg_data => x_msg_data,
2967: p_cblv_tbl => p_cblv_tbl,
2968: px_error_tbl => l_error_tbl);
2969: END IF;
2970: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2971: EXCEPTION
2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2973: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2974: (

Line 2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN

2968: px_error_tbl => l_error_tbl);
2969: END IF;
2970: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2971: EXCEPTION
2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2973: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2974: (
2975: l_api_name,
2976: G_PKG_NAME,

Line 2973: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2969: END IF;
2970: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
2971: EXCEPTION
2972: WHEN OKL_API.G_EXCEPTION_ERROR THEN
2973: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2974: (
2975: l_api_name,
2976: G_PKG_NAME,
2977: 'OKL_API.G_RET_STS_ERROR',

Line 2977: 'OKL_API.G_RET_STS_ERROR',

2973: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2974: (
2975: l_api_name,
2976: G_PKG_NAME,
2977: 'OKL_API.G_RET_STS_ERROR',
2978: x_msg_count,
2979: x_msg_data,
2980: '_PVT'
2981: );

Line 2982: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2978: x_msg_count,
2979: x_msg_data,
2980: '_PVT'
2981: );
2982: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2983: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2984: (
2985: l_api_name,
2986: G_PKG_NAME,

Line 2983: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2979: x_msg_data,
2980: '_PVT'
2981: );
2982: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2983: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2984: (
2985: l_api_name,
2986: G_PKG_NAME,
2987: 'OKL_API.G_RET_STS_UNEXP_ERROR',

Line 2987: 'OKL_API.G_RET_STS_UNEXP_ERROR',

2983: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2984: (
2985: l_api_name,
2986: G_PKG_NAME,
2987: 'OKL_API.G_RET_STS_UNEXP_ERROR',
2988: x_msg_count,
2989: x_msg_data,
2990: '_PVT'
2991: );

Line 2993: x_return_status := OKL_API.HANDLE_EXCEPTIONS

2989: x_msg_data,
2990: '_PVT'
2991: );
2992: WHEN OTHERS THEN
2993: x_return_status := OKL_API.HANDLE_EXCEPTIONS
2994: (
2995: l_api_name,
2996: G_PKG_NAME,
2997: 'OTHERS',