178: OPEN C;
179: FETCH C INTO P_Rowid;
180: if (C%NOTFOUND) then
181: CLOSE C;
182: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
183: hr_utility.set_message_token('PROCEDURE','Insert_row');
184: hr_utility.set_message_token('STEP','1');
185: hr_utility.raise_error;
186: end if;
179: FETCH C INTO P_Rowid;
180: if (C%NOTFOUND) then
181: CLOSE C;
182: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
183: hr_utility.set_message_token('PROCEDURE','Insert_row');
184: hr_utility.set_message_token('STEP','1');
185: hr_utility.raise_error;
186: end if;
187: CLOSE C;
180: if (C%NOTFOUND) then
181: CLOSE C;
182: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
183: hr_utility.set_message_token('PROCEDURE','Insert_row');
184: hr_utility.set_message_token('STEP','1');
185: hr_utility.raise_error;
186: end if;
187: CLOSE C;
188: --
181: CLOSE C;
182: hr_utility.set_message(801,'HR_6153_ALL_PROCEDURE_FAIL');
183: hr_utility.set_message_token('PROCEDURE','Insert_row');
184: hr_utility.set_message_token('STEP','1');
185: hr_utility.raise_error;
186: end if;
187: CLOSE C;
188: --
189: IF (P_EXTERNAL_ACCOUNT_ID IS NOT NULL) AND (P_PRENOTE_DATE IS NOT NULL) THEN
406: fetch el_ent_check into l_dummy;
407: --
408: IF el_ent_check%FOUND THEN
409: close el_ent_check;
410: hr_utility.set_message('801', 'HR_7790_PAY_DEL_ENTRIES');
411: hr_utility.raise_error;
412: ELSE
413: close el_ent_check;
414: END IF;
407: --
408: IF el_ent_check%FOUND THEN
409: close el_ent_check;
410: hr_utility.set_message('801', 'HR_7790_PAY_DEL_ENTRIES');
411: hr_utility.raise_error;
412: ELSE
413: close el_ent_check;
414: END IF;
415: END IF;
419: IF hr_payments.check_pp (to_char (P_PPM_ID), l_after_this_date) THEN
420: DELETE FROM PAY_PERSONAL_PAYMENT_METHODS_F
421: WHERE ROWID = P_ROWID;
422: ELSE
423: hr_utility.set_message('801', 'HR_6498_PAY_DEL_PREPAY');
424: hr_utility.raise_error;
425: END IF;
426: END DELETE_ROW;
427: --
420: DELETE FROM PAY_PERSONAL_PAYMENT_METHODS_F
421: WHERE ROWID = P_ROWID;
422: ELSE
423: hr_utility.set_message('801', 'HR_6498_PAY_DEL_PREPAY');
424: hr_utility.raise_error;
425: END IF;
426: END DELETE_ROW;
427: --
428: PROCEDURE LOCK_ROW(P_ROWID VARCHAR2,
794: -- check for the case that the asg simply doesn't exist at the date
795: --
796: if payroll_on_new_date%notfound then
797: close payroll_on_new_date;
798: hr_utility.set_message('801', 'HR_51029_ASG_NO_PAYROLL');
799: hr_utility.raise_error;
800: else
801: close payroll_on_new_date;
802: --
795: --
796: if payroll_on_new_date%notfound then
797: close payroll_on_new_date;
798: hr_utility.set_message('801', 'HR_51029_ASG_NO_PAYROLL');
799: hr_utility.raise_error;
800: else
801: close payroll_on_new_date;
802: --
803: -- the asg exists: now check for a null payroll
802: --
803: -- the asg exists: now check for a null payroll
804: --
805: if l_payroll_id is null then
806: hr_utility.set_message('801', 'HR_51029_ASG_NO_PAYROLL');
807: hr_utility.raise_error;
808: end if;
809: end if;
810: end check_asg_on_payroll;
803: -- the asg exists: now check for a null payroll
804: --
805: if l_payroll_id is null then
806: hr_utility.set_message('801', 'HR_51029_ASG_NO_PAYROLL');
807: hr_utility.raise_error;
808: end if;
809: end if;
810: end check_asg_on_payroll;
811: --