Commit 438740c6 authored by Giuseppe Lo Presti's avatar Giuseppe Lo Presti
Browse files

More verbose log message in case of errors

parent 65e003a1
...@@ -208,7 +208,12 @@ BEGIN ...@@ -208,7 +208,12 @@ BEGIN
COMMIT; COMMIT;
SELECT count(*) INTO nbMissingImports FROM Err$_Tape_File; SELECT count(*) INTO nbMissingImports FROM Err$_Tape_File;
IF nbMissingImports = nbPreviousErrors THEN IF nbMissingImports = nbPreviousErrors THEN
IF nbPreviousErrors > 0 THEN
CNS_ctaLog(inTapePool, 'Tape files import completed. Still '|| nbPreviousErrors
||' cases from previous imports in the Err$_Tape_File table');
ELSE
CNS_ctaLog(inTapePool, 'Tape files import completed'); CNS_ctaLog(inTapePool, 'Tape files import completed');
END IF;
ELSE ELSE
CNS_ctaLog(inTapePool, 'Tape files import NOT fully completed, '|| (nbMissingImports-nbPreviousErrors) CNS_ctaLog(inTapePool, 'Tape files import NOT fully completed, '|| (nbMissingImports-nbPreviousErrors)
||' files are missing: please check the Err$_Tape_File table'); ||' files are missing: please check the Err$_Tape_File table');
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment