6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_hts_bus.'; -- Global package name
9:
10: g_debug boolean := hr_utility.debug_enabled;
11: --
12: -- ----------------------------------------------------------------------------
13: -- |-----------------------< chk_non_updateable_args >------------------------|
14: -- ----------------------------------------------------------------------------
118: --
119: l_dup_name varchar2(5) := NULL;
120: --
121: BEGIN
122: g_debug := hr_utility.debug_enabled;
123:
124: if g_debug then
125: l_proc := g_package||'chk_name';
126: hr_utility.set_location('Entering:'||l_proc, 5);
122: g_debug := hr_utility.debug_enabled;
123:
124: if g_debug then
125: l_proc := g_package||'chk_name';
126: hr_utility.set_location('Entering:'||l_proc, 5);
127: end if;
128: --
129: -- check that the name has been entered
130: --
130: --
131: IF p_name IS NULL
132: THEN
133: --
134: hr_utility.set_message(809, 'HXC_0062_HTS_NAME_MAND');
135: hr_utility.raise_error;
136: --
137: END IF;
138: if g_debug then
131: IF p_name IS NULL
132: THEN
133: --
134: hr_utility.set_message(809, 'HXC_0062_HTS_NAME_MAND');
135: hr_utility.raise_error;
136: --
137: END IF;
138: if g_debug then
139: hr_utility.set_location('Processing:'||l_proc, 10);
135: hr_utility.raise_error;
136: --
137: END IF;
138: if g_debug then
139: hr_utility.set_location('Processing:'||l_proc, 10);
140: end if;
141: --
142: -- check that the name is unique
143: --
147: --
148: IF l_dup_name IS NOT NULL
149: THEN
150: --
151: hr_utility.set_message(809, 'HXC_0063_HTS_DUP_NAME');
152: hr_utility.raise_error;
153: --
154: END IF;
155: --
148: IF l_dup_name IS NOT NULL
149: THEN
150: --
151: hr_utility.set_message(809, 'HXC_0063_HTS_DUP_NAME');
152: hr_utility.raise_error;
153: --
154: END IF;
155: --
156: if g_debug then
153: --
154: END IF;
155: --
156: if g_debug then
157: hr_utility.set_location('Leaving:'||l_proc, 20);
158: end if;
159: --
160: END chk_name;
161: --
203: CLOSE csr_chk_dep;
204:
205: IF ( l_used_elsewhere = 'Y' )
206: THEN
207: hr_utility.set_message(809, 'HXC_0064_HTS_IN_USE');
208: hr_utility.raise_error;
209: END IF;
210:
211: END chk_delete;
204:
205: IF ( l_used_elsewhere = 'Y' )
206: THEN
207: hr_utility.set_message(809, 'HXC_0064_HTS_IN_USE');
208: hr_utility.raise_error;
209: END IF;
210:
211: END chk_delete;
212:
220: --
221: l_proc varchar2(72);
222: --
223: Begin
224: g_debug := hr_utility.debug_enabled;
225:
226: if g_debug then
227: l_proc := g_package||'insert_validate';
228: hr_utility.set_location('Entering:'||l_proc, 5);
224: g_debug := hr_utility.debug_enabled;
225:
226: if g_debug then
227: l_proc := g_package||'insert_validate';
228: hr_utility.set_location('Entering:'||l_proc, 5);
229: end if;
230: --
231: -- Call all supporting business operations
232: --
236: -- CLIENT_INFO not set. No lookup validation or joins to HR_LOOKUPS.
237: --
238: --
239: if g_debug then
240: hr_utility.set_location(' Leaving:'||l_proc, 10);
241: end if;
242: End insert_validate;
243: --
244: -- ----------------------------------------------------------------------------
251: --
252: l_proc varchar2(72);
253: --
254: Begin
255: g_debug := hr_utility.debug_enabled;
256:
257: if g_debug then
258: l_proc := g_package||'update_validate';
259: hr_utility.set_location('Entering:'||l_proc, 5);
255: g_debug := hr_utility.debug_enabled;
256:
257: if g_debug then
258: l_proc := g_package||'update_validate';
259: hr_utility.set_location('Entering:'||l_proc, 5);
260: end if;
261: --
262: -- Call all supporting business operations
263: --
272: );
273: --
274: --
275: if g_debug then
276: hr_utility.set_location(' Leaving:'||l_proc, 10);
277: end if;
278: End update_validate;
279: --
280: -- ----------------------------------------------------------------------------
286: --
287: l_proc varchar2(72);
288: --
289: Begin
290: g_debug := hr_utility.debug_enabled;
291:
292: if g_debug then
293: l_proc := g_package||'delete_validate';
294: hr_utility.set_location('Entering:'||l_proc, 5);
290: g_debug := hr_utility.debug_enabled;
291:
292: if g_debug then
293: l_proc := g_package||'delete_validate';
294: hr_utility.set_location('Entering:'||l_proc, 5);
295: end if;
296: --
297: -- Call all supporting business operations
298: --
298: --
299: hxc_hts_bus.chk_delete ( p_time_source_id => p_rec.time_source_id );
300:
301: if g_debug then
302: hr_utility.set_location(' Leaving:'||l_proc, 10);
303: end if;
304: End delete_validate;
305: --
306: end hxc_hts_bus;