|
|
|
ISPFVAR
is a REXX exec that displays the IBM supplied system ISPF variables.
Note: This code needs to be updated for ISPF version 4. Anyone want to volunteer? Needs check for ZENVIR before obtaining variables for version 4. |
|
||||||||||||||||
zdate------97/11/04
zdatef-----YY/MM/DD
zdatefd----YY/MM/DD
zjdate-----97.308
zday-------04
zmonth-----11
ztime------17:39
zyear------97
zapplid----ISR
zenvir-----ISPF 4.3MVS TSO
zispfrc----
zlang------ENGLISH
zlogon-----$TSOPRO4
zplace-----ASIS
zprefix----IBMUSER
zprofapp---
ztempf-----IBMUSER.SPFTEMP1.CSW1.CTL
ztempn-----ISPCTL1
zuser------IBMUSER
zcolors----0007
zdbcs------NO
zhilite----YES
zscreen----1
zscreend---0032
zscreenw---0080
zscrmaxd---0032
zscrmaxw---0080
zsplit-----NO
zterm------3278
zfamprt----2
zdevnam----
zaspect----0
zkeys------24
zpf01 ------HELP
zpf02 ------SPLIT
zpf03 ------END
zpf04 ------RETURN
zpf05 ------RFIND
zpf06 ------RCHANGE
zpf07 ------UP
zpf08 ------DOWN
zpf09 ------SWAP
zpf10 ------LEFT
zpf11 ------RIGHT
zpf12 ------RETRIEVE
zpf13 ------HELP
zpf14 ------SPLIT
zpf15 ------END
zpf16 ------RETURN
zpf17 ------RFIND
zpf18 ------RCHANGE
zpf19 ------UP
zpf20 ------DOWN
zpf21 ------SWAP
zpf22 ------LEFT
zpf23 ------RIGHT
zpf24 ------RETRIEVE
zpfctl-----USER
zpffmt-----SIX
zpfset-----PRI
zpfshow----OFF
|