Update Variable SL_CREDS

2026-02-25 23:05:29 +00:00
parent 354a587662
commit d755d79db1
1 changed files with 18 additions and 1 deletions
--- a/CISTOOLS/Variables/SL_CREDS.sql
+++ b/CISTOOLS/Variables/SL_CREDS.sql
@@ -1 +1,18 @@
-簀紂ﾗﾁ翳@\ﾓﾉﾂﾓ@^@
+SET PATH *LIBL ; 
+
+CREATE OR REPLACE VARIABLE CISTOOLS.SL_CREDS 
+	VARCHAR( 20)   
+	DEFAULT  ( QSYS2 . RPAD ( ( SELECT SFLIB . SFENVC . SEVT01 
+FROM SFLIB . SFENVC 
+WHERE SFLIB . SFENVC . SEKEY = 'LRPSLUSR' ) , 10 , '' ) || ( SELECT SFLIB . SFENVC . SEVT01 
+FROM SFLIB . SFENVC 
+WHERE SFLIB . SFENVC . SEKEY = 'LRPSLPWD' ) )  ; 
+
+GRANT ALTER , READ , WRITE   
+ON VARIABLE CISTOOLS.SL_CREDS 
+TO AMAPICS WITH GRANT OPTION ; 
+
+GRANT READ , WRITE   
+ON VARIABLE CISTOOLS.SL_CREDS 
+TO PUBLIC ; 
+