349:
350: EXCEPTION
351: WHEN l_p45_exception THEN
352: Hr_Utility.set_location('..'||'SQL-ERRM :'||SQLERRM,1223);
353: error_message := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','P46 part3 XML Process errors out.');
354: WHEN Others THEN
355: Hr_Utility.set_location('..'||'SQL-ERRM :'||SQLERRM,1223);
356: END range_code;
357: -----------------------------------------------------------------------
1147: --update pay_element_entries_f set screen_entry_value='Y' where
1148: Exception
1149: WHEN l_p45_exception THEN
1150: Hr_Utility.set_location('..'||'SQL-ERRM :'||SQLERRM,1223);
1151: error_message := FND_CONCURRENT.SET_COMPLETION_STATUS('ERROR','P46 part3 XML Process errors out');
1152: END archive_data;
1153: -----------------------------------------------------------------------
1154: --C2B
1155: -----------------------------------------------------------------------