143: fetch C_FID1 into formula_id;
144: --
145: if C_FID1%notfound then
146: close C_FID1;
147: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
148: fnd_message.set_token('PACKAGE','PAYWSDAS');
149: fnd_message.set_token('FUNCTION','GET_FORMULA_TYPE');
150: fnd_message.raise_error;
151: end if;
144: --
145: if C_FID1%notfound then
146: close C_FID1;
147: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
148: fnd_message.set_token('PACKAGE','PAYWSDAS');
149: fnd_message.set_token('FUNCTION','GET_FORMULA_TYPE');
150: fnd_message.raise_error;
151: end if;
152: --
145: if C_FID1%notfound then
146: close C_FID1;
147: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
148: fnd_message.set_token('PACKAGE','PAYWSDAS');
149: fnd_message.set_token('FUNCTION','GET_FORMULA_TYPE');
150: fnd_message.raise_error;
151: end if;
152: --
153: close C_FID1;
146: close C_FID1;
147: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
148: fnd_message.set_token('PACKAGE','PAYWSDAS');
149: fnd_message.set_token('FUNCTION','GET_FORMULA_TYPE');
150: fnd_message.raise_error;
151: end if;
152: --
153: close C_FID1;
154: return(formula_id);
168: open C_ASS1;
169: fetch C_ASS1 into ass_sets;
170: if C_ASS1%notfound then
171: close C_ASS1;
172: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
173: fnd_message.set_token('PACKAGE','PAYWSDAS');
174: fnd_message.set_token('FUNCTION','GET_ASSIGNMENT_SETS_S');
175: fnd_message.raise_error;
176: else
169: fetch C_ASS1 into ass_sets;
170: if C_ASS1%notfound then
171: close C_ASS1;
172: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
173: fnd_message.set_token('PACKAGE','PAYWSDAS');
174: fnd_message.set_token('FUNCTION','GET_ASSIGNMENT_SETS_S');
175: fnd_message.raise_error;
176: else
177: close C_ASS1;
170: if C_ASS1%notfound then
171: close C_ASS1;
172: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
173: fnd_message.set_token('PACKAGE','PAYWSDAS');
174: fnd_message.set_token('FUNCTION','GET_ASSIGNMENT_SETS_S');
175: fnd_message.raise_error;
176: else
177: close C_ASS1;
178: return(ass_sets);
171: close C_ASS1;
172: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
173: fnd_message.set_token('PACKAGE','PAYWSDAS');
174: fnd_message.set_token('FUNCTION','GET_ASSIGNMENT_SETS_S');
175: fnd_message.raise_error;
176: else
177: close C_ASS1;
178: return(ass_sets);
179: end if;
195: fetch C_FID2 into formula_id;
196: --
197: if C_FID2%notfound then
198: close C_FID2;
199: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
200: fnd_message.set_token('PROCEDURE','PAYWSDAS');
201: fnd_message.set_token('STEP','GET_FORMULA_ID');
202: fnd_message.raise_error;
203: end if;
196: --
197: if C_FID2%notfound then
198: close C_FID2;
199: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
200: fnd_message.set_token('PROCEDURE','PAYWSDAS');
201: fnd_message.set_token('STEP','GET_FORMULA_ID');
202: fnd_message.raise_error;
203: end if;
204: --
197: if C_FID2%notfound then
198: close C_FID2;
199: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
200: fnd_message.set_token('PROCEDURE','PAYWSDAS');
201: fnd_message.set_token('STEP','GET_FORMULA_ID');
202: fnd_message.raise_error;
203: end if;
204: --
205: close C_FID2;
198: close C_FID2;
199: fnd_message.set_name('PAY','HR_6153_ALL_PROCEDURE_FAIL');
200: fnd_message.set_token('PROCEDURE','PAYWSDAS');
201: fnd_message.set_token('STEP','GET_FORMULA_ID');
202: fnd_message.raise_error;
203: end if;
204: --
205: close C_FID2;
206: return(formula_id);
247: fetch C_AMD2 into dummy;
248: --
249: if C_AMD2%found then
250: close C_AMD2;
251: fnd_message.set_name('PAY','HR_6941_PAY_AMENDMENTS_EXIST');
252: fnd_message.raise_error;
253: end if;
254: --
255: close C_AMD2;
248: --
249: if C_AMD2%found then
250: close C_AMD2;
251: fnd_message.set_name('PAY','HR_6941_PAY_AMENDMENTS_EXIST');
252: fnd_message.raise_error;
253: end if;
254: --
255: close C_AMD2;
256: end;
276: fetch C_AMD5 into dummy;
277: --
278: if C_AMD5%found then
279: close C_AMD5;
280: fnd_message.set_name('PAY','HR_6942_PAY_DUPLICATE_AMEND');
281: fnd_message.raise_error;
282: end if;
283: --
284: close C_AMD5;
277: --
278: if C_AMD5%found then
279: close C_AMD5;
280: fnd_message.set_name('PAY','HR_6942_PAY_DUPLICATE_AMEND');
281: fnd_message.raise_error;
282: end if;
283: --
284: close C_AMD5;
285: end;
303: fetch C_AMD3 into dummy;
304: --
305: if C_AMD3%found then
306: close C_AMD3;
307: fnd_message.set_name('PAY','HR_6944_PAY_DIFFERENT_AMEND');
308: fnd_message.raise_error;
309: end if;
310: --
311: close C_AMD3;
304: --
305: if C_AMD3%found then
306: close C_AMD3;
307: fnd_message.set_name('PAY','HR_6944_PAY_DIFFERENT_AMEND');
308: fnd_message.raise_error;
309: end if;
310: --
311: close C_AMD3;
312: end;
331: fetch C_AMD4 into dummy;
332: --
333: if C_AMD4%found then
334: close C_AMD4;
335: fnd_message.set_name('PAY','HR_6943_PAY_NOT_INC_OR_EXC');
336: fnd_message.raise_error;
337: end if;
338: --
339: close C_AMD4;
332: --
333: if C_AMD4%found then
334: close C_AMD4;
335: fnd_message.set_name('PAY','HR_6943_PAY_NOT_INC_OR_EXC');
336: fnd_message.raise_error;
337: end if;
338: --
339: close C_AMD4;
340: end;
357: fetch C_AS2 into dummy;
358: --
359: if C_AS2%found then
360: close C_AS2;
361: fnd_message.set_name('PAY','HR_6831_ASS_DEL_SET_CRIT');
362: fnd_message.raise_error;
363: end if;
364: --
365: close C_AS2;
358: --
359: if C_AS2%found then
360: close C_AS2;
361: fnd_message.set_name('PAY','HR_6831_ASS_DEL_SET_CRIT');
362: fnd_message.raise_error;
363: end if;
364: --
365: close C_AS2;
366: end;
396: raise no_data_found;
397: end if;
398: exception
399: when no_data_found then
400: fnd_message.set_name('PAY','HR_6829_ASS_OPERAND_TYPE_MATCH');
401: fnd_message.raise_error;
402: end;
403: --
404: -- if procedure used to fetch data type
397: end if;
398: exception
399: when no_data_found then
400: fnd_message.set_name('PAY','HR_6829_ASS_OPERAND_TYPE_MATCH');
401: fnd_message.raise_error;
402: end;
403: --
404: -- if procedure used to fetch data type
405: if p_data_type is null then
431: open C_CU1;
432: fetch C_CU1 into dummy;
433: if C_CU1%found then
434: close C_CU1;
435: fnd_message.set_name('PAY','HR_6395_SETUP_SET_EXISTS');
436: fnd_message.raise_error;
437: else
438: close C_CU1;
439: d_assign_name := p_assignment_set_name;
432: fetch C_CU1 into dummy;
433: if C_CU1%found then
434: close C_CU1;
435: fnd_message.set_name('PAY','HR_6395_SETUP_SET_EXISTS');
436: fnd_message.raise_error;
437: else
438: close C_CU1;
439: d_assign_name := p_assignment_set_name;
440: ffdict.validate_formula(d_assign_name,
466: --
467: -- if row found then error
468: if C_LN1%found then
469: close C_LN1;
470: fnd_message.set_name('PAY','HR_6820_ASS_UNIQUE_SEQUENCE');
471: fnd_message.raise_error;
472: end if;
473: --
474: close C_LN1;
467: -- if row found then error
468: if C_LN1%found then
469: close C_LN1;
470: fnd_message.set_name('PAY','HR_6820_ASS_UNIQUE_SEQUENCE');
471: fnd_message.raise_error;
472: end if;
473: --
474: close C_LN1;
475: end;