15 lines
282 B
SQL
15 lines
282 B
SQL
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 ;
|
|
|