Reference Data Calls

ISPW Reference Data is cached in both the ISPWCM task and the TSO client. This is done for performance reasons. ISPWexits run in a TSO/ISPF address space (either the User Interface or Set Processor), and these have a requirement to access the Reference Data. The calls to access this Reference Data are documented in this chapter.

REXX Call Format

The Reference Data is accessed by a REXX call of the following type:

WZZTSI("#refdataclass,"GET")Where refdataclass is the acronym for the ISPW Reference Data Entity for which the data is being retrieved.

A non-zero return code is an error.

#refdataclass

The following table lists the #refdataclass relationship to the various Reference Data Entities and also indicates whether or not Extension Data is valid for that Class.

#refdataclass

Class	Entity	Ext Data
#CMPNTYP	M.CT – Component Type	Y
#BCTYPE	M.BC – Base Category	N
#CMPNCAT	M.CC – Component Category	N
#EXTREF	M.ER – External References	N
#EXIT	M.EX – Exits	N
#APPL	M.AP – Applications	N
#APPSTRM	M.AD – Application Definition	N
#STRM	M.ST – Streams	N
#STRMLVL	M.ST(L) – Stream Level	Y
#STRMCT	M.ST(T) – Stream Type	Y
#STRMCTA	M.ST(A) – Stream Associations	N
#STRMCTL	M.ST(N) – Stream Names	Y
#APPLLVL	M.AD(L) – Application Level	Y
#APPLCT	M.AD(T) – Application Types	Y
#APPLCTL	M.AD(N) – Application Names	Y
#APPLCTA	M.AD(A) – Application Associations	N
#PLANIMP	M.AD(P) – Application Plan Implementation	N

REXX Call Detail

When making a call to retrieve Reference Data, key values for the Entity must be set in ISPF variables prior to the call. The following table describes the ISPF variables for each Class. Variables marked as “KEY” are required to be set before the call is made.

REXX Call Detail

Class	Variables
#CMPNTYP	MEMBTYPE,LENGTH=4,TYPE=KEY MEMBDESC,LENGTH=50 TECHNOL,LENGTH=4 LIBRLANG,LENGTH=4 OTABLE,LENGTH=8 XREFTYPE,LENGTH=4 CYCLFLAG,LENGTH=1 CMPLFLAG,LENGTH=1 EXECENV,LENGTH=4 MOPFLAG,LENGTH=1 PMOVJOB,LENGTH=8 MODEL,LENGTH=54 FILEEXT,LENGTH=32 CASESENS,LENGTH=1 SHNAMLEN,FORMAT=SMALLINT EXITTYPE,LENGTH=4 CMPSKEL,LENGTH=8 CMPJOB,LENGTH=12 CMPTAB,LENGTH=8 PANLT,LENGTH=8 PANLH,LENGTH=8 ISPWTYPE,LENGTH=4
#BCTYPE	BCTYPE,LENGTH=4,TYPE=KEY CMPNCAT,LENGTH=4 CRLANG,LENGTH=4 CRSCANR,LENGTH=8 USEXITNM,LENGTH=8 BCTDESC,LENGTH=60
#CMPNCAT	CMPNCAT,LENGTH=4,TYPE=KEY CCATDESC,LENGTH=60
#EXTREF	FILETYPE,LENGTH=8,TYPE=KEY WLOGON,LENGTH=6,TYPE=KEY FILEDESC,LENGTH=55 EXTLFILE,LENGTH=55
#EXIT	POPT,LENGTH=2,TYPE=KEY EXITKEY,LENGTH=4,TYPE=KEY EXITDESC,LENGTH=50 EXITUPDT,LENGTH=1 EXITPRE,LENGTH=215 EXITPOST,LENGTH=215 EXITPROD,LENGTH=1 EXITHOLD,LENGTH=1 EXITTEST,LENGTH=1 EXITOUTS,LENGTH=1
#APPL	WLLAPPL,LENGTH=4,TYPE=KEY WLLMODEL,LENGTH=1 WLLOWNER,LENGTH=8 WLLDESC,LENGTH=50
#APPSTRM	WAMAPPL,LENGTH=4,TYPE=KEY WAMSTRM,LENGTH=8,TYPE=KEY WAMOWNER,LENGTH=8 WAMDESC,LENGTH=50 WAMDDMN,LENGTH=4 WAMCRUSE,LENGTH=1
#STRM	WMSSTRM,LENGTH=8,TYPE=KEY WMSOWNER,LENGTH=8 WMSDESC,LENGTH=50 WMSCRUSE,LENGTH=1
#STRMLVL	WMLSTRM,LENGTH=8,TYPE=KEY WMLLVL,LENGTH=4,TYPE=KEY WMLNLVL,LENGTH=4 WMLIRULE,LENGTH=8 WMLDB2,LENGTH=4 WMLPBDLB,LENGTH=123 WMLPXNM,LENGTH=8 WMLPXLB,LENGTH=1 WMLSETCL,LENGTH=1 WMLSETJB,LENGTH=8 WMLSETQU,LENGTH=8 WMLSETFN,LENGTH=30 WMLSWHID,LENGTH=8 WMLSPOLY,LENGTH=16 WMLGWHID,LENGTH=8 WMLGPOLY,LENGTH=16 WMLPRMAN,LENGTH=1 WMLCTL1,LENGTH=1 WMLCTL2,LENGTH=1 WMLCTL3,LENGTH=1
#STRMCT	WMTSTRM,LENGTH=8,TYPE=KEY WMTMTYPE,LENGTH=4,TYPE=KEY WMTMCLAS,LENGTH=4,TYPE=KEY MEMBDESC,LENGTH=50 ACMPSKEL,LENGTH=8 ACMPJOB,LENGTH=12 ACMPTAB,LENGTH=8 APANLT,LENGTH=8 APANLH,LENGTH=8 APMOVJOB,LENGTH=8 HOLDTIME,LENGTH=8 PLIBOWNR,LENGTH=4 PLIBSTD,LENGTH=4 AMODEL,LENGTH=54 XOPFLAG,LENGTH=1 BKUPTYPE,LENGTH=4 BKUPLIB1,LENGTH=44 BKUPLIB2,LENGTH=44 SCLMCNTL,LENGTH=8 WMTATYPE,LENGTH=4 WMTALIB,LENGTH=54 CDMNNAME,LENGTH=8 DPTYPE,LENGTH=8 FULPOPWH,LENGTH=1
#STRMCTA	WMASTRM,LENGTH=8,TYPE=KEY WMAMTYPE,LENGTH=4,TYPE=KEY WMAMCLAS,LENGTH=4,TYPE=KEY WMAASSN,LENGTH=1,TYPE=KEY WMATENV,LENGTH=4,TYPE=KEY WMASET,LENGTH=4,TYPE=KEY WMASEQ,LENGTH=1,TYPE=KEY WMAAAPPL,LENGTH=4 WMAAMTYP,LENGTH=4 WMAAMCLA,LENGTH=4
#STRMCTL	WMBSTRM,LENGTH=8,TYPE=KEY WMBMTYPE,LENGTH=4,TYPE=KEY WMBMCLAS,LENGTH=4,TYPE=KEY WMBLVL,LENGTH=4,TYPE=KEY WMBTYPE,LENGTH=4 WMBNAME,LENGTH=44 WMBPACK,LENGTH=1 WMBRTN,LENGTH=1 WMBCKGEN,LENGTH=1 WMBPRM,LENGTH=1 WMBGEN,LENGTH=1 WMBVCTL,LENGTH=1 WMBBMAP,LENGTH=1 WMBCTL1,LENGTH=1 WMBCTL2,LENGTH=1
#APPLLVL	WLLAPPL,LENGTH=4,TYPE=KEY WLLSTRM,LENGTH=8,TYPE=KEY WLLLVL,LENGTH=4,TYPE=KEY WLLNLVL,LENGTH=4 WLLIRULE,LENGTH=8 WLLDB2,LENGTH=4 WLLPBDLB,LENGTH=123 WLLPXNM,LENGTH=8 WLLPXLB,LENGTH=1 WLLSETCL,LENGTH=1 WLLSETJB,LENGTH=8 WLLSETQU,LENGTH=8 WLLSETFN,LENGTH=30 WLLSWHID,LENGTH=8 WLLSPOLY,LENGTH=16 WLLGWHID,LENGTH=8 WLLGPOLY,LENGTH=16 WLLPRMAN,LENGTH=1 WLLCTL1,LENGTH=1 WLLCTL2,LENGTH=1 WLLCTL3,LENGTH=1
#APPLCT	WLTAPPL,LENGTH=4,TYPE=KEY WLTSTRM,LENGTH=8,TYPE=KEY WLTMTYPE,LENGTH=4,TYPE=KEY WLTMCLAS,LENGTH=4,TYPE=KEY MEMBDESC,LENGTH=50 ACMPSKEL,LENGTH=8 ACMPJOB,LENGTH=12 ACMPTAB,LENGTH=8 APANLT,LENGTH=8 APANLH,LENGTH=8 APMOVJOB,LENGTH=8 HOLDTIME,LENGTH=8 PLIBOWNR,LENGTH=4 PLIBSTD,LENGTH=4 AMODEL,LENGTH=54 XOPFLAG,LENGTH=1 BKUPTYPE,LENGTH=4 BKUPLIB1,LENGTH=44 BKUPLIB2,LENGTH=44 SCLMCNTL,LENGTH=8 WLTATYPE,LENGTH=4 WLTALIB,LENGTH=54 CDMNNAME,LENGTH=8
#APPLCTL	WLBAPPL,LENGTH=4,TYPE=KEY WLBSTRM,LENGTH=8,TYPE=KEY WLBMTYPE,LENGTH=4,TYPE=KEY WLBMCLAS,LENGTH=4,TYPE=KEY WLBLVL,LENGTH=4,TYPE=KEY WLBTYPE,LENGTH=4 WLBNAME,LENGTH=44 WLBPACK,LENGTH=1 WLBRTN,LENGTH=1 WLBCKGEN,LENGTH=1 WLBPRM,LENGTH=1 WLBGEN,LENGTH=1 WLBVCTL,LENGTH=1 WLBBMAP,LENGTH=1 WLBCTL1,LENGTH=1 WLBCTL2,LENGTH=1
#APPLCTA	WLAAPPL,LENGTH=4,TYPE=KEY WLASTRM,LENGTH=8,TYPE=KEY WLAMTYPE,LENGTH=4,TYPE=KEY WLAMCLAS,LENGTH=4,TYPE=KEY WLAASSN,LENGTH=1,TYPE=KEY WLATENV,LENGTH=4,TYPE=KEY WLASET,LENGTH=4,TYPE=KEY WLASEQ,LENGTH=1,TYPE=KEY WLAAAPPL,LENGTH=4 WLAAMTYP,LENGTH=4 WLAAMCLA,LENGTH=4
#PLANIMP	WPIAPPL,LENGTH=4,TYPE=KEY WPISTRM,LENGTH=8,TYPE=KEY WPILVL,LENGTH=4,TYPE=KEY WPIIMPL,LENGTH=4 WPIOWNR,LENGTH=8 WPIQUAL,LENGTH=8 WPISSID,LENGTH=4 WPIXPLN,LENGTH=1 WPIPKGC,LENGTH=18 WPIPKGO,LENGTH=123 WPIBIND,LENGTH=1 WPIPFX,LENGTH=4 WPIPLNO,LENGTH=123 WPISFX,LENGTH=4 WPIPKNML,LENGTH=47 WPIPKNMP,LENGTH=47

Example Call

The REXX code in the following figure is an example of a call to retrieve M.AD(L) data.

Example Call