APPS.PER_TIME_PERIODS_PKG dependencies on PER_TIME_PERIODS

Line 1: PACKAGE BODY PER_TIME_PERIODS_PKG as

1: PACKAGE BODY PER_TIME_PERIODS_PKG as
2: /* $Header: pytpe01t.pkb 120.1 2005/10/04 23:06:40 pgongada noship $ */
3: --
4: /*===========================================================================+
5: | Copyright (c) 1993 Oracle Corporation |

Line 10: per_time_periods_pkg

6: | Redwood Shores, California, USA |
7: | All rights reserved. |
8: +============================================================================+
9: Name
10: per_time_periods_pkg
11: Purpose
12: Supports the TPE block in the form PAYWSDPG (Define Payroll).
13: Notes
14:

Line 48: from per_time_periods tp

44: ) is
45: --
46: cursor csr_unique_time_period is
47: select tp.time_period_id
48: from per_time_periods tp
49: where tp.period_set_name = p_period_set_name
50: and tp.time_period_id <> p_time_period_id
51: and upper(tp.period_name) = upper(p_period_name);
52: --

Line 159: CURSOR C IS SELECT rowid FROM per_time_periods

155: X_Prd_Information30 VARCHAR2,
156: X_Payslip_view_date DATE default null
157: ) IS
158: --
159: CURSOR C IS SELECT rowid FROM per_time_periods
160: WHERE time_period_id = X_Time_Period_Id;
161: --
162: CURSOR C2 IS SELECT per_time_periods_s.nextval FROM sys.dual;
163: --

Line 162: CURSOR C2 IS SELECT per_time_periods_s.nextval FROM sys.dual;

158: --
159: CURSOR C IS SELECT rowid FROM per_time_periods
160: WHERE time_period_id = X_Time_Period_Id;
161: --
162: CURSOR C2 IS SELECT per_time_periods_s.nextval FROM sys.dual;
163: --
164: BEGIN
165: --
166: if (X_Time_Period_Id is NULL) then

Line 172: INSERT INTO per_time_periods

168: FETCH C2 INTO X_Time_Period_Id;
169: CLOSE C2;
170: end if;
171: --
172: INSERT INTO per_time_periods
173: (time_period_id,
174: payroll_id,
175: end_date,
176: period_name,

Line 328: 'per_time_periods_pkg.insert_row');

324: if (C%NOTFOUND) then
325: CLOSE C;
326: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
327: hr_utility.set_message_token('PROCEDURE',
328: 'per_time_periods_pkg.insert_row');
329: hr_utility.set_message_token('STEP','1');
330: hr_utility.raise_error;
331: end if;
332: CLOSE C;

Line 427: CURSOR C IS SELECT * FROM per_time_periods

423: X_Prd_Information30 VARCHAR2,
424: X_payslip_view_date DATE default null
425: ) IS
426: --
427: CURSOR C IS SELECT * FROM per_time_periods
428: WHERE rowid = X_Rowid FOR UPDATE of Time_Period_Id NOWAIT;
429: --
430: Recinfo C%ROWTYPE;
431: --

Line 440: 'per_time_periods_pkg.lock_row');

436: if (C%NOTFOUND) then
437: CLOSE C;
438: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
439: hr_utility.set_message_token('PROCEDURE',
440: 'per_time_periods_pkg.lock_row');
441: hr_utility.set_message_token('STEP','1');
442: hr_utility.raise_error;
443: end if;
444: CLOSE C;

Line 830: UPDATE per_time_periods

826: -- Lock payroll record to enforce integrity when changing time period
827: -- statuses.
828: pay_payrolls_f_pkg.lock_payroll(X_Payroll_Id);
829: --
830: UPDATE per_time_periods
831: SET time_period_id = X_Time_Period_Id,
832: payroll_id = X_Payroll_Id,
833: end_date = X_End_Date,
834: period_name = X_Period_Name,

Line 909: 'per_time_periods_pkg.update_row');

905: --
906: if (SQL%NOTFOUND) then
907: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
908: hr_utility.set_message_token('PROCEDURE',
909: 'per_time_periods_pkg.update_row');
910: hr_utility.set_message_token('STEP','1');
911: hr_utility.raise_error;
912: end if;
913: --

Line 932: DELETE FROM per_time_periods

928: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
929: --
930: BEGIN
931: --
932: DELETE FROM per_time_periods
933: WHERE rowid = X_Rowid;
934: --
935: if (SQL%NOTFOUND) then
936: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');

Line 938: 'per_time_periods_pkg.delete_row');

934: --
935: if (SQL%NOTFOUND) then
936: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
937: hr_utility.set_message_token('PROCEDURE',
938: 'per_time_periods_pkg.delete_row');
939: hr_utility.set_message_token('STEP','1');
940: hr_utility.raise_error;
941: end if;
942: END Delete_Row;

Line 952: Update per_time_periods

948: P_offset Number
949: ) IS
950: Begin
951:
952: Update per_time_periods
953: Set Payslip_view_Date = Regular_Payment_Date + P_offset
954: where Payroll_id = P_Payroll_id;
955:
956: End Update_Payslip_View_Date;

Line 959: END PER_TIME_PERIODS_PKG;

955:
956: End Update_Payslip_View_Date;
957: ------------------------------------------------------------------------------------
958:
959: END PER_TIME_PERIODS_PKG;