1: PACKAGE BODY PER_REQUISITIONS_PKG as
2: /* $Header: pereq01t.pkb 115.3 2003/01/27 15:53:35 irgonzal ship $ */
3: --
4: /* +======================================================================+
5: | Copyright (c) 1993 Oracle Corporation |
6: | Redwood Shores, California, USA |
7: | All rights reserved. |
8: +=======================================================================
9: Name
10: PER_REQUISITIONS_PKG
11: Purpose
12: Supports the REQUISITION block in the form PERWSVAC (Define Requisition
13: and Vacancy).
14: Notes
323: if (C%NOTFOUND) then
324: CLOSE C;
325: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
326: hr_utility.set_message_token('PROCEDURE',
327: 'per_requisitions_pkg.insert_row');
328: hr_utility.set_message_token('STEP','1');
329: hr_utility.raise_error;
330: end if;
331: CLOSE C;
594:
595: if (SQL%NOTFOUND) then
596: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
597: hr_utility.set_message_token('PROCEDURE',
598: 'per_requisitions_pkg.update_row');
599: hr_utility.set_message_token('STEP','1');
600: hr_utility.raise_error;
601: end if;
602:
621:
622: if (SQL%NOTFOUND) then
623: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
624: hr_utility.set_message_token('PROCEDURE',
625: 'per_requisitions_pkg.delete_row');
626: hr_utility.set_message_token('STEP','1');
627: hr_utility.raise_error;
628: end if;
629: END Delete_Row;
627: hr_utility.raise_error;
628: end if;
629: END Delete_Row;
630:
631: END PER_REQUISITIONS_PKG;