APPS.FND_CACHE_VERSIONS_PKG dependencies on FND_CACHE_VERSIONS

Line 1: package body FND_CACHE_VERSIONS_PKG as

1: package body FND_CACHE_VERSIONS_PKG as
2: /* $Header: AFCCHVRB.pls 120.4.12020000.2 2012/08/03 15:32:28 rarmaly ship $ */
3:
4:
5: /* Arrays for bulk collects */

Line 6: TYPE NameTab IS TABLE OF FND_CACHE_VERSIONS.NAME%TYPE;

2: /* $Header: AFCCHVRB.pls 120.4.12020000.2 2012/08/03 15:32:28 rarmaly ship $ */
3:
4:
5: /* Arrays for bulk collects */
6: TYPE NameTab IS TABLE OF FND_CACHE_VERSIONS.NAME%TYPE;
7: TYPE VersTab IS TABLE OF FND_CACHE_VERSIONS.VERSION%TYPE;
8: cacheName NameTab;
9: cacheVersion VersTab;
10:

Line 7: TYPE VersTab IS TABLE OF FND_CACHE_VERSIONS.VERSION%TYPE;

3:
4:
5: /* Arrays for bulk collects */
6: TYPE NameTab IS TABLE OF FND_CACHE_VERSIONS.NAME%TYPE;
7: TYPE VersTab IS TABLE OF FND_CACHE_VERSIONS.VERSION%TYPE;
8: cacheName NameTab;
9: cacheVersion VersTab;
10:
11: /*

Line 13: * Use this API to do a bulk collect on FND_CACHE_VERSIONS

9: cacheVersion VersTab;
10:
11: /*
12: * get_values
13: * Use this API to do a bulk collect on FND_CACHE_VERSIONS
14: */
15: procedure get_values is
16: begin
17: select NAME, VERSION

Line 19: from FND_CACHE_VERSIONS;

15: procedure get_values is
16: begin
17: select NAME, VERSION
18: bulk collect into cacheName, cacheVersion
19: from FND_CACHE_VERSIONS;
20: end;
21:
22: /*
23: * add_cache_name

Line 24: * Use this API to add an entry in FND_CACHE_VERSIONS

20: end;
21:
22: /*
23: * add_cache_name
24: * Use this API to add an entry in FND_CACHE_VERSIONS
25: *
26: * IN
27: * p_name - name of cache
28: *

Line 34: -- Add a record into FND_CACHE_VERSIONS

30: procedure add_cache_name (p_name varchar2)
31: is
32: begin
33:
34: -- Add a record into FND_CACHE_VERSIONS
35: insert into FND_CACHE_VERSIONS(
36: NAME,
37: VERSION
38: ) values (

Line 35: insert into FND_CACHE_VERSIONS(

31: is
32: begin
33:
34: -- Add a record into FND_CACHE_VERSIONS
35: insert into FND_CACHE_VERSIONS(
36: NAME,
37: VERSION
38: ) values (
39: p_name,

Line 48: * Use this API to increase the version by 1 in FND_CACHE_VERSIONS

44: end;
45:
46: /*
47: * bump_version
48: * Use this API to increase the version by 1 in FND_CACHE_VERSIONS
49: *
50: * IN
51: * p_name - name of cache
52: *

Line 64: -- Try to update FND_CACHE_VERSIONS given the name.

60: PRAGMA AUTONOMOUS_TRANSACTION;
61:
62: begin
63:
64: -- Try to update FND_CACHE_VERSIONS given the name.
65: update FND_CACHE_VERSIONS
66: set VERSION = VERSION + 1
67: where NAME = p_name;
68:

Line 65: update FND_CACHE_VERSIONS

61:
62: begin
63:
64: -- Try to update FND_CACHE_VERSIONS given the name.
65: update FND_CACHE_VERSIONS
66: set VERSION = VERSION + 1
67: where NAME = p_name;
68:
69: -- If name does not exist, insert the name using add_version.

Line 84: * Use this API to get the current version in FND_CACHE_VERSIONS

80: end;
81:
82: /*
83: * get_version
84: * Use this API to get the current version in FND_CACHE_VERSIONS
85: *
86: * IN
87: * p_name - name of cache
88: *

Line 90: * returns the current_version in FND_CACHE_VERSIONS given a name

86: * IN
87: * p_name - name of cache
88: *
89: * RETURN
90: * returns the current_version in FND_CACHE_VERSIONS given a name
91: *
92: * RAISES
93: * Never raises exceptions, returns -1 if name does not exist
94: */

Line 119: /* Bug 5161071:4308360: ORA-06502 FND_CACHE_VERSIONS_PKG.get_version

115: end if;
116: */
117: end if;
118:
119: /* Bug 5161071:4308360: ORA-06502 FND_CACHE_VERSIONS_PKG.get_version
120: * The previous fix for bug 4308360 did not completely resolve the issue
121: * since it was placed in a conditional block. As it happens, the
122: * condition is not satisfied in all cases and the failover is bypassed
123: * causing the ORA-6502 error to be raised.

Line 131: -- met while FND_CACHE_VERSIONS table is empty. Hence, the

127: * would be required.
128: */
129:
130: -- Bug 5161071 shows a case where the 'cacheName is null' condition is not
131: -- met while FND_CACHE_VERSIONS table is empty. Hence, the
132: -- cacheName.COUNT = 0 condition should prevent the ORA-6502 error that
133: -- gets raised when the for loop executes even when cacheName.COUNT = 0.
134: if (cacheName.COUNT = 0) then
135: return -1;

Line 151: * Use this API to get the current version in FND_CACHE_VERSIONS

147: return -1;
148: end;
149: /*
150: * check_version
151: * Use this API to get the current version in FND_CACHE_VERSIONS
152: *
153: * IN
154: * p_name - name of cache
155: *

Line 207: end FND_CACHE_VERSIONS_PKG;

203: return TRUE;
204:
205: end;
206:
207: end FND_CACHE_VERSIONS_PKG;