I have copied the PDS datasets from the CBT overflow tape to the MVS Tur(n)key system and catalogued them in SYS1.UCAT.CBT. The dataset names on one of the CBTxxx volumes will be CBT429.FILEnnn for file nnn of the CBT tape 429.
The description of the CBT contents was copied from file 1 of the tape and was modified (using a few editor commands) into a html document which you see here: (no text editing or formatting was done, only html tags added)
COMPRESSION / DECOMPRESSION program for this * FILE 002
tape. This is the code used for compression and * FILE 002
decompression of many of the files in this tape. * FILE 002
The official name of this program is CBT973, and * FILE 002
I would recommend assembling and linkediting this * FILE 002
program, and making its load module available at * FILE 002
all times in your installation. The load module * FILE 002
for CBT973 may also be found on File 035 of this * FILE 002
tape. * FILE 002
* FILE 002
The JCL for loading files from this tape on to * FILE 002
disk, may be found in File 003. This JCL is set * FILE 002
up to ASSEMBLE and LOAD the CBT973 program with * FILE 002
every run. When you customize a copy of File 003 * FILE 002
for yourself, you might use your own linkedited * FILE 002
copy of the load module, and not have to assemble * FILE 002
it for every run. * FILE 002
* FILE 002
is a JCL stream with instream procs to drop down * FILE 003
this whole mods tape (except files that have been * FILE 003
deleted) to a disk pack (if you happen to have the * FILE 003
luxury of having a disk pack lying around doing * FILE 003
nothing). * FILE 003
* FILE 003
I'd personally recommend customizing a copy of this * FILE 003
file, to download a few files at a time. Keep the * FILE 003
original copy around, so you know the "unload format" * FILE 003
of whatever file you want to get from the tape. * FILE 003
* FILE 003
AS OF VERSION 323, NEW FILES ARE BEING STORED ON * FILE 003
THIS TAPE WITH ISPF STATISTICS RELOADABLE. YOU * FILE 003
MUST USE THE PDSLOAD PROGRAM JCL IN FILE 003 * FILE 003
INSTEAD OF IEBUPDTE TO GET THE STATISTICS INTO YOUR * FILE 003
LOADED SOURCE PDS'ES. A LOAD MODULE FOR PDSLOAD IS * FILE 003
ON FILE 035 (SOURCE ON FILE 093). INSTRUCTIONS ON * FILE 003
HOW TO USE PDSLOAD INSTEAD OF IEBUPDTE ARE INCLUDED * FILE 003
IN THE NEW COMMENTS IN FILE 003. THOSE FILES THAT * FILE 003
HAVE ISPF STATS INCLUDED ARE MARKED IN THE "FILE * FILE 003
STATUS SECTION" ABOVE, WITH AN "S" NEAR TO THE * FILE 003
COUNT OF THE NUMBER OF RECORDS. * FILE 003
* FILE 003
is source for an assembler program called CBTUPD. * FILE 004
CBTUPD inserts ./ ADD NAME=xxxxxxxx cards into * FILE 004
File 001 of this tape, so the tape documentation, * FILE 004
which is very large, can be broken up into a pds, * FILE 004
with smaller pieces as members. * FILE 004
* FILE 004
After making a copy of this file with the extra * FILE 004
separator cards, using the CBTUPD program, you can * FILE 004
then use the PDSLOAD or IEBUPDTE programs to load * FILE 004
a partitioned dataset with the appropriate * FILE 004
members. Member names are in their original order, * FILE 004
using the EBCDIC collating sequence. * FILE 004
* FILE 004
The member names inserted, are in alphabetical * FILE 004
order, so that when you re-constitute the File 001 * FILE 004
with the OFFLOAD or LISTPDS programs, or with the * FILE 004
=OFFLOAD subcommand of REVIEW, etc, the members * FILE 004
will go back together in the proper order. * FILE 004
* FILE 004
Questions: email sbgolob@attglobal.net * FILE 004
or sbgolob@aol.com * FILE 004
* FILE 004
Please see File 006 for more related tools. * FILE 004
* FILE 004
IS FROM GEORGE SHEDLOCK OF OCALA, FLORIDA, AND * FILE 005
CONTAINS A REXX EXEC TO LOAD THIS TAPE ONTO A * FILE 005
VM SYSTEM. * FILE 005
* FILE 005
MODULE NAME: CBTTAPE EXEC * FILE 005
* FILE 005
AUTHOR: GEORGE SHEDLOCK JR. * FILE 005
4479 SW 159TH ST RD * FILE 005
OCALA, FL 34473 * FILE 005
(352) 347-3868 * FILE 005
* FILE 005
email: gshedloc@chepusa.com * FILE 005
* FILE 005
VERSION: 1.1 (I DON'T LIKE VERSION 1.0 SINCE IT * FILE 005
IMPLIES A LOT OF BUGS ARE STILL IN THERE * FILE 005
WAITING TO BE DISCOVERED.) * FILE 005
* FILE 005
PURPOSE: THIS REXX EXEC WAS WRITTEN BECAUSE I MADE * FILE 005
THE MISTAKE OF TELLING SAM GOLOB THAT IT * FILE 005
WOULDN'T BE HARD TO WRITE SOMETHING LIKE * FILE 005
THIS SINCE I HAD MOST OF THE PIECES AND * FILE 005
JUST HAD TO PUT THEM TOGETHER. WELL, HERE * FILE 005
IT IS... 3 YEARS, 1100 MILES (I MOVED * FILE 005
FROM NEW JERSEY), AND A LOT OF DESERVED * FILE 005
NAGGING FROM SAM. IF THIS IS OF SOME VALUE * FILE 005
TO YOU, GREAT. IF THIS IS OF NO VALUE TO * FILE 005
YOU, YOU'RE WELCOME TO WRITE SOMETHING OF * FILE 005
YOUR OWN. FEEL FREE TO MODIFY THIS TO SUIT * FILE 005
YOUR NEEDS. IF YOU MODIFY THIS, PLEASE * FILE 005
SEND ME A COPY SO THAT IT CAN BE SHARED * FILE 005
WITH OTHERS. * FILE 005
* FILE 005
THIS EXEC WILL ALLOW THE VM SITE A WAY * FILE 005
TO PROCESS THE CBT TAPE IN THE NATIVE * FILE 005
VM ENVIRONMENT. THIS IS MAINLY BECAUSE * FILE 005
THERE ARE A LOT OF REALLY GOOD PROGRAMS, * FILE 005
MACROS, ETC. ON THIS TAPE. WELL, OK * FILE 005
THERE ARE SOME SO-SO PROGRAMS ALSO, BUT * FILE 005
MOST OF IT IS GOOD. INCLUDED IN THIS * FILE 005
FILE IS A PROGRAM I FOUND IN MY TRAVELS * FILE 005
ON THE INTERNET SOME YEARS AGO. IF I * FILE 005
COULD REMEMBER WHO WROTE IT OR WHERE I * FILE 005
FOUND IT, I WOULD GLADLY GIVE THE PROPER * FILE 005
CREDIT. THIS PROGRAM IS THE IEBCOPY * FILE 005
PROGRAM. ALTHOUGH IT WILL ONLY LOAD OR * FILE 005
LIST THE MODULES FROM THE TAPE, IT IS * FILE 005
STILL A GOOD LITTLE UTILITY. * FILE 005
* FILE 005
INITIAL SETUP: * FILE 005
SP PUN * CL K * FILE 005
TAPE REW * FILE 005
TAPE FSF 4 * FILE 005
FI INMOVE TAP1 (RECFM FB LRECL 80 BLOCK 80 * FILE 005
FI OUTFILE PUNCH (RECFM FB LRECL 80 BLOCK 80 * FILE 005
MOVEFILE * FILE 005
CL PUN * FILE 005
SP RDR CL K * FILE 005
READCARD * * * FILE 005
CBTTAPE 402 SETUP A 3390 * FILE 005
* FILE 005
NOTE: IT IS ASSUMED THAT THE CBT TAPE IS MOUNTED * FILE 005
ON YOUR 181 * FILE 005
IN THE CBTTAPE COMMAND, IF 402 IS THE CBT * FILE 005
VERSION, SETUP TELLS IT TO LOAD THE * FILE 005
APPROPRIATE FILES FROM THE CBT TAPE, ASSEMBLE * FILE 005
THEM AND GENERATE LOAD MODULES. IN ADDITION * FILE 005
SETUP WILL ALSO CREATE AN INDEX OF THE CBT * FILE 005
TAPE SO THAT FUTURE RETRIEVALS WILL BE EASIER. * FILE 005
* FILE 005
ON-GOING USAGE: * FILE 005
CBTTAPE 402 FILENO TARGET DISKTYPE * FILE 005
* FILE 005
NOTE: IT IS ASSUMED THAT THE CBT TAPE IS MOUNTED * FILE 005
ON YOUR 181. THE 402 IS AGAIN THE CBT VERSION, * FILE 005
FILENO IS THE FILE NUMBER YOU WANT TO LOAD, * FILE 005
TARGET IS THE FILEMODE OF THE DISK THAT WILL * FILE 005
RECEIVE THE EXTRACTED MODULES, AND DISKTYPE * FILE 005
IS THE DEVICE TYPE TO USE FOR SOME T-DISK * FILE 005
(SOMETIMES WE NEED A LITTLE WORK SPACE) * FILE 005
* FILE 005
EXAMPLE: * FILE 005
CBTTAPE 402 122 R 3390 * FILE 005
THIS WILL GET, IF WE NEED IT, 5 CYLINDERS * FILE 005
OF T-DISK ON A 3390, AND LOAD FILE 122 * FILE 005
FROM CBT VERSION 402 TO THE R MINIDISK. * FILE 005
* FILE 005
REQUIRED FILES: * FILE 005
CBTTAPE EXEC (THIS FILE) * FILE 005
CBT973 ASSEMBLE (FROM FILE 002 OF THE CBT TAPE) * FILE 005
IEBCOPY ASSEMBLE (FROM ELSEWHERE IN THIS FILE) * FILE 005
IEBCOPY HELP (FROM ELSEWHERE IN THIS FILE) * FILE 005
* FILE 005
CONTAINS SEVERAL PROGRAMS USED FOR MANIPULATION OF * FILE 006
THE CBT TAPE AND CBT OVERFLOW TAPE DOCUMENTATION. * FILE 006
* FILE 006
The program called CBTUPD is for the purpose of * FILE 006
introducing appropriately named ./ ADD NAME= cards * FILE 006
into strategic places of the CBT Tape Documentation. * FILE 006
The CBT Tape doc can then be conveniently broken * FILE 006
up into a pds. The member names of the pds are * FILE 006
in collating sequence order (EBCDIC), so that the * FILE 006
members can be put back together as a sequential * FILE 006
file, in their proper order. * FILE 006
* FILE 006
The program called DOCFILE is from Arnold Casinghino * FILE 006
and it puts the indicators in columns 73-80 of the * FILE 006
CBT Tape documentation, to indicate your current * FILE 006
position within the documentation. * FILE 006
* FILE 006
The original idea of the DOCFILE program is from * FILE 006
a COBOL program written by Sam Barr of Northrop. * FILE 006
* FILE 006
DOCFILE has been updated by Sam Golob (03/99) to * FILE 006
take into account the fact that there may be lower * FILE 006
case characters in the CBT Tape Documentation * FILE 006
nowadays. * FILE 006
* FILE 006
This file was moved from File 130 and the former * FILE 006
File 006 was moved to File 130. The reason for * FILE 006
that, was that this file should be near the * FILE 006
beginning of the CBT Tape, since it is used to * FILE 006
process the CBT Tape Documentation File. * FILE 006
* FILE 006
(Actually both of them are. I just put this file * FILE 006
more "forward", because I think more people are * FILE 006
going to use it. File 130 is for loading the * FILE 006
CBT documentation into an INFO/MVS database.) * FILE 006
* FILE 006
I've included the OSTARXMT package in this file * FILE 006
to make it more available. Documentation for * FILE 006
running this package is in File 365. The load * FILE 006
module for the OSTAREDC assembler program to * FILE 006
speed up error checking, is in File 035. If you * FILE 006
get CBT Tape files in OSTARXMT format (LRECL=88), * FILE 006
the presence of the OSTARREC exec here, will make * FILE 006
it easier for you to handle this format. Just * FILE 006
copy OSTARREC into your SYSPROC or SYSEXEC library * FILE 006
and invoke it, against your .XMT files. * FILE 006
* FILE 006
Note: This file also contains copies of the ISPF Edit * FILE 006
Macros CBTUPDTE and COVUPDTE, which are used * FILE 006
to introduce ./ ADD NAME= cards into the CBT Tape * FILE 006
and CBT Overflow Tape documentation files. That * FILE 006
will allow them to be converted into partitioned * FILE 006
datasets, using IEBUPDTE ,PARM=NEW , or PDSLOAD * FILE 006
programs. * FILE 006
* FILE 006
However, the CBTUPD assembler program supersedes * FILE 006
these two edit macros, because it is more accurate * FILE 006
in checking where to insert the ./ ADD cards, * FILE 006
and is less prone to some other errors. * FILE 006
* FILE 006
As of CBTUPD Version 1.3 (or higher), the changes * FILE 006
for each version of the tape are separated out as * FILE 006
distinct members, sorted in reverse order. None of * FILE 006
the edit macros did that job, so CBTUPD is distinctly * FILE 006
better than the CBTUPDTE edit macro. * FILE 006
* FILE 006
Version 1.3 of the CBTUPD program was developed and * FILE 006
tested on the IBM PC using the Tachyon Cross * FILE 006
Assembler and the Tachyon Operating System. This * FILE 006
is a vendor product from Tachyon Software, Denver * FILE 006
Colorado, 1-303-722-1341. * FILE 006
www.tachyonsoft.com/tachyon * FILE 006
This product allows you to develop MVS assembler * FILE 006
programs on an IBM PC, test them on the PC, and * FILE 006
port them to MVS. The object deck produced by * FILE 006
the Tachyon Assembler is compatible with HLASM. * FILE 006
* FILE 006
IS A COPY OF THE SHARE RACF MODS TAPE FROM MR JIM * FILE 007
BLALOCK OF CLEMSON UNIVERSITY IN ANDERSON, SOUTH * FILE 007
CAROLINA. THIS FILE IS IN IEBUPDTE SYSIN FORMAT. * FILE 007
FOR ADDITIONAL INFORMATION SEE THE MEMBERS CALLED * FILE 007
$$$DOC AND $$INDEX. * FILE 007
* FILE 007
email: carey@clemson.edu * FILE 007
* FILE 007
THIS WAS FOR ARNIE'S USE TO SHOW SOME STATS. THE * FILE 008
LENGTH OF HIS RUNS, EXACT FOOTAGES, AND BYTE COUNTS * FILE 008
ARE PRETTY MUCH WHAT HE HAS HERE. ARNIE'S DATA ON * FILE 008
THIS FILE EXTENDS THROUGH VERSION 320 OF THIS TAPE. * FILE 008
ARNIE SUPPORTED THIS TAPE THROUGH VERSION 321. * FILE 008
* FILE 008
IN THE FUTURE, I MAY MAKE SIMILAR USE OF THIS FILE, * FILE 008
BUT SOME OF ITS INFORMATION IS NOW BEING REPORTED * FILE 008
ABOVE IN THE VERSION SECTION. IN PARTICULAR, EXACT * FILE 008
FOOTAGES AND BYTE COUNTS FOR VERSIONS 321 AND BEYOND * FILE 008
ARE RECORDED ABOVE IN THE VERSION SECTION. TO SEE * FILE 008
HOW THIS TAPE HAS GROWN (FLUCTUATED), YOU CAN LOOK * FILE 008
AT THE DATA RECORDED HERE ON THIS FILE, AND CONTINUE * FILE 008
BY LOOKING AT THE END OF THE VERSION SECTION ABOVE. * FILE 008
* FILE 008
IS FROM MR GENE LEW OF MCI OF ROCKVILLE, MARYLAND * FILE 009
AND CONTAINS A COPY OF THEIR RACF EXITS TO * FILE 009
IMPLEMENT RACF 1.7 TAPE DATASET PROTECTION IN * FILE 009
"WARNING" MODE. THIS FILE IS IN IEBUPDTE SYSIN * FILE 009
FORMAT. * FILE 009
* FILE 009
IS FROM MR CHUCK HOFFMAN OF GTE IN WALTHAM, MASS, * FILE 010
AND CONTAINS A COPY OF HIS TSO COMMAND CALLED * FILE 010
ISPFPRIM WHICH ENABLES A USER TO INVOKE AN ISPF * FILE 010
DIALOG FROM READY OR FROM WITHIN ISPF, AND TO USE * FILE 010
AN OPTIONAL PANEL SELECTION NUMBER. FOR ADDITIONAL * FILE 010
INFORMATION SEE THE MEMBER CALLED $$$DOC. THIS * FILE 010
FILE IS IN IEBUPDTE SYSIN FORMAT. * FILE 010
* FILE 010
IS FROM INTEL CORPORATION AND CONTAINS SEVERAL OF * FILE 011
THEIR PROGRAMS. THIS FILE IS IN IEBUPDTE SYSIN * FILE 011
FORMAT. FOR ADDITIONAL INFORMATION SEE THE MEMBER * FILE 011
CALLED $$DOC : * FILE 011
* FILE 011
$$DOC.....THIS MEMBER * FILE 011
ADEBE.....JCL TO ASSEMBLE AND LINK DEBE * FILE 011
AMSG2USR..JCL TO ASSEMBLE AND LINK MSG2USER * FILE 011
ATSO051...JCL TO ASSEMBLE AND LINK TSO051 * FILE 011
DEBE......THIS VERSION WAS MODIFIED TO RUN UNDER * FILE 011
MVS/XA AND WILL NOW SUPPORT BOTH 3420 AND * FILE 011
3480 TAPE DRIVES * FILE 011
MSG2USER..THIS IS A WTO EXIT. THIS EXIT WILL SEND A * FILE 011
MESSAGE TO A TSO USER WHO IS ENQUEUED ON A * FILE 011
DATASET NEEDED BY A BATCH JOB. THE FORMAT * FILE 011
OF THE MESSAGE IS : * FILE 011
NTL861I THE FOLLOWING RESERVED DATASET * FILE 011
NAMES UNAVAILABLE TO JJJJ * FILE 011
NTL863I DSN=DSN * FILE 011
TSO051....THIS PROGRAM WILL GET INFORMATION FROM JCT * FILE 011
AND WILL FILL IN VARIOUS CLIST VARIABLES. * FILE 011
* FILE 011
IS FROM JOHN HANCOCK MUTUAL LIFE INSURANCE COMPANY * FILE 012
AND IS THEIR ISPF BACKGROUND JOBS DRIVER. * FILE 012
* FILE 012
THIS FILE CONSISTS OF OPTIONS DESIGNED TO BE USED WITH * FILE 012
THE INTERACTIVE SYSTEM PRODUCTIVITY FACILITY/PROGRAM * FILE 012
DEVELOPMENT FACILITY (ISPF/PDF). * FILE 012
* FILE 012
NOTE: SOME OF THESE OPTIONS WILL WORK ONLY UNDER ISPF * FILE 012
VERSION 2. PANELS/SKELETONS/MESSAGES PROVIDED FOR USE * FILE 012
WITH JH#PDF8 ARE INTENDED ONLY AS SAMPLES. SOME * FILE 012
MODIFICATION (E.G. ACCOUNTING FIELDS) WOULD BE * FILE 012
REQUIRED AT YOUR INSTALLATION. PANELS THAT CONTAIN A * FILE 012
"VOLUME SERIAL" FIELD DETERMINE A UNIT NAME IN THEIR * FILE 012
)PROC SECTION. THIS SHOULD BE CHECKED FOR * FILE 012
INSTALLATION COMPATIBILITY. * FILE 012
* FILE 012
CHANGES 03/04/85: MODIFICATIONS TO EXPLOIT ISPF * FILE 012
VERSION 2: MACRO ISPCALL NOW SUPPORTS ISPEXEC * FILE 012
FORMAT (SEE NEW JH#PDF8 FOR EXAMPLE); JH#PDF8 * FILE 012
MODIFIED TO USE LM SERVICES TO ENABLE VIO * FILE 012
ISPCTLN DATA SETS TO BE EDITED (UNDER V1 * FILE 012
JH#PDF8 WORKS AS BEFORE); PANEL JHAEFR01 ADDED * FILE 012
(USED BY JH#PDF8 UNDER V2); JH ISR^PRIM * FILE 012
REPLACED FOR V2; MSGS JHA^M04 ADDED; MANY * FILE 012
PANELS/SKELETONS/MESSAGES FORMERLY PREFIXED Z* * FILE 012
ARE NOW PREFIXED JHA*; CLIST ISRCTBL RENAMED * FILE 012
JH#YCTBL; JH EDIT INTERFACE ALTERED FOR V2; * FILE 012
CLIST TSEDITPR RENAMED JH#TEDPR AND CHANGED TO * FILE 012
PROCESS PDF V2 FIELDS; ADDED JH#GTDSN (A DIALOG * FILE 012
PROGRAM THAT RETURNS VOLUME SERIAL AND DATA SET * FILE 012
NAME WHEN PROVIDED A DDNAME - USED BY OTHER * FILE 012
DIALOGS); ADDED JH#TEDRT TO DISPLAY AND EDIT A * FILE 012
USER'S PDF EDIT RECOVERY TABLE; ADDED ISRUOLJH, * FILE 012
IBM'S ISRUOL (PDF 3.8) MODIFIED TO RUN FASTER * FILE 012
BY USING TEMPORARY DATA SETS; ADDED JH#TPRGM TO * FILE 012
INVOKE IEHPROGM FOREGROUND; ADDED JH#EDTMP TO * FILE 012
ALLOW EDITING OF VIO ISPCTLN DATA SETS. * FILE 012
* FILE 012
CHANGES 10/18/83: TABLE DISPLAY UTILITY REWRITTEN AND * FILE 012
ENHANCED. CLIST RENAMED JH#YDTBL FROM * FILE 012
ISRYDTBL. * FILE 012
* FILE 012
CHANGES 10/3/83: JOHN HANCOCK EDIT INTERFACE IS * FILE 012
ENHANCED TO ALLOW USER-DEFINED ABBREVIATIONS * FILE 012
(SEE #3 BELOW); SMALL CHANGES TO JH#PDF8 AND * FILE 012
ASSOCIATED SAMPLE PANELS; ADDED #MAXTOP #8, #9. * FILE 012
* FILE 012
1. JOHN HANCOCK BATCH JOBS DRIVER (JH#PDF8) IS A * FILE 012
GENERAL PURPOSE ISPF FUNCTION FOR THE GENERATION OF * FILE 012
JCL BASED ON DATA ENTERED ON PANELS. PROCESSING IS * FILE 012
CONTROLLED BY AN INITIAL PARM AND BY ISPF * FILE 012
VARIABLES. SEE THE COMMENTS AT THE BEGINNING OF * FILE 012
THE JH#PDF8 SOURCE FOR ADDITIONAL INFORMATION. * FILE 012
* FILE 012
SOME DIFFERENCES BETWEEN PDF OPTION 5 AND JH#PDF8: * FILE 012
JH#PDF8 DOES NOT ALLOCATE DATA SETS FOR * FILE 012
VERIFICATION, WHERE OPTION 5 OPTIONALLY ALLOCATES * FILE 012
THE INPUT DATA SET (ONLY); JH#PDF8 ALLOWS A USER TO * FILE 012
EDIT THE TEMPORARY GENERATED JCL IN ADDITION TO * FILE 012
SUBMITTING OR CANCELING THE JOB; JH#PDF8 ALLOWS * FILE 012
INITIAL AND FINAL SKELETONS TO BE TAILORED FOR EACH * FILE 012
INVOCATION; JH#PDF8 ALLOWS TWO OR MORE PANELS TO * FILE 012
PROVIDE INPUT TO ONE TAILORING OPERATION; WITH * FILE 012
JH#PDF8 PROCESSING SUCH AS JOB CHARACTER * FILE 012
INCREMENTATION IS DONE IN THE PANELS (SEE SAMPLE * FILE 012
JHABP^B) INSTEAD OF IN THE DRIVER PROGRAM. * FILE 012
* FILE 012
SAMPLE PANELS, SKELETONS, AND MESSAGES ARE PROVIDED * FILE 012
FOR USE WITH JH#PDF8. IT IS POSSIBLE, HOWEVER, TO * FILE 012
CREATE TOTALLY DIFFERENT ISPF COMPONENTS FOR USE * FILE 012
WITH THIS DRIVER. THE ONLY REQUIREMENTS ARE THAT * FILE 012
THERE BE A PSEUDO-SELECTION PANEL WHOSE NAME IS * FILE 012
PASSED VIA A PARM TO JH#PDF8 (SAMPLE IS JHABP^A) * FILE 012
AND THAT THE COMPONENTS SET ISPF VARIABLES TO * FILE 012
DICTATE PROCESSING (AGAIN, SEE THE COMMENTS). * FILE 012
* FILE 012
JH#PDF8 CODE IS REENTRANT; THE MODULE MAY BE * FILE 012
PLACED IN LPALIB WITH OTHER ISPF MODULES. * FILE 012
* FILE 012
2. CLIST JH#YDTBL WILL DISPLAY THE CONTENTS * FILE 012
(NON-EXTENSION VARIABLES) OF ANY TABLE IN TABLE * FILE 012
DISPLAY (SCROLLABLE) FORMAT. AS PROVIDED HERE IT * FILE 012
SUPPORTS FIVE DIFFERENT TABLE DISPLAY FORMATS. IT * FILE 012
MAY BE INVOKED FROM ISPF/PDF OPTION 6, VIA THE ISPF * FILE 012
TSO COMMAND, OR FROM A SELECTION PANEL (E.G., * FILE 012
ISRYXD1). * FILE 012
* FILE 012
3. PANEL JHTEPE01 IS A JOHN HANCOCK EDIT INTERFACE. * FILE 012
TO USE IT, ADD THE FOLLOWING ENTRY TO A SELECTION * FILE 012
PANEL: * FILE 012
N,'PGM(ISREDIT) PARM(P,JHTEPE01) * FILE 012
NEWAPPL(ISR)' * FILE 012
NOTE: FUTURE RELEASES OF PDF MAY NOT SUPPORT THIS * FILE 012
METHOD OF IMPLEMENTATION. * FILE 012
* FILE 012
4. CLIST JH#TEDPR WILL DISPLAY THE CONTENTS OF A * FILE 012
USER'S CURRENT EDIT PROFILE (FOR THE APPLICATION * FILE 012
HE HAS ENTERED). IT MAY BE INVOKED FROM ISPF/PDF * FILE 012
OPTION 6, VIA THE ISPF TSO COMMAND, OR FROM A * FILE 012
SELECTION PANEL. THE CLIST MUST BE MODIFIED FOR * FILE 012
YOUR INSTALLATION'S ISPF PROFILE NAMING * FILE 012
CONVENTION. * FILE 012
* FILE 012
5. CLIST TSCMDTB WILL DISPLAY THE CONTENTS OF THE * FILE 012
CURRENT SYSTEM COMMAND TABLE. THIS MAY BE USED BY * FILE 012
END-USERS, SINCE THE "DESCRIPTION," NOT THE * FILE 012
"ACTION," IS DISPLAYED. IF THIS CLIST IS TO BE * FILE 012
USED, IT IS RECOMMENDED THAT A COPY OF THE SYSTEM * FILE 012
COMMAND TABLE (ISPCMDS) BE MADE UNDER A DIFFERENT * FILE 012
NAME (SYSCMDS IS USED IN THE CLIST). STRANGE * FILE 012
THINGS WILL HAPPEN IF YOU ATTEMPT TO OPEN AND CLOSE * FILE 012
A COMMAND TABLE THAT ISPF HAS ALREADY OPENED. * FILE 012
TSCMDTB MAY BE INVOKED FROM ISPF/PDF OPTION 6, VIA * FILE 012
THE ISPF TSO COMMAND, OR FROM A SELECTION PANEL. * FILE 012
* FILE 012
6. CLIST JH#YCTBL DRIVES THE TABLE RECONSTRUCTION * FILE 012
UTILITY. THIS ALLOWS FIELDS TO BE ADDED TO/REMOVED * FILE 012
FROM TABLES WITHOUT LOSING THE TABLE DATA. IT MAY * FILE 012
BE INVOKED FROM ISPF/PDF OPTION 6, OR FROM A * FILE 012
SELECTION PANEL (E.G., ISRYXD1). * FILE 012
* FILE 012
7. PANEL JHAYP14^ PROVIDES ENTRY TO A FOREGROUND * FILE 012
INTERFACE TO THE IBM-SUPPLIED SELECTION PANEL * FILE 012
UPDATE UTILITY (ISPPUP). THIS MAY BE ENTERED FROM * FILE 012
A HIGHER-LEVEL SELECTION PANEL (XX,'PANEL(ZYPUP^)') * FILE 012
OR FROM TSO READY (ISPSTART PANEL(ZYPUP^)). * FILE 012
* FILE 012
8. CLIST ISRALTK ALLOWS A USER TO DEFINE AND ACTIVATE * FILE 012
A SECOND SET OF PROGRAM FUNCTION KEY DEFINITIONS. * FILE 012
READ HELP PANEL XALTK BEFORE USING. IT MAY BE * FILE 012
INVOKED FROM A SELECTION PANEL (E.G.,ISPOPTA) BY * FILE 012
"'XX,CMD(%ISRALTK)'." AN ENTRY IN A COMMAND TABLE * FILE 012
IS ALSO A GOOD IDEA: * FILE 012
VERB ACTION * FILE 012
K2 SELECT CMD(%ISRALTK PARM('&ZPARM')) * FILE 012
* FILE 012
9. PANEL PANELID IS A EXAMPLE OF HOW "PANELID ON" MAY * FILE 012
BE SET WITHOUT THE USER HAVING TO ENTER THE ISPF * FILE 012
COMMAND. THE CODE IN THIS PANEL COULD BE USED IN * FILE 012
ANY SELECTION PANEL, INCLUDING ISR^PRIM AND * FILE 012
ISP^MSTR. * FILE 012
* FILE 012
10. CLIST JH#TEDRT ALLOWS THE DISPLAYING AND * FILE 012
MODIFICATION OF A USER'S EDIT RECOVERY TABLE. IT * FILE 012
MAY BE INVOKED FROM ISPF/PDF OPTION 6, OR FROM A * FILE 012
SELECTION PANEL. THE CLIST MUST BE MODIFIED FOR * FILE 012
YOUR INSTALLATION'S ISPF PROFILE NAMING CONVENTION. * FILE 012
* FILE 012
11. CLIST ISRUOLJH IS JOHN HANCOCK'S MODIFIED ISRUOL, * FILE 012
THE CLIST THAT DRIVES PDF OPTION 3.8. IT HAS BEEN * FILE 012
MODIFIED TO RUN FASTER BY USING TEMPORARY DATA * FILE 012
SETS, BYPASSING CATALOGING AND DELETION. IT USES * FILE 012
PROVIDED DIALOG PROGRAM JH#GTDSN (WHICH CAN BE IN * FILE 012
LPA IF HEAVILY USED). (THIS CLIST HAS ALSO BEEN * FILE 012
MODIFIED TO USE THE SAME JOB CARDS AS OPTION 3.6.) * FILE 012
* FILE 012
12. CLIST JH#TPRGM PROVIDES A PANEL TO RUN IEHPROGM IN * FILE 012
FOREGROUND. TO USE IT ADD THE FOLLOWING ENTRY TO A * FILE 012
SELECTION PANEL: * FILE 012
NN,'CMD(%JH#TPRGM PANEL(JHTEP0M) * FILE 012
PANEL2(JHTEP0M2) SKEL(JHTES0M))' * FILE 012
* FILE 012
13. PROGRAM JH#EDTMP PUTS THE USER INTO EDIT OF AN ISPF * FILE 012
TEMPORARY CONTROL DATA SET (ISPCTLN). IT SUPPORTS * FILE 012
VIO AS WELL AS DASD DATA SETS. IF NO PARM IS * FILE 012
SUPPLIED, THE DATA SET ASSOCIATED WITH THE CURRENT * FILE 012
LOGICAL SCREEN IS USED. TO ACCESS THE DATA SET * FILE 012
USED BY THE PDF SUBMIT COMMAND, USE A PARM OF 0 * FILE 012
(ZERO). THIS PROGRAM MAY BE INVOKED VIA THE ISPF * FILE 012
SELECT SERVICE FROM ANOTHER DIALOG FUNCTION. AN * FILE 012
ENTRY MAY ALSO BE PLACED IN A COMMAND TABLE: * FILE 012
* FILE 012
VERB T ACTION * FILE 012
EDTEMP 3 SELECT PGM(JH#EDTMP) PARM(&ZPARM) * FILE 012
NEWAPPL(ISR) * FILE 012
* FILE 012
THEN A USER CAN ENTER THE EDTEMP COMMAND ON ANY * FILE 012
SCREEN AND EDIT THE DATA SET. * FILE 012
* FILE 012
CONTENTS OF THIS PDS: * FILE 012
* FILE 012
SOURCE: JH#EDTMP * FILE 012
JH#GTDSN * FILE 012
JH#PDF8 * FILE 012
* FILE 012
MACROS: ENTER * FILE 012
ISPCALL * FILE 012
LEAVE * FILE 012
REQUS * FILE 012
SCANLINE * FILE 012
* FILE 012
JCL: $INSTALL (COPY ISPF COMPONENTS AND * FILE 012
ASSEMBLE PROGRAMS) * FILE 012
* FILE 012
$LOAD (SAMPLE JCL TO LOAD * FILE 012
DISTRIBUTION LIB FROM TAPE) * FILE 012
* FILE 012
CLISTS: SEE IEBCOPY STATEMENTS IN $INSTALL * FILE 012
MEMBER * FILE 012
* FILE 012
PANELS: SEE IEBCOPY STATEMENTS IN $INSTALL * FILE 012
MEMBER PLUS MODIFIED ISR^PRIM * FILE 012
* FILE 012
SKELETONS: SEE IEBCOPY STATEMENTS IN $INSTALL * FILE 012
MEMBER * FILE 012
* FILE 012
MESSAGES: SEE IEBCOPY STATEMENTS IN $INSTALL * FILE 012
MEMBER * FILE 012
* FILE 012
IS FROM PENN MUTUAL LIFE AND CONTAINS A PROGRAM TO * FILE 013
PROCESS FILE 001 OF THIS TAPE TO COMPRESS THE SPACE * FILE 013
IT REQUIRES ON DISK. * FILE 013
* FILE 013
IS FROM SAM GOLOB AND CONTAINS A SERIES OF ARTICLES * FILE 014
WRITTEN FOR TECHNICAL SUPPORT MAGAZINE OF NASPA. * FILE 014
THIS FILE IS IN IEBUPDTE SYSIN FORMAT. FOR * FILE 014
ADDITIONAL INFORMATION, SEE THE MEMBER CALLED * FILE 014
$$$INTRO. THESE ARE SAM'S OLDER ARTICLES. (SEE * FILE 014
FILE 120 FOR THE COLLECTION OF SAM'S "MVS TOOLS AND * FILE 014
TRICKS OF THE TRADE" COLUMNS.) * FILE 014
* FILE 014
THIS FILE CONSISTS OF ARTICLES SUBMITTED BY SAM * FILE 014
GOLOB TO "TECHNICAL SUPPORT" MAGAZINE OF NASPA, * FILE 014
THE NATIONAL SYSTEMS PROGRAMMERS ASSOCIATION, * FILE 014
HEADQUARTERED IN MILWAUKEE, WISCONSIN. * FILE 014
* FILE 014
THE MATERIAL PERTAINS LARGELY TO PROGRAMS ON THE CBT * FILE 014
TAPE, AND TO TOPICS OF GENERAL SYSTEMS PROGRAMMER * FILE 014
INTEREST. WITH THE KIND PERMISSION OF BOB BECKER, * FILE 014
FORMER EDITOR OF "TECHNICAL SUPPORT", THEY ARE BEING * FILE 014
DISTRIBUTED WITH THE CBT TAPE TO FURTHER THE * FILE 014
USEFULNESS OF OTHER FILES ON THE TAPE, AND THE TAPE * FILE 014
IN GENERAL. * FILE 014
* FILE 014
CBTCNR1 - A COLUMN ON USEFUL PROGRAMS ON THE CBT * FILE 014
TAPE. INSTALLMENT 1. * FILE 014
* FILE 014
CBTCNR2 - A COLUMN ON USEFUL PROGRAMS ON THE CBT * FILE 014
TAPE. INSTALLMENT 2. * FILE 014
* FILE 014
CBTINTRO - AN INTRODUCTION TO THE CBT TAPE IN * FILE 014
GENERAL. THE ARTICLE SHOWS HOW THE * FILE 014
CBT TAPE CAN IMPROVE YOUR INSTALLATION * FILE 014
GREATLY BY PROVIDING POWERFUL TOOLS. * FILE 014
THIS IS MEANT AS AN INTRODUCTION ONLY, * FILE 014
AND SUGGESTS A FEW OF THE TOOLS WHICH * FILE 014
THE AUTHOR HAS FOUND USEFUL IN HIS * FILE 014
WORK. * FILE 014
* FILE 014
IOCOUNT - DESCRIPTION OF THE AMAZING IO-COUNT ZAP * FILE 014
TO THE OPERATING SYSTEM, WHICH * FILE 014
PROVIDES EXCP-COUNT INFORMATION IN JCL * FILE 014
LISTINGS, FOR ALL ALLOCATED DDNAMES. * FILE 014
THE MODIFICATION IS FOUND ON FILE 369 * FILE 014
OF THE CBT TAPE. THIS IS A DETAILED * FILE 014
DESCRIPTION OF HOW TO INSTALL IT. * FILE 014
* FILE 014
JESART - THIS IS A DESCRIPTION OF HOW TO CONVERT * FILE 014
FROM JES2 VERSION 1.3.4 TO THE HIGHER * FILE 014
RELEASES OF JES2. * FILE 014
* FILE 014
SMPART - I BELIEVE THIS MATERIAL IS FOUND NOWHERE * FILE 014
ELSE IN THIS FORM. THIS ARTICLE IS * FILE 014
MEANT TO INTRODUCE NEW AND OLD SYSTEMS * FILE 014
PROGRAMMERS TO THE CONCEPTS OF SMP. * FILE 014
IT CAN BE USED AS A "HOW-TO-DO-IT" * FILE 014
INTRODUCTION TO ANY LEVEL OF SMP. IT * FILE 014
IS CLEAR, CONCEPTUAL, AND COMPLETELY * FILE 014
STEP-BY-STEP. IT COVERS CONCEPTS OF * FILE 014
ALL RELEASES OF SMP, BOTH SMP4 AND * FILE 014
SMP/E. THE ARTICLE WAS TESTED BY * FILE 014
BEING GIVEN TO NON-SYSTEMS-PROGRAMMERS * FILE 014
TO READ, AND IS MEANT FOR ANYONE WHO * FILE 014
HAS ANYTHING TO DO WITH MVS SYSTEM * FILE 014
MAINTENANCE. THIS MEANS NON-TECHNICAL * FILE 014
MANAGERS AS WELL AS TECHNICAL PEOPLE. * FILE 014
* FILE 014
A SERIES OF THREE ARTICLES HAS BEEN WRITTEN AS * FILE 014
A COURSE TO TEACH THE SUBCOMMANDS OF THE FANTASTIC * FILE 014
"PDS" PROGRAM THAT CAN BE FOUND ON FILE 182 OF THE * FILE 014
CBT TAPE (WITH UTILITIES ON FILE 296). THESE * FILE 014
ARTICLES ARE NOW DISTRIBUTED WITH THE PDS PACKAGE ON * FILE 014
FILE 182, AND WILL NOT BE REPEATED HERE. * FILE 014
* FILE 014
IS FROM WARNER BROTHERS INC OF BURBANK, CA AND * FILE 015
CONTAINS SEVERAL OF THEIR UTILTIES. THIS FILE IS * FILE 015
IN IEBUPDTE SYSIN FORMAT. * FILE 015
* FILE 015
TABLES AND JOBS NECESSARY TO GET SMF TYPE 32 TSO * FILE 015
COMMAND ACCOUNTING RECORDS RUNNING. USEFUL TO SEE * FILE 015
WHAT RESOURCES OEM TSO PRODUCTS USE. * FILE 015
* FILE 015
A FEW PDF EDIT MACROS AND HELP MEMBERS. A PDF * FILE 015
FRONT END FOR DYNASOFT'S TSO WORD PROCESSOR AND * FILE 015
SPREADSHEET. A PRIMARY PDF PANEL THAT CAN SCROLL * FILE 015
IN ALL FOUR DIRECTIONS TO ALLOW DISPLAY OF LOTS OF * FILE 015
PDF OPTIONS. * FILE 015
* FILE 015
A COUPLE OF ACF2 ASM ROUTINES TO DO RESOURCE * FILE 015
VALIDATION AND INQUIRY FUNCTIONS. * FILE 015
* FILE 015
VERSION OF CLIP THAT WORKS WITH DSF REL9 AND XA OR * FILE 015
370. * FILE 015
* FILE 015
TWO JES EXITS. ONE PROVIDES A MASKABLE VERSION OF * FILE 015
$D'NAME***. WAS A SOURCE MOD TO HASPCOMM * FILE 015
RE-WRIITEN AS AN EXIT. EXIT FOUR ALLOWS FOR CODING * FILE 015
DSN= ON SETUP CARDS. EXIT CONVERTS DSN NAMES TO * FILE 015
VOLSER'S SO USER DOES NOT HAVE TO LOOK THEM UP. * FILE 015
SOME LOCAL CODE IN THIS BUT WOULD BE EASY TO DROP * FILE 015
OR CHANGE. * FILE 015
* FILE 015
MVS/XA MOD TO INSTALL CUSTOM CONSOLE PFK DEFINITIONS. * FILE 015
ONE SAMPLE DEFINITION INCLUDED. THIS ALLOWS FOR * FILE 015
SIMPLE RE-DEFINES AFTER GENS OR MAINTENANCE. WE * FILE 015
HAVE TEN CONSOLES SO THIS HELPS. * FILE 015
* FILE 015
MVS/XA MOD TO ALLOW RESTART OF JOBS THAT USE GDG'S * FILE 015
AND REFER TO THEM AS +1 IN LATER STEPS. WITHOUT * FILE 015
THIS MOD JOBS RESTARTED WOULD HAVE TO HAVE ALL * FILE 015
REFERENCES TO +1 CHANGED TO 0. THIS IS AN ERROR * FILE 015
PRONE AND TIME CONSUMING TASK. TESTED AND RUNNING * FILE 015
UNDER XA 2.1.7 DFP 2.2.3. THIS IS A VERY STABLE * FILE 015
MOD. HAS NOT CHANGE SIZE OR LOCATION IN YEARS. * FILE 015
LAST CHANGE WAS A "DISPLACEMEMNT" CHANGE WHEN SIZE * FILE 015
OF MODULE WAS CHANGED. * FILE 015
* FILE 015
MEMBER DESCRIPTION * FILE 015
$JCL JCL USED TO CREATE THIS FILE. * FILE 015
$DSCLAIM STANDARD CYA DISCLAIMER * FILE 015
$README THIS STUFF * FILE 015
#RESTORE HELP FOR RESTORE EDIT MACRO. * FILE 015
#TRAP HELP FOR TRAP EDIT MACRO. * FILE 015
#VPS HELP FOR VPS EDIT MACRO. * FILE 015
ACF2INQ ASM SUBROUTINE TO RETURN ACF2 UID * FILE 015
STRING TO A REQUESTING CICS * FILE 015
TRANSACTION. * FILE 015
ACF2VALD ASM PGM THAT DOES A RESOURCE * FILE 015
VALIDATION FROM BATCH OR TSO. CAN * FILE 015
BE USED TO CONTROL POWERFUL TSO CP'S * FILE 015
LIKE SPY, QUEUE, ETC. OR TO CONTROL * FILE 015
BATCH ACCESS TO CRITICAL RESOURCES. * FILE 015
ASKUID ASM SUBROUTINE TO RETURN ACF2 UID * FILE 015
STRING TO AS A PDF DIALOG VARIABLE. * FILE 015
CLIP ASM PGM RUNS AS A STARTED TASK. * FILE 015
USED TO RELABEL OR INSPECT DASD FROM * FILE 015
A CONSOLE. RUNS OK WITH DSF REL9. * FILE 015
DYN#C1 PDF CLIST TO INVOKE DYNASOFT PRODUCT * FILE 015
DYN#P1 PRIMARY DYNAPLAN PANEL * FILE 015
DYN#T1 FIRST PANEL OF PROPOSED TUTORIAL * FILE 015
SERIES, WOULD ALSO BE A SELECTABLE * FILE 015
OPTION OF DYN#P1. * FILE 015
DYNASEND JCL USED TO CREATE THIS FILE * FILE 015
DYNM00 PDF MESSAGE MEMBER * FILE 015
GDGMOD VERY USEFUL MOD TO SIMPLIFY * FILE 015
RESTARTING JOBS THAT USE GDG'S. * FILE 015
IEEMB846 SOURCE FOR TSO ACCOUNTING TABLE. * FILE 015
IEEPK860 SAMPLE INPUT TO CONSOLE PFK MOD. * FILE 015
ISPTCM SOURCE FOR ISPF ACCOUNTING TABLE * FILE 015
ISR*PRIM SAMPLE PRIMARY PANEL USED TO INVOKE * FILE 015
OPTION "DYNA". KIND OF NEAT AS IT'S * FILE 015
SCROLLABLE IN FOUR DIRECTIONS. * FILE 015
JCLJES4 JCL TO ASM + LINK JES EXIT 4 * FILE 015
JCLJES5 JCL TO ASM + LINK JES EXIT 5 * FILE 015
JESXIT5D ADD $D'JOB**** COMMAND TO JES2. * FILE 015
JES2XIT4 MOD TO ALL DSN= ON SETUP CARDS IN JES * FILE 015
MAKES IT MUCH EASIER TO PULL TAPES * FILE 015
FOR PRODUCTION JOBS. HAS SOME SITE * FILE 015
DEPENDENT CODE IN IT. * FILE 015
PRIMDOWN SAMPLE PRIM DOWN PANEL * FILE 015
PRIMLEFT SAMPLE PRIM LEFT PANEL * FILE 015
PRIMRGHT SAMPLE PRIM RGHT PANEL * FILE 015
PRIMUP SAMPLE PRIM UP PANEL * FILE 015
RESTORE EDIT MACRO. RELOADS LAST SAVED COPY * FILE 015
OF CURRENT MEMBER. FASTER THAN DOING * FILE 015
A CANCEL AND SELECTING MEMBER OVER * FILE 015
AGAIN. * FILE 015
SMFPRM00 SAMPLE SMF PARMS. NOTE ATE DETAIL * FILE 015
MUST BE CODED FOR TCB, IO, ECT. TO * FILE 015
BE RECORDED IN SMF32. * FILE 015
SMF32SAS SAS PGM TO ANALYSIS SMF32 RECORDS. * FILE 015
SMPEIEE SAMPLE SMPEJCL TO INSTALL IEEMB846 * FILE 015
SMPEPFK SAMPLE SMPEJCL TO INSTALL CONSOLE * FILE 015
PFK MOD. * FILE 015
SMPETCM SAMPLE SMPEJCL TO INSTALL ISPTCM * FILE 015
SWTSO SOURCE CODE TO SMF FRONT END PGM. * FILE 015
THIS IS A GENERAL PURPOSE PGM WHICH * FILE 015
SETS UP THE SMF32 ENVIRONMENT. * FILE 015
BECAUSE OF INTERNAL WB STANDARDS A * FILE 015
LMODLIB DD STATEMENT IS REQUIRED. * FILE 015
THE CODE COULD VERY EASILY BE ADDED * FILE 015
TO DYNAPLAN OR THE FRONTEND PGM * FILE 015
SUPPLIED AS A USER OPTION. THE SVC * FILE 015
STARTS AND STOPS SMF32 ACCOUNTING. * FILE 015
TRAP EDIT MACRO. WILL TRAP THE OUTPUT OF * FILE 015
A TSO CP AND PLACE IT AT THE BOTTOM * FILE 015
OF THE CURRENT EDIT DATASET. GOOD * FILE 015
EXAMPLE OF SOME OF THE NEAT THINGS * FILE 015
YOU CAN DO UNDER TSO/E. WILL ONLY * FILE 015
WORK WITH TSO CP'S THAT USE PUTLINE. * FILE 015
WILL NOT WORK WITH FULLSCREEN * FILE 015
TPUT'S. * FILE 015
VPS EDIT MACRO. QUICK WAY TO GET A * FILE 015
VPSPRINT OF CURRENT EDIT DATA. NOTE: * FILE 015
DOES A SAVE FIRST. THIS TECHNIQUE * FILE 015
COULD BE USED FOR ANY TSOCP OR * FILE 015
UTILITY. * FILE 015
* FILE 015
IS FROM SCOTT AND WHITE HOSPITAL IN TEMPLE, TEXAS * FILE 016
AND CONTAINS SOME OF THEIR UTILITIES. SEE THE * FILE 016
MEMBER CALLED $$$$$DOC FOR ADDITIONAL INFORMATION. * FILE 016
* FILE 016
SWHJ2006 CONVERT UNIT=TAPE TO UNIT=3480 ON THE * FILE 016
FLY (JES2 EXIT 6) * FILE 016
* FILE 016
SWHUSER CHEAP WAY TO CONTROL SDSF COMMANDS FOR * FILE 016
OPERATORS AND THE LIKE. (SAMPLE SDSF * FILE 016
USER EXIT) * FILE 016
* FILE 016
PDFXIT15 WE HAVE ISPF/PDF V2R3M0, AND WE NOW * FILE 016
HAVE FORMAL EXITS. WE USE EXIT 15 TO * FILE 016
CONTROL THE PRIMARY PANEL A USER GETS, * FILE 016
WHICH ALLOWED US TO CUT FROM 20 TO 3 * FILE 016
THE NUMBER OF TSO LOGON PROCS WE USE. * FILE 016
* FILE 016
*=AT SIGN BLOCK LETTER MACRO USED IN ABOVE * FILE 016
MODULES. * FILE 016
* FILE 016
IS A COPY OF THE TSO CP CALLED LISTDD FROM FIREMAN'S * FILE 017
FUND OF CALIFORNIA. THIS CP WILL LIST ALLOCATION * FILE 017
INFORMATION SORTED BY DDNAME. SEE THE CODE FOR * FILE 017
ADDITIONAL INFORMATION * FILE 017
* FILE 017
IS THE DOCUMENTATION FROM CONRAIL FOR THEIR PROGRAM * FILE 018
CALLED TSUPDATE WHICH IS CONTAINED IN LOAD MODULE * FILE 018
FORM IN FILE 035 OF THIS TAPE. THIS IS A PROGRAM * FILE 018
WHICH IS A VERY FLEXIBLE, DYNAMIC MASS CHANGE PDS * FILE 018
TO MANIPULATE PDS'S. UNFORTUNATELY THERE IS NO * FILE 018
SOURCE AVAILABLE. YOU WILL FIND IF YOU EXECUTE THE * FILE 018
CODE THAT IT IS A PROPRIETARY PROGRAM FROM CONRAIL * FILE 018
BUT THEY HAVE GIVEN PERMISSION THAT IT BE PUT * FILE 018
ON THIS TAPE. THIS FILE IS 133 X 32718 FBA. * FILE 018
* FILE 018
IS FROM JOHN HOOPER OF FOOD LION INCORPORATED IN * FILE 019
SALISBURY, NORTH CAROLINA. THIS FILE CONTAINS A * FILE 019
COLLECTION OF THEIR UTILITIES. * FILE 019
* FILE 019
email: jvh@interpath.com * FILE 019
* FILE 019
FOOD LION UTILITIES * FILE 019
* FILE 019
THIS DATASET CONTAINS SEVERAL UTILITY PROGRAMS WHICH * FILE 019
MAY BE OF GENERAL INTEREST TO OTHER INSTALLATIONS. THEY * FILE 019
ARE, OF COURSE, AVAILABLE ON AN AS-IS CONDITION WITH * FILE 019
THE USUAL DISCLAIMER. THEY ALL WORK IN OUR CURRENT * FILE 019
OS/390 1.2 AND DFSMS 1.3 ENVIRONMENT. THEY SHOULD ALL * FILE 019
WORK ON ANY LEVEL OF ESA SYSTEM. SOME MAY NOT WORK ON * FILE 019
XA OR EARLIER SYSTEMS. * FILE 019
* FILE 019
EACH UTILITY PROGRAM HAS AN ASSOCIATED MEMBER OF A * FILE 019
SIMILAR NAME STARTING WITH A '$' TO PROVIDE * FILE 019
DOCUMENTATION FOR THAT UTILITY. THERE ARE ALSO MEMBERS * FILE 019
STARTING WITH A '@' WHICH ARE EXAMPLES OF WAYS TO * FILE 019
EXECUTE THOSE UTILITIES. READ THE DOCUMENTATION * FILE 019
CAREFULLY TO DETERMINE THE UTILITY'S APPLICABILITY TO * FILE 019
YOUR ENVIRONMENT. * FILE 019
* FILE 019
GOOD LUCK! * FILE 019
* FILE 019
1) BLKSCAN * FILE 019
* FILE 019
THIS PROGRAM WILL SEARCH EACH INDIVIDUAL MEMBER OF A * FILE 019
PARTITIONED DATA SET CONTAINING JCL FOR SPECIFIED * FILE 019
BLOCK SIZES. IF ONE IS FOUND, THE JOBNAME, STEPNAME, * FILE 019
PROGRAM NAME, DDNAME AND BLOCKSIZE WILL BE LISTED. * FILE 019
IT DOES NOT HANDLE CATALOGED PROCEDURES OR INCLUDE * FILE 019
STATEMENTS. THE REPORT CAN BE USED TO DETECT * FILE 019
IMPROPERLY SPECIFIED BLOCK SIZES. OUR LOCAL STANDARD * FILE 019
IS TO ALLOW THE SYSTEM TO SET THE BLOCKSIZE OF THE * FILE 019
OUTPUT DATASET USING THE SYSTEM DETERMINED BLOCKSIZE * FILE 019
FACILITY OF DFP VERSION 3. THIS REPORT ALLOWS US TO * FILE 019
SEE BOTH THE POORLY SPECIFIED BLOCKSIZES AS WELL AS * FILE 019
THOSE JOBS WHICH NEED CHANGING TO ALLOW THE SYSTEM TO * FILE 019
SET THE APPROPRIATE BLOCKSIZE. * FILE 019
* FILE 019
2) CHECKPVT * FILE 019
* FILE 019
THIS PROGRAM IS DESIGNED TO RUN IMMEDIATELY AFTER AN * FILE 019
IPL TO CHECK THE SIZE OF THE PRIVATE AREA BELOW THE * FILE 019
16 MEG LINE. SOFTWARE MAINTENANCE OR IMPLEMENTATION * FILE 019
OF NEW PRODUCTS MAY SHIFT THE PRIVATE AREA SIZE DOWN * FILE 019
AN EXTRA MEG IN ESA. THE PARM VALUE ENTERED * FILE 019
SPECIFIES THE MINIMUM SIZE OF THE PRIVATE AREA IN 'K' * FILE 019
UNITS THAT IS EXPECTED. IF THE AREA IS SMALLER THAN * FILE 019
THIS VALUE, A NON-ROLL DELETABLE MESSAGE WILL BE * FILE 019
WRITTEN TO THE SYSTEM CONSOLE. * FILE 019
* FILE 019
3) COMMAND * FILE 019
* FILE 019
THIS PROGRAM WILL EXECUTE MVS OR JES2 COMMANDS WITHIN * FILE 019
A BATCH JOB OR STARTED TASK. THE COMMAND(S) CAN BE * FILE 019
REQUESTED FROM THE PARM PARAMETER ON THE EXECUTE CARD * FILE 019
OR FROM AN OPTIONAL PARAMETER FILE DEFINED BY THE * FILE 019
DDNAME IEFRDER OR BOTH THE PARM AND THE FILE. IF * FILE 019
COMMANDS ARE ENTERED ON BOTH THE PARM AND THE OPTIONAL * FILE 019
IEFRDER FILE, THE COMMANDS IN THE PARM ARE EXECUTED * FILE 019
FIRST. BECAUSE MOST MVS AND JES2 COMMANDS MAY BE * FILE 019
EXECUTED BY THIS PROGRAM, IT SHOULD BE PROTECTED BY * FILE 019
YOUR SECURITY SYSTEM FROM UNAUTHORIZED USE. * FILE 019
* FILE 019
MOST INSTALLATIONS HAVE A SIMILAR PROGRAM TO THIS OR * FILE 019
HAVE AN AUTOMATED OPERATIONS SOFTWARE PRODUCT TO DO * FILE 019
THE SAME THING. WHAT MAKES THIS BATCH PROGRAM * FILE 019
DIFFERENT FROM MOST IN-HOUSE PROGRAMS IS TWO INTERNAL * FILE 019
COMMANDS: * FILE 019
* FILE 019
DELAY=NNN WHERE NNN IS THE NUMBER OF SECONDS TO WAIT * FILE 019
* FILE 019
THIS WILL CAUSE THE PROGRAM TO WAIT THE SPECIFIED * FILE 019
NUMBER OF SECONDS BEFORE ISSUING THE NEXT COMMAND. * FILE 019
THIS MAY GIVE TIME FOR THE PREVIOUS COMMAND TO BE * FILE 019
COMPLETED. * FILE 019
* FILE 019
REPLY JOBNAME 'MESSAGE TEXT' 'REPLY TEXT' * FILE 019
* FILE 019
THIS ALLOWS THE PROGRAM TO REPLY TO AN OUTSTANDING * FILE 019
MESSAGE FOR A SPECIFIC JOB OR TASK WITHOUT KNOWING * FILE 019
THE REPLY NUMBER. * FILE 019
* FILE 019
BY USING A COMBINATION OF WAIT, REPLY, AND NORMAL MVS * FILE 019
AND JES2 COMMANDS, WE ARE ABLE TO BRING DOWN OUR * FILE 019
SYSTEM FOR IPL INCLUDING STOPPING ALL OF OUR STARTED * FILE 019
TASKS (OTHER THAN JES2) AND ONLINE SYSTEMS IN A SMALL * FILE 019
FRACTION OF THE TIME THAT IT USED TO TAKE. * FILE 019
* FILE 019
4) FLCACHE * FILE 019
* FILE 019
THIS PROGRAM IS DESIGNED TO ALLOW THE OPERATOR TO * FILE 019
DISPLAY OR MODIFY THE 3990-3 CACHE SUBSYSTEM FROM THE * FILE 019
MVS OPERATOR'S CONSOLE. THE ONLY PROVIDED MEANS OF * FILE 019
CONTROL FOR THE CACHE SUBSYSTEM IS EXECUTING THE IBM * FILE 019
IDCAMS UTILITY AS A BATCH JOB AND THEN LOOKING AT THE * FILE 019
OUTPUT TO DETERMINE THE RESULTS OR USING THE ISMF * FILE 019
FACILITIES UNDER ISPF TO MAKE CHANGES. THIS FLCACHE * FILE 019
PROGRAM WILL ACCEPT 'SIMPLE' COMMANDS FROM THE * FILE 019
CONSOLE AND GENERATE THE APPROPRIATE IDCAMS STATEMENT * FILE 019
AND CALL IDCAMS INTERACTIVELY TO ACTUALLY PERFORM THE * FILE 019
FUNCTION. ALL MESSAGES FROM IDCAMS WILL BE DISPLAYED * FILE 019
ON THE OPERATOR'S CONSOLE. * FILE 019
* FILE 019
WHEN ANY DEVICE ON THE 3990 CACHE SUBSYSTEM MUST BE * FILE 019
ALTERED FROM THE CONSOLE, IT IS OFTEN BECAUSE OF A * FILE 019
HARDWARE PROBLEM WHEN PROMPT ACTION MUST BE TAKEN. * FILE 019
THE IBM PUBLICATION WHICH DESCRIBES THESE SPECIAL * FILE 019
COMMANDS IS NOT ALWAYS EASY TO LOCATE OR UNDERSTAND. * FILE 019
HOPEFULLY, THIS PROGRAM WILL MAKE THESE FUNCTIONS * FILE 019
EASY TO PERFORM WHEN REQUIRED. AS ALWAYS, TECHNICAL * FILE 019
SUPPORT SHOULD BE INVOLVED ANY TIME THIS FACILITY IS * FILE 019
USED TO ALTER THE STATUS OF THE SUBSYSTEM. * FILE 019
* FILE 019
5) FLSMFCAT * FILE 019
* FILE 019
THIS UTILITY IS INTENDED TO SHOW ICF CATALOG ACTIVITY * FILE 019
AT A DATASET LEVEL. IT IS DESIGNED PRIMARILY TO * FILE 019
TRACK DOWN THE JOB OR USER THAT ALLOCATED, DELETED, * FILE 019
OR RENAMED A SPECIFIC DATASET. SINCE THIS ACTIVITY * FILE 019
MAY HAVE BEEN OPENED AT THAT TIME, ONLY THE CATALOG * FILE 019
ACTIVITY SMF RECORD HAS THE INFORMATION. * FILE 019
* FILE 019
6) FLSMFDSN * FILE 019
* FILE 019
THIS UTILITY IS INTENDED TO LIST VSAM AND NONVSAM * FILE 019
DATASET ACTIVITY FOR ALL BATCH JOBS, STARTED TASKS, * FILE 019
AND TSO USERS ON THE MVS SYSTEM. THIS PROGRAM CAN * FILE 019
DISPLAY DATASETS WITH SMALL BLOCK SIZES OR DATASETS * FILE 019
WITH THE HIGH I/O ACTIVITY TO PINPOINT AREAS NEEDING * FILE 019
CLOSER EXAMINATION. IT PROVIDES A FLEXIBLE SELECTION * FILE 019
AND SORT MECHANISM TO TAILOR THE REPORT. PROGRAM * FILE 019
PERFORMANCE CAN BE SERIOUSLY HAMPERED BY HAVING TOO * FILE 019
SMALL OF A BLOCKSIZE ON INPUT OR OUTPUT FILES. EVEN * FILE 019
USING THE SYSTEM DETERMINED BLOCKSIZE FACILITY OF DFP * FILE 019
RELEASE 3 MAY NOT ALWAYS GIVE THE DESIRED RESULTS * FILE 019
SINCE SOME PROGRAM PRODUCTS MAY OVERRIDE THAT VALUE. * FILE 019
THE REPORTS FROM THIS UTILITY HAVE ALLOWED US TO * FILE 019
SIGNIFICANTLY REDUCE THE RUN TIME OF SOME OF OUR * FILE 019
CRITICAL BATCH JOBS BY JUST CORRECTING THE BLOCKSIZE * FILE 019
SPECIFICATIONS. ALL OF THE STANDARDS IN THE WORLD * FILE 019
ARE NOT WORTH ANYTHING IF YOU DON'T ENFORCE THEIR * FILE 019
USE. * FILE 019
* FILE 019
7) FLSMFJOB * FILE 019
* FILE 019
THIS UTILITY IS INTENDED TO LIST JOB ACTIVITY AT THE * FILE 019
STEP OR JOB LEVEL FOR ALL BATCH JOBS, STARTED TASKS, * FILE 019
AND TSO USERS ON THE MVS SYSTEM. IT PROVIDES A * FILE 019
FLEXIBLE SELECTION AND SORT MECHANISM TO TAILOR THE * FILE 019
REPORT. THE REPORTS FROM THIS PROGRAM ALLOWED US TO * FILE 019
DETERMINE OUR BIGGEST USERS OF SYSTEM RESOURCES SO * FILE 019
THAT THE PROGRAMS COULD BE EXAMINED FOR WAYS TO * FILE 019
OPTIMIZE THEIR CODE. WE WERE ABLE TO CUT MANY HOURS * FILE 019
A WEEK OF CPU TIME BY CLOSELY EXAMINING ONLY A FEW * FILE 019
PROGRAMS FOR INEFFICIENT CODING TECHNIQUES. THIS HAS * FILE 019
ALLOWED US TO DELAY A PREVIOUSLY NEEDED PROCESSOR * FILE 019
UPGRADE. * FILE 019
* FILE 019
8) FLSMFSRT * FILE 019
* FILE 019
THIS UTILITY IS INTENDED TO LIST SORT ACTIVITY BASED * FILE 019
UPON SMF RECORDS GENERATED BY THE SYNCSORT PRODUCT. * FILE 019
IT PROVIDES A FLEXIBLE SELECTION AND SORT MECHANISM * FILE 019
TO TAILOR THE REPORT. THE REPORTS FROM THIS PROGRAM * FILE 019
ALLOWS US TO MONITOR OUR LARGER SORTS SINCE DYNAMIC * FILE 019
ALLOCATION OF SORTWORK DATASETS MASKS THE LARGER * FILE 019
SORTS. * FILE 019
* FILE 019
9) FLVOLLST * FILE 019
* FILE 019
THIS PROGRAM IS DESIGNED TO PRINT A REPORT LISTING ALL * FILE 019
OF THE DATASETS ON A VOLUME BASED UPON INFORMATION * FILE 019
FROM THE SYSTEM CATALOGS. THIS LIST COULD BE CRITICAL * FILE 019
IN CASE OF A DASD FAILURE WHICH DESTROYS THE VTOC ON * FILE 019
THE VOLUME. WITH VOLUME POOLING NOW AVAILABLE THROUGH * FILE 019
THE USE OF DF/SMS AND OTHER PROGRAM PRODUCTS, IT IS * FILE 019
NOT ALWAYS EASY TO DETERMINE THE DATASETS WHICH ARE ON * FILE 019
A SPECIFIC VOLUME. * FILE 019
* FILE 019
THE INPUT TO THIS PROGRAM MUST BE THE OUTPUT FROM AN * FILE 019
IDCAMS LISTCAT COMMAND. IT IS EXPECTED THAT AN * FILE 019
IDCAMS 'LISTCAT VOL CAT(USER.CATALOG.NAME)' COMMAND * FILE 019
WILL BE EXECUTED FOR EACH CATALOG IN THE SYSTEM. THE * FILE 019
CONTENTS OF THESE REPORTS CAN THEN BE PASSED TO THIS * FILE 019
UTILITY PROGRAM TO PRODUCE THE REPORT BY VOLUME AND * FILE 019
DATASET NAME. * FILE 019
* FILE 019
10) MODLOOK * FILE 019
* FILE 019
THIS PROGRAM IS DESIGNED TO RUN AS A TSO COMMAND, * FILE 019
STARTED TASK OR A BATCH JOB TO LOOK UP THE SELECTED * FILE 019
MODULE(S) IN THE SYSTEM LINK LIST OR LINK PACK AREA. * FILE 019
IF THE MODULE IS IN THE LINK LIST, THE LINK LIST * FILE 019
LIBRARY NAME WILL BE DISPLAYED. IF THE MODULE IS IN * FILE 019
THE LINK PACK AREA, ITS ADDRESS WILL BE DISPLAYED * FILE 019
ALONG WITH THE NAME OF THE RESIDENT AREA IN WHICH IT * FILE 019
IS LOCATED SUCH AS PLPA, FLPA, ECSA, ETC. THE FIRST * FILE 019
PART OF EACH MODULE IS DISPLAYED ALSO SINCE IT CAN * FILE 019
CONTAIN DATE, TIME, OR COPYRIGHT INFORMATION WHICH * FILE 019
MAY BE OF INTEREST. * FILE 019
* FILE 019
WITH MANY LIBRARIES NOW IN THE SYSTEM LINK LIST, IT * FILE 019
MAY NOT ALWAYS BE APPARENT WHICH DATASET CONTAINS * FILE 019
WHICH PROGRAM OR EVEN MORE IMPORTANTLY, IT MAY BE * FILE 019
DIFFICULT TO DETERMINE WHICH LIBRARY CONTAINS A * FILE 019
MODULE IF DUPLICATE MODULE NAMES EXIST. * FILE 019
* FILE 019
11) SMAP * FILE 019
* FILE 019
THIS PROGRAM IS DESIGNED TO PRINT THE STARTING * FILE 019
ADDRESS, ENDING ADDRESS, AND SIZE OF EACH OF THE * FILE 019
MAIN STORAGE AREAS IN THE MVS SYSTEM. THIS * FILE 019
INFORMATION CAN BE DISPLAYED USING MOST OF THE * FILE 019
POPULAR MONITORS CURRENTLY AVAILABLE, BUT NOT * FILE 019
EVERYONE HAS ONE, PLUS THIS PROGRAM CAN RUN AS A * FILE 019
BATCH JOB PRODUCING A HARDCOPY REPORT. * FILE 019
* FILE 019
12) JES$LF * FILE 019
* FILE 019
THIS JES2 EXIT PROGRAM IS DESIGNED TO PROCESS THE * FILE 019
$LF COMMAND WHEN ENTERED. IT WILL GIVE DETAILED * FILE 019
INFORMATION AT THE OUTPUT GROUP LEVEL FOR JOBS * FILE 019
AWAITING PRINT. IT IS, IN EFFECT, A DETAILED * FILE 019
VERSION OF THE $DF COMMAND. * FILE 019
* FILE 019
DISCLAIMER * FILE 019
* FILE 019
THE AUTHORS INCLUDING FOOD LION, ITS OFFICERS, * FILE 019
DIRECTORS, AND EMPLOYEES MAKE NO REPRESENTATION OR * FILE 019
WARRANTY OF ANY KIND WHATSOEVER, INCLUDING, BUT NOT * FILE 019
LIMITED TO, REPRESENTATIONS OR WARRANTIES, EXPRESS OR * FILE 019
IMPLIED, OR MERCHANTABILITY, FITNESS FOR USE OR * FILE 019
PURPOSE, ACCURACY OR COMPLETENESS OF PROCESSES, * FILE 019
PROCEDURES, DESIGNS, DEFINITIONS, INSTRUCTIONS, * FILE 019
INFORMATION, OR FUNCTIONING OF ANY PROGRAMS, DOCUMENTS, * FILE 019
OR RELATED MATERIALS; THE AUTHORS FURTHER EXPRESSLY * FILE 019
DISCLAIM ANY KNOWLEDGE OF PURPOSE FOR WHICH THESE * FILE 019
PROGRAMS, DOCUMENTS, OR RELATED MATERIAL MAY BE * FILE 019
UTILIZED OR THEIR APPLICABILITY FOR SUCH USE, NOR SHALL * FILE 019
THE FACT OF MAKING THEM AVAILABLE CONSTITUTE ANY SUCH * FILE 019
REPRESENTATION, WARRANTY, OR KNOWLEDGE; NOR DO THE * FILE 019
AUTHORS ASSUME ANY LIABILITY, RESPONSIBILITY, OR * FILE 019
OBLIGATION ARISING FROM THE USE OR MALFUNCTIONING OF OF * FILE 019
THESE COMPUTER PROGRAMS, DOCUMENTATION, OR RELATED * FILE 019
MATERIALS. * FILE 019
* FILE 019
IS A COLLECTION OF VERY HANDY TSO/E REXX EXECS * FILE 020
THAT WAS CONTRIBUTED ANONYMOUSLY. THESE REXX * FILE 020
EXECS DO VARIOUS FUNCTIONS, FROM SIMPLE TO HIGHLY * FILE 020
SOPHISTICATED ONES. THIS FILE IS WORTH A GOOD * FILE 020
LOOK IF YOU HAVE TSO/E REXX OR WANT TO LEARN MORE * FILE 020
ABOUT WHAT REXX CAN DO FOR YOU. * FILE 020
* FILE 020
IS FROM BELL AND HOWELL AND COMPANY OF EVANSTON, * FILE 021
ILLINOIS, AND CONTAINS A COPY OF SOME OF THEIR * FILE 021
UTILITIES. THIS FILE IS IN IEBUPDTE SYSIN FORMAT, * FILE 021
SEE THE MEMBER CALLED $$DOC FOR ADDITIONAL * FILE 021
INFORMATION * FILE 021
* FILE 021
SOURCE FUNCTION * FILE 021
* FILE 021
IBHDRPLY AUTOMATIC REPLY PROGRAM * FILE 021
IBHWTORG GET REPLIES * FILE 021
ENTER IBHDRPLY MACRO * FILE 021
LEAVE IBHDRPLY MACRO * FILE 021
OCX EXECUTE OPERATOR COMMANDS * FILE 021
$EPILOG OCX MACRO * FILE 021
$PROLOG OCX MACRO * FILE 021
$REG OCX MACRO * FILE 021
$STCK OCX MACRO * FILE 021
IBHLSPAC LIST DASD VOLUME SPACE * FILE 021
INFORMATION * FILE 021
IBHJ2001 JES2 EXIT(1.3.4/1.3.6) * FILE 021
CONTROL XEROX 2700 PRINTER * FILE 021
IBHJ2005 $DP COMMAND TO LIST JOES, * FILE 021
AND ENHANCED $DA COMMAND. * FILE 021
IBHJ2015 JES2 EXIT(1.3.4/1.3.6) * FILE 021
INITIAL FONT CONTROL ON * FILE 021
XEROX 9700 * FILE 021
PRINTER SUBSYSTEM. * FILE 021
IBHJESPM SAMPLE JES2 PARMS FOR THE * FILE 021
JES2 EXIT SUPPLIED * FILE 021
SUPPLIED IN THIS PDS. * FILE 021
(JES2 1.3.4 / 1.3.6) * FILE 021
* FILE 021
IS FROM MR MARK HEDGES, FORMERLY OF ADRIA * FILE 022
LABORATORIES IN DUBLIN OHIO. THIS FILE CONTAINS * FILE 022
SEVERAL OF THEIR UTILITIES. THIS FILE IS IN * FILE 022
IEBUPDTE SYSIN FORMAT. FOR ADDITIONAL INFORMATION * FILE 022
SEE THE MEMBER CALLED $$DOC. * FILE 022
* FILE 022
MARK HEDGES IS NO LONGER AT ADRIA LABORATORIES... * FILE 022
* FILE 022
CURRENT ADDRESS: MARK HEDGES * FILE 022
11951 SENTINEL POINT COURT * FILE 022
RESTON, VA 22091 * FILE 022
CURRENT PHONE: (703) 758-8825 * FILE 022
* FILE 022
current email: mark.hedges@landmark.com * FILE 022
* FILE 022
-ASSEMBLER- * FILE 022
ADRMCLVL DETERMINES LEVEL OF DFDSS RUNNING IN * FILE 022
YOUR SYSTEM * FILE 022
CATSTRIP EXAMINE OUTPUT OF LISTCAT FOR * FILE 022
ICF-CATALOGS - USED IN CONJUNCTION WITH * FILE 022
SASCATS * FILE 022
DATERC SETS RRC BASED ON DATE-OF-WEEK * FILE 022
DI215 DISPLAY INITIATORS FOR JES 2.1.5/JES * FILE 022
2.1.7 * FILE 022
ICHRIN03 MODULE USED BY RACF IN CREATING THE * FILE 022
STARTED TASK TABLE - THIS IS A MACRO * FILE 022
WITH EXAMPLES TO CODE THIS TABLE * FILE 022
IDMSLOGS PROCESSES IDMS/R SHUTDOWN STATS * FILE 022
JOBSTAT DETERMINES IF JOB/STC/TSO IS CURRENTLY * FILE 022
RUNNING * FILE 022
MRGJNLOG MERGES IDMS/R JOURNALS AND LOGS TO * FILE 022
TAPE FILES - NICE * FILE 022
PUTCVRL PRINT COVER LETTERS FROM SEQUENTIAL PTF * FILE 022
TAPES, NOT TOO THRILLING * FILE 022
RACFPGM TO GENERATE RACF PROTECTION FOR PROGRAMS * FILE 022
- FOR ALL YOU FOLKS PRE-RACF 1.7 * FILE 022
RACFST PROGRAM TO DISPLAY RACF STATUS * FILE 022
INFORMATION: DSNS, FLAGS, STOR - NICE * FILE 022
IF YOU WANT TO KNOW WHERE ALL RACF 1.7 * FILE 022
DATASETS ARE * FILE 022
RESCUE CREATES A JOB STREAM TO CREATE A * FILE 022
ONE-PACK-SYSTEM - INCLUDES SPOOL, CKPT, * FILE 022
PAGE DATASETS, RACF TOO * FILE 022
ROUTDESC EXAMPLE OF ROUTING AND DESCRIPTOR CODES * FILE 022
FOR WTO/WTOR'S * FILE 022
SMF5 PROCESSES SMF TYPE 5 RECORDS * FILE 022
SMPLIST PROCESSES OUTPUT OF AN SMP/E 'LIST * FILE 022
FUNCTIONS' * FILE 022
SYSLOG PROCESSES MVS/XA SYSLOGS FOR SCANNING * FILE 022
AND REPORTING * FILE 022
SYSLOC USED IN CONJUNCTION WITH SYSLOG: * FILE 022
PROCESSES GDG'S * FILE 022
SYSTAT EVERYTHING AN MVS SYSTEMS PROGRAMMER * FILE 022
WANTS TO KNOW * FILE 022
- MY BEST CODE, MUST BE AT LEAST MVS/XA * FILE 022
2.1.3 * FILE 022
- GIVES IPL INFO, CONTROL BLOCK INFO * FILE 022
(ADDRESSES), MAPS STORAGE AND DRAWS * FILE 022
MAP OF VIRTUAL STORAGE, LISTS ALL APF * FILE 022
DATASETS AND ISSUES A 'LOCATE' TO * FILE 022
CHECK CATALOG STATUS. * FILE 022
- RUNS AS BATCH/TSO/STC * FILE 022
UCBSVC78 PARM INPUT THAT WRITES 1 LINER ON * FILE 022
AVAILABLE SPACE * FILE 022
UCBSCAN SCANS ALL SYSTEM UCB'S AND GIVES * FILE 022
'CHANNEL-PATHS' * FILE 022
- RUNS UNDER TSO, AS A BATCH JOB, OR * FILE 022
STC * FILE 022
- GIVES UCB INFO, ISSUES LSPACE SVC * FILE 022
- HAS CLIST. EASY TO RUN AS STC TO * FILE 022
ISSUE EVERY 8 HRS * FILE 022
UCBTYPES USED BY MEM(UCBSCAN) TO DETERMINE * FILE 022
DEVICE TYPES * FILE 022
WTONROLL PROGRAM TO ISSUE WTO'S TO CONSOLE W/O * FILE 022
ROLLING THEM * FILE 022
-SAS 5.16- * FILE 022
SASCATS READS OUTPUT OF MEM(CATSTRI#) AND SENDS * FILE 022
IT THROUGH SAS * FILE 022
- USES A 'LISTCAT ALL' AND CP 'VTOC' AS * FILE 022
INPUT TO * FILE 022
- GIVE STATS ON ALL VSAM, NONVSAM, AND * FILE 022
ICF-CATALOG INFO * FILE 022
SASDDDEF A LOGICAL LISTING OF DDDEFS FROM SMP/E * FILE 022
FOR ANY ZONE * FILE 022
SASSMP READS OUTPUT OF 'LIST FUNCTIONS' * FILE 022
COMMAND, PROCESSING FMIDS * FILE 022
SASSMP SAS, TO PROCESSES NON-APPLIED SYSMODS * FILE 022
IN ANY CSI ZONE * FILE 022
SASTMS PROCESSES OUTPUT OF 'TMSGRW' INTO SAS * FILE 022
FOR REPORTING * FILE 022
SASVTOC SAS/GRAPH TO PROCESS ALL VTOCS BY * FILE 022
DSORG, NOTING FREE SPACE * FILE 022
SMPELIST PROCESSES OUTPUT '//SMPELIST' FOR A * FILE 022
'LIST FUNCTIONS' * FILE 022
TMSMACRO PROCESSES OUTPUT OF TMC FROM TMCGRW PGM * FILE 022
SASSMF30 PROCESS SMF TYPE 30 * FILE 022
- CLIST - * FILE 022
CLISTSOE DISPLAYS ALL NEW FUNCTIONS UNDER TSO/E 3 * FILE 022
SYSTAT$ PROCESS SYSTAT PGM * FILE 022
UCBSCAN$ PROCESS UCBSCAN ROUTINE * FILE 022
ADRMCLVL$ PROCESS DFDSS LEVEL * FILE 022
- ISPF V2.3 PANELS - * FILE 022
SYSLOG$$ FOR SYSLOG$ CLIST * FILE 022
- ISREDIT MACROS - * FILE 022
$AMODGEN BROWSE AMODGEN * FILE 022
$ASMHCL BUILD ASSEMBLE AND LINK JCL AROUND * FILE 022
SOURCE CODE, OR FOREGROUND * FILE 022
$BROWSE BROWSE FROM EDIT SESSION * FILE 022
$COPY USE ADVANCED LMCOPY FUNCTION * FILE 022
$EXEC ISSUE THE TSO 'EXEC' COMMAND FOR * FILE 022
CURRENT CLIST ONE IS EDI * FILE 022
$GENER EXEC IEBGENER * FILE 022
$HASPSRC BROWSE 'SYS1.HASPSRC' * FILE 022
$IEHMAP MAP A VOLUME * FILE 022
$JOB PUT A JOBCARD AND DOCUMENTATION IN * FILE 022
FRONT OF JCL * FILE 022
$JUL GET TODAY'S DATE * FILE 022
$LC PERFORM LISTCAT * FILE 022
$LD PERFORM LISTD ON CURRENT DATASET * FILE 022
$LDI PERFORM LISTDSI ON CURRENT DATASET * FILE 022
$LISTLVL PERFORM LISTCAT LEVEL * FILE 022
$LM LIST ALL MEMBERS: PGM=LM * FILE 022
$LS LIST FREE SPACE: PGM=LS; PGM=CLEAR * FILE 022
$MACLIB BROWSE MACLIB * FILE 022
$PEND PUT A PEND AND EXEC AT THE END OF A * FILE 022
PROC * FILE 022
$PRINT USE PRINTOFF TO PRINT CURRENT MEMBER * FILE 022
$PROCLIB EDIT SYS1.PROCLIB * FILE 022
$RECEIVE BUILD SMP/E JCL TO RECEIVE A * FILE 022
PRODUCT/MAINT * FILE 022
$SPACE DETERMINE DISK/TAPE BLKSIZE BASED ON * FILE 022
LRECL * FILE 022
* FILE 022
IS FROM MR SCOTT C DIMOND OF NOVA IN ALBERTA * FILE 023
CANADA AND CONTAINS A COPY OF ALTJES (ALTERNATE * FILE 023
JES2 TSO LOGON). THIS FILE IS IN IEBUPDTE SYSIN * FILE 023
FORMAT. FOR ADDITIONAL INFORMATION SEE THE * FILE 023
MEMBER CALLED $$DOC. * FILE 023
* FILE 023
THIS EXIT AND MODIFICATION WILL ALLOW A TSO USER TO * FILE 023
LOGON TO AN ALTERNATE JES2 (SECONDARY JES2 RUNNING * FILE 023
UNDER A PRIMARY JES2). THE TSO LOGON PROCESS IS * FILE 023
IDENTICAL TO THE NORMAL PROCESSING PERFORMED BY A * FILE 023
PRIMARY JES2 (UNLIKE OTHER TECHNIQUES WHICH START A * FILE 023
TSO SESSION UNDER A DIFFERENT NAME ON THE SECONDARY * FILE 023
JES2 (I.E. SYSLOG)). * FILE 023
* FILE 023
THE TSO ADDRESS SPACE IS STARTED BY THE SPECIFIED * FILE 023
SECONDARY JES2 AND ALL TSO FUNCTIONS REQUESTING JES2 * FILE 023
SERVICES (SUBMIT STATUS OUTPUT CANCEL ISPF 3.8 * FILE 023
ETC.) ARE HANDLED BY THE SECONDARY JES2. JOBS * FILE 023
SUBMITTED FROM A TSO SESSION RUNNING UNDER A * FILE 023
SECONDARY JES2, WILL RUN UNDER THE SAME SECONDARY * FILE 023
JES2. * FILE 023
* FILE 023
IS A COPY OF XFERDUMP FROM MCI. THIS FILE * FILE 024
IS IN IEBUPDTE SYSIN FORMAT. FOR ADDITIONAL * FILE 024
INFORMATION SEE THE MEMBER CALLED $$DOC. * FILE 024
* FILE 024
XFERDUMP IS A SOFTWARE SYSTEM THAT ARCHIVES * FILE 024
'SYS1.DUMPXX' DATA TO TAPE FOR A SPECIFIED PERIOD * FILE 024
OF TIME, PLUS AUTOMATICALLY CLEARING THE DUMP * FILE 024
DATASETS AS WELL AS MAINTAINING AN ENTRY IN AN * FILE 024
'INDEX' DATASET OF THE DUMP TITLES WITH THEIR * FILE 024
ASSOCIATED TAPE VOLSER TO WHICH THEY WERE ARCHIVED. * FILE 024
* FILE 024
THE ORIGINAL SOFTWARE WAS WRITTEN BY HOWARD DEAN OF * FILE 024
KAISER PERMANENTE IN WALNUT CREEK, CALIFORNIA. * FILE 024
THE PRESENT SOFTWARE IN PRODUCTION AT MCI * FILE 024
TELECOMMUNICATIONS CORPORATION HAS BEEN MODIFIED * FILE 024
QUITE EXTENSIVELY, AS WELL AS HAVING THE ADDITION * FILE 024
OF OTHER DESIRABLE FEATURES TO SUCH A SYSTEM. * FILE 024
* FILE 024
IS FROM TEXAS UTILITY SERVICES AND IT CONTAINS * FILE 025
SEVERAL OF THEIR TSO COMMANDS. THIS FILE IS IN * FILE 025
IEBUPDTE SYSIN FORMAT. THIS FILE CONTAINS THE * FILE 025
FOLLOWING CODE. FOR ADDITIONAL INFORMATION SEE * FILE 025
THE MEMBER CALLED $DOC. * FILE 025
* FILE 025
KLEENUP - REXX EXEC TO GENERATE HMIGRATE COMMANDS * FILE 025
FOR ALL BUT THE CURRENT GENERATIONS OF * FILE 025
THE REQUESTED DISK DATASET. * FILE 025
* FILE 025
GETOPR - COMMAND FOR THE OPERATORS TO USE TO * FILE 025
FIND OUT THE RACF INFORMATION ASSOCIATED * FILE 025
WITH A GIVEN USERID AND DISPLAY IT ON THE * FILE 025
CONSOLE. * FILE 025
* FILE 025
SASSRCHD - SAS PROGRAM THAT READS SMF DATA AT MVS * FILE 025
3.1.3 LEVEL AND GIVES A REPORT ON WHO * FILE 025
OPENED NONVSAM DATASETS, THEIR BLOCKSIZE * FILE 025
THAT THEY WERE OPENED WITH, AND WHO * FILE 025
DELETED THEM. * FILE 025
* FILE 025
SASSRCHV - SAS PROGRAM THAT READS SMF DATA AT MVS * FILE 025
3.1.3 LEVEL AND GIVES A REPORT ON WHO * FILE 025
OPENED VSAM DATASETS AND WHO DELETED * FILE 025
THEM. * FILE 025
* FILE 025
CONS390 - CONSOLE PROGRAM MODIFIED FOR OS/390. * FILE 025
DISPLAYS CONSOLES AS A TSO COMMAND UNDER * FILE 025
ISPF OR TSO. FEATURES: * FILE 025
* FILE 025
HIGHLIGHTED MESSAGES ON CONSOLE ARE * FILE 025
HIGHLIGHTED * FILE 025
AUTOMATIC UPDATE FEATURE * FILE 025
ENTER OPERATOR COMMANDS * FILE 025
DISPLAY LAST IPL AND IF CLPA WAS DONE * FILE 025
* FILE 025
CURRENT FILE IS UPDATED FOR OS/390 RELEASE 2.4. * FILE 025
OLDER STUFF FOR ESA RELEASE 3 IS PACKAGED AS MEMBER * FILE 025
"OLDVERS". ESA 4.2.2 STUFF IS 2 MEMBERS: * FILE 025
"OLDESAVR" AND "RESTESA". * FILE 025
* FILE 025
CONESA - CONSOLE PROGRAM MODIFIED FOR ESA. * FILE 025
DISPLAYS CONSOLES AS A TSO COMMAND UNDER * FILE 025
ISPF OR TSO. FEATURES: * FILE 025
* FILE 025
HIGHLIGHTED MESSAGES ON CONSOLE ARE * FILE 025
HIGHLIGHTED * FILE 025
AUTOMATIC UPDATE FEATURE * FILE 025
ENTER OPERATOR COMMANDS * FILE 025
DISPLAY LAST IPL AND IF CLPA WAS DONE * FILE 025
* FILE 025
PRESENTLY WORKS UNDER OS/390 2.4 AND CORRESPONDING * FILE 025
DFSMS. SOME OF THE CONTROL BLOCKS THAT IT USED WERE * FILE 025
MOVED INTO THE CONSOLE ADDRESS SPACE AFTER DFP 2.2. * FILE 025
* FILE 025
* FILE 025
CONSOLE - PROGRAM TO DISPLAY CONSOLE ACTIVITY AS A * FILE 025
TSO COMMAND UNDER ISPF OR TSO. FEATURES: * FILE 025
* FILE 025
HIGHLIGHTED MESSAGES ON CONSOLE ARE * FILE 025
HIGHLIGHTED * FILE 025
AUTOMATIC UPDATE FEATURE * FILE 025
ENTER OPERATOR COMMANDS * FILE 025
DISPLAY LAST IPL AND IF CLPA WAS DONE * FILE 025
* FILE 025
PRESENTLY WORKS UNDER MVS/XA UNDER DFP * FILE 025
RELEASE 1 AND 2.1. * FILE 025
* FILE 025
MTTESA - USES CROSS MEMORY SERVICES TO READ AND * FILE 025
DISPLAY THE MASTER TRACE TABLE AS A TSO * FILE 025
COMMAND PROCESSOR. THIS IS THE XA * FILE 025
VERSION OF THE PROGRAM THAT ORIGINATED AS * FILE 025
MTT UNDER SP1.3. GOOD FOR OS/390 TOO. * FILE 025
FEATURES: * FILE 025
* FILE 025
READ/DISPLAY MASTER TRACE TABLE * FILE 025
ENTER OPERATOR COMMANDS * FILE 025
CAN USE FIND TO SEARCH THE MASTER * FILE 025
TRACE TABLE * FILE 025
F 'SEARCH ARGUMENT IN QUOTES' * FILE 025
* FILE 025
UPDATED FOR MVS/ESA 4.2.2. OLD STUFF STILL HERE. * FILE 025
* FILE 025
MTTXA - USES CROSS MEMORY SERVICES TO READ AND * FILE 025
DISPLAY THE MASTER TRACE TABLE AS A * FILE 025
TSO COMMAND PROCESSOR. THIS IS THE XA * FILE 025
VERSION OF THE PROGRAM THAT ORIGINATED * FILE 025
AS MTT UNDER SP1.3. FEATURES: * FILE 025
* FILE 025
READ/DISPLAY MASTER TRACE TABLE * FILE 025
ENTER OPERATOR COMMANDS * FILE 025
CAN USE FIND TO SEARCH THE MASTER * FILE 025
TRACE TABLE * FILE 025
F 'SEARCH ARGUMENT IN QUOTES' * FILE 025
* FILE 025
MTT - SAME AS ABOVE FOR SP1.X SYSTEMS. WE HAVE * FILE 025
NOT USED FOR 3 YEARS SINCE GOING TO XA. * FILE 025
* FILE 025
SWAPIN - WILL SYSEVENT A JOB TO NEW PERFORMANCE * FILE 025
GROUP. * FILE 025
* FILE 025
AUTOWTOR - MPF EXIT TO REPLY M. CAN USE FOR * FILE 025
IEC701D WITH CARTRIDGES TO BE * FILE 025
INITIALIZED (THAT IS THE WAY WE USE * FILE 025
IT). THE OPERATOR SETS THE MPF TO THE * FILE 025
PARMLIB MEMBER THAT HAS THE IEC701D * FILE 025
AND AUTOWTOR (SEE MPFLST03 FOR AN * FILE 025