102: IF NOT hr_fwn_shd.api_updating
103: (p_form_window_id => p_rec.form_window_id
104: ,p_object_version_number => p_rec.object_version_number
105: ) THEN
106: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
107: fnd_message.set_token('PROCEDURE ', l_proc);
108: fnd_message.set_token('STEP ', '5');
109: fnd_message.raise_error;
110: END IF;
103: (p_form_window_id => p_rec.form_window_id
104: ,p_object_version_number => p_rec.object_version_number
105: ) THEN
106: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
107: fnd_message.set_token('PROCEDURE ', l_proc);
108: fnd_message.set_token('STEP ', '5');
109: fnd_message.raise_error;
110: END IF;
111: --
104: ,p_object_version_number => p_rec.object_version_number
105: ) THEN
106: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
107: fnd_message.set_token('PROCEDURE ', l_proc);
108: fnd_message.set_token('STEP ', '5');
109: fnd_message.raise_error;
110: END IF;
111: --
112: IF (nvl(p_rec.application_id,hr_api.g_number) <>
105: ) THEN
106: fnd_message.set_name('PER', 'HR_6153_ALL_PROCEDURE_FAIL');
107: fnd_message.set_token('PROCEDURE ', l_proc);
108: fnd_message.set_token('STEP ', '5');
109: fnd_message.raise_error;
110: END IF;
111: --
112: IF (nvl(p_rec.application_id,hr_api.g_number) <>
113: nvl(hr_fwn_shd.g_old_rec.application_id,hr_api.g_number)
165: FETCH cur_chk_app_id INTO l_check;
166: IF cur_chk_app_id%NOTFOUND THEN
167: CLOSE cur_chk_app_id;
168: -- error message
169: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
170: fnd_message.set_token('PROCEDURE', l_proc);
171: fnd_message.set_token('STEP','10');
172: fnd_message.raise_error;
173: END IF;
166: IF cur_chk_app_id%NOTFOUND THEN
167: CLOSE cur_chk_app_id;
168: -- error message
169: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
170: fnd_message.set_token('PROCEDURE', l_proc);
171: fnd_message.set_token('STEP','10');
172: fnd_message.raise_error;
173: END IF;
174: CLOSE cur_chk_app_id;
167: CLOSE cur_chk_app_id;
168: -- error message
169: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
170: fnd_message.set_token('PROCEDURE', l_proc);
171: fnd_message.set_token('STEP','10');
172: fnd_message.raise_error;
173: END IF;
174: CLOSE cur_chk_app_id;
175: --
168: -- error message
169: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
170: fnd_message.set_token('PROCEDURE', l_proc);
171: fnd_message.set_token('STEP','10');
172: fnd_message.raise_error;
173: END IF;
174: CLOSE cur_chk_app_id;
175: --
176: hr_utility.set_location('Leaving:'||l_proc, 100);
210: FETCH cur_chk_form_id INTO l_check;
211: IF cur_chk_form_id%NOTFOUND THEN
212: CLOSE cur_chk_form_id;
213: -- error message
214: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
215: fnd_message.set_token('PROCEDURE', l_proc);
216: fnd_message.set_token('STEP','10');
217: fnd_message.raise_error;
218: END IF;
211: IF cur_chk_form_id%NOTFOUND THEN
212: CLOSE cur_chk_form_id;
213: -- error message
214: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
215: fnd_message.set_token('PROCEDURE', l_proc);
216: fnd_message.set_token('STEP','10');
217: fnd_message.raise_error;
218: END IF;
219: CLOSE cur_chk_form_id;
212: CLOSE cur_chk_form_id;
213: -- error message
214: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
215: fnd_message.set_token('PROCEDURE', l_proc);
216: fnd_message.set_token('STEP','10');
217: fnd_message.raise_error;
218: END IF;
219: CLOSE cur_chk_form_id;
220: --
213: -- error message
214: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
215: fnd_message.set_token('PROCEDURE', l_proc);
216: fnd_message.set_token('STEP','10');
217: fnd_message.raise_error;
218: END IF;
219: CLOSE cur_chk_form_id;
220: --
221: hr_utility.set_location('Leaving:'||l_proc, 100);
246: --
247: -- Check value is in uppercase
248: --
249: if p_window_name <> upper(p_window_name) then
250: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
251: fnd_message.set_token('PROCEDURE', l_proc);
252: fnd_message.set_token('STEP','10');
253: fnd_message.raise_error;
254: end if;
247: -- Check value is in uppercase
248: --
249: if p_window_name <> upper(p_window_name) then
250: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
251: fnd_message.set_token('PROCEDURE', l_proc);
252: fnd_message.set_token('STEP','10');
253: fnd_message.raise_error;
254: end if;
255: --
248: --
249: if p_window_name <> upper(p_window_name) then
250: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
251: fnd_message.set_token('PROCEDURE', l_proc);
252: fnd_message.set_token('STEP','10');
253: fnd_message.raise_error;
254: end if;
255: --
256: hr_utility.set_location('Leaving:'||l_proc, 100);
249: if p_window_name <> upper(p_window_name) then
250: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
251: fnd_message.set_token('PROCEDURE', l_proc);
252: fnd_message.set_token('STEP','10');
253: fnd_message.raise_error;
254: end if;
255: --
256: hr_utility.set_location('Leaving:'||l_proc, 100);
257: End chk_window_name;