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 2006/10/27 17:01:17 pdeluna noship $ */
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 2006/10/27 17:01:17 pdeluna noship $ */
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 58: -- Try to update FND_CACHE_VERSIONS given the name.

54: procedure bump_version (p_name varchar2)
55: is
56: begin
57:
58: -- Try to update FND_CACHE_VERSIONS given the name.
59: update FND_CACHE_VERSIONS
60: set VERSION = VERSION + 1
61: where NAME = p_name;
62:

Line 59: update FND_CACHE_VERSIONS

55: is
56: begin
57:
58: -- Try to update FND_CACHE_VERSIONS given the name.
59: update FND_CACHE_VERSIONS
60: set VERSION = VERSION + 1
61: where NAME = p_name;
62:
63: -- If name does not exist, insert the name using add_version.

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

70: end;
71:
72: /*
73: * get_version
74: * Use this API to get the current version in FND_CACHE_VERSIONS
75: *
76: * IN
77: * p_name - name of cache
78: *

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

76: * IN
77: * p_name - name of cache
78: *
79: * RETURN
80: * returns the current_version in FND_CACHE_VERSIONS given a name
81: *
82: * RAISES
83: * Never raises exceptions, returns -1 if name does not exist
84: */

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

105: end if;
106: */
107: end if;
108:
109: /* Bug 5161071:4308360: ORA-06502 FND_CACHE_VERSIONS_PKG.get_version
110: * The previous fix for bug 4308360 did not completely resolve the issue
111: * since it was placed in a conditional block. As it happens, the
112: * condition is not satisfied in all cases and the failover is bypassed
113: * causing the ORA-6502 error to be raised.

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

117: * would be required.
118: */
119:
120: -- Bug 5161071 shows a case where the 'cacheName is null' condition is not
121: -- met while FND_CACHE_VERSIONS table is empty. Hence, the
122: -- cacheName.COUNT = 0 condition should prevent the ORA-6502 error that
123: -- gets raised when the for loop executes even when cacheName.COUNT = 0.
124: if (cacheName.COUNT = 0) then
125: return -1;

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

137: return -1;
138: end;
139: /*
140: * check_version
141: * Use this API to get the current version in FND_CACHE_VERSIONS
142: *
143: * IN
144: * p_name - name of cache
145: *

Line 197: end FND_CACHE_VERSIONS_PKG;

193: return TRUE;
194:
195: end;
196:
197: end FND_CACHE_VERSIONS_PKG;