Update Variable XA_RTNCOD

2026-02-25 23:05:35 +00:00
parent be78ae5044
commit e3c05c30f3
1 changed files with 14 additions and 1 deletions
--- a/CISTOOLS/Variables/XA_RTNCOD.sql
+++ b/CISTOOLS/Variables/XA_RTNCOD.sql
@@ -1 +1,14 @@
-牄禗袬蒨@\蚕謨@^@
+SET PATH *LIBL ; 
+
+CREATE OR REPLACE VARIABLE CISTOOLS.XA_RTNCOD 
+	CHAR(1) CCSID 37   
+	DEFAULT  ''  ; 
+
+GRANT ALTER , READ , WRITE   
+ON VARIABLE CISTOOLS.XA_RTNCOD 
+TO AMAPICS WITH GRANT OPTION ; 
+
+GRANT READ , WRITE   
+ON VARIABLE CISTOOLS.XA_RTNCOD 
+TO PUBLIC ; 
+