873: AND orig_system<>'SST'
874: AND status='A';
875: EXCEPTION
876: WHEN NO_DATA_FOUND THEN
877: FND_MESSAGE.SET_NAME('AR','HZ_API_INVALID_FK');
878: FND_MESSAGE.SET_TOKEN('FK','orig_system');
879: FND_MESSAGE.SET_TOKEN('COLUMN','orig_system');
880: FND_MESSAGE.SET_TOKEN('TABLE','HZ_ORIG_SYSTEMS_B');
881:
874: AND status='A';
875: EXCEPTION
876: WHEN NO_DATA_FOUND THEN
877: FND_MESSAGE.SET_NAME('AR','HZ_API_INVALID_FK');
878: FND_MESSAGE.SET_TOKEN('FK','orig_system');
879: FND_MESSAGE.SET_TOKEN('COLUMN','orig_system');
880: FND_MESSAGE.SET_TOKEN('TABLE','HZ_ORIG_SYSTEMS_B');
881:
882: -- Bug 4530477
875: EXCEPTION
876: WHEN NO_DATA_FOUND THEN
877: FND_MESSAGE.SET_NAME('AR','HZ_API_INVALID_FK');
878: FND_MESSAGE.SET_TOKEN('FK','orig_system');
879: FND_MESSAGE.SET_TOKEN('COLUMN','orig_system');
880: FND_MESSAGE.SET_TOKEN('TABLE','HZ_ORIG_SYSTEMS_B');
881:
882: -- Bug 4530477
883: FND_FILE.PUT_LINE (FND_FILE.LOG, 'Error***** '||FND_MESSAGE.GET);
876: WHEN NO_DATA_FOUND THEN
877: FND_MESSAGE.SET_NAME('AR','HZ_API_INVALID_FK');
878: FND_MESSAGE.SET_TOKEN('FK','orig_system');
879: FND_MESSAGE.SET_TOKEN('COLUMN','orig_system');
880: FND_MESSAGE.SET_TOKEN('TABLE','HZ_ORIG_SYSTEMS_B');
881:
882: -- Bug 4530477
883: FND_FILE.PUT_LINE (FND_FILE.LOG, 'Error***** '||FND_MESSAGE.GET);
884:
879: FND_MESSAGE.SET_TOKEN('COLUMN','orig_system');
880: FND_MESSAGE.SET_TOKEN('TABLE','HZ_ORIG_SYSTEMS_B');
881:
882: -- Bug 4530477
883: FND_FILE.PUT_LINE (FND_FILE.LOG, 'Error***** '||FND_MESSAGE.GET);
884:
885: UPDATE hz_imp_batch_summary
886: SET main_conc_status = 'ERROR',
887: batch_status = 'ACTION_REQUIRED'
886: SET main_conc_status = 'ERROR',
887: batch_status = 'ACTION_REQUIRED'
888: WHERE batch_id = p_batch_id;
889:
890: Errbuf := fnd_message.get;
891: Retcode := 2;
892:
893: RETURN;
894: END;
1956:
1957: END IF;
1958: EXCEPTION
1959: WHEN OTHERS THEN
1960: Errbuf := fnd_message.get||' '||SQLERRM;
1961: Retcode := 2;
1962:
1963: END;
1964: