Filter
Top Products
A package for the CICSQL program is loaded into the DB2 database under the SQLDBA user. This is
supplied as member CICSQL.A.
If you fail to do this, REXX gives return codes such as -805 whenever an "ADDRESS EXECSQL
command" is issued.
Adapt the following JCL and run DB2 in single user mode, substituting the correct password for user
SQLDBA. The default is SQLDBAPW but this is normally changed as part of the DB2 installation process.
// JOB RELOAD CICSQL PACKAGE
// LIBDEF *,SEARCH=(PRD2.DB2710,PRD1.BASE)
// EXEC PROC=ARIS71DB *-- STARTER DATABASE IDENTIFICATION
// EXEC PROC=ARISDBSD *-- RUN DB2 IN SINGLE-USER MODE
CONNECT SQLDBA IDENTIFIED BY password;
RELOAD PROGRAM (SQLDBA.CICSQL) REPLACE KEEP INFILE(SYSIPT BLKSZ(80)
PDEV(DASD));
READ MEMBER CICSQL
/*
COMMIT WORK;
/*
/&
Issue GRANT EXECUTE ON SQLDBA.CICSQL, as required, to enable users to run the package.
PI Configuration
436
CICS TS for VSE/ESA: REXX Guide