53: IF NOT hr_oty_shd.api_updating
54: (p_option_type_id => p_rec.option_type_id
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
54: (p_option_type_id => p_rec.option_type_id
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62:
55: ,p_object_version_number => p_rec.object_version_number
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62:
63: if nvl(p_rec.option_type_key, hr_api.g_varchar2) <>
56: ) THEN
57: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
58: fnd_message.set_token('PROCEDURE ', l_proc);
59: fnd_message.set_token('STEP ', '5');
60: fnd_message.raise_error;
61: END IF;
62:
63: if nvl(p_rec.option_type_key, hr_api.g_varchar2) <>
64: nvl(hr_oty_shd.g_old_rec.option_type_key
122: fetch csr_key into l_key;
123: if (csr_key%found)
124: then
125: close csr_key;
126: fnd_message.set_name('PER','PER_449945_OTY_OPTION_KEY_DUP');
127: fnd_message.raise_error;
128: end if;
129: close csr_key;
130:
123: if (csr_key%found)
124: then
125: close csr_key;
126: fnd_message.set_name('PER','PER_449945_OTY_OPTION_KEY_DUP');
127: fnd_message.raise_error;
128: end if;
129: close csr_key;
130:
131: hr_utility.set_location(' Leaving:'||l_proc,30);
203: l_view_name:=substr(upper(p_display_type),length(l_lookup)+1);
204:
205:
206: if l_view_name is null then
207: fnd_message.set_name ( 'PER','PER_449947_OTY_DIS_TY_NOVO');
208: -- Specify VOName for lookup
209: fnd_message.raise_error;
210: end if;
211:
205:
206: if l_view_name is null then
207: fnd_message.set_name ( 'PER','PER_449947_OTY_DIS_TY_NOVO');
208: -- Specify VOName for lookup
209: fnd_message.raise_error;
210: end if;
211:
212: ELSE
213: fnd_message.set_name ( 'PER' ,'PER_449946_OTY_DIS_TY_INVALID');
209: fnd_message.raise_error;
210: end if;
211:
212: ELSE
213: fnd_message.set_name ( 'PER' ,'PER_449946_OTY_DIS_TY_INVALID');
214: --Please specify display type as either textfield or lookup:
215: fnd_message.raise_error;
216: END IF;
217:
211:
212: ELSE
213: fnd_message.set_name ( 'PER' ,'PER_449946_OTY_DIS_TY_INVALID');
214: --Please specify display type as either textfield or lookup:
215: fnd_message.raise_error;
216: END IF;
217:
218: hr_utility.set_location(' Leaving:'||l_proc,30);
219: exception
287: open csr_maintenance_option;
288: fetch csr_maintenance_option into l_exists;
289: if csr_maintenance_option%found then
290: close csr_maintenance_option;
291: fnd_message.set_name('PER', 'PER_449948_OTY_OPT_MAIN_EXIST');
292: fnd_message.raise_error;
293: end if;
294: close csr_maintenance_option;
295:
288: fetch csr_maintenance_option into l_exists;
289: if csr_maintenance_option%found then
290: close csr_maintenance_option;
291: fnd_message.set_name('PER', 'PER_449948_OTY_OPT_MAIN_EXIST');
292: fnd_message.raise_error;
293: end if;
294: close csr_maintenance_option;
295:
296: hr_utility.set_location('Checking for TL:'|| l_proc, 20);
297: open csr_maintenance_tl;
298: fetch csr_maintenance_tl into l_exists_tl;
299: if csr_maintenance_tl%found then
300: close csr_maintenance_tl;
301: fnd_message.set_name('PER', 'PER_449949_OTY_OP_TL_EXIST');
302: fnd_message.raise_error;
303: end if;
304: close csr_maintenance_tl;
305:
298: fetch csr_maintenance_tl into l_exists_tl;
299: if csr_maintenance_tl%found then
300: close csr_maintenance_tl;
301: fnd_message.set_name('PER', 'PER_449949_OTY_OP_TL_EXIST');
302: fnd_message.raise_error;
303: end if;
304: close csr_maintenance_tl;
305:
306: hr_utility.set_location(' Leaving:'|| l_proc, 30);