FCLT#59497 Verwarrende foutmelding als once-script gedraaid onder verkeerde user

svn path=/Database/trunk/; revision=44566
This commit is contained in:
Erik Groener
2019-10-17 08:31:21 +00:00
parent 7364c0e86d
commit 925c663c05

View File

@@ -184,10 +184,16 @@ AS
END;
IF NOT (custpattern = klant OR (custpattern = groep AND groep IS NOT NULL) OR REGEXP_LIKE(USER, custpattern, 'i'))
THEN
IF (INSTR(custpattern,'^') = 0 OR fout = 0)
THEN
tekst := 'User should be ' || custpattern || ' but is ' || USER;
ELSE
tekst := 'User should match ' || custpattern || ' but is ' || USER;
END IF;
tekst := CHR(10)
|| '============================================' || CHR(10)
|| 'Wrong user!!!!!!!!!' || CHR(10)
|| 'User should be '|| CASE WHEN fout = 0 THEN klant ||' or ' END || 'match ' || custpattern || ' but is ' || USER || CHR(10)
|| tekst || CHR(10)
|| '============================================' || CHR(10);
RAISE_APPLICATION_ERROR(-20000, tekst);
END IF;