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.OKS_IHD_PVT dependencies on OKC_API

Line 7: px_error_rec IN OUT NOCOPY OKC_API.ERROR_REC_TYPE,

3: ---------------------------------------------------------------------------
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKC_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKC_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 OKC_API.ERROR_TBL_TYPE) IS

4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKC_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKC_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 OKC_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 OKC_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKC_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;

Line 42: p_error_tbl IN OKC_API.ERROR_TBL_TYPE

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

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

40: -- in a OKC_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKC_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKC_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 <> OKC_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 <> OKC_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKC_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 <> OKC_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 <> OKC_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKC_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 := OKC_API.G_RET_STS_SUCCESS;

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

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

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

Line 214: x_return_status := OKC_API.G_RET_STS_ERROR;

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

Line 343: x_return_status := OKC_API.G_RET_STS_SUCCESS;

339: ) RETURN ihd_rec_type IS
340: l_ihd_rec ihd_rec_type;
341: l_row_notfound BOOLEAN := TRUE;
342: BEGIN
343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
344: l_ihd_rec := get_rec(p_ihd_rec, l_row_notfound);
345: IF (l_row_notfound) THEN
346: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
347: x_return_status := OKC_API.G_RET_STS_ERROR;

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

342: BEGIN
343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
344: l_ihd_rec := get_rec(p_ihd_rec, l_row_notfound);
345: IF (l_row_notfound) THEN
346: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
347: x_return_status := OKC_API.G_RET_STS_ERROR;
348: END IF;
349: RETURN(l_ihd_rec);
350: END get_rec;

Line 347: x_return_status := OKC_API.G_RET_STS_ERROR;

343: x_return_status := OKC_API.G_RET_STS_SUCCESS;
344: l_ihd_rec := get_rec(p_ihd_rec, l_row_notfound);
345: IF (l_row_notfound) THEN
346: OKC_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
347: x_return_status := OKC_API.G_RET_STS_ERROR;
348: END IF;
349: RETURN(l_ihd_rec);
350: END get_rec;
351: -----------------------------------------------------------

Line 369: IF (l_ihdv_rec.id = OKC_API.G_MISS_NUM ) THEN

365: p_ihdv_rec IN ihdv_rec_type
366: ) RETURN ihdv_rec_type IS
367: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
368: BEGIN
369: IF (l_ihdv_rec.id = OKC_API.G_MISS_NUM ) THEN
370: l_ihdv_rec.id := NULL;
371: END IF;
372: IF (l_ihdv_rec.ins_id = OKC_API.G_MISS_NUM ) THEN
373: l_ihdv_rec.ins_id := NULL;

Line 372: IF (l_ihdv_rec.ins_id = OKC_API.G_MISS_NUM ) THEN

368: BEGIN
369: IF (l_ihdv_rec.id = OKC_API.G_MISS_NUM ) THEN
370: l_ihdv_rec.id := NULL;
371: END IF;
372: IF (l_ihdv_rec.ins_id = OKC_API.G_MISS_NUM ) THEN
373: l_ihdv_rec.ins_id := NULL;
374: END IF;
375: IF (l_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE ) THEN
376: l_ihdv_rec.transaction_date := NULL;

Line 375: IF (l_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE ) THEN

371: END IF;
372: IF (l_ihdv_rec.ins_id = OKC_API.G_MISS_NUM ) THEN
373: l_ihdv_rec.ins_id := NULL;
374: END IF;
375: IF (l_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE ) THEN
376: l_ihdv_rec.transaction_date := NULL;
377: END IF;
378: IF (l_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR ) THEN
379: l_ihdv_rec.transaction_type := NULL;

Line 378: IF (l_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR ) THEN

374: END IF;
375: IF (l_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE ) THEN
376: l_ihdv_rec.transaction_date := NULL;
377: END IF;
378: IF (l_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR ) THEN
379: l_ihdv_rec.transaction_type := NULL;
380: END IF;
381: IF (l_ihdv_rec.system_id = OKC_API.G_MISS_NUM ) THEN
382: l_ihdv_rec.system_id := NULL;

Line 381: IF (l_ihdv_rec.system_id = OKC_API.G_MISS_NUM ) THEN

377: END IF;
378: IF (l_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR ) THEN
379: l_ihdv_rec.transaction_type := NULL;
380: END IF;
381: IF (l_ihdv_rec.system_id = OKC_API.G_MISS_NUM ) THEN
382: l_ihdv_rec.system_id := NULL;
383: END IF;
384: IF (l_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM ) THEN
385: l_ihdv_rec.instance_id_new := NULL;

Line 384: IF (l_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM ) THEN

380: END IF;
381: IF (l_ihdv_rec.system_id = OKC_API.G_MISS_NUM ) THEN
382: l_ihdv_rec.system_id := NULL;
383: END IF;
384: IF (l_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM ) THEN
385: l_ihdv_rec.instance_id_new := NULL;
386: END IF;
387: IF (l_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM ) THEN
388: l_ihdv_rec.instance_qty_old := NULL;

Line 387: IF (l_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM ) THEN

383: END IF;
384: IF (l_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM ) THEN
385: l_ihdv_rec.instance_id_new := NULL;
386: END IF;
387: IF (l_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM ) THEN
388: l_ihdv_rec.instance_qty_old := NULL;
389: END IF;
390: IF (l_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM ) THEN
391: l_ihdv_rec.instance_qty_new := NULL;

Line 390: IF (l_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM ) THEN

386: END IF;
387: IF (l_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM ) THEN
388: l_ihdv_rec.instance_qty_old := NULL;
389: END IF;
390: IF (l_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM ) THEN
391: l_ihdv_rec.instance_qty_new := NULL;
392: END IF;
393: IF (l_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM ) THEN
394: l_ihdv_rec.instance_amt_old := NULL;

Line 393: IF (l_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM ) THEN

389: END IF;
390: IF (l_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM ) THEN
391: l_ihdv_rec.instance_qty_new := NULL;
392: END IF;
393: IF (l_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM ) THEN
394: l_ihdv_rec.instance_amt_old := NULL;
395: END IF;
396: IF (l_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM ) THEN
397: l_ihdv_rec.instance_amt_new := NULL;

Line 396: IF (l_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM ) THEN

392: END IF;
393: IF (l_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM ) THEN
394: l_ihdv_rec.instance_amt_old := NULL;
395: END IF;
396: IF (l_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM ) THEN
397: l_ihdv_rec.instance_amt_new := NULL;
398: END IF;
399: IF (l_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM ) THEN
400: l_ihdv_rec.old_contract_id := NULL;

Line 399: IF (l_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM ) THEN

395: END IF;
396: IF (l_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM ) THEN
397: l_ihdv_rec.instance_amt_new := NULL;
398: END IF;
399: IF (l_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM ) THEN
400: l_ihdv_rec.old_contract_id := NULL;
401: END IF;
402: IF (l_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE ) THEN
403: l_ihdv_rec.old_contact_start_date := NULL;

Line 402: IF (l_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE ) THEN

398: END IF;
399: IF (l_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM ) THEN
400: l_ihdv_rec.old_contract_id := NULL;
401: END IF;
402: IF (l_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE ) THEN
403: l_ihdv_rec.old_contact_start_date := NULL;
404: END IF;
405: IF (l_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE ) THEN
406: l_ihdv_rec.old_contract_end_date := NULL;

Line 405: IF (l_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE ) THEN

401: END IF;
402: IF (l_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE ) THEN
403: l_ihdv_rec.old_contact_start_date := NULL;
404: END IF;
405: IF (l_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE ) THEN
406: l_ihdv_rec.old_contract_end_date := NULL;
407: END IF;
408: IF (l_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM ) THEN
409: l_ihdv_rec.new_contract_id := NULL;

Line 408: IF (l_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM ) THEN

404: END IF;
405: IF (l_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE ) THEN
406: l_ihdv_rec.old_contract_end_date := NULL;
407: END IF;
408: IF (l_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM ) THEN
409: l_ihdv_rec.new_contract_id := NULL;
410: END IF;
411: IF (l_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE ) THEN
412: l_ihdv_rec.new_contact_start_date := NULL;

Line 411: IF (l_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE ) THEN

407: END IF;
408: IF (l_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM ) THEN
409: l_ihdv_rec.new_contract_id := NULL;
410: END IF;
411: IF (l_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE ) THEN
412: l_ihdv_rec.new_contact_start_date := NULL;
413: END IF;
414: IF (l_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE ) THEN
415: l_ihdv_rec.new_contract_end_date := NULL;

Line 414: IF (l_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE ) THEN

410: END IF;
411: IF (l_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE ) THEN
412: l_ihdv_rec.new_contact_start_date := NULL;
413: END IF;
414: IF (l_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE ) THEN
415: l_ihdv_rec.new_contract_end_date := NULL;
416: END IF;
417: IF (l_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM ) THEN
418: l_ihdv_rec.old_service_line_id := NULL;

Line 417: IF (l_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM ) THEN

413: END IF;
414: IF (l_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE ) THEN
415: l_ihdv_rec.new_contract_end_date := NULL;
416: END IF;
417: IF (l_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM ) THEN
418: l_ihdv_rec.old_service_line_id := NULL;
419: END IF;
420: IF (l_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE ) THEN
421: l_ihdv_rec.old_service_start_date := NULL;

Line 420: IF (l_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE ) THEN

416: END IF;
417: IF (l_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM ) THEN
418: l_ihdv_rec.old_service_line_id := NULL;
419: END IF;
420: IF (l_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE ) THEN
421: l_ihdv_rec.old_service_start_date := NULL;
422: END IF;
423: IF (l_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE ) THEN
424: l_ihdv_rec.old_service_end_date := NULL;

Line 423: IF (l_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE ) THEN

419: END IF;
420: IF (l_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE ) THEN
421: l_ihdv_rec.old_service_start_date := NULL;
422: END IF;
423: IF (l_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE ) THEN
424: l_ihdv_rec.old_service_end_date := NULL;
425: END IF;
426: IF (l_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM ) THEN
427: l_ihdv_rec.new_service_line_id := NULL;

Line 426: IF (l_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM ) THEN

422: END IF;
423: IF (l_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE ) THEN
424: l_ihdv_rec.old_service_end_date := NULL;
425: END IF;
426: IF (l_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM ) THEN
427: l_ihdv_rec.new_service_line_id := NULL;
428: END IF;
429: IF (l_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE ) THEN
430: l_ihdv_rec.new_service_start_date := NULL;

Line 429: IF (l_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE ) THEN

425: END IF;
426: IF (l_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM ) THEN
427: l_ihdv_rec.new_service_line_id := NULL;
428: END IF;
429: IF (l_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE ) THEN
430: l_ihdv_rec.new_service_start_date := NULL;
431: END IF;
432: IF (l_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE ) THEN
433: l_ihdv_rec.new_service_end_date := NULL;

Line 432: IF (l_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE ) THEN

428: END IF;
429: IF (l_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE ) THEN
430: l_ihdv_rec.new_service_start_date := NULL;
431: END IF;
432: IF (l_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE ) THEN
433: l_ihdv_rec.new_service_end_date := NULL;
434: END IF;
435: IF (l_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM ) THEN
436: l_ihdv_rec.old_subline_id := NULL;

Line 435: IF (l_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM ) THEN

431: END IF;
432: IF (l_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE ) THEN
433: l_ihdv_rec.new_service_end_date := NULL;
434: END IF;
435: IF (l_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM ) THEN
436: l_ihdv_rec.old_subline_id := NULL;
437: END IF;
438: IF (l_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE ) THEN
439: l_ihdv_rec.old_subline_start_date := NULL;

Line 438: IF (l_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE ) THEN

434: END IF;
435: IF (l_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM ) THEN
436: l_ihdv_rec.old_subline_id := NULL;
437: END IF;
438: IF (l_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE ) THEN
439: l_ihdv_rec.old_subline_start_date := NULL;
440: END IF;
441: IF (l_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE ) THEN
442: l_ihdv_rec.old_subline_end_date := NULL;

Line 441: IF (l_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE ) THEN

437: END IF;
438: IF (l_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE ) THEN
439: l_ihdv_rec.old_subline_start_date := NULL;
440: END IF;
441: IF (l_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE ) THEN
442: l_ihdv_rec.old_subline_end_date := NULL;
443: END IF;
444: IF (l_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM ) THEN
445: l_ihdv_rec.new_subline_id := NULL;

Line 444: IF (l_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM ) THEN

440: END IF;
441: IF (l_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE ) THEN
442: l_ihdv_rec.old_subline_end_date := NULL;
443: END IF;
444: IF (l_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM ) THEN
445: l_ihdv_rec.new_subline_id := NULL;
446: END IF;
447: IF (l_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE ) THEN
448: l_ihdv_rec.new_subline_start_date := NULL;

Line 447: IF (l_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE ) THEN

443: END IF;
444: IF (l_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM ) THEN
445: l_ihdv_rec.new_subline_id := NULL;
446: END IF;
447: IF (l_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE ) THEN
448: l_ihdv_rec.new_subline_start_date := NULL;
449: END IF;
450: IF (l_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE ) THEN
451: l_ihdv_rec.new_subline_end_date := NULL;

Line 450: IF (l_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE ) THEN

446: END IF;
447: IF (l_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE ) THEN
448: l_ihdv_rec.new_subline_start_date := NULL;
449: END IF;
450: IF (l_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE ) THEN
451: l_ihdv_rec.new_subline_end_date := NULL;
452: END IF;
453: IF (l_ihdv_rec.old_customer = OKC_API.G_MISS_NUM ) THEN
454: l_ihdv_rec.old_customer := NULL;

Line 453: IF (l_ihdv_rec.old_customer = OKC_API.G_MISS_NUM ) THEN

449: END IF;
450: IF (l_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE ) THEN
451: l_ihdv_rec.new_subline_end_date := NULL;
452: END IF;
453: IF (l_ihdv_rec.old_customer = OKC_API.G_MISS_NUM ) THEN
454: l_ihdv_rec.old_customer := NULL;
455: END IF;
456: IF (l_ihdv_rec.new_customer = OKC_API.G_MISS_NUM ) THEN
457: l_ihdv_rec.new_customer := NULL;

Line 456: IF (l_ihdv_rec.new_customer = OKC_API.G_MISS_NUM ) THEN

452: END IF;
453: IF (l_ihdv_rec.old_customer = OKC_API.G_MISS_NUM ) THEN
454: l_ihdv_rec.old_customer := NULL;
455: END IF;
456: IF (l_ihdv_rec.new_customer = OKC_API.G_MISS_NUM ) THEN
457: l_ihdv_rec.new_customer := NULL;
458: END IF;
459: IF (l_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR ) THEN
460: l_ihdv_rec.old_k_status := NULL;

Line 459: IF (l_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR ) THEN

455: END IF;
456: IF (l_ihdv_rec.new_customer = OKC_API.G_MISS_NUM ) THEN
457: l_ihdv_rec.new_customer := NULL;
458: END IF;
459: IF (l_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR ) THEN
460: l_ihdv_rec.old_k_status := NULL;
461: END IF;
462: IF (l_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR ) THEN
463: l_ihdv_rec.new_k_status := NULL;

Line 462: IF (l_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR ) THEN

458: END IF;
459: IF (l_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR ) THEN
460: l_ihdv_rec.old_k_status := NULL;
461: END IF;
462: IF (l_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR ) THEN
463: l_ihdv_rec.new_k_status := NULL;
464: END IF;
465: IF (l_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE ) THEN
466: l_ihdv_rec.subline_date_terminated := NULL;

Line 465: IF (l_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE ) THEN

461: END IF;
462: IF (l_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR ) THEN
463: l_ihdv_rec.new_k_status := NULL;
464: END IF;
465: IF (l_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE ) THEN
466: l_ihdv_rec.subline_date_terminated := NULL;
467: END IF;
468: IF (l_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR ) THEN
469: l_ihdv_rec.transfer_option := NULL;

Line 468: IF (l_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR ) THEN

464: END IF;
465: IF (l_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE ) THEN
466: l_ihdv_rec.subline_date_terminated := NULL;
467: END IF;
468: IF (l_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR ) THEN
469: l_ihdv_rec.transfer_option := NULL;
470: END IF;
471: IF (l_ihdv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
472: l_ihdv_rec.created_by := NULL;

Line 471: IF (l_ihdv_rec.created_by = OKC_API.G_MISS_NUM ) THEN

467: END IF;
468: IF (l_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR ) THEN
469: l_ihdv_rec.transfer_option := NULL;
470: END IF;
471: IF (l_ihdv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
472: l_ihdv_rec.created_by := NULL;
473: END IF;
474: IF (l_ihdv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
475: l_ihdv_rec.creation_date := NULL;

Line 474: IF (l_ihdv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN

470: END IF;
471: IF (l_ihdv_rec.created_by = OKC_API.G_MISS_NUM ) THEN
472: l_ihdv_rec.created_by := NULL;
473: END IF;
474: IF (l_ihdv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
475: l_ihdv_rec.creation_date := NULL;
476: END IF;
477: IF (l_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
478: l_ihdv_rec.last_updated_by := NULL;

Line 477: IF (l_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN

473: END IF;
474: IF (l_ihdv_rec.creation_date = OKC_API.G_MISS_DATE ) THEN
475: l_ihdv_rec.creation_date := NULL;
476: END IF;
477: IF (l_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
478: l_ihdv_rec.last_updated_by := NULL;
479: END IF;
480: IF (l_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
481: l_ihdv_rec.last_update_date := NULL;

Line 480: IF (l_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN

476: END IF;
477: IF (l_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM ) THEN
478: l_ihdv_rec.last_updated_by := NULL;
479: END IF;
480: IF (l_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
481: l_ihdv_rec.last_update_date := NULL;
482: END IF;
483: IF (l_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
484: l_ihdv_rec.last_update_login := NULL;

Line 483: IF (l_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN

479: END IF;
480: IF (l_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE ) THEN
481: l_ihdv_rec.last_update_date := NULL;
482: END IF;
483: IF (l_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
484: l_ihdv_rec.last_update_login := NULL;
485: END IF;
486: IF (l_ihdv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
487: l_ihdv_rec.object_version_number := NULL;

Line 486: IF (l_ihdv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN

482: END IF;
483: IF (l_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM ) THEN
484: l_ihdv_rec.last_update_login := NULL;
485: END IF;
486: IF (l_ihdv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
487: l_ihdv_rec.object_version_number := NULL;
488: END IF;
489: IF (l_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM ) THEN
490: l_ihdv_rec.security_group_id := NULL;

Line 489: IF (l_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM ) THEN

485: END IF;
486: IF (l_ihdv_rec.object_version_number = OKC_API.G_MISS_NUM ) THEN
487: l_ihdv_rec.object_version_number := NULL;
488: END IF;
489: IF (l_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM ) THEN
490: l_ihdv_rec.security_group_id := NULL;
491: END IF;
492: IF (l_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE ) THEN
493: l_ihdv_rec.date_cancelled := NULL;

Line 492: IF (l_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE ) THEN

488: END IF;
489: IF (l_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM ) THEN
490: l_ihdv_rec.security_group_id := NULL;
491: END IF;
492: IF (l_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE ) THEN
493: l_ihdv_rec.date_cancelled := NULL;
494: END IF;
495: RETURN(l_ihdv_rec);
496: END null_out_defaults;

Line 504: x_return_status := OKC_API.G_RET_STS_SUCCESS;

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

Line 505: IF (p_id = OKC_API.G_MISS_NUM OR

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

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

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

Line 509: x_return_status := OKC_API.G_RET_STS_ERROR;

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

Line 516: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

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

Line 522: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

518: ,p_token1 => G_SQLCODE_TOKEN
519: ,p_token1_value => SQLCODE
520: ,p_token2 => G_SQLERRM_TOKEN
521: ,p_token2_value => SQLERRM);
522: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
523: END validate_id;
524: ----------------------------------------------------
525: -- Validate_Attributes for: OBJECT_VERSION_NUMBER --
526: ----------------------------------------------------

Line 531: x_return_status := OKC_API.G_RET_STS_SUCCESS;

527: PROCEDURE validate_object_version_number(
528: x_return_status OUT NOCOPY VARCHAR2,
529: p_object_version_number IN NUMBER) IS
530: BEGIN
531: x_return_status := OKC_API.G_RET_STS_SUCCESS;
532: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
533: p_object_version_number IS NULL)
534: THEN
535: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');

Line 532: IF (p_object_version_number = OKC_API.G_MISS_NUM OR

528: x_return_status OUT NOCOPY VARCHAR2,
529: p_object_version_number IN NUMBER) IS
530: BEGIN
531: x_return_status := OKC_API.G_RET_STS_SUCCESS;
532: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
533: p_object_version_number IS NULL)
534: THEN
535: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
536: x_return_status := OKC_API.G_RET_STS_ERROR;

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

531: x_return_status := OKC_API.G_RET_STS_SUCCESS;
532: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
533: p_object_version_number IS NULL)
534: THEN
535: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
536: x_return_status := OKC_API.G_RET_STS_ERROR;
537: RAISE G_EXCEPTION_HALT_VALIDATION;
538: END IF;
539: EXCEPTION

Line 536: x_return_status := OKC_API.G_RET_STS_ERROR;

532: IF (p_object_version_number = OKC_API.G_MISS_NUM OR
533: p_object_version_number IS NULL)
534: THEN
535: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'object_version_number');
536: x_return_status := OKC_API.G_RET_STS_ERROR;
537: RAISE G_EXCEPTION_HALT_VALIDATION;
538: END IF;
539: EXCEPTION
540: WHEN G_EXCEPTION_HALT_VALIDATION THEN

Line 543: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

539: EXCEPTION
540: WHEN G_EXCEPTION_HALT_VALIDATION THEN
541: null;
542: WHEN OTHERS THEN
543: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
544: ,p_msg_name => G_UNEXPECTED_ERROR
545: ,p_token1 => G_SQLCODE_TOKEN
546: ,p_token1_value => SQLCODE
547: ,p_token2 => G_SQLERRM_TOKEN

Line 549: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

545: ,p_token1 => G_SQLCODE_TOKEN
546: ,p_token1_value => SQLCODE
547: ,p_token2 => G_SQLERRM_TOKEN
548: ,p_token2_value => SQLERRM);
549: x_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
550: END validate_object_version_number;
551: ---------------------------------------------------------------------------
552: -- FUNCTION Validate_Attributes
553: ---------------------------------------------------------------------------

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

556: -----------------------------------------------------
557: FUNCTION Validate_Attributes (
558: p_ihdv_rec IN ihdv_rec_type
559: ) RETURN VARCHAR2 IS
560: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
561: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
562: BEGIN
563: -----------------------------
564: -- Column Level Validation --

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

557: FUNCTION Validate_Attributes (
558: p_ihdv_rec IN ihdv_rec_type
559: ) RETURN VARCHAR2 IS
560: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
561: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
562: BEGIN
563: -----------------------------
564: -- Column Level Validation --
565: -----------------------------

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

566: -- ***
567: -- id
568: -- ***
569: validate_id(x_return_status, p_ihdv_rec.id);
570: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
571: l_return_status := x_return_status;
572: RAISE G_EXCEPTION_HALT_VALIDATION;
573: END IF;
574:

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

575: -- ***
576: -- object_version_number
577: -- ***
578: validate_object_version_number(x_return_status, p_ihdv_rec.object_version_number);
579: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
580: l_return_status := x_return_status;
581: RAISE G_EXCEPTION_HALT_VALIDATION;
582: END IF;
583:

Line 589: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME

585: EXCEPTION
586: WHEN G_EXCEPTION_HALT_VALIDATION THEN
587: RETURN(l_return_status);
588: WHEN OTHERS THEN
589: OKC_API.SET_MESSAGE( p_app_name => G_APP_NAME
590: ,p_msg_name => G_UNEXPECTED_ERROR
591: ,p_token1 => G_SQLCODE_TOKEN
592: ,p_token1_value => SQLCODE
593: ,p_token2 => G_SQLERRM_TOKEN

Line 595: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;

591: ,p_token1 => G_SQLCODE_TOKEN
592: ,p_token1_value => SQLCODE
593: ,p_token2 => G_SQLERRM_TOKEN
594: ,p_token2_value => SQLERRM);
595: l_return_status := OKC_API.G_RET_STS_UNEXP_ERROR;
596: RETURN(l_return_status);
597: END Validate_Attributes;
598: ---------------------------------------------------------------------------
599: -- PROCEDURE Validate_Record

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

604: FUNCTION Validate_Record (
605: p_ihdv_rec IN ihdv_rec_type,
606: p_db_ihdv_rec IN ihdv_rec_type
607: ) RETURN VARCHAR2 IS
608: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
609: BEGIN
610: RETURN (l_return_status);
611: END Validate_Record;
612: FUNCTION Validate_Record (

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

611: END Validate_Record;
612: FUNCTION Validate_Record (
613: p_ihdv_rec IN ihdv_rec_type
614: ) RETURN VARCHAR2 IS
615: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
616: l_db_ihdv_rec ihdv_rec_type := get_rec(p_ihdv_rec);
617: BEGIN
618: l_return_status := Validate_Record(p_ihdv_rec => p_ihdv_rec,
619: p_db_ihdv_rec => l_db_ihdv_rec);

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

732: p_ihdv_rec IN ihdv_rec_type) IS
733:
734: l_api_version CONSTANT NUMBER := 1;
735: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
736: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
737: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
738: l_ihd_rec ihd_rec_type;
739: l_ihd_rec ihd_rec_type;
740: BEGIN

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

737: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
738: l_ihd_rec ihd_rec_type;
739: l_ihd_rec ihd_rec_type;
740: BEGIN
741: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
742: G_PKG_NAME,
743: p_init_msg_list,
744: l_api_version,
745: p_api_version,

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

744: l_api_version,
745: p_api_version,
746: '_PVT',
747: x_return_status);
748: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
749: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
750: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
751: RAISE OKC_API.G_EXCEPTION_ERROR;
752: END IF;

Line 749: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

745: p_api_version,
746: '_PVT',
747: x_return_status);
748: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
749: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
750: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
751: RAISE OKC_API.G_EXCEPTION_ERROR;
752: END IF;
753: --- Validate all non-missing attributes (Item Level Validation)

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

746: '_PVT',
747: x_return_status);
748: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
749: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
750: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
751: RAISE OKC_API.G_EXCEPTION_ERROR;
752: END IF;
753: --- Validate all non-missing attributes (Item Level Validation)
754: l_return_status := Validate_Attributes(l_ihdv_rec);

Line 751: RAISE OKC_API.G_EXCEPTION_ERROR;

747: x_return_status);
748: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
749: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
750: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
751: RAISE OKC_API.G_EXCEPTION_ERROR;
752: END IF;
753: --- Validate all non-missing attributes (Item Level Validation)
754: l_return_status := Validate_Attributes(l_ihdv_rec);
755: --- If any errors happen abort API

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

752: END IF;
753: --- Validate all non-missing attributes (Item Level Validation)
754: l_return_status := Validate_Attributes(l_ihdv_rec);
755: --- If any errors happen abort API
756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;

Line 757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

753: --- Validate all non-missing attributes (Item Level Validation)
754: l_return_status := Validate_Attributes(l_ihdv_rec);
755: --- If any errors happen abort API
756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);

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

754: l_return_status := Validate_Attributes(l_ihdv_rec);
755: --- If any errors happen abort API
756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 759: RAISE OKC_API.G_EXCEPTION_ERROR;

755: --- If any errors happen abort API
756: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
757: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

758: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
764: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_ERROR;
766: END IF;

Line 763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

759: RAISE OKC_API.G_EXCEPTION_ERROR;
760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
764: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_ERROR;
766: END IF;
767: x_return_status := l_return_status;

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

760: END IF;
761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
764: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_ERROR;
766: END IF;
767: x_return_status := l_return_status;
768: EXCEPTION

Line 765: RAISE OKC_API.G_EXCEPTION_ERROR;

761: l_return_status := Validate_Record(l_ihdv_rec);
762: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
763: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
764: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
765: RAISE OKC_API.G_EXCEPTION_ERROR;
766: END IF;
767: x_return_status := l_return_status;
768: EXCEPTION
769: WHEN OKC_API.G_EXCEPTION_ERROR THEN

Line 769: WHEN OKC_API.G_EXCEPTION_ERROR THEN

765: RAISE OKC_API.G_EXCEPTION_ERROR;
766: END IF;
767: x_return_status := l_return_status;
768: EXCEPTION
769: WHEN OKC_API.G_EXCEPTION_ERROR THEN
770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,

Line 770: x_return_status := OKC_API.HANDLE_EXCEPTIONS

766: END IF;
767: x_return_status := l_return_status;
768: EXCEPTION
769: WHEN OKC_API.G_EXCEPTION_ERROR THEN
770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,
774: 'OKC_API.G_RET_STS_ERROR',

Line 774: 'OKC_API.G_RET_STS_ERROR',

770: x_return_status := OKC_API.HANDLE_EXCEPTIONS
771: (
772: l_api_name,
773: G_PKG_NAME,
774: 'OKC_API.G_RET_STS_ERROR',
775: x_msg_count,
776: x_msg_data,
777: '_PVT'
778: );

Line 779: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 780: x_return_status := OKC_API.HANDLE_EXCEPTIONS

776: x_msg_data,
777: '_PVT'
778: );
779: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
780: x_return_status := OKC_API.HANDLE_EXCEPTIONS
781: (
782: l_api_name,
783: G_PKG_NAME,
784: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 784: 'OKC_API.G_RET_STS_UNEXP_ERROR',

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

Line 790: x_return_status := OKC_API.HANDLE_EXCEPTIONS

786: x_msg_data,
787: '_PVT'
788: );
789: WHEN OTHERS THEN
790: x_return_status := OKC_API.HANDLE_EXCEPTIONS
791: (
792: l_api_name,
793: G_PKG_NAME,
794: 'OTHERS',

Line 810: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS

806: x_return_status OUT NOCOPY VARCHAR2,
807: x_msg_count OUT NOCOPY NUMBER,
808: x_msg_data OUT NOCOPY VARCHAR2,
809: p_ihdv_tbl IN ihdv_tbl_type,
810: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
811:
812: l_api_version CONSTANT NUMBER := 1;
813: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
814: i NUMBER := 0;

Line 816: OKC_API.init_msg_list(p_init_msg_list);

812: l_api_version CONSTANT NUMBER := 1;
813: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
814: i NUMBER := 0;
815: BEGIN
816: OKC_API.init_msg_list(p_init_msg_list);
817: -- Make sure PL/SQL table has records in it before passing
818: IF (p_ihdv_tbl.COUNT > 0) THEN
819: i := p_ihdv_tbl.FIRST;
820: LOOP

Line 822: l_error_rec OKC_API.ERROR_REC_TYPE;

818: IF (p_ihdv_tbl.COUNT > 0) THEN
819: i := p_ihdv_tbl.FIRST;
820: LOOP
821: DECLARE
822: l_error_rec OKC_API.ERROR_REC_TYPE;
823: BEGIN
824: l_error_rec.api_name := l_api_name;
825: l_error_rec.api_package := G_PKG_NAME;
826: l_error_rec.idx := i;

Line 829: p_init_msg_list => OKC_API.G_FALSE,

825: l_error_rec.api_package := G_PKG_NAME;
826: l_error_rec.idx := i;
827: validate_row (
828: p_api_version => p_api_version,
829: p_init_msg_list => OKC_API.G_FALSE,
830: x_return_status => l_error_rec.error_type,
831: x_msg_count => l_error_rec.msg_count,
832: x_msg_data => l_error_rec.msg_data,
833: p_ihdv_rec => p_ihdv_tbl(i));

Line 834: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

830: x_return_status => l_error_rec.error_type,
831: x_msg_count => l_error_rec.msg_count,
832: x_msg_data => l_error_rec.msg_data,
833: p_ihdv_rec => p_ihdv_tbl(i));
834: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
835: l_error_rec.sqlcode := SQLCODE;
836: load_error_tbl(l_error_rec, px_error_tbl);
837: ELSE
838: x_msg_count := l_error_rec.msg_count;

Line 842: WHEN OKC_API.G_EXCEPTION_ERROR THEN

838: x_msg_count := l_error_rec.msg_count;
839: x_msg_data := l_error_rec.msg_data;
840: END IF;
841: EXCEPTION
842: WHEN OKC_API.G_EXCEPTION_ERROR THEN
843: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
844: l_error_rec.sqlcode := SQLCODE;
845: load_error_tbl(l_error_rec, px_error_tbl);
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 843: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

839: x_msg_data := l_error_rec.msg_data;
840: END IF;
841: EXCEPTION
842: WHEN OKC_API.G_EXCEPTION_ERROR THEN
843: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
844: l_error_rec.sqlcode := SQLCODE;
845: load_error_tbl(l_error_rec, px_error_tbl);
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
847: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

842: WHEN OKC_API.G_EXCEPTION_ERROR THEN
843: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
844: l_error_rec.sqlcode := SQLCODE;
845: load_error_tbl(l_error_rec, px_error_tbl);
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
847: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
848: l_error_rec.sqlcode := SQLCODE;
849: load_error_tbl(l_error_rec, px_error_tbl);
850: WHEN OTHERS THEN

Line 847: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

843: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
844: l_error_rec.sqlcode := SQLCODE;
845: load_error_tbl(l_error_rec, px_error_tbl);
846: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
847: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
848: l_error_rec.sqlcode := SQLCODE;
849: load_error_tbl(l_error_rec, px_error_tbl);
850: WHEN OTHERS THEN
851: l_error_rec.error_type := 'OTHERS';

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

858: END IF;
859: -- Loop through the error_tbl to find the error with the highest severity
860: -- and return it.
861: x_return_status := find_highest_exception(px_error_tbl);
862: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
863: EXCEPTION
864: WHEN OKC_API.G_EXCEPTION_ERROR THEN
865: x_return_status := OKC_API.HANDLE_EXCEPTIONS
866: (

Line 864: WHEN OKC_API.G_EXCEPTION_ERROR THEN

860: -- and return it.
861: x_return_status := find_highest_exception(px_error_tbl);
862: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
863: EXCEPTION
864: WHEN OKC_API.G_EXCEPTION_ERROR THEN
865: x_return_status := OKC_API.HANDLE_EXCEPTIONS
866: (
867: l_api_name,
868: G_PKG_NAME,

Line 865: x_return_status := OKC_API.HANDLE_EXCEPTIONS

861: x_return_status := find_highest_exception(px_error_tbl);
862: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
863: EXCEPTION
864: WHEN OKC_API.G_EXCEPTION_ERROR THEN
865: x_return_status := OKC_API.HANDLE_EXCEPTIONS
866: (
867: l_api_name,
868: G_PKG_NAME,
869: 'OKC_API.G_RET_STS_ERROR',

Line 869: 'OKC_API.G_RET_STS_ERROR',

865: x_return_status := OKC_API.HANDLE_EXCEPTIONS
866: (
867: l_api_name,
868: G_PKG_NAME,
869: 'OKC_API.G_RET_STS_ERROR',
870: x_msg_count,
871: x_msg_data,
872: '_PVT'
873: );

Line 874: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

870: x_msg_count,
871: x_msg_data,
872: '_PVT'
873: );
874: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
875: x_return_status := OKC_API.HANDLE_EXCEPTIONS
876: (
877: l_api_name,
878: G_PKG_NAME,

Line 875: x_return_status := OKC_API.HANDLE_EXCEPTIONS

871: x_msg_data,
872: '_PVT'
873: );
874: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
875: x_return_status := OKC_API.HANDLE_EXCEPTIONS
876: (
877: l_api_name,
878: G_PKG_NAME,
879: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 879: 'OKC_API.G_RET_STS_UNEXP_ERROR',

875: x_return_status := OKC_API.HANDLE_EXCEPTIONS
876: (
877: l_api_name,
878: G_PKG_NAME,
879: 'OKC_API.G_RET_STS_UNEXP_ERROR',
880: x_msg_count,
881: x_msg_data,
882: '_PVT'
883: );

Line 885: x_return_status := OKC_API.HANDLE_EXCEPTIONS

881: x_msg_data,
882: '_PVT'
883: );
884: WHEN OTHERS THEN
885: x_return_status := OKC_API.HANDLE_EXCEPTIONS
886: (
887: l_api_name,
888: G_PKG_NAME,
889: 'OTHERS',

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

905: p_ihdv_tbl IN ihdv_tbl_type) IS
906:
907: l_api_version CONSTANT NUMBER := 1;
908: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
909: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
910: l_error_tbl OKC_API.ERROR_TBL_TYPE;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: -- Make sure PL/SQL table has records in it before passing

Line 910: l_error_tbl OKC_API.ERROR_TBL_TYPE;

906:
907: l_api_version CONSTANT NUMBER := 1;
908: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
909: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
910: l_error_tbl OKC_API.ERROR_TBL_TYPE;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: -- Make sure PL/SQL table has records in it before passing
914: IF (p_ihdv_tbl.COUNT > 0) THEN

Line 912: OKC_API.init_msg_list(p_init_msg_list);

908: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
909: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
910: l_error_tbl OKC_API.ERROR_TBL_TYPE;
911: BEGIN
912: OKC_API.init_msg_list(p_init_msg_list);
913: -- Make sure PL/SQL table has records in it before passing
914: IF (p_ihdv_tbl.COUNT > 0) THEN
915: validate_row (
916: p_api_version => p_api_version,

Line 917: p_init_msg_list => OKC_API.G_FALSE,

913: -- Make sure PL/SQL table has records in it before passing
914: IF (p_ihdv_tbl.COUNT > 0) THEN
915: validate_row (
916: p_api_version => p_api_version,
917: p_init_msg_list => OKC_API.G_FALSE,
918: x_return_status => x_return_status,
919: x_msg_count => x_msg_count,
920: x_msg_data => x_msg_data,
921: p_ihdv_tbl => p_ihdv_tbl,

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

920: x_msg_data => x_msg_data,
921: p_ihdv_tbl => p_ihdv_tbl,
922: px_error_tbl => l_error_tbl);
923: END IF;
924: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
925: EXCEPTION
926: WHEN OKC_API.G_EXCEPTION_ERROR THEN
927: x_return_status := OKC_API.HANDLE_EXCEPTIONS
928: (

Line 926: WHEN OKC_API.G_EXCEPTION_ERROR THEN

922: px_error_tbl => l_error_tbl);
923: END IF;
924: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
925: EXCEPTION
926: WHEN OKC_API.G_EXCEPTION_ERROR THEN
927: x_return_status := OKC_API.HANDLE_EXCEPTIONS
928: (
929: l_api_name,
930: G_PKG_NAME,

Line 927: x_return_status := OKC_API.HANDLE_EXCEPTIONS

923: END IF;
924: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
925: EXCEPTION
926: WHEN OKC_API.G_EXCEPTION_ERROR THEN
927: x_return_status := OKC_API.HANDLE_EXCEPTIONS
928: (
929: l_api_name,
930: G_PKG_NAME,
931: 'OKC_API.G_RET_STS_ERROR',

Line 931: 'OKC_API.G_RET_STS_ERROR',

927: x_return_status := OKC_API.HANDLE_EXCEPTIONS
928: (
929: l_api_name,
930: G_PKG_NAME,
931: 'OKC_API.G_RET_STS_ERROR',
932: x_msg_count,
933: x_msg_data,
934: '_PVT'
935: );

Line 936: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

932: x_msg_count,
933: x_msg_data,
934: '_PVT'
935: );
936: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
937: x_return_status := OKC_API.HANDLE_EXCEPTIONS
938: (
939: l_api_name,
940: G_PKG_NAME,

Line 937: x_return_status := OKC_API.HANDLE_EXCEPTIONS

933: x_msg_data,
934: '_PVT'
935: );
936: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
937: x_return_status := OKC_API.HANDLE_EXCEPTIONS
938: (
939: l_api_name,
940: G_PKG_NAME,
941: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 941: 'OKC_API.G_RET_STS_UNEXP_ERROR',

937: x_return_status := OKC_API.HANDLE_EXCEPTIONS
938: (
939: l_api_name,
940: G_PKG_NAME,
941: 'OKC_API.G_RET_STS_UNEXP_ERROR',
942: x_msg_count,
943: x_msg_data,
944: '_PVT'
945: );

Line 947: x_return_status := OKC_API.HANDLE_EXCEPTIONS

943: x_msg_data,
944: '_PVT'
945: );
946: WHEN OTHERS THEN
947: x_return_status := OKC_API.HANDLE_EXCEPTIONS
948: (
949: l_api_name,
950: G_PKG_NAME,
951: 'OTHERS',

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

970: x_ihd_rec OUT NOCOPY ihd_rec_type) IS
971:
972: l_api_version CONSTANT NUMBER := 1;
973: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
974: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
975: l_ihd_rec ihd_rec_type := p_ihd_rec;
976: l_def_ihd_rec ihd_rec_type;
977: ----------------------------------------------
978: -- Set_Attributes for:OKS_INST_HIST_DETAILS --

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

980: FUNCTION Set_Attributes (
981: p_ihd_rec IN ihd_rec_type,
982: x_ihd_rec OUT NOCOPY ihd_rec_type
983: ) RETURN VARCHAR2 IS
984: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
985: BEGIN
986: x_ihd_rec := p_ihd_rec;
987: RETURN(l_return_status);
988: END Set_Attributes;

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

986: x_ihd_rec := p_ihd_rec;
987: RETURN(l_return_status);
988: END Set_Attributes;
989: BEGIN
990: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
991: p_init_msg_list,
992: '_PVT',
993: x_return_status);
994: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

990: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
991: p_init_msg_list,
992: '_PVT',
993: x_return_status);
994: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
996: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
997: RAISE OKC_API.G_EXCEPTION_ERROR;
998: END IF;

Line 995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

991: p_init_msg_list,
992: '_PVT',
993: x_return_status);
994: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
996: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
997: RAISE OKC_API.G_EXCEPTION_ERROR;
998: END IF;
999: --- Setting item atributes

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

992: '_PVT',
993: x_return_status);
994: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
996: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
997: RAISE OKC_API.G_EXCEPTION_ERROR;
998: END IF;
999: --- Setting item atributes
1000: l_return_status := Set_Attributes(

Line 997: RAISE OKC_API.G_EXCEPTION_ERROR;

993: x_return_status);
994: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
995: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
996: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
997: RAISE OKC_API.G_EXCEPTION_ERROR;
998: END IF;
999: --- Setting item atributes
1000: l_return_status := Set_Attributes(
1001: p_ihd_rec, -- IN

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

1000: l_return_status := Set_Attributes(
1001: p_ihd_rec, -- IN
1002: l_ihd_rec); -- OUT
1003: --- If any errors happen abort API
1004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;

Line 1005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1001: p_ihd_rec, -- IN
1002: l_ihd_rec); -- OUT
1003: --- If any errors happen abort API
1004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;
1009: INSERT INTO OKS_INST_HIST_DETAILS(

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

1002: l_ihd_rec); -- OUT
1003: --- If any errors happen abort API
1004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;
1009: INSERT INTO OKS_INST_HIST_DETAILS(
1010: id,

Line 1007: RAISE OKC_API.G_EXCEPTION_ERROR;

1003: --- If any errors happen abort API
1004: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1005: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1006: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1007: RAISE OKC_API.G_EXCEPTION_ERROR;
1008: END IF;
1009: INSERT INTO OKS_INST_HIST_DETAILS(
1010: id,
1011: ins_id,

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

1092: l_ihd_rec.date_cancelled);
1093: -- Set OUT values
1094: x_ihd_rec := l_ihd_rec;
1095: x_return_status := l_return_status;
1096: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1097: EXCEPTION
1098: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (

Line 1098: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1094: x_ihd_rec := l_ihd_rec;
1095: x_return_status := l_return_status;
1096: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1097: EXCEPTION
1098: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,

Line 1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1095: x_return_status := l_return_status;
1096: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1097: EXCEPTION
1098: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1099: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1100: (
1101: l_api_name,
1102: G_PKG_NAME,
1103: 'OKC_API.G_RET_STS_ERROR',

Line 1103: 'OKC_API.G_RET_STS_ERROR',

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

Line 1108: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1109: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

Line 1113: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1109: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1110: (
1111: l_api_name,
1112: G_PKG_NAME,
1113: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1114: x_msg_count,
1115: x_msg_data,
1116: '_PVT'
1117: );

Line 1119: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1115: x_msg_data,
1116: '_PVT'
1117: );
1118: WHEN OTHERS THEN
1119: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1120: (
1121: l_api_name,
1122: G_PKG_NAME,
1123: 'OTHERS',

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

1139: x_ihdv_rec OUT NOCOPY ihdv_rec_type) IS
1140:
1141: l_api_version CONSTANT NUMBER := 1;
1142: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
1143: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1144: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
1145: l_def_ihdv_rec ihdv_rec_type;
1146: l_ihd_rec ihd_rec_type;
1147: lx_ihd_rec ihd_rec_type;

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

1166: FUNCTION Set_Attributes (
1167: p_ihdv_rec IN ihdv_rec_type,
1168: x_ihdv_rec OUT NOCOPY ihdv_rec_type
1169: ) RETURN VARCHAR2 IS
1170: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1171: BEGIN
1172: x_ihdv_rec := p_ihdv_rec;
1173: x_ihdv_rec.OBJECT_VERSION_NUMBER := 1;
1174: RETURN(l_return_status);

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

1173: x_ihdv_rec.OBJECT_VERSION_NUMBER := 1;
1174: RETURN(l_return_status);
1175: END Set_Attributes;
1176: BEGIN
1177: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1178: G_PKG_NAME,
1179: p_init_msg_list,
1180: l_api_version,
1181: p_api_version,

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

1180: l_api_version,
1181: p_api_version,
1182: '_PVT',
1183: x_return_status);
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;

Line 1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1181: p_api_version,
1182: '_PVT',
1183: x_return_status);
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_ihdv_rec := null_out_defaults(p_ihdv_rec);

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

1182: '_PVT',
1183: x_return_status);
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_ihdv_rec := null_out_defaults(p_ihdv_rec);
1190: -- Set primary key value

Line 1187: RAISE OKC_API.G_EXCEPTION_ERROR;

1183: x_return_status);
1184: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1185: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1186: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1187: RAISE OKC_API.G_EXCEPTION_ERROR;
1188: END IF;
1189: l_ihdv_rec := null_out_defaults(p_ihdv_rec);
1190: -- Set primary key value
1191: l_ihdv_rec.ID := get_seq_id;

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

1193: l_return_Status := Set_Attributes(
1194: l_ihdv_rec, -- IN
1195: l_def_ihdv_rec); -- OUT
1196: --- If any errors happen abort API
1197: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1199: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1200: RAISE OKC_API.G_EXCEPTION_ERROR;
1201: END IF;

Line 1198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1194: l_ihdv_rec, -- IN
1195: l_def_ihdv_rec); -- OUT
1196: --- If any errors happen abort API
1197: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1199: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1200: RAISE OKC_API.G_EXCEPTION_ERROR;
1201: END IF;
1202: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);

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

1195: l_def_ihdv_rec); -- OUT
1196: --- If any errors happen abort API
1197: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1199: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1200: RAISE OKC_API.G_EXCEPTION_ERROR;
1201: END IF;
1202: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
1203: --- Validate all non-missing attributes (Item Level Validation)

Line 1200: RAISE OKC_API.G_EXCEPTION_ERROR;

1196: --- If any errors happen abort API
1197: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1198: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1199: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1200: RAISE OKC_API.G_EXCEPTION_ERROR;
1201: END IF;
1202: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
1203: --- Validate all non-missing attributes (Item Level Validation)
1204: l_return_status := Validate_Attributes(l_def_ihdv_rec);

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

1202: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
1203: --- Validate all non-missing attributes (Item Level Validation)
1204: l_return_status := Validate_Attributes(l_def_ihdv_rec);
1205: --- If any errors happen abort API
1206: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1208: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;

Line 1207: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1203: --- Validate all non-missing attributes (Item Level Validation)
1204: l_return_status := Validate_Attributes(l_def_ihdv_rec);
1205: --- If any errors happen abort API
1206: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1208: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);

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

1204: l_return_status := Validate_Attributes(l_def_ihdv_rec);
1205: --- If any errors happen abort API
1206: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1208: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 1209: RAISE OKC_API.G_EXCEPTION_ERROR;

1205: --- If any errors happen abort API
1206: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1207: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1208: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

1208: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_ERROR;
1216: END IF;

Line 1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1209: RAISE OKC_API.G_EXCEPTION_ERROR;
1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_ERROR;
1216: END IF;
1217: -----------------------------------------

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

1210: END IF;
1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_ERROR;
1216: END IF;
1217: -----------------------------------------
1218: -- Move VIEW record to "Child" records --

Line 1215: RAISE OKC_API.G_EXCEPTION_ERROR;

1211: l_return_status := Validate_Record(l_def_ihdv_rec);
1212: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1213: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1214: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1215: RAISE OKC_API.G_EXCEPTION_ERROR;
1216: END IF;
1217: -----------------------------------------
1218: -- Move VIEW record to "Child" records --
1219: -----------------------------------------

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

1228: x_msg_data,
1229: l_ihd_rec,
1230: lx_ihd_rec
1231: );
1232: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1233: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_ERROR;
1236: END IF;

Line 1233: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1229: l_ihd_rec,
1230: lx_ihd_rec
1231: );
1232: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1233: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_ERROR;
1236: END IF;
1237: migrate(lx_ihd_rec, l_def_ihdv_rec);

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

1230: lx_ihd_rec
1231: );
1232: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1233: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_ERROR;
1236: END IF;
1237: migrate(lx_ihd_rec, l_def_ihdv_rec);
1238: -- Set OUT values

Line 1235: RAISE OKC_API.G_EXCEPTION_ERROR;

1231: );
1232: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1233: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1234: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1235: RAISE OKC_API.G_EXCEPTION_ERROR;
1236: END IF;
1237: migrate(lx_ihd_rec, l_def_ihdv_rec);
1238: -- Set OUT values
1239: x_ihdv_rec := l_def_ihdv_rec;

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

1237: migrate(lx_ihd_rec, l_def_ihdv_rec);
1238: -- Set OUT values
1239: x_ihdv_rec := l_def_ihdv_rec;
1240: x_return_status := l_return_status;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (

Line 1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1239: x_ihdv_rec := l_def_ihdv_rec;
1240: x_return_status := l_return_status;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,

Line 1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1240: x_return_status := l_return_status;
1241: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1242: EXCEPTION
1243: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,
1248: 'OKC_API.G_RET_STS_ERROR',

Line 1248: 'OKC_API.G_RET_STS_ERROR',

1244: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1245: (
1246: l_api_name,
1247: G_PKG_NAME,
1248: 'OKC_API.G_RET_STS_ERROR',
1249: x_msg_count,
1250: x_msg_data,
1251: '_PVT'
1252: );

Line 1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1249: x_msg_count,
1250: x_msg_data,
1251: '_PVT'
1252: );
1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,

Line 1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1250: x_msg_data,
1251: '_PVT'
1252: );
1253: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,
1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1254: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1255: (
1256: l_api_name,
1257: G_PKG_NAME,
1258: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1259: x_msg_count,
1260: x_msg_data,
1261: '_PVT'
1262: );

Line 1264: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1260: x_msg_data,
1261: '_PVT'
1262: );
1263: WHEN OTHERS THEN
1264: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1265: (
1266: l_api_name,
1267: G_PKG_NAME,
1268: 'OTHERS',

Line 1285: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS

1281: x_msg_count OUT NOCOPY NUMBER,
1282: x_msg_data OUT NOCOPY VARCHAR2,
1283: p_ihdv_tbl IN ihdv_tbl_type,
1284: x_ihdv_tbl OUT NOCOPY ihdv_tbl_type,
1285: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1286:
1287: l_api_version CONSTANT NUMBER := 1;
1288: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1289: i NUMBER := 0;

Line 1291: OKC_API.init_msg_list(p_init_msg_list);

1287: l_api_version CONSTANT NUMBER := 1;
1288: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
1289: i NUMBER := 0;
1290: BEGIN
1291: OKC_API.init_msg_list(p_init_msg_list);
1292: -- Make sure PL/SQL table has records in it before passing
1293: IF (p_ihdv_tbl.COUNT > 0) THEN
1294: i := p_ihdv_tbl.FIRST;
1295: LOOP

Line 1297: l_error_rec OKC_API.ERROR_REC_TYPE;

1293: IF (p_ihdv_tbl.COUNT > 0) THEN
1294: i := p_ihdv_tbl.FIRST;
1295: LOOP
1296: DECLARE
1297: l_error_rec OKC_API.ERROR_REC_TYPE;
1298: BEGIN
1299: l_error_rec.api_name := l_api_name;
1300: l_error_rec.api_package := G_PKG_NAME;
1301: l_error_rec.idx := i;

Line 1304: p_init_msg_list => OKC_API.G_FALSE,

1300: l_error_rec.api_package := G_PKG_NAME;
1301: l_error_rec.idx := i;
1302: insert_row (
1303: p_api_version => p_api_version,
1304: p_init_msg_list => OKC_API.G_FALSE,
1305: x_return_status => l_error_rec.error_type,
1306: x_msg_count => l_error_rec.msg_count,
1307: x_msg_data => l_error_rec.msg_data,
1308: p_ihdv_rec => p_ihdv_tbl(i),

Line 1310: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

1306: x_msg_count => l_error_rec.msg_count,
1307: x_msg_data => l_error_rec.msg_data,
1308: p_ihdv_rec => p_ihdv_tbl(i),
1309: x_ihdv_rec => x_ihdv_tbl(i));
1310: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
1311: l_error_rec.sqlcode := SQLCODE;
1312: load_error_tbl(l_error_rec, px_error_tbl);
1313: ELSE
1314: x_msg_count := l_error_rec.msg_count;

Line 1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1314: x_msg_count := l_error_rec.msg_count;
1315: x_msg_data := l_error_rec.msg_data;
1316: END IF;
1317: EXCEPTION
1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1320: l_error_rec.sqlcode := SQLCODE;
1321: load_error_tbl(l_error_rec, px_error_tbl);
1322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1319: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

1315: x_msg_data := l_error_rec.msg_data;
1316: END IF;
1317: EXCEPTION
1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1320: l_error_rec.sqlcode := SQLCODE;
1321: load_error_tbl(l_error_rec, px_error_tbl);
1322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1323: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1318: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1319: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1320: l_error_rec.sqlcode := SQLCODE;
1321: load_error_tbl(l_error_rec, px_error_tbl);
1322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1323: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1324: l_error_rec.sqlcode := SQLCODE;
1325: load_error_tbl(l_error_rec, px_error_tbl);
1326: WHEN OTHERS THEN

Line 1323: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

1319: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1320: l_error_rec.sqlcode := SQLCODE;
1321: load_error_tbl(l_error_rec, px_error_tbl);
1322: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1323: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1324: l_error_rec.sqlcode := SQLCODE;
1325: load_error_tbl(l_error_rec, px_error_tbl);
1326: WHEN OTHERS THEN
1327: l_error_rec.error_type := 'OTHERS';

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

1334: END IF;
1335: -- Loop through the error_tbl to find the error with the highest severity
1336: -- and return it.
1337: x_return_status := find_highest_exception(px_error_tbl);
1338: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1339: EXCEPTION
1340: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1341: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1342: (

Line 1340: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1336: -- and return it.
1337: x_return_status := find_highest_exception(px_error_tbl);
1338: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1339: EXCEPTION
1340: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1341: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1342: (
1343: l_api_name,
1344: G_PKG_NAME,

Line 1341: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1337: x_return_status := find_highest_exception(px_error_tbl);
1338: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1339: EXCEPTION
1340: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1341: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1342: (
1343: l_api_name,
1344: G_PKG_NAME,
1345: 'OKC_API.G_RET_STS_ERROR',

Line 1345: 'OKC_API.G_RET_STS_ERROR',

1341: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1342: (
1343: l_api_name,
1344: G_PKG_NAME,
1345: 'OKC_API.G_RET_STS_ERROR',
1346: x_msg_count,
1347: x_msg_data,
1348: '_PVT'
1349: );

Line 1350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1346: x_msg_count,
1347: x_msg_data,
1348: '_PVT'
1349: );
1350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1352: (
1353: l_api_name,
1354: G_PKG_NAME,

Line 1351: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1347: x_msg_data,
1348: '_PVT'
1349: );
1350: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1352: (
1353: l_api_name,
1354: G_PKG_NAME,
1355: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1355: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1351: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1352: (
1353: l_api_name,
1354: G_PKG_NAME,
1355: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1356: x_msg_count,
1357: x_msg_data,
1358: '_PVT'
1359: );

Line 1361: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

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

1384: x_ihdv_tbl OUT NOCOPY ihdv_tbl_type) IS
1385:
1386: l_api_version CONSTANT NUMBER := 1;
1387: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1388: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1389: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1390: BEGIN
1391: OKC_API.init_msg_list(p_init_msg_list);
1392: -- Make sure PL/SQL table has records in it before passing

Line 1389: l_error_tbl OKC_API.ERROR_TBL_TYPE;

1385:
1386: l_api_version CONSTANT NUMBER := 1;
1387: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1388: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1389: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1390: BEGIN
1391: OKC_API.init_msg_list(p_init_msg_list);
1392: -- Make sure PL/SQL table has records in it before passing
1393: IF (p_ihdv_tbl.COUNT > 0) THEN

Line 1391: OKC_API.init_msg_list(p_init_msg_list);

1387: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1388: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1389: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1390: BEGIN
1391: OKC_API.init_msg_list(p_init_msg_list);
1392: -- Make sure PL/SQL table has records in it before passing
1393: IF (p_ihdv_tbl.COUNT > 0) THEN
1394: insert_row (
1395: p_api_version => p_api_version,

Line 1396: p_init_msg_list => OKC_API.G_FALSE,

1392: -- Make sure PL/SQL table has records in it before passing
1393: IF (p_ihdv_tbl.COUNT > 0) THEN
1394: insert_row (
1395: p_api_version => p_api_version,
1396: p_init_msg_list => OKC_API.G_FALSE,
1397: x_return_status => x_return_status,
1398: x_msg_count => x_msg_count,
1399: x_msg_data => x_msg_data,
1400: p_ihdv_tbl => p_ihdv_tbl,

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

1400: p_ihdv_tbl => p_ihdv_tbl,
1401: x_ihdv_tbl => x_ihdv_tbl,
1402: px_error_tbl => l_error_tbl);
1403: END IF;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (

Line 1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1402: px_error_tbl => l_error_tbl);
1403: END IF;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,

Line 1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1403: END IF;
1404: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1405: EXCEPTION
1406: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,
1411: 'OKC_API.G_RET_STS_ERROR',

Line 1411: 'OKC_API.G_RET_STS_ERROR',

1407: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1408: (
1409: l_api_name,
1410: G_PKG_NAME,
1411: 'OKC_API.G_RET_STS_ERROR',
1412: x_msg_count,
1413: x_msg_data,
1414: '_PVT'
1415: );

Line 1416: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 1417: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1413: x_msg_data,
1414: '_PVT'
1415: );
1416: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1418: (
1419: l_api_name,
1420: G_PKG_NAME,
1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1418: (
1419: l_api_name,
1420: G_PKG_NAME,
1421: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1422: x_msg_count,
1423: x_msg_data,
1424: '_PVT'
1425: );

Line 1427: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1423: x_msg_data,
1424: '_PVT'
1425: );
1426: WHEN OTHERS THEN
1427: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1428: (
1429: l_api_name,
1430: G_PKG_NAME,
1431: 'OTHERS',

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

1462: FROM OKS_INST_HIST_DETAILS
1463: WHERE ID = p_ihd_rec.id;
1464: l_api_version CONSTANT NUMBER := 1;
1465: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1466: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1467: l_object_version_number OKS_INST_HIST_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
1468: lc_object_version_number OKS_INST_HIST_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
1469: l_row_notfound BOOLEAN := FALSE;
1470: lc_row_notfound BOOLEAN := FALSE;

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

1468: lc_object_version_number OKS_INST_HIST_DETAILS.OBJECT_VERSION_NUMBER%TYPE;
1469: l_row_notfound BOOLEAN := FALSE;
1470: lc_row_notfound BOOLEAN := FALSE;
1471: BEGIN
1472: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1473: p_init_msg_list,
1474: '_PVT',
1475: x_return_status);
1476: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

1472: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1473: p_init_msg_list,
1474: '_PVT',
1475: x_return_status);
1476: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: RAISE OKC_API.G_EXCEPTION_ERROR;
1480: END IF;

Line 1477: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1473: p_init_msg_list,
1474: '_PVT',
1475: x_return_status);
1476: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: RAISE OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481: BEGIN

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

1474: '_PVT',
1475: x_return_status);
1476: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: RAISE OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481: BEGIN
1482: OPEN lock_csr(p_ihd_rec);

Line 1479: RAISE OKC_API.G_EXCEPTION_ERROR;

1475: x_return_status);
1476: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1477: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1478: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1479: RAISE OKC_API.G_EXCEPTION_ERROR;
1480: END IF;
1481: BEGIN
1482: OPEN lock_csr(p_ihd_rec);
1483: FETCH lock_csr INTO l_object_version_number;

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

1487: WHEN E_Resource_Busy THEN
1488: IF (lock_csr%ISOPEN) THEN
1489: CLOSE lock_csr;
1490: END IF;
1491: OKC_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
1492: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
1493: END;
1494:
1495: IF ( l_row_notfound ) THEN

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

1498: lc_row_notfound := lchk_csr%NOTFOUND;
1499: CLOSE lchk_csr;
1500: END IF;
1501: IF (lc_row_notfound) THEN
1502: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: ELSIF lc_object_version_number > p_ihd_rec.object_version_number THEN
1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1503: RAISE OKC_API.G_EXCEPTION_ERROR;

1499: CLOSE lchk_csr;
1500: END IF;
1501: IF (lc_row_notfound) THEN
1502: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: ELSIF lc_object_version_number > p_ihd_rec.object_version_number THEN
1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;
1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN

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

1501: IF (lc_row_notfound) THEN
1502: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: ELSIF lc_object_version_number > p_ihd_rec.object_version_number THEN
1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;
1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN
1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1506: RAISE OKC_API.G_EXCEPTION_ERROR;

1502: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
1503: RAISE OKC_API.G_EXCEPTION_ERROR;
1504: ELSIF lc_object_version_number > p_ihd_rec.object_version_number THEN
1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;
1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN
1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;
1510: ELSIF lc_object_version_number = -1 THEN

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

1504: ELSIF lc_object_version_number > p_ihd_rec.object_version_number THEN
1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;
1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN
1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;
1510: ELSIF lc_object_version_number = -1 THEN
1511: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1512: RAISE OKC_API.G_EXCEPTION_ERROR;

Line 1509: RAISE OKC_API.G_EXCEPTION_ERROR;

1505: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1506: RAISE OKC_API.G_EXCEPTION_ERROR;
1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN
1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;
1510: ELSIF lc_object_version_number = -1 THEN
1511: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1512: RAISE OKC_API.G_EXCEPTION_ERROR;
1513: END IF;

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

1507: ELSIF lc_object_version_number <> p_ihd_rec.object_version_number THEN
1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;
1510: ELSIF lc_object_version_number = -1 THEN
1511: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1512: RAISE OKC_API.G_EXCEPTION_ERROR;
1513: END IF;
1514: x_return_status := l_return_status;
1515: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1512: RAISE OKC_API.G_EXCEPTION_ERROR;

1508: OKC_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
1509: RAISE OKC_API.G_EXCEPTION_ERROR;
1510: ELSIF lc_object_version_number = -1 THEN
1511: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1512: RAISE OKC_API.G_EXCEPTION_ERROR;
1513: END IF;
1514: x_return_status := l_return_status;
1515: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1516: EXCEPTION

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

1511: OKC_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
1512: RAISE OKC_API.G_EXCEPTION_ERROR;
1513: END IF;
1514: x_return_status := l_return_status;
1515: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1516: EXCEPTION
1517: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1518: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1519: (

Line 1517: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1513: END IF;
1514: x_return_status := l_return_status;
1515: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1516: EXCEPTION
1517: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1518: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1519: (
1520: l_api_name,
1521: G_PKG_NAME,

Line 1518: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1514: x_return_status := l_return_status;
1515: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1516: EXCEPTION
1517: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1518: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1519: (
1520: l_api_name,
1521: G_PKG_NAME,
1522: 'OKC_API.G_RET_STS_ERROR',

Line 1522: 'OKC_API.G_RET_STS_ERROR',

1518: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1519: (
1520: l_api_name,
1521: G_PKG_NAME,
1522: 'OKC_API.G_RET_STS_ERROR',
1523: x_msg_count,
1524: x_msg_data,
1525: '_PVT'
1526: );

Line 1527: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1523: x_msg_count,
1524: x_msg_data,
1525: '_PVT'
1526: );
1527: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1528: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1529: (
1530: l_api_name,
1531: G_PKG_NAME,

Line 1528: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1524: x_msg_data,
1525: '_PVT'
1526: );
1527: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1528: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1529: (
1530: l_api_name,
1531: G_PKG_NAME,
1532: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1532: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1528: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1529: (
1530: l_api_name,
1531: G_PKG_NAME,
1532: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1533: x_msg_count,
1534: x_msg_data,
1535: '_PVT'
1536: );

Line 1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1534: x_msg_data,
1535: '_PVT'
1536: );
1537: WHEN OTHERS THEN
1538: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1539: (
1540: l_api_name,
1541: G_PKG_NAME,
1542: 'OTHERS',

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

1557: p_ihdv_rec IN ihdv_rec_type) IS
1558:
1559: l_api_version CONSTANT NUMBER := 1;
1560: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1561: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1562: l_ihd_rec ihd_rec_type;
1563: BEGIN
1564: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1565: G_PKG_NAME,

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

1560: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
1561: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1562: l_ihd_rec ihd_rec_type;
1563: BEGIN
1564: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1565: G_PKG_NAME,
1566: p_init_msg_list,
1567: l_api_version,
1568: p_api_version,

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

1567: l_api_version,
1568: p_api_version,
1569: '_PVT',
1570: x_return_status);
1571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: END IF;

Line 1572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1568: p_api_version,
1569: '_PVT',
1570: x_return_status);
1571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: END IF;
1576: -----------------------------------------

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

1569: '_PVT',
1570: x_return_status);
1571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: END IF;
1576: -----------------------------------------
1577: -- Move VIEW record to "Child" records --

Line 1574: RAISE OKC_API.G_EXCEPTION_ERROR;

1570: x_return_status);
1571: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1572: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1573: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1574: RAISE OKC_API.G_EXCEPTION_ERROR;
1575: END IF;
1576: -----------------------------------------
1577: -- Move VIEW record to "Child" records --
1578: -----------------------------------------

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

1586: x_msg_count,
1587: x_msg_data,
1588: l_ihd_rec
1589: );
1590: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1593: RAISE OKC_API.G_EXCEPTION_ERROR;
1594: END IF;

Line 1591: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

1587: x_msg_data,
1588: l_ihd_rec
1589: );
1590: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1593: RAISE OKC_API.G_EXCEPTION_ERROR;
1594: END IF;
1595: x_return_status := l_return_status;

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

1588: l_ihd_rec
1589: );
1590: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1593: RAISE OKC_API.G_EXCEPTION_ERROR;
1594: END IF;
1595: x_return_status := l_return_status;
1596: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 1593: RAISE OKC_API.G_EXCEPTION_ERROR;

1589: );
1590: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
1591: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1592: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1593: RAISE OKC_API.G_EXCEPTION_ERROR;
1594: END IF;
1595: x_return_status := l_return_status;
1596: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1597: EXCEPTION

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

1592: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1593: RAISE OKC_API.G_EXCEPTION_ERROR;
1594: END IF;
1595: x_return_status := l_return_status;
1596: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1597: EXCEPTION
1598: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1599: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1600: (

Line 1598: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1594: END IF;
1595: x_return_status := l_return_status;
1596: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1597: EXCEPTION
1598: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1599: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1600: (
1601: l_api_name,
1602: G_PKG_NAME,

Line 1599: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1595: x_return_status := l_return_status;
1596: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1597: EXCEPTION
1598: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1599: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1600: (
1601: l_api_name,
1602: G_PKG_NAME,
1603: 'OKC_API.G_RET_STS_ERROR',

Line 1603: 'OKC_API.G_RET_STS_ERROR',

1599: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1600: (
1601: l_api_name,
1602: G_PKG_NAME,
1603: 'OKC_API.G_RET_STS_ERROR',
1604: x_msg_count,
1605: x_msg_data,
1606: '_PVT'
1607: );

Line 1608: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1604: x_msg_count,
1605: x_msg_data,
1606: '_PVT'
1607: );
1608: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1610: (
1611: l_api_name,
1612: G_PKG_NAME,

Line 1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1605: x_msg_data,
1606: '_PVT'
1607: );
1608: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1610: (
1611: l_api_name,
1612: G_PKG_NAME,
1613: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1613: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1609: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1610: (
1611: l_api_name,
1612: G_PKG_NAME,
1613: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1614: x_msg_count,
1615: x_msg_data,
1616: '_PVT'
1617: );

Line 1619: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1615: x_msg_data,
1616: '_PVT'
1617: );
1618: WHEN OTHERS THEN
1619: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1620: (
1621: l_api_name,
1622: G_PKG_NAME,
1623: 'OTHERS',

Line 1639: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS

1635: x_return_status OUT NOCOPY VARCHAR2,
1636: x_msg_count OUT NOCOPY NUMBER,
1637: x_msg_data OUT NOCOPY VARCHAR2,
1638: p_ihdv_tbl IN ihdv_tbl_type,
1639: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
1640:
1641: l_api_version CONSTANT NUMBER := 1;
1642: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1643: i NUMBER := 0;

Line 1645: OKC_API.init_msg_list(p_init_msg_list);

1641: l_api_version CONSTANT NUMBER := 1;
1642: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
1643: i NUMBER := 0;
1644: BEGIN
1645: OKC_API.init_msg_list(p_init_msg_list);
1646: -- Make sure PL/SQL table has recrods in it before passing
1647: IF (p_ihdv_tbl.COUNT > 0) THEN
1648: i := p_ihdv_tbl.FIRST;
1649: LOOP

Line 1651: l_error_rec OKC_API.ERROR_REC_TYPE;

1647: IF (p_ihdv_tbl.COUNT > 0) THEN
1648: i := p_ihdv_tbl.FIRST;
1649: LOOP
1650: DECLARE
1651: l_error_rec OKC_API.ERROR_REC_TYPE;
1652: BEGIN
1653: l_error_rec.api_name := l_api_name;
1654: l_error_rec.api_package := G_PKG_NAME;
1655: l_error_rec.idx := i;

Line 1658: p_init_msg_list => OKC_API.G_FALSE,

1654: l_error_rec.api_package := G_PKG_NAME;
1655: l_error_rec.idx := i;
1656: lock_row(
1657: p_api_version => p_api_version,
1658: p_init_msg_list => OKC_API.G_FALSE,
1659: x_return_status => l_error_rec.error_type,
1660: x_msg_count => l_error_rec.msg_count,
1661: x_msg_data => l_error_rec.msg_data,
1662: p_ihdv_rec => p_ihdv_tbl(i));

Line 1663: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

1659: x_return_status => l_error_rec.error_type,
1660: x_msg_count => l_error_rec.msg_count,
1661: x_msg_data => l_error_rec.msg_data,
1662: p_ihdv_rec => p_ihdv_tbl(i));
1663: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
1664: l_error_rec.sqlcode := SQLCODE;
1665: load_error_tbl(l_error_rec, px_error_tbl);
1666: ELSE
1667: x_msg_count := l_error_rec.msg_count;

Line 1671: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1667: x_msg_count := l_error_rec.msg_count;
1668: x_msg_data := l_error_rec.msg_data;
1669: END IF;
1670: EXCEPTION
1671: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1672: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1673: l_error_rec.sqlcode := SQLCODE;
1674: load_error_tbl(l_error_rec, px_error_tbl);
1675: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 1672: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

1668: x_msg_data := l_error_rec.msg_data;
1669: END IF;
1670: EXCEPTION
1671: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1672: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1673: l_error_rec.sqlcode := SQLCODE;
1674: load_error_tbl(l_error_rec, px_error_tbl);
1675: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1676: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 1675: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1671: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1672: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1673: l_error_rec.sqlcode := SQLCODE;
1674: load_error_tbl(l_error_rec, px_error_tbl);
1675: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1676: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1677: l_error_rec.sqlcode := SQLCODE;
1678: load_error_tbl(l_error_rec, px_error_tbl);
1679: WHEN OTHERS THEN

Line 1676: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

1672: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
1673: l_error_rec.sqlcode := SQLCODE;
1674: load_error_tbl(l_error_rec, px_error_tbl);
1675: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1676: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
1677: l_error_rec.sqlcode := SQLCODE;
1678: load_error_tbl(l_error_rec, px_error_tbl);
1679: WHEN OTHERS THEN
1680: l_error_rec.error_type := 'OTHERS';

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

1687: END IF;
1688: -- Loop through the error_tbl to find the error with the highest severity
1689: -- and return it.
1690: x_return_status := find_highest_exception(px_error_tbl);
1691: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1692: EXCEPTION
1693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1694: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1695: (

Line 1693: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1689: -- and return it.
1690: x_return_status := find_highest_exception(px_error_tbl);
1691: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1692: EXCEPTION
1693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1694: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1695: (
1696: l_api_name,
1697: G_PKG_NAME,

Line 1694: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1690: x_return_status := find_highest_exception(px_error_tbl);
1691: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1692: EXCEPTION
1693: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1694: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1695: (
1696: l_api_name,
1697: G_PKG_NAME,
1698: 'OKC_API.G_RET_STS_ERROR',

Line 1698: 'OKC_API.G_RET_STS_ERROR',

1694: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1695: (
1696: l_api_name,
1697: G_PKG_NAME,
1698: 'OKC_API.G_RET_STS_ERROR',
1699: x_msg_count,
1700: x_msg_data,
1701: '_PVT'
1702: );

Line 1703: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1699: x_msg_count,
1700: x_msg_data,
1701: '_PVT'
1702: );
1703: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1704: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1705: (
1706: l_api_name,
1707: G_PKG_NAME,

Line 1704: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1700: x_msg_data,
1701: '_PVT'
1702: );
1703: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1704: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1705: (
1706: l_api_name,
1707: G_PKG_NAME,
1708: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1708: 'OKC_API.G_RET_STS_UNEXP_ERROR',

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

Line 1714: x_return_status := OKC_API.HANDLE_EXCEPTIONS

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

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

1733: p_ihdv_tbl IN ihdv_tbl_type) IS
1734:
1735: l_api_version CONSTANT NUMBER := 1;
1736: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1737: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1738: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1739: BEGIN
1740: OKC_API.init_msg_list(p_init_msg_list);
1741: -- Make sure PL/SQL table has recrods in it before passing

Line 1738: l_error_tbl OKC_API.ERROR_TBL_TYPE;

1734:
1735: l_api_version CONSTANT NUMBER := 1;
1736: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1737: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1738: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1739: BEGIN
1740: OKC_API.init_msg_list(p_init_msg_list);
1741: -- Make sure PL/SQL table has recrods in it before passing
1742: IF (p_ihdv_tbl.COUNT > 0) THEN

Line 1740: OKC_API.init_msg_list(p_init_msg_list);

1736: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
1737: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1738: l_error_tbl OKC_API.ERROR_TBL_TYPE;
1739: BEGIN
1740: OKC_API.init_msg_list(p_init_msg_list);
1741: -- Make sure PL/SQL table has recrods in it before passing
1742: IF (p_ihdv_tbl.COUNT > 0) THEN
1743: lock_row(
1744: p_api_version => p_api_version,

Line 1745: p_init_msg_list => OKC_API.G_FALSE,

1741: -- Make sure PL/SQL table has recrods in it before passing
1742: IF (p_ihdv_tbl.COUNT > 0) THEN
1743: lock_row(
1744: p_api_version => p_api_version,
1745: p_init_msg_list => OKC_API.G_FALSE,
1746: x_return_status => x_return_status,
1747: x_msg_count => x_msg_count,
1748: x_msg_data => x_msg_data,
1749: p_ihdv_tbl => p_ihdv_tbl,

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

1748: x_msg_data => x_msg_data,
1749: p_ihdv_tbl => p_ihdv_tbl,
1750: px_error_tbl => l_error_tbl);
1751: END IF;
1752: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1753: EXCEPTION
1754: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1756: (

Line 1754: WHEN OKC_API.G_EXCEPTION_ERROR THEN

1750: px_error_tbl => l_error_tbl);
1751: END IF;
1752: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1753: EXCEPTION
1754: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1756: (
1757: l_api_name,
1758: G_PKG_NAME,

Line 1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1751: END IF;
1752: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
1753: EXCEPTION
1754: WHEN OKC_API.G_EXCEPTION_ERROR THEN
1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1756: (
1757: l_api_name,
1758: G_PKG_NAME,
1759: 'OKC_API.G_RET_STS_ERROR',

Line 1759: 'OKC_API.G_RET_STS_ERROR',

1755: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1756: (
1757: l_api_name,
1758: G_PKG_NAME,
1759: 'OKC_API.G_RET_STS_ERROR',
1760: x_msg_count,
1761: x_msg_data,
1762: '_PVT'
1763: );

Line 1764: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

1760: x_msg_count,
1761: x_msg_data,
1762: '_PVT'
1763: );
1764: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1766: (
1767: l_api_name,
1768: G_PKG_NAME,

Line 1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1761: x_msg_data,
1762: '_PVT'
1763: );
1764: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1766: (
1767: l_api_name,
1768: G_PKG_NAME,
1769: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 1769: 'OKC_API.G_RET_STS_UNEXP_ERROR',

1765: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1766: (
1767: l_api_name,
1768: G_PKG_NAME,
1769: 'OKC_API.G_RET_STS_UNEXP_ERROR',
1770: x_msg_count,
1771: x_msg_data,
1772: '_PVT'
1773: );

Line 1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS

1771: x_msg_data,
1772: '_PVT'
1773: );
1774: WHEN OTHERS THEN
1775: x_return_status := OKC_API.HANDLE_EXCEPTIONS
1776: (
1777: l_api_name,
1778: G_PKG_NAME,
1779: 'OTHERS',

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

1797: x_ihd_rec OUT NOCOPY ihd_rec_type) IS
1798:
1799: l_api_version CONSTANT NUMBER := 1;
1800: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
1801: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1802: l_ihd_rec ihd_rec_type := p_ihd_rec;
1803: l_def_ihd_rec ihd_rec_type;
1804: l_row_notfound BOOLEAN := TRUE;
1805: ----------------------------------

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

1810: x_ihd_rec OUT NOCOPY ihd_rec_type
1811: ) RETURN VARCHAR2 IS
1812: l_ihd_rec ihd_rec_type;
1813: l_row_notfound BOOLEAN := TRUE;
1814: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1815: BEGIN
1816: x_ihd_rec := p_ihd_rec;
1817: -- Get current database values
1818: l_ihd_rec := get_rec(p_ihd_rec, l_return_status);

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

1815: BEGIN
1816: x_ihd_rec := p_ihd_rec;
1817: -- Get current database values
1818: l_ihd_rec := get_rec(p_ihd_rec, l_return_status);
1819: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1820: IF (x_ihd_rec.id = OKC_API.G_MISS_NUM)
1821: THEN
1822: x_ihd_rec.id := l_ihd_rec.id;
1823: END IF;

Line 1820: IF (x_ihd_rec.id = OKC_API.G_MISS_NUM)

1816: x_ihd_rec := p_ihd_rec;
1817: -- Get current database values
1818: l_ihd_rec := get_rec(p_ihd_rec, l_return_status);
1819: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
1820: IF (x_ihd_rec.id = OKC_API.G_MISS_NUM)
1821: THEN
1822: x_ihd_rec.id := l_ihd_rec.id;
1823: END IF;
1824: IF (x_ihd_rec.ins_id = OKC_API.G_MISS_NUM)

Line 1824: IF (x_ihd_rec.ins_id = OKC_API.G_MISS_NUM)

1820: IF (x_ihd_rec.id = OKC_API.G_MISS_NUM)
1821: THEN
1822: x_ihd_rec.id := l_ihd_rec.id;
1823: END IF;
1824: IF (x_ihd_rec.ins_id = OKC_API.G_MISS_NUM)
1825: THEN
1826: x_ihd_rec.ins_id := l_ihd_rec.ins_id;
1827: END IF;
1828: IF (x_ihd_rec.transaction_date = OKC_API.G_MISS_DATE)

Line 1828: IF (x_ihd_rec.transaction_date = OKC_API.G_MISS_DATE)

1824: IF (x_ihd_rec.ins_id = OKC_API.G_MISS_NUM)
1825: THEN
1826: x_ihd_rec.ins_id := l_ihd_rec.ins_id;
1827: END IF;
1828: IF (x_ihd_rec.transaction_date = OKC_API.G_MISS_DATE)
1829: THEN
1830: x_ihd_rec.transaction_date := l_ihd_rec.transaction_date;
1831: END IF;
1832: IF (x_ihd_rec.transaction_type = OKC_API.G_MISS_CHAR)

Line 1832: IF (x_ihd_rec.transaction_type = OKC_API.G_MISS_CHAR)

1828: IF (x_ihd_rec.transaction_date = OKC_API.G_MISS_DATE)
1829: THEN
1830: x_ihd_rec.transaction_date := l_ihd_rec.transaction_date;
1831: END IF;
1832: IF (x_ihd_rec.transaction_type = OKC_API.G_MISS_CHAR)
1833: THEN
1834: x_ihd_rec.transaction_type := l_ihd_rec.transaction_type;
1835: END IF;
1836: IF (x_ihd_rec.system_id = OKC_API.G_MISS_NUM)

Line 1836: IF (x_ihd_rec.system_id = OKC_API.G_MISS_NUM)

1832: IF (x_ihd_rec.transaction_type = OKC_API.G_MISS_CHAR)
1833: THEN
1834: x_ihd_rec.transaction_type := l_ihd_rec.transaction_type;
1835: END IF;
1836: IF (x_ihd_rec.system_id = OKC_API.G_MISS_NUM)
1837: THEN
1838: x_ihd_rec.system_id := l_ihd_rec.system_id;
1839: END IF;
1840: IF (x_ihd_rec.instance_id_new = OKC_API.G_MISS_NUM)

Line 1840: IF (x_ihd_rec.instance_id_new = OKC_API.G_MISS_NUM)

1836: IF (x_ihd_rec.system_id = OKC_API.G_MISS_NUM)
1837: THEN
1838: x_ihd_rec.system_id := l_ihd_rec.system_id;
1839: END IF;
1840: IF (x_ihd_rec.instance_id_new = OKC_API.G_MISS_NUM)
1841: THEN
1842: x_ihd_rec.instance_id_new := l_ihd_rec.instance_id_new;
1843: END IF;
1844: IF (x_ihd_rec.instance_qty_old = OKC_API.G_MISS_NUM)

Line 1844: IF (x_ihd_rec.instance_qty_old = OKC_API.G_MISS_NUM)

1840: IF (x_ihd_rec.instance_id_new = OKC_API.G_MISS_NUM)
1841: THEN
1842: x_ihd_rec.instance_id_new := l_ihd_rec.instance_id_new;
1843: END IF;
1844: IF (x_ihd_rec.instance_qty_old = OKC_API.G_MISS_NUM)
1845: THEN
1846: x_ihd_rec.instance_qty_old := l_ihd_rec.instance_qty_old;
1847: END IF;
1848: IF (x_ihd_rec.instance_qty_new = OKC_API.G_MISS_NUM)

Line 1848: IF (x_ihd_rec.instance_qty_new = OKC_API.G_MISS_NUM)

1844: IF (x_ihd_rec.instance_qty_old = OKC_API.G_MISS_NUM)
1845: THEN
1846: x_ihd_rec.instance_qty_old := l_ihd_rec.instance_qty_old;
1847: END IF;
1848: IF (x_ihd_rec.instance_qty_new = OKC_API.G_MISS_NUM)
1849: THEN
1850: x_ihd_rec.instance_qty_new := l_ihd_rec.instance_qty_new;
1851: END IF;
1852: IF (x_ihd_rec.instance_amt_old = OKC_API.G_MISS_NUM)

Line 1852: IF (x_ihd_rec.instance_amt_old = OKC_API.G_MISS_NUM)

1848: IF (x_ihd_rec.instance_qty_new = OKC_API.G_MISS_NUM)
1849: THEN
1850: x_ihd_rec.instance_qty_new := l_ihd_rec.instance_qty_new;
1851: END IF;
1852: IF (x_ihd_rec.instance_amt_old = OKC_API.G_MISS_NUM)
1853: THEN
1854: x_ihd_rec.instance_amt_old := l_ihd_rec.instance_amt_old;
1855: END IF;
1856: IF (x_ihd_rec.instance_amt_new = OKC_API.G_MISS_NUM)

Line 1856: IF (x_ihd_rec.instance_amt_new = OKC_API.G_MISS_NUM)

1852: IF (x_ihd_rec.instance_amt_old = OKC_API.G_MISS_NUM)
1853: THEN
1854: x_ihd_rec.instance_amt_old := l_ihd_rec.instance_amt_old;
1855: END IF;
1856: IF (x_ihd_rec.instance_amt_new = OKC_API.G_MISS_NUM)
1857: THEN
1858: x_ihd_rec.instance_amt_new := l_ihd_rec.instance_amt_new;
1859: END IF;
1860: IF (x_ihd_rec.old_contract_id = OKC_API.G_MISS_NUM)

Line 1860: IF (x_ihd_rec.old_contract_id = OKC_API.G_MISS_NUM)

1856: IF (x_ihd_rec.instance_amt_new = OKC_API.G_MISS_NUM)
1857: THEN
1858: x_ihd_rec.instance_amt_new := l_ihd_rec.instance_amt_new;
1859: END IF;
1860: IF (x_ihd_rec.old_contract_id = OKC_API.G_MISS_NUM)
1861: THEN
1862: x_ihd_rec.old_contract_id := l_ihd_rec.old_contract_id;
1863: END IF;
1864: IF (x_ihd_rec.old_contact_start_date = OKC_API.G_MISS_DATE)

Line 1864: IF (x_ihd_rec.old_contact_start_date = OKC_API.G_MISS_DATE)

1860: IF (x_ihd_rec.old_contract_id = OKC_API.G_MISS_NUM)
1861: THEN
1862: x_ihd_rec.old_contract_id := l_ihd_rec.old_contract_id;
1863: END IF;
1864: IF (x_ihd_rec.old_contact_start_date = OKC_API.G_MISS_DATE)
1865: THEN
1866: x_ihd_rec.old_contact_start_date := l_ihd_rec.old_contact_start_date;
1867: END IF;
1868: IF (x_ihd_rec.old_contract_end_date = OKC_API.G_MISS_DATE)

Line 1868: IF (x_ihd_rec.old_contract_end_date = OKC_API.G_MISS_DATE)

1864: IF (x_ihd_rec.old_contact_start_date = OKC_API.G_MISS_DATE)
1865: THEN
1866: x_ihd_rec.old_contact_start_date := l_ihd_rec.old_contact_start_date;
1867: END IF;
1868: IF (x_ihd_rec.old_contract_end_date = OKC_API.G_MISS_DATE)
1869: THEN
1870: x_ihd_rec.old_contract_end_date := l_ihd_rec.old_contract_end_date;
1871: END IF;
1872: IF (x_ihd_rec.new_contract_id = OKC_API.G_MISS_NUM)

Line 1872: IF (x_ihd_rec.new_contract_id = OKC_API.G_MISS_NUM)

1868: IF (x_ihd_rec.old_contract_end_date = OKC_API.G_MISS_DATE)
1869: THEN
1870: x_ihd_rec.old_contract_end_date := l_ihd_rec.old_contract_end_date;
1871: END IF;
1872: IF (x_ihd_rec.new_contract_id = OKC_API.G_MISS_NUM)
1873: THEN
1874: x_ihd_rec.new_contract_id := l_ihd_rec.new_contract_id;
1875: END IF;
1876: IF (x_ihd_rec.new_contact_start_date = OKC_API.G_MISS_DATE)

Line 1876: IF (x_ihd_rec.new_contact_start_date = OKC_API.G_MISS_DATE)

1872: IF (x_ihd_rec.new_contract_id = OKC_API.G_MISS_NUM)
1873: THEN
1874: x_ihd_rec.new_contract_id := l_ihd_rec.new_contract_id;
1875: END IF;
1876: IF (x_ihd_rec.new_contact_start_date = OKC_API.G_MISS_DATE)
1877: THEN
1878: x_ihd_rec.new_contact_start_date := l_ihd_rec.new_contact_start_date;
1879: END IF;
1880: IF (x_ihd_rec.new_contract_end_date = OKC_API.G_MISS_DATE)

Line 1880: IF (x_ihd_rec.new_contract_end_date = OKC_API.G_MISS_DATE)

1876: IF (x_ihd_rec.new_contact_start_date = OKC_API.G_MISS_DATE)
1877: THEN
1878: x_ihd_rec.new_contact_start_date := l_ihd_rec.new_contact_start_date;
1879: END IF;
1880: IF (x_ihd_rec.new_contract_end_date = OKC_API.G_MISS_DATE)
1881: THEN
1882: x_ihd_rec.new_contract_end_date := l_ihd_rec.new_contract_end_date;
1883: END IF;
1884: IF (x_ihd_rec.old_service_line_id = OKC_API.G_MISS_NUM)

Line 1884: IF (x_ihd_rec.old_service_line_id = OKC_API.G_MISS_NUM)

1880: IF (x_ihd_rec.new_contract_end_date = OKC_API.G_MISS_DATE)
1881: THEN
1882: x_ihd_rec.new_contract_end_date := l_ihd_rec.new_contract_end_date;
1883: END IF;
1884: IF (x_ihd_rec.old_service_line_id = OKC_API.G_MISS_NUM)
1885: THEN
1886: x_ihd_rec.old_service_line_id := l_ihd_rec.old_service_line_id;
1887: END IF;
1888: IF (x_ihd_rec.old_service_start_date = OKC_API.G_MISS_DATE)

Line 1888: IF (x_ihd_rec.old_service_start_date = OKC_API.G_MISS_DATE)

1884: IF (x_ihd_rec.old_service_line_id = OKC_API.G_MISS_NUM)
1885: THEN
1886: x_ihd_rec.old_service_line_id := l_ihd_rec.old_service_line_id;
1887: END IF;
1888: IF (x_ihd_rec.old_service_start_date = OKC_API.G_MISS_DATE)
1889: THEN
1890: x_ihd_rec.old_service_start_date := l_ihd_rec.old_service_start_date;
1891: END IF;
1892: IF (x_ihd_rec.old_service_end_date = OKC_API.G_MISS_DATE)

Line 1892: IF (x_ihd_rec.old_service_end_date = OKC_API.G_MISS_DATE)

1888: IF (x_ihd_rec.old_service_start_date = OKC_API.G_MISS_DATE)
1889: THEN
1890: x_ihd_rec.old_service_start_date := l_ihd_rec.old_service_start_date;
1891: END IF;
1892: IF (x_ihd_rec.old_service_end_date = OKC_API.G_MISS_DATE)
1893: THEN
1894: x_ihd_rec.old_service_end_date := l_ihd_rec.old_service_end_date;
1895: END IF;
1896: IF (x_ihd_rec.new_service_line_id = OKC_API.G_MISS_NUM)

Line 1896: IF (x_ihd_rec.new_service_line_id = OKC_API.G_MISS_NUM)

1892: IF (x_ihd_rec.old_service_end_date = OKC_API.G_MISS_DATE)
1893: THEN
1894: x_ihd_rec.old_service_end_date := l_ihd_rec.old_service_end_date;
1895: END IF;
1896: IF (x_ihd_rec.new_service_line_id = OKC_API.G_MISS_NUM)
1897: THEN
1898: x_ihd_rec.new_service_line_id := l_ihd_rec.new_service_line_id;
1899: END IF;
1900: IF (x_ihd_rec.new_service_start_date = OKC_API.G_MISS_DATE)

Line 1900: IF (x_ihd_rec.new_service_start_date = OKC_API.G_MISS_DATE)

1896: IF (x_ihd_rec.new_service_line_id = OKC_API.G_MISS_NUM)
1897: THEN
1898: x_ihd_rec.new_service_line_id := l_ihd_rec.new_service_line_id;
1899: END IF;
1900: IF (x_ihd_rec.new_service_start_date = OKC_API.G_MISS_DATE)
1901: THEN
1902: x_ihd_rec.new_service_start_date := l_ihd_rec.new_service_start_date;
1903: END IF;
1904: IF (x_ihd_rec.new_service_end_date = OKC_API.G_MISS_DATE)

Line 1904: IF (x_ihd_rec.new_service_end_date = OKC_API.G_MISS_DATE)

1900: IF (x_ihd_rec.new_service_start_date = OKC_API.G_MISS_DATE)
1901: THEN
1902: x_ihd_rec.new_service_start_date := l_ihd_rec.new_service_start_date;
1903: END IF;
1904: IF (x_ihd_rec.new_service_end_date = OKC_API.G_MISS_DATE)
1905: THEN
1906: x_ihd_rec.new_service_end_date := l_ihd_rec.new_service_end_date;
1907: END IF;
1908: IF (x_ihd_rec.old_subline_id = OKC_API.G_MISS_NUM)

Line 1908: IF (x_ihd_rec.old_subline_id = OKC_API.G_MISS_NUM)

1904: IF (x_ihd_rec.new_service_end_date = OKC_API.G_MISS_DATE)
1905: THEN
1906: x_ihd_rec.new_service_end_date := l_ihd_rec.new_service_end_date;
1907: END IF;
1908: IF (x_ihd_rec.old_subline_id = OKC_API.G_MISS_NUM)
1909: THEN
1910: x_ihd_rec.old_subline_id := l_ihd_rec.old_subline_id;
1911: END IF;
1912: IF (x_ihd_rec.old_subline_start_date = OKC_API.G_MISS_DATE)

Line 1912: IF (x_ihd_rec.old_subline_start_date = OKC_API.G_MISS_DATE)

1908: IF (x_ihd_rec.old_subline_id = OKC_API.G_MISS_NUM)
1909: THEN
1910: x_ihd_rec.old_subline_id := l_ihd_rec.old_subline_id;
1911: END IF;
1912: IF (x_ihd_rec.old_subline_start_date = OKC_API.G_MISS_DATE)
1913: THEN
1914: x_ihd_rec.old_subline_start_date := l_ihd_rec.old_subline_start_date;
1915: END IF;
1916: IF (x_ihd_rec.old_subline_end_date = OKC_API.G_MISS_DATE)

Line 1916: IF (x_ihd_rec.old_subline_end_date = OKC_API.G_MISS_DATE)

1912: IF (x_ihd_rec.old_subline_start_date = OKC_API.G_MISS_DATE)
1913: THEN
1914: x_ihd_rec.old_subline_start_date := l_ihd_rec.old_subline_start_date;
1915: END IF;
1916: IF (x_ihd_rec.old_subline_end_date = OKC_API.G_MISS_DATE)
1917: THEN
1918: x_ihd_rec.old_subline_end_date := l_ihd_rec.old_subline_end_date;
1919: END IF;
1920: IF (x_ihd_rec.new_subline_id = OKC_API.G_MISS_NUM)

Line 1920: IF (x_ihd_rec.new_subline_id = OKC_API.G_MISS_NUM)

1916: IF (x_ihd_rec.old_subline_end_date = OKC_API.G_MISS_DATE)
1917: THEN
1918: x_ihd_rec.old_subline_end_date := l_ihd_rec.old_subline_end_date;
1919: END IF;
1920: IF (x_ihd_rec.new_subline_id = OKC_API.G_MISS_NUM)
1921: THEN
1922: x_ihd_rec.new_subline_id := l_ihd_rec.new_subline_id;
1923: END IF;
1924: IF (x_ihd_rec.new_subline_start_date = OKC_API.G_MISS_DATE)

Line 1924: IF (x_ihd_rec.new_subline_start_date = OKC_API.G_MISS_DATE)

1920: IF (x_ihd_rec.new_subline_id = OKC_API.G_MISS_NUM)
1921: THEN
1922: x_ihd_rec.new_subline_id := l_ihd_rec.new_subline_id;
1923: END IF;
1924: IF (x_ihd_rec.new_subline_start_date = OKC_API.G_MISS_DATE)
1925: THEN
1926: x_ihd_rec.new_subline_start_date := l_ihd_rec.new_subline_start_date;
1927: END IF;
1928: IF (x_ihd_rec.new_subline_end_date = OKC_API.G_MISS_DATE)

Line 1928: IF (x_ihd_rec.new_subline_end_date = OKC_API.G_MISS_DATE)

1924: IF (x_ihd_rec.new_subline_start_date = OKC_API.G_MISS_DATE)
1925: THEN
1926: x_ihd_rec.new_subline_start_date := l_ihd_rec.new_subline_start_date;
1927: END IF;
1928: IF (x_ihd_rec.new_subline_end_date = OKC_API.G_MISS_DATE)
1929: THEN
1930: x_ihd_rec.new_subline_end_date := l_ihd_rec.new_subline_end_date;
1931: END IF;
1932: IF (x_ihd_rec.old_customer = OKC_API.G_MISS_NUM)

Line 1932: IF (x_ihd_rec.old_customer = OKC_API.G_MISS_NUM)

1928: IF (x_ihd_rec.new_subline_end_date = OKC_API.G_MISS_DATE)
1929: THEN
1930: x_ihd_rec.new_subline_end_date := l_ihd_rec.new_subline_end_date;
1931: END IF;
1932: IF (x_ihd_rec.old_customer = OKC_API.G_MISS_NUM)
1933: THEN
1934: x_ihd_rec.old_customer := l_ihd_rec.old_customer;
1935: END IF;
1936: IF (x_ihd_rec.new_customer = OKC_API.G_MISS_NUM)

Line 1936: IF (x_ihd_rec.new_customer = OKC_API.G_MISS_NUM)

1932: IF (x_ihd_rec.old_customer = OKC_API.G_MISS_NUM)
1933: THEN
1934: x_ihd_rec.old_customer := l_ihd_rec.old_customer;
1935: END IF;
1936: IF (x_ihd_rec.new_customer = OKC_API.G_MISS_NUM)
1937: THEN
1938: x_ihd_rec.new_customer := l_ihd_rec.new_customer;
1939: END IF;
1940: IF (x_ihd_rec.old_k_status = OKC_API.G_MISS_CHAR)

Line 1940: IF (x_ihd_rec.old_k_status = OKC_API.G_MISS_CHAR)

1936: IF (x_ihd_rec.new_customer = OKC_API.G_MISS_NUM)
1937: THEN
1938: x_ihd_rec.new_customer := l_ihd_rec.new_customer;
1939: END IF;
1940: IF (x_ihd_rec.old_k_status = OKC_API.G_MISS_CHAR)
1941: THEN
1942: x_ihd_rec.old_k_status := l_ihd_rec.old_k_status;
1943: END IF;
1944: IF (x_ihd_rec.new_k_status = OKC_API.G_MISS_CHAR)

Line 1944: IF (x_ihd_rec.new_k_status = OKC_API.G_MISS_CHAR)

1940: IF (x_ihd_rec.old_k_status = OKC_API.G_MISS_CHAR)
1941: THEN
1942: x_ihd_rec.old_k_status := l_ihd_rec.old_k_status;
1943: END IF;
1944: IF (x_ihd_rec.new_k_status = OKC_API.G_MISS_CHAR)
1945: THEN
1946: x_ihd_rec.new_k_status := l_ihd_rec.new_k_status;
1947: END IF;
1948: IF (x_ihd_rec.subline_date_terminated = OKC_API.G_MISS_DATE)

Line 1948: IF (x_ihd_rec.subline_date_terminated = OKC_API.G_MISS_DATE)

1944: IF (x_ihd_rec.new_k_status = OKC_API.G_MISS_CHAR)
1945: THEN
1946: x_ihd_rec.new_k_status := l_ihd_rec.new_k_status;
1947: END IF;
1948: IF (x_ihd_rec.subline_date_terminated = OKC_API.G_MISS_DATE)
1949: THEN
1950: x_ihd_rec.subline_date_terminated := l_ihd_rec.subline_date_terminated;
1951: END IF;
1952: IF (x_ihd_rec.transfer_option = OKC_API.G_MISS_CHAR)

Line 1952: IF (x_ihd_rec.transfer_option = OKC_API.G_MISS_CHAR)

1948: IF (x_ihd_rec.subline_date_terminated = OKC_API.G_MISS_DATE)
1949: THEN
1950: x_ihd_rec.subline_date_terminated := l_ihd_rec.subline_date_terminated;
1951: END IF;
1952: IF (x_ihd_rec.transfer_option = OKC_API.G_MISS_CHAR)
1953: THEN
1954: x_ihd_rec.transfer_option := l_ihd_rec.transfer_option;
1955: END IF;
1956: IF (x_ihd_rec.created_by = OKC_API.G_MISS_NUM)

Line 1956: IF (x_ihd_rec.created_by = OKC_API.G_MISS_NUM)

1952: IF (x_ihd_rec.transfer_option = OKC_API.G_MISS_CHAR)
1953: THEN
1954: x_ihd_rec.transfer_option := l_ihd_rec.transfer_option;
1955: END IF;
1956: IF (x_ihd_rec.created_by = OKC_API.G_MISS_NUM)
1957: THEN
1958: x_ihd_rec.created_by := l_ihd_rec.created_by;
1959: END IF;
1960: IF (x_ihd_rec.creation_date = OKC_API.G_MISS_DATE)

Line 1960: IF (x_ihd_rec.creation_date = OKC_API.G_MISS_DATE)

1956: IF (x_ihd_rec.created_by = OKC_API.G_MISS_NUM)
1957: THEN
1958: x_ihd_rec.created_by := l_ihd_rec.created_by;
1959: END IF;
1960: IF (x_ihd_rec.creation_date = OKC_API.G_MISS_DATE)
1961: THEN
1962: x_ihd_rec.creation_date := l_ihd_rec.creation_date;
1963: END IF;
1964: IF (x_ihd_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 1964: IF (x_ihd_rec.last_updated_by = OKC_API.G_MISS_NUM)

1960: IF (x_ihd_rec.creation_date = OKC_API.G_MISS_DATE)
1961: THEN
1962: x_ihd_rec.creation_date := l_ihd_rec.creation_date;
1963: END IF;
1964: IF (x_ihd_rec.last_updated_by = OKC_API.G_MISS_NUM)
1965: THEN
1966: x_ihd_rec.last_updated_by := l_ihd_rec.last_updated_by;
1967: END IF;
1968: IF (x_ihd_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 1968: IF (x_ihd_rec.last_update_date = OKC_API.G_MISS_DATE)

1964: IF (x_ihd_rec.last_updated_by = OKC_API.G_MISS_NUM)
1965: THEN
1966: x_ihd_rec.last_updated_by := l_ihd_rec.last_updated_by;
1967: END IF;
1968: IF (x_ihd_rec.last_update_date = OKC_API.G_MISS_DATE)
1969: THEN
1970: x_ihd_rec.last_update_date := l_ihd_rec.last_update_date;
1971: END IF;
1972: IF (x_ihd_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 1972: IF (x_ihd_rec.last_update_login = OKC_API.G_MISS_NUM)

1968: IF (x_ihd_rec.last_update_date = OKC_API.G_MISS_DATE)
1969: THEN
1970: x_ihd_rec.last_update_date := l_ihd_rec.last_update_date;
1971: END IF;
1972: IF (x_ihd_rec.last_update_login = OKC_API.G_MISS_NUM)
1973: THEN
1974: x_ihd_rec.last_update_login := l_ihd_rec.last_update_login;
1975: END IF;
1976: IF (x_ihd_rec.object_version_number = OKC_API.G_MISS_NUM)

Line 1976: IF (x_ihd_rec.object_version_number = OKC_API.G_MISS_NUM)

1972: IF (x_ihd_rec.last_update_login = OKC_API.G_MISS_NUM)
1973: THEN
1974: x_ihd_rec.last_update_login := l_ihd_rec.last_update_login;
1975: END IF;
1976: IF (x_ihd_rec.object_version_number = OKC_API.G_MISS_NUM)
1977: THEN
1978: x_ihd_rec.object_version_number := l_ihd_rec.object_version_number;
1979: END IF;
1980: IF (x_ihd_rec.date_cancelled = OKC_API.G_MISS_DATE)

Line 1980: IF (x_ihd_rec.date_cancelled = OKC_API.G_MISS_DATE)

1976: IF (x_ihd_rec.object_version_number = OKC_API.G_MISS_NUM)
1977: THEN
1978: x_ihd_rec.object_version_number := l_ihd_rec.object_version_number;
1979: END IF;
1980: IF (x_ihd_rec.date_cancelled = OKC_API.G_MISS_DATE)
1981: THEN
1982: x_ihd_rec.date_cancelled := l_ihd_rec.date_cancelled;
1983: END IF;
1984: END IF;

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

1990: FUNCTION Set_Attributes (
1991: p_ihd_rec IN ihd_rec_type,
1992: x_ihd_rec OUT NOCOPY ihd_rec_type
1993: ) RETURN VARCHAR2 IS
1994: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1995: BEGIN
1996: x_ihd_rec := p_ihd_rec;
1997: x_ihd_rec.OBJECT_VERSION_NUMBER := p_ihd_rec.OBJECT_VERSION_NUMBER + 1;
1998: RETURN(l_return_status);

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

1997: x_ihd_rec.OBJECT_VERSION_NUMBER := p_ihd_rec.OBJECT_VERSION_NUMBER + 1;
1998: RETURN(l_return_status);
1999: END Set_Attributes;
2000: BEGIN
2001: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2002: p_init_msg_list,
2003: '_PVT',
2004: x_return_status);
2005: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

2001: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2002: p_init_msg_list,
2003: '_PVT',
2004: x_return_status);
2005: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2006: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2007: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2008: RAISE OKC_API.G_EXCEPTION_ERROR;
2009: END IF;

Line 2006: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2002: p_init_msg_list,
2003: '_PVT',
2004: x_return_status);
2005: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2006: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2007: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2008: RAISE OKC_API.G_EXCEPTION_ERROR;
2009: END IF;
2010: --- Setting item attributes

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

2003: '_PVT',
2004: x_return_status);
2005: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2006: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2007: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2008: RAISE OKC_API.G_EXCEPTION_ERROR;
2009: END IF;
2010: --- Setting item attributes
2011: l_return_status := Set_Attributes(

Line 2008: RAISE OKC_API.G_EXCEPTION_ERROR;

2004: x_return_status);
2005: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2006: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2007: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2008: RAISE OKC_API.G_EXCEPTION_ERROR;
2009: END IF;
2010: --- Setting item attributes
2011: l_return_status := Set_Attributes(
2012: p_ihd_rec, -- IN

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

2011: l_return_status := Set_Attributes(
2012: p_ihd_rec, -- IN
2013: l_ihd_rec); -- OUT
2014: --- If any errors happen abort API
2015: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2017: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;

Line 2016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2012: p_ihd_rec, -- IN
2013: l_ihd_rec); -- OUT
2014: --- If any errors happen abort API
2015: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2017: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);

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

2013: l_ihd_rec); -- OUT
2014: --- If any errors happen abort API
2015: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2017: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2018: RAISE OKC_API.G_EXCEPTION_ERROR;

2014: --- If any errors happen abort API
2015: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2016: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2017: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2017: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;

Line 2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2018: RAISE OKC_API.G_EXCEPTION_ERROR;
2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026: UPDATE OKS_INST_HIST_DETAILS

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

2019: END IF;
2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026: UPDATE OKS_INST_HIST_DETAILS
2027: SET INS_ID = l_def_ihd_rec.ins_id,

Line 2024: RAISE OKC_API.G_EXCEPTION_ERROR;

2020: l_return_status := populate_new_record(l_ihd_rec, l_def_ihd_rec);
2021: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2022: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2023: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2024: RAISE OKC_API.G_EXCEPTION_ERROR;
2025: END IF;
2026: UPDATE OKS_INST_HIST_DETAILS
2027: SET INS_ID = l_def_ihd_rec.ins_id,
2028: TRANSACTION_DATE = l_def_ihd_rec.transaction_date,

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

2067: WHERE ID = l_def_ihd_rec.id;
2068:
2069: x_ihd_rec := l_ihd_rec;
2070: x_return_status := l_return_status;
2071: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2072: EXCEPTION
2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (

Line 2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2069: x_ihd_rec := l_ihd_rec;
2070: x_return_status := l_return_status;
2071: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2072: EXCEPTION
2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,

Line 2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2070: x_return_status := l_return_status;
2071: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2072: EXCEPTION
2073: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,
2078: 'OKC_API.G_RET_STS_ERROR',

Line 2078: 'OKC_API.G_RET_STS_ERROR',

2074: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2075: (
2076: l_api_name,
2077: G_PKG_NAME,
2078: 'OKC_API.G_RET_STS_ERROR',
2079: x_msg_count,
2080: x_msg_data,
2081: '_PVT'
2082: );

Line 2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2079: x_msg_count,
2080: x_msg_data,
2081: '_PVT'
2082: );
2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,

Line 2084: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2080: x_msg_data,
2081: '_PVT'
2082: );
2083: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2084: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,
2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2084: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2085: (
2086: l_api_name,
2087: G_PKG_NAME,
2088: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2089: x_msg_count,
2090: x_msg_data,
2091: '_PVT'
2092: );

Line 2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2090: x_msg_data,
2091: '_PVT'
2092: );
2093: WHEN OTHERS THEN
2094: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2095: (
2096: l_api_name,
2097: G_PKG_NAME,
2098: 'OTHERS',

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

2114: x_ihdv_rec OUT NOCOPY ihdv_rec_type) IS
2115:
2116: l_api_version CONSTANT NUMBER := 1;
2117: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
2118: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2119: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
2120: l_def_ihdv_rec ihdv_rec_type;
2121: l_db_ihdv_rec ihdv_rec_type;
2122: l_ihd_rec ihd_rec_type;

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

2141: p_ihdv_rec IN ihdv_rec_type,
2142: x_ihdv_rec OUT NOCOPY ihdv_rec_type
2143: ) RETURN VARCHAR2 IS
2144: l_row_notfound BOOLEAN := TRUE;
2145: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2146: BEGIN
2147: x_ihdv_rec := p_ihdv_rec;
2148: -- Get current database values
2149: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it

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

2148: -- Get current database values
2149: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2150: -- so it may be verified through LOCK_ROW.
2151: l_db_ihdv_rec := get_rec(p_ihdv_rec, l_return_status);
2152: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2153: IF (x_ihdv_rec.id = OKC_API.G_MISS_NUM)
2154: THEN
2155: x_ihdv_rec.id := l_db_ihdv_rec.id;
2156: END IF;

Line 2153: IF (x_ihdv_rec.id = OKC_API.G_MISS_NUM)

2149: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
2150: -- so it may be verified through LOCK_ROW.
2151: l_db_ihdv_rec := get_rec(p_ihdv_rec, l_return_status);
2152: IF (l_return_status = OKC_API.G_RET_STS_SUCCESS) THEN
2153: IF (x_ihdv_rec.id = OKC_API.G_MISS_NUM)
2154: THEN
2155: x_ihdv_rec.id := l_db_ihdv_rec.id;
2156: END IF;
2157: IF (x_ihdv_rec.ins_id = OKC_API.G_MISS_NUM)

Line 2157: IF (x_ihdv_rec.ins_id = OKC_API.G_MISS_NUM)

2153: IF (x_ihdv_rec.id = OKC_API.G_MISS_NUM)
2154: THEN
2155: x_ihdv_rec.id := l_db_ihdv_rec.id;
2156: END IF;
2157: IF (x_ihdv_rec.ins_id = OKC_API.G_MISS_NUM)
2158: THEN
2159: x_ihdv_rec.ins_id := l_db_ihdv_rec.ins_id;
2160: END IF;
2161: IF (x_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE)

Line 2161: IF (x_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE)

2157: IF (x_ihdv_rec.ins_id = OKC_API.G_MISS_NUM)
2158: THEN
2159: x_ihdv_rec.ins_id := l_db_ihdv_rec.ins_id;
2160: END IF;
2161: IF (x_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE)
2162: THEN
2163: x_ihdv_rec.transaction_date := l_db_ihdv_rec.transaction_date;
2164: END IF;
2165: IF (x_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR)

Line 2165: IF (x_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR)

2161: IF (x_ihdv_rec.transaction_date = OKC_API.G_MISS_DATE)
2162: THEN
2163: x_ihdv_rec.transaction_date := l_db_ihdv_rec.transaction_date;
2164: END IF;
2165: IF (x_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR)
2166: THEN
2167: x_ihdv_rec.transaction_type := l_db_ihdv_rec.transaction_type;
2168: END IF;
2169: IF (x_ihdv_rec.system_id = OKC_API.G_MISS_NUM)

Line 2169: IF (x_ihdv_rec.system_id = OKC_API.G_MISS_NUM)

2165: IF (x_ihdv_rec.transaction_type = OKC_API.G_MISS_CHAR)
2166: THEN
2167: x_ihdv_rec.transaction_type := l_db_ihdv_rec.transaction_type;
2168: END IF;
2169: IF (x_ihdv_rec.system_id = OKC_API.G_MISS_NUM)
2170: THEN
2171: x_ihdv_rec.system_id := l_db_ihdv_rec.system_id;
2172: END IF;
2173: IF (x_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM)

Line 2173: IF (x_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM)

2169: IF (x_ihdv_rec.system_id = OKC_API.G_MISS_NUM)
2170: THEN
2171: x_ihdv_rec.system_id := l_db_ihdv_rec.system_id;
2172: END IF;
2173: IF (x_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM)
2174: THEN
2175: x_ihdv_rec.instance_id_new := l_db_ihdv_rec.instance_id_new;
2176: END IF;
2177: IF (x_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM)

Line 2177: IF (x_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM)

2173: IF (x_ihdv_rec.instance_id_new = OKC_API.G_MISS_NUM)
2174: THEN
2175: x_ihdv_rec.instance_id_new := l_db_ihdv_rec.instance_id_new;
2176: END IF;
2177: IF (x_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM)
2178: THEN
2179: x_ihdv_rec.instance_qty_old := l_db_ihdv_rec.instance_qty_old;
2180: END IF;
2181: IF (x_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM)

Line 2181: IF (x_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM)

2177: IF (x_ihdv_rec.instance_qty_old = OKC_API.G_MISS_NUM)
2178: THEN
2179: x_ihdv_rec.instance_qty_old := l_db_ihdv_rec.instance_qty_old;
2180: END IF;
2181: IF (x_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM)
2182: THEN
2183: x_ihdv_rec.instance_qty_new := l_db_ihdv_rec.instance_qty_new;
2184: END IF;
2185: IF (x_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM)

Line 2185: IF (x_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM)

2181: IF (x_ihdv_rec.instance_qty_new = OKC_API.G_MISS_NUM)
2182: THEN
2183: x_ihdv_rec.instance_qty_new := l_db_ihdv_rec.instance_qty_new;
2184: END IF;
2185: IF (x_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM)
2186: THEN
2187: x_ihdv_rec.instance_amt_old := l_db_ihdv_rec.instance_amt_old;
2188: END IF;
2189: IF (x_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM)

Line 2189: IF (x_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM)

2185: IF (x_ihdv_rec.instance_amt_old = OKC_API.G_MISS_NUM)
2186: THEN
2187: x_ihdv_rec.instance_amt_old := l_db_ihdv_rec.instance_amt_old;
2188: END IF;
2189: IF (x_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM)
2190: THEN
2191: x_ihdv_rec.instance_amt_new := l_db_ihdv_rec.instance_amt_new;
2192: END IF;
2193: IF (x_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM)

Line 2193: IF (x_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM)

2189: IF (x_ihdv_rec.instance_amt_new = OKC_API.G_MISS_NUM)
2190: THEN
2191: x_ihdv_rec.instance_amt_new := l_db_ihdv_rec.instance_amt_new;
2192: END IF;
2193: IF (x_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM)
2194: THEN
2195: x_ihdv_rec.old_contract_id := l_db_ihdv_rec.old_contract_id;
2196: END IF;
2197: IF (x_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE)

Line 2197: IF (x_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE)

2193: IF (x_ihdv_rec.old_contract_id = OKC_API.G_MISS_NUM)
2194: THEN
2195: x_ihdv_rec.old_contract_id := l_db_ihdv_rec.old_contract_id;
2196: END IF;
2197: IF (x_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE)
2198: THEN
2199: x_ihdv_rec.old_contact_start_date := l_db_ihdv_rec.old_contact_start_date;
2200: END IF;
2201: IF (x_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE)

Line 2201: IF (x_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE)

2197: IF (x_ihdv_rec.old_contact_start_date = OKC_API.G_MISS_DATE)
2198: THEN
2199: x_ihdv_rec.old_contact_start_date := l_db_ihdv_rec.old_contact_start_date;
2200: END IF;
2201: IF (x_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE)
2202: THEN
2203: x_ihdv_rec.old_contract_end_date := l_db_ihdv_rec.old_contract_end_date;
2204: END IF;
2205: IF (x_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM)

Line 2205: IF (x_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM)

2201: IF (x_ihdv_rec.old_contract_end_date = OKC_API.G_MISS_DATE)
2202: THEN
2203: x_ihdv_rec.old_contract_end_date := l_db_ihdv_rec.old_contract_end_date;
2204: END IF;
2205: IF (x_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM)
2206: THEN
2207: x_ihdv_rec.new_contract_id := l_db_ihdv_rec.new_contract_id;
2208: END IF;
2209: IF (x_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE)

Line 2209: IF (x_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE)

2205: IF (x_ihdv_rec.new_contract_id = OKC_API.G_MISS_NUM)
2206: THEN
2207: x_ihdv_rec.new_contract_id := l_db_ihdv_rec.new_contract_id;
2208: END IF;
2209: IF (x_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE)
2210: THEN
2211: x_ihdv_rec.new_contact_start_date := l_db_ihdv_rec.new_contact_start_date;
2212: END IF;
2213: IF (x_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE)

Line 2213: IF (x_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE)

2209: IF (x_ihdv_rec.new_contact_start_date = OKC_API.G_MISS_DATE)
2210: THEN
2211: x_ihdv_rec.new_contact_start_date := l_db_ihdv_rec.new_contact_start_date;
2212: END IF;
2213: IF (x_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE)
2214: THEN
2215: x_ihdv_rec.new_contract_end_date := l_db_ihdv_rec.new_contract_end_date;
2216: END IF;
2217: IF (x_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM)

Line 2217: IF (x_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM)

2213: IF (x_ihdv_rec.new_contract_end_date = OKC_API.G_MISS_DATE)
2214: THEN
2215: x_ihdv_rec.new_contract_end_date := l_db_ihdv_rec.new_contract_end_date;
2216: END IF;
2217: IF (x_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM)
2218: THEN
2219: x_ihdv_rec.old_service_line_id := l_db_ihdv_rec.old_service_line_id;
2220: END IF;
2221: IF (x_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE)

Line 2221: IF (x_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE)

2217: IF (x_ihdv_rec.old_service_line_id = OKC_API.G_MISS_NUM)
2218: THEN
2219: x_ihdv_rec.old_service_line_id := l_db_ihdv_rec.old_service_line_id;
2220: END IF;
2221: IF (x_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE)
2222: THEN
2223: x_ihdv_rec.old_service_start_date := l_db_ihdv_rec.old_service_start_date;
2224: END IF;
2225: IF (x_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE)

Line 2225: IF (x_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE)

2221: IF (x_ihdv_rec.old_service_start_date = OKC_API.G_MISS_DATE)
2222: THEN
2223: x_ihdv_rec.old_service_start_date := l_db_ihdv_rec.old_service_start_date;
2224: END IF;
2225: IF (x_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE)
2226: THEN
2227: x_ihdv_rec.old_service_end_date := l_db_ihdv_rec.old_service_end_date;
2228: END IF;
2229: IF (x_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM)

Line 2229: IF (x_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM)

2225: IF (x_ihdv_rec.old_service_end_date = OKC_API.G_MISS_DATE)
2226: THEN
2227: x_ihdv_rec.old_service_end_date := l_db_ihdv_rec.old_service_end_date;
2228: END IF;
2229: IF (x_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM)
2230: THEN
2231: x_ihdv_rec.new_service_line_id := l_db_ihdv_rec.new_service_line_id;
2232: END IF;
2233: IF (x_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE)

Line 2233: IF (x_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE)

2229: IF (x_ihdv_rec.new_service_line_id = OKC_API.G_MISS_NUM)
2230: THEN
2231: x_ihdv_rec.new_service_line_id := l_db_ihdv_rec.new_service_line_id;
2232: END IF;
2233: IF (x_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE)
2234: THEN
2235: x_ihdv_rec.new_service_start_date := l_db_ihdv_rec.new_service_start_date;
2236: END IF;
2237: IF (x_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE)

Line 2237: IF (x_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE)

2233: IF (x_ihdv_rec.new_service_start_date = OKC_API.G_MISS_DATE)
2234: THEN
2235: x_ihdv_rec.new_service_start_date := l_db_ihdv_rec.new_service_start_date;
2236: END IF;
2237: IF (x_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE)
2238: THEN
2239: x_ihdv_rec.new_service_end_date := l_db_ihdv_rec.new_service_end_date;
2240: END IF;
2241: IF (x_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM)

Line 2241: IF (x_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM)

2237: IF (x_ihdv_rec.new_service_end_date = OKC_API.G_MISS_DATE)
2238: THEN
2239: x_ihdv_rec.new_service_end_date := l_db_ihdv_rec.new_service_end_date;
2240: END IF;
2241: IF (x_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM)
2242: THEN
2243: x_ihdv_rec.old_subline_id := l_db_ihdv_rec.old_subline_id;
2244: END IF;
2245: IF (x_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE)

Line 2245: IF (x_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE)

2241: IF (x_ihdv_rec.old_subline_id = OKC_API.G_MISS_NUM)
2242: THEN
2243: x_ihdv_rec.old_subline_id := l_db_ihdv_rec.old_subline_id;
2244: END IF;
2245: IF (x_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE)
2246: THEN
2247: x_ihdv_rec.old_subline_start_date := l_db_ihdv_rec.old_subline_start_date;
2248: END IF;
2249: IF (x_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE)

Line 2249: IF (x_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE)

2245: IF (x_ihdv_rec.old_subline_start_date = OKC_API.G_MISS_DATE)
2246: THEN
2247: x_ihdv_rec.old_subline_start_date := l_db_ihdv_rec.old_subline_start_date;
2248: END IF;
2249: IF (x_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE)
2250: THEN
2251: x_ihdv_rec.old_subline_end_date := l_db_ihdv_rec.old_subline_end_date;
2252: END IF;
2253: IF (x_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM)

Line 2253: IF (x_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM)

2249: IF (x_ihdv_rec.old_subline_end_date = OKC_API.G_MISS_DATE)
2250: THEN
2251: x_ihdv_rec.old_subline_end_date := l_db_ihdv_rec.old_subline_end_date;
2252: END IF;
2253: IF (x_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM)
2254: THEN
2255: x_ihdv_rec.new_subline_id := l_db_ihdv_rec.new_subline_id;
2256: END IF;
2257: IF (x_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE)

Line 2257: IF (x_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE)

2253: IF (x_ihdv_rec.new_subline_id = OKC_API.G_MISS_NUM)
2254: THEN
2255: x_ihdv_rec.new_subline_id := l_db_ihdv_rec.new_subline_id;
2256: END IF;
2257: IF (x_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE)
2258: THEN
2259: x_ihdv_rec.new_subline_start_date := l_db_ihdv_rec.new_subline_start_date;
2260: END IF;
2261: IF (x_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE)

Line 2261: IF (x_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE)

2257: IF (x_ihdv_rec.new_subline_start_date = OKC_API.G_MISS_DATE)
2258: THEN
2259: x_ihdv_rec.new_subline_start_date := l_db_ihdv_rec.new_subline_start_date;
2260: END IF;
2261: IF (x_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE)
2262: THEN
2263: x_ihdv_rec.new_subline_end_date := l_db_ihdv_rec.new_subline_end_date;
2264: END IF;
2265: IF (x_ihdv_rec.old_customer = OKC_API.G_MISS_NUM)

Line 2265: IF (x_ihdv_rec.old_customer = OKC_API.G_MISS_NUM)

2261: IF (x_ihdv_rec.new_subline_end_date = OKC_API.G_MISS_DATE)
2262: THEN
2263: x_ihdv_rec.new_subline_end_date := l_db_ihdv_rec.new_subline_end_date;
2264: END IF;
2265: IF (x_ihdv_rec.old_customer = OKC_API.G_MISS_NUM)
2266: THEN
2267: x_ihdv_rec.old_customer := l_db_ihdv_rec.old_customer;
2268: END IF;
2269: IF (x_ihdv_rec.new_customer = OKC_API.G_MISS_NUM)

Line 2269: IF (x_ihdv_rec.new_customer = OKC_API.G_MISS_NUM)

2265: IF (x_ihdv_rec.old_customer = OKC_API.G_MISS_NUM)
2266: THEN
2267: x_ihdv_rec.old_customer := l_db_ihdv_rec.old_customer;
2268: END IF;
2269: IF (x_ihdv_rec.new_customer = OKC_API.G_MISS_NUM)
2270: THEN
2271: x_ihdv_rec.new_customer := l_db_ihdv_rec.new_customer;
2272: END IF;
2273: IF (x_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR)

Line 2273: IF (x_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR)

2269: IF (x_ihdv_rec.new_customer = OKC_API.G_MISS_NUM)
2270: THEN
2271: x_ihdv_rec.new_customer := l_db_ihdv_rec.new_customer;
2272: END IF;
2273: IF (x_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR)
2274: THEN
2275: x_ihdv_rec.old_k_status := l_db_ihdv_rec.old_k_status;
2276: END IF;
2277: IF (x_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR)

Line 2277: IF (x_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR)

2273: IF (x_ihdv_rec.old_k_status = OKC_API.G_MISS_CHAR)
2274: THEN
2275: x_ihdv_rec.old_k_status := l_db_ihdv_rec.old_k_status;
2276: END IF;
2277: IF (x_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR)
2278: THEN
2279: x_ihdv_rec.new_k_status := l_db_ihdv_rec.new_k_status;
2280: END IF;
2281: IF (x_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE)

Line 2281: IF (x_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE)

2277: IF (x_ihdv_rec.new_k_status = OKC_API.G_MISS_CHAR)
2278: THEN
2279: x_ihdv_rec.new_k_status := l_db_ihdv_rec.new_k_status;
2280: END IF;
2281: IF (x_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE)
2282: THEN
2283: x_ihdv_rec.subline_date_terminated := l_db_ihdv_rec.subline_date_terminated;
2284: END IF;
2285: IF (x_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR)

Line 2285: IF (x_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR)

2281: IF (x_ihdv_rec.subline_date_terminated = OKC_API.G_MISS_DATE)
2282: THEN
2283: x_ihdv_rec.subline_date_terminated := l_db_ihdv_rec.subline_date_terminated;
2284: END IF;
2285: IF (x_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR)
2286: THEN
2287: x_ihdv_rec.transfer_option := l_db_ihdv_rec.transfer_option;
2288: END IF;
2289: IF (x_ihdv_rec.created_by = OKC_API.G_MISS_NUM)

Line 2289: IF (x_ihdv_rec.created_by = OKC_API.G_MISS_NUM)

2285: IF (x_ihdv_rec.transfer_option = OKC_API.G_MISS_CHAR)
2286: THEN
2287: x_ihdv_rec.transfer_option := l_db_ihdv_rec.transfer_option;
2288: END IF;
2289: IF (x_ihdv_rec.created_by = OKC_API.G_MISS_NUM)
2290: THEN
2291: x_ihdv_rec.created_by := l_db_ihdv_rec.created_by;
2292: END IF;
2293: IF (x_ihdv_rec.creation_date = OKC_API.G_MISS_DATE)

Line 2293: IF (x_ihdv_rec.creation_date = OKC_API.G_MISS_DATE)

2289: IF (x_ihdv_rec.created_by = OKC_API.G_MISS_NUM)
2290: THEN
2291: x_ihdv_rec.created_by := l_db_ihdv_rec.created_by;
2292: END IF;
2293: IF (x_ihdv_rec.creation_date = OKC_API.G_MISS_DATE)
2294: THEN
2295: x_ihdv_rec.creation_date := l_db_ihdv_rec.creation_date;
2296: END IF;
2297: IF (x_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM)

Line 2297: IF (x_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM)

2293: IF (x_ihdv_rec.creation_date = OKC_API.G_MISS_DATE)
2294: THEN
2295: x_ihdv_rec.creation_date := l_db_ihdv_rec.creation_date;
2296: END IF;
2297: IF (x_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2298: THEN
2299: x_ihdv_rec.last_updated_by := l_db_ihdv_rec.last_updated_by;
2300: END IF;
2301: IF (x_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE)

Line 2301: IF (x_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE)

2297: IF (x_ihdv_rec.last_updated_by = OKC_API.G_MISS_NUM)
2298: THEN
2299: x_ihdv_rec.last_updated_by := l_db_ihdv_rec.last_updated_by;
2300: END IF;
2301: IF (x_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE)
2302: THEN
2303: x_ihdv_rec.last_update_date := l_db_ihdv_rec.last_update_date;
2304: END IF;
2305: IF (x_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM)

Line 2305: IF (x_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM)

2301: IF (x_ihdv_rec.last_update_date = OKC_API.G_MISS_DATE)
2302: THEN
2303: x_ihdv_rec.last_update_date := l_db_ihdv_rec.last_update_date;
2304: END IF;
2305: IF (x_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM)
2306: THEN
2307: x_ihdv_rec.last_update_login := l_db_ihdv_rec.last_update_login;
2308: END IF;
2309: IF (x_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM)

Line 2309: IF (x_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM)

2305: IF (x_ihdv_rec.last_update_login = OKC_API.G_MISS_NUM)
2306: THEN
2307: x_ihdv_rec.last_update_login := l_db_ihdv_rec.last_update_login;
2308: END IF;
2309: IF (x_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM)
2310: THEN
2311: x_ihdv_rec.security_group_id := l_db_ihdv_rec.security_group_id;
2312: END IF;
2313: IF (x_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE)

Line 2313: IF (x_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE)

2309: IF (x_ihdv_rec.security_group_id = OKC_API.G_MISS_NUM)
2310: THEN
2311: x_ihdv_rec.security_group_id := l_db_ihdv_rec.security_group_id;
2312: END IF;
2313: IF (x_ihdv_rec.date_cancelled = OKC_API.G_MISS_DATE)
2314: THEN
2315: x_ihdv_rec.date_cancelled := l_db_ihdv_rec.date_cancelled;
2316: END IF;
2317: END IF;

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

2323: FUNCTION Set_Attributes (
2324: p_ihdv_rec IN ihdv_rec_type,
2325: x_ihdv_rec OUT NOCOPY ihdv_rec_type
2326: ) RETURN VARCHAR2 IS
2327: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2328: BEGIN
2329: x_ihdv_rec := p_ihdv_rec;
2330: RETURN(l_return_status);
2331: END Set_Attributes;

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

2329: x_ihdv_rec := p_ihdv_rec;
2330: RETURN(l_return_status);
2331: END Set_Attributes;
2332: BEGIN
2333: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2334: G_PKG_NAME,
2335: p_init_msg_list,
2336: l_api_version,
2337: p_api_version,

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

2336: l_api_version,
2337: p_api_version,
2338: '_PVT',
2339: x_return_status);
2340: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2342: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2343: RAISE OKC_API.G_EXCEPTION_ERROR;
2344: END IF;

Line 2341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2337: p_api_version,
2338: '_PVT',
2339: x_return_status);
2340: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2342: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2343: RAISE OKC_API.G_EXCEPTION_ERROR;
2344: END IF;
2345: --- Setting item attributes

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

2338: '_PVT',
2339: x_return_status);
2340: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2342: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2343: RAISE OKC_API.G_EXCEPTION_ERROR;
2344: END IF;
2345: --- Setting item attributes
2346: l_return_status := Set_Attributes(

Line 2343: RAISE OKC_API.G_EXCEPTION_ERROR;

2339: x_return_status);
2340: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2341: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2342: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2343: RAISE OKC_API.G_EXCEPTION_ERROR;
2344: END IF;
2345: --- Setting item attributes
2346: l_return_status := Set_Attributes(
2347: p_ihdv_rec, -- IN

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

2346: l_return_status := Set_Attributes(
2347: p_ihdv_rec, -- IN
2348: x_ihdv_rec); -- OUT
2349: --- If any errors happen abort API
2350: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2351: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2352: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;

Line 2351: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2347: p_ihdv_rec, -- IN
2348: x_ihdv_rec); -- OUT
2349: --- If any errors happen abort API
2350: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2351: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2352: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);

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

2348: x_ihdv_rec); -- OUT
2349: --- If any errors happen abort API
2350: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2351: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2352: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2353: RAISE OKC_API.G_EXCEPTION_ERROR;

2349: --- If any errors happen abort API
2350: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2351: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2352: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2352: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2359: RAISE OKC_API.G_EXCEPTION_ERROR;
2360: END IF;

Line 2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2353: RAISE OKC_API.G_EXCEPTION_ERROR;
2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2359: RAISE OKC_API.G_EXCEPTION_ERROR;
2360: END IF;
2361: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);

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

2354: END IF;
2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2359: RAISE OKC_API.G_EXCEPTION_ERROR;
2360: END IF;
2361: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
2362: --- Validate all non-missing attributes (Item Level Validation)

Line 2359: RAISE OKC_API.G_EXCEPTION_ERROR;

2355: l_return_status := populate_new_record(l_ihdv_rec, l_def_ihdv_rec);
2356: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2357: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2358: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2359: RAISE OKC_API.G_EXCEPTION_ERROR;
2360: END IF;
2361: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
2362: --- Validate all non-missing attributes (Item Level Validation)
2363: l_return_status := Validate_Attributes(l_def_ihdv_rec);

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

2361: l_def_ihdv_rec := fill_who_columns(l_def_ihdv_rec);
2362: --- Validate all non-missing attributes (Item Level Validation)
2363: l_return_status := Validate_Attributes(l_def_ihdv_rec);
2364: --- If any errors happen abort API
2365: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2366: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2367: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;

Line 2366: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2362: --- Validate all non-missing attributes (Item Level Validation)
2363: l_return_status := Validate_Attributes(l_def_ihdv_rec);
2364: --- If any errors happen abort API
2365: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2366: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2367: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);

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

2363: l_return_status := Validate_Attributes(l_def_ihdv_rec);
2364: --- If any errors happen abort API
2365: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2366: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2367: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

Line 2368: RAISE OKC_API.G_EXCEPTION_ERROR;

2364: --- If any errors happen abort API
2365: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2366: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2367: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

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

2367: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2374: RAISE OKC_API.G_EXCEPTION_ERROR;
2375: END IF;

Line 2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2368: RAISE OKC_API.G_EXCEPTION_ERROR;
2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2374: RAISE OKC_API.G_EXCEPTION_ERROR;
2375: END IF;
2376:

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

2369: END IF;
2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2374: RAISE OKC_API.G_EXCEPTION_ERROR;
2375: END IF;
2376:
2377: -- Lock the Record

Line 2374: RAISE OKC_API.G_EXCEPTION_ERROR;

2370: l_return_status := Validate_Record(l_def_ihdv_rec, l_db_ihdv_rec);
2371: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2372: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2373: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2374: RAISE OKC_API.G_EXCEPTION_ERROR;
2375: END IF;
2376:
2377: -- Lock the Record
2378: lock_row(

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

2381: x_return_status => l_return_status,
2382: x_msg_count => x_msg_count,
2383: x_msg_data => x_msg_data,
2384: p_ihdv_rec => p_ihdv_rec);
2385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2388: RAISE OKC_API.G_EXCEPTION_ERROR;
2389: END IF;

Line 2386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2382: x_msg_count => x_msg_count,
2383: x_msg_data => x_msg_data,
2384: p_ihdv_rec => p_ihdv_rec);
2385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2388: RAISE OKC_API.G_EXCEPTION_ERROR;
2389: END IF;
2390:

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

2383: x_msg_data => x_msg_data,
2384: p_ihdv_rec => p_ihdv_rec);
2385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2388: RAISE OKC_API.G_EXCEPTION_ERROR;
2389: END IF;
2390:
2391: -----------------------------------------

Line 2388: RAISE OKC_API.G_EXCEPTION_ERROR;

2384: p_ihdv_rec => p_ihdv_rec);
2385: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2386: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2387: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2388: RAISE OKC_API.G_EXCEPTION_ERROR;
2389: END IF;
2390:
2391: -----------------------------------------
2392: -- Move VIEW record to "Child" records --

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

2402: x_msg_data,
2403: l_ihd_rec,
2404: lx_ihd_rec
2405: );
2406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2409: RAISE OKC_API.G_EXCEPTION_ERROR;
2410: END IF;

Line 2407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2403: l_ihd_rec,
2404: lx_ihd_rec
2405: );
2406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2409: RAISE OKC_API.G_EXCEPTION_ERROR;
2410: END IF;
2411: migrate(lx_ihd_rec, l_def_ihdv_rec);

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

2404: lx_ihd_rec
2405: );
2406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2409: RAISE OKC_API.G_EXCEPTION_ERROR;
2410: END IF;
2411: migrate(lx_ihd_rec, l_def_ihdv_rec);
2412: x_ihdv_rec := l_def_ihdv_rec;

Line 2409: RAISE OKC_API.G_EXCEPTION_ERROR;

2405: );
2406: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2407: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2408: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2409: RAISE OKC_API.G_EXCEPTION_ERROR;
2410: END IF;
2411: migrate(lx_ihd_rec, l_def_ihdv_rec);
2412: x_ihdv_rec := l_def_ihdv_rec;
2413: x_return_status := l_return_status;

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

2410: END IF;
2411: migrate(lx_ihd_rec, l_def_ihdv_rec);
2412: x_ihdv_rec := l_def_ihdv_rec;
2413: x_return_status := l_return_status;
2414: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2415: EXCEPTION
2416: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2418: (

Line 2416: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2412: x_ihdv_rec := l_def_ihdv_rec;
2413: x_return_status := l_return_status;
2414: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2415: EXCEPTION
2416: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2418: (
2419: l_api_name,
2420: G_PKG_NAME,

Line 2417: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2413: x_return_status := l_return_status;
2414: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2415: EXCEPTION
2416: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2418: (
2419: l_api_name,
2420: G_PKG_NAME,
2421: 'OKC_API.G_RET_STS_ERROR',

Line 2421: 'OKC_API.G_RET_STS_ERROR',

2417: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2418: (
2419: l_api_name,
2420: G_PKG_NAME,
2421: 'OKC_API.G_RET_STS_ERROR',
2422: x_msg_count,
2423: x_msg_data,
2424: '_PVT'
2425: );

Line 2426: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2422: x_msg_count,
2423: x_msg_data,
2424: '_PVT'
2425: );
2426: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2427: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2428: (
2429: l_api_name,
2430: G_PKG_NAME,

Line 2427: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2423: x_msg_data,
2424: '_PVT'
2425: );
2426: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2427: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2428: (
2429: l_api_name,
2430: G_PKG_NAME,
2431: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2431: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2427: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2428: (
2429: l_api_name,
2430: G_PKG_NAME,
2431: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2432: x_msg_count,
2433: x_msg_data,
2434: '_PVT'
2435: );

Line 2437: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2433: x_msg_data,
2434: '_PVT'
2435: );
2436: WHEN OTHERS THEN
2437: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2438: (
2439: l_api_name,
2440: G_PKG_NAME,
2441: 'OTHERS',

Line 2458: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS

2454: x_msg_count OUT NOCOPY NUMBER,
2455: x_msg_data OUT NOCOPY VARCHAR2,
2456: p_ihdv_tbl IN ihdv_tbl_type,
2457: x_ihdv_tbl OUT NOCOPY ihdv_tbl_type,
2458: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
2459:
2460: l_api_version CONSTANT NUMBER := 1;
2461: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2462: i NUMBER := 0;

Line 2464: OKC_API.init_msg_list(p_init_msg_list);

2460: l_api_version CONSTANT NUMBER := 1;
2461: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
2462: i NUMBER := 0;
2463: BEGIN
2464: OKC_API.init_msg_list(p_init_msg_list);
2465: -- Make sure PL/SQL table has records in it before passing
2466: IF (p_ihdv_tbl.COUNT > 0) THEN
2467: i := p_ihdv_tbl.FIRST;
2468: LOOP

Line 2470: l_error_rec OKC_API.ERROR_REC_TYPE;

2466: IF (p_ihdv_tbl.COUNT > 0) THEN
2467: i := p_ihdv_tbl.FIRST;
2468: LOOP
2469: DECLARE
2470: l_error_rec OKC_API.ERROR_REC_TYPE;
2471: BEGIN
2472: l_error_rec.api_name := l_api_name;
2473: l_error_rec.api_package := G_PKG_NAME;
2474: l_error_rec.idx := i;

Line 2477: p_init_msg_list => OKC_API.G_FALSE,

2473: l_error_rec.api_package := G_PKG_NAME;
2474: l_error_rec.idx := i;
2475: update_row (
2476: p_api_version => p_api_version,
2477: p_init_msg_list => OKC_API.G_FALSE,
2478: x_return_status => l_error_rec.error_type,
2479: x_msg_count => l_error_rec.msg_count,
2480: x_msg_data => l_error_rec.msg_data,
2481: p_ihdv_rec => p_ihdv_tbl(i),

Line 2483: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

2479: x_msg_count => l_error_rec.msg_count,
2480: x_msg_data => l_error_rec.msg_data,
2481: p_ihdv_rec => p_ihdv_tbl(i),
2482: x_ihdv_rec => x_ihdv_tbl(i));
2483: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
2484: l_error_rec.sqlcode := SQLCODE;
2485: load_error_tbl(l_error_rec, px_error_tbl);
2486: ELSE
2487: x_msg_count := l_error_rec.msg_count;

Line 2491: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2487: x_msg_count := l_error_rec.msg_count;
2488: x_msg_data := l_error_rec.msg_data;
2489: END IF;
2490: EXCEPTION
2491: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2492: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2493: l_error_rec.sqlcode := SQLCODE;
2494: load_error_tbl(l_error_rec, px_error_tbl);
2495: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2492: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

2488: x_msg_data := l_error_rec.msg_data;
2489: END IF;
2490: EXCEPTION
2491: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2492: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2493: l_error_rec.sqlcode := SQLCODE;
2494: load_error_tbl(l_error_rec, px_error_tbl);
2495: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2496: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2495: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2491: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2492: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2493: l_error_rec.sqlcode := SQLCODE;
2494: load_error_tbl(l_error_rec, px_error_tbl);
2495: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2496: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2497: l_error_rec.sqlcode := SQLCODE;
2498: load_error_tbl(l_error_rec, px_error_tbl);
2499: WHEN OTHERS THEN

Line 2496: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

2492: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2493: l_error_rec.sqlcode := SQLCODE;
2494: load_error_tbl(l_error_rec, px_error_tbl);
2495: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2496: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2497: l_error_rec.sqlcode := SQLCODE;
2498: load_error_tbl(l_error_rec, px_error_tbl);
2499: WHEN OTHERS THEN
2500: l_error_rec.error_type := 'OTHERS';

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

2507: END IF;
2508: -- Loop through the error_tbl to find the error with the highest severity
2509: -- and return it.
2510: x_return_status := find_highest_exception(px_error_tbl);
2511: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2512: EXCEPTION
2513: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2515: (

Line 2513: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2509: -- and return it.
2510: x_return_status := find_highest_exception(px_error_tbl);
2511: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2512: EXCEPTION
2513: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2515: (
2516: l_api_name,
2517: G_PKG_NAME,

Line 2514: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2510: x_return_status := find_highest_exception(px_error_tbl);
2511: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2512: EXCEPTION
2513: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2515: (
2516: l_api_name,
2517: G_PKG_NAME,
2518: 'OKC_API.G_RET_STS_ERROR',

Line 2518: 'OKC_API.G_RET_STS_ERROR',

2514: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2515: (
2516: l_api_name,
2517: G_PKG_NAME,
2518: 'OKC_API.G_RET_STS_ERROR',
2519: x_msg_count,
2520: x_msg_data,
2521: '_PVT'
2522: );

Line 2523: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2519: x_msg_count,
2520: x_msg_data,
2521: '_PVT'
2522: );
2523: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2524: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2525: (
2526: l_api_name,
2527: G_PKG_NAME,

Line 2524: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2520: x_msg_data,
2521: '_PVT'
2522: );
2523: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2524: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2525: (
2526: l_api_name,
2527: G_PKG_NAME,
2528: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2528: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2524: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2525: (
2526: l_api_name,
2527: G_PKG_NAME,
2528: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2529: x_msg_count,
2530: x_msg_data,
2531: '_PVT'
2532: );

Line 2534: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2530: x_msg_data,
2531: '_PVT'
2532: );
2533: WHEN OTHERS THEN
2534: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2535: (
2536: l_api_name,
2537: G_PKG_NAME,
2538: 'OTHERS',

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

2557: x_ihdv_tbl OUT NOCOPY ihdv_tbl_type) IS
2558:
2559: l_api_version CONSTANT NUMBER := 1;
2560: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2561: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2562: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2563: BEGIN
2564: OKC_API.init_msg_list(p_init_msg_list);
2565: -- Make sure PL/SQL table has records in it before passing

Line 2562: l_error_tbl OKC_API.ERROR_TBL_TYPE;

2558:
2559: l_api_version CONSTANT NUMBER := 1;
2560: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2561: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2562: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2563: BEGIN
2564: OKC_API.init_msg_list(p_init_msg_list);
2565: -- Make sure PL/SQL table has records in it before passing
2566: IF (p_ihdv_tbl.COUNT > 0) THEN

Line 2564: OKC_API.init_msg_list(p_init_msg_list);

2560: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
2561: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2562: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2563: BEGIN
2564: OKC_API.init_msg_list(p_init_msg_list);
2565: -- Make sure PL/SQL table has records in it before passing
2566: IF (p_ihdv_tbl.COUNT > 0) THEN
2567: update_row (
2568: p_api_version => p_api_version,

Line 2569: p_init_msg_list => OKC_API.G_FALSE,

2565: -- Make sure PL/SQL table has records in it before passing
2566: IF (p_ihdv_tbl.COUNT > 0) THEN
2567: update_row (
2568: p_api_version => p_api_version,
2569: p_init_msg_list => OKC_API.G_FALSE,
2570: x_return_status => x_return_status,
2571: x_msg_count => x_msg_count,
2572: x_msg_data => x_msg_data,
2573: p_ihdv_tbl => p_ihdv_tbl,

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

2573: p_ihdv_tbl => p_ihdv_tbl,
2574: x_ihdv_tbl => x_ihdv_tbl,
2575: px_error_tbl => l_error_tbl);
2576: END IF;
2577: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2578: EXCEPTION
2579: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2580: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2581: (

Line 2579: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2575: px_error_tbl => l_error_tbl);
2576: END IF;
2577: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2578: EXCEPTION
2579: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2580: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2581: (
2582: l_api_name,
2583: G_PKG_NAME,

Line 2580: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2576: END IF;
2577: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2578: EXCEPTION
2579: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2580: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2581: (
2582: l_api_name,
2583: G_PKG_NAME,
2584: 'OKC_API.G_RET_STS_ERROR',

Line 2584: 'OKC_API.G_RET_STS_ERROR',

2580: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2581: (
2582: l_api_name,
2583: G_PKG_NAME,
2584: 'OKC_API.G_RET_STS_ERROR',
2585: x_msg_count,
2586: x_msg_data,
2587: '_PVT'
2588: );

Line 2589: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2585: x_msg_count,
2586: x_msg_data,
2587: '_PVT'
2588: );
2589: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2590: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2591: (
2592: l_api_name,
2593: G_PKG_NAME,

Line 2590: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2586: x_msg_data,
2587: '_PVT'
2588: );
2589: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2590: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2591: (
2592: l_api_name,
2593: G_PKG_NAME,
2594: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2594: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2590: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2591: (
2592: l_api_name,
2593: G_PKG_NAME,
2594: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2595: x_msg_count,
2596: x_msg_data,
2597: '_PVT'
2598: );

Line 2600: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2596: x_msg_data,
2597: '_PVT'
2598: );
2599: WHEN OTHERS THEN
2600: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2601: (
2602: l_api_name,
2603: G_PKG_NAME,
2604: 'OTHERS',

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

2622: p_ihd_rec IN ihd_rec_type) IS
2623:
2624: l_api_version CONSTANT NUMBER := 1;
2625: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
2626: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2627: l_ihd_rec ihd_rec_type := p_ihd_rec;
2628: l_row_notfound BOOLEAN := TRUE;
2629: BEGIN
2630: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2626: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2627: l_ihd_rec ihd_rec_type := p_ihd_rec;
2628: l_row_notfound BOOLEAN := TRUE;
2629: BEGIN
2630: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2631: p_init_msg_list,
2632: '_PVT',
2633: x_return_status);
2634: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN

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

2630: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2631: p_init_msg_list,
2632: '_PVT',
2633: x_return_status);
2634: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2635: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2636: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2637: RAISE OKC_API.G_EXCEPTION_ERROR;
2638: END IF;

Line 2635: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2631: p_init_msg_list,
2632: '_PVT',
2633: x_return_status);
2634: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2635: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2636: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2637: RAISE OKC_API.G_EXCEPTION_ERROR;
2638: END IF;
2639:

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

2632: '_PVT',
2633: x_return_status);
2634: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2635: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2636: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2637: RAISE OKC_API.G_EXCEPTION_ERROR;
2638: END IF;
2639:
2640: DELETE FROM OKS_INST_HIST_DETAILS

Line 2637: RAISE OKC_API.G_EXCEPTION_ERROR;

2633: x_return_status);
2634: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2635: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2636: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2637: RAISE OKC_API.G_EXCEPTION_ERROR;
2638: END IF;
2639:
2640: DELETE FROM OKS_INST_HIST_DETAILS
2641: WHERE ID = p_ihd_rec.id;

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

2640: DELETE FROM OKS_INST_HIST_DETAILS
2641: WHERE ID = p_ihd_rec.id;
2642:
2643: x_return_status := l_return_status;
2644: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2645: EXCEPTION
2646: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2647: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2648: (

Line 2646: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2642:
2643: x_return_status := l_return_status;
2644: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2645: EXCEPTION
2646: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2647: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2648: (
2649: l_api_name,
2650: G_PKG_NAME,

Line 2647: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2643: x_return_status := l_return_status;
2644: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2645: EXCEPTION
2646: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2647: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2648: (
2649: l_api_name,
2650: G_PKG_NAME,
2651: 'OKC_API.G_RET_STS_ERROR',

Line 2651: 'OKC_API.G_RET_STS_ERROR',

2647: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2648: (
2649: l_api_name,
2650: G_PKG_NAME,
2651: 'OKC_API.G_RET_STS_ERROR',
2652: x_msg_count,
2653: x_msg_data,
2654: '_PVT'
2655: );

Line 2656: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2652: x_msg_count,
2653: x_msg_data,
2654: '_PVT'
2655: );
2656: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2657: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2658: (
2659: l_api_name,
2660: G_PKG_NAME,

Line 2657: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2653: x_msg_data,
2654: '_PVT'
2655: );
2656: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2657: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2658: (
2659: l_api_name,
2660: G_PKG_NAME,
2661: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2661: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2657: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2658: (
2659: l_api_name,
2660: G_PKG_NAME,
2661: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2662: x_msg_count,
2663: x_msg_data,
2664: '_PVT'
2665: );

Line 2667: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2663: x_msg_data,
2664: '_PVT'
2665: );
2666: WHEN OTHERS THEN
2667: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2668: (
2669: l_api_name,
2670: G_PKG_NAME,
2671: 'OTHERS',

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

2686: p_ihdv_rec IN ihdv_rec_type) IS
2687:
2688: l_api_version CONSTANT NUMBER := 1;
2689: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
2690: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2691: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
2692: l_ihd_rec ihd_rec_type;
2693: BEGIN
2694: l_return_status := OKC_API.START_ACTIVITY(l_api_name,

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

2690: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2691: l_ihdv_rec ihdv_rec_type := p_ihdv_rec;
2692: l_ihd_rec ihd_rec_type;
2693: BEGIN
2694: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
2695: G_PKG_NAME,
2696: p_init_msg_list,
2697: l_api_version,
2698: p_api_version,

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

2697: l_api_version,
2698: p_api_version,
2699: '_PVT',
2700: x_return_status);
2701: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2702: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2704: RAISE OKC_API.G_EXCEPTION_ERROR;
2705: END IF;

Line 2702: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2698: p_api_version,
2699: '_PVT',
2700: x_return_status);
2701: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2702: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2704: RAISE OKC_API.G_EXCEPTION_ERROR;
2705: END IF;
2706: -----------------------------------------

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

2699: '_PVT',
2700: x_return_status);
2701: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2702: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2704: RAISE OKC_API.G_EXCEPTION_ERROR;
2705: END IF;
2706: -----------------------------------------
2707: -- Move VIEW record to "Child" records --

Line 2704: RAISE OKC_API.G_EXCEPTION_ERROR;

2700: x_return_status);
2701: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2702: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2703: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2704: RAISE OKC_API.G_EXCEPTION_ERROR;
2705: END IF;
2706: -----------------------------------------
2707: -- Move VIEW record to "Child" records --
2708: -----------------------------------------

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

2716: x_msg_count,
2717: x_msg_data,
2718: l_ihd_rec
2719: );
2720: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2722: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2723: RAISE OKC_API.G_EXCEPTION_ERROR;
2724: END IF;

Line 2721: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;

2717: x_msg_data,
2718: l_ihd_rec
2719: );
2720: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2722: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2723: RAISE OKC_API.G_EXCEPTION_ERROR;
2724: END IF;
2725: x_return_status := l_return_status;

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

2718: l_ihd_rec
2719: );
2720: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2722: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2723: RAISE OKC_API.G_EXCEPTION_ERROR;
2724: END IF;
2725: x_return_status := l_return_status;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);

Line 2723: RAISE OKC_API.G_EXCEPTION_ERROR;

2719: );
2720: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
2721: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
2722: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2723: RAISE OKC_API.G_EXCEPTION_ERROR;
2724: END IF;
2725: x_return_status := l_return_status;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2727: EXCEPTION

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

2722: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2723: RAISE OKC_API.G_EXCEPTION_ERROR;
2724: END IF;
2725: x_return_status := l_return_status;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2727: EXCEPTION
2728: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2729: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2730: (

Line 2728: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2724: END IF;
2725: x_return_status := l_return_status;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2727: EXCEPTION
2728: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2729: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2730: (
2731: l_api_name,
2732: G_PKG_NAME,

Line 2729: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2725: x_return_status := l_return_status;
2726: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2727: EXCEPTION
2728: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2729: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2730: (
2731: l_api_name,
2732: G_PKG_NAME,
2733: 'OKC_API.G_RET_STS_ERROR',

Line 2733: 'OKC_API.G_RET_STS_ERROR',

2729: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2730: (
2731: l_api_name,
2732: G_PKG_NAME,
2733: 'OKC_API.G_RET_STS_ERROR',
2734: x_msg_count,
2735: x_msg_data,
2736: '_PVT'
2737: );

Line 2738: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

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

Line 2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2735: x_msg_data,
2736: '_PVT'
2737: );
2738: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2739: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2740: (
2741: l_api_name,
2742: G_PKG_NAME,
2743: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2743: 'OKC_API.G_RET_STS_UNEXP_ERROR',

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

Line 2749: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2745: x_msg_data,
2746: '_PVT'
2747: );
2748: WHEN OTHERS THEN
2749: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2750: (
2751: l_api_name,
2752: G_PKG_NAME,
2753: 'OTHERS',

Line 2769: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS

2765: x_return_status OUT NOCOPY VARCHAR2,
2766: x_msg_count OUT NOCOPY NUMBER,
2767: x_msg_data OUT NOCOPY VARCHAR2,
2768: p_ihdv_tbl IN ihdv_tbl_type,
2769: px_error_tbl IN OUT NOCOPY OKC_API.ERROR_TBL_TYPE) IS
2770:
2771: l_api_version CONSTANT NUMBER := 1;
2772: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2773: i NUMBER := 0;

Line 2775: OKC_API.init_msg_list(p_init_msg_list);

2771: l_api_version CONSTANT NUMBER := 1;
2772: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
2773: i NUMBER := 0;
2774: BEGIN
2775: OKC_API.init_msg_list(p_init_msg_list);
2776: -- Make sure PL/SQL table has records in it before passing
2777: IF (p_ihdv_tbl.COUNT > 0) THEN
2778: i := p_ihdv_tbl.FIRST;
2779: LOOP

Line 2781: l_error_rec OKC_API.ERROR_REC_TYPE;

2777: IF (p_ihdv_tbl.COUNT > 0) THEN
2778: i := p_ihdv_tbl.FIRST;
2779: LOOP
2780: DECLARE
2781: l_error_rec OKC_API.ERROR_REC_TYPE;
2782: BEGIN
2783: l_error_rec.api_name := l_api_name;
2784: l_error_rec.api_package := G_PKG_NAME;
2785: l_error_rec.idx := i;

Line 2788: p_init_msg_list => OKC_API.G_FALSE,

2784: l_error_rec.api_package := G_PKG_NAME;
2785: l_error_rec.idx := i;
2786: delete_row (
2787: p_api_version => p_api_version,
2788: p_init_msg_list => OKC_API.G_FALSE,
2789: x_return_status => l_error_rec.error_type,
2790: x_msg_count => l_error_rec.msg_count,
2791: x_msg_data => l_error_rec.msg_data,
2792: p_ihdv_rec => p_ihdv_tbl(i));

Line 2793: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN

2789: x_return_status => l_error_rec.error_type,
2790: x_msg_count => l_error_rec.msg_count,
2791: x_msg_data => l_error_rec.msg_data,
2792: p_ihdv_rec => p_ihdv_tbl(i));
2793: IF (l_error_rec.error_type <> OKC_API.G_RET_STS_SUCCESS) THEN
2794: l_error_rec.sqlcode := SQLCODE;
2795: load_error_tbl(l_error_rec, px_error_tbl);
2796: ELSE
2797: x_msg_count := l_error_rec.msg_count;

Line 2801: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2797: x_msg_count := l_error_rec.msg_count;
2798: x_msg_data := l_error_rec.msg_data;
2799: END IF;
2800: EXCEPTION
2801: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2802: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2803: l_error_rec.sqlcode := SQLCODE;
2804: load_error_tbl(l_error_rec, px_error_tbl);
2805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

Line 2802: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;

2798: x_msg_data := l_error_rec.msg_data;
2799: END IF;
2800: EXCEPTION
2801: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2802: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2803: l_error_rec.sqlcode := SQLCODE;
2804: load_error_tbl(l_error_rec, px_error_tbl);
2805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2806: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

Line 2805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2801: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2802: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2803: l_error_rec.sqlcode := SQLCODE;
2804: load_error_tbl(l_error_rec, px_error_tbl);
2805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2806: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2807: l_error_rec.sqlcode := SQLCODE;
2808: load_error_tbl(l_error_rec, px_error_tbl);
2809: WHEN OTHERS THEN

Line 2806: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;

2802: l_error_rec.error_type := OKC_API.G_RET_STS_ERROR;
2803: l_error_rec.sqlcode := SQLCODE;
2804: load_error_tbl(l_error_rec, px_error_tbl);
2805: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2806: l_error_rec.error_type := OKC_API.G_RET_STS_UNEXP_ERROR;
2807: l_error_rec.sqlcode := SQLCODE;
2808: load_error_tbl(l_error_rec, px_error_tbl);
2809: WHEN OTHERS THEN
2810: l_error_rec.error_type := 'OTHERS';

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

2817: END IF;
2818: -- Loop through the error_tbl to find the error with the highest severity
2819: -- and return it.
2820: x_return_status := find_highest_exception(px_error_tbl);
2821: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2822: EXCEPTION
2823: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2824: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2825: (

Line 2823: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2819: -- and return it.
2820: x_return_status := find_highest_exception(px_error_tbl);
2821: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2822: EXCEPTION
2823: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2824: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2825: (
2826: l_api_name,
2827: G_PKG_NAME,

Line 2824: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2820: x_return_status := find_highest_exception(px_error_tbl);
2821: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2822: EXCEPTION
2823: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2824: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2825: (
2826: l_api_name,
2827: G_PKG_NAME,
2828: 'OKC_API.G_RET_STS_ERROR',

Line 2828: 'OKC_API.G_RET_STS_ERROR',

2824: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2825: (
2826: l_api_name,
2827: G_PKG_NAME,
2828: 'OKC_API.G_RET_STS_ERROR',
2829: x_msg_count,
2830: x_msg_data,
2831: '_PVT'
2832: );

Line 2833: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2829: x_msg_count,
2830: x_msg_data,
2831: '_PVT'
2832: );
2833: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2835: (
2836: l_api_name,
2837: G_PKG_NAME,

Line 2834: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2830: x_msg_data,
2831: '_PVT'
2832: );
2833: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2835: (
2836: l_api_name,
2837: G_PKG_NAME,
2838: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2838: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2834: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2835: (
2836: l_api_name,
2837: G_PKG_NAME,
2838: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2839: x_msg_count,
2840: x_msg_data,
2841: '_PVT'
2842: );

Line 2844: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2840: x_msg_data,
2841: '_PVT'
2842: );
2843: WHEN OTHERS THEN
2844: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2845: (
2846: l_api_name,
2847: G_PKG_NAME,
2848: 'OTHERS',

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

2864: p_ihdv_tbl IN ihdv_tbl_type) IS
2865:
2866: l_api_version CONSTANT NUMBER := 1;
2867: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2868: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2869: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2870: BEGIN
2871: OKC_API.init_msg_list(p_init_msg_list);
2872: -- Make sure PL/SQL table has records in it before passing

Line 2869: l_error_tbl OKC_API.ERROR_TBL_TYPE;

2865:
2866: l_api_version CONSTANT NUMBER := 1;
2867: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2868: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2869: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2870: BEGIN
2871: OKC_API.init_msg_list(p_init_msg_list);
2872: -- Make sure PL/SQL table has records in it before passing
2873: IF (p_ihdv_tbl.COUNT > 0) THEN

Line 2871: OKC_API.init_msg_list(p_init_msg_list);

2867: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
2868: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2869: l_error_tbl OKC_API.ERROR_TBL_TYPE;
2870: BEGIN
2871: OKC_API.init_msg_list(p_init_msg_list);
2872: -- Make sure PL/SQL table has records in it before passing
2873: IF (p_ihdv_tbl.COUNT > 0) THEN
2874: delete_row (
2875: p_api_version => p_api_version,

Line 2876: p_init_msg_list => OKC_API.G_FALSE,

2872: -- Make sure PL/SQL table has records in it before passing
2873: IF (p_ihdv_tbl.COUNT > 0) THEN
2874: delete_row (
2875: p_api_version => p_api_version,
2876: p_init_msg_list => OKC_API.G_FALSE,
2877: x_return_status => x_return_status,
2878: x_msg_count => x_msg_count,
2879: x_msg_data => x_msg_data,
2880: p_ihdv_tbl => p_ihdv_tbl,

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

2879: x_msg_data => x_msg_data,
2880: p_ihdv_tbl => p_ihdv_tbl,
2881: px_error_tbl => l_error_tbl);
2882: END IF;
2883: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2884: EXCEPTION
2885: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2886: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2887: (

Line 2885: WHEN OKC_API.G_EXCEPTION_ERROR THEN

2881: px_error_tbl => l_error_tbl);
2882: END IF;
2883: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2884: EXCEPTION
2885: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2886: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2887: (
2888: l_api_name,
2889: G_PKG_NAME,

Line 2886: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2882: END IF;
2883: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2884: EXCEPTION
2885: WHEN OKC_API.G_EXCEPTION_ERROR THEN
2886: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2887: (
2888: l_api_name,
2889: G_PKG_NAME,
2890: 'OKC_API.G_RET_STS_ERROR',

Line 2890: 'OKC_API.G_RET_STS_ERROR',

2886: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2887: (
2888: l_api_name,
2889: G_PKG_NAME,
2890: 'OKC_API.G_RET_STS_ERROR',
2891: x_msg_count,
2892: x_msg_data,
2893: '_PVT'
2894: );

Line 2895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN

2891: x_msg_count,
2892: x_msg_data,
2893: '_PVT'
2894: );
2895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2896: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2897: (
2898: l_api_name,
2899: G_PKG_NAME,

Line 2896: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2892: x_msg_data,
2893: '_PVT'
2894: );
2895: WHEN OKC_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
2896: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2897: (
2898: l_api_name,
2899: G_PKG_NAME,
2900: 'OKC_API.G_RET_STS_UNEXP_ERROR',

Line 2900: 'OKC_API.G_RET_STS_UNEXP_ERROR',

2896: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2897: (
2898: l_api_name,
2899: G_PKG_NAME,
2900: 'OKC_API.G_RET_STS_UNEXP_ERROR',
2901: x_msg_count,
2902: x_msg_data,
2903: '_PVT'
2904: );

Line 2906: x_return_status := OKC_API.HANDLE_EXCEPTIONS

2902: x_msg_data,
2903: '_PVT'
2904: );
2905: WHEN OTHERS THEN
2906: x_return_status := OKC_API.HANDLE_EXCEPTIONS
2907: (
2908: l_api_name,
2909: G_PKG_NAME,
2910: 'OTHERS',