DBA Data[Home] [Help]

APPS.HXT_TRAN_PA dependencies on HXT_TRAN_PA

Line 1: PACKAGE BODY HXT_TRAN_PA AS

1: PACKAGE BODY HXT_TRAN_PA AS
2: /* $Header: hxtpa.pkb 120.3.12020000.2 2013/02/27 09:25:21 jnerella ship $ */
3: l_hours_per_year NUMBER(22,5) := TO_NUMBER(fnd_profile.Value('HXT_HOURS_PER_YEAR'));
4: g_debug boolean := hr_utility.debug_enabled;
5: PROCEDURE transfer_timecards( o_err_buf OUT NOCOPY VARCHAR2,

Line 76: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',10);

72:
73: BEGIN
74: g_debug :=hr_utility.debug_enabled;
75: if g_debug then
76: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',10);
77: end if;
78:
79: HXT_UTIL.DEBUG('Selecting Cursor'); --DEBUG ONLY --HXT115
80:

Line 86: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',20);

82:
83: FOR l_timecard_rec IN l_timecard_cur( i_payroll_id, i_time_period_id) LOOP
84:
85: if g_debug then
86: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',20);
87: end if;
88:
89: g_err_effective_start := l_timecard_rec.effective_start_date;
90: g_err_effective_end := l_timecard_rec.effective_end_date;

Line 96: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',30);

92:
93: BEGIN --timecard error block
94:
95: if g_debug then
96: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',30);
97: end if;
98:
99: l_any_timecards := TRUE;
100:

Line 164: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',40);

160: -- were not included in Effective
161: -- Wage Rate processing.
162:
163: if g_debug then
164: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',40);
165: end if;
166:
167: l_retcode := non_eff_wage_rate_transfer(l_timecard_rec.id,
168: l_timecard_rec.end_date,

Line 178: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',50);

174:
175: -- Report any errors for non-EWR and ROLLBACK
176: IF l_retcode = 1 THEN
177: if g_debug then
178: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',50);
179: end if;
180: RAISE l_non_ewr_error;
181: END IF;
182: if g_debug then

Line 183: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',60);

179: end if;
180: RAISE l_non_ewr_error;
181: END IF;
182: if g_debug then
183: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',60);
184: end if;
185: COMMIT; -- commit data for this timecard
186:
187: EXCEPTION

Line 191: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',70);

187: EXCEPTION
188: -- Effective Wage Rate Errors
189: WHEN l_ewr_error THEN
190: if g_debug then
191: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',70);
192: end if;
193: ROLLBACK;
194: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
195: l_conc_error_flag := TRUE;

Line 199: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',80);

195: l_conc_error_flag := TRUE;
196: -- Non Effective Wage Rate Errors
197: WHEN l_non_ewr_error THEN
198: if g_debug then
199: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',80);
200: end if;
201: ROLLBACK;
202: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
203: l_conc_error_flag := TRUE;

Line 207: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',90);

203: l_conc_error_flag := TRUE;
204: -- Other errors
205: WHEN OTHERS THEN
206: if g_debug then
207: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',90);
208: end if;
209: ROLLBACK;
210: l_location := 'hxt_tran_pa.transfer_timecards';
211: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');

Line 210: l_location := 'hxt_tran_pa.transfer_timecards';

206: if g_debug then
207: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',90);
208: end if;
209: ROLLBACK;
210: l_location := 'hxt_tran_pa.transfer_timecards';
211: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
212: l_error_text := FND_MESSAGE.GET;
213: FND_MESSAGE.CLEAR;
214: l_system_text := SQLERRM;

Line 219: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',100);

215: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
216: l_conc_error_flag := TRUE;
217: END; -- timecard error block
218: if g_debug then
219: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',100);
220: end if;
221: END LOOP; -- timecard loop
222:
223: -- Return an error if any timecards had a problem

Line 226: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',110);

222:
223: -- Return an error if any timecards had a problem
224: IF l_conc_error_flag = TRUE THEN
225: if g_debug then
226: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',110);
227: end if;
228: RAISE l_conc_error;
229: END IF;
230:

Line 234: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',120);

230:
231: -- Return an error if NO timecards exist for this payroll/period
232: IF l_any_timecards = FALSE THEN
233: if g_debug then
234: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',120);
235: end if;
236: RAISE l_no_timecards;
237: END IF;
238: o_ret_code := 0;

Line 246: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',130);

242: HXT_UTIL.DEBUG('Time details successfully transferred!');
243: EXCEPTION
244: WHEN l_conc_error THEN
245: if g_debug then
246: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',130);
247: end if;
248: FND_MESSAGE.SET_NAME('HXT','HXT_39456_CHK_TCARD_ERRS');
249: o_err_buf := FND_MESSAGE.GET;
250: FND_MESSAGE.CLEAR;

Line 256: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',140);

252: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
253: RETURN;
254: WHEN l_no_timecards THEN
255: if g_debug then
256: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',140);
257: end if;
258: --HXT111 o_err_buf := 'No timecards located for payroll/period';
259: FND_MESSAGE.SET_NAME('HXT','HXT_39457_NO_TCARD_4_PAY_PRD');
260: o_err_buf := FND_MESSAGE.GET;

Line 267: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',150);

263: HXT_UTIL.DEBUG('No timecards located for this payroll');
264: RETURN;
265: WHEN l_no_details THEN
266: if g_debug then
267: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',150);
268: end if;
269: --HXT111 o_err_buf := 'No timecard details transferable';
270: FND_MESSAGE.SET_NAME('HXT','HXT_39458_NO_TCARD_DET_XFER');
271: o_err_buf := FND_MESSAGE.GET;

Line 278: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',160);

274: HXT_UTIL.DEBUG('No timecard details transferable');
275: RETURN;
276: WHEN g_error_log_error THEN
277: if g_debug then
278: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',160);
279: end if;
280: FND_MESSAGE.SET_NAME('HXT','HXT_39459_HXTPA_ERR');
281: o_err_buf := FND_MESSAGE.GET;
282: FND_MESSAGE.CLEAR;

Line 283: HXT_UTIL.DEBUG('Error in hxt_tran_pa.log_transfer_errors.');

279: end if;
280: FND_MESSAGE.SET_NAME('HXT','HXT_39459_HXTPA_ERR');
281: o_err_buf := FND_MESSAGE.GET;
282: FND_MESSAGE.CLEAR;
283: HXT_UTIL.DEBUG('Error in hxt_tran_pa.log_transfer_errors.');
284: o_ret_code := 2;
285: RETURN;
286: WHEN OTHERS THEN
287: if g_debug then

Line 288: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',170);

284: o_ret_code := 2;
285: RETURN;
286: WHEN OTHERS THEN
287: if g_debug then
288: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',170);
289: end if;
290: l_location := 'hxt_tran_pa';
291: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
292: l_error_text := FND_MESSAGE.GET;

Line 290: l_location := 'hxt_tran_pa';

286: WHEN OTHERS THEN
287: if g_debug then
288: hr_utility.set_location('HXT_TRAN_PA.transfer_timecards',170);
289: end if;
290: l_location := 'hxt_tran_pa';
291: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
292: l_error_text := FND_MESSAGE.GET;
293: FND_MESSAGE.CLEAR;
294: l_system_text := SQLERRM;

Line 408: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',10);

404:
405: BEGIN
406: g_debug :=hr_utility.debug_enabled;
407: if g_debug then
408: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',10);
409: end if;
410: HXT_UTIL.DEBUG('Processing NON-EWR time');
411:
412: --Process all eligible time detail rows for this timecard

Line 415: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',20);

411:
412: --Process all eligible time detail rows for this timecard
413: FOR l_non_rec IN l_non_cur(i_timecard_id) LOOP
414: if g_debug then
415: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',20);
416: end if;
417: HXT_UTIL.DEBUG(' in the loop');
418: g_err_effective_start := l_non_rec.effective_start_date;
419: g_err_effective_end := l_non_rec.effective_end_date;

Line 430: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',30);

426: end if;
427: -- Calculate an houly rate for the salary basis
428: IF l_non_rec.pay_basis = 'ANNUAL' THEN
429: if g_debug then
430: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',30);
431: end if;
432: l_rate := l_non_rec.proposed_salary / l_hours_per_year;
433: ELSIF l_non_rec.pay_basis = 'MONTHLY' THEN
434: if g_debug then

Line 435: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',40);

431: end if;
432: l_rate := l_non_rec.proposed_salary / l_hours_per_year;
433: ELSIF l_non_rec.pay_basis = 'MONTHLY' THEN
434: if g_debug then
435: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',40);
436: end if;
437: l_rate := (l_non_rec.proposed_salary * 12) / l_hours_per_year;
438: ELSIF l_non_rec.pay_basis = 'PERIOD' THEN
439: if g_debug then

Line 440: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',50);

436: end if;
437: l_rate := (l_non_rec.proposed_salary * 12) / l_hours_per_year;
438: ELSIF l_non_rec.pay_basis = 'PERIOD' THEN
439: if g_debug then
440: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',50);
441: end if;
442: l_rate := (l_non_rec.proposed_salary * i_annual_pay_periods) / l_hours_per_year;
443: ELSE -- 'HOURLY'
444: if g_debug then

Line 445: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',60);

441: end if;
442: l_rate := (l_non_rec.proposed_salary * i_annual_pay_periods) / l_hours_per_year;
443: ELSE -- 'HOURLY'
444: if g_debug then
445: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',60);
446: end if;
447: l_rate := l_non_rec.proposed_salary;
448: END IF;
449: l_standard_rate := l_rate;

Line 459: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',70);

455: ||TO_CHAR(l_rate));
456: -- Take the override rate when one exists
457: IF l_non_rec.hourly_rate IS NOT NULL THEN
458: if g_debug then
459: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',70);
460: end if;
461: l_rate := l_non_rec.hourly_rate;
462: HXT_UTIL.DEBUG('Using Override Hourly Rate of '||TO_CHAR(l_rate));
463: END IF;

Line 468: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',80);

464:
465: -- Process Base Hours
466: IF l_non_rec.hxt_earning_category IN ('ABS','OVT','REG') THEN
467: if g_debug then
468: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',80);
469: end if;
470: -- Handle Flat Amounts on Base Hours Types
471: IF l_non_rec.amount IS NOT NULL THEN
472: if g_debug then

Line 473: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',90);

469: end if;
470: -- Handle Flat Amounts on Base Hours Types
471: IF l_non_rec.amount IS NOT NULL THEN
472: if g_debug then
473: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',90);
474: end if;
475: l_premium_amount := l_non_rec.amount;
476: HXT_UTIL.DEBUG('Sending Premium Flat amount entered on timecard, amount:'
477: ||TO_CHAR(l_premium_amount)||

Line 481: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',100);

477: ||TO_CHAR(l_premium_amount)||
478: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
479: ELSE
480: if g_debug then
481: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',100);
482: end if;
483: l_premium_amount := NULL;
484: -- Calculate rate per hour for overtime using the available premium types
485: IF l_non_rec.hxt_earning_category = 'OVT' THEN

Line 487: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',110);

483: l_premium_amount := NULL;
484: -- Calculate rate per hour for overtime using the available premium types
485: IF l_non_rec.hxt_earning_category = 'OVT' THEN
486: if g_debug then
487: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',110);
488: end if;
489: IF l_non_rec.hxt_premium_type = 'FACTOR' THEN
490: if g_debug then
491: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',120);

Line 491: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',120);

487: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',110);
488: end if;
489: IF l_non_rec.hxt_premium_type = 'FACTOR' THEN
490: if g_debug then
491: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',120);
492: end if;
493: -- Use the manually entered multiple when one exists
494: -- else, use the multiple from the element descriptive flex
495: IF l_non_rec.rate_multiple IS NOT NULL THEN

Line 497: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',130);

493: -- Use the manually entered multiple when one exists
494: -- else, use the multiple from the element descriptive flex
495: IF l_non_rec.rate_multiple IS NOT NULL THEN
496: if g_debug then
497: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',130);
498: end if;
499: l_rate := l_rate * l_non_rec.rate_multiple;
500: HXT_UTIL.DEBUG(TO_CHAR(l_non_rec.rate_multiple)
501: ||'Sending Overtime FACTOR/manual multiple rate:'|| TO_CHAR(l_rate)

Line 505: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',140);

501: ||'Sending Overtime FACTOR/manual multiple rate:'|| TO_CHAR(l_rate)
502: ||' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
503: ELSE
504: if g_debug then
505: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',140);
506: end if;
507: l_rate := l_rate * l_non_rec.hxt_premium_amount;
508: HXT_UTIL.DEBUG(TO_CHAR(l_non_rec.hxt_premium_amount)
509: ||'Sending Overtime FACTOR/element premium rate:'||

Line 515: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',150);

511: ||TO_CHAR(l_non_rec.hours));
512: END IF;
513: ELSIF l_non_rec.hxt_premium_type = 'RATE' THEN
514: if g_debug then
515: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',150);
516: end if;
517: l_rate := l_non_rec.hxt_premium_amount;
518: HXT_UTIL.DEBUG('Sending Overtime RATE/element premium rate:'||TO_CHAR(l_rate)||
519: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));

Line 522: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',160);

518: HXT_UTIL.DEBUG('Sending Overtime RATE/element premium rate:'||TO_CHAR(l_rate)||
519: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
520: ELSE -- FIXED amount per day
521: if g_debug then
522: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',160);
523: end if;
524: l_rate := l_non_rec.hxt_premium_amount / l_non_rec.hours;
525: HXT_UTIL.DEBUG('Sending Overtime Flat/element premium rate:'||TO_CHAR(l_rate)||
526: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));

Line 530: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',170);

526: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
527: END IF;
528: ELSIF l_non_rec.hxt_earning_category = 'ABS' THEN
529: if g_debug then
530: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',170);
531: end if;
532: HXT_UTIL.DEBUG('Sending Time at: rate:'||TO_CHAR(l_rate)||
533: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
534: ELSE

Line 536: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',180);

532: HXT_UTIL.DEBUG('Sending Time at: rate:'||TO_CHAR(l_rate)||
533: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
534: ELSE
535: if g_debug then
536: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',180);
537: end if;
538: HXT_UTIL.DEBUG('Sending Time at: rate:'||TO_CHAR(l_rate)|| --HXT115
539: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
540: END IF;

Line 544: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',190);

540: END IF;
541: END IF; --End Amount NULL? SIR#5
542:
543: if g_debug then
544: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',190);
545: end if;
546: l_retcode := hxt_pa_user_exits.p_a_interface
547: (l_non_rec.hours,
548: l_rate,

Line 580: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',200);

576: o_error_text,
577: o_system_text);
578: IF l_retcode = 1 THEN
579: if g_debug then
580: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',200);
581: end if;
582: RAISE l_transfer_error;
583: END IF;
584: -- End Base Hours Processing

Line 587: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',210);

583: END IF;
584: -- End Base Hours Processing
585: ELSE
586: if g_debug then
587: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',210);
588: end if;
589: IF l_non_rec.hxt_premium_type = 'FACTOR' THEN
590: if g_debug then
591: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',220);

Line 591: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',220);

587: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',210);
588: end if;
589: IF l_non_rec.hxt_premium_type = 'FACTOR' THEN
590: if g_debug then
591: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',220);
592: end if;
593: -- Use the manually entered multiple when one exists
594: -- else, use the multiple from the element descriptive flex
595: IF l_non_rec.rate_multiple IS NOT NULL THEN

Line 597: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',230);

593: -- Use the manually entered multiple when one exists
594: -- else, use the multiple from the element descriptive flex
595: IF l_non_rec.rate_multiple IS NOT NULL THEN
596: if g_debug then
597: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',230);
598: end if;
599: l_rate := l_rate * l_non_rec.rate_multiple;
600: HXT_UTIL.DEBUG(TO_CHAR(l_non_rec.rate_multiple)
601: ||'Sending Premium FACTOR/manual multiple rate:'||

Line 606: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',240);

602: TO_CHAR(l_rate)||' '||l_non_rec.element_name
603: ||','||' hours:'||TO_CHAR(l_non_rec.hours));
604: ELSE
605: if g_debug then
606: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',240);
607: end if;
608: -- When the element flex value is used,
609: -- Factor premiums are calculated by multiplying the (rate x (premium - 1) x hours)
610: l_rate := l_rate * (l_non_rec.hxt_premium_amount - 1);

Line 619: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',250);

615: END IF;
616: -- Rate per hour premiums are the (rate x hours)
617: ELSIF l_non_rec.hxt_premium_type = 'RATE' THEN
618: if g_debug then
619: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',250);
620: end if;
621: -- Use the Hourly Rate(override rate) entered by the user, if one has been entered
622: IF l_non_rec.hourly_rate IS NOT NULL THEN
623: if g_debug then

Line 624: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',260);

620: end if;
621: -- Use the Hourly Rate(override rate) entered by the user, if one has been entered
622: IF l_non_rec.hourly_rate IS NOT NULL THEN
623: if g_debug then
624: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',260);
625: end if;
626: l_rate := l_non_rec.hourly_rate;
627: HXT_UTIL.DEBUG('Sending Premium RATE/element premium rate:'||TO_CHAR(l_rate)||
628: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));

Line 632: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',270);

628: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
629: -- Use the rate entered on the Pay Element flex segment
630: ELSE
631: if g_debug then
632: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',270);
633: end if;
634: l_rate := l_non_rec.hxt_premium_amount;
635: HXT_UTIL.DEBUG('Sending Premium Flat/element premium rate:'||TO_CHAR(l_rate)||
636: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));

Line 641: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',280);

637: END IF;
638: -- FIXED amount premium
639: ELSE
640: if g_debug then
641: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',280);
642: end if;
643: -- If no amount was entered, Assign the premium attached to the Pay Element
644: IF l_non_rec.amount IS NULL THEN
645: if g_debug then

Line 646: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',290);

642: end if;
643: -- If no amount was entered, Assign the premium attached to the Pay Element
644: IF l_non_rec.amount IS NULL THEN
645: if g_debug then
646: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',290);
647: end if;
648: l_premium_amount := l_non_rec.hxt_premium_amount;
649: HXT_UTIL.DEBUG('Sending Premium Flat/element premium amount:'||TO_CHAR(l_premium_amount)
650: || ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));

Line 654: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',300);

650: || ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
651: -- Else, take the override premium amount entered on the timecard
652: ELSE
653: if g_debug then
654: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',300);
655: end if;
656: l_premium_amount := l_non_rec.amount;
657: HXT_UTIL.DEBUG('Sending Premium Flat amount entered on timecard, amount:'
658: ||TO_CHAR(l_premium_amount)||

Line 662: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',310);

658: ||TO_CHAR(l_premium_amount)||
659: ' '||l_non_rec.element_name||','||' hours:'||TO_CHAR(l_non_rec.hours));
660: END IF;
661: if g_debug then
662: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',310);
663: end if;
664: END IF; -- premium calculations
665:
666: if g_debug then

Line 667: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',320);

663: end if;
664: END IF; -- premium calculations
665:
666: if g_debug then
667: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',320);
668: end if;
669: l_retcode := hxt_pa_user_exits.p_a_interface
670: (l_non_rec.hours,
671: l_rate,

Line 704: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',330);

700: o_system_text);
701:
702: IF l_retcode = 1 THEN
703: if g_debug then
704: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',330);
705: end if;
706: RAISE l_transfer_error;
707: END IF;
708: END IF; -- end premium hours transfer

Line 712: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',340);

708: END IF; -- end premium hours transfer
709:
710: -- Update the detail rows to a completed status
711: if g_debug then
712: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',340);
713: end if;
714: UPDATE hxt_det_hours_worked_f detf
715: SET detf.pa_status = 'C'
716: WHERE detf.rowid = (SELECT det2.rowid

Line 721: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',350);

717: FROM hxt_det_hours_worked_x det2
718: WHERE l_non_rec.id = det2.id);
719: END LOOP;
720: if g_debug then
721: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',350);
722: end if;
723: RETURN 0;
724: EXCEPTION
725: WHEN l_transfer_error THEN

Line 727: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',360);

723: RETURN 0;
724: EXCEPTION
725: WHEN l_transfer_error THEN
726: if g_debug then
727: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',360);
728: end if;
729: RETURN 1;
730: WHEN OTHERS THEN
731: if g_debug then

Line 732: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',370);

728: end if;
729: RETURN 1;
730: WHEN OTHERS THEN
731: if g_debug then
732: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',370);
733: end if;
734: HXT_UTIL.DEBUG('exception in non_eff_wage: '||SQLERRM);
735: o_location := 'hxt_tran_pa.non_eff_wage_rate_transfer';
736: o_error_text := NULL;

Line 735: o_location := 'hxt_tran_pa.non_eff_wage_rate_transfer';

731: if g_debug then
732: hr_utility.set_location('HXT_TRAN_PA.non_eff_wage_rate_transfer',370);
733: end if;
734: HXT_UTIL.DEBUG('exception in non_eff_wage: '||SQLERRM);
735: o_location := 'hxt_tran_pa.non_eff_wage_rate_transfer';
736: o_error_text := NULL;
737: o_system_text := SQLERRM;
738: RETURN 1;
739: END non_eff_wage_rate_transfer;

Line 750: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',10);

746: i_system_text IN VARCHAR2)RETURN NUMBER IS
747: BEGIN
748: g_debug :=hr_utility.debug_enabled;
749: if g_debug then
750: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',10);
751: end if;
752: HXT_UTIL.DEBUG('g_batch_err_id = ' || TO_CHAR(g_batch_err_id)); --DEBUG ONLY
753: HXT_UTIL.DEBUG('g_timecard_err_id = ' || TO_CHAR(g_timecard_err_id)); --DEBUG ONLY
754: HXT_UTIL.DEBUG('g_sum_hours_err_id = ' || g_sum_hours_err_id); --DEBUG ONLY

Line 771: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',20);

767: g_err_effective_end,
768: 'ERR'); --HXT11i1
769: COMMIT;
770: if g_debug then
771: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',20);
772: end if;
773:
774: RETURN 0;
775: EXCEPTION

Line 778: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',30);

774: RETURN 0;
775: EXCEPTION
776: WHEN OTHERS THEN
777: if g_debug then
778: hr_utility.set_location('HXT_TRAN_PA.log_transfer_errors',30);
779: end if;
780: RAISE g_error_log_error;
781: END log_transfer_errors;
782:

Line 786: END HXT_TRAN_PA;

782:
783: --begin
784:
785:
786: END HXT_TRAN_PA;