[Home] [Help]
16: l_exists varchar2(1);
17: --
18: BEGIN
19: --
20: hr_utility.set_location('Entering:'|| l_proc, 10);
21:
22: open csr_unique;
23: fetch csr_unique into l_exists;
24:
30:
31: end if;
32: close csr_unique;
33:
34: hr_utility.set_location('Leaving:'|| l_proc, 20);
35: --
36: END chk_unique;
37:
38: PROCEDURE chk_mandatory_arg( p_argument in varchar2 , p_column in varchar2 )
41: l_proc varchar2(72) := g_package||'chk_mandatory_arg';
42: --
43: BEGIN
44: --
45: hr_utility.set_location('Entering:'|| l_proc, 10);
46:
47: if p_argument is null then
48: fnd_message.set_name( 'PAY', 'PAY_75178_NO_DATA' );
49: fnd_message.set_token('VALUE1' , l_proc);
50: fnd_message.set_token('VALUE2' , p_column ) ;
51: fnd_message.raise_error;
52: end if;
53:
54: hr_utility.set_location(' Leaving:'|| l_proc, 20);
55: --
56: END chk_mandatory_arg;
57:
58: PROCEDURE chk_upgrade_definition_id( p_upgrade_definition_id in number )
67: where upgrade_definition_id = p_upgrade_definition_id ;
68: --
69: BEGIN
70: --
71: hr_utility.set_location('Entering:'|| l_proc, 10);
72:
73: open csr_upgrade_definition ;
74: fetch csr_upgrade_definition into l_legislatively_enabled;
75:
88: fnd_message.raise_error;
89:
90: end if;
91:
92: hr_utility.set_location('Leaving:'|| l_proc, 20);
93: --
94: END chk_upgrade_definition_id;
95:
96: PROCEDURE chk_legislation_code( p_legislation_code in varchar2 )
105: l_proc varchar2(100) := g_package || 'chk_legislation_code';
106: --
107: BEGIN
108: --
109: hr_utility.set_location('Entering:'|| l_proc, 10);
110:
111: open csr_legislation_code;
112: fetch csr_legislation_code into l_exists ;
113:
117: fnd_message.raise_error;
118: end if;
119: close csr_legislation_code;
120:
121: hr_utility.set_location(' Leaving:'|| l_proc, 20);
122: --
123: END chk_legislation_code;
124:
125: PROCEDURE chk_delete ( p_upgrade_definition_id in number
139: l_proc varchar2(100) := g_package || 'chk_delete';
140: --
141: BEGIN
142: --
143: hr_utility.set_location('Entering:'|| l_proc, 10);
144:
145: open csr_delete;
146: fetch csr_delete into l_exists ;
147:
151: fnd_message.raise_error;
152: end if;
153: close csr_delete;
154:
155: hr_utility.set_location(' Leaving:'|| l_proc, 20);
156: --
157: END chk_delete;
158:
159:
176: and legislation_code = p_legislation_code;
177: --
178: BEGIN
179: --
180: hr_utility.set_location('Entering:'|| l_proc, 10);
181:
182: -- Check for mandatory arguments.
183:
184: chk_mandatory_arg( p_upgrade_definition_id , 'UPGRADE_DEFINITION_ID' );
227: end if;
228:
229: close csr_exists;
230:
231: hr_utility.set_location(' Leaving:'|| l_proc, 20);
232: --
233: END Insert_Row;
234:
235: PROCEDURE Lock_Row (
249: l_proc varchar2(100) := g_package || 'Lock_Row';
250: --
251: BEGIN
252: --
253: hr_utility.set_location('Entering:'|| l_proc, 10);
254:
255: -- Lock the table record.
256:
257: open csr_lck;
263: end if;
264: close csr_lck;
265:
266:
267: hr_utility.set_location(' Leaving:'|| l_proc, 20);
268: return;
269: --
270: END Lock_Row;
271:
277: l_proc varchar2(100) := g_package || 'Delete_Row';
278: --
279: BEGIN
280: --
281: hr_utility.set_location('Entering:'|| l_proc, 10);
282:
283: chk_mandatory_arg( p_upgrade_definition_id , 'UPGRADE_DEFINITION_ID' );
284:
285: chk_mandatory_arg( p_legislation_code, 'LEGISLATION_CODE' );
293: if (sql%notfound) then
294: raise no_data_found;
295: end if;
296:
297: hr_utility.set_location(' Leaving:'|| l_proc, 20);
298: --
299: END Delete_Row;
300:
301: PROCEDURE Load_Row (
328:
329: --
330: BEGIN
331: --
332: hr_utility.set_location('Entering:'|| l_proc, 10);
333:
334: if p_owner = 'SEED' then
335: hr_general2.init_fndload
336: (p_resp_appl_id => 801
388: );
389:
390: end if;
391:
392: hr_utility.set_location('Leaving:'|| l_proc, 20);
393: --
394: END Load_Row;
395:
396: END PAY_UPGRADE_LEGISLATIONS_PKG;