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

Reply via email to