DBA Data[Home] [Help]

APPS.HXT_RETRO_PROCESS dependencies on HXT_UTIL

Line 164: --HXT_UTIL.DEBUG('Start process.');-- debug only --HXT115

160: g_debug := hr_utility.debug_enabled;
161: -- commented out. using sysdate view, now. RTF
162: -- insert into fnd_sessions values (userenv('SESSIONID'), trunc(SYSDATE));
163: -- commit;
164: --HXT_UTIL.DEBUG('Start process.');-- debug only --HXT115
165: -- time period will be ignored completely when passed in as NULL
166: l_date_earned := to_date(to_char(trunc(l_date_earned),'DD/MM/RRRR'),'DD/MM/RRRR');
167: l_payroll_id := to_char(p_payroll_id);
168: l_retro_batch_id := p_retro_batch_id; --BSE115M

Line 271: --HXT_UTIL.DEBUG('Beginning we have batches loop');

267: l_index := list_batch_rec_ids.first;
268:
269: WHILE l_index is not null LooP
270: BEGIN
271: --HXT_UTIL.DEBUG('Beginning we have batches loop');
272: --
273: -- Select and process all user specified batches for this payroll/reference number
274: -- Process batch range specified by the user, else do all available
275: --

Line 278: HXT_UTIL.DEBUG('payroll_id = '||to_char(p_payroll_id)||' retro_batch_id = '

274: -- Process batch range specified by the user, else do all available
275: --
276: l_loop_flag := TRUE;
277:
278: HXT_UTIL.DEBUG('payroll_id = '||to_char(p_payroll_id)||' retro_batch_id = '
279: ||to_char(list_batch_rec_ids(l_index).batch_id)||' ref_num = '||p_ref_num);
280: FOR batch_rec IN cur_batch(p_payroll_id, list_batch_rec_ids(l_index).batch_id, p_ref_num ) LOOP
281: --HXT_UTIL.DEBUG('Batch number is ' || TO_CHAR(batch_rec.batch_id));
282: l_batch_id := batch_rec.batch_id;

Line 281: --HXT_UTIL.DEBUG('Batch number is ' || TO_CHAR(batch_rec.batch_id));

277:
278: HXT_UTIL.DEBUG('payroll_id = '||to_char(p_payroll_id)||' retro_batch_id = '
279: ||to_char(list_batch_rec_ids(l_index).batch_id)||' ref_num = '||p_ref_num);
280: FOR batch_rec IN cur_batch(p_payroll_id, list_batch_rec_ids(l_index).batch_id, p_ref_num ) LOOP
281: --HXT_UTIL.DEBUG('Batch number is ' || TO_CHAR(batch_rec.batch_id));
282: l_batch_id := batch_rec.batch_id;
283: l_kounter := l_kounter + 1;
284: --
285: -- rollback all PayMix data per user request

Line 319: --HXT_UTIL.DEBUG('Begin timecard validation.');

315: ELSE
316: --
317: -- Validate batch, status:0=Normal, 1=Warning, 2=Stop Level Data Error, 3=System
318: --
319: --HXT_UTIL.DEBUG('Begin timecard validation.');
320: -- Delete prior errors for this batch
321: HXT_BATCH_PROCESS.Del_Prior_Errors(batch_rec.batch_id);
322: HXT_RETRO_VAL.Val_Retro_Timecard(batch_rec.batch_id,
323: batch_rec.tim_id,

Line 353: --HXT_UTIL.DEBUG('Successful timecard validation.');

349: l_final_valid_retcode := l_valid_retcode;
350: END IF;
351: -- Successful Validation, Set batch to ready Status
352: IF l_valid_retcode = 0 then
353: --HXT_UTIL.DEBUG('Successful timecard validation.');
354: HXT_BATCH_PROCESS.Set_batch_status(l_date_earned, batch_rec.batch_id, 'VV');
355: END IF;
356: -- set status to Warning and lets user know we have a TAMS/O
357: -- User Level Data Error for this batch

Line 359: --HXT_UTIL.DEBUG('Timecard validation warnings.');

355: END IF;
356: -- set status to Warning and lets user know we have a TAMS/O
357: -- User Level Data Error for this batch
358: IF l_valid_retcode = 1 then
359: --HXT_UTIL.DEBUG('Timecard validation warnings.');
360: HXT_BATCH_PROCESS.Set_batch_status(l_date_earned, batch_rec.batch_id, 'VW');
361: FND_MESSAGE.SET_NAME('HXT','HXT_39349_CHK_IND_TCARD_ERRS'); --HXT111
362: HXT_BATCH_PROCESS.Insert_Pay_Batch_Errors( batch_rec.batch_id,
363: 'W',

Line 368: --HXT_UTIL.DEBUG('Timecard validation errors.');

364: '',
365: l_return);
366: END IF;
367: IF l_valid_retcode > 2 THEN
368: --HXT_UTIL.DEBUG('Timecard validation errors.');
369: HXT_BATCH_PROCESS.Set_batch_status(l_date_earned, batch_rec.batch_id, 'VE');
370: FND_MESSAGE.SET_NAME('HXT','HXT_39349_CHK_IND_TCARD_ERRS');
371: HXT_BATCH_PROCESS.Insert_Pay_Batch_Errors( batch_rec.batch_id,
372: 'VE',

Line 405: HXT_UTIL.DEBUG('Now moving to PayMIX.');

401: 'VE',
402: '',
403: l_return);
404: ELSIF batch_rec.batch_status in ('VV','VW') THEN -- RETROPAY
405: HXT_UTIL.DEBUG('Now moving to PayMIX.');
406: HXT_RETRO_MIX.retro_sum_to_mix(batch_rec.batch_id,
407: batch_rec.tim_id, l_sum_retcode,
408: v_err_buf);
409: HXT_UTIL.DEBUG('back from moving to PayMIX. v_er_buf is '||v_err_buf);

Line 409: HXT_UTIL.DEBUG('back from moving to PayMIX. v_er_buf is '||v_err_buf);

405: HXT_UTIL.DEBUG('Now moving to PayMIX.');
406: HXT_RETRO_MIX.retro_sum_to_mix(batch_rec.batch_id,
407: batch_rec.tim_id, l_sum_retcode,
408: v_err_buf);
409: HXT_UTIL.DEBUG('back from moving to PayMIX. v_er_buf is '||v_err_buf);
410: HXT_UTIL.DEBUG('back from moving to PayMIX. l_sum_retcode is '||to_char(l_sum_retcode));
411: IF l_sum_retcode > l_final_sum_retcode then
412: l_final_sum_retcode := l_sum_retcode;
413: END IF;

Line 410: HXT_UTIL.DEBUG('back from moving to PayMIX. l_sum_retcode is '||to_char(l_sum_retcode));

406: HXT_RETRO_MIX.retro_sum_to_mix(batch_rec.batch_id,
407: batch_rec.tim_id, l_sum_retcode,
408: v_err_buf);
409: HXT_UTIL.DEBUG('back from moving to PayMIX. v_er_buf is '||v_err_buf);
410: HXT_UTIL.DEBUG('back from moving to PayMIX. l_sum_retcode is '||to_char(l_sum_retcode));
411: IF l_sum_retcode > l_final_sum_retcode then
412: l_final_sum_retcode := l_sum_retcode;
413: END IF;
414: IF (l_sum_retcode = 0) then

Line 415: --HXT_UTIL.DEBUG('Successful move to PayMIX.');

411: IF l_sum_retcode > l_final_sum_retcode then
412: l_final_sum_retcode := l_sum_retcode;
413: END IF;
414: IF (l_sum_retcode = 0) then
415: --HXT_UTIL.DEBUG('Successful move to PayMIX.');
416: HXT_BATCH_PROCESS.Set_batch_status(l_date_earned, batch_rec.batch_id, 'VT');
417: ELSE
418: retcode := 2;
419: FND_MESSAGE.SET_NAME('HXT','HXT_39452_RETRO_SYSTEM_ERROR');

Line 469: HXT_UTIL.DEBUG('Other exception.'||sqlerrm);

465: hr_utility.trace('Backtrace this error to Batch validation log ');
466: hr_utility.trace('Skipping to next batch ');
467: WHEN OTHERS THEN
468: HXT_BATCH_PROCESS.Set_batch_status(l_date_earned, batch_rec.batch_id, 'VE');
469: HXT_UTIL.DEBUG('Other exception.'||sqlerrm);
470: l_index := null;
471: END; -- batches
472: END LOOP; -- while more batches exist in the range l_index not equal to null
473: -- Check for error totals to return a status from concurrent manager.

Line 537: --HXT_UTIL.DEBUG('Retcode:' || TO_CHAR(l_retcode) || ' ' || l_errbuf);

533: l_retcode := 2;
534: END IF;
535: retcode := l_retcode;
536: errbuf := l_errbuf;
537: --HXT_UTIL.DEBUG('Retcode:' || TO_CHAR(l_retcode) || ' ' || l_errbuf);
538: -- begin C431
539: -- commented out. using sysdate view, now. RTF
540: --delete from fnd_sessions where session_id = userenv('SESSIONID');
541:

Line 594: HXT_UTIL.Gen_Error(p_batch_id, 0, 0, /*g_time_period_id*/NULL, p_error_text,

590: ,p_error_text IN VARCHAR2
591: ,p_oracle_error_text IN VARCHAR2 default NULL ) RETURN NUMBER IS
592: -- calls error processing procedure --
593: BEGIN
594: HXT_UTIL.Gen_Error(p_batch_id, 0, 0, /*g_time_period_id*/NULL, p_error_text,
595: p_location, p_oracle_error_text
596: ,trunc(sysdate) -- C431
597: ,hr_general.end_of_time
598: ,'ERR');