32: NULL;
33: END api_copy;
34:
35: ---------------------------------------------------------------------------
36: -- FUNCTION get_rec for: OKL_ACCOUNTING_EVENTS
37: ---------------------------------------------------------------------------
38: FUNCTION get_rec (
39: p_aet_rec IN aet_rec_type,
40: x_no_data_found OUT NOCOPY BOOLEAN
38: FUNCTION get_rec (
39: p_aet_rec IN aet_rec_type,
40: x_no_data_found OUT NOCOPY BOOLEAN
41: ) RETURN aet_rec_type IS
42: CURSOR okl_accounting_events_pk_csr (p_accounting_event_id IN NUMBER) IS
43: SELECT
44: accounting_event_id,
45: ORG_ID,
46: EVENT_TYPE_CODE,
58: CREATION_DATE,
59: LAST_UPDATED_BY,
60: LAST_UPDATE_DATE,
61: LAST_UPDATE_LOGIN
62: FROM Okl_Accounting_Events
63: WHERE okl_accounting_events.accounting_event_id = p_accounting_event_id;
64: l_okl_accounting_events_pk okl_accounting_events_pk_csr%ROWTYPE;
65: l_aet_rec aet_rec_type;
66: BEGIN
59: LAST_UPDATED_BY,
60: LAST_UPDATE_DATE,
61: LAST_UPDATE_LOGIN
62: FROM Okl_Accounting_Events
63: WHERE okl_accounting_events.accounting_event_id = p_accounting_event_id;
64: l_okl_accounting_events_pk okl_accounting_events_pk_csr%ROWTYPE;
65: l_aet_rec aet_rec_type;
66: BEGIN
67: x_no_data_found := TRUE;
60: LAST_UPDATE_DATE,
61: LAST_UPDATE_LOGIN
62: FROM Okl_Accounting_Events
63: WHERE okl_accounting_events.accounting_event_id = p_accounting_event_id;
64: l_okl_accounting_events_pk okl_accounting_events_pk_csr%ROWTYPE;
65: l_aet_rec aet_rec_type;
66: BEGIN
67: x_no_data_found := TRUE;
68: -- Get current database values
65: l_aet_rec aet_rec_type;
66: BEGIN
67: x_no_data_found := TRUE;
68: -- Get current database values
69: OPEN okl_accounting_events_pk_csr (p_aet_rec.accounting_event_id);
70: FETCH okl_accounting_events_pk_csr INTO
71: l_aet_rec.accounting_event_id,
72: l_aet_rec.ORG_ID,
73: l_aet_rec.EVENT_TYPE_CODE,
66: BEGIN
67: x_no_data_found := TRUE;
68: -- Get current database values
69: OPEN okl_accounting_events_pk_csr (p_aet_rec.accounting_event_id);
70: FETCH okl_accounting_events_pk_csr INTO
71: l_aet_rec.accounting_event_id,
72: l_aet_rec.ORG_ID,
73: l_aet_rec.EVENT_TYPE_CODE,
74: l_aet_rec.ACCOUNTING_DATE,
85: l_aet_rec.CREATION_DATE,
86: l_aet_rec.LAST_UPDATED_BY,
87: l_aet_rec.LAST_UPDATE_DATE,
88: l_aet_rec.LAST_UPDATE_LOGIN;
89: x_no_data_found := okl_accounting_events_pk_csr%NOTFOUND;
90: CLOSE okl_accounting_events_pk_csr;
91: RETURN(l_aet_rec);
92: END get_rec;
93:
86: l_aet_rec.LAST_UPDATED_BY,
87: l_aet_rec.LAST_UPDATE_DATE,
88: l_aet_rec.LAST_UPDATE_LOGIN;
89: x_no_data_found := okl_accounting_events_pk_csr%NOTFOUND;
90: CLOSE okl_accounting_events_pk_csr;
91: RETURN(l_aet_rec);
92: END get_rec;
93:
94: FUNCTION get_rec (
98: BEGIN
99: RETURN(get_rec(p_aet_rec, l_row_notfound));
100: END get_rec;
101: ---------------------------------------------------------------------------
102: -- FUNCTION get_rec for: OKL_ACCOUNTING_EVENTS_V
103: ---------------------------------------------------------------------------
104: FUNCTION get_rec (
105: p_aetv_rec IN aetv_rec_type,
106: x_no_data_found OUT NOCOPY BOOLEAN
124: CREATION_DATE,
125: LAST_UPDATED_BY,
126: LAST_UPDATE_DATE,
127: LAST_UPDATE_LOGIN
128: FROM OKL_ACCOUNTING_EVENTS
129: WHERE OKL_ACCOUNTING_EVENTS.accounting_event_id = p_accounting_event_id;
130: l_okl_aetv_pk okl_aetv_pk_csr%ROWTYPE;
131: l_aetv_rec aetv_rec_type;
132: BEGIN
125: LAST_UPDATED_BY,
126: LAST_UPDATE_DATE,
127: LAST_UPDATE_LOGIN
128: FROM OKL_ACCOUNTING_EVENTS
129: WHERE OKL_ACCOUNTING_EVENTS.accounting_event_id = p_accounting_event_id;
130: l_okl_aetv_pk okl_aetv_pk_csr%ROWTYPE;
131: l_aetv_rec aetv_rec_type;
132: BEGIN
133: x_no_data_found := TRUE;
165: RETURN(get_rec(p_aetv_rec, l_row_notfound));
166: END get_rec;
167:
168: -------------------------------------------------------------
169: -- FUNCTION null_out_defaults for: OKL_ACCOUNTING_EVENTS_V --
170: -------------------------------------------------------------
171: FUNCTION null_out_defaults (
172: p_aetv_rec IN aetv_rec_type
173: ) RETURN aetv_rec_type IS
231: ---------------------------------------------------------------------------
232: -- PROCEDURE Validate_Attributes
233: ---------------------------------------------------------------------------
234: -----------------------------------------------------
235: -- Validate_Attributes for:OKL_ACCOUNTING_EVENTS_V --
236: -----------------------------------------------------
237: Function Validate_Attributes (
238: p_aetv_rec IN aetv_rec_type
239: ) RETURN VARCHAR2 IS
288: ---------------------------------------------------------------------------
289: -- PROCEDURE Validate_Record
290: ---------------------------------------------------------------------------
291: -------------------------------------------------
292: -- Validate_Record for:OKL_ACCOUNTING_EVENTS_V --
293: -------------------------------------------------
294: FUNCTION Validate_Record (
295: p_aetv_rec IN aetv_rec_type
296: ) RETURN VARCHAR2 IS
922: ---------------------------------------------------------------------------
923: -- PROCEDURE validate_row
924: ---------------------------------------------------------------------------
925: ----------------------------------------------
926: -- validate_row for:OKL_ACCOUNTING_EVENTS_V --
927: ----------------------------------------------
928: PROCEDURE validate_row(
929: p_api_version IN NUMBER,
930: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1074: ---------------------------------------------------------------------------
1075: -- PROCEDURE insert_row
1076: ---------------------------------------------------------------------------
1077: ------------------------------------------
1078: -- insert_row for:OKL_ACCOUNTING_EVENTS --
1079: ------------------------------------------
1080: PROCEDURE insert_row(
1081: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1082: x_return_status OUT NOCOPY VARCHAR2,
1090: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1091: l_aet_rec aet_rec_type := p_aet_rec;
1092: l_def_aet_rec aet_rec_type;
1093: ----------------------------------------------
1094: -- Set_Attributes for:OKL_ACCOUNTING_EVENTS --
1095: ----------------------------------------------
1096: FUNCTION Set_Attributes (
1097: p_aet_rec IN aet_rec_type,
1098: x_aet_rec OUT NOCOPY aet_rec_type
1122: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1123: RAISE Okc_Api.G_EXCEPTION_ERROR;
1124: END IF;
1125:
1126: INSERT INTO OKL_ACCOUNTING_EVENTS(
1127: accounting_event_id,
1128: org_id,
1129: event_type_code,
1130: accounting_date,
1196: '_PVT'
1197: );
1198: END insert_row;
1199: --------------------------------------------
1200: -- insert_row for:OKL_ACCOUNTING_EVENTS_V --
1201: --------------------------------------------
1202: PROCEDURE insert_row(
1203: p_api_version IN NUMBER,
1204: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1230: l_aetv_rec.LAST_UPDATE_LOGIN := Fnd_Global.LOGIN_ID;
1231: RETURN(l_aetv_rec);
1232: END fill_who_columns;
1233: ------------------------------------------------
1234: -- Set_Attributes for:OKL_ACCOUNTING_EVENTS_V --
1235: ------------------------------------------------
1236: FUNCTION Set_Attributes (
1237: p_aetv_rec IN aetv_rec_type,
1238: x_aetv_rec OUT NOCOPY aetv_rec_type
1436: ---------------------------------------------------------------------------
1437: -- PROCEDURE lock_row
1438: ---------------------------------------------------------------------------
1439: ----------------------------------------
1440: -- lock_row for:OKL_ACCOUNTING_EVENTS --
1441: ----------------------------------------
1442: PROCEDURE lock_row(
1443: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1444: x_return_status OUT NOCOPY VARCHAR2,
1449: E_Resource_Busy EXCEPTION;
1450: PRAGMA EXCEPTION_INIT(E_Resource_Busy, -00054);
1451: CURSOR lock_csr (p_aet_rec IN aet_rec_type) IS
1452: SELECT OBJECT_VERSION_NUMBER
1453: FROM OKL_ACCOUNTING_EVENTS
1454: WHERE accounting_event_id = p_aet_rec.accounting_event_id
1455: AND OBJECT_VERSION_NUMBER = p_aet_rec.object_version_number
1456: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1457:
1456: FOR UPDATE OF OBJECT_VERSION_NUMBER NOWAIT;
1457:
1458: CURSOR lchk_csr (p_aet_rec IN aet_rec_type) IS
1459: SELECT OBJECT_VERSION_NUMBER
1460: FROM OKL_ACCOUNTING_EVENTS
1461: WHERE accounting_event_id = p_aet_rec.accounting_event_id;
1462: l_api_version CONSTANT NUMBER := 1;
1463: l_api_name CONSTANT VARCHAR2(30) := 'EVENTS_lock_row';
1464: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1461: WHERE accounting_event_id = p_aet_rec.accounting_event_id;
1462: l_api_version CONSTANT NUMBER := 1;
1463: l_api_name CONSTANT VARCHAR2(30) := 'EVENTS_lock_row';
1464: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1465: l_object_version_number OKL_ACCOUNTING_EVENTS.OBJECT_VERSION_NUMBER%TYPE;
1466: lc_object_version_number OKL_ACCOUNTING_EVENTS.OBJECT_VERSION_NUMBER%TYPE;
1467: l_row_notfound BOOLEAN := FALSE;
1468: lc_row_notfound BOOLEAN := FALSE;
1469: BEGIN
1462: l_api_version CONSTANT NUMBER := 1;
1463: l_api_name CONSTANT VARCHAR2(30) := 'EVENTS_lock_row';
1464: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1465: l_object_version_number OKL_ACCOUNTING_EVENTS.OBJECT_VERSION_NUMBER%TYPE;
1466: lc_object_version_number OKL_ACCOUNTING_EVENTS.OBJECT_VERSION_NUMBER%TYPE;
1467: l_row_notfound BOOLEAN := FALSE;
1468: lc_row_notfound BOOLEAN := FALSE;
1469: BEGIN
1470: l_return_status := Okc_Api.START_ACTIVITY(l_api_name,
1542: '_PVT'
1543: );
1544: END lock_row;
1545: ------------------------------------------
1546: -- lock_row for:OKL_ACCOUNTING_EVENTS_V --
1547: ------------------------------------------
1548: PROCEDURE lock_row(
1549: p_api_version IN NUMBER,
1550: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1700: ---------------------------------------------------------------------------
1701: -- PROCEDURE update_row
1702: ---------------------------------------------------------------------------
1703: ------------------------------------------
1704: -- update_row for:OKL_ACCOUNTING_EVENTS --
1705: ------------------------------------------
1706: PROCEDURE update_row(
1707: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
1708: x_return_status OUT NOCOPY VARCHAR2,
1808: END IF;
1809: RETURN(l_return_status);
1810: END populate_new_record;
1811: ----------------------------------------------
1812: -- Set_Attributes for:OKL_ACCOUNTING_EVENTS --
1813: ----------------------------------------------
1814: FUNCTION Set_Attributes (
1815: p_aet_rec IN aet_rec_type,
1816: x_aet_rec OUT NOCOPY aet_rec_type
1845: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
1846: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
1847: RAISE Okc_Api.G_EXCEPTION_ERROR;
1848: END IF;
1849: UPDATE OKL_ACCOUNTING_EVENTS
1850: SET ORG_ID = l_def_aet_rec.org_id,
1851: EVENT_TYPE_CODE = l_def_aet_rec.event_type_code,
1852: ACCOUNTING_DATE = l_def_aet_rec.accounting_date,
1853: EVENT_NUMBER = l_def_aet_rec.event_number,
1900: '_PVT'
1901: );
1902: END update_row;
1903: --------------------------------------------
1904: -- update_row for:OKL_ACCOUNTING_EVENTS_V --
1905: --------------------------------------------
1906: PROCEDURE update_row(
1907: p_api_version IN NUMBER,
1908: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2023: END IF;
2024: RETURN(l_return_status);
2025: END populate_new_record;
2026: ------------------------------------------------
2027: -- Set_Attributes for:OKL_ACCOUNTING_EVENTS_V --
2028: ------------------------------------------------
2029: FUNCTION Set_Attributes (
2030: p_aetv_rec IN aetv_rec_type,
2031: x_aetv_rec OUT NOCOPY aetv_rec_type
2230: ---------------------------------------------------------------------------
2231: -- PROCEDURE delete_row
2232: ---------------------------------------------------------------------------
2233: ------------------------------------------
2234: -- delete_row for:OKL_ACCOUNTING_EVENTS --
2235: ------------------------------------------
2236: PROCEDURE delete_row(
2237: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,
2238: x_return_status OUT NOCOPY VARCHAR2,
2254: RAISE Okc_Api.G_EXCEPTION_UNEXPECTED_ERROR;
2255: ELSIF (l_return_status = Okc_Api.G_RET_STS_ERROR) THEN
2256: RAISE Okc_Api.G_EXCEPTION_ERROR;
2257: END IF;
2258: DELETE FROM OKL_ACCOUNTING_EVENTS
2259: WHERE accounting_event_id = l_aet_rec.accounting_event_id;
2260:
2261: Okc_Api.END_ACTIVITY(x_msg_count, x_msg_data);
2262: EXCEPTION
2291: '_PVT'
2292: );
2293: END delete_row;
2294: --------------------------------------------
2295: -- delete_row for:OKL_ACCOUNTING_EVENTS_V --
2296: --------------------------------------------
2297: PROCEDURE delete_row(
2298: p_api_version IN NUMBER,
2299: p_init_msg_list IN VARCHAR2 DEFAULT Okc_Api.G_FALSE,