DBA Data[Home] [Help]

APPS.OKS_BSD_PRINT_PREVIEW_PVT dependencies on OKS_BSD_PR

Line 1: PACKAGE BODY OKS_BSD_PRINT_PREVIEW_PVT AS

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

Line 94: -- FUNCTION get_rec for: OKS_BSD_PR

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

Line 100: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS

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,

Line 145: FROM Oks_Bsd_Pr

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

Line 146: WHERE oks_bsd_pr.id = p_id;

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;

Line 147: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;

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

Line 152: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.id);

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,

Line 153: FETCH oks_bsd_pr_pk_csr INTO

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,

Line 197: x_no_data_found := oks_bsd_pr_pk_csr%NOTFOUND;

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:

Line 198: CLOSE oks_bsd_pr_pk_csr;

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

Line 230: -- FUNCTION null_out_defaults for: OKS_BSD_PR

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

Line 385: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 423: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 461: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 499: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 537: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 575: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 613: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 651: OKC_UTIL.CHECK_LENGTH( p_view_name => 'OKS_BSD_PR'

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

Line 676: -- Validate_Attributes for:OKS_BSD_PR --

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

Line 685: OKC_UTIL.ADD_VIEW('OKS_BSD_PR', x_return_status);

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;

Line 783: -- Validate Record for:OKS_BSD_PR --

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

Line 804: CURSOR oks_bsd_pr_pk_csr (p_id IN NUMBER) IS

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;

Line 806: FROM Oks_Bsd_Pr

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;

Line 807: WHERE oks_bsd_pr.id = p_id;

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;

Line 808: l_oks_bsd_pr_pk oks_bsd_pr_pk_csr%ROWTYPE;

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

Line 817: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID);

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

Line 818: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;

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

Line 819: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;

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;

Line 820: CLOSE oks_bsd_pr_pk_csr;

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;

Line 830: OPEN oks_bsd_pr_pk_csr (p_bsd_pr_rec.BSD_ID_APPLIED);

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

Line 831: FETCH oks_bsd_pr_pk_csr INTO l_oks_bsd_pr_pk;

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

Line 832: l_row_notfound := oks_bsd_pr_pk_csr%NOTFOUND;

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;

Line 833: CLOSE oks_bsd_pr_pk_csr;

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;

Line 992: -- validate_row for:OKS_BSD_PR --

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,

Line 1068: -- PL/SQL TBL validate_row for:OKS_BSD_PR --

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,

Line 1164: -- PL/SQL TBL validate_row for:OKS_BSD_PR --

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,

Line 1229: -- insert_row for:OKS_BSD_PR --

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,

Line 1246: -- Set_Attributes for:OKS_BSD_PR --

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

Line 1277: INSERT INTO OKS_BSD_PR(

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,

Line 1405: -- lock_row for:OKS_BSD_PR --

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,

Line 1418: FROM OKS_BSD_PR

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:

Line 1425: FROM OKS_BSD_PR

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;

Line 1430: l_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;

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

Line 1431: lc_object_version_number OKS_BSD_PR.OBJECT_VERSION_NUMBER%TYPE;

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,

Line 1512: -- lock_row for: OKS_BSD_PR --

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,

Line 1752: -- update_row for:OKS_BSD_PR --

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,

Line 1959: -- Set_Attributes for:OKS_BSD_PR --

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

Line 1997: UPDATE OKS_BSD_PR

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,

Line 2078: -- update_row for:OKS_BSD_PR --

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,

Line 2297: -- Set_Attributes for:OKS_BSD_PR --

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

Line 2589: -- delete_row for:OKS_BSD_PR --

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,

Line 2614: DELETE FROM OKS_BSD_PR

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

Line 2652: -- delete_row for:OKS_BSD_PR --

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,

Line 2733: -- PL/SQL TBL delete_row for:OKS_BSD_PR --

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,

Line 2829: -- PL/SQL TBL delete_row for:OKS_BSD_PR --

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,

Line 2890: END OKS_BSD_PRINT_PREVIEW_PVT;

2886: '_PVT'
2887: );
2888: END delete_row;
2889:
2890: END OKS_BSD_PRINT_PREVIEW_PVT;