[Home] [Help]
3: ---------------------------------------------------------------------------
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
6: PROCEDURE load_error_tbl (
7: px_error_rec IN OUT NOCOPY OKL_API.ERROR_REC_TYPE,
8: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
9:
10: j INTEGER := NVL(px_error_tbl.LAST, 0) + 1;
11: last_msg_idx INTEGER := FND_MSG_PUB.COUNT_MSG;
12: l_msg_idx INTEGER := FND_MSG_PUB.G_NEXT;
36: ---------------------------------------------------------------------------
37: -- FUNCTION find_highest_exception
38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
38: ---------------------------------------------------------------------------
39: -- Finds the highest exception (G_RET_STS_UNEXP_ERROR)
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN
40: -- in a OKL_API.ERROR_TBL_TYPE, and returns it.
41: FUNCTION find_highest_exception(
42: p_error_tbl IN OKL_API.ERROR_TBL_TYPE
43: ) RETURN VARCHAR2 IS
44: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
45: i INTEGER := 1;
46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
46: BEGIN
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;
47: IF (p_error_tbl.COUNT > 0) THEN
48: i := p_error_tbl.FIRST;
49: LOOP
50: IF (p_error_tbl(i).error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
51: IF (l_return_status <> OKL_API.G_RET_STS_UNEXP_ERROR) THEN
52: l_return_status := p_error_tbl(i).error_type;
53: END IF;
54: END IF;
55: EXIT WHEN (i = p_error_tbl.LAST);
299: ) RETURN txsv_rec_type IS
300: l_txsv_rec txsv_rec_type;
301: l_row_notfound BOOLEAN := TRUE;
302: BEGIN
303: x_return_status := OKL_API.G_RET_STS_SUCCESS;
304: l_txsv_rec := get_rec(p_txsv_rec, l_row_notfound);
305: IF (l_row_notfound) THEN
306: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
307: x_return_status := OKL_API.G_RET_STS_ERROR;
302: BEGIN
303: x_return_status := OKL_API.G_RET_STS_SUCCESS;
304: l_txsv_rec := get_rec(p_txsv_rec, l_row_notfound);
305: IF (l_row_notfound) THEN
306: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
307: x_return_status := OKL_API.G_RET_STS_ERROR;
308: END IF;
309: RETURN(l_txsv_rec);
310: END get_rec;
303: x_return_status := OKL_API.G_RET_STS_SUCCESS;
304: l_txsv_rec := get_rec(p_txsv_rec, l_row_notfound);
305: IF (l_row_notfound) THEN
306: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
307: x_return_status := OKL_API.G_RET_STS_ERROR;
308: END IF;
309: RETURN(l_txsv_rec);
310: END get_rec;
311: -----------------------------------------------------------
527: ) RETURN txs_rec_type IS
528: l_txs_rec txs_rec_type;
529: l_row_notfound BOOLEAN := TRUE;
530: BEGIN
531: x_return_status := OKL_API.G_RET_STS_SUCCESS;
532: l_txs_rec := get_rec(p_txs_rec, l_row_notfound);
533: IF (l_row_notfound) THEN
534: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
535: x_return_status := OKL_API.G_RET_STS_ERROR;
530: BEGIN
531: x_return_status := OKL_API.G_RET_STS_SUCCESS;
532: l_txs_rec := get_rec(p_txs_rec, l_row_notfound);
533: IF (l_row_notfound) THEN
534: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
535: x_return_status := OKL_API.G_RET_STS_ERROR;
536: END IF;
537: RETURN(l_txs_rec);
538: END get_rec;
531: x_return_status := OKL_API.G_RET_STS_SUCCESS;
532: l_txs_rec := get_rec(p_txs_rec, l_row_notfound);
533: IF (l_row_notfound) THEN
534: OKL_API.set_message(G_APP_NAME,G_INVALID_VALUE,G_COL_NAME_TOKEN,'ID');
535: x_return_status := OKL_API.G_RET_STS_ERROR;
536: END IF;
537: RETURN(l_txs_rec);
538: END get_rec;
539: -----------------------------------------------------------
553: p_txsv_rec IN txsv_rec_type
554: ) RETURN txsv_rec_type IS
555: l_txsv_rec txsv_rec_type := p_txsv_rec;
556: BEGIN
557: IF (l_txsv_rec.id = OKL_API.G_MISS_NUM ) THEN
558: l_txsv_rec.id := NULL;
559: END IF;
560: IF (l_txsv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
561: l_txsv_rec.khr_id := NULL;
556: BEGIN
557: IF (l_txsv_rec.id = OKL_API.G_MISS_NUM ) THEN
558: l_txsv_rec.id := NULL;
559: END IF;
560: IF (l_txsv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
561: l_txsv_rec.khr_id := NULL;
562: END IF;
563: IF (l_txsv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
564: l_txsv_rec.kle_id := NULL;
559: END IF;
560: IF (l_txsv_rec.khr_id = OKL_API.G_MISS_NUM ) THEN
561: l_txsv_rec.khr_id := NULL;
562: END IF;
563: IF (l_txsv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
564: l_txsv_rec.kle_id := NULL;
565: END IF;
566: IF (l_txsv_rec.line_name = OKL_API.G_MISS_CHAR ) THEN
567: l_txsv_rec.line_name := NULL;
562: END IF;
563: IF (l_txsv_rec.kle_id = OKL_API.G_MISS_NUM ) THEN
564: l_txsv_rec.kle_id := NULL;
565: END IF;
566: IF (l_txsv_rec.line_name = OKL_API.G_MISS_CHAR ) THEN
567: l_txsv_rec.line_name := NULL;
568: END IF;
569: IF (l_txsv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
570: l_txsv_rec.trx_id := NULL;
565: END IF;
566: IF (l_txsv_rec.line_name = OKL_API.G_MISS_CHAR ) THEN
567: l_txsv_rec.line_name := NULL;
568: END IF;
569: IF (l_txsv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
570: l_txsv_rec.trx_id := NULL;
571: END IF;
572: IF (l_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM ) THEN
573: l_txsv_rec.trx_line_id := NULL;
568: END IF;
569: IF (l_txsv_rec.trx_id = OKL_API.G_MISS_NUM ) THEN
570: l_txsv_rec.trx_id := NULL;
571: END IF;
572: IF (l_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM ) THEN
573: l_txsv_rec.trx_line_id := NULL;
574: END IF;
575: IF (l_txsv_rec.entity_code = OKL_API.G_MISS_CHAR ) THEN
576: l_txsv_rec.entity_code := NULL;
571: END IF;
572: IF (l_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM ) THEN
573: l_txsv_rec.trx_line_id := NULL;
574: END IF;
575: IF (l_txsv_rec.entity_code = OKL_API.G_MISS_CHAR ) THEN
576: l_txsv_rec.entity_code := NULL;
577: END IF;
578: IF (l_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR ) THEN
579: l_txsv_rec.event_class_code := NULL;
574: END IF;
575: IF (l_txsv_rec.entity_code = OKL_API.G_MISS_CHAR ) THEN
576: l_txsv_rec.entity_code := NULL;
577: END IF;
578: IF (l_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR ) THEN
579: l_txsv_rec.event_class_code := NULL;
580: END IF;
581: IF (l_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR ) THEN
582: l_txsv_rec.trx_level_type := NULL;
577: END IF;
578: IF (l_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR ) THEN
579: l_txsv_rec.event_class_code := NULL;
580: END IF;
581: IF (l_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR ) THEN
582: l_txsv_rec.trx_level_type := NULL;
583: END IF;
584: /*IF (l_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR ) THEN
585: l_txsv_rec.trx_line_type := NULL;
580: END IF;
581: IF (l_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR ) THEN
582: l_txsv_rec.trx_level_type := NULL;
583: END IF;
584: /*IF (l_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR ) THEN
585: l_txsv_rec.trx_line_type := NULL;
586: END IF;*/
587: IF (l_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR ) THEN
588: l_txsv_rec.adjusted_doc_entity_code := NULL;
583: END IF;
584: /*IF (l_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR ) THEN
585: l_txsv_rec.trx_line_type := NULL;
586: END IF;*/
587: IF (l_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR ) THEN
588: l_txsv_rec.adjusted_doc_entity_code := NULL;
589: END IF;
590: IF (l_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR ) THEN
591: l_txsv_rec.adjusted_doc_event_class_code := NULL;
586: END IF;*/
587: IF (l_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR ) THEN
588: l_txsv_rec.adjusted_doc_entity_code := NULL;
589: END IF;
590: IF (l_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR ) THEN
591: l_txsv_rec.adjusted_doc_event_class_code := NULL;
592: END IF;
593: IF (l_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM ) THEN
594: l_txsv_rec.adjusted_doc_trx_id := NULL;
589: END IF;
590: IF (l_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR ) THEN
591: l_txsv_rec.adjusted_doc_event_class_code := NULL;
592: END IF;
593: IF (l_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM ) THEN
594: l_txsv_rec.adjusted_doc_trx_id := NULL;
595: END IF;
596: IF (l_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM ) THEN
597: l_txsv_rec.adjusted_doc_trx_line_id := NULL;
592: END IF;
593: IF (l_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM ) THEN
594: l_txsv_rec.adjusted_doc_trx_id := NULL;
595: END IF;
596: IF (l_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM ) THEN
597: l_txsv_rec.adjusted_doc_trx_line_id := NULL;
598: END IF;
599: IF (l_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR ) THEN
600: l_txsv_rec.adjusted_doc_trx_level_type := NULL;
595: END IF;
596: IF (l_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM ) THEN
597: l_txsv_rec.adjusted_doc_trx_line_id := NULL;
598: END IF;
599: IF (l_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR ) THEN
600: l_txsv_rec.adjusted_doc_trx_level_type := NULL;
601: END IF;
602: IF (l_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR ) THEN
603: l_txsv_rec.adjusted_doc_number := NULL;
598: END IF;
599: IF (l_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR ) THEN
600: l_txsv_rec.adjusted_doc_trx_level_type := NULL;
601: END IF;
602: IF (l_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR ) THEN
603: l_txsv_rec.adjusted_doc_number := NULL;
604: END IF;
605: IF (l_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE ) THEN
606: l_txsv_rec.adjusted_doc_date := NULL;
601: END IF;
602: IF (l_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR ) THEN
603: l_txsv_rec.adjusted_doc_number := NULL;
604: END IF;
605: IF (l_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE ) THEN
606: l_txsv_rec.adjusted_doc_date := NULL;
607: END IF;
608: IF (l_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR ) THEN
609: l_txsv_rec.tax_call_type_code := NULL;
604: END IF;
605: IF (l_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE ) THEN
606: l_txsv_rec.adjusted_doc_date := NULL;
607: END IF;
608: IF (l_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR ) THEN
609: l_txsv_rec.tax_call_type_code := NULL;
610: END IF;
611: IF (l_txsv_rec.sty_id = OKL_API.G_MISS_NUM ) THEN
612: l_txsv_rec.sty_id := NULL;
607: END IF;
608: IF (l_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR ) THEN
609: l_txsv_rec.tax_call_type_code := NULL;
610: END IF;
611: IF (l_txsv_rec.sty_id = OKL_API.G_MISS_NUM ) THEN
612: l_txsv_rec.sty_id := NULL;
613: END IF;
614: IF (l_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR ) THEN
615: l_txsv_rec.trx_business_category := NULL;
610: END IF;
611: IF (l_txsv_rec.sty_id = OKL_API.G_MISS_NUM ) THEN
612: l_txsv_rec.sty_id := NULL;
613: END IF;
614: IF (l_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR ) THEN
615: l_txsv_rec.trx_business_category := NULL;
616: END IF;
617: IF (l_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR ) THEN
618: l_txsv_rec.tax_line_status_code := NULL;
613: END IF;
614: IF (l_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR ) THEN
615: l_txsv_rec.trx_business_category := NULL;
616: END IF;
617: IF (l_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR ) THEN
618: l_txsv_rec.tax_line_status_code := NULL;
619: END IF;
620: IF (l_txsv_rec.sel_id = OKL_API.G_MISS_NUM ) THEN
621: l_txsv_rec.sel_id := NULL;
616: END IF;
617: IF (l_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR ) THEN
618: l_txsv_rec.tax_line_status_code := NULL;
619: END IF;
620: IF (l_txsv_rec.sel_id = OKL_API.G_MISS_NUM ) THEN
621: l_txsv_rec.sel_id := NULL;
622: END IF;
623: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
624: l_txsv_rec.reported_yn := NULL;
619: END IF;
620: IF (l_txsv_rec.sel_id = OKL_API.G_MISS_NUM ) THEN
621: l_txsv_rec.sel_id := NULL;
622: END IF;
623: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
624: l_txsv_rec.reported_yn := NULL;
625: END IF;
626: IF (l_txsv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
627: l_txsv_rec.program_id := NULL;
622: END IF;
623: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
624: l_txsv_rec.reported_yn := NULL;
625: END IF;
626: IF (l_txsv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
627: l_txsv_rec.program_id := NULL;
628: END IF;
629: IF (l_txsv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
630: l_txsv_rec.request_id := NULL;
625: END IF;
626: IF (l_txsv_rec.program_id = OKL_API.G_MISS_NUM ) THEN
627: l_txsv_rec.program_id := NULL;
628: END IF;
629: IF (l_txsv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
630: l_txsv_rec.request_id := NULL;
631: END IF;
632: IF (l_txsv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
633: l_txsv_rec.program_application_id := NULL;
628: END IF;
629: IF (l_txsv_rec.request_id = OKL_API.G_MISS_NUM ) THEN
630: l_txsv_rec.request_id := NULL;
631: END IF;
632: IF (l_txsv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
633: l_txsv_rec.program_application_id := NULL;
634: END IF;
635: IF (l_txsv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
636: l_txsv_rec.program_update_date := NULL;
631: END IF;
632: IF (l_txsv_rec.program_application_id = OKL_API.G_MISS_NUM ) THEN
633: l_txsv_rec.program_application_id := NULL;
634: END IF;
635: IF (l_txsv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
636: l_txsv_rec.program_update_date := NULL;
637: END IF;
638: IF (l_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
639: l_txsv_rec.attribute_category := NULL;
634: END IF;
635: IF (l_txsv_rec.program_update_date = OKL_API.G_MISS_DATE ) THEN
636: l_txsv_rec.program_update_date := NULL;
637: END IF;
638: IF (l_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
639: l_txsv_rec.attribute_category := NULL;
640: END IF;
641: IF (l_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
642: l_txsv_rec.attribute1 := NULL;
637: END IF;
638: IF (l_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR ) THEN
639: l_txsv_rec.attribute_category := NULL;
640: END IF;
641: IF (l_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
642: l_txsv_rec.attribute1 := NULL;
643: END IF;
644: IF (l_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
645: l_txsv_rec.attribute2 := NULL;
640: END IF;
641: IF (l_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR ) THEN
642: l_txsv_rec.attribute1 := NULL;
643: END IF;
644: IF (l_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
645: l_txsv_rec.attribute2 := NULL;
646: END IF;
647: IF (l_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
648: l_txsv_rec.attribute3 := NULL;
643: END IF;
644: IF (l_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR ) THEN
645: l_txsv_rec.attribute2 := NULL;
646: END IF;
647: IF (l_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
648: l_txsv_rec.attribute3 := NULL;
649: END IF;
650: IF (l_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
651: l_txsv_rec.attribute4 := NULL;
646: END IF;
647: IF (l_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR ) THEN
648: l_txsv_rec.attribute3 := NULL;
649: END IF;
650: IF (l_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
651: l_txsv_rec.attribute4 := NULL;
652: END IF;
653: IF (l_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
654: l_txsv_rec.attribute5 := NULL;
649: END IF;
650: IF (l_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR ) THEN
651: l_txsv_rec.attribute4 := NULL;
652: END IF;
653: IF (l_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
654: l_txsv_rec.attribute5 := NULL;
655: END IF;
656: IF (l_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
657: l_txsv_rec.attribute6 := NULL;
652: END IF;
653: IF (l_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR ) THEN
654: l_txsv_rec.attribute5 := NULL;
655: END IF;
656: IF (l_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
657: l_txsv_rec.attribute6 := NULL;
658: END IF;
659: IF (l_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
660: l_txsv_rec.attribute7 := NULL;
655: END IF;
656: IF (l_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR ) THEN
657: l_txsv_rec.attribute6 := NULL;
658: END IF;
659: IF (l_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
660: l_txsv_rec.attribute7 := NULL;
661: END IF;
662: IF (l_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
663: l_txsv_rec.attribute8 := NULL;
658: END IF;
659: IF (l_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR ) THEN
660: l_txsv_rec.attribute7 := NULL;
661: END IF;
662: IF (l_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
663: l_txsv_rec.attribute8 := NULL;
664: END IF;
665: IF (l_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
666: l_txsv_rec.attribute9 := NULL;
661: END IF;
662: IF (l_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR ) THEN
663: l_txsv_rec.attribute8 := NULL;
664: END IF;
665: IF (l_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
666: l_txsv_rec.attribute9 := NULL;
667: END IF;
668: IF (l_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
669: l_txsv_rec.attribute10 := NULL;
664: END IF;
665: IF (l_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR ) THEN
666: l_txsv_rec.attribute9 := NULL;
667: END IF;
668: IF (l_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
669: l_txsv_rec.attribute10 := NULL;
670: END IF;
671: IF (l_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
672: l_txsv_rec.attribute11 := NULL;
667: END IF;
668: IF (l_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR ) THEN
669: l_txsv_rec.attribute10 := NULL;
670: END IF;
671: IF (l_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
672: l_txsv_rec.attribute11 := NULL;
673: END IF;
674: IF (l_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
675: l_txsv_rec.attribute12 := NULL;
670: END IF;
671: IF (l_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR ) THEN
672: l_txsv_rec.attribute11 := NULL;
673: END IF;
674: IF (l_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
675: l_txsv_rec.attribute12 := NULL;
676: END IF;
677: IF (l_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
678: l_txsv_rec.attribute13 := NULL;
673: END IF;
674: IF (l_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR ) THEN
675: l_txsv_rec.attribute12 := NULL;
676: END IF;
677: IF (l_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
678: l_txsv_rec.attribute13 := NULL;
679: END IF;
680: IF (l_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
681: l_txsv_rec.attribute14 := NULL;
676: END IF;
677: IF (l_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR ) THEN
678: l_txsv_rec.attribute13 := NULL;
679: END IF;
680: IF (l_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
681: l_txsv_rec.attribute14 := NULL;
682: END IF;
683: IF (l_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
684: l_txsv_rec.attribute15 := NULL;
679: END IF;
680: IF (l_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR ) THEN
681: l_txsv_rec.attribute14 := NULL;
682: END IF;
683: IF (l_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
684: l_txsv_rec.attribute15 := NULL;
685: END IF;
686: IF (l_txsv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
687: l_txsv_rec.created_by := NULL;
682: END IF;
683: IF (l_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR ) THEN
684: l_txsv_rec.attribute15 := NULL;
685: END IF;
686: IF (l_txsv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
687: l_txsv_rec.created_by := NULL;
688: END IF;
689: IF (l_txsv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
690: l_txsv_rec.creation_date := NULL;
685: END IF;
686: IF (l_txsv_rec.created_by = OKL_API.G_MISS_NUM ) THEN
687: l_txsv_rec.created_by := NULL;
688: END IF;
689: IF (l_txsv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
690: l_txsv_rec.creation_date := NULL;
691: END IF;
692: IF (l_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
693: l_txsv_rec.last_updated_by := NULL;
688: END IF;
689: IF (l_txsv_rec.creation_date = OKL_API.G_MISS_DATE ) THEN
690: l_txsv_rec.creation_date := NULL;
691: END IF;
692: IF (l_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
693: l_txsv_rec.last_updated_by := NULL;
694: END IF;
695: IF (l_txsv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
696: l_txsv_rec.last_update_date := NULL;
691: END IF;
692: IF (l_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM ) THEN
693: l_txsv_rec.last_updated_by := NULL;
694: END IF;
695: IF (l_txsv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
696: l_txsv_rec.last_update_date := NULL;
697: END IF;
698: IF (l_txsv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
699: l_txsv_rec.last_update_login := NULL;
694: END IF;
695: IF (l_txsv_rec.last_update_date = OKL_API.G_MISS_DATE ) THEN
696: l_txsv_rec.last_update_date := NULL;
697: END IF;
698: IF (l_txsv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
699: l_txsv_rec.last_update_login := NULL;
700: END IF;
701: IF (l_txsv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
702: l_txsv_rec.object_version_number := NULL;
697: END IF;
698: IF (l_txsv_rec.last_update_login = OKL_API.G_MISS_NUM ) THEN
699: l_txsv_rec.last_update_login := NULL;
700: END IF;
701: IF (l_txsv_rec.object_version_number = OKL_API.G_MISS_NUM ) THEN
702: l_txsv_rec.object_version_number := NULL;
703: END IF;
704:
705: -- modified by eBTax by dcshanmu - modification starts
703: END IF;
704:
705: -- modified by eBTax by dcshanmu - modification starts
706: -- added default null out code to newly added columns to the table
707: IF (l_txsv_rec.application_id = OKL_API.G_MISS_NUM ) THEN
708: l_txsv_rec.application_id := NULL;
709: END IF;
710: IF (l_txsv_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
711: l_txsv_rec.default_taxation_country := NULL;
706: -- added default null out code to newly added columns to the table
707: IF (l_txsv_rec.application_id = OKL_API.G_MISS_NUM ) THEN
708: l_txsv_rec.application_id := NULL;
709: END IF;
710: IF (l_txsv_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
711: l_txsv_rec.default_taxation_country := NULL;
712: END IF;
713: IF (l_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
714: l_txsv_rec.product_category := NULL;
709: END IF;
710: IF (l_txsv_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
711: l_txsv_rec.default_taxation_country := NULL;
712: END IF;
713: IF (l_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
714: l_txsv_rec.product_category := NULL;
715: END IF;
716: IF (l_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
717: l_txsv_rec.user_defined_fisc_class := NULL;
712: END IF;
713: IF (l_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
714: l_txsv_rec.product_category := NULL;
715: END IF;
716: IF (l_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
717: l_txsv_rec.user_defined_fisc_class := NULL;
718: END IF;
719: IF (l_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
720: l_txsv_rec.line_intended_use := NULL;
715: END IF;
716: IF (l_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
717: l_txsv_rec.user_defined_fisc_class := NULL;
718: END IF;
719: IF (l_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
720: l_txsv_rec.line_intended_use := NULL;
721: END IF;
722: IF (l_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
723: l_txsv_rec.inventory_item_id := NULL;
718: END IF;
719: IF (l_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
720: l_txsv_rec.line_intended_use := NULL;
721: END IF;
722: IF (l_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
723: l_txsv_rec.inventory_item_id := NULL;
724: END IF;
725: IF (l_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
726: l_txsv_rec.bill_to_cust_acct_id := NULL;
721: END IF;
722: IF (l_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
723: l_txsv_rec.inventory_item_id := NULL;
724: END IF;
725: IF (l_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
726: l_txsv_rec.bill_to_cust_acct_id := NULL;
727: END IF;
728: IF (l_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
729: l_txsv_rec.org_id := NULL;
724: END IF;
725: IF (l_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
726: l_txsv_rec.bill_to_cust_acct_id := NULL;
727: END IF;
728: IF (l_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
729: l_txsv_rec.org_id := NULL;
730: END IF;
731: IF (l_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
732: l_txsv_rec.legal_entity_id := NULL;
727: END IF;
728: IF (l_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
729: l_txsv_rec.org_id := NULL;
730: END IF;
731: IF (l_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
732: l_txsv_rec.legal_entity_id := NULL;
733: END IF;
734: IF (l_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
735: l_txsv_rec.line_amt := NULL;
730: END IF;
731: IF (l_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
732: l_txsv_rec.legal_entity_id := NULL;
733: END IF;
734: IF (l_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
735: l_txsv_rec.line_amt := NULL;
736: END IF;
737: IF (l_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
738: l_txsv_rec.assessable_value := NULL;
733: END IF;
734: IF (l_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
735: l_txsv_rec.line_amt := NULL;
736: END IF;
737: IF (l_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
738: l_txsv_rec.assessable_value := NULL;
739: END IF;
740: IF (l_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
741: l_txsv_rec.total_tax := NULL;
736: END IF;
737: IF (l_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
738: l_txsv_rec.assessable_value := NULL;
739: END IF;
740: IF (l_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
741: l_txsv_rec.total_tax := NULL;
742: END IF;
743: IF (l_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
744: l_txsv_rec.product_type := NULL;
739: END IF;
740: IF (l_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
741: l_txsv_rec.total_tax := NULL;
742: END IF;
743: IF (l_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
744: l_txsv_rec.product_type := NULL;
745: END IF;
746: IF (l_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
747: l_txsv_rec.product_fisc_classification := NULL;
742: END IF;
743: IF (l_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
744: l_txsv_rec.product_type := NULL;
745: END IF;
746: IF (l_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
747: l_txsv_rec.product_fisc_classification := NULL;
748: END IF;
749: IF (l_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
750: l_txsv_rec.trx_date := NULL;
745: END IF;
746: IF (l_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
747: l_txsv_rec.product_fisc_classification := NULL;
748: END IF;
749: IF (l_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
750: l_txsv_rec.trx_date := NULL;
751: END IF;
752: IF (l_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
753: l_txsv_rec.provnl_tax_determination_date := NULL;
748: END IF;
749: IF (l_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
750: l_txsv_rec.trx_date := NULL;
751: END IF;
752: IF (l_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
753: l_txsv_rec.provnl_tax_determination_date := NULL;
754: END IF;
755: IF (l_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
756: l_txsv_rec.try_id := NULL;
751: END IF;
752: IF (l_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
753: l_txsv_rec.provnl_tax_determination_date := NULL;
754: END IF;
755: IF (l_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
756: l_txsv_rec.try_id := NULL;
757: END IF;
758: IF (l_txsv_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
759: l_txsv_rec.ship_to_location_id := NULL;
754: END IF;
755: IF (l_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
756: l_txsv_rec.try_id := NULL;
757: END IF;
758: IF (l_txsv_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
759: l_txsv_rec.ship_to_location_id := NULL;
760: END IF;
761:
762: IF (l_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
758: IF (l_txsv_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
759: l_txsv_rec.ship_to_location_id := NULL;
760: END IF;
761:
762: IF (l_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
763: l_txsv_rec.trx_currency_code := NULL;
764: END IF;
765: IF (l_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
766: l_txsv_rec.currency_conversion_type := NULL;
761:
762: IF (l_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
763: l_txsv_rec.trx_currency_code := NULL;
764: END IF;
765: IF (l_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
766: l_txsv_rec.currency_conversion_type := NULL;
767: END IF;
768: IF (l_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
769: l_txsv_rec.currency_conversion_rate := NULL;
764: END IF;
765: IF (l_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
766: l_txsv_rec.currency_conversion_type := NULL;
767: END IF;
768: IF (l_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
769: l_txsv_rec.currency_conversion_rate := NULL;
770: END IF;
771: IF (l_txsv_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
772: l_txsv_rec.currency_conversion_date := NULL;
767: END IF;
768: IF (l_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
769: l_txsv_rec.currency_conversion_rate := NULL;
770: END IF;
771: IF (l_txsv_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
772: l_txsv_rec.currency_conversion_date := NULL;
773: END IF;
774: -- modified by eBTax by dcshanmu - modification end
775: --asawanka ebtaxchanges start
772: l_txsv_rec.currency_conversion_date := NULL;
773: END IF;
774: -- modified by eBTax by dcshanmu - modification end
775: --asawanka ebtaxchanges start
776: IF (l_txsv_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
777: l_txsv_rec.asset_number := NULL;
778: END IF;
779: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
780: l_txsv_rec.reported_yn := NULL;
775: --asawanka ebtaxchanges start
776: IF (l_txsv_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
777: l_txsv_rec.asset_number := NULL;
778: END IF;
779: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
780: l_txsv_rec.reported_yn := NULL;
781: END IF;
782: IF (l_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
783: l_txsv_rec.SHIP_TO_PARTY_SITE_ID := NULL;
778: END IF;
779: IF (l_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
780: l_txsv_rec.reported_yn := NULL;
781: END IF;
782: IF (l_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
783: l_txsv_rec.SHIP_TO_PARTY_SITE_ID := NULL;
784: END IF;
785: IF (l_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
786: l_txsv_rec.SHIP_TO_PARTY_ID := NULL;
781: END IF;
782: IF (l_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
783: l_txsv_rec.SHIP_TO_PARTY_SITE_ID := NULL;
784: END IF;
785: IF (l_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
786: l_txsv_rec.SHIP_TO_PARTY_ID := NULL;
787: END IF;
788: IF (l_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
789: l_txsv_rec.BILL_TO_PARTY_SITE_ID := NULL;
784: END IF;
785: IF (l_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
786: l_txsv_rec.SHIP_TO_PARTY_ID := NULL;
787: END IF;
788: IF (l_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
789: l_txsv_rec.BILL_TO_PARTY_SITE_ID := NULL;
790: END IF;
791: IF (l_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
792: l_txsv_rec.BILL_TO_LOCATION_ID := NULL;
787: END IF;
788: IF (l_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
789: l_txsv_rec.BILL_TO_PARTY_SITE_ID := NULL;
790: END IF;
791: IF (l_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
792: l_txsv_rec.BILL_TO_LOCATION_ID := NULL;
793: END IF;
794: IF (l_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
795: l_txsv_rec.BILL_TO_PARTY_ID := NULL;
790: END IF;
791: IF (l_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
792: l_txsv_rec.BILL_TO_LOCATION_ID := NULL;
793: END IF;
794: IF (l_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
795: l_txsv_rec.BILL_TO_PARTY_ID := NULL;
796: END IF;
797: IF (l_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
798: l_txsv_rec.ship_to_cust_acct_site_use_id := NULL;
793: END IF;
794: IF (l_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
795: l_txsv_rec.BILL_TO_PARTY_ID := NULL;
796: END IF;
797: IF (l_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
798: l_txsv_rec.ship_to_cust_acct_site_use_id := NULL;
799: END IF;
800: IF (l_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
801: l_txsv_rec.bill_to_cust_acct_site_use_id := NULL;
796: END IF;
797: IF (l_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
798: l_txsv_rec.ship_to_cust_acct_site_use_id := NULL;
799: END IF;
800: IF (l_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
801: l_txsv_rec.bill_to_cust_acct_site_use_id := NULL;
802: END IF;
803: IF (l_txsv_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
804: l_txsv_rec.TAX_CLASSIFICATION_CODE := NULL;
799: END IF;
800: IF (l_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
801: l_txsv_rec.bill_to_cust_acct_site_use_id := NULL;
802: END IF;
803: IF (l_txsv_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
804: l_txsv_rec.TAX_CLASSIFICATION_CODE := NULL;
805: END IF;
806: --asawanka ebtax changes end
807:
804: l_txsv_rec.TAX_CLASSIFICATION_CODE := NULL;
805: END IF;
806: --asawanka ebtax changes end
807:
808: IF (l_txsv_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
809: l_txsv_rec.ALC_SERIALIZED_YN := NULL;
810: END IF;
811: IF (l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
812: l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := NULL;
807:
808: IF (l_txsv_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
809: l_txsv_rec.ALC_SERIALIZED_YN := NULL;
810: END IF;
811: IF (l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
812: l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := NULL;
813: END IF;
814: IF (l_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
815: l_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := NULL;
810: END IF;
811: IF (l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
812: l_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := NULL;
813: END IF;
814: IF (l_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
815: l_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := NULL;
816: END IF;
817:
818: RETURN(l_txsv_rec);
825: p_txsv_rec IN txsv_rec_type) IS
826: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
827: BEGIN
828:
829: IF (p_txsv_rec.id = OKL_API.G_MISS_NUM OR p_txsv_rec.id IS NULL)
830: THEN
831: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
832: l_return_status := OKL_API.G_RET_STS_ERROR;
833:
828:
829: IF (p_txsv_rec.id = OKL_API.G_MISS_NUM OR p_txsv_rec.id IS NULL)
830: THEN
831: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'id');
832: l_return_status := OKL_API.G_RET_STS_ERROR;
833:
834: END IF;
835: x_return_status := l_return_status;
836: EXCEPTION
841: ,p_token1 => G_SQLCODE_TOKEN
842: ,p_token1_value => SQLCODE
843: ,p_token2 => G_SQLERRM_TOKEN
844: ,p_token2_value => SQLERRM);
845: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
846: END validate_id;
847: -------------------------------------
848: -- Validate_Attributes for: KHR_ID --
849: -------------------------------------
859: FROM Okc_k_headers_B
860: WHERE id = p_id;
861: BEGIN
862:
863: IF (p_txsv_rec.khr_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.khr_id IS NOT NULL)
864: THEN
865: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'khr_id');
866: --l_return_status := OKL_API.G_RET_STS_ERROR;
867: OPEN okl_txsv_khr_id_fk_csr(p_txsv_rec.khr_id) ;
862:
863: IF (p_txsv_rec.khr_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.khr_id IS NOT NULL)
864: THEN
865: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'khr_id');
866: --l_return_status := OKL_API.G_RET_STS_ERROR;
867: OPEN okl_txsv_khr_id_fk_csr(p_txsv_rec.khr_id) ;
868: FETCH okl_txsv_khr_id_fk_csr into l_dummy_var ;
869: CLOSE okl_txsv_khr_id_fk_csr ;
870: -- still set to default means data was not found
891: ,p_token1 => G_SQLCODE_TOKEN
892: ,p_token1_value => SQLCODE
893: ,p_token2 => G_SQLERRM_TOKEN
894: ,p_token2_value => SQLERRM);
895: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
896: END validate_khr_id;
897: -------------------------------------
898: -- Validate_Attributes for: KLE_ID --
899: -------------------------------------
909: FROM Okc_k_lines_B
910: WHERE id = p_id;
911: BEGIN
912:
913: IF (p_txsv_rec.kle_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.kle_id IS NOT NULL)
914: THEN
915: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'kle_id');
916: --l_return_status := OKL_API.G_RET_STS_ERROR;
917: OPEN okl_txsv_kle_id_fk_csr(p_txsv_rec.kle_id) ;
912:
913: IF (p_txsv_rec.kle_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.kle_id IS NOT NULL)
914: THEN
915: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'kle_id');
916: --l_return_status := OKL_API.G_RET_STS_ERROR;
917: OPEN okl_txsv_kle_id_fk_csr(p_txsv_rec.kle_id) ;
918: FETCH okl_txsv_kle_id_fk_csr into l_dummy_var ;
919: CLOSE okl_txsv_kle_id_fk_csr ;
920: -- still set to default means data was not found
941: ,p_token1 => G_SQLCODE_TOKEN
942: ,p_token1_value => SQLCODE
943: ,p_token2 => G_SQLERRM_TOKEN
944: ,p_token2_value => SQLERRM);
945: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
946: END validate_kle_id;
947: -------------------------------------
948: -- Validate_Attributes for: TRX_ID --
949: -------------------------------------
952: p_txsv_rec IN txsv_rec_type) IS
953: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
954: BEGIN
955:
956: IF (p_txsv_rec.trx_id = OKL_API.G_MISS_NUM OR p_txsv_rec.trx_id IS NULL)
957: THEN
958: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_id');
959: l_return_status := OKL_API.G_RET_STS_ERROR;
960:
955:
956: IF (p_txsv_rec.trx_id = OKL_API.G_MISS_NUM OR p_txsv_rec.trx_id IS NULL)
957: THEN
958: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_id');
959: l_return_status := OKL_API.G_RET_STS_ERROR;
960:
961: END IF;
962: x_return_status := l_return_status;
963: EXCEPTION
968: ,p_token1 => G_SQLCODE_TOKEN
969: ,p_token1_value => SQLCODE
970: ,p_token2 => G_SQLERRM_TOKEN
971: ,p_token2_value => SQLERRM);
972: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
973: END validate_trx_id;
974: ------------------------------------------
975: -- Validate_Attributes for: TRX_LINE_ID --
976: ------------------------------------------
979: p_txsv_rec IN txsv_rec_type) IS
980: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
981: BEGIN
982:
983: IF (p_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM OR p_txsv_rec.trx_line_id IS NULL)
984: THEN
985: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_line_id');
986: l_return_status := OKL_API.G_RET_STS_ERROR;
987:
982:
983: IF (p_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM OR p_txsv_rec.trx_line_id IS NULL)
984: THEN
985: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_line_id');
986: l_return_status := OKL_API.G_RET_STS_ERROR;
987:
988: END IF;
989: x_return_status := l_return_status;
990: EXCEPTION
995: ,p_token1 => G_SQLCODE_TOKEN
996: ,p_token1_value => SQLCODE
997: ,p_token2 => G_SQLERRM_TOKEN
998: ,p_token2_value => SQLERRM);
999: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1000: END validate_trx_line_id;
1001: -------------------------------------------------
1002: -- Validate_Attributes for: TAX_CALL_TYPE_CODE --
1003: -------------------------------------------------
1014: WHERE fnd_lookup_values.lookup_code = p_lookup_code
1015: AND fnd_lookup_values.lookup_type = p_lookup_type;
1016: BEGIN
1017:
1018: IF (p_txsv_rec.tax_call_type_code <> OKL_API.G_MISS_CHAR AND p_txsv_rec.tax_call_type_code IS NOT NULL)
1019: THEN
1020: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'tax_call_type_code');
1021: --l_return_status := OKL_API.G_RET_STS_ERROR;
1022: -- enforce foreign key
1017:
1018: IF (p_txsv_rec.tax_call_type_code <> OKL_API.G_MISS_CHAR AND p_txsv_rec.tax_call_type_code IS NOT NULL)
1019: THEN
1020: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'tax_call_type_code');
1021: --l_return_status := OKL_API.G_RET_STS_ERROR;
1022: -- enforce foreign key
1023: OPEN okl_txsv_tctc_fk_csr(p_txsv_rec.tax_call_type_code, 'OKL_TAX_CALL_TYPE') ;
1024: FETCH okl_txsv_tctc_fk_csr into l_dummy_var ;
1025: CLOSE okl_txsv_tctc_fk_csr ;
1048: ,p_token1 => G_SQLCODE_TOKEN
1049: ,p_token1_value => SQLCODE
1050: ,p_token2 => G_SQLERRM_TOKEN
1051: ,p_token2_value => SQLERRM);
1052: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1053: END validate_tax_call_type_code;
1054: -------------------------------------
1055: -- Validate_Attributes for: STY_ID --
1056: -------------------------------------
1066: FROM okl_strm_type_b
1067: WHERE id = p_id;
1068: BEGIN
1069:
1070: IF (p_txsv_rec.sty_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.sty_id IS NOT NULL)
1071: THEN
1072: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'sty_id');
1073: --l_return_status := OKL_API.G_RET_STS_ERROR;
1074: OPEN okl_txsv_sty_id_fk_csr(p_txsv_rec.sty_id) ;
1069:
1070: IF (p_txsv_rec.sty_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.sty_id IS NOT NULL)
1071: THEN
1072: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'sty_id');
1073: --l_return_status := OKL_API.G_RET_STS_ERROR;
1074: OPEN okl_txsv_sty_id_fk_csr(p_txsv_rec.sty_id) ;
1075: FETCH okl_txsv_sty_id_fk_csr into l_dummy_var ;
1076: CLOSE okl_txsv_sty_id_fk_csr ;
1077: -- still set to default means data was not found
1097: ,p_token1 => G_SQLCODE_TOKEN
1098: ,p_token1_value => SQLCODE
1099: ,p_token2 => G_SQLERRM_TOKEN
1100: ,p_token2_value => SQLERRM);
1101: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1102: END validate_sty_id;
1103: ----------------------------------------------------
1104: -- Validate_Attributes for: TRX_BUSINESS_CATEGORY --
1105: ----------------------------------------------------
1121: -- modified by dcshanmu for eBTax project. Modification ends
1122:
1123: BEGIN
1124:
1125: IF (p_txsv_rec.trx_business_category <> OKL_API.G_MISS_CHAR AND p_txsv_rec.trx_business_category IS NOT NULL)
1126: THEN
1127: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_business_category');
1128: -- l_return_status := OKL_API.G_RET_STS_ERROR;
1129: --ELSE
1124:
1125: IF (p_txsv_rec.trx_business_category <> OKL_API.G_MISS_CHAR AND p_txsv_rec.trx_business_category IS NOT NULL)
1126: THEN
1127: -- OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_business_category');
1128: -- l_return_status := OKL_API.G_RET_STS_ERROR;
1129: --ELSE
1130: -- enforce foreign key
1131: OPEN okl_txsv_tbc_fk_csr(p_txsv_rec.trx_business_category, 'AR_TAX_TRX_BUSINESS_CATEGORY') ;
1132: FETCH okl_txsv_tbc_fk_csr into l_dummy_var ;
1155: ,p_token1 => G_SQLCODE_TOKEN
1156: ,p_token1_value => SQLCODE
1157: ,p_token2 => G_SQLERRM_TOKEN
1158: ,p_token2_value => SQLERRM);
1159: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1160: END validate_trx_business_category;
1161:
1162: -- Modified by dcshanmu for eBTax - modification starts
1163: -- added validation methods for newly added columns
1178: AND lookup_type = p_lookup_type;
1179:
1180: BEGIN
1181:
1182: IF (p_txsv_rec.tax_line_status_code <> OKL_API.G_MISS_CHAR AND p_txsv_rec.tax_line_status_code IS NOT NULL)
1183: THEN
1184: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'tax_line_status_code');
1185: --l_return_status := OKL_API.G_RET_STS_ERROR;
1186: -- enforce foreign key
1181:
1182: IF (p_txsv_rec.tax_line_status_code <> OKL_API.G_MISS_CHAR AND p_txsv_rec.tax_line_status_code IS NOT NULL)
1183: THEN
1184: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'tax_line_status_code');
1185: --l_return_status := OKL_API.G_RET_STS_ERROR;
1186: -- enforce foreign key
1187: OPEN okl_txsv_tlsc_fk_csr(p_txsv_rec.tax_line_status_code, 'OKL_TAX_LINE_STATUS') ;
1188: FETCH okl_txsv_tlsc_fk_csr INTO l_dummy_var ;
1189: CLOSE okl_txsv_tlsc_fk_csr ;
1212: ,p_token1 => G_SQLCODE_TOKEN
1213: ,p_token1_value => SQLCODE
1214: ,p_token2 => G_SQLERRM_TOKEN
1215: ,p_token2_value => SQLERRM);
1216: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1217: END validate_tax_line_status_code;
1218: -------------------------------------
1219: -- Validate_Attributes for: SEL_ID --
1220: -------------------------------------
1230: FROM okl_strm_elements
1231: WHERE id = p_id;
1232: BEGIN
1233:
1234: IF (p_txsv_rec.sel_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.sel_id IS NOT NULL)
1235: THEN
1236: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'sel_id');
1237: --l_return_status := OKL_API.G_RET_STS_ERROR;
1238: OPEN okl_txsv_sel_fk_csr(p_txsv_rec.sel_id) ;
1233:
1234: IF (p_txsv_rec.sel_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.sel_id IS NOT NULL)
1235: THEN
1236: --OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'sel_id');
1237: --l_return_status := OKL_API.G_RET_STS_ERROR;
1238: OPEN okl_txsv_sel_fk_csr(p_txsv_rec.sel_id) ;
1239: FETCH okl_txsv_sel_fk_csr into l_dummy_var ;
1240: CLOSE okl_txsv_sel_fk_csr ;
1241: -- still set to default means data was not found
1262: ,p_token1 => G_SQLCODE_TOKEN
1263: ,p_token1_value => SQLCODE
1264: ,p_token2 => G_SQLERRM_TOKEN
1265: ,p_token2_value => SQLERRM);
1266: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1267: END validate_sel_id;
1268: -------------------------------------
1269: -- Validate_Attributes for: APPLICATION_ID --
1270: -------------------------------------
1274: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1275:
1276: BEGIN
1277:
1278: IF (p_txsv_rec.application_id = OKL_API.G_MISS_NUM OR p_txsv_rec.application_id IS NULL)
1279: THEN
1280: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'application_id');
1281: l_return_status := OKL_API.G_RET_STS_ERROR;
1282: END IF;
1277:
1278: IF (p_txsv_rec.application_id = OKL_API.G_MISS_NUM OR p_txsv_rec.application_id IS NULL)
1279: THEN
1280: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'application_id');
1281: l_return_status := OKL_API.G_RET_STS_ERROR;
1282: END IF;
1283:
1284: x_return_status := l_return_status;
1285: EXCEPTION
1290: ,p_token1 => G_SQLCODE_TOKEN
1291: ,p_token1_value => SQLCODE
1292: ,p_token2 => G_SQLERRM_TOKEN
1293: ,p_token2_value => SQLERRM);
1294: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1295: END validate_application_id;
1296: -------------------------------------
1297: -- Validate_Attributes for: DEFAULT_TAXATION_COUNTRY --
1298: -------------------------------------
1308: FROM fnd_territories_tl
1309: WHERE territory_code = p_id;
1310: BEGIN
1311:
1312: IF (p_txsv_rec.default_taxation_country <> OKL_API.G_MISS_CHAR AND p_txsv_rec.default_taxation_country IS NOT NULL)
1313: THEN
1314: OPEN okl_txsv_def_txn_cntry_fk_csr(p_txsv_rec.default_taxation_country) ;
1315: FETCH okl_txsv_def_txn_cntry_fk_csr into l_dummy_var ;
1316: CLOSE okl_txsv_def_txn_cntry_fk_csr ;
1338: ,p_token1 => G_SQLCODE_TOKEN
1339: ,p_token1_value => SQLCODE
1340: ,p_token2 => G_SQLERRM_TOKEN
1341: ,p_token2_value => SQLERRM);
1342: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1343: END validate_def_txn_country;
1344: -------------------------------------
1345: -- Validate_Attributes for: PRODUCT_CATEGORY --
1346: -------------------------------------
1356: FROM ZX_FC_PRODUCT_CATEGORIES_V
1357: WHERE classification_code = p_id;
1358: BEGIN
1359:
1360: IF (p_txsv_rec.product_category <> OKL_API.G_MISS_CHAR AND p_txsv_rec.product_category IS NOT NULL)
1361: THEN
1362: OPEN okl_txsv_prod_ctg_fk_csr(p_txsv_rec.product_category) ;
1363: FETCH okl_txsv_prod_ctg_fk_csr into l_dummy_var ;
1364: CLOSE okl_txsv_prod_ctg_fk_csr ;
1386: ,p_token1 => G_SQLCODE_TOKEN
1387: ,p_token1_value => SQLCODE
1388: ,p_token2 => G_SQLERRM_TOKEN
1389: ,p_token2_value => SQLERRM);
1390: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1391: END validate_product_category;
1392: -------------------------------------
1393: -- Validate_Attributes for: USER_DEFINED_FISC_CLASS --
1394: -------------------------------------
1404: FROM ZX_FC_USER_DEFINED_V
1405: WHERE classification_code = p_id;
1406: BEGIN
1407:
1408: IF (p_txsv_rec.user_defined_fisc_class <> OKL_API.G_MISS_CHAR AND p_txsv_rec.user_defined_fisc_class IS NOT NULL)
1409: THEN
1410: OPEN okl_txsv_udfc_fk_csr(p_txsv_rec.user_defined_fisc_class) ;
1411: FETCH okl_txsv_udfc_fk_csr into l_dummy_var ;
1412: CLOSE okl_txsv_udfc_fk_csr ;
1434: ,p_token1 => G_SQLCODE_TOKEN
1435: ,p_token1_value => SQLCODE
1436: ,p_token2 => G_SQLERRM_TOKEN
1437: ,p_token2_value => SQLERRM);
1438: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1439: END validate_udfc;
1440: -------------------------------------
1441: -- Validate_Attributes for: LINE_INTENDED_USE --
1442: -------------------------------------
1452: FROM ZX_FC_INTENDED_USE_V
1453: WHERE classification_code = p_id;
1454: BEGIN
1455:
1456: IF (p_txsv_rec.line_intended_use <> OKL_API.G_MISS_CHAR AND p_txsv_rec.line_intended_use IS NOT NULL)
1457: THEN
1458: OPEN okl_txsv_line_int_use_fk_csr(p_txsv_rec.line_intended_use) ;
1459: FETCH okl_txsv_line_int_use_fk_csr into l_dummy_var ;
1460: CLOSE okl_txsv_line_int_use_fk_csr ;
1482: ,p_token1 => G_SQLCODE_TOKEN
1483: ,p_token1_value => SQLCODE
1484: ,p_token2 => G_SQLERRM_TOKEN
1485: ,p_token2_value => SQLERRM);
1486: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1487: END validate_line_int_use;
1488: -------------------------------------
1489: -- Validate_Attributes for: INVENTORY_ITEM_ID --
1490: -------------------------------------
1500: FROM mtl_system_items_b
1501: WHERE inventory_item_id = p_id;
1502: BEGIN
1503:
1504: IF (p_txsv_rec.inventory_item_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.inventory_item_id IS NOT NULL)
1505: THEN
1506: OPEN okl_txsv_inv_item_id_fk_csr(p_txsv_rec.inventory_item_id) ;
1507: FETCH okl_txsv_inv_item_id_fk_csr into l_dummy_var ;
1508: CLOSE okl_txsv_inv_item_id_fk_csr ;
1530: ,p_token1 => G_SQLCODE_TOKEN
1531: ,p_token1_value => SQLCODE
1532: ,p_token2 => G_SQLERRM_TOKEN
1533: ,p_token2_value => SQLERRM);
1534: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1535: END validate_inventory_item_id;
1536: -------------------------------------
1537: -- Validate_Attributes for: BILL_TO_CUST_ACCT_ID --
1538: -------------------------------------
1548: FROM hz_cust_accounts
1549: WHERE cust_account_id = p_id;
1550: BEGIN
1551:
1552: IF (p_txsv_rec.bill_to_cust_acct_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.bill_to_cust_acct_id IS NOT NULL)
1553: THEN
1554: OPEN okl_txsv_bill_cust_acct_fk_csr(p_txsv_rec.bill_to_cust_acct_id) ;
1555: FETCH okl_txsv_bill_cust_acct_fk_csr into l_dummy_var ;
1556: CLOSE okl_txsv_bill_cust_acct_fk_csr ;
1578: ,p_token1 => G_SQLCODE_TOKEN
1579: ,p_token1_value => SQLCODE
1580: ,p_token2 => G_SQLERRM_TOKEN
1581: ,p_token2_value => SQLERRM);
1582: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1583: END validate_bill_to_cust_acct_id;
1584: -------------------------------------
1585: -- Validate_Attributes for: ORG_ID --
1586: -------------------------------------
1596: FROM hr_all_organization_units
1597: WHERE organization_id = p_id;
1598: BEGIN
1599:
1600: IF (p_txsv_rec.org_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.org_id IS NOT NULL)
1601: THEN
1602: OPEN okl_txsv_org_id_fk_csr(p_txsv_rec.org_id) ;
1603: FETCH okl_txsv_org_id_fk_csr into l_dummy_var ;
1604: CLOSE okl_txsv_org_id_fk_csr ;
1626: ,p_token1 => G_SQLCODE_TOKEN
1627: ,p_token1_value => SQLCODE
1628: ,p_token2 => G_SQLERRM_TOKEN
1629: ,p_token2_value => SQLERRM);
1630: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1631: END validate_org_id;
1632: -------------------------------------
1633: -- Validate_Attributes for: LEGAL_ENTITY_ID --
1634: -------------------------------------
1644: FROM xle_entity_profiles
1645: WHERE legal_entity_id = p_id;
1646: BEGIN
1647:
1648: IF (p_txsv_rec.legal_entity_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.legal_entity_id IS NOT NULL)
1649: THEN
1650: --akrangan bug 6281517 fix start
1651: --changed org id assignment as input param of the csr to legal_entity_id
1652: OPEN okl_txsv_le_id_fk_csr(p_txsv_rec.legal_entity_id) ;
1677: ,p_token1 => G_SQLCODE_TOKEN
1678: ,p_token1_value => SQLCODE
1679: ,p_token2 => G_SQLERRM_TOKEN
1680: ,p_token2_value => SQLERRM);
1681: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1682: END validate_legal_entity_id;
1683: -------------------------------------
1684: -- Validate_Attributes for: PRODUCT_TYPE --
1685: -------------------------------------
1695: FROM fnd_lookups
1696: WHERE lookup_type = 'ZX_PRODUCT_TYPE';
1697: BEGIN
1698:
1699: IF (p_txsv_rec.product_type <> OKL_API.G_MISS_CHAR AND p_txsv_rec.product_type IS NOT NULL)
1700: THEN
1701: OPEN okl_txsv_prod_type_fk_csr;
1702: FETCH okl_txsv_prod_type_fk_csr into l_dummy_var ;
1703: CLOSE okl_txsv_prod_type_fk_csr ;
1725: ,p_token1 => G_SQLCODE_TOKEN
1726: ,p_token1_value => SQLCODE
1727: ,p_token2 => G_SQLERRM_TOKEN
1728: ,p_token2_value => SQLERRM);
1729: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1730: END validate_product_type;
1731: -------------------------------------
1732: -- Validate_Attributes for: PRODUCT_FISC_CLASSIFICATION --
1733: -------------------------------------
1743: FROM zx_fc_codes_b
1744: WHERE classification_code = p_id;
1745: BEGIN
1746:
1747: IF (p_txsv_rec.product_fisc_classification <> OKL_API.G_MISS_CHAR AND p_txsv_rec.product_fisc_classification IS NOT NULL)
1748: THEN
1749: OPEN okl_txsv_prd_fis_clasfn_fk_csr(p_txsv_rec.product_fisc_classification);
1750: FETCH okl_txsv_prd_fis_clasfn_fk_csr into l_dummy_var ;
1751: CLOSE okl_txsv_prd_fis_clasfn_fk_csr ;
1773: ,p_token1 => G_SQLCODE_TOKEN
1774: ,p_token1_value => SQLCODE
1775: ,p_token2 => G_SQLERRM_TOKEN
1776: ,p_token2_value => SQLERRM);
1777: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1778: END validate_prod_fisc_classfn;
1779: -------------------------------------
1780: -- Validate_Attributes for: PROVNL_TAX_DETERMINATION_DATE --
1781: -------------------------------------
1785: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1786:
1787: BEGIN
1788:
1789: IF (p_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE AND p_txsv_rec.provnl_tax_determination_date IS NULL)
1790: THEN
1791: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'provnl_tax_determination_date');
1792: l_return_status := OKL_API.G_RET_STS_ERROR;
1793: END IF;
1788:
1789: IF (p_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE AND p_txsv_rec.provnl_tax_determination_date IS NULL)
1790: THEN
1791: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'provnl_tax_determination_date');
1792: l_return_status := OKL_API.G_RET_STS_ERROR;
1793: END IF;
1794: x_return_status := l_return_status;
1795: EXCEPTION
1796:
1800: ,p_token1 => G_SQLCODE_TOKEN
1801: ,p_token1_value => SQLCODE
1802: ,p_token2 => G_SQLERRM_TOKEN
1803: ,p_token2_value => SQLERRM);
1804: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1805: END validate_provnl_tax_det_date;
1806: -------------------------------------
1807: -- Validate_Attributes for: trx_Date --
1808: -------------------------------------
1812: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1813:
1814: BEGIN
1815:
1816: IF (p_txsv_rec.trx_Date = OKL_API.G_MISS_DATE AND p_txsv_rec.trx_Date IS NULL)
1817: THEN
1818: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_Date');
1819: l_return_status := OKL_API.G_RET_STS_ERROR;
1820: END IF;
1815:
1816: IF (p_txsv_rec.trx_Date = OKL_API.G_MISS_DATE AND p_txsv_rec.trx_Date IS NULL)
1817: THEN
1818: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_Date');
1819: l_return_status := OKL_API.G_RET_STS_ERROR;
1820: END IF;
1821: x_return_status := l_return_status;
1822: EXCEPTION
1823:
1827: ,p_token1 => G_SQLCODE_TOKEN
1828: ,p_token1_value => SQLCODE
1829: ,p_token2 => G_SQLERRM_TOKEN
1830: ,p_token2_value => SQLERRM);
1831: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1832: END validate_trx_date;
1833: -------------------------------------
1834: -- Validate_Attributes for: TRY_ID --
1835: -------------------------------------
1845: FROM okl_trx_types_b
1846: WHERE id = p_id;
1847: BEGIN
1848:
1849: IF (p_txsv_rec.try_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.try_id IS NOT NULL)
1850: THEN
1851: OPEN okl_txsv_try_id_fk_csr(p_txsv_rec.try_id);
1852: FETCH okl_txsv_try_id_fk_csr into l_dummy_var ;
1853: CLOSE okl_txsv_try_id_fk_csr ;
1875: ,p_token1 => G_SQLCODE_TOKEN
1876: ,p_token1_value => SQLCODE
1877: ,p_token2 => G_SQLERRM_TOKEN
1878: ,p_token2_value => SQLERRM);
1879: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1880: END validate_try_id;
1881: -------------------------------------
1882: -- Validate_Attributes for: SHIP_TO_LOCATION_ID --
1883: -------------------------------------
1893: FROM hz_party_sites
1894: WHERE location_id = p_id;
1895: BEGIN
1896:
1897: IF (p_txsv_rec.ship_to_location_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.ship_to_location_id IS NOT NULL)
1898: THEN
1899: OPEN okl_txsv_ship_to_locn_fk_csr(p_txsv_rec.ship_to_location_id);
1900: FETCH okl_txsv_ship_to_locn_fk_csr into l_dummy_var ;
1901: CLOSE okl_txsv_ship_to_locn_fk_csr ;
1925: ,p_token1 => G_SQLCODE_TOKEN
1926: ,p_token1_value => SQLCODE
1927: ,p_token2 => G_SQLERRM_TOKEN
1928: ,p_token2_value => SQLERRM);
1929: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1930: END validate_ship_to_location_id;
1931: -------------------------------------
1932: -- Validate_Attributes for: SHIP_TO_PARTY_SITE_ID --
1933: -------------------------------------
1943: FROM hz_party_sites
1944: WHERE party_site_id = p_id;
1945: BEGIN
1946:
1947: IF (p_txsv_rec.ship_to_party_site_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.ship_to_party_site_id IS NOT NULL)
1948: THEN
1949: OPEN okl_txsv_ship_to_ps_fk_csr(p_txsv_rec.ship_to_party_site_id);
1950: FETCH okl_txsv_ship_to_ps_fk_csr into l_dummy_var ;
1951: CLOSE okl_txsv_ship_to_ps_fk_csr ;
1975: ,p_token1 => G_SQLCODE_TOKEN
1976: ,p_token1_value => SQLCODE
1977: ,p_token2 => G_SQLERRM_TOKEN
1978: ,p_token2_value => SQLERRM);
1979: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
1980: END validate_ship_to_party_site_id;
1981: -------------------------------------
1982: -- Validate_Attributes for: SHIP_TO_PARTY_ID --
1983: -------------------------------------
1993: FROM hz_party_sites
1994: WHERE party_id = p_id;
1995: BEGIN
1996:
1997: IF (p_txsv_rec.ship_to_party_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.ship_to_party_id IS NOT NULL)
1998: THEN
1999: OPEN okl_txsv_ship_to_pid_fk_csr(p_txsv_rec.ship_to_party_id);
2000: FETCH okl_txsv_ship_to_pid_fk_csr into l_dummy_var ;
2001: CLOSE okl_txsv_ship_to_pid_fk_csr ;
2025: ,p_token1 => G_SQLCODE_TOKEN
2026: ,p_token1_value => SQLCODE
2027: ,p_token2 => G_SQLERRM_TOKEN
2028: ,p_token2_value => SQLERRM);
2029: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2030: END validate_ship_to_party_id;
2031:
2032: -------------------------------------
2033: -- Validate_Attributes for: bill_to_party_site_id --
2044: FROM hz_party_sites
2045: WHERE party_site_id = p_id;
2046: BEGIN
2047:
2048: IF (p_txsv_rec.bill_to_party_site_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.bill_to_party_site_id IS NOT NULL)
2049: THEN
2050: OPEN okl_txsv_bill_to_ps_fk_csr(p_txsv_rec.bill_to_party_site_id);
2051: FETCH okl_txsv_bill_to_ps_fk_csr into l_dummy_var ;
2052: CLOSE okl_txsv_bill_to_ps_fk_csr ;
2076: ,p_token1 => G_SQLCODE_TOKEN
2077: ,p_token1_value => SQLCODE
2078: ,p_token2 => G_SQLERRM_TOKEN
2079: ,p_token2_value => SQLERRM);
2080: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2081: END validate_bill_to_party_site_id;
2082:
2083: -------------------------------------
2084: -- Validate_Attributes for: bill_to_location_id --
2095: FROM hz_party_sites
2096: WHERE location_id = p_id;
2097: BEGIN
2098:
2099: IF (p_txsv_rec.bill_to_location_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.bill_to_location_id IS NOT NULL)
2100: THEN
2101: OPEN okl_txsv_bill_to_loc_fk_csr(p_txsv_rec.bill_to_location_id);
2102: FETCH okl_txsv_bill_to_loc_fk_csr into l_dummy_var ;
2103: CLOSE okl_txsv_bill_to_loc_fk_csr ;
2127: ,p_token1 => G_SQLCODE_TOKEN
2128: ,p_token1_value => SQLCODE
2129: ,p_token2 => G_SQLERRM_TOKEN
2130: ,p_token2_value => SQLERRM);
2131: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2132: END validate_bill_to_location_id;
2133:
2134: -------------------------------------
2135: -- Validate_Attributes for: bill_to_location_id --
2146: FROM hz_party_sites
2147: WHERE party_id = p_id;
2148: BEGIN
2149:
2150: IF (p_txsv_rec.bill_to_party_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.bill_to_party_id IS NOT NULL)
2151: THEN
2152: OPEN okl_txsv_bill_to_pid_fk_csr(p_txsv_rec.bill_to_party_id);
2153: FETCH okl_txsv_bill_to_pid_fk_csr into l_dummy_var ;
2154: CLOSE okl_txsv_bill_to_pid_fk_csr ;
2178: ,p_token1 => G_SQLCODE_TOKEN
2179: ,p_token1_value => SQLCODE
2180: ,p_token2 => G_SQLERRM_TOKEN
2181: ,p_token2_value => SQLERRM);
2182: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2183: END validate_bill_to_party_id;
2184: -------------------------------------
2185: -- Validate_Attributes for: ship_to_cust_acct_site_use_id --
2186: -------------------------------------
2196: FROM hz_cust_site_uses_all
2197: WHERE site_use_id = p_id;
2198: BEGIN
2199:
2200: IF (p_txsv_rec.ship_to_cust_acct_site_use_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.ship_to_cust_acct_site_use_id IS NOT NULL)
2201: THEN
2202: OPEN okl_txsv_ship_to_cs_fk_csr(p_txsv_rec.ship_to_cust_acct_site_use_id);
2203: FETCH okl_txsv_ship_to_cs_fk_csr into l_dummy_var ;
2204: CLOSE okl_txsv_ship_to_cs_fk_csr ;
2228: ,p_token1 => G_SQLCODE_TOKEN
2229: ,p_token1_value => SQLCODE
2230: ,p_token2 => G_SQLERRM_TOKEN
2231: ,p_token2_value => SQLERRM);
2232: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2233: END validate_shiptocasuid;
2234:
2235: -------------------------------------
2236: -- Validate_Attributes for: bill_to_cust_acct_site_use_id --
2247: FROM hz_cust_site_uses_all
2248: WHERE site_use_id = p_id;
2249: BEGIN
2250:
2251: IF (p_txsv_rec.bill_to_cust_acct_site_use_id <> OKL_API.G_MISS_NUM AND p_txsv_rec.bill_to_cust_acct_site_use_id IS NOT NULL)
2252: THEN
2253: OPEN okl_txsv_bill_to_cs_fk_csr(p_txsv_rec.bill_to_cust_acct_site_use_id);
2254: FETCH okl_txsv_bill_to_cs_fk_csr into l_dummy_var ;
2255: CLOSE okl_txsv_bill_to_cs_fk_csr ;
2279: ,p_token1 => G_SQLCODE_TOKEN
2280: ,p_token1_value => SQLCODE
2281: ,p_token2 => G_SQLERRM_TOKEN
2282: ,p_token2_value => SQLERRM);
2283: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2284: END validate_billtocasuid;
2285: -------------------------------------
2286: -- Validate_Attributes for: TRX_CURRENCY_CODE --
2287: -------------------------------------
2291: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
2292:
2293: BEGIN
2294:
2295: IF (p_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR OR p_txsv_rec.trx_currency_code IS NULL)
2296: THEN
2297: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_currency_code');
2298: l_return_status := OKL_API.G_RET_STS_ERROR;
2299: END IF;
2294:
2295: IF (p_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR OR p_txsv_rec.trx_currency_code IS NULL)
2296: THEN
2297: OKC_API.set_message(G_APP_NAME, G_REQUIRED_VALUE, G_COL_NAME_TOKEN, 'trx_currency_code');
2298: l_return_status := OKL_API.G_RET_STS_ERROR;
2299: END IF;
2300: x_return_status := l_return_status;
2301: EXCEPTION
2302:
2306: ,p_token1 => G_SQLCODE_TOKEN
2307: ,p_token1_value => SQLCODE
2308: ,p_token2 => G_SQLERRM_TOKEN
2309: ,p_token2_value => SQLERRM);
2310: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2311: END validate_trx_currency_code;
2312: -- Modified by dcshanmu for eBTax - modification end
2313:
2314: ---------------------------------------------------------------------------
2319: -----------------------------------------------
2320: FUNCTION Validate_Attributes (
2321: p_txsv_rec IN txsv_rec_type
2322: ) RETURN VARCHAR2 IS
2323: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2324: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2325: BEGIN
2326: -----------------------------
2327: -- Column Level Validation --
2320: FUNCTION Validate_Attributes (
2321: p_txsv_rec IN txsv_rec_type
2322: ) RETURN VARCHAR2 IS
2323: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2324: x_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2325: BEGIN
2326: -----------------------------
2327: -- Column Level Validation --
2328: -----------------------------
2774: ,p_token1 => G_SQLCODE_TOKEN
2775: ,p_token1_value => SQLCODE
2776: ,p_token2 => G_SQLERRM_TOKEN
2777: ,p_token2_value => SQLERRM);
2778: x_return_status := OKL_API.G_RET_STS_UNEXP_ERROR;
2779: RETURN(x_return_status);
2780: END Validate_Attributes;
2781: ---------------------------------------------------------------------------
2782: -- PROCEDURE Validate_Record
2787: FUNCTION Validate_Record (
2788: p_txsv_rec IN txsv_rec_type,
2789: p_db_txsv_rec IN txsv_rec_type
2790: ) RETURN VARCHAR2 IS
2791: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2792: ------------------------------------
2793: -- FUNCTION validate_foreign_keys --
2794: ------------------------------------
2795: FUNCTION validate_foreign_keys (
2803: END Validate_Record;
2804: FUNCTION Validate_Record (
2805: p_txsv_rec IN txsv_rec_type
2806: ) RETURN VARCHAR2 IS
2807: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
2808: l_db_txsv_rec txsv_rec_type := get_rec(p_txsv_rec);
2809: BEGIN
2810: l_return_status := Validate_Record(p_txsv_rec => p_txsv_rec,
2811: p_db_txsv_rec => l_db_txsv_rec);
3019: p_txsv_rec IN txsv_rec_type) IS
3020:
3021: l_api_version CONSTANT NUMBER := 1;
3022: l_api_name CONSTANT VARCHAR2(30) := 'V_validate_row';
3023: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3024: l_txsv_rec txsv_rec_type := p_txsv_rec;
3025: l_txs_rec txs_rec_type;
3026: l_txs_rec txs_rec_type;
3027: BEGIN
3024: l_txsv_rec txsv_rec_type := p_txsv_rec;
3025: l_txs_rec txs_rec_type;
3026: l_txs_rec txs_rec_type;
3027: BEGIN
3028: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3029: G_PKG_NAME,
3030: p_init_msg_list,
3031: l_api_version,
3032: p_api_version,
3031: l_api_version,
3032: p_api_version,
3033: '_PVT',
3034: x_return_status);
3035: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3037: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3038: RAISE OKL_API.G_EXCEPTION_ERROR;
3039: END IF;
3032: p_api_version,
3033: '_PVT',
3034: x_return_status);
3035: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3037: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3038: RAISE OKL_API.G_EXCEPTION_ERROR;
3039: END IF;
3040: --- Validate all non-missing attributes (Item Level Validation)
3033: '_PVT',
3034: x_return_status);
3035: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3037: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3038: RAISE OKL_API.G_EXCEPTION_ERROR;
3039: END IF;
3040: --- Validate all non-missing attributes (Item Level Validation)
3041: l_return_status := Validate_Attributes(l_txsv_rec);
3034: x_return_status);
3035: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3036: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3037: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3038: RAISE OKL_API.G_EXCEPTION_ERROR;
3039: END IF;
3040: --- Validate all non-missing attributes (Item Level Validation)
3041: l_return_status := Validate_Attributes(l_txsv_rec);
3042: --- If any errors happen abort API
3039: END IF;
3040: --- Validate all non-missing attributes (Item Level Validation)
3041: l_return_status := Validate_Attributes(l_txsv_rec);
3042: --- If any errors happen abort API
3043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3046: RAISE OKL_API.G_EXCEPTION_ERROR;
3047: END IF;
3040: --- Validate all non-missing attributes (Item Level Validation)
3041: l_return_status := Validate_Attributes(l_txsv_rec);
3042: --- If any errors happen abort API
3043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3046: RAISE OKL_API.G_EXCEPTION_ERROR;
3047: END IF;
3048:
3041: l_return_status := Validate_Attributes(l_txsv_rec);
3042: --- If any errors happen abort API
3043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3046: RAISE OKL_API.G_EXCEPTION_ERROR;
3047: END IF;
3048:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3042: --- If any errors happen abort API
3043: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3044: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3045: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3046: RAISE OKL_API.G_EXCEPTION_ERROR;
3047: END IF;
3048:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3050: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3046: RAISE OKL_API.G_EXCEPTION_ERROR;
3047: END IF;
3048:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3050: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3052: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3053: RAISE OKL_API.G_EXCEPTION_ERROR;
3054: END IF;
3047: END IF;
3048:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3050: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3052: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3053: RAISE OKL_API.G_EXCEPTION_ERROR;
3054: END IF;
3055: */
3048:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3050: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3052: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3053: RAISE OKL_API.G_EXCEPTION_ERROR;
3054: END IF;
3055: */
3056:
3049: /* l_return_status := Validate_Record(l_txsv_rec);
3050: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3051: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3052: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3053: RAISE OKL_API.G_EXCEPTION_ERROR;
3054: END IF;
3055: */
3056:
3057: x_return_status := l_return_status;
3055: */
3056:
3057: x_return_status := l_return_status;
3058: EXCEPTION
3059: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3060: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3061: (
3062: l_api_name,
3063: G_PKG_NAME,
3056:
3057: x_return_status := l_return_status;
3058: EXCEPTION
3059: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3060: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3061: (
3062: l_api_name,
3063: G_PKG_NAME,
3064: 'OKL_API.G_RET_STS_ERROR',
3060: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3061: (
3062: l_api_name,
3063: G_PKG_NAME,
3064: 'OKL_API.G_RET_STS_ERROR',
3065: x_msg_count,
3066: x_msg_data,
3067: '_PVT'
3068: );
3065: x_msg_count,
3066: x_msg_data,
3067: '_PVT'
3068: );
3069: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3070: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3071: (
3072: l_api_name,
3073: G_PKG_NAME,
3066: x_msg_data,
3067: '_PVT'
3068: );
3069: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3070: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3071: (
3072: l_api_name,
3073: G_PKG_NAME,
3074: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3070: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3071: (
3072: l_api_name,
3073: G_PKG_NAME,
3074: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3075: x_msg_count,
3076: x_msg_data,
3077: '_PVT'
3078: );
3076: x_msg_data,
3077: '_PVT'
3078: );
3079: WHEN OTHERS THEN
3080: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3081: (
3082: l_api_name,
3083: G_PKG_NAME,
3084: 'OTHERS',
3096: x_return_status OUT NOCOPY VARCHAR2,
3097: x_msg_count OUT NOCOPY NUMBER,
3098: x_msg_data OUT NOCOPY VARCHAR2,
3099: p_txsv_tbl IN txsv_tbl_type,
3100: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
3101:
3102: l_api_version CONSTANT NUMBER := 1;
3103: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
3104: i NUMBER := 0;
3102: l_api_version CONSTANT NUMBER := 1;
3103: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_validate_row';
3104: i NUMBER := 0;
3105: BEGIN
3106: OKL_API.init_msg_list(p_init_msg_list);
3107: -- Make sure PL/SQL table has records in it before passing
3108: IF (p_txsv_tbl.COUNT > 0) THEN
3109: i := p_txsv_tbl.FIRST;
3110: LOOP
3108: IF (p_txsv_tbl.COUNT > 0) THEN
3109: i := p_txsv_tbl.FIRST;
3110: LOOP
3111: DECLARE
3112: l_error_rec OKL_API.ERROR_REC_TYPE;
3113: BEGIN
3114: l_error_rec.api_name := l_api_name;
3115: l_error_rec.api_package := G_PKG_NAME;
3116: l_error_rec.idx := i;
3115: l_error_rec.api_package := G_PKG_NAME;
3116: l_error_rec.idx := i;
3117: validate_row (
3118: p_api_version => p_api_version,
3119: p_init_msg_list => OKL_API.G_FALSE,
3120: x_return_status => l_error_rec.error_type,
3121: x_msg_count => l_error_rec.msg_count,
3122: x_msg_data => l_error_rec.msg_data,
3123: p_txsv_rec => p_txsv_tbl(i));
3120: x_return_status => l_error_rec.error_type,
3121: x_msg_count => l_error_rec.msg_count,
3122: x_msg_data => l_error_rec.msg_data,
3123: p_txsv_rec => p_txsv_tbl(i));
3124: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
3125: l_error_rec.sqlcode := SQLCODE;
3126: load_error_tbl(l_error_rec, px_error_tbl);
3127: ELSE
3128: x_msg_count := l_error_rec.msg_count;
3128: x_msg_count := l_error_rec.msg_count;
3129: x_msg_data := l_error_rec.msg_data;
3130: END IF;
3131: EXCEPTION
3132: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3133: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3134: l_error_rec.sqlcode := SQLCODE;
3135: load_error_tbl(l_error_rec, px_error_tbl);
3136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3129: x_msg_data := l_error_rec.msg_data;
3130: END IF;
3131: EXCEPTION
3132: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3133: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3134: l_error_rec.sqlcode := SQLCODE;
3135: load_error_tbl(l_error_rec, px_error_tbl);
3136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3137: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3132: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3133: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3134: l_error_rec.sqlcode := SQLCODE;
3135: load_error_tbl(l_error_rec, px_error_tbl);
3136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3137: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3138: l_error_rec.sqlcode := SQLCODE;
3139: load_error_tbl(l_error_rec, px_error_tbl);
3140: WHEN OTHERS THEN
3133: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3134: l_error_rec.sqlcode := SQLCODE;
3135: load_error_tbl(l_error_rec, px_error_tbl);
3136: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3137: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3138: l_error_rec.sqlcode := SQLCODE;
3139: load_error_tbl(l_error_rec, px_error_tbl);
3140: WHEN OTHERS THEN
3141: l_error_rec.error_type := 'OTHERS';
3148: END IF;
3149: -- Loop through the error_tbl to find the error with the highest severity
3150: -- and return it.
3151: x_return_status := find_highest_exception(px_error_tbl);
3152: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3153: EXCEPTION
3154: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3155: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3156: (
3150: -- and return it.
3151: x_return_status := find_highest_exception(px_error_tbl);
3152: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3153: EXCEPTION
3154: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3155: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3156: (
3157: l_api_name,
3158: G_PKG_NAME,
3151: x_return_status := find_highest_exception(px_error_tbl);
3152: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3153: EXCEPTION
3154: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3155: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3156: (
3157: l_api_name,
3158: G_PKG_NAME,
3159: 'OKL_API.G_RET_STS_ERROR',
3155: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3156: (
3157: l_api_name,
3158: G_PKG_NAME,
3159: 'OKL_API.G_RET_STS_ERROR',
3160: x_msg_count,
3161: x_msg_data,
3162: '_PVT'
3163: );
3160: x_msg_count,
3161: x_msg_data,
3162: '_PVT'
3163: );
3164: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3166: (
3167: l_api_name,
3168: G_PKG_NAME,
3161: x_msg_data,
3162: '_PVT'
3163: );
3164: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3166: (
3167: l_api_name,
3168: G_PKG_NAME,
3169: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3165: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3166: (
3167: l_api_name,
3168: G_PKG_NAME,
3169: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3170: x_msg_count,
3171: x_msg_data,
3172: '_PVT'
3173: );
3171: x_msg_data,
3172: '_PVT'
3173: );
3174: WHEN OTHERS THEN
3175: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3176: (
3177: l_api_name,
3178: G_PKG_NAME,
3179: 'OTHERS',
3195: p_txsv_tbl IN txsv_tbl_type) IS
3196:
3197: l_api_version CONSTANT NUMBER := 1;
3198: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
3199: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3200: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3201: BEGIN
3202: OKL_API.init_msg_list(p_init_msg_list);
3203: -- Make sure PL/SQL table has records in it before passing
3196:
3197: l_api_version CONSTANT NUMBER := 1;
3198: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
3199: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3200: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3201: BEGIN
3202: OKL_API.init_msg_list(p_init_msg_list);
3203: -- Make sure PL/SQL table has records in it before passing
3204: IF (p_txsv_tbl.COUNT > 0) THEN
3198: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_validate_row';
3199: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3200: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3201: BEGIN
3202: OKL_API.init_msg_list(p_init_msg_list);
3203: -- Make sure PL/SQL table has records in it before passing
3204: IF (p_txsv_tbl.COUNT > 0) THEN
3205: validate_row (
3206: p_api_version => p_api_version,
3203: -- Make sure PL/SQL table has records in it before passing
3204: IF (p_txsv_tbl.COUNT > 0) THEN
3205: validate_row (
3206: p_api_version => p_api_version,
3207: p_init_msg_list => OKL_API.G_FALSE,
3208: x_return_status => x_return_status,
3209: x_msg_count => x_msg_count,
3210: x_msg_data => x_msg_data,
3211: p_txsv_tbl => p_txsv_tbl,
3210: x_msg_data => x_msg_data,
3211: p_txsv_tbl => p_txsv_tbl,
3212: px_error_tbl => l_error_tbl);
3213: END IF;
3214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3215: EXCEPTION
3216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3218: (
3212: px_error_tbl => l_error_tbl);
3213: END IF;
3214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3215: EXCEPTION
3216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3218: (
3219: l_api_name,
3220: G_PKG_NAME,
3213: END IF;
3214: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3215: EXCEPTION
3216: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3218: (
3219: l_api_name,
3220: G_PKG_NAME,
3221: 'OKL_API.G_RET_STS_ERROR',
3217: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3218: (
3219: l_api_name,
3220: G_PKG_NAME,
3221: 'OKL_API.G_RET_STS_ERROR',
3222: x_msg_count,
3223: x_msg_data,
3224: '_PVT'
3225: );
3222: x_msg_count,
3223: x_msg_data,
3224: '_PVT'
3225: );
3226: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3228: (
3229: l_api_name,
3230: G_PKG_NAME,
3223: x_msg_data,
3224: '_PVT'
3225: );
3226: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3228: (
3229: l_api_name,
3230: G_PKG_NAME,
3231: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3227: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3228: (
3229: l_api_name,
3230: G_PKG_NAME,
3231: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3232: x_msg_count,
3233: x_msg_data,
3234: '_PVT'
3235: );
3233: x_msg_data,
3234: '_PVT'
3235: );
3236: WHEN OTHERS THEN
3237: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3238: (
3239: l_api_name,
3240: G_PKG_NAME,
3241: 'OTHERS',
3260: x_txs_rec OUT NOCOPY txs_rec_type) IS
3261:
3262: l_api_version CONSTANT NUMBER := 1;
3263: l_api_name CONSTANT VARCHAR2(30) := 'B_insert_row';
3264: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3265: l_txs_rec txs_rec_type := p_txs_rec;
3266: l_def_txs_rec txs_rec_type;
3267: ----------------------------------------
3268: -- Set_Attributes for:OKL_TAX_SOURCES --
3270: FUNCTION Set_Attributes (
3271: p_txs_rec IN txs_rec_type,
3272: x_txs_rec OUT NOCOPY txs_rec_type
3273: ) RETURN VARCHAR2 IS
3274: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3275: BEGIN
3276: x_txs_rec := p_txs_rec;
3277: RETURN(l_return_status);
3278: END Set_Attributes;
3276: x_txs_rec := p_txs_rec;
3277: RETURN(l_return_status);
3278: END Set_Attributes;
3279: BEGIN
3280: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3281: p_init_msg_list,
3282: '_PVT',
3283: x_return_status);
3284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3280: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3281: p_init_msg_list,
3282: '_PVT',
3283: x_return_status);
3284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3287: RAISE OKL_API.G_EXCEPTION_ERROR;
3288: END IF;
3281: p_init_msg_list,
3282: '_PVT',
3283: x_return_status);
3284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3287: RAISE OKL_API.G_EXCEPTION_ERROR;
3288: END IF;
3289: --- Setting item atributes
3282: '_PVT',
3283: x_return_status);
3284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3287: RAISE OKL_API.G_EXCEPTION_ERROR;
3288: END IF;
3289: --- Setting item atributes
3290: l_return_status := Set_Attributes(
3283: x_return_status);
3284: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3285: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3286: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3287: RAISE OKL_API.G_EXCEPTION_ERROR;
3288: END IF;
3289: --- Setting item atributes
3290: l_return_status := Set_Attributes(
3291: p_txs_rec, -- IN
3290: l_return_status := Set_Attributes(
3291: p_txs_rec, -- IN
3292: l_txs_rec); -- OUT
3293: --- If any errors happen abort API
3294: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3295: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3296: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3297: RAISE OKL_API.G_EXCEPTION_ERROR;
3298: END IF;
3291: p_txs_rec, -- IN
3292: l_txs_rec); -- OUT
3293: --- If any errors happen abort API
3294: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3295: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3296: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3297: RAISE OKL_API.G_EXCEPTION_ERROR;
3298: END IF;
3299: INSERT INTO OKL_TAX_SOURCES(
3292: l_txs_rec); -- OUT
3293: --- If any errors happen abort API
3294: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3295: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3296: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3297: RAISE OKL_API.G_EXCEPTION_ERROR;
3298: END IF;
3299: INSERT INTO OKL_TAX_SOURCES(
3300: id,
3293: --- If any errors happen abort API
3294: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3295: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3296: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3297: RAISE OKL_API.G_EXCEPTION_ERROR;
3298: END IF;
3299: INSERT INTO OKL_TAX_SOURCES(
3300: id,
3301: khr_id,
3478: );
3479: -- Set OUT values
3480: x_txs_rec := l_txs_rec;
3481: x_return_status := l_return_status;
3482: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3483: EXCEPTION
3484: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3485: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3486: (
3480: x_txs_rec := l_txs_rec;
3481: x_return_status := l_return_status;
3482: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3483: EXCEPTION
3484: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3485: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3486: (
3487: l_api_name,
3488: G_PKG_NAME,
3481: x_return_status := l_return_status;
3482: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3483: EXCEPTION
3484: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3485: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3486: (
3487: l_api_name,
3488: G_PKG_NAME,
3489: 'OKL_API.G_RET_STS_ERROR',
3485: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3486: (
3487: l_api_name,
3488: G_PKG_NAME,
3489: 'OKL_API.G_RET_STS_ERROR',
3490: x_msg_count,
3491: x_msg_data,
3492: '_PVT'
3493: );
3490: x_msg_count,
3491: x_msg_data,
3492: '_PVT'
3493: );
3494: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3495: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3496: (
3497: l_api_name,
3498: G_PKG_NAME,
3491: x_msg_data,
3492: '_PVT'
3493: );
3494: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3495: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3496: (
3497: l_api_name,
3498: G_PKG_NAME,
3499: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3495: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3496: (
3497: l_api_name,
3498: G_PKG_NAME,
3499: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3500: x_msg_count,
3501: x_msg_data,
3502: '_PVT'
3503: );
3501: x_msg_data,
3502: '_PVT'
3503: );
3504: WHEN OTHERS THEN
3505: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3506: (
3507: l_api_name,
3508: G_PKG_NAME,
3509: 'OTHERS',
3525: x_txsv_rec OUT NOCOPY txsv_rec_type) IS
3526:
3527: l_api_version CONSTANT NUMBER := 1;
3528: l_api_name CONSTANT VARCHAR2(30) := 'V_insert_row';
3529: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3530: l_txsv_rec txsv_rec_type := p_txsv_rec;
3531: l_def_txsv_rec txsv_rec_type;
3532: l_txs_rec txs_rec_type;
3533: lx_txs_rec txs_rec_type;
3552: FUNCTION Set_Attributes (
3553: p_txsv_rec IN txsv_rec_type,
3554: x_txsv_rec OUT NOCOPY txsv_rec_type
3555: ) RETURN VARCHAR2 IS
3556: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3557: BEGIN
3558: x_txsv_rec := p_txsv_rec;
3559: x_txsv_rec.OBJECT_VERSION_NUMBER := 1;
3560: RETURN(l_return_status);
3559: x_txsv_rec.OBJECT_VERSION_NUMBER := 1;
3560: RETURN(l_return_status);
3561: END Set_Attributes;
3562: BEGIN
3563: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3564: G_PKG_NAME,
3565: p_init_msg_list,
3566: l_api_version,
3567: p_api_version,
3566: l_api_version,
3567: p_api_version,
3568: '_PVT',
3569: x_return_status);
3570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3573: RAISE OKL_API.G_EXCEPTION_ERROR;
3574: END IF;
3567: p_api_version,
3568: '_PVT',
3569: x_return_status);
3570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3573: RAISE OKL_API.G_EXCEPTION_ERROR;
3574: END IF;
3575: l_txsv_rec := null_out_defaults(p_txsv_rec);
3568: '_PVT',
3569: x_return_status);
3570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3573: RAISE OKL_API.G_EXCEPTION_ERROR;
3574: END IF;
3575: l_txsv_rec := null_out_defaults(p_txsv_rec);
3576: -- Set primary key value
3569: x_return_status);
3570: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3571: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3572: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3573: RAISE OKL_API.G_EXCEPTION_ERROR;
3574: END IF;
3575: l_txsv_rec := null_out_defaults(p_txsv_rec);
3576: -- Set primary key value
3577: l_txsv_rec.ID := get_seq_id;
3579: l_return_Status := Set_Attributes(
3580: l_txsv_rec, -- IN
3581: l_def_txsv_rec); -- OUT
3582: --- If any errors happen abort API
3583: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3586: RAISE OKL_API.G_EXCEPTION_ERROR;
3587: END IF;
3580: l_txsv_rec, -- IN
3581: l_def_txsv_rec); -- OUT
3582: --- If any errors happen abort API
3583: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3586: RAISE OKL_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
3581: l_def_txsv_rec); -- OUT
3582: --- If any errors happen abort API
3583: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3586: RAISE OKL_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
3589: --- Validate all non-missing attributes (Item Level Validation)
3582: --- If any errors happen abort API
3583: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3584: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3585: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3586: RAISE OKL_API.G_EXCEPTION_ERROR;
3587: END IF;
3588: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
3589: --- Validate all non-missing attributes (Item Level Validation)
3590: l_return_status := Validate_Attributes(l_def_txsv_rec);
3588: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
3589: --- Validate all non-missing attributes (Item Level Validation)
3590: l_return_status := Validate_Attributes(l_def_txsv_rec);
3591: --- If any errors happen abort API
3592: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3594: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3595: RAISE OKL_API.G_EXCEPTION_ERROR;
3596: END IF;
3589: --- Validate all non-missing attributes (Item Level Validation)
3590: l_return_status := Validate_Attributes(l_def_txsv_rec);
3591: --- If any errors happen abort API
3592: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3594: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3595: RAISE OKL_API.G_EXCEPTION_ERROR;
3596: END IF;
3597:
3590: l_return_status := Validate_Attributes(l_def_txsv_rec);
3591: --- If any errors happen abort API
3592: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3594: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3595: RAISE OKL_API.G_EXCEPTION_ERROR;
3596: END IF;
3597:
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3591: --- If any errors happen abort API
3592: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3593: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3594: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3595: RAISE OKL_API.G_EXCEPTION_ERROR;
3596: END IF;
3597:
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3595: RAISE OKL_API.G_EXCEPTION_ERROR;
3596: END IF;
3597:
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3602: RAISE OKL_API.G_EXCEPTION_ERROR;
3603: END IF;
3596: END IF;
3597:
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3602: RAISE OKL_API.G_EXCEPTION_ERROR;
3603: END IF;
3604: */
3597:
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3602: RAISE OKL_API.G_EXCEPTION_ERROR;
3603: END IF;
3604: */
3605: -----------------------------------------
3598: /*l_return_status := Validate_Record(l_def_txsv_rec);
3599: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3600: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3601: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3602: RAISE OKL_API.G_EXCEPTION_ERROR;
3603: END IF;
3604: */
3605: -----------------------------------------
3606: -- Move VIEW record to "Child" records --
3616: x_msg_data,
3617: l_txs_rec,
3618: lx_txs_rec
3619: );
3620: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3622: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3623: RAISE OKL_API.G_EXCEPTION_ERROR;
3624: END IF;
3617: l_txs_rec,
3618: lx_txs_rec
3619: );
3620: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3622: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3623: RAISE OKL_API.G_EXCEPTION_ERROR;
3624: END IF;
3625: migrate(lx_txs_rec, l_def_txsv_rec);
3618: lx_txs_rec
3619: );
3620: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3622: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3623: RAISE OKL_API.G_EXCEPTION_ERROR;
3624: END IF;
3625: migrate(lx_txs_rec, l_def_txsv_rec);
3626: -- Set OUT values
3619: );
3620: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3621: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3622: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3623: RAISE OKL_API.G_EXCEPTION_ERROR;
3624: END IF;
3625: migrate(lx_txs_rec, l_def_txsv_rec);
3626: -- Set OUT values
3627: x_txsv_rec := l_def_txsv_rec;
3625: migrate(lx_txs_rec, l_def_txsv_rec);
3626: -- Set OUT values
3627: x_txsv_rec := l_def_txsv_rec;
3628: x_return_status := l_return_status;
3629: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3630: EXCEPTION
3631: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3632: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3633: (
3627: x_txsv_rec := l_def_txsv_rec;
3628: x_return_status := l_return_status;
3629: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3630: EXCEPTION
3631: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3632: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3633: (
3634: l_api_name,
3635: G_PKG_NAME,
3628: x_return_status := l_return_status;
3629: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3630: EXCEPTION
3631: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3632: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3633: (
3634: l_api_name,
3635: G_PKG_NAME,
3636: 'OKL_API.G_RET_STS_ERROR',
3632: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3633: (
3634: l_api_name,
3635: G_PKG_NAME,
3636: 'OKL_API.G_RET_STS_ERROR',
3637: x_msg_count,
3638: x_msg_data,
3639: '_PVT'
3640: );
3637: x_msg_count,
3638: x_msg_data,
3639: '_PVT'
3640: );
3641: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3642: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3643: (
3644: l_api_name,
3645: G_PKG_NAME,
3638: x_msg_data,
3639: '_PVT'
3640: );
3641: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3642: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3643: (
3644: l_api_name,
3645: G_PKG_NAME,
3646: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3642: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3643: (
3644: l_api_name,
3645: G_PKG_NAME,
3646: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3647: x_msg_count,
3648: x_msg_data,
3649: '_PVT'
3650: );
3648: x_msg_data,
3649: '_PVT'
3650: );
3651: WHEN OTHERS THEN
3652: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3653: (
3654: l_api_name,
3655: G_PKG_NAME,
3656: 'OTHERS',
3669: x_msg_count OUT NOCOPY NUMBER,
3670: x_msg_data OUT NOCOPY VARCHAR2,
3671: p_txsv_tbl IN txsv_tbl_type,
3672: x_txsv_tbl OUT NOCOPY txsv_tbl_type,
3673: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
3674:
3675: l_api_version CONSTANT NUMBER := 1;
3676: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
3677: i NUMBER := 0;
3675: l_api_version CONSTANT NUMBER := 1;
3676: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_insert_row';
3677: i NUMBER := 0;
3678: BEGIN
3679: OKL_API.init_msg_list(p_init_msg_list);
3680: -- Make sure PL/SQL table has records in it before passing
3681: IF (p_txsv_tbl.COUNT > 0) THEN
3682: i := p_txsv_tbl.FIRST;
3683: LOOP
3681: IF (p_txsv_tbl.COUNT > 0) THEN
3682: i := p_txsv_tbl.FIRST;
3683: LOOP
3684: DECLARE
3685: l_error_rec OKL_API.ERROR_REC_TYPE;
3686: BEGIN
3687: l_error_rec.api_name := l_api_name;
3688: l_error_rec.api_package := G_PKG_NAME;
3689: l_error_rec.idx := i;
3688: l_error_rec.api_package := G_PKG_NAME;
3689: l_error_rec.idx := i;
3690: insert_row (
3691: p_api_version => p_api_version,
3692: p_init_msg_list => OKL_API.G_FALSE,
3693: x_return_status => l_error_rec.error_type,
3694: x_msg_count => l_error_rec.msg_count,
3695: x_msg_data => l_error_rec.msg_data,
3696: p_txsv_rec => p_txsv_tbl(i),
3694: x_msg_count => l_error_rec.msg_count,
3695: x_msg_data => l_error_rec.msg_data,
3696: p_txsv_rec => p_txsv_tbl(i),
3697: x_txsv_rec => x_txsv_tbl(i));
3698: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
3699: l_error_rec.sqlcode := SQLCODE;
3700: load_error_tbl(l_error_rec, px_error_tbl);
3701: ELSE
3702: x_msg_count := l_error_rec.msg_count;
3702: x_msg_count := l_error_rec.msg_count;
3703: x_msg_data := l_error_rec.msg_data;
3704: END IF;
3705: EXCEPTION
3706: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3707: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3708: l_error_rec.sqlcode := SQLCODE;
3709: load_error_tbl(l_error_rec, px_error_tbl);
3710: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3703: x_msg_data := l_error_rec.msg_data;
3704: END IF;
3705: EXCEPTION
3706: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3707: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3708: l_error_rec.sqlcode := SQLCODE;
3709: load_error_tbl(l_error_rec, px_error_tbl);
3710: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3711: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3706: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3707: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3708: l_error_rec.sqlcode := SQLCODE;
3709: load_error_tbl(l_error_rec, px_error_tbl);
3710: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3711: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3712: l_error_rec.sqlcode := SQLCODE;
3713: load_error_tbl(l_error_rec, px_error_tbl);
3714: WHEN OTHERS THEN
3707: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
3708: l_error_rec.sqlcode := SQLCODE;
3709: load_error_tbl(l_error_rec, px_error_tbl);
3710: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3711: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
3712: l_error_rec.sqlcode := SQLCODE;
3713: load_error_tbl(l_error_rec, px_error_tbl);
3714: WHEN OTHERS THEN
3715: l_error_rec.error_type := 'OTHERS';
3722: END IF;
3723: -- Loop through the error_tbl to find the error with the highest severity
3724: -- and return it.
3725: x_return_status := find_highest_exception(px_error_tbl);
3726: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3727: EXCEPTION
3728: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3729: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3730: (
3724: -- and return it.
3725: x_return_status := find_highest_exception(px_error_tbl);
3726: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3727: EXCEPTION
3728: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3729: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3730: (
3731: l_api_name,
3732: G_PKG_NAME,
3725: x_return_status := find_highest_exception(px_error_tbl);
3726: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3727: EXCEPTION
3728: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3729: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3730: (
3731: l_api_name,
3732: G_PKG_NAME,
3733: 'OKL_API.G_RET_STS_ERROR',
3729: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3730: (
3731: l_api_name,
3732: G_PKG_NAME,
3733: 'OKL_API.G_RET_STS_ERROR',
3734: x_msg_count,
3735: x_msg_data,
3736: '_PVT'
3737: );
3734: x_msg_count,
3735: x_msg_data,
3736: '_PVT'
3737: );
3738: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3739: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3740: (
3741: l_api_name,
3742: G_PKG_NAME,
3735: x_msg_data,
3736: '_PVT'
3737: );
3738: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3739: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3740: (
3741: l_api_name,
3742: G_PKG_NAME,
3743: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3739: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3740: (
3741: l_api_name,
3742: G_PKG_NAME,
3743: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3744: x_msg_count,
3745: x_msg_data,
3746: '_PVT'
3747: );
3745: x_msg_data,
3746: '_PVT'
3747: );
3748: WHEN OTHERS THEN
3749: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3750: (
3751: l_api_name,
3752: G_PKG_NAME,
3753: 'OTHERS',
3772: x_txsv_tbl OUT NOCOPY txsv_tbl_type) IS
3773:
3774: l_api_version CONSTANT NUMBER := 1;
3775: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
3776: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3777: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3778: BEGIN
3779: OKL_API.init_msg_list(p_init_msg_list);
3780: -- Make sure PL/SQL table has records in it before passing
3773:
3774: l_api_version CONSTANT NUMBER := 1;
3775: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
3776: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3777: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3778: BEGIN
3779: OKL_API.init_msg_list(p_init_msg_list);
3780: -- Make sure PL/SQL table has records in it before passing
3781: IF (p_txsv_tbl.COUNT > 0) THEN
3775: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
3776: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3777: l_error_tbl OKL_API.ERROR_TBL_TYPE;
3778: BEGIN
3779: OKL_API.init_msg_list(p_init_msg_list);
3780: -- Make sure PL/SQL table has records in it before passing
3781: IF (p_txsv_tbl.COUNT > 0) THEN
3782: insert_row (
3783: p_api_version => p_api_version,
3780: -- Make sure PL/SQL table has records in it before passing
3781: IF (p_txsv_tbl.COUNT > 0) THEN
3782: insert_row (
3783: p_api_version => p_api_version,
3784: p_init_msg_list => OKL_API.G_FALSE,
3785: x_return_status => x_return_status,
3786: x_msg_count => x_msg_count,
3787: x_msg_data => x_msg_data,
3788: p_txsv_tbl => p_txsv_tbl,
3788: p_txsv_tbl => p_txsv_tbl,
3789: x_txsv_tbl => x_txsv_tbl,
3790: px_error_tbl => l_error_tbl);
3791: END IF;
3792: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3793: EXCEPTION
3794: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3795: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3796: (
3790: px_error_tbl => l_error_tbl);
3791: END IF;
3792: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3793: EXCEPTION
3794: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3795: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3796: (
3797: l_api_name,
3798: G_PKG_NAME,
3791: END IF;
3792: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3793: EXCEPTION
3794: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3795: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3796: (
3797: l_api_name,
3798: G_PKG_NAME,
3799: 'OKL_API.G_RET_STS_ERROR',
3795: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3796: (
3797: l_api_name,
3798: G_PKG_NAME,
3799: 'OKL_API.G_RET_STS_ERROR',
3800: x_msg_count,
3801: x_msg_data,
3802: '_PVT'
3803: );
3800: x_msg_count,
3801: x_msg_data,
3802: '_PVT'
3803: );
3804: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3806: (
3807: l_api_name,
3808: G_PKG_NAME,
3801: x_msg_data,
3802: '_PVT'
3803: );
3804: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3806: (
3807: l_api_name,
3808: G_PKG_NAME,
3809: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3805: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3806: (
3807: l_api_name,
3808: G_PKG_NAME,
3809: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3810: x_msg_count,
3811: x_msg_data,
3812: '_PVT'
3813: );
3811: x_msg_data,
3812: '_PVT'
3813: );
3814: WHEN OTHERS THEN
3815: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3816: (
3817: l_api_name,
3818: G_PKG_NAME,
3819: 'OTHERS',
3850: FROM OKL_TAX_SOURCES
3851: WHERE ID = p_txs_rec.id;
3852: l_api_version CONSTANT NUMBER := 1;
3853: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
3854: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3855: l_object_version_number OKL_TAX_SOURCES.OBJECT_VERSION_NUMBER%TYPE;
3856: lc_object_version_number OKL_TAX_SOURCES.OBJECT_VERSION_NUMBER%TYPE;
3857: l_row_notfound BOOLEAN := FALSE;
3858: lc_row_notfound BOOLEAN := FALSE;
3856: lc_object_version_number OKL_TAX_SOURCES.OBJECT_VERSION_NUMBER%TYPE;
3857: l_row_notfound BOOLEAN := FALSE;
3858: lc_row_notfound BOOLEAN := FALSE;
3859: BEGIN
3860: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3861: p_init_msg_list,
3862: '_PVT',
3863: x_return_status);
3864: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3860: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3861: p_init_msg_list,
3862: '_PVT',
3863: x_return_status);
3864: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3865: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3866: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3867: RAISE OKL_API.G_EXCEPTION_ERROR;
3868: END IF;
3861: p_init_msg_list,
3862: '_PVT',
3863: x_return_status);
3864: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3865: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3866: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3867: RAISE OKL_API.G_EXCEPTION_ERROR;
3868: END IF;
3869: BEGIN
3862: '_PVT',
3863: x_return_status);
3864: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3865: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3866: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3867: RAISE OKL_API.G_EXCEPTION_ERROR;
3868: END IF;
3869: BEGIN
3870: OPEN lock_csr(p_txs_rec);
3863: x_return_status);
3864: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3865: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3866: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3867: RAISE OKL_API.G_EXCEPTION_ERROR;
3868: END IF;
3869: BEGIN
3870: OPEN lock_csr(p_txs_rec);
3871: FETCH lock_csr INTO l_object_version_number;
3875: WHEN E_Resource_Busy THEN
3876: IF (lock_csr%ISOPEN) THEN
3877: CLOSE lock_csr;
3878: END IF;
3879: OKL_API.set_message(G_FND_APP,G_FORM_UNABLE_TO_RESERVE_REC);
3880: RAISE APP_EXCEPTIONS.RECORD_LOCK_EXCEPTION;
3881: END;
3882:
3883: IF ( l_row_notfound ) THEN
3886: lc_row_notfound := lchk_csr%NOTFOUND;
3887: CLOSE lchk_csr;
3888: END IF;
3889: IF (lc_row_notfound) THEN
3890: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3891: RAISE OKL_API.G_EXCEPTION_ERROR;
3892: ELSIF lc_object_version_number > p_txs_rec.object_version_number THEN
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3887: CLOSE lchk_csr;
3888: END IF;
3889: IF (lc_row_notfound) THEN
3890: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3891: RAISE OKL_API.G_EXCEPTION_ERROR;
3892: ELSIF lc_object_version_number > p_txs_rec.object_version_number THEN
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3889: IF (lc_row_notfound) THEN
3890: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3891: RAISE OKL_API.G_EXCEPTION_ERROR;
3892: ELSIF lc_object_version_number > p_txs_rec.object_version_number THEN
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3890: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_DELETED);
3891: RAISE OKL_API.G_EXCEPTION_ERROR;
3892: ELSIF lc_object_version_number > p_txs_rec.object_version_number THEN
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3898: ELSIF lc_object_version_number = -1 THEN
3892: ELSIF lc_object_version_number > p_txs_rec.object_version_number THEN
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3898: ELSIF lc_object_version_number = -1 THEN
3899: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3900: RAISE OKL_API.G_EXCEPTION_ERROR;
3893: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3894: RAISE OKL_API.G_EXCEPTION_ERROR;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3898: ELSIF lc_object_version_number = -1 THEN
3899: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3900: RAISE OKL_API.G_EXCEPTION_ERROR;
3901: END IF;
3895: ELSIF lc_object_version_number <> p_txs_rec.object_version_number THEN
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3898: ELSIF lc_object_version_number = -1 THEN
3899: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3900: RAISE OKL_API.G_EXCEPTION_ERROR;
3901: END IF;
3902: x_return_status := l_return_status;
3903: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3896: OKL_API.set_message(G_FND_APP,G_FORM_RECORD_CHANGED);
3897: RAISE OKL_API.G_EXCEPTION_ERROR;
3898: ELSIF lc_object_version_number = -1 THEN
3899: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3900: RAISE OKL_API.G_EXCEPTION_ERROR;
3901: END IF;
3902: x_return_status := l_return_status;
3903: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3904: EXCEPTION
3899: OKL_API.set_message(G_APP_NAME,G_RECORD_LOGICALLY_DELETED);
3900: RAISE OKL_API.G_EXCEPTION_ERROR;
3901: END IF;
3902: x_return_status := l_return_status;
3903: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3904: EXCEPTION
3905: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3906: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3907: (
3901: END IF;
3902: x_return_status := l_return_status;
3903: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3904: EXCEPTION
3905: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3906: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3907: (
3908: l_api_name,
3909: G_PKG_NAME,
3902: x_return_status := l_return_status;
3903: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3904: EXCEPTION
3905: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3906: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3907: (
3908: l_api_name,
3909: G_PKG_NAME,
3910: 'OKL_API.G_RET_STS_ERROR',
3906: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3907: (
3908: l_api_name,
3909: G_PKG_NAME,
3910: 'OKL_API.G_RET_STS_ERROR',
3911: x_msg_count,
3912: x_msg_data,
3913: '_PVT'
3914: );
3911: x_msg_count,
3912: x_msg_data,
3913: '_PVT'
3914: );
3915: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3916: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3917: (
3918: l_api_name,
3919: G_PKG_NAME,
3912: x_msg_data,
3913: '_PVT'
3914: );
3915: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3916: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3917: (
3918: l_api_name,
3919: G_PKG_NAME,
3920: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3916: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3917: (
3918: l_api_name,
3919: G_PKG_NAME,
3920: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3921: x_msg_count,
3922: x_msg_data,
3923: '_PVT'
3924: );
3922: x_msg_data,
3923: '_PVT'
3924: );
3925: WHEN OTHERS THEN
3926: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3927: (
3928: l_api_name,
3929: G_PKG_NAME,
3930: 'OTHERS',
3945: p_txsv_rec IN txsv_rec_type) IS
3946:
3947: l_api_version CONSTANT NUMBER := 1;
3948: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3949: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3950: l_txs_rec txs_rec_type;
3951: BEGIN
3952: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3953: G_PKG_NAME,
3948: l_api_name CONSTANT VARCHAR2(30) := 'V_lock_row';
3949: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
3950: l_txs_rec txs_rec_type;
3951: BEGIN
3952: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
3953: G_PKG_NAME,
3954: p_init_msg_list,
3955: l_api_version,
3956: p_api_version,
3955: l_api_version,
3956: p_api_version,
3957: '_PVT',
3958: x_return_status);
3959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3962: RAISE OKL_API.G_EXCEPTION_ERROR;
3963: END IF;
3956: p_api_version,
3957: '_PVT',
3958: x_return_status);
3959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3962: RAISE OKL_API.G_EXCEPTION_ERROR;
3963: END IF;
3964: -----------------------------------------
3957: '_PVT',
3958: x_return_status);
3959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3962: RAISE OKL_API.G_EXCEPTION_ERROR;
3963: END IF;
3964: -----------------------------------------
3965: -- Move VIEW record to "Child" records --
3958: x_return_status);
3959: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3960: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3961: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3962: RAISE OKL_API.G_EXCEPTION_ERROR;
3963: END IF;
3964: -----------------------------------------
3965: -- Move VIEW record to "Child" records --
3966: -----------------------------------------
3974: x_msg_count,
3975: x_msg_data,
3976: l_txs_rec
3977: );
3978: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3979: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3980: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3981: RAISE OKL_API.G_EXCEPTION_ERROR;
3982: END IF;
3975: x_msg_data,
3976: l_txs_rec
3977: );
3978: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3979: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3980: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3981: RAISE OKL_API.G_EXCEPTION_ERROR;
3982: END IF;
3983: x_return_status := l_return_status;
3976: l_txs_rec
3977: );
3978: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3979: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3980: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3981: RAISE OKL_API.G_EXCEPTION_ERROR;
3982: END IF;
3983: x_return_status := l_return_status;
3984: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3977: );
3978: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
3979: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
3980: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3981: RAISE OKL_API.G_EXCEPTION_ERROR;
3982: END IF;
3983: x_return_status := l_return_status;
3984: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3985: EXCEPTION
3980: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
3981: RAISE OKL_API.G_EXCEPTION_ERROR;
3982: END IF;
3983: x_return_status := l_return_status;
3984: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3985: EXCEPTION
3986: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3987: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3988: (
3982: END IF;
3983: x_return_status := l_return_status;
3984: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3985: EXCEPTION
3986: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3987: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3988: (
3989: l_api_name,
3990: G_PKG_NAME,
3983: x_return_status := l_return_status;
3984: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
3985: EXCEPTION
3986: WHEN OKL_API.G_EXCEPTION_ERROR THEN
3987: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3988: (
3989: l_api_name,
3990: G_PKG_NAME,
3991: 'OKL_API.G_RET_STS_ERROR',
3987: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3988: (
3989: l_api_name,
3990: G_PKG_NAME,
3991: 'OKL_API.G_RET_STS_ERROR',
3992: x_msg_count,
3993: x_msg_data,
3994: '_PVT'
3995: );
3992: x_msg_count,
3993: x_msg_data,
3994: '_PVT'
3995: );
3996: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3997: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3998: (
3999: l_api_name,
4000: G_PKG_NAME,
3993: x_msg_data,
3994: '_PVT'
3995: );
3996: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
3997: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3998: (
3999: l_api_name,
4000: G_PKG_NAME,
4001: 'OKL_API.G_RET_STS_UNEXP_ERROR',
3997: x_return_status := OKL_API.HANDLE_EXCEPTIONS
3998: (
3999: l_api_name,
4000: G_PKG_NAME,
4001: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4002: x_msg_count,
4003: x_msg_data,
4004: '_PVT'
4005: );
4003: x_msg_data,
4004: '_PVT'
4005: );
4006: WHEN OTHERS THEN
4007: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4008: (
4009: l_api_name,
4010: G_PKG_NAME,
4011: 'OTHERS',
4023: x_return_status OUT NOCOPY VARCHAR2,
4024: x_msg_count OUT NOCOPY NUMBER,
4025: x_msg_data OUT NOCOPY VARCHAR2,
4026: p_txsv_tbl IN txsv_tbl_type,
4027: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
4028:
4029: l_api_version CONSTANT NUMBER := 1;
4030: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
4031: i NUMBER := 0;
4029: l_api_version CONSTANT NUMBER := 1;
4030: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_lock_row';
4031: i NUMBER := 0;
4032: BEGIN
4033: OKL_API.init_msg_list(p_init_msg_list);
4034: -- Make sure PL/SQL table has recrods in it before passing
4035: IF (p_txsv_tbl.COUNT > 0) THEN
4036: i := p_txsv_tbl.FIRST;
4037: LOOP
4035: IF (p_txsv_tbl.COUNT > 0) THEN
4036: i := p_txsv_tbl.FIRST;
4037: LOOP
4038: DECLARE
4039: l_error_rec OKL_API.ERROR_REC_TYPE;
4040: BEGIN
4041: l_error_rec.api_name := l_api_name;
4042: l_error_rec.api_package := G_PKG_NAME;
4043: l_error_rec.idx := i;
4042: l_error_rec.api_package := G_PKG_NAME;
4043: l_error_rec.idx := i;
4044: lock_row(
4045: p_api_version => p_api_version,
4046: p_init_msg_list => OKL_API.G_FALSE,
4047: x_return_status => l_error_rec.error_type,
4048: x_msg_count => l_error_rec.msg_count,
4049: x_msg_data => l_error_rec.msg_data,
4050: p_txsv_rec => p_txsv_tbl(i));
4047: x_return_status => l_error_rec.error_type,
4048: x_msg_count => l_error_rec.msg_count,
4049: x_msg_data => l_error_rec.msg_data,
4050: p_txsv_rec => p_txsv_tbl(i));
4051: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
4052: l_error_rec.sqlcode := SQLCODE;
4053: load_error_tbl(l_error_rec, px_error_tbl);
4054: ELSE
4055: x_msg_count := l_error_rec.msg_count;
4055: x_msg_count := l_error_rec.msg_count;
4056: x_msg_data := l_error_rec.msg_data;
4057: END IF;
4058: EXCEPTION
4059: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4060: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
4061: l_error_rec.sqlcode := SQLCODE;
4062: load_error_tbl(l_error_rec, px_error_tbl);
4063: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4056: x_msg_data := l_error_rec.msg_data;
4057: END IF;
4058: EXCEPTION
4059: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4060: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
4061: l_error_rec.sqlcode := SQLCODE;
4062: load_error_tbl(l_error_rec, px_error_tbl);
4063: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4064: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
4059: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4060: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
4061: l_error_rec.sqlcode := SQLCODE;
4062: load_error_tbl(l_error_rec, px_error_tbl);
4063: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4064: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
4065: l_error_rec.sqlcode := SQLCODE;
4066: load_error_tbl(l_error_rec, px_error_tbl);
4067: WHEN OTHERS THEN
4060: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
4061: l_error_rec.sqlcode := SQLCODE;
4062: load_error_tbl(l_error_rec, px_error_tbl);
4063: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4064: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
4065: l_error_rec.sqlcode := SQLCODE;
4066: load_error_tbl(l_error_rec, px_error_tbl);
4067: WHEN OTHERS THEN
4068: l_error_rec.error_type := 'OTHERS';
4075: END IF;
4076: -- Loop through the error_tbl to find the error with the highest severity
4077: -- and return it.
4078: x_return_status := find_highest_exception(px_error_tbl);
4079: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4080: EXCEPTION
4081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4082: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4083: (
4077: -- and return it.
4078: x_return_status := find_highest_exception(px_error_tbl);
4079: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4080: EXCEPTION
4081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4082: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4083: (
4084: l_api_name,
4085: G_PKG_NAME,
4078: x_return_status := find_highest_exception(px_error_tbl);
4079: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4080: EXCEPTION
4081: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4082: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4083: (
4084: l_api_name,
4085: G_PKG_NAME,
4086: 'OKL_API.G_RET_STS_ERROR',
4082: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4083: (
4084: l_api_name,
4085: G_PKG_NAME,
4086: 'OKL_API.G_RET_STS_ERROR',
4087: x_msg_count,
4088: x_msg_data,
4089: '_PVT'
4090: );
4087: x_msg_count,
4088: x_msg_data,
4089: '_PVT'
4090: );
4091: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4092: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4093: (
4094: l_api_name,
4095: G_PKG_NAME,
4088: x_msg_data,
4089: '_PVT'
4090: );
4091: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4092: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4093: (
4094: l_api_name,
4095: G_PKG_NAME,
4096: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4092: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4093: (
4094: l_api_name,
4095: G_PKG_NAME,
4096: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4097: x_msg_count,
4098: x_msg_data,
4099: '_PVT'
4100: );
4098: x_msg_data,
4099: '_PVT'
4100: );
4101: WHEN OTHERS THEN
4102: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4103: (
4104: l_api_name,
4105: G_PKG_NAME,
4106: 'OTHERS',
4121: p_txsv_tbl IN txsv_tbl_type) IS
4122:
4123: l_api_version CONSTANT NUMBER := 1;
4124: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
4125: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4126: l_error_tbl OKL_API.ERROR_TBL_TYPE;
4127: BEGIN
4128: OKL_API.init_msg_list(p_init_msg_list);
4129: -- Make sure PL/SQL table has recrods in it before passing
4122:
4123: l_api_version CONSTANT NUMBER := 1;
4124: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
4125: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4126: l_error_tbl OKL_API.ERROR_TBL_TYPE;
4127: BEGIN
4128: OKL_API.init_msg_list(p_init_msg_list);
4129: -- Make sure PL/SQL table has recrods in it before passing
4130: IF (p_txsv_tbl.COUNT > 0) THEN
4124: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_lock_row';
4125: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4126: l_error_tbl OKL_API.ERROR_TBL_TYPE;
4127: BEGIN
4128: OKL_API.init_msg_list(p_init_msg_list);
4129: -- Make sure PL/SQL table has recrods in it before passing
4130: IF (p_txsv_tbl.COUNT > 0) THEN
4131: lock_row(
4132: p_api_version => p_api_version,
4129: -- Make sure PL/SQL table has recrods in it before passing
4130: IF (p_txsv_tbl.COUNT > 0) THEN
4131: lock_row(
4132: p_api_version => p_api_version,
4133: p_init_msg_list => OKL_API.G_FALSE,
4134: x_return_status => x_return_status,
4135: x_msg_count => x_msg_count,
4136: x_msg_data => x_msg_data,
4137: p_txsv_tbl => p_txsv_tbl,
4136: x_msg_data => x_msg_data,
4137: p_txsv_tbl => p_txsv_tbl,
4138: px_error_tbl => l_error_tbl);
4139: END IF;
4140: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4141: EXCEPTION
4142: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4143: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4144: (
4138: px_error_tbl => l_error_tbl);
4139: END IF;
4140: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4141: EXCEPTION
4142: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4143: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4144: (
4145: l_api_name,
4146: G_PKG_NAME,
4139: END IF;
4140: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4141: EXCEPTION
4142: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4143: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4144: (
4145: l_api_name,
4146: G_PKG_NAME,
4147: 'OKL_API.G_RET_STS_ERROR',
4143: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4144: (
4145: l_api_name,
4146: G_PKG_NAME,
4147: 'OKL_API.G_RET_STS_ERROR',
4148: x_msg_count,
4149: x_msg_data,
4150: '_PVT'
4151: );
4148: x_msg_count,
4149: x_msg_data,
4150: '_PVT'
4151: );
4152: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4153: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4154: (
4155: l_api_name,
4156: G_PKG_NAME,
4149: x_msg_data,
4150: '_PVT'
4151: );
4152: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4153: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4154: (
4155: l_api_name,
4156: G_PKG_NAME,
4157: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4153: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4154: (
4155: l_api_name,
4156: G_PKG_NAME,
4157: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4158: x_msg_count,
4159: x_msg_data,
4160: '_PVT'
4161: );
4159: x_msg_data,
4160: '_PVT'
4161: );
4162: WHEN OTHERS THEN
4163: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4164: (
4165: l_api_name,
4166: G_PKG_NAME,
4167: 'OTHERS',
4185: x_txs_rec OUT NOCOPY txs_rec_type) IS
4186:
4187: l_api_version CONSTANT NUMBER := 1;
4188: l_api_name CONSTANT VARCHAR2(30) := 'B_update_row';
4189: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4190: l_txs_rec txs_rec_type := p_txs_rec;
4191: l_def_txs_rec txs_rec_type;
4192: l_row_notfound BOOLEAN := TRUE;
4193: ----------------------------------
4198: x_txs_rec OUT NOCOPY txs_rec_type
4199: ) RETURN VARCHAR2 IS
4200: l_txs_rec txs_rec_type;
4201: l_row_notfound BOOLEAN := TRUE;
4202: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4203: BEGIN
4204: x_txs_rec := p_txs_rec;
4205: -- Get current database values
4206: l_txs_rec := get_rec(p_txs_rec, l_return_status);
4203: BEGIN
4204: x_txs_rec := p_txs_rec;
4205: -- Get current database values
4206: l_txs_rec := get_rec(p_txs_rec, l_return_status);
4207: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
4208: IF (x_txs_rec.id = OKL_API.G_MISS_NUM)
4209: THEN
4210: x_txs_rec.id := l_txs_rec.id;
4211: END IF;
4204: x_txs_rec := p_txs_rec;
4205: -- Get current database values
4206: l_txs_rec := get_rec(p_txs_rec, l_return_status);
4207: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
4208: IF (x_txs_rec.id = OKL_API.G_MISS_NUM)
4209: THEN
4210: x_txs_rec.id := l_txs_rec.id;
4211: END IF;
4212: IF (x_txs_rec.khr_id = OKL_API.G_MISS_NUM)
4208: IF (x_txs_rec.id = OKL_API.G_MISS_NUM)
4209: THEN
4210: x_txs_rec.id := l_txs_rec.id;
4211: END IF;
4212: IF (x_txs_rec.khr_id = OKL_API.G_MISS_NUM)
4213: THEN
4214: x_txs_rec.khr_id := l_txs_rec.khr_id;
4215: END IF;
4216: IF (x_txs_rec.kle_id = OKL_API.G_MISS_NUM)
4212: IF (x_txs_rec.khr_id = OKL_API.G_MISS_NUM)
4213: THEN
4214: x_txs_rec.khr_id := l_txs_rec.khr_id;
4215: END IF;
4216: IF (x_txs_rec.kle_id = OKL_API.G_MISS_NUM)
4217: THEN
4218: x_txs_rec.kle_id := l_txs_rec.kle_id;
4219: END IF;
4220: IF (x_txs_rec.line_name = OKL_API.G_MISS_CHAR)
4216: IF (x_txs_rec.kle_id = OKL_API.G_MISS_NUM)
4217: THEN
4218: x_txs_rec.kle_id := l_txs_rec.kle_id;
4219: END IF;
4220: IF (x_txs_rec.line_name = OKL_API.G_MISS_CHAR)
4221: THEN
4222: x_txs_rec.line_name := l_txs_rec.line_name;
4223: END IF;
4224: IF (x_txs_rec.trx_id = OKL_API.G_MISS_NUM)
4220: IF (x_txs_rec.line_name = OKL_API.G_MISS_CHAR)
4221: THEN
4222: x_txs_rec.line_name := l_txs_rec.line_name;
4223: END IF;
4224: IF (x_txs_rec.trx_id = OKL_API.G_MISS_NUM)
4225: THEN
4226: x_txs_rec.trx_id := l_txs_rec.trx_id;
4227: END IF;
4228: IF (x_txs_rec.trx_line_id = OKL_API.G_MISS_NUM)
4224: IF (x_txs_rec.trx_id = OKL_API.G_MISS_NUM)
4225: THEN
4226: x_txs_rec.trx_id := l_txs_rec.trx_id;
4227: END IF;
4228: IF (x_txs_rec.trx_line_id = OKL_API.G_MISS_NUM)
4229: THEN
4230: x_txs_rec.trx_line_id := l_txs_rec.trx_line_id;
4231: END IF;
4232: IF (x_txs_rec.entity_code = OKL_API.G_MISS_CHAR)
4228: IF (x_txs_rec.trx_line_id = OKL_API.G_MISS_NUM)
4229: THEN
4230: x_txs_rec.trx_line_id := l_txs_rec.trx_line_id;
4231: END IF;
4232: IF (x_txs_rec.entity_code = OKL_API.G_MISS_CHAR)
4233: THEN
4234: x_txs_rec.entity_code := l_txs_rec.entity_code;
4235: END IF;
4236: IF (x_txs_rec.event_class_code = OKL_API.G_MISS_CHAR)
4232: IF (x_txs_rec.entity_code = OKL_API.G_MISS_CHAR)
4233: THEN
4234: x_txs_rec.entity_code := l_txs_rec.entity_code;
4235: END IF;
4236: IF (x_txs_rec.event_class_code = OKL_API.G_MISS_CHAR)
4237: THEN
4238: x_txs_rec.event_class_code := l_txs_rec.event_class_code;
4239: END IF;
4240: IF (x_txs_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4236: IF (x_txs_rec.event_class_code = OKL_API.G_MISS_CHAR)
4237: THEN
4238: x_txs_rec.event_class_code := l_txs_rec.event_class_code;
4239: END IF;
4240: IF (x_txs_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4241: THEN
4242: x_txs_rec.trx_level_type := l_txs_rec.trx_level_type;
4243: END IF;
4244: /* IF (x_txs_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4240: IF (x_txs_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4241: THEN
4242: x_txs_rec.trx_level_type := l_txs_rec.trx_level_type;
4243: END IF;
4244: /* IF (x_txs_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4245: THEN
4246: x_txs_rec.trx_line_type := l_txs_rec.trx_line_type;
4247: END IF;*/
4248: IF (x_txs_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4244: /* IF (x_txs_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4245: THEN
4246: x_txs_rec.trx_line_type := l_txs_rec.trx_line_type;
4247: END IF;*/
4248: IF (x_txs_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4249: THEN
4250: x_txs_rec.adjusted_doc_entity_code := l_txs_rec.adjusted_doc_entity_code;
4251: END IF;
4252: IF (x_txs_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4248: IF (x_txs_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4249: THEN
4250: x_txs_rec.adjusted_doc_entity_code := l_txs_rec.adjusted_doc_entity_code;
4251: END IF;
4252: IF (x_txs_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4253: THEN
4254: x_txs_rec.adjusted_doc_event_class_code := l_txs_rec.adjusted_doc_event_class_code;
4255: END IF;
4256: IF (x_txs_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4252: IF (x_txs_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4253: THEN
4254: x_txs_rec.adjusted_doc_event_class_code := l_txs_rec.adjusted_doc_event_class_code;
4255: END IF;
4256: IF (x_txs_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4257: THEN
4258: x_txs_rec.adjusted_doc_trx_id := l_txs_rec.adjusted_doc_trx_id;
4259: END IF;
4260: IF (x_txs_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4256: IF (x_txs_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4257: THEN
4258: x_txs_rec.adjusted_doc_trx_id := l_txs_rec.adjusted_doc_trx_id;
4259: END IF;
4260: IF (x_txs_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4261: THEN
4262: x_txs_rec.adjusted_doc_trx_line_id := l_txs_rec.adjusted_doc_trx_line_id;
4263: END IF;
4264: IF (x_txs_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4260: IF (x_txs_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4261: THEN
4262: x_txs_rec.adjusted_doc_trx_line_id := l_txs_rec.adjusted_doc_trx_line_id;
4263: END IF;
4264: IF (x_txs_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4265: THEN
4266: x_txs_rec.adjusted_doc_trx_level_type := l_txs_rec.adjusted_doc_trx_level_type;
4267: END IF;
4268: IF (x_txs_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4264: IF (x_txs_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4265: THEN
4266: x_txs_rec.adjusted_doc_trx_level_type := l_txs_rec.adjusted_doc_trx_level_type;
4267: END IF;
4268: IF (x_txs_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4269: THEN
4270: x_txs_rec.adjusted_doc_number := l_txs_rec.adjusted_doc_number;
4271: END IF;
4272: IF (x_txs_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4268: IF (x_txs_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4269: THEN
4270: x_txs_rec.adjusted_doc_number := l_txs_rec.adjusted_doc_number;
4271: END IF;
4272: IF (x_txs_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4273: THEN
4274: x_txs_rec.adjusted_doc_date := l_txs_rec.adjusted_doc_date;
4275: END IF;
4276: IF (x_txs_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4272: IF (x_txs_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4273: THEN
4274: x_txs_rec.adjusted_doc_date := l_txs_rec.adjusted_doc_date;
4275: END IF;
4276: IF (x_txs_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4277: THEN
4278: x_txs_rec.tax_call_type_code := l_txs_rec.tax_call_type_code;
4279: END IF;
4280: IF (x_txs_rec.sty_id = OKL_API.G_MISS_NUM)
4276: IF (x_txs_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4277: THEN
4278: x_txs_rec.tax_call_type_code := l_txs_rec.tax_call_type_code;
4279: END IF;
4280: IF (x_txs_rec.sty_id = OKL_API.G_MISS_NUM)
4281: THEN
4282: x_txs_rec.sty_id := l_txs_rec.sty_id;
4283: END IF;
4284: IF (x_txs_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4280: IF (x_txs_rec.sty_id = OKL_API.G_MISS_NUM)
4281: THEN
4282: x_txs_rec.sty_id := l_txs_rec.sty_id;
4283: END IF;
4284: IF (x_txs_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4285: THEN
4286: x_txs_rec.trx_business_category := l_txs_rec.trx_business_category;
4287: END IF;
4288: IF (x_txs_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4284: IF (x_txs_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4285: THEN
4286: x_txs_rec.trx_business_category := l_txs_rec.trx_business_category;
4287: END IF;
4288: IF (x_txs_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4289: THEN
4290: x_txs_rec.tax_line_status_code := l_txs_rec.tax_line_status_code;
4291: END IF;
4292: IF (x_txs_rec.sel_id = OKL_API.G_MISS_NUM)
4288: IF (x_txs_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4289: THEN
4290: x_txs_rec.tax_line_status_code := l_txs_rec.tax_line_status_code;
4291: END IF;
4292: IF (x_txs_rec.sel_id = OKL_API.G_MISS_NUM)
4293: THEN
4294: x_txs_rec.sel_id := l_txs_rec.sel_id;
4295: END IF;
4296: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR)
4292: IF (x_txs_rec.sel_id = OKL_API.G_MISS_NUM)
4293: THEN
4294: x_txs_rec.sel_id := l_txs_rec.sel_id;
4295: END IF;
4296: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR)
4297: THEN
4298: x_txs_rec.reported_yn := l_txs_rec.reported_yn;
4299: END IF;
4300: IF (x_txs_rec.program_id = OKL_API.G_MISS_NUM)
4296: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR)
4297: THEN
4298: x_txs_rec.reported_yn := l_txs_rec.reported_yn;
4299: END IF;
4300: IF (x_txs_rec.program_id = OKL_API.G_MISS_NUM)
4301: THEN
4302: x_txs_rec.program_id := l_txs_rec.program_id;
4303: END IF;
4304: IF (x_txs_rec.request_id = OKL_API.G_MISS_NUM)
4300: IF (x_txs_rec.program_id = OKL_API.G_MISS_NUM)
4301: THEN
4302: x_txs_rec.program_id := l_txs_rec.program_id;
4303: END IF;
4304: IF (x_txs_rec.request_id = OKL_API.G_MISS_NUM)
4305: THEN
4306: x_txs_rec.request_id := l_txs_rec.request_id;
4307: END IF;
4308: IF (x_txs_rec.program_application_id = OKL_API.G_MISS_NUM)
4304: IF (x_txs_rec.request_id = OKL_API.G_MISS_NUM)
4305: THEN
4306: x_txs_rec.request_id := l_txs_rec.request_id;
4307: END IF;
4308: IF (x_txs_rec.program_application_id = OKL_API.G_MISS_NUM)
4309: THEN
4310: x_txs_rec.program_application_id := l_txs_rec.program_application_id;
4311: END IF;
4312: IF (x_txs_rec.program_update_date = OKL_API.G_MISS_DATE)
4308: IF (x_txs_rec.program_application_id = OKL_API.G_MISS_NUM)
4309: THEN
4310: x_txs_rec.program_application_id := l_txs_rec.program_application_id;
4311: END IF;
4312: IF (x_txs_rec.program_update_date = OKL_API.G_MISS_DATE)
4313: THEN
4314: x_txs_rec.program_update_date := l_txs_rec.program_update_date;
4315: END IF;
4316: IF (x_txs_rec.attribute_category = OKL_API.G_MISS_CHAR)
4312: IF (x_txs_rec.program_update_date = OKL_API.G_MISS_DATE)
4313: THEN
4314: x_txs_rec.program_update_date := l_txs_rec.program_update_date;
4315: END IF;
4316: IF (x_txs_rec.attribute_category = OKL_API.G_MISS_CHAR)
4317: THEN
4318: x_txs_rec.attribute_category := l_txs_rec.attribute_category;
4319: END IF;
4320: IF (x_txs_rec.attribute1 = OKL_API.G_MISS_CHAR)
4316: IF (x_txs_rec.attribute_category = OKL_API.G_MISS_CHAR)
4317: THEN
4318: x_txs_rec.attribute_category := l_txs_rec.attribute_category;
4319: END IF;
4320: IF (x_txs_rec.attribute1 = OKL_API.G_MISS_CHAR)
4321: THEN
4322: x_txs_rec.attribute1 := l_txs_rec.attribute1;
4323: END IF;
4324: IF (x_txs_rec.attribute2 = OKL_API.G_MISS_CHAR)
4320: IF (x_txs_rec.attribute1 = OKL_API.G_MISS_CHAR)
4321: THEN
4322: x_txs_rec.attribute1 := l_txs_rec.attribute1;
4323: END IF;
4324: IF (x_txs_rec.attribute2 = OKL_API.G_MISS_CHAR)
4325: THEN
4326: x_txs_rec.attribute2 := l_txs_rec.attribute2;
4327: END IF;
4328: IF (x_txs_rec.attribute3 = OKL_API.G_MISS_CHAR)
4324: IF (x_txs_rec.attribute2 = OKL_API.G_MISS_CHAR)
4325: THEN
4326: x_txs_rec.attribute2 := l_txs_rec.attribute2;
4327: END IF;
4328: IF (x_txs_rec.attribute3 = OKL_API.G_MISS_CHAR)
4329: THEN
4330: x_txs_rec.attribute3 := l_txs_rec.attribute3;
4331: END IF;
4332: IF (x_txs_rec.attribute4 = OKL_API.G_MISS_CHAR)
4328: IF (x_txs_rec.attribute3 = OKL_API.G_MISS_CHAR)
4329: THEN
4330: x_txs_rec.attribute3 := l_txs_rec.attribute3;
4331: END IF;
4332: IF (x_txs_rec.attribute4 = OKL_API.G_MISS_CHAR)
4333: THEN
4334: x_txs_rec.attribute4 := l_txs_rec.attribute4;
4335: END IF;
4336: IF (x_txs_rec.attribute5 = OKL_API.G_MISS_CHAR)
4332: IF (x_txs_rec.attribute4 = OKL_API.G_MISS_CHAR)
4333: THEN
4334: x_txs_rec.attribute4 := l_txs_rec.attribute4;
4335: END IF;
4336: IF (x_txs_rec.attribute5 = OKL_API.G_MISS_CHAR)
4337: THEN
4338: x_txs_rec.attribute5 := l_txs_rec.attribute5;
4339: END IF;
4340: IF (x_txs_rec.attribute6 = OKL_API.G_MISS_CHAR)
4336: IF (x_txs_rec.attribute5 = OKL_API.G_MISS_CHAR)
4337: THEN
4338: x_txs_rec.attribute5 := l_txs_rec.attribute5;
4339: END IF;
4340: IF (x_txs_rec.attribute6 = OKL_API.G_MISS_CHAR)
4341: THEN
4342: x_txs_rec.attribute6 := l_txs_rec.attribute6;
4343: END IF;
4344: IF (x_txs_rec.attribute7 = OKL_API.G_MISS_CHAR)
4340: IF (x_txs_rec.attribute6 = OKL_API.G_MISS_CHAR)
4341: THEN
4342: x_txs_rec.attribute6 := l_txs_rec.attribute6;
4343: END IF;
4344: IF (x_txs_rec.attribute7 = OKL_API.G_MISS_CHAR)
4345: THEN
4346: x_txs_rec.attribute7 := l_txs_rec.attribute7;
4347: END IF;
4348: IF (x_txs_rec.attribute8 = OKL_API.G_MISS_CHAR)
4344: IF (x_txs_rec.attribute7 = OKL_API.G_MISS_CHAR)
4345: THEN
4346: x_txs_rec.attribute7 := l_txs_rec.attribute7;
4347: END IF;
4348: IF (x_txs_rec.attribute8 = OKL_API.G_MISS_CHAR)
4349: THEN
4350: x_txs_rec.attribute8 := l_txs_rec.attribute8;
4351: END IF;
4352: IF (x_txs_rec.attribute9 = OKL_API.G_MISS_CHAR)
4348: IF (x_txs_rec.attribute8 = OKL_API.G_MISS_CHAR)
4349: THEN
4350: x_txs_rec.attribute8 := l_txs_rec.attribute8;
4351: END IF;
4352: IF (x_txs_rec.attribute9 = OKL_API.G_MISS_CHAR)
4353: THEN
4354: x_txs_rec.attribute9 := l_txs_rec.attribute9;
4355: END IF;
4356: IF (x_txs_rec.attribute10 = OKL_API.G_MISS_CHAR)
4352: IF (x_txs_rec.attribute9 = OKL_API.G_MISS_CHAR)
4353: THEN
4354: x_txs_rec.attribute9 := l_txs_rec.attribute9;
4355: END IF;
4356: IF (x_txs_rec.attribute10 = OKL_API.G_MISS_CHAR)
4357: THEN
4358: x_txs_rec.attribute10 := l_txs_rec.attribute10;
4359: END IF;
4360: IF (x_txs_rec.attribute11 = OKL_API.G_MISS_CHAR)
4356: IF (x_txs_rec.attribute10 = OKL_API.G_MISS_CHAR)
4357: THEN
4358: x_txs_rec.attribute10 := l_txs_rec.attribute10;
4359: END IF;
4360: IF (x_txs_rec.attribute11 = OKL_API.G_MISS_CHAR)
4361: THEN
4362: x_txs_rec.attribute11 := l_txs_rec.attribute11;
4363: END IF;
4364: IF (x_txs_rec.attribute12 = OKL_API.G_MISS_CHAR)
4360: IF (x_txs_rec.attribute11 = OKL_API.G_MISS_CHAR)
4361: THEN
4362: x_txs_rec.attribute11 := l_txs_rec.attribute11;
4363: END IF;
4364: IF (x_txs_rec.attribute12 = OKL_API.G_MISS_CHAR)
4365: THEN
4366: x_txs_rec.attribute12 := l_txs_rec.attribute12;
4367: END IF;
4368: IF (x_txs_rec.attribute13 = OKL_API.G_MISS_CHAR)
4364: IF (x_txs_rec.attribute12 = OKL_API.G_MISS_CHAR)
4365: THEN
4366: x_txs_rec.attribute12 := l_txs_rec.attribute12;
4367: END IF;
4368: IF (x_txs_rec.attribute13 = OKL_API.G_MISS_CHAR)
4369: THEN
4370: x_txs_rec.attribute13 := l_txs_rec.attribute13;
4371: END IF;
4372: IF (x_txs_rec.attribute14 = OKL_API.G_MISS_CHAR)
4368: IF (x_txs_rec.attribute13 = OKL_API.G_MISS_CHAR)
4369: THEN
4370: x_txs_rec.attribute13 := l_txs_rec.attribute13;
4371: END IF;
4372: IF (x_txs_rec.attribute14 = OKL_API.G_MISS_CHAR)
4373: THEN
4374: x_txs_rec.attribute14 := l_txs_rec.attribute14;
4375: END IF;
4376: IF (x_txs_rec.attribute15 = OKL_API.G_MISS_CHAR)
4372: IF (x_txs_rec.attribute14 = OKL_API.G_MISS_CHAR)
4373: THEN
4374: x_txs_rec.attribute14 := l_txs_rec.attribute14;
4375: END IF;
4376: IF (x_txs_rec.attribute15 = OKL_API.G_MISS_CHAR)
4377: THEN
4378: x_txs_rec.attribute15 := l_txs_rec.attribute15;
4379: END IF;
4380: IF (x_txs_rec.created_by = OKL_API.G_MISS_NUM)
4376: IF (x_txs_rec.attribute15 = OKL_API.G_MISS_CHAR)
4377: THEN
4378: x_txs_rec.attribute15 := l_txs_rec.attribute15;
4379: END IF;
4380: IF (x_txs_rec.created_by = OKL_API.G_MISS_NUM)
4381: THEN
4382: x_txs_rec.created_by := l_txs_rec.created_by;
4383: END IF;
4384: IF (x_txs_rec.creation_date = OKL_API.G_MISS_DATE)
4380: IF (x_txs_rec.created_by = OKL_API.G_MISS_NUM)
4381: THEN
4382: x_txs_rec.created_by := l_txs_rec.created_by;
4383: END IF;
4384: IF (x_txs_rec.creation_date = OKL_API.G_MISS_DATE)
4385: THEN
4386: x_txs_rec.creation_date := l_txs_rec.creation_date;
4387: END IF;
4388: IF (x_txs_rec.last_updated_by = OKL_API.G_MISS_NUM)
4384: IF (x_txs_rec.creation_date = OKL_API.G_MISS_DATE)
4385: THEN
4386: x_txs_rec.creation_date := l_txs_rec.creation_date;
4387: END IF;
4388: IF (x_txs_rec.last_updated_by = OKL_API.G_MISS_NUM)
4389: THEN
4390: x_txs_rec.last_updated_by := l_txs_rec.last_updated_by;
4391: END IF;
4392: IF (x_txs_rec.last_update_date = OKL_API.G_MISS_DATE)
4388: IF (x_txs_rec.last_updated_by = OKL_API.G_MISS_NUM)
4389: THEN
4390: x_txs_rec.last_updated_by := l_txs_rec.last_updated_by;
4391: END IF;
4392: IF (x_txs_rec.last_update_date = OKL_API.G_MISS_DATE)
4393: THEN
4394: x_txs_rec.last_update_date := l_txs_rec.last_update_date;
4395: END IF;
4396: IF (x_txs_rec.last_update_login = OKL_API.G_MISS_NUM)
4392: IF (x_txs_rec.last_update_date = OKL_API.G_MISS_DATE)
4393: THEN
4394: x_txs_rec.last_update_date := l_txs_rec.last_update_date;
4395: END IF;
4396: IF (x_txs_rec.last_update_login = OKL_API.G_MISS_NUM)
4397: THEN
4398: x_txs_rec.last_update_login := l_txs_rec.last_update_login;
4399: END IF;
4400: IF (x_txs_rec.object_version_number = OKL_API.G_MISS_NUM)
4396: IF (x_txs_rec.last_update_login = OKL_API.G_MISS_NUM)
4397: THEN
4398: x_txs_rec.last_update_login := l_txs_rec.last_update_login;
4399: END IF;
4400: IF (x_txs_rec.object_version_number = OKL_API.G_MISS_NUM)
4401: THEN
4402: x_txs_rec.object_version_number := l_txs_rec.object_version_number;
4403: END IF;
4404:
4402: x_txs_rec.object_version_number := l_txs_rec.object_version_number;
4403: END IF;
4404:
4405: -- Modified by dcshanmu for eBTax - modification starts
4406: IF (x_txs_rec.application_id = OKL_API.G_MISS_NUM ) THEN
4407: x_txs_rec.application_id := l_txs_rec.application_id;
4408: END IF;
4409: IF (x_txs_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
4410: x_txs_rec.default_taxation_country := l_txs_rec.default_taxation_country;
4405: -- Modified by dcshanmu for eBTax - modification starts
4406: IF (x_txs_rec.application_id = OKL_API.G_MISS_NUM ) THEN
4407: x_txs_rec.application_id := l_txs_rec.application_id;
4408: END IF;
4409: IF (x_txs_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
4410: x_txs_rec.default_taxation_country := l_txs_rec.default_taxation_country;
4411: END IF;
4412: IF (x_txs_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4413: x_txs_rec.product_category := l_txs_rec.product_category;
4408: END IF;
4409: IF (x_txs_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
4410: x_txs_rec.default_taxation_country := l_txs_rec.default_taxation_country;
4411: END IF;
4412: IF (x_txs_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4413: x_txs_rec.product_category := l_txs_rec.product_category;
4414: END IF;
4415: IF (x_txs_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4416: x_txs_rec.user_defined_fisc_class := l_txs_rec.user_defined_fisc_class;
4411: END IF;
4412: IF (x_txs_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4413: x_txs_rec.product_category := l_txs_rec.product_category;
4414: END IF;
4415: IF (x_txs_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4416: x_txs_rec.user_defined_fisc_class := l_txs_rec.user_defined_fisc_class;
4417: END IF;
4418: IF (x_txs_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4419: x_txs_rec.line_intended_use := l_txs_rec.line_intended_use;
4414: END IF;
4415: IF (x_txs_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4416: x_txs_rec.user_defined_fisc_class := l_txs_rec.user_defined_fisc_class;
4417: END IF;
4418: IF (x_txs_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4419: x_txs_rec.line_intended_use := l_txs_rec.line_intended_use;
4420: END IF;
4421: IF (x_txs_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4422: x_txs_rec.inventory_item_id := l_txs_rec.inventory_item_id;
4417: END IF;
4418: IF (x_txs_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4419: x_txs_rec.line_intended_use := l_txs_rec.line_intended_use;
4420: END IF;
4421: IF (x_txs_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4422: x_txs_rec.inventory_item_id := l_txs_rec.inventory_item_id;
4423: END IF;
4424: IF (x_txs_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4425: x_txs_rec.bill_to_cust_acct_id := l_txs_rec.bill_to_cust_acct_id;
4420: END IF;
4421: IF (x_txs_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4422: x_txs_rec.inventory_item_id := l_txs_rec.inventory_item_id;
4423: END IF;
4424: IF (x_txs_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4425: x_txs_rec.bill_to_cust_acct_id := l_txs_rec.bill_to_cust_acct_id;
4426: END IF;
4427: IF (x_txs_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4428: x_txs_rec.org_id := l_txs_rec.org_id;
4423: END IF;
4424: IF (x_txs_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4425: x_txs_rec.bill_to_cust_acct_id := l_txs_rec.bill_to_cust_acct_id;
4426: END IF;
4427: IF (x_txs_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4428: x_txs_rec.org_id := l_txs_rec.org_id;
4429: END IF;
4430: IF (x_txs_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4431: x_txs_rec.legal_entity_id := l_txs_rec.legal_entity_id;
4426: END IF;
4427: IF (x_txs_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4428: x_txs_rec.org_id := l_txs_rec.org_id;
4429: END IF;
4430: IF (x_txs_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4431: x_txs_rec.legal_entity_id := l_txs_rec.legal_entity_id;
4432: END IF;
4433: IF (x_txs_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4434: x_txs_rec.line_amt := l_txs_rec.line_amt;
4429: END IF;
4430: IF (x_txs_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4431: x_txs_rec.legal_entity_id := l_txs_rec.legal_entity_id;
4432: END IF;
4433: IF (x_txs_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4434: x_txs_rec.line_amt := l_txs_rec.line_amt;
4435: END IF;
4436: IF (x_txs_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4437: x_txs_rec.assessable_value := l_txs_rec.assessable_value;
4432: END IF;
4433: IF (x_txs_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4434: x_txs_rec.line_amt := l_txs_rec.line_amt;
4435: END IF;
4436: IF (x_txs_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4437: x_txs_rec.assessable_value := l_txs_rec.assessable_value;
4438: END IF;
4439: IF (x_txs_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4440: x_txs_rec.total_tax := l_txs_rec.total_tax;
4435: END IF;
4436: IF (x_txs_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4437: x_txs_rec.assessable_value := l_txs_rec.assessable_value;
4438: END IF;
4439: IF (x_txs_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4440: x_txs_rec.total_tax := l_txs_rec.total_tax;
4441: END IF;
4442: IF (x_txs_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4443: x_txs_rec.product_type := l_txs_rec.product_type;
4438: END IF;
4439: IF (x_txs_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4440: x_txs_rec.total_tax := l_txs_rec.total_tax;
4441: END IF;
4442: IF (x_txs_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4443: x_txs_rec.product_type := l_txs_rec.product_type;
4444: END IF;
4445: IF (x_txs_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4446: x_txs_rec.product_fisc_classification := l_txs_rec.product_fisc_classification;
4441: END IF;
4442: IF (x_txs_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4443: x_txs_rec.product_type := l_txs_rec.product_type;
4444: END IF;
4445: IF (x_txs_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4446: x_txs_rec.product_fisc_classification := l_txs_rec.product_fisc_classification;
4447: END IF;
4448: IF (x_txs_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4449: x_txs_rec.trx_date := l_txs_rec.trx_date;
4444: END IF;
4445: IF (x_txs_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4446: x_txs_rec.product_fisc_classification := l_txs_rec.product_fisc_classification;
4447: END IF;
4448: IF (x_txs_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4449: x_txs_rec.trx_date := l_txs_rec.trx_date;
4450: END IF;
4451: IF (x_txs_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4452: x_txs_rec.provnl_tax_determination_date := l_txs_rec.provnl_tax_determination_date;
4447: END IF;
4448: IF (x_txs_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4449: x_txs_rec.trx_date := l_txs_rec.trx_date;
4450: END IF;
4451: IF (x_txs_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4452: x_txs_rec.provnl_tax_determination_date := l_txs_rec.provnl_tax_determination_date;
4453: END IF;
4454: IF (x_txs_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4455: x_txs_rec.try_id := l_txs_rec.try_id;
4450: END IF;
4451: IF (x_txs_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4452: x_txs_rec.provnl_tax_determination_date := l_txs_rec.provnl_tax_determination_date;
4453: END IF;
4454: IF (x_txs_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4455: x_txs_rec.try_id := l_txs_rec.try_id;
4456: END IF;
4457: IF (x_txs_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
4458: x_txs_rec.ship_to_location_id := l_txs_rec.ship_to_location_id;
4453: END IF;
4454: IF (x_txs_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4455: x_txs_rec.try_id := l_txs_rec.try_id;
4456: END IF;
4457: IF (x_txs_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
4458: x_txs_rec.ship_to_location_id := l_txs_rec.ship_to_location_id;
4459: END IF;
4460:
4461: IF (x_txs_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
4457: IF (x_txs_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
4458: x_txs_rec.ship_to_location_id := l_txs_rec.ship_to_location_id;
4459: END IF;
4460:
4461: IF (x_txs_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
4462: x_txs_rec.trx_currency_code := l_txs_rec.trx_currency_code;
4463: END IF;
4464: IF (x_txs_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4465: x_txs_rec.currency_conversion_type := l_txs_rec.currency_conversion_type;
4460:
4461: IF (x_txs_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
4462: x_txs_rec.trx_currency_code := l_txs_rec.trx_currency_code;
4463: END IF;
4464: IF (x_txs_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4465: x_txs_rec.currency_conversion_type := l_txs_rec.currency_conversion_type;
4466: END IF;
4467: IF (x_txs_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
4468: x_txs_rec.currency_conversion_rate := l_txs_rec.currency_conversion_rate;
4463: END IF;
4464: IF (x_txs_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4465: x_txs_rec.currency_conversion_type := l_txs_rec.currency_conversion_type;
4466: END IF;
4467: IF (x_txs_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
4468: x_txs_rec.currency_conversion_rate := l_txs_rec.currency_conversion_rate;
4469: END IF;
4470: IF (x_txs_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
4471: x_txs_rec.currency_conversion_date := l_txs_rec.currency_conversion_date;
4466: END IF;
4467: IF (x_txs_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
4468: x_txs_rec.currency_conversion_rate := l_txs_rec.currency_conversion_rate;
4469: END IF;
4470: IF (x_txs_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
4471: x_txs_rec.currency_conversion_date := l_txs_rec.currency_conversion_date;
4472: END IF;
4473: -- Modified by dcshanmu for eBTax - modification end
4474: --asawanka ebtax changes start
4471: x_txs_rec.currency_conversion_date := l_txs_rec.currency_conversion_date;
4472: END IF;
4473: -- Modified by dcshanmu for eBTax - modification end
4474: --asawanka ebtax changes start
4475: IF (x_txs_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
4476: x_txs_rec.asset_number := l_txs_rec.asset_number;
4477: END IF;
4478: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
4479: x_txs_rec.reported_yn := l_txs_rec.reported_yn;
4474: --asawanka ebtax changes start
4475: IF (x_txs_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
4476: x_txs_rec.asset_number := l_txs_rec.asset_number;
4477: END IF;
4478: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
4479: x_txs_rec.reported_yn := l_txs_rec.reported_yn;
4480: END IF;
4481: IF (x_txs_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4482: x_txs_rec.SHIP_TO_PARTY_SITE_ID := l_txs_rec.SHIP_TO_PARTY_SITE_ID;
4477: END IF;
4478: IF (x_txs_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
4479: x_txs_rec.reported_yn := l_txs_rec.reported_yn;
4480: END IF;
4481: IF (x_txs_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4482: x_txs_rec.SHIP_TO_PARTY_SITE_ID := l_txs_rec.SHIP_TO_PARTY_SITE_ID;
4483: END IF;
4484: IF (x_txs_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4485: x_txs_rec.SHIP_TO_PARTY_ID := l_txs_rec.SHIP_TO_PARTY_ID;
4480: END IF;
4481: IF (x_txs_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4482: x_txs_rec.SHIP_TO_PARTY_SITE_ID := l_txs_rec.SHIP_TO_PARTY_SITE_ID;
4483: END IF;
4484: IF (x_txs_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4485: x_txs_rec.SHIP_TO_PARTY_ID := l_txs_rec.SHIP_TO_PARTY_ID;
4486: END IF;
4487: IF (x_txs_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4488: x_txs_rec.BILL_TO_PARTY_SITE_ID := l_txs_rec.BILL_TO_PARTY_SITE_ID;
4483: END IF;
4484: IF (x_txs_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4485: x_txs_rec.SHIP_TO_PARTY_ID := l_txs_rec.SHIP_TO_PARTY_ID;
4486: END IF;
4487: IF (x_txs_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4488: x_txs_rec.BILL_TO_PARTY_SITE_ID := l_txs_rec.BILL_TO_PARTY_SITE_ID;
4489: END IF;
4490: IF (x_txs_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
4491: x_txs_rec.BILL_TO_LOCATION_ID := l_txs_rec.BILL_TO_LOCATION_ID;
4486: END IF;
4487: IF (x_txs_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
4488: x_txs_rec.BILL_TO_PARTY_SITE_ID := l_txs_rec.BILL_TO_PARTY_SITE_ID;
4489: END IF;
4490: IF (x_txs_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
4491: x_txs_rec.BILL_TO_LOCATION_ID := l_txs_rec.BILL_TO_LOCATION_ID;
4492: END IF;
4493: IF (x_txs_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4494: x_txs_rec.BILL_TO_PARTY_ID := l_txs_rec.BILL_TO_PARTY_ID;
4489: END IF;
4490: IF (x_txs_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
4491: x_txs_rec.BILL_TO_LOCATION_ID := l_txs_rec.BILL_TO_LOCATION_ID;
4492: END IF;
4493: IF (x_txs_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4494: x_txs_rec.BILL_TO_PARTY_ID := l_txs_rec.BILL_TO_PARTY_ID;
4495: END IF;
4496: IF (x_txs_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4497: x_txs_rec.ship_to_cust_acct_site_use_id := l_txs_rec.ship_to_cust_acct_site_use_id;
4492: END IF;
4493: IF (x_txs_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
4494: x_txs_rec.BILL_TO_PARTY_ID := l_txs_rec.BILL_TO_PARTY_ID;
4495: END IF;
4496: IF (x_txs_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4497: x_txs_rec.ship_to_cust_acct_site_use_id := l_txs_rec.ship_to_cust_acct_site_use_id;
4498: END IF;
4499: IF (x_txs_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4500: x_txs_rec.bill_to_cust_acct_site_use_id := l_txs_rec.bill_to_cust_acct_site_use_id;
4495: END IF;
4496: IF (x_txs_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4497: x_txs_rec.ship_to_cust_acct_site_use_id := l_txs_rec.ship_to_cust_acct_site_use_id;
4498: END IF;
4499: IF (x_txs_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4500: x_txs_rec.bill_to_cust_acct_site_use_id := l_txs_rec.bill_to_cust_acct_site_use_id;
4501: END IF;
4502: IF (x_txs_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
4503: x_txs_rec.TAX_CLASSIFICATION_CODE := l_txs_rec.TAX_CLASSIFICATION_CODE;
4498: END IF;
4499: IF (x_txs_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
4500: x_txs_rec.bill_to_cust_acct_site_use_id := l_txs_rec.bill_to_cust_acct_site_use_id;
4501: END IF;
4502: IF (x_txs_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
4503: x_txs_rec.TAX_CLASSIFICATION_CODE := l_txs_rec.TAX_CLASSIFICATION_CODE;
4504: END IF;
4505: --asawanka ebtax changes end
4506:
4503: x_txs_rec.TAX_CLASSIFICATION_CODE := l_txs_rec.TAX_CLASSIFICATION_CODE;
4504: END IF;
4505: --asawanka ebtax changes end
4506:
4507: IF (x_txs_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
4508: x_txs_rec.ALC_SERIALIZED_YN := l_txs_rec.ALC_SERIALIZED_YN;
4509: END IF;
4510: IF (x_txs_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
4511: x_txs_rec.ALC_SERIALIZED_TOTAL_TAX := l_txs_rec.ALC_SERIALIZED_TOTAL_TAX;
4506:
4507: IF (x_txs_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
4508: x_txs_rec.ALC_SERIALIZED_YN := l_txs_rec.ALC_SERIALIZED_YN;
4509: END IF;
4510: IF (x_txs_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
4511: x_txs_rec.ALC_SERIALIZED_TOTAL_TAX := l_txs_rec.ALC_SERIALIZED_TOTAL_TAX;
4512: END IF;
4513: IF (x_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
4514: x_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := l_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT;
4509: END IF;
4510: IF (x_txs_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
4511: x_txs_rec.ALC_SERIALIZED_TOTAL_TAX := l_txs_rec.ALC_SERIALIZED_TOTAL_TAX;
4512: END IF;
4513: IF (x_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
4514: x_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := l_txs_rec.ALC_SERIALIZED_TOTAL_LINE_AMT;
4515: END IF;
4516:
4517: END IF;
4523: FUNCTION Set_Attributes (
4524: p_txs_rec IN txs_rec_type,
4525: x_txs_rec OUT NOCOPY txs_rec_type
4526: ) RETURN VARCHAR2 IS
4527: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4528: BEGIN
4529: x_txs_rec := p_txs_rec;
4530: x_txs_rec.OBJECT_VERSION_NUMBER := p_txs_rec.OBJECT_VERSION_NUMBER + 1;
4531: RETURN(l_return_status);
4530: x_txs_rec.OBJECT_VERSION_NUMBER := p_txs_rec.OBJECT_VERSION_NUMBER + 1;
4531: RETURN(l_return_status);
4532: END Set_Attributes;
4533: BEGIN
4534: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
4535: p_init_msg_list,
4536: '_PVT',
4537: x_return_status);
4538: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4534: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
4535: p_init_msg_list,
4536: '_PVT',
4537: x_return_status);
4538: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4540: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4541: RAISE OKL_API.G_EXCEPTION_ERROR;
4542: END IF;
4535: p_init_msg_list,
4536: '_PVT',
4537: x_return_status);
4538: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4540: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4541: RAISE OKL_API.G_EXCEPTION_ERROR;
4542: END IF;
4543: --- Setting item attributes
4536: '_PVT',
4537: x_return_status);
4538: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4540: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4541: RAISE OKL_API.G_EXCEPTION_ERROR;
4542: END IF;
4543: --- Setting item attributes
4544: l_return_status := Set_Attributes(
4537: x_return_status);
4538: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4539: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4540: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4541: RAISE OKL_API.G_EXCEPTION_ERROR;
4542: END IF;
4543: --- Setting item attributes
4544: l_return_status := Set_Attributes(
4545: p_txs_rec, -- IN
4544: l_return_status := Set_Attributes(
4545: p_txs_rec, -- IN
4546: l_txs_rec); -- OUT
4547: --- If any errors happen abort API
4548: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4545: p_txs_rec, -- IN
4546: l_txs_rec); -- OUT
4547: --- If any errors happen abort API
4548: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4546: l_txs_rec); -- OUT
4547: --- If any errors happen abort API
4548: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4547: --- If any errors happen abort API
4548: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4549: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4555: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4550: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4555: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4556: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4557: RAISE OKL_API.G_EXCEPTION_ERROR;
4558: END IF;
4551: RAISE OKL_API.G_EXCEPTION_ERROR;
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4555: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4556: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4557: RAISE OKL_API.G_EXCEPTION_ERROR;
4558: END IF;
4559:
4552: END IF;
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4555: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4556: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4557: RAISE OKL_API.G_EXCEPTION_ERROR;
4558: END IF;
4559:
4560: UPDATE OKL_TAX_SOURCES
4553: l_return_status := populate_new_record(l_txs_rec, l_def_txs_rec);
4554: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
4555: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
4556: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
4557: RAISE OKL_API.G_EXCEPTION_ERROR;
4558: END IF;
4559:
4560: UPDATE OKL_TAX_SOURCES
4561: SET KHR_ID = l_def_txs_rec.khr_id,
4648: WHERE ID = l_def_txs_rec.id;
4649:
4650: x_txs_rec := l_txs_rec;
4651: x_return_status := l_return_status;
4652: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4653: EXCEPTION
4654: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4655: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4656: (
4650: x_txs_rec := l_txs_rec;
4651: x_return_status := l_return_status;
4652: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4653: EXCEPTION
4654: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4655: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4656: (
4657: l_api_name,
4658: G_PKG_NAME,
4651: x_return_status := l_return_status;
4652: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
4653: EXCEPTION
4654: WHEN OKL_API.G_EXCEPTION_ERROR THEN
4655: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4656: (
4657: l_api_name,
4658: G_PKG_NAME,
4659: 'OKL_API.G_RET_STS_ERROR',
4655: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4656: (
4657: l_api_name,
4658: G_PKG_NAME,
4659: 'OKL_API.G_RET_STS_ERROR',
4660: x_msg_count,
4661: x_msg_data,
4662: '_PVT'
4663: );
4660: x_msg_count,
4661: x_msg_data,
4662: '_PVT'
4663: );
4664: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4665: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4666: (
4667: l_api_name,
4668: G_PKG_NAME,
4661: x_msg_data,
4662: '_PVT'
4663: );
4664: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
4665: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4666: (
4667: l_api_name,
4668: G_PKG_NAME,
4669: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4665: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4666: (
4667: l_api_name,
4668: G_PKG_NAME,
4669: 'OKL_API.G_RET_STS_UNEXP_ERROR',
4670: x_msg_count,
4671: x_msg_data,
4672: '_PVT'
4673: );
4671: x_msg_data,
4672: '_PVT'
4673: );
4674: WHEN OTHERS THEN
4675: x_return_status := OKL_API.HANDLE_EXCEPTIONS
4676: (
4677: l_api_name,
4678: G_PKG_NAME,
4679: 'OTHERS',
4695: x_txsv_rec OUT NOCOPY txsv_rec_type) IS
4696:
4697: l_api_version CONSTANT NUMBER := 1;
4698: l_api_name CONSTANT VARCHAR2(30) := 'V_update_row';
4699: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4700: l_txsv_rec txsv_rec_type := p_txsv_rec;
4701: l_def_txsv_rec txsv_rec_type;
4702: l_db_txsv_rec txsv_rec_type;
4703: l_txs_rec txs_rec_type;
4722: p_txsv_rec IN txsv_rec_type,
4723: x_txsv_rec OUT NOCOPY txsv_rec_type
4724: ) RETURN VARCHAR2 IS
4725: l_row_notfound BOOLEAN := TRUE;
4726: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
4727: BEGIN
4728: x_txsv_rec := p_txsv_rec;
4729: -- Get current database values
4730: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
4729: -- Get current database values
4730: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
4731: -- so it may be verified through LOCK_ROW.
4732: l_db_txsv_rec := get_rec(p_txsv_rec, l_return_status);
4733: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
4734: IF (x_txsv_rec.id = OKL_API.G_MISS_NUM)
4735: THEN
4736: x_txsv_rec.id := l_db_txsv_rec.id;
4737: END IF;
4730: -- NOTE: Never assign the OBJECT_VERSION_NUMBER. Force the user to pass it
4731: -- so it may be verified through LOCK_ROW.
4732: l_db_txsv_rec := get_rec(p_txsv_rec, l_return_status);
4733: IF (l_return_status = OKL_API.G_RET_STS_SUCCESS) THEN
4734: IF (x_txsv_rec.id = OKL_API.G_MISS_NUM)
4735: THEN
4736: x_txsv_rec.id := l_db_txsv_rec.id;
4737: END IF;
4738:
4736: x_txsv_rec.id := l_db_txsv_rec.id;
4737: END IF;
4738:
4739: --SECHAWLA : Added code to set Object Version No. because of the locking issue
4740: IF (x_txsv_rec.object_version_number = OKL_API.G_MISS_NUM)
4741: THEN
4742: x_txsv_rec.object_version_number := l_db_txsv_rec.object_version_number;
4743: END IF;
4744:
4742: x_txsv_rec.object_version_number := l_db_txsv_rec.object_version_number;
4743: END IF;
4744:
4745:
4746: IF (x_txsv_rec.khr_id = OKL_API.G_MISS_NUM)
4747: THEN
4748: x_txsv_rec.khr_id := l_db_txsv_rec.khr_id;
4749: END IF;
4750: IF (x_txsv_rec.kle_id = OKL_API.G_MISS_NUM)
4746: IF (x_txsv_rec.khr_id = OKL_API.G_MISS_NUM)
4747: THEN
4748: x_txsv_rec.khr_id := l_db_txsv_rec.khr_id;
4749: END IF;
4750: IF (x_txsv_rec.kle_id = OKL_API.G_MISS_NUM)
4751: THEN
4752: x_txsv_rec.kle_id := l_db_txsv_rec.kle_id;
4753: END IF;
4754: IF (x_txsv_rec.line_name = OKL_API.G_MISS_CHAR)
4750: IF (x_txsv_rec.kle_id = OKL_API.G_MISS_NUM)
4751: THEN
4752: x_txsv_rec.kle_id := l_db_txsv_rec.kle_id;
4753: END IF;
4754: IF (x_txsv_rec.line_name = OKL_API.G_MISS_CHAR)
4755: THEN
4756: x_txsv_rec.line_name := l_db_txsv_rec.line_name;
4757: END IF;
4758: IF (x_txsv_rec.trx_id = OKL_API.G_MISS_NUM)
4754: IF (x_txsv_rec.line_name = OKL_API.G_MISS_CHAR)
4755: THEN
4756: x_txsv_rec.line_name := l_db_txsv_rec.line_name;
4757: END IF;
4758: IF (x_txsv_rec.trx_id = OKL_API.G_MISS_NUM)
4759: THEN
4760: x_txsv_rec.trx_id := l_db_txsv_rec.trx_id;
4761: END IF;
4762: IF (x_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM)
4758: IF (x_txsv_rec.trx_id = OKL_API.G_MISS_NUM)
4759: THEN
4760: x_txsv_rec.trx_id := l_db_txsv_rec.trx_id;
4761: END IF;
4762: IF (x_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM)
4763: THEN
4764: x_txsv_rec.trx_line_id := l_db_txsv_rec.trx_line_id;
4765: END IF;
4766: IF (x_txsv_rec.entity_code = OKL_API.G_MISS_CHAR)
4762: IF (x_txsv_rec.trx_line_id = OKL_API.G_MISS_NUM)
4763: THEN
4764: x_txsv_rec.trx_line_id := l_db_txsv_rec.trx_line_id;
4765: END IF;
4766: IF (x_txsv_rec.entity_code = OKL_API.G_MISS_CHAR)
4767: THEN
4768: x_txsv_rec.entity_code := l_db_txsv_rec.entity_code;
4769: END IF;
4770: IF (x_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR)
4766: IF (x_txsv_rec.entity_code = OKL_API.G_MISS_CHAR)
4767: THEN
4768: x_txsv_rec.entity_code := l_db_txsv_rec.entity_code;
4769: END IF;
4770: IF (x_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR)
4771: THEN
4772: x_txsv_rec.event_class_code := l_db_txsv_rec.event_class_code;
4773: END IF;
4774: IF (x_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4770: IF (x_txsv_rec.event_class_code = OKL_API.G_MISS_CHAR)
4771: THEN
4772: x_txsv_rec.event_class_code := l_db_txsv_rec.event_class_code;
4773: END IF;
4774: IF (x_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4775: THEN
4776: x_txsv_rec.trx_level_type := l_db_txsv_rec.trx_level_type;
4777: END IF;
4778: /* IF (x_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4774: IF (x_txsv_rec.trx_level_type = OKL_API.G_MISS_CHAR)
4775: THEN
4776: x_txsv_rec.trx_level_type := l_db_txsv_rec.trx_level_type;
4777: END IF;
4778: /* IF (x_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4779: THEN
4780: x_txsv_rec.trx_line_type := l_db_txsv_rec.trx_line_type;
4781: END IF;*/
4782: IF (x_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4778: /* IF (x_txsv_rec.trx_line_type = OKL_API.G_MISS_CHAR)
4779: THEN
4780: x_txsv_rec.trx_line_type := l_db_txsv_rec.trx_line_type;
4781: END IF;*/
4782: IF (x_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4783: THEN
4784: x_txsv_rec.adjusted_doc_entity_code := l_db_txsv_rec.adjusted_doc_entity_code;
4785: END IF;
4786: IF (x_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4782: IF (x_txsv_rec.adjusted_doc_entity_code = OKL_API.G_MISS_CHAR)
4783: THEN
4784: x_txsv_rec.adjusted_doc_entity_code := l_db_txsv_rec.adjusted_doc_entity_code;
4785: END IF;
4786: IF (x_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4787: THEN
4788: x_txsv_rec.adjusted_doc_event_class_code := l_db_txsv_rec.adjusted_doc_event_class_code;
4789: END IF;
4790: IF (x_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4786: IF (x_txsv_rec.adjusted_doc_event_class_code = OKL_API.G_MISS_CHAR)
4787: THEN
4788: x_txsv_rec.adjusted_doc_event_class_code := l_db_txsv_rec.adjusted_doc_event_class_code;
4789: END IF;
4790: IF (x_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4791: THEN
4792: x_txsv_rec.adjusted_doc_trx_id := l_db_txsv_rec.adjusted_doc_trx_id;
4793: END IF;
4794: IF (x_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4790: IF (x_txsv_rec.adjusted_doc_trx_id = OKL_API.G_MISS_NUM)
4791: THEN
4792: x_txsv_rec.adjusted_doc_trx_id := l_db_txsv_rec.adjusted_doc_trx_id;
4793: END IF;
4794: IF (x_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4795: THEN
4796: x_txsv_rec.adjusted_doc_trx_line_id := l_db_txsv_rec.adjusted_doc_trx_line_id;
4797: END IF;
4798: IF (x_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4794: IF (x_txsv_rec.adjusted_doc_trx_line_id = OKL_API.G_MISS_NUM)
4795: THEN
4796: x_txsv_rec.adjusted_doc_trx_line_id := l_db_txsv_rec.adjusted_doc_trx_line_id;
4797: END IF;
4798: IF (x_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4799: THEN
4800: x_txsv_rec.adjusted_doc_trx_level_type := l_db_txsv_rec.adjusted_doc_trx_level_type;
4801: END IF;
4802: IF (x_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4798: IF (x_txsv_rec.adjusted_doc_trx_level_type = OKL_API.G_MISS_CHAR)
4799: THEN
4800: x_txsv_rec.adjusted_doc_trx_level_type := l_db_txsv_rec.adjusted_doc_trx_level_type;
4801: END IF;
4802: IF (x_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4803: THEN
4804: x_txsv_rec.adjusted_doc_number := l_db_txsv_rec.adjusted_doc_number;
4805: END IF;
4806: IF (x_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4802: IF (x_txsv_rec.adjusted_doc_number = OKL_API.G_MISS_CHAR)
4803: THEN
4804: x_txsv_rec.adjusted_doc_number := l_db_txsv_rec.adjusted_doc_number;
4805: END IF;
4806: IF (x_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4807: THEN
4808: x_txsv_rec.adjusted_doc_date := l_db_txsv_rec.adjusted_doc_date;
4809: END IF;
4810: IF (x_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4806: IF (x_txsv_rec.adjusted_doc_date = OKL_API.G_MISS_DATE)
4807: THEN
4808: x_txsv_rec.adjusted_doc_date := l_db_txsv_rec.adjusted_doc_date;
4809: END IF;
4810: IF (x_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4811: THEN
4812: x_txsv_rec.tax_call_type_code := l_db_txsv_rec.tax_call_type_code;
4813: END IF;
4814: IF (x_txsv_rec.sty_id = OKL_API.G_MISS_NUM)
4810: IF (x_txsv_rec.tax_call_type_code = OKL_API.G_MISS_CHAR)
4811: THEN
4812: x_txsv_rec.tax_call_type_code := l_db_txsv_rec.tax_call_type_code;
4813: END IF;
4814: IF (x_txsv_rec.sty_id = OKL_API.G_MISS_NUM)
4815: THEN
4816: x_txsv_rec.sty_id := l_db_txsv_rec.sty_id;
4817: END IF;
4818: IF (x_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4814: IF (x_txsv_rec.sty_id = OKL_API.G_MISS_NUM)
4815: THEN
4816: x_txsv_rec.sty_id := l_db_txsv_rec.sty_id;
4817: END IF;
4818: IF (x_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4819: THEN
4820: x_txsv_rec.trx_business_category := l_db_txsv_rec.trx_business_category;
4821: END IF;
4822: IF (x_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4818: IF (x_txsv_rec.trx_business_category = OKL_API.G_MISS_CHAR)
4819: THEN
4820: x_txsv_rec.trx_business_category := l_db_txsv_rec.trx_business_category;
4821: END IF;
4822: IF (x_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4823: THEN
4824: x_txsv_rec.tax_line_status_code := l_db_txsv_rec.tax_line_status_code;
4825: END IF;
4826: IF (x_txsv_rec.sel_id = OKL_API.G_MISS_NUM)
4822: IF (x_txsv_rec.tax_line_status_code = OKL_API.G_MISS_CHAR)
4823: THEN
4824: x_txsv_rec.tax_line_status_code := l_db_txsv_rec.tax_line_status_code;
4825: END IF;
4826: IF (x_txsv_rec.sel_id = OKL_API.G_MISS_NUM)
4827: THEN
4828: x_txsv_rec.sel_id := l_db_txsv_rec.sel_id;
4829: END IF;
4830: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR)
4826: IF (x_txsv_rec.sel_id = OKL_API.G_MISS_NUM)
4827: THEN
4828: x_txsv_rec.sel_id := l_db_txsv_rec.sel_id;
4829: END IF;
4830: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR)
4831: THEN
4832: x_txsv_rec.reported_yn := l_db_txsv_rec.reported_yn;
4833: END IF;
4834: IF (x_txsv_rec.program_id = OKL_API.G_MISS_NUM)
4830: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR)
4831: THEN
4832: x_txsv_rec.reported_yn := l_db_txsv_rec.reported_yn;
4833: END IF;
4834: IF (x_txsv_rec.program_id = OKL_API.G_MISS_NUM)
4835: THEN
4836: x_txsv_rec.program_id := l_db_txsv_rec.program_id;
4837: END IF;
4838: IF (x_txsv_rec.request_id = OKL_API.G_MISS_NUM)
4834: IF (x_txsv_rec.program_id = OKL_API.G_MISS_NUM)
4835: THEN
4836: x_txsv_rec.program_id := l_db_txsv_rec.program_id;
4837: END IF;
4838: IF (x_txsv_rec.request_id = OKL_API.G_MISS_NUM)
4839: THEN
4840: x_txsv_rec.request_id := l_db_txsv_rec.request_id;
4841: END IF;
4842: IF (x_txsv_rec.program_application_id = OKL_API.G_MISS_NUM)
4838: IF (x_txsv_rec.request_id = OKL_API.G_MISS_NUM)
4839: THEN
4840: x_txsv_rec.request_id := l_db_txsv_rec.request_id;
4841: END IF;
4842: IF (x_txsv_rec.program_application_id = OKL_API.G_MISS_NUM)
4843: THEN
4844: x_txsv_rec.program_application_id := l_db_txsv_rec.program_application_id;
4845: END IF;
4846: IF (x_txsv_rec.program_update_date = OKL_API.G_MISS_DATE)
4842: IF (x_txsv_rec.program_application_id = OKL_API.G_MISS_NUM)
4843: THEN
4844: x_txsv_rec.program_application_id := l_db_txsv_rec.program_application_id;
4845: END IF;
4846: IF (x_txsv_rec.program_update_date = OKL_API.G_MISS_DATE)
4847: THEN
4848: x_txsv_rec.program_update_date := l_db_txsv_rec.program_update_date;
4849: END IF;
4850: IF (x_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR)
4846: IF (x_txsv_rec.program_update_date = OKL_API.G_MISS_DATE)
4847: THEN
4848: x_txsv_rec.program_update_date := l_db_txsv_rec.program_update_date;
4849: END IF;
4850: IF (x_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR)
4851: THEN
4852: x_txsv_rec.attribute_category := l_db_txsv_rec.attribute_category;
4853: END IF;
4854: IF (x_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR)
4850: IF (x_txsv_rec.attribute_category = OKL_API.G_MISS_CHAR)
4851: THEN
4852: x_txsv_rec.attribute_category := l_db_txsv_rec.attribute_category;
4853: END IF;
4854: IF (x_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR)
4855: THEN
4856: x_txsv_rec.attribute1 := l_db_txsv_rec.attribute1;
4857: END IF;
4858: IF (x_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR)
4854: IF (x_txsv_rec.attribute1 = OKL_API.G_MISS_CHAR)
4855: THEN
4856: x_txsv_rec.attribute1 := l_db_txsv_rec.attribute1;
4857: END IF;
4858: IF (x_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR)
4859: THEN
4860: x_txsv_rec.attribute2 := l_db_txsv_rec.attribute2;
4861: END IF;
4862: IF (x_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR)
4858: IF (x_txsv_rec.attribute2 = OKL_API.G_MISS_CHAR)
4859: THEN
4860: x_txsv_rec.attribute2 := l_db_txsv_rec.attribute2;
4861: END IF;
4862: IF (x_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR)
4863: THEN
4864: x_txsv_rec.attribute3 := l_db_txsv_rec.attribute3;
4865: END IF;
4866: IF (x_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR)
4862: IF (x_txsv_rec.attribute3 = OKL_API.G_MISS_CHAR)
4863: THEN
4864: x_txsv_rec.attribute3 := l_db_txsv_rec.attribute3;
4865: END IF;
4866: IF (x_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR)
4867: THEN
4868: x_txsv_rec.attribute4 := l_db_txsv_rec.attribute4;
4869: END IF;
4870: IF (x_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR)
4866: IF (x_txsv_rec.attribute4 = OKL_API.G_MISS_CHAR)
4867: THEN
4868: x_txsv_rec.attribute4 := l_db_txsv_rec.attribute4;
4869: END IF;
4870: IF (x_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR)
4871: THEN
4872: x_txsv_rec.attribute5 := l_db_txsv_rec.attribute5;
4873: END IF;
4874: IF (x_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR)
4870: IF (x_txsv_rec.attribute5 = OKL_API.G_MISS_CHAR)
4871: THEN
4872: x_txsv_rec.attribute5 := l_db_txsv_rec.attribute5;
4873: END IF;
4874: IF (x_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR)
4875: THEN
4876: x_txsv_rec.attribute6 := l_db_txsv_rec.attribute6;
4877: END IF;
4878: IF (x_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR)
4874: IF (x_txsv_rec.attribute6 = OKL_API.G_MISS_CHAR)
4875: THEN
4876: x_txsv_rec.attribute6 := l_db_txsv_rec.attribute6;
4877: END IF;
4878: IF (x_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR)
4879: THEN
4880: x_txsv_rec.attribute7 := l_db_txsv_rec.attribute7;
4881: END IF;
4882: IF (x_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR)
4878: IF (x_txsv_rec.attribute7 = OKL_API.G_MISS_CHAR)
4879: THEN
4880: x_txsv_rec.attribute7 := l_db_txsv_rec.attribute7;
4881: END IF;
4882: IF (x_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR)
4883: THEN
4884: x_txsv_rec.attribute8 := l_db_txsv_rec.attribute8;
4885: END IF;
4886: IF (x_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR)
4882: IF (x_txsv_rec.attribute8 = OKL_API.G_MISS_CHAR)
4883: THEN
4884: x_txsv_rec.attribute8 := l_db_txsv_rec.attribute8;
4885: END IF;
4886: IF (x_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR)
4887: THEN
4888: x_txsv_rec.attribute9 := l_db_txsv_rec.attribute9;
4889: END IF;
4890: IF (x_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR)
4886: IF (x_txsv_rec.attribute9 = OKL_API.G_MISS_CHAR)
4887: THEN
4888: x_txsv_rec.attribute9 := l_db_txsv_rec.attribute9;
4889: END IF;
4890: IF (x_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR)
4891: THEN
4892: x_txsv_rec.attribute10 := l_db_txsv_rec.attribute10;
4893: END IF;
4894: IF (x_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR)
4890: IF (x_txsv_rec.attribute10 = OKL_API.G_MISS_CHAR)
4891: THEN
4892: x_txsv_rec.attribute10 := l_db_txsv_rec.attribute10;
4893: END IF;
4894: IF (x_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR)
4895: THEN
4896: x_txsv_rec.attribute11 := l_db_txsv_rec.attribute11;
4897: END IF;
4898: IF (x_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR)
4894: IF (x_txsv_rec.attribute11 = OKL_API.G_MISS_CHAR)
4895: THEN
4896: x_txsv_rec.attribute11 := l_db_txsv_rec.attribute11;
4897: END IF;
4898: IF (x_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR)
4899: THEN
4900: x_txsv_rec.attribute12 := l_db_txsv_rec.attribute12;
4901: END IF;
4902: IF (x_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR)
4898: IF (x_txsv_rec.attribute12 = OKL_API.G_MISS_CHAR)
4899: THEN
4900: x_txsv_rec.attribute12 := l_db_txsv_rec.attribute12;
4901: END IF;
4902: IF (x_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR)
4903: THEN
4904: x_txsv_rec.attribute13 := l_db_txsv_rec.attribute13;
4905: END IF;
4906: IF (x_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR)
4902: IF (x_txsv_rec.attribute13 = OKL_API.G_MISS_CHAR)
4903: THEN
4904: x_txsv_rec.attribute13 := l_db_txsv_rec.attribute13;
4905: END IF;
4906: IF (x_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR)
4907: THEN
4908: x_txsv_rec.attribute14 := l_db_txsv_rec.attribute14;
4909: END IF;
4910: IF (x_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR)
4906: IF (x_txsv_rec.attribute14 = OKL_API.G_MISS_CHAR)
4907: THEN
4908: x_txsv_rec.attribute14 := l_db_txsv_rec.attribute14;
4909: END IF;
4910: IF (x_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR)
4911: THEN
4912: x_txsv_rec.attribute15 := l_db_txsv_rec.attribute15;
4913: END IF;
4914: IF (x_txsv_rec.created_by = OKL_API.G_MISS_NUM)
4910: IF (x_txsv_rec.attribute15 = OKL_API.G_MISS_CHAR)
4911: THEN
4912: x_txsv_rec.attribute15 := l_db_txsv_rec.attribute15;
4913: END IF;
4914: IF (x_txsv_rec.created_by = OKL_API.G_MISS_NUM)
4915: THEN
4916: x_txsv_rec.created_by := l_db_txsv_rec.created_by;
4917: END IF;
4918: IF (x_txsv_rec.creation_date = OKL_API.G_MISS_DATE)
4914: IF (x_txsv_rec.created_by = OKL_API.G_MISS_NUM)
4915: THEN
4916: x_txsv_rec.created_by := l_db_txsv_rec.created_by;
4917: END IF;
4918: IF (x_txsv_rec.creation_date = OKL_API.G_MISS_DATE)
4919: THEN
4920: x_txsv_rec.creation_date := l_db_txsv_rec.creation_date;
4921: END IF;
4922: IF (x_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM)
4918: IF (x_txsv_rec.creation_date = OKL_API.G_MISS_DATE)
4919: THEN
4920: x_txsv_rec.creation_date := l_db_txsv_rec.creation_date;
4921: END IF;
4922: IF (x_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM)
4923: THEN
4924: x_txsv_rec.last_updated_by := l_db_txsv_rec.last_updated_by;
4925: END IF;
4926: IF (x_txsv_rec.last_update_date = OKL_API.G_MISS_DATE)
4922: IF (x_txsv_rec.last_updated_by = OKL_API.G_MISS_NUM)
4923: THEN
4924: x_txsv_rec.last_updated_by := l_db_txsv_rec.last_updated_by;
4925: END IF;
4926: IF (x_txsv_rec.last_update_date = OKL_API.G_MISS_DATE)
4927: THEN
4928: x_txsv_rec.last_update_date := l_db_txsv_rec.last_update_date;
4929: END IF;
4930: IF (x_txsv_rec.last_update_login = OKL_API.G_MISS_NUM)
4926: IF (x_txsv_rec.last_update_date = OKL_API.G_MISS_DATE)
4927: THEN
4928: x_txsv_rec.last_update_date := l_db_txsv_rec.last_update_date;
4929: END IF;
4930: IF (x_txsv_rec.last_update_login = OKL_API.G_MISS_NUM)
4931: THEN
4932: x_txsv_rec.last_update_login := l_db_txsv_rec.last_update_login;
4933: END IF;
4934: IF (x_txsv_rec.application_id = OKL_API.G_MISS_NUM ) THEN
4930: IF (x_txsv_rec.last_update_login = OKL_API.G_MISS_NUM)
4931: THEN
4932: x_txsv_rec.last_update_login := l_db_txsv_rec.last_update_login;
4933: END IF;
4934: IF (x_txsv_rec.application_id = OKL_API.G_MISS_NUM ) THEN
4935: x_txsv_rec.application_id := l_db_txsv_rec.application_id;
4936: END IF;
4937:
4938: -- Modified by dcshanmu for eBTax - modification starts
4937:
4938: -- Modified by dcshanmu for eBTax - modification starts
4939: -- migrating values to newly added columns
4940:
4941: IF (x_txsv_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
4942: x_txsv_rec.default_taxation_country := l_db_txsv_rec.default_taxation_country;
4943: END IF;
4944: IF (x_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4945: x_txsv_rec.product_category := l_db_txsv_rec.product_category;
4940:
4941: IF (x_txsv_rec.default_taxation_country = OKL_API.G_MISS_CHAR ) THEN
4942: x_txsv_rec.default_taxation_country := l_db_txsv_rec.default_taxation_country;
4943: END IF;
4944: IF (x_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4945: x_txsv_rec.product_category := l_db_txsv_rec.product_category;
4946: END IF;
4947: IF (x_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4948: x_txsv_rec.user_defined_fisc_class := l_db_txsv_rec.user_defined_fisc_class;
4943: END IF;
4944: IF (x_txsv_rec.product_category = OKL_API.G_MISS_CHAR ) THEN
4945: x_txsv_rec.product_category := l_db_txsv_rec.product_category;
4946: END IF;
4947: IF (x_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4948: x_txsv_rec.user_defined_fisc_class := l_db_txsv_rec.user_defined_fisc_class;
4949: END IF;
4950: IF (x_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4951: x_txsv_rec.line_intended_use := l_db_txsv_rec.line_intended_use;
4946: END IF;
4947: IF (x_txsv_rec.user_defined_fisc_class = OKL_API.G_MISS_CHAR ) THEN
4948: x_txsv_rec.user_defined_fisc_class := l_db_txsv_rec.user_defined_fisc_class;
4949: END IF;
4950: IF (x_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4951: x_txsv_rec.line_intended_use := l_db_txsv_rec.line_intended_use;
4952: END IF;
4953: IF (x_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4954: x_txsv_rec.inventory_item_id := l_db_txsv_rec.inventory_item_id;
4949: END IF;
4950: IF (x_txsv_rec.line_intended_use = OKL_API.G_MISS_CHAR ) THEN
4951: x_txsv_rec.line_intended_use := l_db_txsv_rec.line_intended_use;
4952: END IF;
4953: IF (x_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4954: x_txsv_rec.inventory_item_id := l_db_txsv_rec.inventory_item_id;
4955: END IF;
4956: IF (x_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4957: x_txsv_rec.bill_to_cust_acct_id := l_db_txsv_rec.bill_to_cust_acct_id;
4952: END IF;
4953: IF (x_txsv_rec.inventory_item_id = OKL_API.G_MISS_NUM ) THEN
4954: x_txsv_rec.inventory_item_id := l_db_txsv_rec.inventory_item_id;
4955: END IF;
4956: IF (x_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4957: x_txsv_rec.bill_to_cust_acct_id := l_db_txsv_rec.bill_to_cust_acct_id;
4958: END IF;
4959: IF (x_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4960: x_txsv_rec.org_id := l_db_txsv_rec.org_id;
4955: END IF;
4956: IF (x_txsv_rec.bill_to_cust_acct_id = OKL_API.G_MISS_NUM ) THEN
4957: x_txsv_rec.bill_to_cust_acct_id := l_db_txsv_rec.bill_to_cust_acct_id;
4958: END IF;
4959: IF (x_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4960: x_txsv_rec.org_id := l_db_txsv_rec.org_id;
4961: END IF;
4962: IF (x_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4963: x_txsv_rec.legal_entity_id := l_db_txsv_rec.legal_entity_id;
4958: END IF;
4959: IF (x_txsv_rec.org_id = OKL_API.G_MISS_NUM ) THEN
4960: x_txsv_rec.org_id := l_db_txsv_rec.org_id;
4961: END IF;
4962: IF (x_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4963: x_txsv_rec.legal_entity_id := l_db_txsv_rec.legal_entity_id;
4964: END IF;
4965: IF (x_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4966: x_txsv_rec.line_amt := l_db_txsv_rec.line_amt;
4961: END IF;
4962: IF (x_txsv_rec.legal_entity_id = OKL_API.G_MISS_NUM ) THEN
4963: x_txsv_rec.legal_entity_id := l_db_txsv_rec.legal_entity_id;
4964: END IF;
4965: IF (x_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4966: x_txsv_rec.line_amt := l_db_txsv_rec.line_amt;
4967: END IF;
4968: IF (x_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4969: x_txsv_rec.assessable_value := l_db_txsv_rec.assessable_value;
4964: END IF;
4965: IF (x_txsv_rec.line_amt = OKL_API.G_MISS_NUM ) THEN
4966: x_txsv_rec.line_amt := l_db_txsv_rec.line_amt;
4967: END IF;
4968: IF (x_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4969: x_txsv_rec.assessable_value := l_db_txsv_rec.assessable_value;
4970: END IF;
4971: IF (x_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4972: x_txsv_rec.total_tax := l_db_txsv_rec.total_tax;
4967: END IF;
4968: IF (x_txsv_rec.assessable_value = OKL_API.G_MISS_NUM ) THEN
4969: x_txsv_rec.assessable_value := l_db_txsv_rec.assessable_value;
4970: END IF;
4971: IF (x_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4972: x_txsv_rec.total_tax := l_db_txsv_rec.total_tax;
4973: END IF;
4974: IF (x_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4975: x_txsv_rec.product_type := l_db_txsv_rec.product_type;
4970: END IF;
4971: IF (x_txsv_rec.total_tax = OKL_API.G_MISS_NUM ) THEN
4972: x_txsv_rec.total_tax := l_db_txsv_rec.total_tax;
4973: END IF;
4974: IF (x_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4975: x_txsv_rec.product_type := l_db_txsv_rec.product_type;
4976: END IF;
4977: IF (x_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4978: x_txsv_rec.product_fisc_classification := l_db_txsv_rec.product_fisc_classification;
4973: END IF;
4974: IF (x_txsv_rec.product_type = OKL_API.G_MISS_CHAR ) THEN
4975: x_txsv_rec.product_type := l_db_txsv_rec.product_type;
4976: END IF;
4977: IF (x_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4978: x_txsv_rec.product_fisc_classification := l_db_txsv_rec.product_fisc_classification;
4979: END IF;
4980: IF (x_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4981: x_txsv_rec.trx_date := l_db_txsv_rec.trx_date;
4976: END IF;
4977: IF (x_txsv_rec.product_fisc_classification = OKL_API.G_MISS_CHAR ) THEN
4978: x_txsv_rec.product_fisc_classification := l_db_txsv_rec.product_fisc_classification;
4979: END IF;
4980: IF (x_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4981: x_txsv_rec.trx_date := l_db_txsv_rec.trx_date;
4982: END IF;
4983: IF (x_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4984: x_txsv_rec.provnl_tax_determination_date := l_db_txsv_rec.provnl_tax_determination_date;
4979: END IF;
4980: IF (x_txsv_rec.trx_date = OKL_API.G_MISS_DATE ) THEN
4981: x_txsv_rec.trx_date := l_db_txsv_rec.trx_date;
4982: END IF;
4983: IF (x_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4984: x_txsv_rec.provnl_tax_determination_date := l_db_txsv_rec.provnl_tax_determination_date;
4985: END IF;
4986: IF (x_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4987: x_txsv_rec.try_id := l_db_txsv_rec.try_id;
4982: END IF;
4983: IF (x_txsv_rec.provnl_tax_determination_date = OKL_API.G_MISS_DATE ) THEN
4984: x_txsv_rec.provnl_tax_determination_date := l_db_txsv_rec.provnl_tax_determination_date;
4985: END IF;
4986: IF (x_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4987: x_txsv_rec.try_id := l_db_txsv_rec.try_id;
4988: END IF;
4989:
4990: IF (x_txsv_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
4986: IF (x_txsv_rec.try_id = OKL_API.G_MISS_NUM ) THEN
4987: x_txsv_rec.try_id := l_db_txsv_rec.try_id;
4988: END IF;
4989:
4990: IF (x_txsv_rec.ship_to_location_id = OKL_API.G_MISS_NUM ) THEN
4991: x_txsv_rec.ship_to_location_id := l_db_txsv_rec.ship_to_location_id;
4992:
4993: END IF;
4994:
4991: x_txsv_rec.ship_to_location_id := l_db_txsv_rec.ship_to_location_id;
4992:
4993: END IF;
4994:
4995: IF (x_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
4996: x_txsv_rec.trx_currency_code := l_db_txsv_rec.trx_currency_code;
4997: END IF;
4998: IF (x_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4999: x_txsv_rec.currency_conversion_type := l_db_txsv_rec.currency_conversion_type;
4994:
4995: IF (x_txsv_rec.trx_currency_code = OKL_API.G_MISS_CHAR ) THEN
4996: x_txsv_rec.trx_currency_code := l_db_txsv_rec.trx_currency_code;
4997: END IF;
4998: IF (x_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4999: x_txsv_rec.currency_conversion_type := l_db_txsv_rec.currency_conversion_type;
5000: END IF;
5001: IF (x_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
5002: x_txsv_rec.currency_conversion_rate := l_db_txsv_rec.currency_conversion_rate;
4997: END IF;
4998: IF (x_txsv_rec.currency_conversion_type = OKL_API.G_MISS_CHAR ) THEN
4999: x_txsv_rec.currency_conversion_type := l_db_txsv_rec.currency_conversion_type;
5000: END IF;
5001: IF (x_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
5002: x_txsv_rec.currency_conversion_rate := l_db_txsv_rec.currency_conversion_rate;
5003: END IF;
5004: IF (x_txsv_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
5005: x_txsv_rec.currency_conversion_date := l_db_txsv_rec.currency_conversion_date;
5000: END IF;
5001: IF (x_txsv_rec.currency_conversion_rate = OKL_API.G_MISS_NUM ) THEN
5002: x_txsv_rec.currency_conversion_rate := l_db_txsv_rec.currency_conversion_rate;
5003: END IF;
5004: IF (x_txsv_rec.currency_conversion_date = OKL_API.G_MISS_DATE ) THEN
5005: x_txsv_rec.currency_conversion_date := l_db_txsv_rec.currency_conversion_date;
5006: END IF;
5007: -- Modified by dcshanmu for eBTax - modification end
5008: --asawanka ebtax changes start
5005: x_txsv_rec.currency_conversion_date := l_db_txsv_rec.currency_conversion_date;
5006: END IF;
5007: -- Modified by dcshanmu for eBTax - modification end
5008: --asawanka ebtax changes start
5009: IF (x_txsv_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
5010: x_txsv_rec.asset_number := l_db_txsv_rec.asset_number;
5011: END IF;
5012: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
5013: x_txsv_rec.reported_yn := l_db_txsv_rec.reported_yn;
5008: --asawanka ebtax changes start
5009: IF (x_txsv_rec.asset_number = OKL_API.G_MISS_CHAR ) THEN
5010: x_txsv_rec.asset_number := l_db_txsv_rec.asset_number;
5011: END IF;
5012: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
5013: x_txsv_rec.reported_yn := l_db_txsv_rec.reported_yn;
5014: END IF;
5015: IF (x_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5016: x_txsv_rec.SHIP_TO_PARTY_SITE_ID := l_db_txsv_rec.SHIP_TO_PARTY_SITE_ID;
5011: END IF;
5012: IF (x_txsv_rec.reported_yn = OKL_API.G_MISS_CHAR ) THEN
5013: x_txsv_rec.reported_yn := l_db_txsv_rec.reported_yn;
5014: END IF;
5015: IF (x_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5016: x_txsv_rec.SHIP_TO_PARTY_SITE_ID := l_db_txsv_rec.SHIP_TO_PARTY_SITE_ID;
5017: END IF;
5018: IF (x_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5019: x_txsv_rec.SHIP_TO_PARTY_ID := l_db_txsv_rec.SHIP_TO_PARTY_ID;
5014: END IF;
5015: IF (x_txsv_rec.SHIP_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5016: x_txsv_rec.SHIP_TO_PARTY_SITE_ID := l_db_txsv_rec.SHIP_TO_PARTY_SITE_ID;
5017: END IF;
5018: IF (x_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5019: x_txsv_rec.SHIP_TO_PARTY_ID := l_db_txsv_rec.SHIP_TO_PARTY_ID;
5020: END IF;
5021: IF (x_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5022: x_txsv_rec.BILL_TO_PARTY_SITE_ID := l_db_txsv_rec.BILL_TO_PARTY_SITE_ID;
5017: END IF;
5018: IF (x_txsv_rec.SHIP_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5019: x_txsv_rec.SHIP_TO_PARTY_ID := l_db_txsv_rec.SHIP_TO_PARTY_ID;
5020: END IF;
5021: IF (x_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5022: x_txsv_rec.BILL_TO_PARTY_SITE_ID := l_db_txsv_rec.BILL_TO_PARTY_SITE_ID;
5023: END IF;
5024: IF (x_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
5025: x_txsv_rec.BILL_TO_LOCATION_ID := l_db_txsv_rec.BILL_TO_LOCATION_ID;
5020: END IF;
5021: IF (x_txsv_rec.BILL_TO_PARTY_SITE_ID = OKL_API.G_MISS_NUM ) THEN
5022: x_txsv_rec.BILL_TO_PARTY_SITE_ID := l_db_txsv_rec.BILL_TO_PARTY_SITE_ID;
5023: END IF;
5024: IF (x_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
5025: x_txsv_rec.BILL_TO_LOCATION_ID := l_db_txsv_rec.BILL_TO_LOCATION_ID;
5026: END IF;
5027: IF (x_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5028: x_txsv_rec.BILL_TO_PARTY_ID := l_db_txsv_rec.BILL_TO_PARTY_ID;
5023: END IF;
5024: IF (x_txsv_rec.BILL_TO_LOCATION_ID = OKL_API.G_MISS_NUM ) THEN
5025: x_txsv_rec.BILL_TO_LOCATION_ID := l_db_txsv_rec.BILL_TO_LOCATION_ID;
5026: END IF;
5027: IF (x_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5028: x_txsv_rec.BILL_TO_PARTY_ID := l_db_txsv_rec.BILL_TO_PARTY_ID;
5029: END IF;
5030: IF (x_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5031: x_txsv_rec.ship_to_cust_acct_site_use_id := l_db_txsv_rec.ship_to_cust_acct_site_use_id;
5026: END IF;
5027: IF (x_txsv_rec.BILL_TO_PARTY_ID = OKL_API.G_MISS_NUM ) THEN
5028: x_txsv_rec.BILL_TO_PARTY_ID := l_db_txsv_rec.BILL_TO_PARTY_ID;
5029: END IF;
5030: IF (x_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5031: x_txsv_rec.ship_to_cust_acct_site_use_id := l_db_txsv_rec.ship_to_cust_acct_site_use_id;
5032: END IF;
5033: IF (x_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5034: x_txsv_rec.bill_to_cust_acct_site_use_id := l_db_txsv_rec.bill_to_cust_acct_site_use_id;
5029: END IF;
5030: IF (x_txsv_rec.ship_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5031: x_txsv_rec.ship_to_cust_acct_site_use_id := l_db_txsv_rec.ship_to_cust_acct_site_use_id;
5032: END IF;
5033: IF (x_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5034: x_txsv_rec.bill_to_cust_acct_site_use_id := l_db_txsv_rec.bill_to_cust_acct_site_use_id;
5035: END IF;
5036: IF (x_txsv_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
5037: x_txsv_rec.TAX_CLASSIFICATION_CODE := l_db_txsv_rec.TAX_CLASSIFICATION_CODE;
5032: END IF;
5033: IF (x_txsv_rec.bill_to_cust_acct_site_use_id = OKL_API.G_MISS_NUM ) THEN
5034: x_txsv_rec.bill_to_cust_acct_site_use_id := l_db_txsv_rec.bill_to_cust_acct_site_use_id;
5035: END IF;
5036: IF (x_txsv_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
5037: x_txsv_rec.TAX_CLASSIFICATION_CODE := l_db_txsv_rec.TAX_CLASSIFICATION_CODE;
5038: END IF;
5039: --asawanka ebtax changes end
5040: IF (x_txsv_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
5036: IF (x_txsv_rec.TAX_CLASSIFICATION_CODE = OKL_API.G_MISS_CHAR) THEN
5037: x_txsv_rec.TAX_CLASSIFICATION_CODE := l_db_txsv_rec.TAX_CLASSIFICATION_CODE;
5038: END IF;
5039: --asawanka ebtax changes end
5040: IF (x_txsv_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
5041: x_txsv_rec.ALC_SERIALIZED_YN := l_db_txsv_rec.ALC_SERIALIZED_YN;
5042: END IF;
5043: IF (x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
5044: x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := l_db_txsv_rec.ALC_SERIALIZED_TOTAL_TAX;
5039: --asawanka ebtax changes end
5040: IF (x_txsv_rec.ALC_SERIALIZED_YN = OKL_API.G_MISS_CHAR) THEN
5041: x_txsv_rec.ALC_SERIALIZED_YN := l_db_txsv_rec.ALC_SERIALIZED_YN;
5042: END IF;
5043: IF (x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
5044: x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := l_db_txsv_rec.ALC_SERIALIZED_TOTAL_TAX;
5045: END IF;
5046: IF (x_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
5047: x_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := l_db_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT;
5042: END IF;
5043: IF (x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX = OKL_API.G_MISS_NUM) THEN
5044: x_txsv_rec.ALC_SERIALIZED_TOTAL_TAX := l_db_txsv_rec.ALC_SERIALIZED_TOTAL_TAX;
5045: END IF;
5046: IF (x_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT = OKL_API.G_MISS_NUM) THEN
5047: x_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT := l_db_txsv_rec.ALC_SERIALIZED_TOTAL_LINE_AMT;
5048: END IF;
5049:
5050: END IF;
5057: FUNCTION Set_Attributes (
5058: p_txsv_rec IN txsv_rec_type,
5059: x_txsv_rec OUT NOCOPY txsv_rec_type
5060: ) RETURN VARCHAR2 IS
5061: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5062: BEGIN
5063: x_txsv_rec := p_txsv_rec;
5064: RETURN(l_return_status);
5065: END Set_Attributes;
5063: x_txsv_rec := p_txsv_rec;
5064: RETURN(l_return_status);
5065: END Set_Attributes;
5066: BEGIN
5067: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5068: G_PKG_NAME,
5069: p_init_msg_list,
5070: l_api_version,
5071: p_api_version,
5070: l_api_version,
5071: p_api_version,
5072: '_PVT',
5073: x_return_status);
5074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5077: RAISE OKL_API.G_EXCEPTION_ERROR;
5078: END IF;
5071: p_api_version,
5072: '_PVT',
5073: x_return_status);
5074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5077: RAISE OKL_API.G_EXCEPTION_ERROR;
5078: END IF;
5079: --- Setting item attributes
5072: '_PVT',
5073: x_return_status);
5074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5077: RAISE OKL_API.G_EXCEPTION_ERROR;
5078: END IF;
5079: --- Setting item attributes
5080: l_return_status := Set_Attributes(
5073: x_return_status);
5074: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5075: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5076: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5077: RAISE OKL_API.G_EXCEPTION_ERROR;
5078: END IF;
5079: --- Setting item attributes
5080: l_return_status := Set_Attributes(
5081: p_txsv_rec, -- IN
5080: l_return_status := Set_Attributes(
5081: p_txsv_rec, -- IN
5082: x_txsv_rec); -- OUT
5083: --- If any errors happen abort API
5084: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5086: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5081: p_txsv_rec, -- IN
5082: x_txsv_rec); -- OUT
5083: --- If any errors happen abort API
5084: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5086: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5082: x_txsv_rec); -- OUT
5083: --- If any errors happen abort API
5084: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5086: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5083: --- If any errors happen abort API
5084: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5085: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5086: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5086: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5092: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5093: RAISE OKL_API.G_EXCEPTION_ERROR;
5094: END IF;
5087: RAISE OKL_API.G_EXCEPTION_ERROR;
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5092: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5093: RAISE OKL_API.G_EXCEPTION_ERROR;
5094: END IF;
5095: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
5088: END IF;
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5092: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5093: RAISE OKL_API.G_EXCEPTION_ERROR;
5094: END IF;
5095: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
5096: --- Validate all non-missing attributes (Item Level Validation)
5089: l_return_status := populate_new_record(l_txsv_rec, l_def_txsv_rec);
5090: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5091: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5092: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5093: RAISE OKL_API.G_EXCEPTION_ERROR;
5094: END IF;
5095: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
5096: --- Validate all non-missing attributes (Item Level Validation)
5097: l_return_status := Validate_Attributes(l_def_txsv_rec);
5095: l_def_txsv_rec := fill_who_columns(l_def_txsv_rec);
5096: --- Validate all non-missing attributes (Item Level Validation)
5097: l_return_status := Validate_Attributes(l_def_txsv_rec);
5098: --- If any errors happen abort API
5099: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5101: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5102: RAISE OKL_API.G_EXCEPTION_ERROR;
5103: END IF;
5096: --- Validate all non-missing attributes (Item Level Validation)
5097: l_return_status := Validate_Attributes(l_def_txsv_rec);
5098: --- If any errors happen abort API
5099: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5101: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5102: RAISE OKL_API.G_EXCEPTION_ERROR;
5103: END IF;
5104:
5097: l_return_status := Validate_Attributes(l_def_txsv_rec);
5098: --- If any errors happen abort API
5099: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5101: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5102: RAISE OKL_API.G_EXCEPTION_ERROR;
5103: END IF;
5104:
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5098: --- If any errors happen abort API
5099: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5100: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5101: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5102: RAISE OKL_API.G_EXCEPTION_ERROR;
5103: END IF;
5104:
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5106: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5102: RAISE OKL_API.G_EXCEPTION_ERROR;
5103: END IF;
5104:
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5106: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5108: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5109: RAISE OKL_API.G_EXCEPTION_ERROR;
5110: END IF;
5103: END IF;
5104:
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5106: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5108: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5109: RAISE OKL_API.G_EXCEPTION_ERROR;
5110: END IF;
5111: */
5104:
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5106: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5108: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5109: RAISE OKL_API.G_EXCEPTION_ERROR;
5110: END IF;
5111: */
5112: -- Lock the Record
5105: /*l_return_status := Validate_Record(l_def_txsv_rec, l_db_txsv_rec);
5106: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5107: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5108: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5109: RAISE OKL_API.G_EXCEPTION_ERROR;
5110: END IF;
5111: */
5112: -- Lock the Record
5113: lock_row(
5116: x_return_status => l_return_status,
5117: x_msg_count => x_msg_count,
5118: x_msg_data => x_msg_data,
5119: p_txsv_rec => l_def_txsv_rec); -- p_txsv_rec); -- SECHAWLA Changed to pass l_def_tbov_rec becoz of locking issue
5120: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5121: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5122: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5123: RAISE OKL_API.G_EXCEPTION_ERROR;
5124: END IF;
5117: x_msg_count => x_msg_count,
5118: x_msg_data => x_msg_data,
5119: p_txsv_rec => l_def_txsv_rec); -- p_txsv_rec); -- SECHAWLA Changed to pass l_def_tbov_rec becoz of locking issue
5120: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5121: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5122: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5123: RAISE OKL_API.G_EXCEPTION_ERROR;
5124: END IF;
5125: -----------------------------------------
5118: x_msg_data => x_msg_data,
5119: p_txsv_rec => l_def_txsv_rec); -- p_txsv_rec); -- SECHAWLA Changed to pass l_def_tbov_rec becoz of locking issue
5120: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5121: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5122: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5123: RAISE OKL_API.G_EXCEPTION_ERROR;
5124: END IF;
5125: -----------------------------------------
5126: -- Move VIEW record to "Child" records --
5119: p_txsv_rec => l_def_txsv_rec); -- p_txsv_rec); -- SECHAWLA Changed to pass l_def_tbov_rec becoz of locking issue
5120: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5121: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5122: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5123: RAISE OKL_API.G_EXCEPTION_ERROR;
5124: END IF;
5125: -----------------------------------------
5126: -- Move VIEW record to "Child" records --
5127: -----------------------------------------
5136: x_msg_data,
5137: l_txs_rec,
5138: lx_txs_rec
5139: );
5140: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5141: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5142: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5143: RAISE OKL_API.G_EXCEPTION_ERROR;
5144: END IF;
5137: l_txs_rec,
5138: lx_txs_rec
5139: );
5140: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5141: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5142: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5143: RAISE OKL_API.G_EXCEPTION_ERROR;
5144: END IF;
5145: migrate(lx_txs_rec, l_def_txsv_rec);
5138: lx_txs_rec
5139: );
5140: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5141: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5142: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5143: RAISE OKL_API.G_EXCEPTION_ERROR;
5144: END IF;
5145: migrate(lx_txs_rec, l_def_txsv_rec);
5146: x_txsv_rec := l_def_txsv_rec;
5139: );
5140: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5141: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5142: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5143: RAISE OKL_API.G_EXCEPTION_ERROR;
5144: END IF;
5145: migrate(lx_txs_rec, l_def_txsv_rec);
5146: x_txsv_rec := l_def_txsv_rec;
5147: x_return_status := l_return_status;
5144: END IF;
5145: migrate(lx_txs_rec, l_def_txsv_rec);
5146: x_txsv_rec := l_def_txsv_rec;
5147: x_return_status := l_return_status;
5148: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5149: EXCEPTION
5150: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5151: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5152: (
5146: x_txsv_rec := l_def_txsv_rec;
5147: x_return_status := l_return_status;
5148: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5149: EXCEPTION
5150: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5151: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5152: (
5153: l_api_name,
5154: G_PKG_NAME,
5147: x_return_status := l_return_status;
5148: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5149: EXCEPTION
5150: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5151: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5152: (
5153: l_api_name,
5154: G_PKG_NAME,
5155: 'OKL_API.G_RET_STS_ERROR',
5151: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5152: (
5153: l_api_name,
5154: G_PKG_NAME,
5155: 'OKL_API.G_RET_STS_ERROR',
5156: x_msg_count,
5157: x_msg_data,
5158: '_PVT'
5159: );
5156: x_msg_count,
5157: x_msg_data,
5158: '_PVT'
5159: );
5160: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5161: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5162: (
5163: l_api_name,
5164: G_PKG_NAME,
5157: x_msg_data,
5158: '_PVT'
5159: );
5160: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5161: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5162: (
5163: l_api_name,
5164: G_PKG_NAME,
5165: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5161: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5162: (
5163: l_api_name,
5164: G_PKG_NAME,
5165: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5166: x_msg_count,
5167: x_msg_data,
5168: '_PVT'
5169: );
5167: x_msg_data,
5168: '_PVT'
5169: );
5170: WHEN OTHERS THEN
5171: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5172: (
5173: l_api_name,
5174: G_PKG_NAME,
5175: 'OTHERS',
5188: x_msg_count OUT NOCOPY NUMBER,
5189: x_msg_data OUT NOCOPY VARCHAR2,
5190: p_txsv_tbl IN txsv_tbl_type,
5191: x_txsv_tbl OUT NOCOPY txsv_tbl_type,
5192: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
5193:
5194: l_api_version CONSTANT NUMBER := 1;
5195: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
5196: i NUMBER := 0;
5194: l_api_version CONSTANT NUMBER := 1;
5195: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_update_row';
5196: i NUMBER := 0;
5197: BEGIN
5198: OKL_API.init_msg_list(p_init_msg_list);
5199: -- Make sure PL/SQL table has records in it before passing
5200: IF (p_txsv_tbl.COUNT > 0) THEN
5201: i := p_txsv_tbl.FIRST;
5202: LOOP
5200: IF (p_txsv_tbl.COUNT > 0) THEN
5201: i := p_txsv_tbl.FIRST;
5202: LOOP
5203: DECLARE
5204: l_error_rec OKL_API.ERROR_REC_TYPE;
5205: BEGIN
5206: l_error_rec.api_name := l_api_name;
5207: l_error_rec.api_package := G_PKG_NAME;
5208: l_error_rec.idx := i;
5207: l_error_rec.api_package := G_PKG_NAME;
5208: l_error_rec.idx := i;
5209: update_row (
5210: p_api_version => p_api_version,
5211: p_init_msg_list => OKL_API.G_FALSE,
5212: x_return_status => l_error_rec.error_type,
5213: x_msg_count => l_error_rec.msg_count,
5214: x_msg_data => l_error_rec.msg_data,
5215: p_txsv_rec => p_txsv_tbl(i),
5213: x_msg_count => l_error_rec.msg_count,
5214: x_msg_data => l_error_rec.msg_data,
5215: p_txsv_rec => p_txsv_tbl(i),
5216: x_txsv_rec => x_txsv_tbl(i));
5217: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
5218: l_error_rec.sqlcode := SQLCODE;
5219: load_error_tbl(l_error_rec, px_error_tbl);
5220: ELSE
5221: x_msg_count := l_error_rec.msg_count;
5221: x_msg_count := l_error_rec.msg_count;
5222: x_msg_data := l_error_rec.msg_data;
5223: END IF;
5224: EXCEPTION
5225: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5226: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5227: l_error_rec.sqlcode := SQLCODE;
5228: load_error_tbl(l_error_rec, px_error_tbl);
5229: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5222: x_msg_data := l_error_rec.msg_data;
5223: END IF;
5224: EXCEPTION
5225: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5226: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5227: l_error_rec.sqlcode := SQLCODE;
5228: load_error_tbl(l_error_rec, px_error_tbl);
5229: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5230: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5225: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5226: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5227: l_error_rec.sqlcode := SQLCODE;
5228: load_error_tbl(l_error_rec, px_error_tbl);
5229: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5230: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5231: l_error_rec.sqlcode := SQLCODE;
5232: load_error_tbl(l_error_rec, px_error_tbl);
5233: WHEN OTHERS THEN
5226: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5227: l_error_rec.sqlcode := SQLCODE;
5228: load_error_tbl(l_error_rec, px_error_tbl);
5229: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5230: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5231: l_error_rec.sqlcode := SQLCODE;
5232: load_error_tbl(l_error_rec, px_error_tbl);
5233: WHEN OTHERS THEN
5234: l_error_rec.error_type := 'OTHERS';
5241: END IF;
5242: -- Loop through the error_tbl to find the error with the highest severity
5243: -- and return it.
5244: x_return_status := find_highest_exception(px_error_tbl);
5245: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5246: EXCEPTION
5247: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5248: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5249: (
5243: -- and return it.
5244: x_return_status := find_highest_exception(px_error_tbl);
5245: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5246: EXCEPTION
5247: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5248: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5249: (
5250: l_api_name,
5251: G_PKG_NAME,
5244: x_return_status := find_highest_exception(px_error_tbl);
5245: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5246: EXCEPTION
5247: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5248: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5249: (
5250: l_api_name,
5251: G_PKG_NAME,
5252: 'OKL_API.G_RET_STS_ERROR',
5248: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5249: (
5250: l_api_name,
5251: G_PKG_NAME,
5252: 'OKL_API.G_RET_STS_ERROR',
5253: x_msg_count,
5254: x_msg_data,
5255: '_PVT'
5256: );
5253: x_msg_count,
5254: x_msg_data,
5255: '_PVT'
5256: );
5257: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5258: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5259: (
5260: l_api_name,
5261: G_PKG_NAME,
5254: x_msg_data,
5255: '_PVT'
5256: );
5257: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5258: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5259: (
5260: l_api_name,
5261: G_PKG_NAME,
5262: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5258: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5259: (
5260: l_api_name,
5261: G_PKG_NAME,
5262: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5263: x_msg_count,
5264: x_msg_data,
5265: '_PVT'
5266: );
5264: x_msg_data,
5265: '_PVT'
5266: );
5267: WHEN OTHERS THEN
5268: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5269: (
5270: l_api_name,
5271: G_PKG_NAME,
5272: 'OTHERS',
5291: x_txsv_tbl OUT NOCOPY txsv_tbl_type) IS
5292:
5293: l_api_version CONSTANT NUMBER := 1;
5294: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
5295: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5296: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5297: BEGIN
5298: OKL_API.init_msg_list(p_init_msg_list);
5299: -- Make sure PL/SQL table has records in it before passing
5292:
5293: l_api_version CONSTANT NUMBER := 1;
5294: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
5295: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5296: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5297: BEGIN
5298: OKL_API.init_msg_list(p_init_msg_list);
5299: -- Make sure PL/SQL table has records in it before passing
5300: IF (p_txsv_tbl.COUNT > 0) THEN
5294: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_update_row';
5295: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5296: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5297: BEGIN
5298: OKL_API.init_msg_list(p_init_msg_list);
5299: -- Make sure PL/SQL table has records in it before passing
5300: IF (p_txsv_tbl.COUNT > 0) THEN
5301: update_row (
5302: p_api_version => p_api_version,
5299: -- Make sure PL/SQL table has records in it before passing
5300: IF (p_txsv_tbl.COUNT > 0) THEN
5301: update_row (
5302: p_api_version => p_api_version,
5303: p_init_msg_list => OKL_API.G_FALSE,
5304: x_return_status => x_return_status,
5305: x_msg_count => x_msg_count,
5306: x_msg_data => x_msg_data,
5307: p_txsv_tbl => p_txsv_tbl,
5307: p_txsv_tbl => p_txsv_tbl,
5308: x_txsv_tbl => x_txsv_tbl,
5309: px_error_tbl => l_error_tbl);
5310: END IF;
5311: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5312: EXCEPTION
5313: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5314: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5315: (
5309: px_error_tbl => l_error_tbl);
5310: END IF;
5311: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5312: EXCEPTION
5313: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5314: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5315: (
5316: l_api_name,
5317: G_PKG_NAME,
5310: END IF;
5311: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5312: EXCEPTION
5313: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5314: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5315: (
5316: l_api_name,
5317: G_PKG_NAME,
5318: 'OKL_API.G_RET_STS_ERROR',
5314: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5315: (
5316: l_api_name,
5317: G_PKG_NAME,
5318: 'OKL_API.G_RET_STS_ERROR',
5319: x_msg_count,
5320: x_msg_data,
5321: '_PVT'
5322: );
5319: x_msg_count,
5320: x_msg_data,
5321: '_PVT'
5322: );
5323: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5324: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5325: (
5326: l_api_name,
5327: G_PKG_NAME,
5320: x_msg_data,
5321: '_PVT'
5322: );
5323: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5324: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5325: (
5326: l_api_name,
5327: G_PKG_NAME,
5328: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5324: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5325: (
5326: l_api_name,
5327: G_PKG_NAME,
5328: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5329: x_msg_count,
5330: x_msg_data,
5331: '_PVT'
5332: );
5330: x_msg_data,
5331: '_PVT'
5332: );
5333: WHEN OTHERS THEN
5334: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5335: (
5336: l_api_name,
5337: G_PKG_NAME,
5338: 'OTHERS',
5356: p_txs_rec IN txs_rec_type) IS
5357:
5358: l_api_version CONSTANT NUMBER := 1;
5359: l_api_name CONSTANT VARCHAR2(30) := 'B_delete_row';
5360: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5361: l_txs_rec txs_rec_type := p_txs_rec;
5362: l_row_notfound BOOLEAN := TRUE;
5363: BEGIN
5364: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5360: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5361: l_txs_rec txs_rec_type := p_txs_rec;
5362: l_row_notfound BOOLEAN := TRUE;
5363: BEGIN
5364: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5365: p_init_msg_list,
5366: '_PVT',
5367: x_return_status);
5368: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5364: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5365: p_init_msg_list,
5366: '_PVT',
5367: x_return_status);
5368: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5370: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5371: RAISE OKL_API.G_EXCEPTION_ERROR;
5372: END IF;
5365: p_init_msg_list,
5366: '_PVT',
5367: x_return_status);
5368: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5370: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5371: RAISE OKL_API.G_EXCEPTION_ERROR;
5372: END IF;
5373:
5366: '_PVT',
5367: x_return_status);
5368: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5370: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5371: RAISE OKL_API.G_EXCEPTION_ERROR;
5372: END IF;
5373:
5374: DELETE FROM OKL_TAX_SOURCES
5367: x_return_status);
5368: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5369: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5370: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5371: RAISE OKL_API.G_EXCEPTION_ERROR;
5372: END IF;
5373:
5374: DELETE FROM OKL_TAX_SOURCES
5375: WHERE ID = p_txs_rec.id;
5374: DELETE FROM OKL_TAX_SOURCES
5375: WHERE ID = p_txs_rec.id;
5376:
5377: x_return_status := l_return_status;
5378: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5379: EXCEPTION
5380: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5381: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5382: (
5376:
5377: x_return_status := l_return_status;
5378: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5379: EXCEPTION
5380: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5381: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5382: (
5383: l_api_name,
5384: G_PKG_NAME,
5377: x_return_status := l_return_status;
5378: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5379: EXCEPTION
5380: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5381: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5382: (
5383: l_api_name,
5384: G_PKG_NAME,
5385: 'OKL_API.G_RET_STS_ERROR',
5381: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5382: (
5383: l_api_name,
5384: G_PKG_NAME,
5385: 'OKL_API.G_RET_STS_ERROR',
5386: x_msg_count,
5387: x_msg_data,
5388: '_PVT'
5389: );
5386: x_msg_count,
5387: x_msg_data,
5388: '_PVT'
5389: );
5390: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5392: (
5393: l_api_name,
5394: G_PKG_NAME,
5387: x_msg_data,
5388: '_PVT'
5389: );
5390: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5392: (
5393: l_api_name,
5394: G_PKG_NAME,
5395: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5391: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5392: (
5393: l_api_name,
5394: G_PKG_NAME,
5395: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5396: x_msg_count,
5397: x_msg_data,
5398: '_PVT'
5399: );
5397: x_msg_data,
5398: '_PVT'
5399: );
5400: WHEN OTHERS THEN
5401: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5402: (
5403: l_api_name,
5404: G_PKG_NAME,
5405: 'OTHERS',
5420: p_txsv_rec IN txsv_rec_type) IS
5421:
5422: l_api_version CONSTANT NUMBER := 1;
5423: l_api_name CONSTANT VARCHAR2(30) := 'V_delete_row';
5424: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5425: l_txsv_rec txsv_rec_type := p_txsv_rec;
5426: l_txs_rec txs_rec_type;
5427: BEGIN
5428: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5424: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5425: l_txsv_rec txsv_rec_type := p_txsv_rec;
5426: l_txs_rec txs_rec_type;
5427: BEGIN
5428: l_return_status := OKL_API.START_ACTIVITY(l_api_name,
5429: G_PKG_NAME,
5430: p_init_msg_list,
5431: l_api_version,
5432: p_api_version,
5431: l_api_version,
5432: p_api_version,
5433: '_PVT',
5434: x_return_status);
5435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5438: RAISE OKL_API.G_EXCEPTION_ERROR;
5439: END IF;
5432: p_api_version,
5433: '_PVT',
5434: x_return_status);
5435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5438: RAISE OKL_API.G_EXCEPTION_ERROR;
5439: END IF;
5440: -----------------------------------------
5433: '_PVT',
5434: x_return_status);
5435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5438: RAISE OKL_API.G_EXCEPTION_ERROR;
5439: END IF;
5440: -----------------------------------------
5441: -- Move VIEW record to "Child" records --
5434: x_return_status);
5435: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5436: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5437: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5438: RAISE OKL_API.G_EXCEPTION_ERROR;
5439: END IF;
5440: -----------------------------------------
5441: -- Move VIEW record to "Child" records --
5442: -----------------------------------------
5450: x_msg_count,
5451: x_msg_data,
5452: l_txs_rec
5453: );
5454: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5455: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5456: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5457: RAISE OKL_API.G_EXCEPTION_ERROR;
5458: END IF;
5451: x_msg_data,
5452: l_txs_rec
5453: );
5454: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5455: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5456: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5457: RAISE OKL_API.G_EXCEPTION_ERROR;
5458: END IF;
5459: x_return_status := l_return_status;
5452: l_txs_rec
5453: );
5454: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5455: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5456: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5457: RAISE OKL_API.G_EXCEPTION_ERROR;
5458: END IF;
5459: x_return_status := l_return_status;
5460: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5453: );
5454: IF (l_return_status = OKL_API.G_RET_STS_UNEXP_ERROR) THEN
5455: RAISE OKL_API.G_EXCEPTION_UNEXPECTED_ERROR;
5456: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5457: RAISE OKL_API.G_EXCEPTION_ERROR;
5458: END IF;
5459: x_return_status := l_return_status;
5460: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5461: EXCEPTION
5456: ELSIF (l_return_status = OKL_API.G_RET_STS_ERROR) THEN
5457: RAISE OKL_API.G_EXCEPTION_ERROR;
5458: END IF;
5459: x_return_status := l_return_status;
5460: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5461: EXCEPTION
5462: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5463: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5464: (
5458: END IF;
5459: x_return_status := l_return_status;
5460: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5461: EXCEPTION
5462: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5463: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5464: (
5465: l_api_name,
5466: G_PKG_NAME,
5459: x_return_status := l_return_status;
5460: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5461: EXCEPTION
5462: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5463: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5464: (
5465: l_api_name,
5466: G_PKG_NAME,
5467: 'OKL_API.G_RET_STS_ERROR',
5463: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5464: (
5465: l_api_name,
5466: G_PKG_NAME,
5467: 'OKL_API.G_RET_STS_ERROR',
5468: x_msg_count,
5469: x_msg_data,
5470: '_PVT'
5471: );
5468: x_msg_count,
5469: x_msg_data,
5470: '_PVT'
5471: );
5472: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5473: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5474: (
5475: l_api_name,
5476: G_PKG_NAME,
5469: x_msg_data,
5470: '_PVT'
5471: );
5472: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5473: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5474: (
5475: l_api_name,
5476: G_PKG_NAME,
5477: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5473: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5474: (
5475: l_api_name,
5476: G_PKG_NAME,
5477: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5478: x_msg_count,
5479: x_msg_data,
5480: '_PVT'
5481: );
5479: x_msg_data,
5480: '_PVT'
5481: );
5482: WHEN OTHERS THEN
5483: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5484: (
5485: l_api_name,
5486: G_PKG_NAME,
5487: 'OTHERS',
5499: x_return_status OUT NOCOPY VARCHAR2,
5500: x_msg_count OUT NOCOPY NUMBER,
5501: x_msg_data OUT NOCOPY VARCHAR2,
5502: p_txsv_tbl IN txsv_tbl_type,
5503: px_error_tbl IN OUT NOCOPY OKL_API.ERROR_TBL_TYPE) IS
5504:
5505: l_api_version CONSTANT NUMBER := 1;
5506: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
5507: i NUMBER := 0;
5505: l_api_version CONSTANT NUMBER := 1;
5506: l_api_name CONSTANT VARCHAR2(30) := 'V_error_tbl_delete_row';
5507: i NUMBER := 0;
5508: BEGIN
5509: OKL_API.init_msg_list(p_init_msg_list);
5510: -- Make sure PL/SQL table has records in it before passing
5511: IF (p_txsv_tbl.COUNT > 0) THEN
5512: i := p_txsv_tbl.FIRST;
5513: LOOP
5511: IF (p_txsv_tbl.COUNT > 0) THEN
5512: i := p_txsv_tbl.FIRST;
5513: LOOP
5514: DECLARE
5515: l_error_rec OKL_API.ERROR_REC_TYPE;
5516: BEGIN
5517: l_error_rec.api_name := l_api_name;
5518: l_error_rec.api_package := G_PKG_NAME;
5519: l_error_rec.idx := i;
5518: l_error_rec.api_package := G_PKG_NAME;
5519: l_error_rec.idx := i;
5520: delete_row (
5521: p_api_version => p_api_version,
5522: p_init_msg_list => OKL_API.G_FALSE,
5523: x_return_status => l_error_rec.error_type,
5524: x_msg_count => l_error_rec.msg_count,
5525: x_msg_data => l_error_rec.msg_data,
5526: p_txsv_rec => p_txsv_tbl(i));
5523: x_return_status => l_error_rec.error_type,
5524: x_msg_count => l_error_rec.msg_count,
5525: x_msg_data => l_error_rec.msg_data,
5526: p_txsv_rec => p_txsv_tbl(i));
5527: IF (l_error_rec.error_type <> OKL_API.G_RET_STS_SUCCESS) THEN
5528: l_error_rec.sqlcode := SQLCODE;
5529: load_error_tbl(l_error_rec, px_error_tbl);
5530: ELSE
5531: x_msg_count := l_error_rec.msg_count;
5531: x_msg_count := l_error_rec.msg_count;
5532: x_msg_data := l_error_rec.msg_data;
5533: END IF;
5534: EXCEPTION
5535: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5536: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5537: l_error_rec.sqlcode := SQLCODE;
5538: load_error_tbl(l_error_rec, px_error_tbl);
5539: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5532: x_msg_data := l_error_rec.msg_data;
5533: END IF;
5534: EXCEPTION
5535: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5536: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5537: l_error_rec.sqlcode := SQLCODE;
5538: load_error_tbl(l_error_rec, px_error_tbl);
5539: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5540: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5535: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5536: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5537: l_error_rec.sqlcode := SQLCODE;
5538: load_error_tbl(l_error_rec, px_error_tbl);
5539: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5540: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5541: l_error_rec.sqlcode := SQLCODE;
5542: load_error_tbl(l_error_rec, px_error_tbl);
5543: WHEN OTHERS THEN
5536: l_error_rec.error_type := OKL_API.G_RET_STS_ERROR;
5537: l_error_rec.sqlcode := SQLCODE;
5538: load_error_tbl(l_error_rec, px_error_tbl);
5539: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5540: l_error_rec.error_type := OKL_API.G_RET_STS_UNEXP_ERROR;
5541: l_error_rec.sqlcode := SQLCODE;
5542: load_error_tbl(l_error_rec, px_error_tbl);
5543: WHEN OTHERS THEN
5544: l_error_rec.error_type := 'OTHERS';
5551: END IF;
5552: -- Loop through the error_tbl to find the error with the highest severity
5553: -- and return it.
5554: x_return_status := find_highest_exception(px_error_tbl);
5555: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5556: EXCEPTION
5557: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5558: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5559: (
5553: -- and return it.
5554: x_return_status := find_highest_exception(px_error_tbl);
5555: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5556: EXCEPTION
5557: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5558: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5559: (
5560: l_api_name,
5561: G_PKG_NAME,
5554: x_return_status := find_highest_exception(px_error_tbl);
5555: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5556: EXCEPTION
5557: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5558: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5559: (
5560: l_api_name,
5561: G_PKG_NAME,
5562: 'OKL_API.G_RET_STS_ERROR',
5558: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5559: (
5560: l_api_name,
5561: G_PKG_NAME,
5562: 'OKL_API.G_RET_STS_ERROR',
5563: x_msg_count,
5564: x_msg_data,
5565: '_PVT'
5566: );
5563: x_msg_count,
5564: x_msg_data,
5565: '_PVT'
5566: );
5567: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5568: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5569: (
5570: l_api_name,
5571: G_PKG_NAME,
5564: x_msg_data,
5565: '_PVT'
5566: );
5567: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5568: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5569: (
5570: l_api_name,
5571: G_PKG_NAME,
5572: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5568: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5569: (
5570: l_api_name,
5571: G_PKG_NAME,
5572: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5573: x_msg_count,
5574: x_msg_data,
5575: '_PVT'
5576: );
5574: x_msg_data,
5575: '_PVT'
5576: );
5577: WHEN OTHERS THEN
5578: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5579: (
5580: l_api_name,
5581: G_PKG_NAME,
5582: 'OTHERS',
5598: p_txsv_tbl IN txsv_tbl_type) IS
5599:
5600: l_api_version CONSTANT NUMBER := 1;
5601: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
5602: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5603: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5604: BEGIN
5605: OKL_API.init_msg_list(p_init_msg_list);
5606: -- Make sure PL/SQL table has records in it before passing
5599:
5600: l_api_version CONSTANT NUMBER := 1;
5601: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
5602: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5603: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5604: BEGIN
5605: OKL_API.init_msg_list(p_init_msg_list);
5606: -- Make sure PL/SQL table has records in it before passing
5607: IF (p_txsv_tbl.COUNT > 0) THEN
5601: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_delete_row';
5602: l_return_status VARCHAR2(1) := OKL_API.G_RET_STS_SUCCESS;
5603: l_error_tbl OKL_API.ERROR_TBL_TYPE;
5604: BEGIN
5605: OKL_API.init_msg_list(p_init_msg_list);
5606: -- Make sure PL/SQL table has records in it before passing
5607: IF (p_txsv_tbl.COUNT > 0) THEN
5608: delete_row (
5609: p_api_version => p_api_version,
5606: -- Make sure PL/SQL table has records in it before passing
5607: IF (p_txsv_tbl.COUNT > 0) THEN
5608: delete_row (
5609: p_api_version => p_api_version,
5610: p_init_msg_list => OKL_API.G_FALSE,
5611: x_return_status => x_return_status,
5612: x_msg_count => x_msg_count,
5613: x_msg_data => x_msg_data,
5614: p_txsv_tbl => p_txsv_tbl,
5613: x_msg_data => x_msg_data,
5614: p_txsv_tbl => p_txsv_tbl,
5615: px_error_tbl => l_error_tbl);
5616: END IF;
5617: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5618: EXCEPTION
5619: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5620: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5621: (
5615: px_error_tbl => l_error_tbl);
5616: END IF;
5617: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5618: EXCEPTION
5619: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5620: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5621: (
5622: l_api_name,
5623: G_PKG_NAME,
5616: END IF;
5617: OKL_API.END_ACTIVITY(x_msg_count, x_msg_data);
5618: EXCEPTION
5619: WHEN OKL_API.G_EXCEPTION_ERROR THEN
5620: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5621: (
5622: l_api_name,
5623: G_PKG_NAME,
5624: 'OKL_API.G_RET_STS_ERROR',
5620: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5621: (
5622: l_api_name,
5623: G_PKG_NAME,
5624: 'OKL_API.G_RET_STS_ERROR',
5625: x_msg_count,
5626: x_msg_data,
5627: '_PVT'
5628: );
5625: x_msg_count,
5626: x_msg_data,
5627: '_PVT'
5628: );
5629: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5630: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5631: (
5632: l_api_name,
5633: G_PKG_NAME,
5626: x_msg_data,
5627: '_PVT'
5628: );
5629: WHEN OKL_API.G_EXCEPTION_UNEXPECTED_ERROR THEN
5630: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5631: (
5632: l_api_name,
5633: G_PKG_NAME,
5634: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5630: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5631: (
5632: l_api_name,
5633: G_PKG_NAME,
5634: 'OKL_API.G_RET_STS_UNEXP_ERROR',
5635: x_msg_count,
5636: x_msg_data,
5637: '_PVT'
5638: );
5636: x_msg_data,
5637: '_PVT'
5638: );
5639: WHEN OTHERS THEN
5640: x_return_status := OKL_API.HANDLE_EXCEPTIONS
5641: (
5642: l_api_name,
5643: G_PKG_NAME,
5644: 'OTHERS',