3888: FETCH c_hr_data INTO l_hr_data_exists;
3889: CLOSE c_hr_data;
3890:
3891: IF l_hr_data_exists = 'Y' THEN
3892: FND_MESSAGE.SET_NAME('AR', 'HZ_IMP_NO_HR_DATALOAD');
3893: l_error_message := FND_MESSAGE.get;
3894:
3895: FND_FILE.PUT_LINE(FND_FILE.LOG, 'log:' || l_error_message);
3896: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, l_error_message);
3889: CLOSE c_hr_data;
3890:
3891: IF l_hr_data_exists = 'Y' THEN
3892: FND_MESSAGE.SET_NAME('AR', 'HZ_IMP_NO_HR_DATALOAD');
3893: l_error_message := FND_MESSAGE.get;
3894:
3895: FND_FILE.PUT_LINE(FND_FILE.LOG, 'log:' || l_error_message);
3896: FND_FILE.PUT_LINE(FND_FILE.OUTPUT, l_error_message);
3897: update_import_status(P_BATCH_ID, 'ERROR');
4305: l_allow_addr_corr_prof
4306: );
4307: END IF;
4308: if (l_request_id is null or l_request_id=0) then
4309: l_error_message := FND_MESSAGE.get;
4310: errbuf := l_error_message;
4311: retcode := 2;
4312: RETURN;
4313: end if;
4326: RETURN;
4327: EXCEPTION
4328: WHEN OTHERS THEN
4329: IF SQLCODE between -1899 and -1800 THEN
4330: FND_MESSAGE.SET_NAME('AR', 'HZ_IMP_INVALID_DATE_FORMAT');
4331: ELSE
4332: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4333: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
4334: END IF;
4328: WHEN OTHERS THEN
4329: IF SQLCODE between -1899 and -1800 THEN
4330: FND_MESSAGE.SET_NAME('AR', 'HZ_IMP_INVALID_DATE_FORMAT');
4331: ELSE
4332: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4333: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
4334: END IF;
4335: l_error_message := FND_MESSAGE.get;
4336: errbuf := l_error_message;
4329: IF SQLCODE between -1899 and -1800 THEN
4330: FND_MESSAGE.SET_NAME('AR', 'HZ_IMP_INVALID_DATE_FORMAT');
4331: ELSE
4332: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4333: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
4334: END IF;
4335: l_error_message := FND_MESSAGE.get;
4336: errbuf := l_error_message;
4337: retcode := 2;
4331: ELSE
4332: FND_MESSAGE.SET_NAME('AR', 'HZ_API_OTHERS_EXCEP');
4333: FND_MESSAGE.SET_TOKEN('ERROR', SQLERRM);
4334: END IF;
4335: l_error_message := FND_MESSAGE.get;
4336: errbuf := l_error_message;
4337: retcode := 2;
4338: FND_FILE.PUT_LINE(FND_FILE.LOG, '******* Unexpected Error occured in stage '||to_char(stage)||' if worker submitted. Else it may have occured before submitting stage '||to_char(stage)||' in the main wrapper');
4339: FND_FILE.PUT_LINE(FND_FILE.LOG, '******* Unexpected error: ' || SQLERRM);