Kurt Gramling wrote:
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
I'd go along with Kurt on this one. You need all your allocations set up. And with Ray: you need to run this under ISPF, so you probably don't want to just execute the program but issue an ISPSTART command or some other start up scenario. Kind regards, -Steve Comstock The Trainer's Friend, Inc. 303-393-8716 http://www.trainersfriend.com z/OS Application development made easier * Our classes include + How things work + Programming examples with realistic applications + Starter / skeleton code + Complete working programs + Useful utilities and subroutines + Tips and techniques ---------------------------------------------------------------------- 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
