About me: Mark Zelden
Recent Changes
Skip changes
| 04/29/2008 - | Updated TWOPAKZ8 job to add ZFS support, separate TN3270 from TCPIP and add Unicode. This allows the TWOPAKZ8 job to be used with z/OS 1.7 through z/OS 1.9. Also added comments about creating userids with non-expiring passwords and turning off RACF inactive auto-revoke. |
| 04/29/2008 - | Updated comments in ONEPAKZ8 to say it could be used for z/OS 1.7 through z/OS 1.9. Also added comments about creating userids with non-expiring passwords and turning off RACF inactive auto-revoke. |
| 04/16/2008 - | Added HLISTB, HLISTBL, HLISTM and HLISTML execs for browsing the output of HLIST BCDS (backup) and HLIST MCDS (migrate) commands for a specific data set or by data set level. |
| 04/16/2008 - | Updated LOGRREXX to handle pending changes to logstreams. |
| 03/07/2008 - | Updated RXSTOR64 to change the "HIDDEN MEM" column heading to "GUARDED MEM" and added a note about APAR OA02888. |
| 01/30/2008 - | Updated TWOPAKZ8 job to create a null SMS configuration. See comments in the job for the reason. |
| 12/13/2007 - | Updated LPROG to add the IEASYSxx LNKAUTH setting (either LNKLST or APFTAB) to the LNKLST display heading. |
| 12/04/2007 - | Fixed REXX NOVALUE condition in IPLINFO RDATE subroutine. Also made the same change to RDATE and RDATEF even though SIGNAL ON NOVALUE is not used in those versions. |
| 11/28/2007 - | Updated CLONERES job and added old version as CLONERSO. |
| 11/12/2007 - | Updated IPLINFO for z/OS 1.9 JES2 node offset and JES3 FMID. Also added the IEASYSxx LNKAUTH setting (either LNKLST or APFTAB) to the LNKLST display heading. |
| 10/09/2007 - | Added error traps for SYNTAX and NOVALUE conditions to IPLINFO. |
| 10/09/2007 - | Updated the following execs that use ISPF panels to use ISPF services to create temporary ISPPLIB PDS members instead of REXX EXECIO: APVFER, CATSRCH, FINDMOD, IPLINFO, LPROG, REXXMEM and RXSTOR64. |
| 08/27/2007 - | Fixed an error in RXSTOR64 for displaying shared memory objects. RAXLVSHRNMOMB was coded for a length of 4 when it should have been a length of 8. |
| 08/23/2007 - | Added a check to SW to prevent usage when EDIT/VIEW is using the EDIF/VIIF interface. |
| 08/23/2007 - | Made a cosmetic change to the "FIND_LABELS" code in the following edit macros: COLADD COLUTIL INSLINE PREFIX PREFIX2 SUFFIX |
| 05/31/2007 - | Added CEC MSU, image MSU and 4 hour MSU average usage to the IPLINFO CPU section and a display to show when the LPAR is being "soft capped". Also re-added the code to create the ISPPLIB as a pemanent data set for systems below OS/390 2.10. |
| 05/24/2007 - | Added the ONEPAKZ8/TWOPAKZ8 jobs. These are updates to the ONEPAKZ6/TWOPAKZ6 jobs and can be used to create a "rescue" system from a z/OS 1.7 or z/OS 1.8 driving system. |
| 05/07/2007 - | Updated INSLINE so it works with strings that contain an ampersand. |
| 05/01/2007 - | Changed the following edit macros so they allow the usage of system lables .ZFIRST/.ZF and .ZLAST/.ZL: COLADD COLUTIL FILL INSLINE PREFIX PREFIX2 SUFFIX |
| 04/27/2007 - | Added a display of the LOADPARM device address to the IPA section of IPLINFO. |
| 04/27/2007 - | Added new EXECs TSOV and TSOR (similar to TSOE/TSOB). TSOR uses the REVIEW command from CBT file 134 or 135 and can be used under native TSO without ISPF. Also updated the ISPCMDSA sample which adds these commands to the ISPF command table. |
| 03/23/2007 - |
IPLINFO updates: 1) Added z/OS 1.8 JES2 node offset and added the JES3 FMID to the FMID table for z/OS 1.8 JES3. 2) Added a display to show the current status of catalog SYS%-SYS1 conversion and current alias level. 3) Added a customizable date format option. The default option is to now use ISO 8601 format. |
| File Name | Macro Description and Usage Examples |
|---|---|
| INCL.TXT | Include only a certain string. The search can optionally
be limited to specific columns. Examples: INCL ' JOB'
|
| EXCL.TXT | Exclude all of a certain string. The search can optionally
be limited to specific columns. Examples: EXCL UNIT=SYSDA
|
| DELX.TXT | Delete everything but a certain string. The search can optionally
be limited to specific columns. Examples: DELX VOL=SER=WORK01
|
| DELNX.TXT | Delete all of a certain string. The search can optionally
be limited to specific columns. Examples: DELNX UNIT=CART
|
| FILL.TXT |
Fills column(s) with characters. The fill can optionally
be limited to specific lines if labels are used. Excluded
lines are omitted from the operation. Examples: FILL 1 2 '/'
|
| PREFIX.TXT |
Add a character string prefix to the beginning of a line
before the first non-blank character, shifting data to the
right. The prefix can optionally be limited to specific
lines if labels are used.
Excluded lines are omitted from the operation. Examples: PREFIX "'"
|
| PREFIX2.TXT |
Add a character string prefix to the beginning of a line
before the first non-blank character. The prefix can
optionally be limited to specific lines if labels are used.
Excluded lines are omitted from the operation. Examples: PREFIX2 "'"
|
| SUFFIX.TXT |
Add a character string suffix to the end of a line after
the last non-blank character. The suffix can optionally
be limited to specific lines if labels are used.
Excluded lines are omitted from the operation. Examples: SUFFIX "'"
|
| DB.TXT | Delete all lines from the line the cursor is on to the bottom line. This MACRO can be implemented as a true line command with the help of ISPF developer Doug Nadel's LMAC program, and this LINEMAC edit macro. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
| DT.TXT | Delete all lines from the line the cursor is on to the top line. This MACRO can be implemented as a true line command with the help of ISPF developer Doug Nadel's LMAC program, and this LINEMAC edit macro. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
| LINEMAC.TXT | Edit macro needed to implement DB , DT , ZB , ZE , and ZV as true line commands. This MACRO must to be used in conjuction with ISPF developer Doug Nadel's LMAC program. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
|
COLADD.TXT |
Total numbers in a specified column range. An optional
parameter of "HEX", "ZONE", "PACK", or "BIN" is needed
to add hexadecimal, zoned decimal, packed decimal, or
binary data. "DEC" is the default addition type. The
operation can optionally be limited to specific lines if
labels are used. Excluded lines are omitted from the
operation. Examples:
COLADD 10 25
|
COLUTIL.TXT |
Column manipulation utility which can either MOVE, COPY or
SWAP columns to a new location (move is the default) or SHIFT
columns right or left. The operation can optionally be
limited to specific lines if labels are used.
Excluded lines are omitted from the operation. Move Examples:
COLUTIL 10 20 5Copy Examples:
COLUTIL 35 40 12 COPY Swap Examples:
COLUTIL 25 30 15 SWAP Shift Examples:
COLUTIL LEFT 3
|
|
INSLINE.TXT |
Insert a character string or previously "CUT" data from
the ISPF Default Clipboard either after or before every
line. The insert can optionally be limited to specific
lines if labels are used. Excluded lines are omitted
from the operation. After Examples:
INSLINE '// DISP=SHR' A Before Examples:
INSLINE ' DELETE +' B |
| DELDUPS.TXT | Sort and delete all duplicate lines. The duplicate search
can optionally be limited to specific columns. Examples: DELDUPS
|
|
SW.TXT |
Switch from VIEW to EDIT and visa versa. For use with sequential files it requires XVIEW/XEDIT or a similar EXEC/CLIST. |
| LMPREXX.TXT
|
This edit macro helps manage CA LMP keys. |
| ZBROWSE.TXT | BROWSE the dataset on the line that the cursor is at. This MACRO can be implemented as a true line command with the help of ISPF developer Doug Nadel's LMAC program, and this LINEMAC edit macro. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
| ZEDIT.TXT | EDIT the dataset on the line that the cursor is at. This MACRO can be implemented as a true line command with the help of ISPF developer Doug Nadel's LMAC program, and this LINEMAC edit macro. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
| ZVIEW.TXT | VIEW the dataset on the line that the cursor is at (ISPF V4). This MACRO can be implemented as a true line command with the help of ISPF developer Doug Nadel's LMAC program, and this LINEMAC edit macro. For z/OS 1.8 and above, LMAC should be downloaded from IBM's ISPF web site. |
| EDMACALL.TXT | This is a REXX exec that can be used to run an edit macro against all members of a PDS. |
CUT & PASTE ALL FILES BELOW:CUTPASTE.ZIPCLISTS:CUT.TXTPASTE.TXT PANELS:CUTDEF.TXTCUTDEF@.TXT CUTHELP@.TXT CUTHELP1.TXT CUTHELP2.TXT CUTHELP3.TXT CUTHELP4.TXT CUTHELP5.TXT CUTPROM.TXT CUTPROM@.TXT PASTEDEF.TXT PASTEDF@.TXT PASTEPR@.TXT PASTEPRM.TXT |
CUT data, and then PASTE it into a different member. The ISPF panels
must be put into a library in the ISPPLIB concatenation. These CLISTs and panels were originally taken from file 182 of the CBT tape which is available through NaSPA, or can be downloaded from the CBT Tape Homepage.
Examples:
|
| File Name | File Description and Usage Examples |
|---|---|
|
IPLINFO.TXT |
Displays IPL and other system information on your terminal. Some of
the things displayed are the IPL address and volser, the IPL date
and time, the IPL LOADPARM, IODF information, the master catalog
name, the real and expanded storage sizes, the maximum private
area size below the 16Meg line, storage sizes for CSA/ECSA,
SQA/ESQA and V=R, CPU information, values from LOADxx and IEASYSxx,
a virtual storage map, static system symbol values, page data set
usage, SMF data set usage, subsystem information, ASID (ASVT) usage,
the LPA library list, the LNKLST library list and the APF library
list. IPLINFO can also be executed as an ISPF edit macro or from
the Unix System Services environment - including the WEB server. Examples:
TSO %IPLINFO (Display all information)
Here is sample
IPLINFO output.IPLINFO can also be called as a REXX function to return up to 20 variables used in the exec. Examples:
sysname = IPLINFO(VAR,GRSNAME)
|
|
LPROG.TXT |
Displays LPA list, LNKLST, and APF list libraries. Examples: TSO %LPROG (display LPA, LNK, & APF Lists)
|
|
CATSRCH.TXT |
REXX exec that uses the Catalog Search Interface (CSI) to quickly search for catalog entries. A generic HLQ can also be used (some shops don't allow this with ISPF 3.4). I've also included an optional ISPF panel, CATSRCHP.TXT, and an invocation exec CAT.TXT, which displays the optional panel. |
| KEYSWAP.TXT | Swaps PFKEYS 1 thru 12 with PFKEYS 13 thru 24. Usefull when you keep having to switch terminal types (happens often to consultants!) |
|
APFVER.TXT |
APF LIST verification utility. Checks for existence of
libraries in the in-storage APF List. This will help you
clean up all those obsolete APF entires! Example: TSO %APFVER
|
| LNKVER.TXT | LINK LIST verification utility. Checks for invalid syntax (missing /
extra commas), for data sets not cataloged in the master catalog,
invalid link list data sets (not a PDS or RECFM=U) and the
concatenation algorithm:
n = the number of DASD extents (PDSE counts as 1) k = the number of data set in the link list Examples: TSO %LNKVER
|
| INDIRECR.TXT | This exec will take a list of data sets and create IDCAMS
control cards to indirectly catalog them. Examples: TSO %INDIRECR
|
|
REXXMEM.TXT |
This exec can be used to display memory in "dump"
format similar to IPCS. Examples: TSO %REXXMEM (start at x'00000000' for x'100')
|
| REXXSTOR.TXT | This exec will show the virtual storage usage of the
task that invokes the REXX exec. This could be an
interactive TSO user, a batch TSO step, or even a Unix
System Services user / Web server. For z/OS 1.2 and
above running in z/Architecture mode it also displays
the MEMLIMIT. I've used this exec to test the affects
of the IEFUSI SMF exit on region size and MEMLIMIT. I've
included sample JCL to execute REXSTOR in batch -
REXXSTOJ.TXT. There is a modified version of this exec written by Janek Jakubek called MXIVSTOR that uses a freeware tool called MXI to display the virtual storage usage of another address space. MXIVSTOR can be found on CBT file 394 available at the CBT Tape Homepage. MXI is available from Rocket Software. |
|
RXSTOR64.TXT |
This exec will show the 64-bit MEMLIMIT and 64-bit storage usage for all ASIDs running in the system. Here is an example of RXSTOR64 output. |
| CMD34.TXT | This exec can be used to execute commands against
an ISPF 3.4 type DSLIST. If slashes are found as
part of the command the data set name will be
substituted in place of the slashes similar to what
ISPF 3.4 does. Examples: TSO %CMD34 SYS2.OLD.PRODUCT.HLQ HMIG
|
| ISPCMDSA.TXT | Temporarily adds commands to the ISPF Command Table (ISPCMDS). |
| XEDIT.TXT | Recursively EDIT a data set from the TSO command line. Examples: XE 'MY.PDS(ABC*)'
|
| XBROWSE.TXT | Recursively BROWSE a data set from the TSO command line. Examples: XB 'MY.PDS(ABC*)'
|
| XVIEW.TXT | Recursively VIEW a data set from the TSO command line (ISPF V4). Examples: XV 'MY.PDS(IE*)'
|
| XMEMLIST.TXT | Recursively MEMLIST a data set from the TSO command line. Examples: XM 'MY.PDS(DB*)'
|
| XDSLIST.TXT | Recursively DSLIST (ISPF 3.4) a data set level from the TSO
command line. Examples: XD (USERID.* used by default)
|
| XLISTC.TXT | Recursively IDCAMS LISTCAT ALL a data set from the TSO command line.
The output goes into a browse data set that can be scrolled. Works
great when typed next to a DSN on ISPF option 3.4. Examples: XL 'MY.VSAM.FILE'
|
| TSOB.TXT | BROWSE the output from a TSO command. Examples: TSOB LISTA STA
|
| TSOE.TXT | EDIT the output from a TSO command. Examples: TSOE LISTA STA
|
| TSOV.TXT |
VIEW the output from a TSO command. Examples: TSOV LISTA STA
|
| TSOR.TXT |
REVIEW the output from a TSO command. TSOR requires
the REVIEW command from CBT file 134 or 135 and can
be used under native TSO without ISPF.
Examples: TSOR LISTA STA
|
| HLISTB.TXT |
Browse the output of a HLIST DA BCDS (backup) command. This
works well when typed next to a data set on an ISPF 3.4
DSLIST.
Examples: TSO %HLISTB USERID.JCL.CNTL
|
| HLISTBL.TXT |
Browse the output of a HLIST DA LEVEL BCDS (backup) command.
Examples: TSO %HLISTBL USERID
|
HLISTM.TXT |
Browse the output of a HLIST DA MCDS (migrate) command. This
works well when typed next to a data set on an ISPF 3.4
DSLIST.
Examples: TSO %HLISTM USERID.JCL.CNTL.OLD
|
| HLISTML.TXT |
Browse the output of a HLIST DA LEVEL MCDS (migrate) command.
Examples: TSO %HLISTML USERID
|
| AMBCLIST.TXT AMBPANEL.TXT |
Interactive AMBLIST using panel input. The AMBPANEL ISPF panel must be put into a library in the ISPPLIB concatenation. |
| BLKCLIST.TXT BLKPANEL.TXT |
Interactive BLKDISK (BLK3380) using panel input. The BLKPANEL
ISPF panel must be put into a library in the ISPPLIB concatenation.
The BLKDISK command can be found on file 296 of the CBT tape which
is available through
NaSPA, or
can be downloaded from the
CBT Tape Homepage. |
|
FINDMOD.TXT |
Quickly find the location of a module (or modules).
The specified module name may be fully qualified or
any valid ISPF member pattern. By default, the LPA
and LNKLST concatenation are searched. Alternatively, a
"search list member" may be specified. In order to use the
search list, the libraries to search must be manually added to
a PDS member (or members). This gives FINDMOD the advantage
of being able to search any library. I include PROC libs
and CLIST libs in one of my alternate search lists. I've
included a sample search list -
FINDASYS.TXT. Examples: FINDMOD (will prompt for modname)
|
| EDMACALL.TXT | This is a REXX exec that can be used to run an edit macro against all members of a PDS. |
| CALC.TXT | REXX Calculator. Because CALC is an ISPF TSO command supplied by
IBM, this REXX exec must be renamed or invoked using a percent
sign as follows: "TSO %CALC" . |
| File Name | File Description |
|---|---|
| RACFUDEL.TXT | REXX program to Remove obsolete users from the RACF Database, remove their RACF dataset profiles, and delete their datasets and aliases from catalogs. |
| TAPESTAK.TXT | REXX Tape stacking program (works with CA-1). |
| DELDUPS2.TXT | REXX Duplicate Record Deletion Program. This program will sort a file and delete records that have duplicate characters between user specified columns. The main difference between this program and the DELDUPS Edit Macro is that this program writes the duplicate records to a seperate file, and can run as a batch job for processing large files. |
| RDATE.TXT | REXX date conversion routine. Convert MM DD YYYY, YYYY DDD, or NNNNN to standard date output that inclues the day of week and the number of days (NNNNN) from January 1, 1900. This is not the same as the Century date! Valid input dates range from 01/01/1900 through 12/31/2172. A parm of "TODAY" can also be passed to the date conversion routine. The output format is always as follows: MM/DD/YYYY.JJJ NNNNN WEEKDAY
This program is called as an internal subroutine in several other programs and EXECs on this page. |
| RDATEF.TXT | REXX function version of RDATE. |
| ASIDLIST.TXT ASIDLRX.TXT | Address Space ID List Program. These programs will list the names of all ASIDs in the system, their ASCB address, their ASID number in hex and decimal, and provide the following totals:
TOTAL ADDRESS SPACES IN THE SYSTEM
The programs also display MAXUSER and usage of
RSVSTRT and RSVNONR from IEASYSxx.
|
|
JOBCHECK.TXT JOBCHKRX.TXT |
These programs check if a job or task is running on the system and set a return code based on the results. The job/task to check is passed to the program VIA parm. |
|
LOGRREXX.TXT |
This program takes the output from LIST LOGSTREAM (PGM=IXCMIAPU) and creates logstream DELETE/DEFINE cards that can be used as input to IXCMIAPU. This was developed for use at a disaster recovery site. |
| REXXSCAN.TXT | This program scans an input file for parm string(s). See the program source for more detail and JCL. |
| VTOCTOT.TXT | This program processes the output of the CBT VTOC command and produces totals by high level qualifier. The VTOC command can be found on file 112 of the CBT tape which is available through NaSPA, or can be downloaded from the CBT Tape Homepage. |
| File Name | File Description |
|---|---|
| XEFCLIST.TXT | eXtended Editor Facility CLIST |
| XEF.TXT | REXX exec to invoke XEF (optional if using ISPF command tables or an option menu to invoke XEF) |
| XEFLIBD.TXT | REXX exec to invoke XEF (same function as XEF exec but uses LIBDEFs) |
| File Name | File Description |
|---|---|
| XEF00.TXT | eXtended Editor Facility Messages |
| File Name | File Description |
|---|---|
| XEFMENU.TXT | eXtended Editor Facility Main Menu |
| ** XEFMENUB.TXT | eXtended Editor Facility Main Menu (optional) |
| XEFINF.TXT | eXtended Editor Facility Dataset Information Panel (SEQ) |
| XEFINFD.TXT | eXtended Editor Facility Dataset Information Panel (PDS) |
| XEFINFE.TXT | eXtended Editor Facility Dataset Information Panel (PDSE) |
| XEFINFP.TXT | eXtended Editor Facility Dataset Information Panel (PDS SMS) |
| XEFINFS.TXT | eXtended Editor Facility Dataset Information Panel (SEQ SMS) |
| XEFHELP.TXT | eXtended Editor Facility Help Panel #1 |
| XEFHELP2.TXT | eXtended Editor Facility Help Panel #2 |
| XEFHELP3.TXT | eXtended Editor Facility Help Panel #3 |
| XEFHELP4.TXT | eXtended Editor Facility Help Panel #4 |
| File Name | File Description |
|---|---|
| $RXINTRO.ZIP | "Introduction to TSO/E REXX" document from a class I gave at one of my clients. The file was created using Microsoft Word (zipped). |
| $ROOTSHR.TXT | Doc for setting up a shared UNIX root file |
| $SNGLTSO.TXT | Doc for using the same TSO USERID in a shared environment.
I have provided the following samples to implement this: ISPF defaults source update - ISPDFLTS.TXT ISPXDT and ISPF exit 16 source - ISPEX16.TXT JES2 source update (OS/390 R10 & z/OS R1) - UMJES01.TXT JES2 source update (z/OS R2 and above) - UMJES012.TXT JES2 source update (prior to OS/390 R10) - UMJES01O.TXT JES3 source update - UMJES06.TXT |
| $WLMMONO.TXT | Doc for setting up WLM in a MONOPLEX |
| CLONERES.TXT |
Sample jobstream to clone a two volume sysres set and SMP/E target zones. |
| CLONERSO.TXT | Old version of CLONERES. |
| ONEPAKZ3.TXT | Sample jobstream to build a one pack "rescue" system from a z/OS 1.3 driving system. |
| ONEPAKZ6.TXT | Sample jobstream to build a one pack "rescue" system from a z/OS 1.6 driving system. |
| ONEPAKZ8.TXT |
Sample jobstream to build a one pack "rescue" system from a z/OS 1.7, z/OS 1.8 or z/OS 1.9 driving system. |
| ONEPAK43.TXT | Sample jobstream to build a one pack "rescue" system (created for ESA 4.3, but is still a good sample of the required steps). |
| TWOPAKZ3.TXT | Sample jobstream to build a two pack "rescue" system from a z/OS 1.3 driving system. Same as ONEPAKZ3 but also includes Unix System Services, TCP/IP, and ISHELL. |
| TWOPAKZ6.TXT | Sample jobstream to build a two pack "rescue" system from a z/OS 1.6 driving system. Same as ONEPAKZ6 but also includes Unix System Services, TCP/IP, and ISHELL. |
| TWOPAKZ8.TXT |
Sample jobstream to build a two pack "rescue" system from a z/OS 1.7, z/OS 1.8 or z/OS 1.9 driving system. Same as ONEPAKZ8 but also includes Unix System Services, Unicode, TCP/IP and ISHELL. |
| SMPBLD1.TXT | Job to build an SMP/E environment from scratch. All VSAM SMP/E zones are created within the same physical VSAM data set. |
| SMPBLD2.TXT | Job to build an SMP/E environment from scratch. The VSAM SMP/E zones are created as separate physical VSAM data sets. |
| SMPBLD3.TXT | Job to build a new SMP/E target zone, dlib zone, and other required SMP/E data sets into an existing global zone. |
| SMPDELF.TXT | Sample job to delete an FMID from a set of SMP/E zones and libraries. |
FIND P'.'
CHANGE X'52' X'5F' ALL (logical NOT)
CHANGE X'6A' X'4F' ALL (logical OR)
Before you leave, please sign my
Guestbook! 
|
Mark's MVS Utilities is part of the
Dinos Web Ring. [Skip Prev] [Prev] [Next] [Skip Next] [Random] [Next 5] [Ring Hub] Want to join the Dinos Web Ring? |