From: Jim McAlpine <[EMAIL PROTECTED]>
OK, I've changed the calls to dynam and changed the length and ZTERMCID as
follows -
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 '.
but still rc=20. I'm getting the feeling it's something more basic.
Jim,
You need to change ZTERMCID to this:
01 ZTERMCID PIC X(8) VALUE 'ZTERMCID'.
It's not what's causing the RC=20, but without the above change the return
code from the VGET will be 8.
Hope that helps,
Dave Salt
See the new SimpList(tm) rollover image at:
http://www.mackinney.com/products/SIM/simplist.htm
_________________________________________________________________
Windows Live Hotmail. Now with better security, storage and features.
www.newhotmail.ca?icid=WLHMENCA149
----------------------------------------------------------------------
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