Sample fields definition output
CZADEFBL provides a file as output on DD CZDEFINE similar to the following. Notice that editing is necessary.
- Tags must be coded manually. CZADEFBL uses the field name as a tag.
- No CEF tags are supplied. Any desired CEF tags must be coded manually.
- Capitalization is incorrect in the Desc operand.
- The Desc operand contains superfluous data.
DEF SMF81RVL SMF81RVL SMF_T81() FChar(6) GBase(X'3E' 6) +
Desc("Volid of racf dataset @z40rppe")
DEF SMF81RUN SMF81RUN SMF_T81() FChar(3) GBase(X'44' 3) +
Desc("Unit name of racf dataset @z40rppe")
DEF SMF81UDS SMF81UDS SMF_T81() FChar(44) GBase(X'47' 44) +
Desc("Dsn of uads dataset for this ipl @z40rppe")
DEF SMF81UVL SMF81UVL SMF_T81() FChar(6) GBase(X'73' 6) +
Desc("Volid of uads data set @z40rppe")
Etc.
Desc("Volid of racf dataset @z40rppe")
DEF SMF81RUN SMF81RUN SMF_T81() FChar(3) GBase(X'44' 3) +
Desc("Unit name of racf dataset @z40rppe")
DEF SMF81UDS SMF81UDS SMF_T81() FChar(44) GBase(X'47' 44) +
Desc("Dsn of uads dataset for this ipl @z40rppe")
DEF SMF81UVL SMF81UVL SMF_T81() FChar(6) GBase(X'73' 6) +
Desc("Volid of uads data set @z40rppe")
Etc.
After editing, these definitions might appear as follows:
DEF SMF81RVL Vol SMF_T81(CEF(fileID)) FChar(6) +
GBase(X'3E' 6) Desc("Volid of RACF dataset")
DEF SMF81RUN Unit SMF_T81() FChar(3) GBase(X'44' 3) +
Desc("Unit name of RACF dataset")
DEF SMF81UDS DSN SMF_T81(CEF(filePath)) FChar(44) +
GBase(X'47' 44) Desc("DSN of UADS dataset for this IPL")
DEF SMF81UVL UADSVol SMF_T81() FChar(6) GBase(X'73' 6) +
Desc("Volid of UADS data set")
Etc.
GBase(X'3E' 6) Desc("Volid of RACF dataset")
DEF SMF81RUN Unit SMF_T81() FChar(3) GBase(X'44' 3) +
Desc("Unit name of RACF dataset")
DEF SMF81UDS DSN SMF_T81(CEF(filePath)) FChar(44) +
GBase(X'47' 44) Desc("DSN of UADS dataset for this IPL")
DEF SMF81UVL UADSVol SMF_T81() FChar(6) GBase(X'73' 6) +
Desc("Volid of UADS data set")
Etc.
Related topic
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*