APPS.PN_LOCATION_ALIAS_PKG dependencies on PN_LOCATIONS

Line 4: TYPE id_tbl IS TABLE OF pn_locations.location_id%TYPE INDEX BY BINARY_INTEGER;

1: PACKAGE BODY pn_location_alias_pkg AS
2: /* $Header: PNLCALSB.pls 120.2.12010000.2 2008/11/27 04:24:49 rthumma ship $ */
3:
4: TYPE id_tbl IS TABLE OF pn_locations.location_id%TYPE INDEX BY BINARY_INTEGER;
5: TYPE code_tbl IS TABLE OF pn_locations.location_code%TYPE INDEX BY BINARY_INTEGER;
6: TYPE alias_tbl IS TABLE OF pn_locations.location_alias%TYPE INDEX BY BINARY_INTEGER;
7:
8: ------------------------------------------------------------------------------+

Line 5: TYPE code_tbl IS TABLE OF pn_locations.location_code%TYPE INDEX BY BINARY_INTEGER;

1: PACKAGE BODY pn_location_alias_pkg AS
2: /* $Header: PNLCALSB.pls 120.2.12010000.2 2008/11/27 04:24:49 rthumma ship $ */
3:
4: TYPE id_tbl IS TABLE OF pn_locations.location_id%TYPE INDEX BY BINARY_INTEGER;
5: TYPE code_tbl IS TABLE OF pn_locations.location_code%TYPE INDEX BY BINARY_INTEGER;
6: TYPE alias_tbl IS TABLE OF pn_locations.location_alias%TYPE INDEX BY BINARY_INTEGER;
7:
8: ------------------------------------------------------------------------------+
9: -- FUNCTION : get_parent_location_code

Line 6: TYPE alias_tbl IS TABLE OF pn_locations.location_alias%TYPE INDEX BY BINARY_INTEGER;

2: /* $Header: PNLCALSB.pls 120.2.12010000.2 2008/11/27 04:24:49 rthumma ship $ */
3:
4: TYPE id_tbl IS TABLE OF pn_locations.location_id%TYPE INDEX BY BINARY_INTEGER;
5: TYPE code_tbl IS TABLE OF pn_locations.location_code%TYPE INDEX BY BINARY_INTEGER;
6: TYPE alias_tbl IS TABLE OF pn_locations.location_alias%TYPE INDEX BY BINARY_INTEGER;
7:
8: ------------------------------------------------------------------------------+
9: -- FUNCTION : get_parent_location_code
10: --

Line 22: p_loc_id IN pn_locations.location_id%TYPE) RETURN VARCHAR2

18:
19: FUNCTION get_parent_location_code(
20: p_cd_tbl IN code_tbl,
21: p_id_tbl IN id_tbl,
22: p_loc_id IN pn_locations.location_id%TYPE) RETURN VARCHAR2
23: IS
24: l_info VARCHAR2(300);
25: l_desc VARCHAR2(300) := 'pn_location_alias_pkg.get_parent_location_code';
26: l_result pn_locations.location_code%TYPE := '';

Line 26: l_result pn_locations.location_code%TYPE := '';

22: p_loc_id IN pn_locations.location_id%TYPE) RETURN VARCHAR2
23: IS
24: l_info VARCHAR2(300);
25: l_desc VARCHAR2(300) := 'pn_location_alias_pkg.get_parent_location_code';
26: l_result pn_locations.location_code%TYPE := '';
27: BEGIN
28: pnp_debug_pkg.debug(l_desc ||' (+)');
29:
30: l_info := 'starting loop ';

Line 68: p_location_type IN pn_locations.location_type_lookup_code%TYPE,

64:
65: PROCEDURE change_alias(
66: errbuf OUT NOCOPY VARCHAR2,
67: retcode OUT NOCOPY VARCHAR2,
68: p_location_type IN pn_locations.location_type_lookup_code%TYPE,
69: p_location_code IN pn_locations.location_code%TYPE,
70: p_new_alias IN pn_locations.location_alias%TYPE)
71: IS
72: CURSOR impacted_loc IS

Line 69: p_location_code IN pn_locations.location_code%TYPE,

65: PROCEDURE change_alias(
66: errbuf OUT NOCOPY VARCHAR2,
67: retcode OUT NOCOPY VARCHAR2,
68: p_location_type IN pn_locations.location_type_lookup_code%TYPE,
69: p_location_code IN pn_locations.location_code%TYPE,
70: p_new_alias IN pn_locations.location_alias%TYPE)
71: IS
72: CURSOR impacted_loc IS
73: SELECT location_id,

Line 70: p_new_alias IN pn_locations.location_alias%TYPE)

66: errbuf OUT NOCOPY VARCHAR2,
67: retcode OUT NOCOPY VARCHAR2,
68: p_location_type IN pn_locations.location_type_lookup_code%TYPE,
69: p_location_code IN pn_locations.location_code%TYPE,
70: p_new_alias IN pn_locations.location_alias%TYPE)
71: IS
72: CURSOR impacted_loc IS
73: SELECT location_id,
74: parent_location_id,

Line 77: FROM pn_locations_all /*sdm14jul*/

73: SELECT location_id,
74: parent_location_id,
75: location_code,
76: location_alias
77: FROM pn_locations_all /*sdm14jul*/
78: WHERE NVL(TRUNC(ACTIVE_END_DATE), TRUNC(SYSDATE)) >= TRUNC(SYSDATE) /* Bug 6735518 */
79: START WITH location_id = (SELECT location_id FROM
80: (SELECT location_id
81: FROM pn_locations_all

Line 81: FROM pn_locations_all

77: FROM pn_locations_all /*sdm14jul*/
78: WHERE NVL(TRUNC(ACTIVE_END_DATE), TRUNC(SYSDATE)) >= TRUNC(SYSDATE) /* Bug 6735518 */
79: START WITH location_id = (SELECT location_id FROM
80: (SELECT location_id
81: FROM pn_locations_all
82: WHERE location_type_lookup_code = p_location_type
83: AND location_code = p_location_code
84: ORDER BY ACTIVE_START_DATE DESC)
85: WHERE ROWNUM = 1) /* Bug 6735518 */

Line 114: FROM pn_locations_all

110:
111: --Bug#5571818
112: SELECT COUNT(1)
113: INTO l_uniq_loc_count
114: FROM pn_locations_all
115: WHERE location_code = p_new_alias;
116:
117: IF l_uniq_loc_count <> 0 THEN
118: raise INVALID_LOC_CODE;

Line 153: UPDATE pn_locations_all /*sdm14jul*/

149: END LOOP;
150:
151: l_info := 'updating table with new values ';
152: FORALL i IN 0 .. loc_id_tbl.COUNT - 1
153: UPDATE pn_locations_all /*sdm14jul*/
154: SET location_code = new_cd_tbl(i),
155: location_alias = als_nm_tbl(i),
156: last_update_date = SYSDATE,
157: last_updated_by = nvl(fnd_profile.value('USER_ID'), -1),