Jim,
You may not have all of the allocations correct in the batch JCL.
Try putting the load in a dataset allocated in your ISPLLIB of your TSO
session and executing it directly - "TSO CCSID".
Kurt Gramling
OK, I've changed the calls to dynam and changed the length and ZTERMCID as
follows -
CBL DYNAM
IDENTIFICATION DIVISION.
PROGRAM-ID. CCSID.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 ISPLINK PIC X(8) VALUE 'ISPLINK '.
01 TCCSID PIC X(5).
01 LCCSID PIC S9(8) COMP VALUE 5.
01 VDEFINE PIC X(8) VALUE 'VDEFINE '.
01 ZTERMCID PIC X(8) VALUE 'TCCSID '.
01 CHAR PIC X(4) VALUE 'CHAR'.
01 VGET PIC X(8) VALUE 'VGET '.
01 SHARED PIC X(8) VALUE 'SHARED '.
PROCEDURE DIVISION.
CALL ISPLINK USING
VDEFINE ZTERMCID TCCSID CHAR LCCSID.
DISPLAY RETURN-CODE UPON SYSOUT.
CALL ISPLINK USING
VGET ZTERMCID SHARED.
DISPLAY RETURN-CODE UPON SYSOUT.
DISPLAY TCCSID UPON SYSOUT
GOBACK.
but still rc=20. I'm getting the feeling it's something more basic. It's
running just as a batch COBOL program BTW.
Jim McAlpine
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
