49: --
50: l_owner_time_period_id number;
51: l_user_time_period_id number;
52: begin
53: hr_utility.set_location('Entering : ' || c_proc, 10);
54: hr_utility.trace(p_dimension_name);
55: --
56: select ppa_owner.time_period_id,
57: ppa_user.time_period_id
50: l_owner_time_period_id number;
51: l_user_time_period_id number;
52: begin
53: hr_utility.set_location('Entering : ' || c_proc, 10);
54: hr_utility.trace(p_dimension_name);
55: --
56: select ppa_owner.time_period_id,
57: ppa_user.time_period_id
58: into l_owner_time_period_id,
64: --
65: -- Note this expiry checking mechanism has bug.2646992
66: --
67: if l_user_time_period_id = l_owner_time_period_id then
68: hr_utility.trace('NOT expired');
69: p_expiry_information := 0;
70: else
71: hr_utility.trace('expired');
72: p_expiry_information := 1;
67: if l_user_time_period_id = l_owner_time_period_id then
68: hr_utility.trace('NOT expired');
69: p_expiry_information := 0;
70: else
71: hr_utility.trace('expired');
72: p_expiry_information := 1;
73: end if;
74: --
75: hr_utility.set_location('Leaving : ' || c_proc, 20);
71: hr_utility.trace('expired');
72: p_expiry_information := 1;
73: end if;
74: --
75: hr_utility.set_location('Leaving : ' || c_proc, 20);
76: end ptd_ec;
77: -- ----------------------------------------------------------------------------
78: -- |--------------------------< ptd_ec (date mode)>---------------------------|
79: -- ----------------------------------------------------------------------------
91: --
92: -- l_owner_time_period_id number;
93: -- l_user_time_period_id number;
94: begin
95: hr_utility.set_location('Entering : ' || c_proc, 10);
96: --
97: select ptp.end_date
98: into p_expiry_information
99: from pay_payroll_actions ppa,
116: -- p_owner_effective_date = p_user_effective_date
117: -- This expiry checking is called for both owner and user payroll action,
118: -- then the expiry_date is compared.
119: --
120: hr_utility.trace(p_dimension_name);
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
117: -- This expiry checking is called for both owner and user payroll action,
118: -- then the expiry_date is compared.
119: --
120: hr_utility.trace(p_dimension_name);
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
118: -- then the expiry_date is compared.
119: --
120: hr_utility.trace(p_dimension_name);
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
126: hr_utility.trace('user_effective_date : ' || to_char(p_user_effective_date));
119: --
120: hr_utility.trace(p_dimension_name);
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
126: hr_utility.trace('user_effective_date : ' || to_char(p_user_effective_date));
127: --
120: hr_utility.trace(p_dimension_name);
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
126: hr_utility.trace('user_effective_date : ' || to_char(p_user_effective_date));
127: --
128: -- Following SQL will return period end date in general.
121: hr_utility.trace('owner_payroll_action_id : ' || to_char(p_owner_payroll_action_id));
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
126: hr_utility.trace('user_effective_date : ' || to_char(p_user_effective_date));
127: --
128: -- Following SQL will return period end date in general.
129: -- But the payroll is changed in the middle of the payroll period,
122: hr_utility.trace('user_payroll_action_id : ' || to_char(p_user_payroll_action_id));
123: hr_utility.trace('owner_assignment_action_id : ' || to_char(p_owner_assignment_action_id));
124: hr_utility.trace('user_assignment_action_id : ' || to_char(p_user_assignment_action_id));
125: hr_utility.trace('owner_effective_date : ' || to_char(p_owner_effective_date));
126: hr_utility.trace('user_effective_date : ' || to_char(p_user_effective_date));
127: --
128: -- Following SQL will return period end date in general.
129: -- But the payroll is changed in the middle of the payroll period,
130: -- this returns the previous date of the date changed.
170: p_expiry_information := p_user_effective_date;
171: end if;
172: */
173: --
174: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
175: hr_utility.set_location('Leaving : ' || c_proc, 20);
176: end ptd_ec;
177: -- ----------------------------------------------------------------------------
178: -- |--------------------------------< mtd_ec >--------------------------------|
171: end if;
172: */
173: --
174: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
175: hr_utility.set_location('Leaving : ' || c_proc, 20);
176: end ptd_ec;
177: -- ----------------------------------------------------------------------------
178: -- |--------------------------------< mtd_ec >--------------------------------|
179: -- ----------------------------------------------------------------------------
188: p_expiry_information out nocopy number)
189: is
190: c_proc constant varchar2(61) := c_package || 'mtd_ec';
191: begin
192: hr_utility.set_location('Entering : ' || c_proc, 10);
193: hr_utility.trace(p_dimension_name);
194: --
195: if trunc(p_user_effective_date, 'MM') > p_owner_effective_date then
196: hr_utility.trace('expired');
189: is
190: c_proc constant varchar2(61) := c_package || 'mtd_ec';
191: begin
192: hr_utility.set_location('Entering : ' || c_proc, 10);
193: hr_utility.trace(p_dimension_name);
194: --
195: if trunc(p_user_effective_date, 'MM') > p_owner_effective_date then
196: hr_utility.trace('expired');
197: p_expiry_information := 1;
192: hr_utility.set_location('Entering : ' || c_proc, 10);
193: hr_utility.trace(p_dimension_name);
194: --
195: if trunc(p_user_effective_date, 'MM') > p_owner_effective_date then
196: hr_utility.trace('expired');
197: p_expiry_information := 1;
198: else
199: hr_utility.trace('NOT expired');
200: p_expiry_information := 0;
195: if trunc(p_user_effective_date, 'MM') > p_owner_effective_date then
196: hr_utility.trace('expired');
197: p_expiry_information := 1;
198: else
199: hr_utility.trace('NOT expired');
200: p_expiry_information := 0;
201: end if;
202: --
203: hr_utility.set_location('Leaving : ' || c_proc, 20);
199: hr_utility.trace('NOT expired');
200: p_expiry_information := 0;
201: end if;
202: --
203: hr_utility.set_location('Leaving : ' || c_proc, 20);
204: end mtd_ec;
205: -- ----------------------------------------------------------------------------
206: -- |--------------------------< mtd_ec (date mode)>---------------------------|
207: -- ----------------------------------------------------------------------------
216: p_expiry_information out nocopy date)
217: is
218: c_proc constant varchar2(61) := c_package || 'mtd_ec (date mode)';
219: begin
220: hr_utility.set_location('Entering : ' || c_proc, 10);
221: hr_utility.trace(p_dimension_name);
222: --
223: p_expiry_information := last_day(p_owner_effective_date);
224: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
217: is
218: c_proc constant varchar2(61) := c_package || 'mtd_ec (date mode)';
219: begin
220: hr_utility.set_location('Entering : ' || c_proc, 10);
221: hr_utility.trace(p_dimension_name);
222: --
223: p_expiry_information := last_day(p_owner_effective_date);
224: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
225: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
220: hr_utility.set_location('Entering : ' || c_proc, 10);
221: hr_utility.trace(p_dimension_name);
222: --
223: p_expiry_information := last_day(p_owner_effective_date);
224: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
225: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
226: --
227: hr_utility.set_location('Leaving : ' || c_proc, 20);
228: end mtd_ec;
221: hr_utility.trace(p_dimension_name);
222: --
223: p_expiry_information := last_day(p_owner_effective_date);
224: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
225: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
226: --
227: hr_utility.set_location('Leaving : ' || c_proc, 20);
228: end mtd_ec;
229: -- ----------------------------------------------------------------------------
223: p_expiry_information := last_day(p_owner_effective_date);
224: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
225: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
226: --
227: hr_utility.set_location('Leaving : ' || c_proc, 20);
228: end mtd_ec;
229: -- ----------------------------------------------------------------------------
230: -- |--------------------------------< qtd_ec >--------------------------------|
231: -- ----------------------------------------------------------------------------
240: p_expiry_information out nocopy number)
241: is
242: c_proc constant varchar2(61) := c_package || 'qtd_ec';
243: begin
244: hr_utility.set_location('Entering : ' || c_proc, 10);
245: hr_utility.trace(p_dimension_name);
246: --
247: if trunc(p_user_effective_date, 'Q') > p_owner_effective_date then
248: hr_utility.trace('expired');
241: is
242: c_proc constant varchar2(61) := c_package || 'qtd_ec';
243: begin
244: hr_utility.set_location('Entering : ' || c_proc, 10);
245: hr_utility.trace(p_dimension_name);
246: --
247: if trunc(p_user_effective_date, 'Q') > p_owner_effective_date then
248: hr_utility.trace('expired');
249: p_expiry_information := 1;
244: hr_utility.set_location('Entering : ' || c_proc, 10);
245: hr_utility.trace(p_dimension_name);
246: --
247: if trunc(p_user_effective_date, 'Q') > p_owner_effective_date then
248: hr_utility.trace('expired');
249: p_expiry_information := 1;
250: else
251: hr_utility.trace('NOT expired');
252: p_expiry_information := 0;
247: if trunc(p_user_effective_date, 'Q') > p_owner_effective_date then
248: hr_utility.trace('expired');
249: p_expiry_information := 1;
250: else
251: hr_utility.trace('NOT expired');
252: p_expiry_information := 0;
253: end if;
254: --
255: hr_utility.set_location('Leaving : ' || c_proc, 20);
251: hr_utility.trace('NOT expired');
252: p_expiry_information := 0;
253: end if;
254: --
255: hr_utility.set_location('Leaving : ' || c_proc, 20);
256: end qtd_ec;
257: -- ----------------------------------------------------------------------------
258: -- |--------------------------< qtd_ec (date mode)>---------------------------|
259: -- ----------------------------------------------------------------------------
268: p_expiry_information out nocopy date)
269: is
270: c_proc constant varchar2(61) := c_package || 'qtd_ec (date mode)';
271: begin
272: hr_utility.set_location('Entering : ' || c_proc, 10);
273: hr_utility.trace(p_dimension_name);
274: --
275: p_expiry_information := add_months(trunc(p_owner_effective_date, 'Q'), 3) - 1;
276: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
269: is
270: c_proc constant varchar2(61) := c_package || 'qtd_ec (date mode)';
271: begin
272: hr_utility.set_location('Entering : ' || c_proc, 10);
273: hr_utility.trace(p_dimension_name);
274: --
275: p_expiry_information := add_months(trunc(p_owner_effective_date, 'Q'), 3) - 1;
276: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
277: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
272: hr_utility.set_location('Entering : ' || c_proc, 10);
273: hr_utility.trace(p_dimension_name);
274: --
275: p_expiry_information := add_months(trunc(p_owner_effective_date, 'Q'), 3) - 1;
276: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
277: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
278: --
279: hr_utility.set_location('Leaving : ' || c_proc, 20);
280: end qtd_ec;
273: hr_utility.trace(p_dimension_name);
274: --
275: p_expiry_information := add_months(trunc(p_owner_effective_date, 'Q'), 3) - 1;
276: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
277: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
278: --
279: hr_utility.set_location('Leaving : ' || c_proc, 20);
280: end qtd_ec;
281: -- ----------------------------------------------------------------------------
275: p_expiry_information := add_months(trunc(p_owner_effective_date, 'Q'), 3) - 1;
276: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
277: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
278: --
279: hr_utility.set_location('Leaving : ' || c_proc, 20);
280: end qtd_ec;
281: -- ----------------------------------------------------------------------------
282: -- |--------------------------------< ytd_ec >--------------------------------|
283: -- ----------------------------------------------------------------------------
292: p_expiry_information out nocopy number)
293: is
294: c_proc constant varchar2(61) := c_package || 'ytd_ec';
295: begin
296: hr_utility.set_location('Entering : ' || c_proc, 10);
297: hr_utility.trace(p_dimension_name);
298: --
299: if trunc(p_user_effective_date, 'YYYY') > p_owner_effective_date then
300: hr_utility.trace('expired');
293: is
294: c_proc constant varchar2(61) := c_package || 'ytd_ec';
295: begin
296: hr_utility.set_location('Entering : ' || c_proc, 10);
297: hr_utility.trace(p_dimension_name);
298: --
299: if trunc(p_user_effective_date, 'YYYY') > p_owner_effective_date then
300: hr_utility.trace('expired');
301: p_expiry_information := 1;
296: hr_utility.set_location('Entering : ' || c_proc, 10);
297: hr_utility.trace(p_dimension_name);
298: --
299: if trunc(p_user_effective_date, 'YYYY') > p_owner_effective_date then
300: hr_utility.trace('expired');
301: p_expiry_information := 1;
302: else
303: hr_utility.trace('NOT expired');
304: p_expiry_information := 0;
299: if trunc(p_user_effective_date, 'YYYY') > p_owner_effective_date then
300: hr_utility.trace('expired');
301: p_expiry_information := 1;
302: else
303: hr_utility.trace('NOT expired');
304: p_expiry_information := 0;
305: end if;
306: --
307: hr_utility.set_location('Leaving : ' || c_proc, 20);
303: hr_utility.trace('NOT expired');
304: p_expiry_information := 0;
305: end if;
306: --
307: hr_utility.set_location('Leaving : ' || c_proc, 20);
308: end ytd_ec;
309: -- ----------------------------------------------------------------------------
310: -- |--------------------------< ytd_ec (date mode)>---------------------------|
311: -- ----------------------------------------------------------------------------
320: p_expiry_information out nocopy date)
321: is
322: c_proc constant varchar2(61) := c_package || 'ytd_ec (date mode)';
323: begin
324: hr_utility.set_location('Entering : ' || c_proc, 10);
325: hr_utility.trace(p_dimension_name);
326: --
327: p_expiry_information := add_months(trunc(p_owner_effective_date, 'YYYY'), 12) - 1;
328: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
321: is
322: c_proc constant varchar2(61) := c_package || 'ytd_ec (date mode)';
323: begin
324: hr_utility.set_location('Entering : ' || c_proc, 10);
325: hr_utility.trace(p_dimension_name);
326: --
327: p_expiry_information := add_months(trunc(p_owner_effective_date, 'YYYY'), 12) - 1;
328: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
329: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
324: hr_utility.set_location('Entering : ' || c_proc, 10);
325: hr_utility.trace(p_dimension_name);
326: --
327: p_expiry_information := add_months(trunc(p_owner_effective_date, 'YYYY'), 12) - 1;
328: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
329: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
330: --
331: hr_utility.set_location('Leaving : ' || c_proc, 20);
332: end ytd_ec;
325: hr_utility.trace(p_dimension_name);
326: --
327: p_expiry_information := add_months(trunc(p_owner_effective_date, 'YYYY'), 12) - 1;
328: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
329: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
330: --
331: hr_utility.set_location('Leaving : ' || c_proc, 20);
332: end ytd_ec;
333: -- ----------------------------------------------------------------------------
327: p_expiry_information := add_months(trunc(p_owner_effective_date, 'YYYY'), 12) - 1;
328: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
329: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
330: --
331: hr_utility.set_location('Leaving : ' || c_proc, 20);
332: end ytd_ec;
333: -- ----------------------------------------------------------------------------
334: -- |-------------------------------< aprtd_ec >-------------------------------|
335: -- ----------------------------------------------------------------------------
344: p_expiry_information out nocopy number)
345: is
346: c_proc constant varchar2(61) := c_package || 'aprtd_ec';
347: begin
348: hr_utility.set_location('Entering : ' || c_proc, 10);
349: hr_utility.trace(p_dimension_name);
350: --
351: if add_months(trunc(add_months(p_user_effective_date, 9), 'YYYY'), -9) > p_owner_effective_date then
352: hr_utility.trace('expired');
345: is
346: c_proc constant varchar2(61) := c_package || 'aprtd_ec';
347: begin
348: hr_utility.set_location('Entering : ' || c_proc, 10);
349: hr_utility.trace(p_dimension_name);
350: --
351: if add_months(trunc(add_months(p_user_effective_date, 9), 'YYYY'), -9) > p_owner_effective_date then
352: hr_utility.trace('expired');
353: p_expiry_information := 1;
348: hr_utility.set_location('Entering : ' || c_proc, 10);
349: hr_utility.trace(p_dimension_name);
350: --
351: if add_months(trunc(add_months(p_user_effective_date, 9), 'YYYY'), -9) > p_owner_effective_date then
352: hr_utility.trace('expired');
353: p_expiry_information := 1;
354: else
355: hr_utility.trace('NOT expired');
356: p_expiry_information := 0;
351: if add_months(trunc(add_months(p_user_effective_date, 9), 'YYYY'), -9) > p_owner_effective_date then
352: hr_utility.trace('expired');
353: p_expiry_information := 1;
354: else
355: hr_utility.trace('NOT expired');
356: p_expiry_information := 0;
357: end if;
358: --
359: hr_utility.set_location('Leaving : ' || c_proc, 20);
355: hr_utility.trace('NOT expired');
356: p_expiry_information := 0;
357: end if;
358: --
359: hr_utility.set_location('Leaving : ' || c_proc, 20);
360: end aprtd_ec;
361: -- ----------------------------------------------------------------------------
362: -- |-------------------------< aprtd_ec (date mode)>--------------------------|
363: -- ----------------------------------------------------------------------------
372: p_expiry_information out nocopy date)
373: is
374: c_proc constant varchar2(61) := c_package || 'aprtd_ec (date mode)';
375: begin
376: hr_utility.set_location('Entering : ' || c_proc, 10);
377: hr_utility.trace(p_dimension_name);
378: --
379: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 9), 'YYYY'), 3) - 1;
380: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
373: is
374: c_proc constant varchar2(61) := c_package || 'aprtd_ec (date mode)';
375: begin
376: hr_utility.set_location('Entering : ' || c_proc, 10);
377: hr_utility.trace(p_dimension_name);
378: --
379: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 9), 'YYYY'), 3) - 1;
380: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
381: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
376: hr_utility.set_location('Entering : ' || c_proc, 10);
377: hr_utility.trace(p_dimension_name);
378: --
379: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 9), 'YYYY'), 3) - 1;
380: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
381: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
382: --
383: hr_utility.set_location('Leaving : ' || c_proc, 20);
384: end aprtd_ec;
377: hr_utility.trace(p_dimension_name);
378: --
379: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 9), 'YYYY'), 3) - 1;
380: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
381: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
382: --
383: hr_utility.set_location('Leaving : ' || c_proc, 20);
384: end aprtd_ec;
385: -- ----------------------------------------------------------------------------
379: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 9), 'YYYY'), 3) - 1;
380: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
381: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
382: --
383: hr_utility.set_location('Leaving : ' || c_proc, 20);
384: end aprtd_ec;
385: -- ----------------------------------------------------------------------------
386: -- |-------------------------------< aprtd_sd >-------------------------------|
387: -- ----------------------------------------------------------------------------
393: p_asg_action in number)
394: is
395: c_proc constant varchar2(61) := c_package || 'aprtd_sd';
396: begin
397: hr_utility.set_location('Entering : ' || c_proc, 10);
398: --
399: p_start_date := add_months(trunc(add_months(p_effective_date, 9), 'YYYY'), -9);
400: hr_utility.trace('start_date : ' || to_char(p_start_date));
401: --
396: begin
397: hr_utility.set_location('Entering : ' || c_proc, 10);
398: --
399: p_start_date := add_months(trunc(add_months(p_effective_date, 9), 'YYYY'), -9);
400: hr_utility.trace('start_date : ' || to_char(p_start_date));
401: --
402: hr_utility.set_location('Leaving : ' || c_proc, 20);
403: end aprtd_sd;
404: -- ----------------------------------------------------------------------------
398: --
399: p_start_date := add_months(trunc(add_months(p_effective_date, 9), 'YYYY'), -9);
400: hr_utility.trace('start_date : ' || to_char(p_start_date));
401: --
402: hr_utility.set_location('Leaving : ' || c_proc, 20);
403: end aprtd_sd;
404: -- ----------------------------------------------------------------------------
405: -- |-------------------------------< jultd_ec >-------------------------------|
406: -- ----------------------------------------------------------------------------
415: p_expiry_information out nocopy number)
416: is
417: c_proc constant varchar2(61) := c_package || 'jultd_ec';
418: begin
419: hr_utility.set_location('Entering : ' || c_proc, 10);
420: hr_utility.trace(p_dimension_name);
421: --
422: if add_months(trunc(add_months(p_user_effective_date, 6), 'YYYY'), -6) > p_owner_effective_date then
423: hr_utility.trace('expired');
416: is
417: c_proc constant varchar2(61) := c_package || 'jultd_ec';
418: begin
419: hr_utility.set_location('Entering : ' || c_proc, 10);
420: hr_utility.trace(p_dimension_name);
421: --
422: if add_months(trunc(add_months(p_user_effective_date, 6), 'YYYY'), -6) > p_owner_effective_date then
423: hr_utility.trace('expired');
424: p_expiry_information := 1;
419: hr_utility.set_location('Entering : ' || c_proc, 10);
420: hr_utility.trace(p_dimension_name);
421: --
422: if add_months(trunc(add_months(p_user_effective_date, 6), 'YYYY'), -6) > p_owner_effective_date then
423: hr_utility.trace('expired');
424: p_expiry_information := 1;
425: else
426: hr_utility.trace('NOT expired');
427: p_expiry_information := 0;
422: if add_months(trunc(add_months(p_user_effective_date, 6), 'YYYY'), -6) > p_owner_effective_date then
423: hr_utility.trace('expired');
424: p_expiry_information := 1;
425: else
426: hr_utility.trace('NOT expired');
427: p_expiry_information := 0;
428: end if;
429: --
430: hr_utility.set_location('Leaving : ' || c_proc, 20);
426: hr_utility.trace('NOT expired');
427: p_expiry_information := 0;
428: end if;
429: --
430: hr_utility.set_location('Leaving : ' || c_proc, 20);
431: end jultd_ec;
432: -- ----------------------------------------------------------------------------
433: -- |-------------------------< jultd_ec (date mode)>--------------------------|
434: -- ----------------------------------------------------------------------------
443: p_expiry_information out nocopy date)
444: is
445: c_proc constant varchar2(61) := c_package || 'jultd_ec (date mode)';
446: begin
447: hr_utility.set_location('Entering : ' || c_proc, 10);
448: hr_utility.trace(p_dimension_name);
449: --
450: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 6), 'YYYY'), 6) - 1;
451: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
444: is
445: c_proc constant varchar2(61) := c_package || 'jultd_ec (date mode)';
446: begin
447: hr_utility.set_location('Entering : ' || c_proc, 10);
448: hr_utility.trace(p_dimension_name);
449: --
450: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 6), 'YYYY'), 6) - 1;
451: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
452: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
447: hr_utility.set_location('Entering : ' || c_proc, 10);
448: hr_utility.trace(p_dimension_name);
449: --
450: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 6), 'YYYY'), 6) - 1;
451: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
452: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
453: --
454: hr_utility.set_location('Leaving : ' || c_proc, 20);
455: end jultd_ec;
448: hr_utility.trace(p_dimension_name);
449: --
450: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 6), 'YYYY'), 6) - 1;
451: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
452: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
453: --
454: hr_utility.set_location('Leaving : ' || c_proc, 20);
455: end jultd_ec;
456: -- ----------------------------------------------------------------------------
450: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 6), 'YYYY'), 6) - 1;
451: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
452: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
453: --
454: hr_utility.set_location('Leaving : ' || c_proc, 20);
455: end jultd_ec;
456: -- ----------------------------------------------------------------------------
457: -- |-------------------------------< jultd_sd >-------------------------------|
458: -- ----------------------------------------------------------------------------
464: p_asg_action in number)
465: is
466: c_proc constant varchar2(61) := c_package || 'jultd_sd';
467: begin
468: hr_utility.set_location('Entering : ' || c_proc, 10);
469: --
470: p_start_date := add_months(trunc(add_months(p_effective_date, 6), 'YYYY'), -6);
471: hr_utility.trace('start_date : ' || to_char(p_start_date));
472: --
467: begin
468: hr_utility.set_location('Entering : ' || c_proc, 10);
469: --
470: p_start_date := add_months(trunc(add_months(p_effective_date, 6), 'YYYY'), -6);
471: hr_utility.trace('start_date : ' || to_char(p_start_date));
472: --
473: hr_utility.set_location('Leaving : ' || c_proc, 20);
474: end jultd_sd;
475: -- ----------------------------------------------------------------------------
469: --
470: p_start_date := add_months(trunc(add_months(p_effective_date, 6), 'YYYY'), -6);
471: hr_utility.trace('start_date : ' || to_char(p_start_date));
472: --
473: hr_utility.set_location('Leaving : ' || c_proc, 20);
474: end jultd_sd;
475: -- ----------------------------------------------------------------------------
476: -- |-------------------------------< augtd_ec >-------------------------------|
477: -- ----------------------------------------------------------------------------
486: p_expiry_information out nocopy number)
487: is
488: c_proc constant varchar2(61) := c_package || 'augtd_ec';
489: begin
490: hr_utility.set_location('Entering : ' || c_proc, 10);
491: hr_utility.trace(p_dimension_name);
492: --
493: if add_months(trunc(add_months(p_user_effective_date, 5), 'YYYY'), -5) > p_owner_effective_date then
494: hr_utility.trace('expired');
487: is
488: c_proc constant varchar2(61) := c_package || 'augtd_ec';
489: begin
490: hr_utility.set_location('Entering : ' || c_proc, 10);
491: hr_utility.trace(p_dimension_name);
492: --
493: if add_months(trunc(add_months(p_user_effective_date, 5), 'YYYY'), -5) > p_owner_effective_date then
494: hr_utility.trace('expired');
495: p_expiry_information := 1;
490: hr_utility.set_location('Entering : ' || c_proc, 10);
491: hr_utility.trace(p_dimension_name);
492: --
493: if add_months(trunc(add_months(p_user_effective_date, 5), 'YYYY'), -5) > p_owner_effective_date then
494: hr_utility.trace('expired');
495: p_expiry_information := 1;
496: else
497: hr_utility.trace('NOT expired');
498: p_expiry_information := 0;
493: if add_months(trunc(add_months(p_user_effective_date, 5), 'YYYY'), -5) > p_owner_effective_date then
494: hr_utility.trace('expired');
495: p_expiry_information := 1;
496: else
497: hr_utility.trace('NOT expired');
498: p_expiry_information := 0;
499: end if;
500: --
501: hr_utility.set_location('Leaving : ' || c_proc, 20);
497: hr_utility.trace('NOT expired');
498: p_expiry_information := 0;
499: end if;
500: --
501: hr_utility.set_location('Leaving : ' || c_proc, 20);
502: end augtd_ec;
503: -- ----------------------------------------------------------------------------
504: -- |-------------------------< augtd_ec (date mode)>--------------------------|
505: -- ----------------------------------------------------------------------------
514: p_expiry_information out nocopy date)
515: is
516: c_proc constant varchar2(61) := c_package || 'augtd_ec (date mode)';
517: begin
518: hr_utility.set_location('Entering : ' || c_proc, 10);
519: hr_utility.trace(p_dimension_name);
520: --
521: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 5), 'YYYY'), 7) - 1;
522: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
515: is
516: c_proc constant varchar2(61) := c_package || 'augtd_ec (date mode)';
517: begin
518: hr_utility.set_location('Entering : ' || c_proc, 10);
519: hr_utility.trace(p_dimension_name);
520: --
521: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 5), 'YYYY'), 7) - 1;
522: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
523: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
518: hr_utility.set_location('Entering : ' || c_proc, 10);
519: hr_utility.trace(p_dimension_name);
520: --
521: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 5), 'YYYY'), 7) - 1;
522: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
523: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
524: --
525: hr_utility.set_location('Leaving : ' || c_proc, 20);
526: end augtd_ec;
519: hr_utility.trace(p_dimension_name);
520: --
521: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 5), 'YYYY'), 7) - 1;
522: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
523: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
524: --
525: hr_utility.set_location('Leaving : ' || c_proc, 20);
526: end augtd_ec;
527: -- ----------------------------------------------------------------------------
521: p_expiry_information := add_months(trunc(add_months(p_owner_effective_date, 5), 'YYYY'), 7) - 1;
522: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
523: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
524: --
525: hr_utility.set_location('Leaving : ' || c_proc, 20);
526: end augtd_ec;
527: -- ----------------------------------------------------------------------------
528: -- |-------------------------------< augtd_sd >-------------------------------|
529: -- ----------------------------------------------------------------------------
535: p_asg_action in number)
536: is
537: c_proc constant varchar2(61) := c_package || 'augtd_sd';
538: begin
539: hr_utility.set_location('Entering : ' || c_proc, 10);
540: --
541: p_start_date := add_months(trunc(add_months(p_effective_date, 5), 'YYYY'), -5);
542: hr_utility.trace('start_date : ' || to_char(p_start_date));
543: --
538: begin
539: hr_utility.set_location('Entering : ' || c_proc, 10);
540: --
541: p_start_date := add_months(trunc(add_months(p_effective_date, 5), 'YYYY'), -5);
542: hr_utility.trace('start_date : ' || to_char(p_start_date));
543: --
544: hr_utility.set_location('Leaving : ' || c_proc, 20);
545: end augtd_sd;
546: -- ----------------------------------------------------------------------------
540: --
541: p_start_date := add_months(trunc(add_months(p_effective_date, 5), 'YYYY'), -5);
542: hr_utility.trace('start_date : ' || to_char(p_start_date));
543: --
544: hr_utility.set_location('Leaving : ' || c_proc, 20);
545: end augtd_sd;
546: -- ----------------------------------------------------------------------------
547: -- |----------------------------< fy_start_date >-----------------------------|
548: -- ----------------------------------------------------------------------------
556: from hr_organization_information
557: where organization_id = p_business_group_id
558: and org_information_context = 'Business Group Information';
559: begin
560: hr_utility.set_location('Entering : ' || c_proc, 10);
561: --
562: -- Once the fiscal year is derived from BG, the value is stored
563: -- in global variables to reduce the overhead.
564: --
562: -- Once the fiscal year is derived from BG, the value is stored
563: -- in global variables to reduce the overhead.
564: --
565: if p_business_group_id = g_fy_cache.business_group_id then
566: hr_utility.trace('cache available');
567: l_fy_start_date := g_fy_cache.start_date;
568: else
569: hr_utility.trace('cache NOT available');
570: --
565: if p_business_group_id = g_fy_cache.business_group_id then
566: hr_utility.trace('cache available');
567: l_fy_start_date := g_fy_cache.start_date;
568: else
569: hr_utility.trace('cache NOT available');
570: --
571: open csr_fy_start_date(p_business_group_id);
572: fetch csr_fy_start_date into l_fy_start_date;
573: close csr_fy_start_date;
579: g_fy_cache.start_date := l_fy_start_date;
580: end if;
581: end if;
582: --
583: hr_utility.trace('fy_start_date : ' || to_char(l_fy_start_date));
584: hr_utility.set_location('Leaving : ' || c_proc, 20);
585: --
586: return l_fy_start_date;
587: end fy_start_date;
580: end if;
581: end if;
582: --
583: hr_utility.trace('fy_start_date : ' || to_char(l_fy_start_date));
584: hr_utility.set_location('Leaving : ' || c_proc, 20);
585: --
586: return l_fy_start_date;
587: end fy_start_date;
588: -- ----------------------------------------------------------------------------
593: c_proc constant varchar2(61) := c_package || 'business_group_id';
594: --
595: l_business_group_id number;
596: begin
597: hr_utility.set_location('Entering : ' || c_proc, 10);
598: --
599: if p_payroll_action_id = g_pact_cache.payroll_action_id then
600: hr_utility.trace('cache available');
601: l_business_group_id := g_pact_cache.business_group_id;
596: begin
597: hr_utility.set_location('Entering : ' || c_proc, 10);
598: --
599: if p_payroll_action_id = g_pact_cache.payroll_action_id then
600: hr_utility.trace('cache available');
601: l_business_group_id := g_pact_cache.business_group_id;
602: else
603: hr_utility.trace('cache NOT available');
604: --
599: if p_payroll_action_id = g_pact_cache.payroll_action_id then
600: hr_utility.trace('cache available');
601: l_business_group_id := g_pact_cache.business_group_id;
602: else
603: hr_utility.trace('cache NOT available');
604: --
605: select business_group_id
606: into l_business_group_id
607: from pay_payroll_actions
612: g_pact_cache.payroll_action_id := p_payroll_action_id;
613: g_pact_cache.business_group_id := l_business_group_id;
614: end if;
615: --
616: hr_utility.set_location('Leaving : ' || c_proc, 20);
617: --
618: return l_business_group_id;
619: end business_group_id;
620: -- ----------------------------------------------------------------------------
634: --
635: l_fy_start_date date;
636: l_start_date date;
637: begin
638: hr_utility.set_location('Entering : ' || c_proc, 10);
639: hr_utility.trace(p_dimension_name);
640: --
641: -- Bind p_user_payroll_action_id not p_owner_payroll_action_id
642: -- to use cache as much as possible.
635: l_fy_start_date date;
636: l_start_date date;
637: begin
638: hr_utility.set_location('Entering : ' || c_proc, 10);
639: hr_utility.trace(p_dimension_name);
640: --
641: -- Bind p_user_payroll_action_id not p_owner_payroll_action_id
642: -- to use cache as much as possible.
643: --
644: l_fy_start_date := fy_start_date(business_group_id(p_user_payroll_action_id));
645: l_start_date := add_months(l_fy_start_date, floor(months_between(p_user_effective_date, l_fy_start_date) / 3) * 3);
646: --
647: if l_start_date > p_owner_effective_date then
648: hr_utility.trace('expired');
649: p_expiry_information := 1;
650: else
651: hr_utility.trace('NOT expired');
652: p_expiry_information := 0;
647: if l_start_date > p_owner_effective_date then
648: hr_utility.trace('expired');
649: p_expiry_information := 1;
650: else
651: hr_utility.trace('NOT expired');
652: p_expiry_information := 0;
653: end if;
654: --
655: hr_utility.set_location('Leaving : ' || c_proc, 20);
651: hr_utility.trace('NOT expired');
652: p_expiry_information := 0;
653: end if;
654: --
655: hr_utility.set_location('Leaving : ' || c_proc, 20);
656: end fqtd_ec;
657: -- ----------------------------------------------------------------------------
658: -- |--------------------------< fqtd_ec (date mode)>--------------------------|
659: -- ----------------------------------------------------------------------------
670: c_proc constant varchar2(61) := c_package || 'fqtd_ec (date mode)';
671: --
672: l_fy_start_date date;
673: begin
674: hr_utility.set_location('Entering : ' || c_proc, 10);
675: hr_utility.trace(p_dimension_name);
676: --
677: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
678: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 3) + 1) * 3) - 1;
671: --
672: l_fy_start_date date;
673: begin
674: hr_utility.set_location('Entering : ' || c_proc, 10);
675: hr_utility.trace(p_dimension_name);
676: --
677: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
678: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 3) + 1) * 3) - 1;
679: --
676: --
677: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
678: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 3) + 1) * 3) - 1;
679: --
680: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
681: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
682: --
683: hr_utility.set_location('Leaving : ' || c_proc, 20);
684: end fqtd_ec;
677: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
678: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 3) + 1) * 3) - 1;
679: --
680: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
681: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
682: --
683: hr_utility.set_location('Leaving : ' || c_proc, 20);
684: end fqtd_ec;
685: -- ----------------------------------------------------------------------------
679: --
680: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
681: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
682: --
683: hr_utility.set_location('Leaving : ' || c_proc, 20);
684: end fqtd_ec;
685: -- ----------------------------------------------------------------------------
686: -- |-------------------------------< fytd_ec >--------------------------------|
687: -- ----------------------------------------------------------------------------
699: --
700: l_fy_start_date date;
701: l_start_date date;
702: begin
703: hr_utility.set_location('Entering : ' || c_proc, 10);
704: hr_utility.trace(p_dimension_name);
705: --
706: l_fy_start_date := fy_start_date(business_group_id(p_user_payroll_action_id));
707: l_start_date := add_months(l_fy_start_date, floor(months_between(p_user_effective_date, l_fy_start_date) / 12) * 12);
700: l_fy_start_date date;
701: l_start_date date;
702: begin
703: hr_utility.set_location('Entering : ' || c_proc, 10);
704: hr_utility.trace(p_dimension_name);
705: --
706: l_fy_start_date := fy_start_date(business_group_id(p_user_payroll_action_id));
707: l_start_date := add_months(l_fy_start_date, floor(months_between(p_user_effective_date, l_fy_start_date) / 12) * 12);
708: --
706: l_fy_start_date := fy_start_date(business_group_id(p_user_payroll_action_id));
707: l_start_date := add_months(l_fy_start_date, floor(months_between(p_user_effective_date, l_fy_start_date) / 12) * 12);
708: --
709: if l_start_date > p_owner_effective_date then
710: hr_utility.trace('expired');
711: p_expiry_information := 1;
712: else
713: hr_utility.trace('NOT expired');
714: p_expiry_information := 0;
709: if l_start_date > p_owner_effective_date then
710: hr_utility.trace('expired');
711: p_expiry_information := 1;
712: else
713: hr_utility.trace('NOT expired');
714: p_expiry_information := 0;
715: end if;
716: --
717: hr_utility.set_location('Leaving : ' || c_proc, 20);
713: hr_utility.trace('NOT expired');
714: p_expiry_information := 0;
715: end if;
716: --
717: hr_utility.set_location('Leaving : ' || c_proc, 20);
718: end fytd_ec;
719: -- ----------------------------------------------------------------------------
720: -- |--------------------------< fytd_ec (date mode)>--------------------------|
721: -- ----------------------------------------------------------------------------
732: c_proc constant varchar2(61) := c_package || 'fytd_ec (date mode)';
733: --
734: l_fy_start_date date;
735: begin
736: hr_utility.set_location('Entering : ' || c_proc, 10);
737: hr_utility.trace(p_dimension_name);
738: --
739: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
740: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 12) + 1) * 12) - 1;
733: --
734: l_fy_start_date date;
735: begin
736: hr_utility.set_location('Entering : ' || c_proc, 10);
737: hr_utility.trace(p_dimension_name);
738: --
739: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
740: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 12) + 1) * 12) - 1;
741: --
738: --
739: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
740: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 12) + 1) * 12) - 1;
741: --
742: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
743: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
744: --
745: hr_utility.set_location('Leaving : ' || c_proc, 20);
746: end fytd_ec;
739: l_fy_start_date := fy_start_date(business_group_id(p_owner_payroll_action_id));
740: p_expiry_information := add_months(l_fy_start_date, (floor(months_between(p_owner_effective_date, l_fy_start_date) / 12) + 1) * 12) - 1;
741: --
742: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
743: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
744: --
745: hr_utility.set_location('Leaving : ' || c_proc, 20);
746: end fytd_ec;
747: -- ----------------------------------------------------------------------------
741: --
742: hr_utility.trace('owner_date : ' || to_char(p_owner_effective_date));
743: hr_utility.trace('expiry_date : ' || to_char(p_expiry_information));
744: --
745: hr_utility.set_location('Leaving : ' || c_proc, 20);
746: end fytd_ec;
747: -- ----------------------------------------------------------------------------
748: -- |---------------------------< show_dim_periods >---------------------------|
749: -- ----------------------------------------------------------------------------
844: end show_dim_periods;
845: */
846: --
847: --begin
848: -- hr_utility.trace_on('F', 'TTAGAWA');
849: end pyjpexc;