1: PACKAGE BODY OKS_BSD_PRINT_PREVIEW_PVT AS
2: /* $Header: OKSBSDPB.pls 120.0 2005/05/25 17:39:30 appldev noship $ */
3: ---------------------------------------------------------------------------
4: -- PROCEDURE load_error_tbl
5: ---------------------------------------------------------------------------
90: null;
91: END api_copy;
92:
93: ---------------------------------------------------------------------------
94: -- FUNCTION get_rec for: OKS_BSD_PR
95: ---------------------------------------------------------------------------
96: FUNCTION get_rec (
97: p_bsd_pr_rec IN bsd_pr_rec_type,
98: x_no_data_found OUT NOCOPY BOOLEAN
96: FUNCTION get_rec (
97: p_bsd_pr_rec IN bsd_pr_rec_type,
98: x_no_data_found OUT NOCOPY BOOLEAN
99: ) RETURN bsd_pr_rec_type IS
100: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS
101: SELECT
102: ID,
103: BSL_ID,
104: BSL_ID_AVERAGED,
141: BASE_READING,
142: ESTIMATED_QUANTITY,
143: CCR_ID,
144: CGR_ID
145: FROM Oks_Bsd_Pr
146: WHERE oks_bsd_pr.id = p_id;
147: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
148: l_bsd_pr_rec bsd_pr_rec_type;
149: BEGIN
142: ESTIMATED_QUANTITY,
143: CCR_ID,
144: CGR_ID
145: FROM Oks_Bsd_Pr
146: WHERE oks_bsd_pr.id = p_id;
147: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
148: l_bsd_pr_rec bsd_pr_rec_type;
149: BEGIN
150: x_no_data_found := TRUE;
143: CCR_ID,
144: CGR_ID
145: FROM Oks_Bsd_Pr
146: WHERE oks_bsd_pr.id = p_id;
147: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
148: l_bsd_pr_rec bsd_pr_rec_type;
149: BEGIN
150: x_no_data_found := TRUE;
151: -- Get current database values
148: l_bsd_pr_rec bsd_pr_rec_type;
149: BEGIN
150: x_no_data_found := TRUE;
151: -- Get current database values
152: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.id);
153: FETCH oks_bsd_pr_pk_csr INTO
154: l_bsd_pr_rec.id,
155: l_bsd_pr_rec.bsl_id,
156: l_bsd_pr_rec.bsl_id_averaged,
149: BEGIN
150: x_no_data_found := TRUE;
151: -- Get current database values
152: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.id);
153: FETCH oks_bsd_pr_pk_csr INTO
154: l_bsd_pr_rec.id,
155: l_bsd_pr_rec.bsl_id,
156: l_bsd_pr_rec.bsl_id_averaged,
157: l_bsd_pr_rec.bsd_id,
193: l_bsd_pr_rec.base_reading,
194: l_bsd_pr_rec.estimated_quantity,
195: l_bsd_pr_rec.ccr_id,
196: l_bsd_pr_rec.cgr_id;
197: x_no_data_found := oks_bsd_pr_pk_csr%NOTFOUND;
198: CLOSE oks_bsd_pr_pk_csr;
199: RETURN(l_bsd_pr_rec);
200: END get_rec;
201:
194: l_bsd_pr_rec.estimated_quantity,
195: l_bsd_pr_rec.ccr_id,
196: l_bsd_pr_rec.cgr_id;
197: x_no_data_found := oks_bsd_pr_pk_csr%NOTFOUND;
198: CLOSE oks_bsd_pr_pk_csr;
199: RETURN(l_bsd_pr_rec);
200: END get_rec;
201:
202: ------------------------------------------------------------------
226: BEGIN
227: RETURN(get_rec(p_bsd_pr_rec, l_row_not_found));
228: END get_rec;
229: ---------------------------------------------------------------------------
230: -- FUNCTION null_out_defaults for: OKS_BSD_PR
231: ---------------------------------------------------------------------------
232: FUNCTION null_out_defaults (
233: p_bsd_pr_rec IN bsd_pr_rec_type
234: ) RETURN bsd_pr_rec_type IS
381: RAISE G_EXCEPTION_HALT_VALIDATION;
382: END IF;
383:
384: -- Verify the value fits the length of the column in the database
385: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
386: ,p_col_name => 'id'
387: ,p_col_value => p_id
388: ,x_return_status => x_return_status);
389: -- verify that length is within allowed limits
419: RAISE G_EXCEPTION_HALT_VALIDATION;
420: END IF;
421:
422: -- Verify the value fits the length of the column in the database
423: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
424: ,p_col_name => 'bsl_id'
425: ,p_col_value => p_bsl_id
426: ,x_return_status => x_return_status);
427: -- verify that length is within allowed limits
457: RAISE G_EXCEPTION_HALT_VALIDATION;
458: END IF;
459:
460: -- Verify the value fits the length of the column in the database
461: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
462: ,p_col_name => 'bsl_id_averaged'
463: ,p_col_value => p_bsl_id_averaged
464: ,x_return_status => x_return_status);
465: -- verify that length is within allowed limits
495: RAISE G_EXCEPTION_HALT_VALIDATION;
496: END IF;
497:
498: -- Verify the value fits the length of the column in the database
499: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
500: ,p_col_name => 'unit_of_measure'
501: ,p_col_value => p_unit_of_measure
502: ,x_return_status => x_return_status);
503: -- verify that length is within allowed limits
533: RAISE G_EXCEPTION_HALT_VALIDATION;
534: END IF;
535:
536: -- Verify the value fits the length of the column in the database
537: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
538: ,p_col_name => 'amcv_yn'
539: ,p_col_value => p_amcv_yn
540: ,x_return_status => x_return_status);
541: -- verify that length is within allowed limits
571: RAISE G_EXCEPTION_HALT_VALIDATION;
572: END IF;
573:
574: -- Verify the value fits the length of the column in the database
575: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
576: ,p_col_name => 'result'
577: ,p_col_value => p_result
578: ,x_return_status => x_return_status);
579: -- verify that length is within allowed limits
609: RAISE G_EXCEPTION_HALT_VALIDATION;
610: END IF;
611:
612: -- Verify the value fits the length of the column in the database
613: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
614: ,p_col_name => 'amount'
615: ,p_col_value => p_amount
616: ,x_return_status => x_return_status);
617: -- verify that length is within allowed limits
647: RAISE G_EXCEPTION_HALT_VALIDATION;
648: END IF;
649:
650: -- Verify the value fits the length of the column in the database
651: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'
652: ,p_col_name => 'object_version_number'
653: ,p_col_value => p_object_version_number
654: ,x_return_status => x_return_status);
655: -- verify that length is within allowed limits
672: ---------------------------------------------------------------------------
673: -- FUNCTION Validate_Attributes
674: ---------------------------------------------------------------------------
675: ----------------------------------------
676: -- Validate_Attributes for:OKS_BSD_PR --
677: ----------------------------------------
678: FUNCTION Validate_Attributes (
679: p_bsd_pr_rec IN bsd_pr_rec_type
680: ) RETURN VARCHAR2 IS
681: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
682: x_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
683: BEGIN
684: -- Call OKC_UTIL.ADD_VIEW to prepare the PL/SQL table to hold columns of view
685: OKC_UTIL.ADD_VIEW('OKS_BSD_PR', x_return_status);
686: IF (x_return_status <> OKC_API.G_RET_STS_SUCCESS) THEN
687: l_return_status := x_return_status;
688: RAISE G_EXCEPTION_HALT_VALIDATION;
689: END IF;
779: ---------------------------------------------------------------------------
780: -- PROCEDURE Validate_Record
781: ---------------------------------------------------------------------------
782: ------------------------------------
783: -- Validate Record for:OKS_BSD_PR --
784: ------------------------------------
785: FUNCTION Validate_Record (
786: p_bsd_pr_rec IN bsd_pr_rec_type,
787: p_db_bsd_pr_rec IN bsd_pr_rec_type
800: FROM Oks_Bsl_Pr
801: WHERE oks_bsl_pr.id = p_id;
802: l_oks_bsl_pr_pk oks_bsl_pr_pk_csr%ROWTYPE;
803:
804: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS
805: SELECT 'x'
806: FROM Oks_Bsd_Pr
807: WHERE oks_bsd_pr.id = p_id;
808: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
802: l_oks_bsl_pr_pk oks_bsl_pr_pk_csr%ROWTYPE;
803:
804: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS
805: SELECT 'x'
806: FROM Oks_Bsd_Pr
807: WHERE oks_bsd_pr.id = p_id;
808: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
809:
810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
803:
804: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS
805: SELECT 'x'
806: FROM Oks_Bsd_Pr
807: WHERE oks_bsd_pr.id = p_id;
808: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
809:
810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
811: l_row_notfound BOOLEAN := TRUE;
804: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS
805: SELECT 'x'
806: FROM Oks_Bsd_Pr
807: WHERE oks_bsd_pr.id = p_id;
808: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;
809:
810: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
811: l_row_notfound BOOLEAN := TRUE;
812: BEGIN
813: IF ((p_bsd_pr_rec.BSD_ID IS NOT NULL)
814: AND
815: (p_bsd_pr_rec.BSD_ID <> p_db_bsd_pr_rec.BSD_ID))
816: THEN
817: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID);
818: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
819: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
820: CLOSE oks_bsd_pr_pk_csr;
821: IF (l_row_notfound) THEN
814: AND
815: (p_bsd_pr_rec.BSD_ID <> p_db_bsd_pr_rec.BSD_ID))
816: THEN
817: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID);
818: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
819: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
820: CLOSE oks_bsd_pr_pk_csr;
821: IF (l_row_notfound) THEN
822: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID');
815: (p_bsd_pr_rec.BSD_ID <> p_db_bsd_pr_rec.BSD_ID))
816: THEN
817: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID);
818: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
819: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
820: CLOSE oks_bsd_pr_pk_csr;
821: IF (l_row_notfound) THEN
822: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID');
823: RAISE item_not_found_error;
816: THEN
817: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID);
818: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
819: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
820: CLOSE oks_bsd_pr_pk_csr;
821: IF (l_row_notfound) THEN
822: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID');
823: RAISE item_not_found_error;
824: END IF;
826: IF ((p_bsd_pr_rec.BSD_ID_APPLIED IS NOT NULL)
827: AND
828: (p_bsd_pr_rec.BSD_ID_APPLIED <> p_db_bsd_pr_rec.BSD_ID_APPLIED))
829: THEN
830: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID_APPLIED);
831: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
832: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
833: CLOSE oks_bsd_pr_pk_csr;
834: IF (l_row_notfound) THEN
827: AND
828: (p_bsd_pr_rec.BSD_ID_APPLIED <> p_db_bsd_pr_rec.BSD_ID_APPLIED))
829: THEN
830: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID_APPLIED);
831: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
832: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
833: CLOSE oks_bsd_pr_pk_csr;
834: IF (l_row_notfound) THEN
835: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID_APPLIED');
828: (p_bsd_pr_rec.BSD_ID_APPLIED <> p_db_bsd_pr_rec.BSD_ID_APPLIED))
829: THEN
830: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID_APPLIED);
831: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
832: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
833: CLOSE oks_bsd_pr_pk_csr;
834: IF (l_row_notfound) THEN
835: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID_APPLIED');
836: RAISE item_not_found_error;
829: THEN
830: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID_APPLIED);
831: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;
832: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;
833: CLOSE oks_bsd_pr_pk_csr;
834: IF (l_row_notfound) THEN
835: OKC_API.set_message(G_APP_NAME, G_INVALID_VALUE,G_COL_NAME_TOKEN,'BSD_ID_APPLIED');
836: RAISE item_not_found_error;
837: END IF;
988: ---------------------------------------------------------------------------
989: -- PROCEDURE validate_row
990: ---------------------------------------------------------------------------
991: ---------------------------------
992: -- validate_row for:OKS_BSD_PR --
993: ---------------------------------
994: PROCEDURE validate_row(
995: p_api_version IN NUMBER,
996: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1064: '_PVT'
1065: );
1066: END validate_row;
1067: --------------------------------------------
1068: -- PL/SQL TBL validate_row for:OKS_BSD_PR --
1069: --------------------------------------------
1070: PROCEDURE validate_row(
1071: p_api_version IN NUMBER,
1072: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1160: );
1161: END validate_row;
1162:
1163: --------------------------------------------
1164: -- PL/SQL TBL validate_row for:OKS_BSD_PR --
1165: --------------------------------------------
1166: PROCEDURE validate_row(
1167: p_api_version IN NUMBER,
1168: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1225: ---------------------------------------------------------------------------
1226: -- PROCEDURE insert_row
1227: ---------------------------------------------------------------------------
1228: -------------------------------
1229: -- insert_row for:OKS_BSD_PR --
1230: -------------------------------
1231: PROCEDURE insert_row(
1232: p_api_version IN NUMBER,
1233: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1242: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1243: l_bsd_pr_rec bsd_pr_rec_type := p_bsd_pr_rec;
1244: l_def_bsd_pr_rec bsd_pr_rec_type;
1245: -----------------------------------
1246: -- Set_Attributes for:OKS_BSD_PR --
1247: -----------------------------------
1248: FUNCTION Set_Attributes (
1249: p_bsd_pr_rec IN bsd_pr_rec_type,
1250: x_bsd_pr_rec OUT NOCOPY bsd_pr_rec_type
1273: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1274: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1275: RAISE OKC_API.G_EXCEPTION_ERROR;
1276: END IF;
1277: INSERT INTO OKS_BSD_PR(
1278: id,
1279: bsl_id,
1280: bsl_id_averaged,
1281: bsd_id,
1401: ---------------------------------------------------------------------------
1402: -- PROCEDURE lock_row
1403: ---------------------------------------------------------------------------
1404: -----------------------------
1405: -- lock_row for:OKS_BSD_PR --
1406: -----------------------------
1407: PROCEDURE lock_row(
1408: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1409: x_return_status OUT NOCOPY VARCHAR2,
1414: E_Resource_Busy EXCEPTION;
1415: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1416: CURSOR lock_csr (p_bsd_pr_rec IN bsd_pr_rec_type) IS
1417: SELECT OBJECT_VERSION_NUMBER
1418: FROM OKS_BSD_PR
1419: WHERE ID = p_bsd_pr_rec.id
1420: AND OBJECT_VERSION_NUMBER = p_bsd_pr_rec.object_version_number
1421: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1422:
1421: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1422:
1423: CURSOR lchk_csr (p_bsd_pr_rec IN bsd_pr_rec_type) IS
1424: SELECT OBJECT_VERSION_NUMBER
1425: FROM OKS_BSD_PR
1426: WHERE ID = p_bsd_pr_rec.id;
1427: l_api_version CONSTANT NUMBER := 1;
1428: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1429: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1426: WHERE ID = p_bsd_pr_rec.id;
1427: l_api_version CONSTANT NUMBER := 1;
1428: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1429: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1430: l_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;
1431: lc_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;
1432: l_row_notfound BOOLEAN := FALSE;
1433: lc_row_notfound BOOLEAN := FALSE;
1434: BEGIN
1427: l_api_version CONSTANT NUMBER := 1;
1428: l_api_name CONSTANT VARCHAR2(30) := 'B_lock_row';
1429: l_return_status VARCHAR2(1) := OKC_API.G_RET_STS_SUCCESS;
1430: l_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;
1431: lc_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;
1432: l_row_notfound BOOLEAN := FALSE;
1433: lc_row_notfound BOOLEAN := FALSE;
1434: BEGIN
1435: l_return_status := OKC_API.START_ACTIVITY(l_api_name,
1508: '_PVT'
1509: );
1510: END lock_row;
1511: ------------------------------
1512: -- lock_row for: OKS_BSD_PR --
1513: ------------------------------
1514: PROCEDURE lock_row(
1515: p_api_version IN NUMBER,
1516: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1748: ---------------------------------------------------------------------------
1749: -- PROCEDURE update_row
1750: ---------------------------------------------------------------------------
1751: -------------------------------
1752: -- update_row for:OKS_BSD_PR --
1753: -------------------------------
1754: PROCEDURE update_row(
1755: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
1756: x_return_status OUT NOCOPY VARCHAR2,
1955: END IF;
1956: RETURN(l_return_status);
1957: END populate_new_record;
1958: -----------------------------------
1959: -- Set_Attributes for:OKS_BSD_PR --
1960: -----------------------------------
1961: FUNCTION Set_Attributes (
1962: p_bsd_pr_rec IN bsd_pr_rec_type,
1963: x_bsd_pr_rec OUT NOCOPY bsd_pr_rec_type
1993: RAISE OKC_API.G_EXCEPTION_UNEXPECTED_ERROR;
1994: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
1995: RAISE OKC_API.G_EXCEPTION_ERROR;
1996: END IF;
1997: UPDATE OKS_BSD_PR
1998: SET BSL_ID = l_def_bsd_pr_rec.bsl_id,
1999: BSL_ID_AVERAGED = l_def_bsd_pr_rec.bsl_id_averaged,
2000: BSD_ID = l_def_bsd_pr_rec.bsd_id,
2001: BSD_ID_APPLIED = l_def_bsd_pr_rec.bsd_id_applied,
2074: '_PVT'
2075: );
2076: END update_row;
2077: -------------------------------
2078: -- update_row for:OKS_BSD_PR --
2079: -------------------------------
2080: PROCEDURE update_row(
2081: p_api_version IN NUMBER,
2082: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2293: END IF;
2294: RETURN(l_return_status);
2295: END populate_new_record;
2296: -----------------------------------
2297: -- Set_Attributes for:OKS_BSD_PR --
2298: -----------------------------------
2299: FUNCTION Set_Attributes (
2300: p_bsd_pr_rec IN bsd_pr_rec_type,
2301: x_bsd_pr_rec OUT NOCOPY bsd_pr_rec_type
2585: ---------------------------------------------------------------------------
2586: -- PROCEDURE delete_row
2587: ---------------------------------------------------------------------------
2588: -------------------------------
2589: -- delete_row for:OKS_BSD_PR --
2590: -------------------------------
2591: PROCEDURE delete_row(
2592: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2593: x_return_status OUT NOCOPY VARCHAR2,
2610: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR) THEN
2611: RAISE OKC_API.G_EXCEPTION_ERROR;
2612: END IF;
2613:
2614: DELETE FROM OKS_BSD_PR
2615: WHERE ID = p_bsd_pr_rec.id;
2616:
2617: x_return_status := l_return_status;
2618: OKC_API.END_ACTIVITY(x_msg_count, x_msg_data);
2648: '_PVT'
2649: );
2650: END delete_row;
2651: -------------------------------
2652: -- delete_row for:OKS_BSD_PR --
2653: -------------------------------
2654: PROCEDURE delete_row(
2655: p_api_version IN NUMBER,
2656: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2729: '_PVT'
2730: );
2731: END delete_row;
2732: ------------------------------------------
2733: -- PL/SQL TBL delete_row for:OKS_BSD_PR --
2734: ------------------------------------------
2735: PROCEDURE delete_row(
2736: p_api_version IN NUMBER,
2737: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2825: );
2826: END delete_row;
2827:
2828: ------------------------------------------
2829: -- PL/SQL TBL delete_row for:OKS_BSD_PR --
2830: ------------------------------------------
2831: PROCEDURE delete_row(
2832: p_api_version IN NUMBER,
2833: p_init_msg_list IN VARCHAR2 DEFAULT OKC_API.G_FALSE,
2886: '_PVT'
2887: );
2888: END delete_row;
2889:
2890: END OKS_BSD_PRINT_PREVIEW_PVT;