Reference Data Calls

Code Pipeline Reference Data is cached in dataspaces maintained by the Code Pipeline CM task and the ISPW CI task. This is done for performance reasons. Code Pipeline exits 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 Code Pipeline 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=8,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=8,TYPE=KEY WLLSAPL,LENGTH=8,TYPE=KEY WLLMODEL,LENGTH=1 WLLOWNER,LENGTH=8 WLLDESC,LENGTH=50
#APPSTRM	WAMAPPL,LENGTH=8,TYPE=KEY WAMSAPL,LENGTH=8,TYPE=KEY WAMSTRM,LENGTH=8,TYPE=KEY WAMOWNER,LENGTH=8 WAMDESC,LENGTH=50 WAMDDMN,LENGTH=8 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=8,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=8,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=8 WMAASAPL,LENGTH=8 WMAAMTYP,LENGTH=8 WMAAMCLA,LENGTH=4
#STRMCTL	WMBSTRM,LENGTH=8,TYPE=KEY WMBMTYPE,LENGTH=8,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=8,TYPE=KEY WLLSAPL,LENGTH=8,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=8,TYPE=KEY WLTSAPL,LENGTH=8,TYPE=KEY WLTSTRM,LENGTH=8,TYPE=KEY WLTMTYPE,LENGTH=8,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=8,TYPE=KEY WLBSAPL,LENGTH=8,TYPE=KEY WLBSTRM,LENGTH=8,TYPE=KEY WLBMTYPE,LENGTH=8,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=8,TYPE=KEY WLASAPL,LENGTH=8,TYPE=KEY WLASTRM,LENGTH=8,TYPE=KEY WLAMTYPE,LENGTH=8,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=8 WLAASAPL,LENGTH=8 WLAAMTYP,LENGTH=4 WLAAMCLA,LENGTH=4
#PLANIMP	WPIAPPL,LENGTH=8,TYPE=KEY WPISAPL,LENGTH=8,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

/* REXX */
WLLSTRM="SITE"
WLLAPPL="SITE"
WLLSAPL="SITE"
WLLLVL="TEST"
rc = WZZTSI("#APPLLVL","GET ")