166: -- Other errors
167: WHEN OTHERS THEN
168: ROLLBACK;
169: l_location := 'hxt_retro_pa.retro_pa_process';
170: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
171: l_error_text := FND_MESSAGE.GET;
172: FND_MESSAGE.CLEAR;
173: l_system_text := SQLERRM;
174: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
167: WHEN OTHERS THEN
168: ROLLBACK;
169: l_location := 'hxt_retro_pa.retro_pa_process';
170: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
171: l_error_text := FND_MESSAGE.GET;
172: FND_MESSAGE.CLEAR;
173: l_system_text := SQLERRM;
174: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
175: l_conc_error_flag := TRUE;
168: ROLLBACK;
169: l_location := 'hxt_retro_pa.retro_pa_process';
170: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
171: l_error_text := FND_MESSAGE.GET;
172: FND_MESSAGE.CLEAR;
173: l_system_text := SQLERRM;
174: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
175: l_conc_error_flag := TRUE;
176: END; -- timecard error block
190: HXT_UTIL.DEBUG('Retro details successfully transferred!');
191:
192: EXCEPTION
193: WHEN l_conc_error THEN
194: FND_MESSAGE.SET_NAME('HXT','HXT_39456_CHK_TCARD_ERRS');
195: o_err_buf := FND_MESSAGE.GET;
196: FND_MESSAGE.CLEAR;
197: o_ret_code := 2;
198: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
191:
192: EXCEPTION
193: WHEN l_conc_error THEN
194: FND_MESSAGE.SET_NAME('HXT','HXT_39456_CHK_TCARD_ERRS');
195: o_err_buf := FND_MESSAGE.GET;
196: FND_MESSAGE.CLEAR;
197: o_ret_code := 2;
198: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
199: RETURN;
192: EXCEPTION
193: WHEN l_conc_error THEN
194: FND_MESSAGE.SET_NAME('HXT','HXT_39456_CHK_TCARD_ERRS');
195: o_err_buf := FND_MESSAGE.GET;
196: FND_MESSAGE.CLEAR;
197: o_ret_code := 2;
198: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
199: RETURN;
200: WHEN l_no_timecards THEN
197: o_ret_code := 2;
198: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
199: RETURN;
200: WHEN l_no_timecards THEN
201: FND_MESSAGE.SET_NAME('HXT','HXT_39457_NO_TCARD_4_PAY_PRD');
202: o_err_buf := FND_MESSAGE.GET;
203: FND_MESSAGE.CLEAR;
204: o_ret_code := 2;
205: HXT_UTIL.DEBUG('No timecards located for this payroll');
198: HXT_UTIL.DEBUG('Check timecards for errors or run timecard report.');
199: RETURN;
200: WHEN l_no_timecards THEN
201: FND_MESSAGE.SET_NAME('HXT','HXT_39457_NO_TCARD_4_PAY_PRD');
202: o_err_buf := FND_MESSAGE.GET;
203: FND_MESSAGE.CLEAR;
204: o_ret_code := 2;
205: HXT_UTIL.DEBUG('No timecards located for this payroll');
206: RETURN;
199: RETURN;
200: WHEN l_no_timecards THEN
201: FND_MESSAGE.SET_NAME('HXT','HXT_39457_NO_TCARD_4_PAY_PRD');
202: o_err_buf := FND_MESSAGE.GET;
203: FND_MESSAGE.CLEAR;
204: o_ret_code := 2;
205: HXT_UTIL.DEBUG('No timecards located for this payroll');
206: RETURN;
207: WHEN l_no_details THEN
204: o_ret_code := 2;
205: HXT_UTIL.DEBUG('No timecards located for this payroll');
206: RETURN;
207: WHEN l_no_details THEN
208: FND_MESSAGE.SET_NAME('HXT','HXT_39458_NO_TCARD_DET_XFER');
209: o_err_buf := FND_MESSAGE.GET;
210: FND_MESSAGE.CLEAR;
211: o_ret_code := 0;
212: HXT_UTIL.DEBUG('No timecard details transferable');
205: HXT_UTIL.DEBUG('No timecards located for this payroll');
206: RETURN;
207: WHEN l_no_details THEN
208: FND_MESSAGE.SET_NAME('HXT','HXT_39458_NO_TCARD_DET_XFER');
209: o_err_buf := FND_MESSAGE.GET;
210: FND_MESSAGE.CLEAR;
211: o_ret_code := 0;
212: HXT_UTIL.DEBUG('No timecard details transferable');
213: RETURN;
206: RETURN;
207: WHEN l_no_details THEN
208: FND_MESSAGE.SET_NAME('HXT','HXT_39458_NO_TCARD_DET_XFER');
209: o_err_buf := FND_MESSAGE.GET;
210: FND_MESSAGE.CLEAR;
211: o_ret_code := 0;
212: HXT_UTIL.DEBUG('No timecard details transferable');
213: RETURN;
214: WHEN g_error_log_error THEN
211: o_ret_code := 0;
212: HXT_UTIL.DEBUG('No timecard details transferable');
213: RETURN;
214: WHEN g_error_log_error THEN
215: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
216: o_err_buf := FND_MESSAGE.GET;
217: FND_MESSAGE.CLEAR;
218: HXT_UTIL.DEBUG('Error in hxt_retro_pa.log_transfer_errors.');
219: o_ret_code := 2;
212: HXT_UTIL.DEBUG('No timecard details transferable');
213: RETURN;
214: WHEN g_error_log_error THEN
215: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
216: o_err_buf := FND_MESSAGE.GET;
217: FND_MESSAGE.CLEAR;
218: HXT_UTIL.DEBUG('Error in hxt_retro_pa.log_transfer_errors.');
219: o_ret_code := 2;
220: RETURN;
213: RETURN;
214: WHEN g_error_log_error THEN
215: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
216: o_err_buf := FND_MESSAGE.GET;
217: FND_MESSAGE.CLEAR;
218: HXT_UTIL.DEBUG('Error in hxt_retro_pa.log_transfer_errors.');
219: o_ret_code := 2;
220: RETURN;
221: WHEN OTHERS THEN
219: o_ret_code := 2;
220: RETURN;
221: WHEN OTHERS THEN
222: l_location := 'hxt_retro_pa';
223: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
224: l_error_text := FND_MESSAGE.GET;
225: FND_MESSAGE.CLEAR;
226: l_system_text := SQLERRM;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
220: RETURN;
221: WHEN OTHERS THEN
222: l_location := 'hxt_retro_pa';
223: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
224: l_error_text := FND_MESSAGE.GET;
225: FND_MESSAGE.CLEAR;
226: l_system_text := SQLERRM;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
228: o_ret_code := 2;
221: WHEN OTHERS THEN
222: l_location := 'hxt_retro_pa';
223: FND_MESSAGE.SET_NAME('HXT','HXT_39454_PA_XFER_ERROR');
224: l_error_text := FND_MESSAGE.GET;
225: FND_MESSAGE.CLEAR;
226: l_system_text := SQLERRM;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
228: o_ret_code := 2;
229: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
225: FND_MESSAGE.CLEAR;
226: l_system_text := SQLERRM;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
228: o_ret_code := 2;
229: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
230: o_err_buf := FND_MESSAGE.GET;
231: FND_MESSAGE.CLEAR;
232: HXT_UTIL.DEBUG('Error processing timecard for PA Transfer');
233: RETURN;
226: l_system_text := SQLERRM;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
228: o_ret_code := 2;
229: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
230: o_err_buf := FND_MESSAGE.GET;
231: FND_MESSAGE.CLEAR;
232: HXT_UTIL.DEBUG('Error processing timecard for PA Transfer');
233: RETURN;
234: END retro_pa_process;
227: l_retcode := log_transfer_errors(l_location, l_error_text, l_system_text);
228: o_ret_code := 2;
229: FND_MESSAGE.SET_NAME('HXT','HXT_39460_HXTRPA_ERR');
230: o_err_buf := FND_MESSAGE.GET;
231: FND_MESSAGE.CLEAR;
232: HXT_UTIL.DEBUG('Error processing timecard for PA Transfer');
233: RETURN;
234: END retro_pa_process;
235: /************************************************************************************************
1044: EXCEPTION
1045: WHEN l_transfer_error THEN
1046: RETURN 1;
1047: WHEN l_adjusting_error THEN
1048: FND_MESSAGE.SET_NAME('HXT','HXT_39461_SEND_ADJ_TRANS');
1049: o_location := FND_MESSAGE.GET;
1050: FND_MESSAGE.CLEAR;
1051: o_system_text := NULL;
1052: RETURN 1;
1045: WHEN l_transfer_error THEN
1046: RETURN 1;
1047: WHEN l_adjusting_error THEN
1048: FND_MESSAGE.SET_NAME('HXT','HXT_39461_SEND_ADJ_TRANS');
1049: o_location := FND_MESSAGE.GET;
1050: FND_MESSAGE.CLEAR;
1051: o_system_text := NULL;
1052: RETURN 1;
1053: WHEN l_retro_error THEN
1046: RETURN 1;
1047: WHEN l_adjusting_error THEN
1048: FND_MESSAGE.SET_NAME('HXT','HXT_39461_SEND_ADJ_TRANS');
1049: o_location := FND_MESSAGE.GET;
1050: FND_MESSAGE.CLEAR;
1051: o_system_text := NULL;
1052: RETURN 1;
1053: WHEN l_retro_error THEN
1054: FND_MESSAGE.SET_NAME('HXT','HXT_39462_SEND_RETRO_TRANS');
1050: FND_MESSAGE.CLEAR;
1051: o_system_text := NULL;
1052: RETURN 1;
1053: WHEN l_retro_error THEN
1054: FND_MESSAGE.SET_NAME('HXT','HXT_39462_SEND_RETRO_TRANS');
1055: o_location := FND_MESSAGE.GET;
1056: FND_MESSAGE.CLEAR;
1057: o_system_text := NULL;
1058: RETURN 1;
1051: o_system_text := NULL;
1052: RETURN 1;
1053: WHEN l_retro_error THEN
1054: FND_MESSAGE.SET_NAME('HXT','HXT_39462_SEND_RETRO_TRANS');
1055: o_location := FND_MESSAGE.GET;
1056: FND_MESSAGE.CLEAR;
1057: o_system_text := NULL;
1058: RETURN 1;
1059: WHEN l_backout_error THEN
1052: RETURN 1;
1053: WHEN l_retro_error THEN
1054: FND_MESSAGE.SET_NAME('HXT','HXT_39462_SEND_RETRO_TRANS');
1055: o_location := FND_MESSAGE.GET;
1056: FND_MESSAGE.CLEAR;
1057: o_system_text := NULL;
1058: RETURN 1;
1059: WHEN l_backout_error THEN
1060: FND_MESSAGE.SET_NAME('HXT','HXT_39463_SEND_BACK_TRANS');
1056: FND_MESSAGE.CLEAR;
1057: o_system_text := NULL;
1058: RETURN 1;
1059: WHEN l_backout_error THEN
1060: FND_MESSAGE.SET_NAME('HXT','HXT_39463_SEND_BACK_TRANS');
1061: o_location := FND_MESSAGE.GET;
1062: FND_MESSAGE.CLEAR;
1063: o_system_text := NULL;
1064: RETURN 1;
1057: o_system_text := NULL;
1058: RETURN 1;
1059: WHEN l_backout_error THEN
1060: FND_MESSAGE.SET_NAME('HXT','HXT_39463_SEND_BACK_TRANS');
1061: o_location := FND_MESSAGE.GET;
1062: FND_MESSAGE.CLEAR;
1063: o_system_text := NULL;
1064: RETURN 1;
1065: WHEN OTHERS THEN
1058: RETURN 1;
1059: WHEN l_backout_error THEN
1060: FND_MESSAGE.SET_NAME('HXT','HXT_39463_SEND_BACK_TRANS');
1061: o_location := FND_MESSAGE.GET;
1062: FND_MESSAGE.CLEAR;
1063: o_system_text := NULL;
1064: RETURN 1;
1065: WHEN OTHERS THEN
1066: o_location := 'hxt_retro_pa.retro_non_ewr_transfer' || l_message;