44: l_proc varchar2(72) := g_package||'set_security_group_id';
45: --
46: begin
47: --
48: hr_utility.set_location('Entering:'|| l_proc, 10);
49: --
50: -- Ensure that all the mandatory parameter are not null
51: --
52: hr_api.mandatory_arg_error
79: (p_security_group_id => l_security_group_id
80: );
81: end if;
82: --
83: hr_utility.set_location(' Leaving:'|| l_proc, 20);
84: --
85: end set_security_group_id;
86: --
87: -- ---------------------------------------------------------------------------
115: l_proc varchar2(72) := g_package||'return_legislation_code';
116: --
117: Begin
118: --
119: hr_utility.set_location('Entering:'|| l_proc, 10);
120: --
121: -- Ensure that all the mandatory parameter are not null
122: --
123: hr_api.mandatory_arg_error
133: -- call to this function. Just return the value in the global
134: -- variable.
135: --
136: l_legislation_code := pqh_rla_bus.g_legislation_code;
137: hr_utility.set_location(l_proc, 20);
138: else
139: --
140: -- The ID is different to the last call to this function
141: -- or this is the first call to this function.
150: close csr_leg_code;
151: fnd_message.set_name('PAY','HR_7220_INVALID_PRIMARY_KEY');
152: fnd_message.raise_error;
153: end if;
154: hr_utility.set_location(l_proc,30);
155: --
156: -- Set the global variables so the values are
157: -- available for the next call to this function.
158: --
159: close csr_leg_code;
160: pqh_rla_bus.g_rule_attribute_id := p_rule_attribute_id;
161: pqh_rla_bus.g_legislation_code := l_legislation_code;
162: end if;
163: hr_utility.set_location(' Leaving:'|| l_proc, 40);
164: return l_legislation_code;
165: end return_legislation_code;
166: --
167: -- ----------------------------------------------------------------------------
235: l_proc varchar2(72) := g_package || 'chk_unique_attributes';
236: --
237: cnt number;
238: Begin
239: hr_utility.set_location(' Entering:'|| l_proc, 10);
240: select count(*) into cnt from pqh_rule_attributes where
241: rule_set_id = p_rec.rule_set_id
242: and
243: rule_attribute_id <> nvl(p_rec.rule_attribute_id, 0)
248: and
249: ((attribute_value is null and p_rec.attribute_value is null) or (attribute_value = p_rec.attribute_value));
250:
251: if cnt > 0 then
252: hr_utility.set_message(8302, 'PQH_CBR_UNIQUE_ATTRIBUTES');
253: hr_utility.raise_error;
254: end if;
255: --
256: hr_utility.set_location(' Leaving:'|| l_proc, 20);
249: ((attribute_value is null and p_rec.attribute_value is null) or (attribute_value = p_rec.attribute_value));
250:
251: if cnt > 0 then
252: hr_utility.set_message(8302, 'PQH_CBR_UNIQUE_ATTRIBUTES');
253: hr_utility.raise_error;
254: end if;
255: --
256: hr_utility.set_location(' Leaving:'|| l_proc, 20);
257: End chk_unique_attributes;
252: hr_utility.set_message(8302, 'PQH_CBR_UNIQUE_ATTRIBUTES');
253: hr_utility.raise_error;
254: end if;
255: --
256: hr_utility.set_location(' Leaving:'|| l_proc, 20);
257: End chk_unique_attributes;
258:
259: --
260: -- ----------------------------------------------------------------------------
298: select to_number(p_rec.attribute_value) into att_val from dual;
299: end if;
300: end if;
301: else
302: hr_utility.set_message(8302, 'PQH_ATTRIBUTE_NOT_FOUND');
303: hr_utility.raise_error;
304: end if;
305: exception when others then
306: hr_utility.set_message(8302, 'PQH_CBR_NUMBER_ATTRIBUTE');
299: end if;
300: end if;
301: else
302: hr_utility.set_message(8302, 'PQH_ATTRIBUTE_NOT_FOUND');
303: hr_utility.raise_error;
304: end if;
305: exception when others then
306: hr_utility.set_message(8302, 'PQH_CBR_NUMBER_ATTRIBUTE');
307: hr_utility.raise_error;
302: hr_utility.set_message(8302, 'PQH_ATTRIBUTE_NOT_FOUND');
303: hr_utility.raise_error;
304: end if;
305: exception when others then
306: hr_utility.set_message(8302, 'PQH_CBR_NUMBER_ATTRIBUTE');
307: hr_utility.raise_error;
308: End chk_attribute_datatype;
309:
310: --
303: hr_utility.raise_error;
304: end if;
305: exception when others then
306: hr_utility.set_message(8302, 'PQH_CBR_NUMBER_ATTRIBUTE');
307: hr_utility.raise_error;
308: End chk_attribute_datatype;
309:
310: --
311: -- ----------------------------------------------------------------------------
317: --
318: l_proc varchar2(72) := g_package||'insert_validate';
319: --
320: Begin
321: hr_utility.set_location('Entering:'||l_proc, 5);
322: --
323: -- Call all supporting business operations
324: --
325: --
342: chk_attribute_datatype
343: (p_rec => p_rec
344: );
345:
346: hr_utility.set_location(' Leaving:'||l_proc, 10);
347: End insert_validate;
348: --
349: -- ----------------------------------------------------------------------------
350: -- |---------------------------< update_validate >----------------------------|
355: --
356: l_proc varchar2(72) := g_package||'update_validate';
357: --
358: Begin
359: hr_utility.set_location('Entering:'||l_proc, 5);
360: --
361: -- Call all supporting business operations
362: --
363: --
382: chk_attribute_datatype
383: (p_rec => p_rec
384: );
385: --
386: hr_utility.set_location(' Leaving:'||l_proc, 10);
387: End update_validate;
388: --
389: -- ----------------------------------------------------------------------------
390: -- |---------------------------< delete_validate >----------------------------|
395: --
396: l_proc varchar2(72) := g_package||'delete_validate';
397: --
398: Begin
399: hr_utility.set_location('Entering:'||l_proc, 5);
400: --
401: -- Call all supporting business operations
402: --
403: hr_utility.set_location(' Leaving:'||l_proc, 10);
399: hr_utility.set_location('Entering:'||l_proc, 5);
400: --
401: -- Call all supporting business operations
402: --
403: hr_utility.set_location(' Leaving:'||l_proc, 10);
404: End delete_validate;
405: --
406: end pqh_rla_bus;