APPS.PAY_FUNCTIONAL_AREAS_PKG dependencies on PAY_FUNCTIONAL_AREAS

Line 1: PACKAGE BODY pay_functional_areas_pkg AS

1: PACKAGE BODY pay_functional_areas_pkg AS
2: -- $Header: pypfaapi.pkb 115.3 2002/12/11 15:13:18 exjones noship $
3: --
4: ----------------------------------------------------------------------------------
5: PROCEDURE lock_row(

Line 13: FROM pay_functional_areas

9: p_description IN VARCHAR2
10: ) IS
11: CURSOR csr_functional_area IS
12: SELECT *
13: FROM pay_functional_areas
14: WHERE rowid = p_row_id
15: FOR UPDATE OF
16: area_id NOWAIT;
17: --

Line 28: 'PAY_FUNCTIONAL_AREAS_PKG.LOCK_ROW'

24: CLOSE csr_functional_area;
25: Hr_Utility.Set_Message(801,'HR_6153_ALL_PROCEDURE_FAIL');
26: Hr_Utility.Set_Message_Token(
27: 'PROCEDURE',
28: 'PAY_FUNCTIONAL_AREAS_PKG.LOCK_ROW'
29: );
30: END IF;
31: CLOSE csr_functional_area;
32: --

Line 56: SELECT pay_functional_areas_s.NEXTVAL

52: p_description IN VARCHAR2
53: ) IS
54: --
55: CURSOR csr_new_id IS
56: SELECT pay_functional_areas_s.NEXTVAL
57: FROM dual;
58: --
59: CURSOR csr_area_rowid IS
60: SELECT rowid

Line 61: FROM pay_functional_areas

57: FROM dual;
58: --
59: CURSOR csr_area_rowid IS
60: SELECT rowid
61: FROM pay_functional_areas
62: WHERE area_id = p_area_id;
63: --
64: BEGIN
65: --

Line 70: INSERT INTO pay_functional_areas(

66: OPEN csr_new_id;
67: FETCH csr_new_id INTO p_area_id;
68: CLOSE csr_new_id;
69: --
70: INSERT INTO pay_functional_areas(
71: area_id,
72: short_name,
73: description
74: ) VALUES (

Line 87: 'PAY_FUNCTIONAL_AREAS_PKG.INSERT_ROW'

83: CLOSE csr_area_rowid;
84: Hr_Utility.Set_Message(801,'HR_6153_ALL_PROCEDURE_FAIL');
85: Hr_Utility.Set_Message_Token(
86: 'PROCEDURE',
87: 'PAY_FUNCTIONAL_AREAS_PKG.INSERT_ROW'
88: );
89: END IF;
90: CLOSE csr_area_rowid;
91: --

Line 102: UPDATE pay_functional_areas

98: p_short_name IN VARCHAR2,
99: p_description IN VARCHAR2
100: ) IS
101: BEGIN
102: UPDATE pay_functional_areas
103: SET area_id = p_area_id,
104: short_name = p_short_name,
105: description = p_description
106: WHERE rowid = p_row_id;

Line 112: 'PAY_FUNCTIONAL_AREAS_PKG.UPDATE_ROW'

108: IF SQL%NOTFOUND THEN
109: Hr_Utility.Set_Message(801,'HR_6153_ALL_PROCEDURE_FAIL');
110: Hr_Utility.Set_Message_Token(
111: 'PROCEDURE',
112: 'PAY_FUNCTIONAL_AREAS_PKG.UPDATE_ROW'
113: );
114: END IF;
115: END update_row;
116: ----------------------------------------------------------------------------------

Line 123: FROM pay_functional_areas

119: p_area_id IN NUMBER
120: ) IS
121: BEGIN
122: DELETE
123: FROM pay_functional_areas
124: WHERE rowid = p_row_id;
125: --
126: IF SQL%NOTFOUND THEN
127: Hr_Utility.Set_Message(801,'HR_6153_ALL_PROCEDURE_FAIL');

Line 130: 'PAY_FUNCTIONAL_AREAS_PKG.DELETE_ROW'

126: IF SQL%NOTFOUND THEN
127: Hr_Utility.Set_Message(801,'HR_6153_ALL_PROCEDURE_FAIL');
128: Hr_Utility.Set_Message_Token(
129: 'PROCEDURE',
130: 'PAY_FUNCTIONAL_AREAS_PKG.DELETE_ROW'
131: );
132: END IF;
133: END delete_row;
134: -----------------------------------------------------------------------------------

Line 153: from pay_functional_areas pfa

149: l_dummy_number number;
150: --
151: cursor csr_duplicate is
152: select null
153: from pay_functional_areas pfa
154: where pfa.short_name = p_short_name
155: and (pfa.area_id <> p_area_id
156: or p_area_id is null);
157: --

Line 160: hr_utility.set_location('PAY_FUNCTIONAL_AREAS_PKG.NAME_IS_NOT_UNIQUE',1);

156: or p_area_id is null);
157: --
158: begin
159: --
160: hr_utility.set_location('PAY_FUNCTIONAL_AREAS_PKG.NAME_IS_NOT_UNIQUE',1);
161: --
162: open csr_duplicate;
163: fetch csr_duplicate into l_dummy_number;
164: v_name_duplicated := csr_duplicate%found;

Line 172: END pay_functional_areas_pkg;

168: --
169: end name_is_not_unique;
170: --
171:
172: END pay_functional_areas_pkg;