Other Interesting Stuff

Most of it original, but some borrowed, hijacked, or stolen.

The 'good stuff' from my inventory has always been over at the REXX Language Association's free code repository.  That's not to say there isn't plenty more where that came from.  There is, and here it is!  Some of it is very old yet still works acceptably.  Some of it is specific to this employer or that one and is only useful as an example of how you might go about doing some particular task.  In any case, if you should find any of it useful, you're welcome to it.  At the ripe old age of 76, I'm unlikely to actually need any of it myself anymore.

Some of it is pretty damn good if I do say so myself.  In particular, I recommend $$JFORM, @DEIMBED, FCSUPBR, FCSUPED, FETCH, KEDBASE, SCRAMX.  Some of these are pretty complex and consequently hard to understand, but I guarantee they're worth the effort.  Send me a note at "rexxhead@yahoo.com".

Code Name Type Description
$$$FIXME.txt text List of things-to-do
$$JFORM.txt emac Reshape JCL to a configurable standard
$$JPREP.txt emac Clean up JCL. Not as elaborate as $$JFORM and quicker.
$$PPREP.txt emac Clean up PLI code
$LISTC.txt xmp LISTC into a trap
@BRNCHID.txt xmp BRANCHID in a message
@CKSTYLE.txt xmp Cylindrical array processing
@CMDUPD.txt xmp Build new entry for command table
@DEIMBED.txt xmp Extract ISPF elements
@DISPLAY.txt xmp Selection panel processing
@LBLCHG.txt emac Change a paragraph label
@LBLID.txt emac prefix a label (and all of its referents) with an identifier
@LOGMSG.txt xmp Add a message to the message log file
@NEWPREF.txt emac change a label prefix
@POPUP.txt xmp Pop-up message panel
@REFIND.txt xmp Find next occurrence
@RESTART.txt xmp Restart an EXEC in ISPF
@TAGRET.txt emac Tag a return-line with its entry name
@TBCLOSE.txt xmp Close an ISPF table
@tbdispl.txt xmp Multiple selection panel
@TBOPEN.txt xmp Open an ISPF table
@TBSORT.txt xmp Complex table sort (needs TBLGEN)
@TBSPIN.txt xmp Rip through a table
@TRACE.txt xmp Local trace
@ZTDSELS.txt xmp Panel handling (complex)
ABRTST.txt xmp How to match words in a list
ACQ.txt exec Working section for ACQUIRE; very old code; pre-REXXSKEL; probably obsoleted by SEIZE
ADDMON.txt xmp Monitor tool usage
ADDRTST.txt xmp Exhibit how address() works
ADDXREF.txt exec Driver for COMPSTAT -- add ISPF statistics to compiler listing
ALIASES.txt exec Determine member aliases
ALLOC.txt xmp Sure-fire allocate a dataset
ALLPLIB.txt emac Locate all INCLUDEs in a PLI compiler listing; used by CM
amortize.txt exec Amortise a mortgage
APF.txt exec Show APF libraries
ASMMAP.txt exec Unsure -- related to ASM/CICS processing
BADCOMM.txt emac Find unclosed comments
BLKCOMM.txt emac Change each-line comments to block comments
BODYBAR.txt xmp BODY specification (panel)
BREAKS.txt exec Mark breaks in a number sequence
BXTST.txt exec Plays Marienbad
CALLEDBY.txt emac Builds PLI CALL<->target report
CATCTS.txt exec Develop counts-by-level for a specified catalog
CKAL.txt demo demonstrates 'finding which word contains a string'
CKSEQ.txt emac find breaks in a sequence #
CL.txt emac insert change log to panel
CLIPTST.txt demo Snip a string iteratively
CLISTLBL.txt emac Find all CLIST labels and referents.
CMDUPD.txt exec Update user's CMD table via 3.9
CMFLTTBL.txt exec ISPF table -> flat file
cmmemidx.txt exec create PO index member
CMRSTTBL.txt exec Flat file -> ISPF table
COMPARM.txt exec compiler parms for each program
compdt.txt exec get compile date for load module
compile.txt exec compile/link JCL generator
compstat.txt emac add ISPF stats to a compiler listing
CONFIG.txt exec Display and operate on the (NMR) PROL configuration table
cr.txt emac seed REXXSKEL to new module
CVTINFO.txt exec CVT information display
CVTSECS.txt exec Convert seconds to hh:mm:ss
db2space.txt exec calc space needed
DCBTREE.txt exec By Gilbert Saint-Flour
declocn.txt emac for ASM listing
DESCRIBE.txt exec Display the PGMASTR (PM) table
DFLTS.txt emac shows all the ISPSLIB default characters in a text
dirread.txt demo Display a PDS directory; not my code
dirshow.txt exec Display a PDS directory with U/L hex
DIRSTATS.txt demo Display a PDS directory; probably by Alastair Gray
DISP.txt exec Display (almost) any panel
DriverExample.txt exec Stub routine for executing a remote module
DROPDUP.txt emac Drop duplicate lines in a dataset
DSPROF.txt exec LISTDSI driver/display
DUMPTBL.txt exec Print contents of an ISPF table 132-wide
easter.txt exec Compute Easter for any year
EDBR.txt exec Invoke EDIT from Browse/View
ELEMENTS.txt emac Display element names from a PLI Attribute List
en.txt emac insert exec name to header
EX01.txt exec A beast of a test for desk-checking!
EX02.txt exec A beast of a test for desk-checking!
EXAMPLE.txt data Pro-forma new paragraph used by MAKEPARA. See documentation for REXXSKEL.
EXTTST.txt exec RXVSAM demonstration
FCSUPBR.txt exec Browse favorites
FCSUPED.txt exec Edit favorites
FETCH.txt exec Edit, Browse, or View a dataset by its nickname
FINDORIG.txt exec By Doug Nadel; find where THIS code is running from
FIXDCB.txt exec Alter the DSCB of an existing dataset
FIXTBL.txt exec Direct access to ISPF 3.9
FIXTOOL.txt exec Report a tool-error/fix. This never got much exercise and may be 'unfinished'.
FLIP.txt emac Show all hidden lines; hide all shown lines.
FTEDIT.txt xmp Edit file-tailored text
FXCNOTE2.txt exec Orig by IBM; fixes some errors in orig SMTPNOTE
GENSAR.txt exec Generate control statements for SARBCH; very old code
GETNAME.txt exec find username in storage
GMTOFSET.txt exec Extract GMT offset from CVT and apply it
HURL.txt exec Use NDM to ship specified datasets.
ICEUSER.txt subr Table of 'special' userids
IOSTMT.txt emac Shows all I/O statements in PL/I source.
IPLINFO.txt exec Display IPL status information; by Mark Zelden
ISOLATE.txt emac Show only the selected word
ISRTHDR.txt exec Insert header lines to a dataset
ISRUDLP.txt panel Alternate for ISPF 3.4
JCLXREF.txt exec Analyze JCL to find TASKS, PROGRAMS, and DDNAMES
JOBID.txt exec get JN/J# from storage
KEDBASE.txt exec Edit/Browse/View by DDName
MACSKEL.txt xmp Skeleton of a macro
MAKEPARA.txt emac Add a new blank paragraph
MARK.txt emac Mark 'CALL' line
MASKTST.txt demo Matching using BITAND and BITOR
MATCHMBR.txt exec Compare 2 PDS to find missing members
MBRSTATS.txt exec Show member-stats; requires PIPES
MBTI.txt exec Myers-Briggs Type Indicator
MBTIKEY.txt data for MBTI
MBTIPROF.txt data Type descriptions for MBTI
MBTIQ.txt data Questions for MBTI
MSGLOG.txt exec Show me my LOG.MISC
NMAR.txt exec NMR-specific but a great example of RXVSAM use
NONOTS.txt emac Chg all logical-NOTs to something more understandable
NORXSKEL.txt emac Exclude all REXXSKEL lines for easier reading
ONLY.txt emac Exclude all lines except those with the target string
outdents.txt emac exclude all lines except those with start or end tokens
PACKLOGS.txt exec Combine saved ISPF logs into a monthly summary
PARSEDCL.txt emac Annotates a PL/1 DCL with information about column-locations for each field.
PDS2SEQ.txt exec Convert a PDS to a sequential dataset
PGFS.txt emac show all PL/I paragraph names
PLIFLOW.txt emac Show the operational structure of a PL/I
PLISKIP.txt emac Replaces carriage control characters in PLI source with preprocessor commands
POPINDX.txt exec Populate the #INDEX member from another dataset
POSIT.txt emac Required by EDBR
PRDSTATS.txt exec Update the ISPF statistics for a member
PROFILES.txt exec manipulate one's Edit profiles
PROFVARX.txt exec Display all the Profile Variables for a given application pool
PULLSAR.txt exec Get SAR reports into a TSO dataset
QTABLE.txt exec Show open ISPF tables; by Doug Nadel
REBLOCK.txt emac Change all BLKSIZE=xxxxx to BLKSIZE=0
RECALL.txt exec HRECALL specified datasets
SAMPLE.txt exec SAMPLE a PDS by looking at the first-n lines
SAVELOGS.txt exec Call this each morning before entering ISPF to print and delete yesterday's SPFLOGx.
SCAN.txt exec SCAN a DDName for DCB's
sched.txt exec produce calendar page
schinit.txt exec init for SCHED
scramx.txt exec FTP PDS to PC
SCRMODEL.txt exec Determine the screen model type.
SDSFXIT.txt exec Hilite SDSF output; must have SDSFXIT0 operable.
SEARCHME.txt exec Search the current PDS for text
SECURE.txt exec Example of a stub to a remote routine
SETEPROF.txt emac Build a standard ZDEFAULT edit profile
SHIP.txt exec SHIP a dataset to another user
SKEL.txt xmp Ordinary panel
SKELH.txt xmp tutorial panel
SKELT.txt xmp TBDISPL panel
SKINNY.txt emac Exclude all but REXXSKEL
SLICKIO.txt emac Make PL/I FILE declarations line up neatly
SNIP.txt emac Find long lines
SORTCMDS.txt exec Sort a command table
SORTSTEM.txt xmp Sort a stem array
SORTXMP.txt xmp Using SORT utility
SPLITDO.txt emac Split DO from IF in PLI
STEPS.txt emac exposes all EXEC statements in JCL.
STRLEN.txt emac Insert yardstick over quoted string
STRUCT.txt emac show the innate structure of a COBOL program
SYMDEFS.txt exec Display all the system-level symbolics; by Bill LaLonde
SYSAMON.txt exec Maintain the SYSUMON VSAM file of usage stats by user and toolname.
SYSUMON.txt exec Count tool-usage by user and month. See SYSAMON.
SYSVARS.txt exec show system variables
S2PTRIM.txt macro SUB of SEQ2PDS
TBSORT.txt exec Sort an ISPF table
TRIMLOG.txt exec examines LOG.MISC and discards any entries older than 60 days
TRIMPLI.txt emac skinnies PLI listing
TSURXS.txt exec Display all TSO userids in sorted order; by John Kalinich
upoe@#st.txt subr update ISPF stats
VML.txt xmp Chris Lewis' proof-of-concept for horizontal scolling
VSAMINIT.txt exec writes a dummy record to a newly-created VSAM dataset, then deletes that record.
VSPACE.txt exec computes %-used from LISTCSUM output and recommends primary space allocation if different.
VSPROC.txt exec Demos use of RXVSAM for dealing with VSAM files
VWBR.txt exec Invoke View from Browse.
wb.txt emac fill in 'Written By'
wbname.txt subr init for WBNAME
WHATINC.txt emac returns a string containing all the INCLUDEs found in the source; used by NMLIBIA
WHEREAMI.txt exec identifies your current SMFID and NODE
WHOAMI.txt exec identifies the caller and several other datapoints; not my code