Update Variable XA_RTNCOD

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 ; 
+