Hi Dana
For me this script:
/* REXX */ .
say 'Content-type: text/html' .
say '' .
say '<PRE>' .
say 'test jes interface' .
say '' .
rc=isfcalls('ON') .
.
/*************************/ .
/* Issue the WHO command */ .
/*************************/ .
Address SDSF "ISFEXEC WHO" .
.
/**************************************************/ .
/* The responses are returned in the isfresp stem */ .
/**************************************************/ .
do ix=1 to isfresp.0 .
Say "isfresp."ix "is:" isfresp.ix .
end .
rc=isfcalls('OFF') .
.
exit .
Gives back like this:
test jes interface
isfresp.1 is: USERID=ESA
isfresp.2 is: PROC=REXX
isfresp.3 is: TERMINAL=��������
isfresp.4 is: GRPINDEX=1
isfresp.5 is: GRPNAME=ISFSPROG
isfresp.6 is: MVS=z/OS 01.12.00
isfresp.7 is: JES=z/OS1.12
isfresp.8 is: SDSF=HQX7770
isfresp.9 is: ISPF=N/A
isfresp.10 is: RMF/DA=NOTACC
isfresp.11 is: SERVER=YES
isfresp.12 is: SERVERNAME=SDSF
isfresp.13 is: JESNAME=JES2
isfresp.14 is: MEMBER=MV1C
isfresp.15 is: JESTYPE=JES2
isfresp.16 is: SYSNAME=MV1C
isfresp.17 is: SYSPLEX=SYSPLEX
isfresp.18 is: COMM=NOTAVAIL
I have loged on as "ESA" user
On 3/1/2012 7:11 PM, Dana Mitchell wrote:
Hi Miklos,
according to rxenv.sh:
_BPX_USERID=dmitche
REMOTE_USER=dmitche
Whereas ISFEXEC WHO shows:
RC from WHO is 0
USERID=WEBSRV
PROC=REXX
TERMINAL=
GRPINDEX=3
GRPNAME=ISFREXX
MVS=z/OS 01.11.00
JES=z/OS1.11
SDSF=HQX7760
ISPF=N/A
RMF/DA=NOTACC
SERVER=YES
SERVERNAME=SDSF
JESNAME=JES2
MEMBER=TE01
JESTYPE=JES2
SYSNAME=TE01
SYSPLEX=ITSPLEX
COMM=NOTAVAIL
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
