1: PACKAGE BODY VEA_LAYER_LICENSES_SV as
2: /* $Header: VEAVALLB.pls 115.9 2004/07/27 00:08:01 rvishnuv ship $ */
3: --{
4: /*====================== vea_layer_licenses_sv =========================*/
5: /*========================================================================
1: PACKAGE BODY VEA_LAYER_LICENSES_SV as
2: /* $Header: VEAVALLB.pls 115.9 2004/07/27 00:08:01 rvishnuv ship $ */
3: --{
4: /*====================== vea_layer_licenses_sv =========================*/
5: /*========================================================================
6: PURPOSE: Table handler package for table VEA_LAYER_LICENSES
7:
8: NOTES: To run the script:
2: /* $Header: VEAVALLB.pls 115.9 2004/07/27 00:08:01 rvishnuv ship $ */
3: --{
4: /*====================== vea_layer_licenses_sv =========================*/
5: /*========================================================================
6: PURPOSE: Table handler package for table VEA_LAYER_LICENSES
7:
8: NOTES: To run the script:
9:
10: sql> start VEAVALHB.pls
13: Created N PARIKH 09/09/99 10:00 AM
14:
15: =========================================================================*/
16:
17: G_PACKAGE_NAME CONSTANT VARCHAR2(30) := 'VEA_LAYER_LICENSES_SV';
18: --
19: --
20: /*========================================================================
21:
20: /*========================================================================
21:
22: PROCEDURE NAME: insert_row
23:
24: PURPOSE: Inserts a record into VEA_LAYER_LICENSES table
25:
26: ========================================================================*/
27: PROCEDURE
28: insert_row
26: ========================================================================*/
27: PROCEDURE
28: insert_row
29: (
30: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
31: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
32: p_description IN vea_layer_licenses.description%TYPE,
33: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
34: )
27: PROCEDURE
28: insert_row
29: (
30: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
31: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
32: p_description IN vea_layer_licenses.description%TYPE,
33: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
34: )
35: IS
28: insert_row
29: (
30: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
31: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
32: p_description IN vea_layer_licenses.description%TYPE,
33: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
34: )
35: IS
36: --{
29: (
30: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
31: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
32: p_description IN vea_layer_licenses.description%TYPE,
33: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
34: )
35: IS
36: --{
37: l_api_name CONSTANT VARCHAR2(30) := 'insert_row';
44: BEGIN
45: --{
46: l_location := '0010';
47: --
48: INSERT INTO vea_layer_licenses
49: (
50: layer_provider_code,
51: customer_name,
52: description,
85: /*========================================================================
86:
87: PROCEDURE NAME: update_row
88:
89: PURPOSE: Updates a record into VEA_LAYER_LICENSES table
90:
91: ========================================================================*/
92: PROCEDURE
93: update_row
91: ========================================================================*/
92: PROCEDURE
93: update_row
94: (
95: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
96: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
97: p_description IN vea_layer_licenses.description%TYPE,
98: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
99: )
92: PROCEDURE
93: update_row
94: (
95: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
96: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
97: p_description IN vea_layer_licenses.description%TYPE,
98: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
99: )
100: IS
93: update_row
94: (
95: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
96: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
97: p_description IN vea_layer_licenses.description%TYPE,
98: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
99: )
100: IS
101: --{
94: (
95: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
96: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
97: p_description IN vea_layer_licenses.description%TYPE,
98: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
99: )
100: IS
101: --{
102: l_api_name CONSTANT VARCHAR2(30) := 'update_row';
109: BEGIN
110: --{
111: l_location := '0010';
112: --
113: UPDATE vea_layer_licenses
114: SET description = p_description,
115: last_updated_by = l_user_id,
116: last_update_date = SYSDATE,
117: last_update_login = l_login_id
144: ========================================================================*/
145: FUNCTION
146: isLicensed
147: (
148: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
149: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
150: )
151: RETURN BOOLEAN
152: IS
145: FUNCTION
146: isLicensed
147: (
148: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
149: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
150: )
151: RETURN BOOLEAN
152: IS
153: --{
160: --
161: --
162: CURSOR layer_license_cur
163: (
164: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
165: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
166: )
167: IS
168: SELECT 'x'
161: --
162: CURSOR layer_license_cur
163: (
164: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
165: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
166: )
167: IS
168: SELECT 'x'
169: FROM vea_layer_licenses
165: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
166: )
167: IS
168: SELECT 'x'
169: FROM vea_layer_licenses
170: WHERE layer_provider_code = p_layer_provider_code
171: AND tp_layer_id = p_tp_layer_id;
172: --
173: --
268: ========================================================================*/
269: PROCEDURE
270: delete_rows
271: (
272: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
273: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
274: )
275: IS
276: --{
269: PROCEDURE
270: delete_rows
271: (
272: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
273: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
274: )
275: IS
276: --{
277: l_api_name CONSTANT VARCHAR2(30) := 'delete_rows';
284: BEGIN
285: --{
286: l_location := '0010';
287: --
288: DELETE vea_layer_licenses
289: WHERE layer_provider_code = p_layer_provider_code
290: AND tp_layer_id = p_tp_layer_id;
291: --}
292: EXCEPTION
308: /*========================================================================
309:
310: PROCEDURE NAME: process
311:
312: PURPOSE: Table hadndler API for VEA_LAYER_LICENSES table.
313:
314: It inserts/updates a record in VEA_LAYER_LICENSES table.
315:
316: ========================================================================*/
310: PROCEDURE NAME: process
311:
312: PURPOSE: Table hadndler API for VEA_LAYER_LICENSES table.
313:
314: It inserts/updates a record in VEA_LAYER_LICENSES table.
315:
316: ========================================================================*/
317: PROCEDURE
318: process
323: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
324: x_return_status OUT NOCOPY VARCHAR2,
325: x_msg_count OUT NOCOPY NUMBER,
326: x_msg_data OUT NOCOPY VARCHAR2,
327: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
328: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
329: p_description IN vea_layer_licenses.description%TYPE,
330: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
331: )
324: x_return_status OUT NOCOPY VARCHAR2,
325: x_msg_count OUT NOCOPY NUMBER,
326: x_msg_data OUT NOCOPY VARCHAR2,
327: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
328: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
329: p_description IN vea_layer_licenses.description%TYPE,
330: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
331: )
332: IS
325: x_msg_count OUT NOCOPY NUMBER,
326: x_msg_data OUT NOCOPY VARCHAR2,
327: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
328: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
329: p_description IN vea_layer_licenses.description%TYPE,
330: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
331: )
332: IS
333: --{
326: x_msg_data OUT NOCOPY VARCHAR2,
327: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
328: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
329: p_description IN vea_layer_licenses.description%TYPE,
330: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
331: )
332: IS
333: --{
334: l_api_name CONSTANT VARCHAR2(30) := 'process';
343: --
344: --
345: CURSOR layer_cur
346: (
347: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
348: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
349: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
350: )
351: IS
344: --
345: CURSOR layer_cur
346: (
347: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
348: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
349: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
350: )
351: IS
352: SELECT 1 id
345: CURSOR layer_cur
346: (
347: p_layer_provider_code IN vea_layer_licenses.layer_provider_code%TYPE,
348: p_customer_name IN vea_layer_licenses.customer_name%TYPE,
349: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
350: )
351: IS
352: SELECT 1 id
353: FROM vea_layer_licenses
349: p_tp_layer_id IN vea_layer_licenses.tp_layer_id%TYPE
350: )
351: IS
352: SELECT 1 id
353: FROM vea_layer_licenses
354: WHERE layer_provider_code = p_layer_provider_code
355: AND tp_layer_id = p_tp_layer_id
356: AND customer_name = p_customer_name;
357: --
524: --}
525: --}
526: END process;
527: --}
528: END VEA_LAYER_LICENSES_SV;