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
EXAMPLE OF A PARMLIB MEMBER). THE * FILE 025
AUTOWTOR WILL GIVE M TO THE IEC701D * FILE 025
AND THE OPERATOR LOOKS AT THE VISUAL * FILE 025
DISPLAY ON THE 3480 TO SEE WHAT * FILE 025
CARTRIDGE NUMBER TO INSERT. * FILE 025
* FILE 025
IGGPRE00 - DADSM ALLOCATION EXIT TO KEEP CERTAIN * FILE 025
PROBLEM DATASETS FROM BEING ALLOCATED * FILE 025
ON PACKS BEGINNING WITH STG (STORAGE * FILE 025
PACKS). * FILE 025
* FILE 025
IGGPRETB - TABLE LOADED BY IGGPRE00 THAT CONTAINS * FILE 025
THE FIRST 1 TO 12 CHARACTERS OF DATASET * FILE 025
NAMES NOT TO BE ALLOCATED ON THE PACKS * FILE 025
BEGINNING WITH STG. * FILE 025
* FILE 025
ZTPP0210 - PROGRAM TO WRITE HEX 'FF' TO FIRST PDS * FILE 025
DIRECTORY ENTRY THEREBY DELETING ALL * FILE 025
MEMBERS OF THE PDS AND LEAVING THE * FILE 025
LIBRARY. * FILE 025
* FILE 025
ZTPP210J - SAMPLE EXECUTION JCL TO RUN ZTPP0210. * FILE 025
* FILE 025
ZTPPASM - JCL TO ASSEMBLE ZTPP0210. * FILE 025
* FILE 025
SASTSOMN - SAS PROGRAM TO PRINT TSOMON'S RECORDING * FILE 025
OF COMMANDS ON TSO. * FILE 025
* FILE 025
NOTE: ANY MEMBERS THAT MIGHT SEEM TO BE MISSING, WILL BE * FILE 025
FOUND IN THE OLD VERSIONS THAT ARE PACKAGED WITH * FILE 025
THIS FILE: SEE MEMBERS OLDVERS, OLDESAVR, RESTESA. * FILE 025
* FILE 025
CONTAINS A SYSTEM TO RECORD AND REPORT PERFORMANCE * FILE 026
SATISFACTION LEVELS. DURING LOGOFF, THE USER IS * FILE 026
PROMPTED FOR A RATING OF BOTH TSO AND BATCH SUBMIT * FILE 026
PERFORMANCE. THIS INFORMATION IS RECORDED VIA SMF * FILE 026
FOR LATER POST PROCESSING. THIS FILE IS IN IEBUPDTE * FILE 026
SYSIN FORMAT. FOR ADDITIONAL INFORMATION SEE THE * FILE 026
MEMBER CALLED $$DOC. * FILE 026
* FILE 026
IS FROM DAYCO PRODUCTS INC OF DAYTON OHIO AND * FILE 027
CONTAINS A COPY OF THEIR DATE CHECK UTILITY. * FILE 027
* FILE 027
THIS UTILITY WAS CREATED TO ALLOW PROGRAMMERS WHO * FILE 027
BUILD SYSTEMS THAT REQUIRE DATE INPUT TO THE PARM * FILE 027
OF A PROGRAM, TO ENSURE THAT IF THE DATE IS ENTERED * FILE 027
WRONG THE OPERATOR DOES NOT GET AWAY WITH IT. * FILE 027
* FILE 027
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 027
THE FOLLOWING MEMBERS. SEE MEMBER $$DOC FOR * FILE 027
ADDITIONAL INFORMATION * FILE 027
* FILE 027
$CLEAR - CLEAR FLAG MACRO. USED WITH * FILE 027
$FLAG, $DFLAG AND $TEST MACROS. * FILE 027
* FILE 027
$DFLAG - DEFINE FLAG BYTE MACRO. USED WITH * FILE 027
$FLAG, $CLEAR AND $TEST MACROS. * FILE 027
* FILE 027
$EPILOG - END AND EXIT A PROGRAM CSECT. * FILE 027
USED WITH $PROLOG MACRO. * FILE 027
* FILE 027
$FLAG - SET A FLAG BIT MACRO. USED WITH * FILE 027
$CLEAR, $DFLAG AND $TEST MACROS. * FILE 027
* FILE 027
$HEAD - CREATE HEADER INFO BLOCKS IN * FILE 027
ASSEMBLY LISTINGS. * FILE 027
* FILE 027
$PROLOG - CREATE STANDARD ENTRY LINKAGE TO A * FILE 027
PROGRAM CSECT. USED WITH $EPILOG * FILE 027
MACRO. * FILE 027
* FILE 027
$REGS - INTERNAL MACRO USED BY $PROLOG TO * FILE 027
GENERATE REGISTER EQUATES. * FILE 027
* FILE 027
$TEST - TEST A FLAG AND BRANCH ON * FILE 027
CONDITION MACRO. USED WITH $FLAG, * FILE 027
$DFLAG AND $CLEAR MACROS. * FILE 027
* FILE 027
#CONVDAT - CONVERT JULIAN DATE TO GREGORIAN * FILE 027
DATE MACRO. * FILE 027
* FILE 027
DATECHCK - DATE CHECK PROGRAM SOURCE. * FILE 027
* FILE 027
DAYC ? ? ?- THESE ARE ISPF TUTORIAL MENUS TO * FILE 027
EXPLAIN USAGE OF DATECHCK * FILE 027
UTILITY. * FILE 027
* FILE 027
THE MACROS EXCEPT THE $DFLAG, $TEST, $FLAG AND * FILE 027
$CLEAR ARE FROM VARIOUS FILES IN THE UTILITIES TAPE. * FILE 027
THE #CONVDAT MACRO WAS MODIFIED FOR REENTRANCY. * FILE 027
* FILE 027
IS A SET OF CLISTS TO CONVERT A LIST OF DATASET * FILE 028
NAMES TO DISK-TO-TAPE BACKUP JCL FROM SAM GOLOB. * FILE 028
THE FOLLOWING IS WHAT THIS CLIST PDS CAN DO FOR * FILE 028
YOU. THIS FILE IS IN IEBCOPY FORMAT AND IS * FILE 028
* FILE 028
LRECL = 255 BLKSIZE = 15300 RECFM = VB * FILE 028
* FILE 028
***** BACKEMUP ***** * FILE 028
* FILE 028
FUNCTION OF CLISTS: * FILE 028
CONVERT A LIST OF DATASET NAMES TO * FILE 028
DISK-TO-TAPE BACKUP JCL. * FILE 028
* FILE 028
READ THE MEMBERS CALLED $$$DOC, $$$DOC2 AND * FILE 028
$$$DOC3 * FILE 028
* FILE 028
SHORT DESCRIPTION: * FILE 028
* FILE 028
THIS FAMILY OF CLISTS SOLVES AN OLD, * FILE 028
NAGGING PROBLEM OF IBM PROGRAMMERS, * FILE 028
NAMELY, THAT OF BACKING UP A LARGE NUMBER * FILE 028
OF PDS'ES AND SEQUENTIAL DATASETS TO TAPE. * FILE 028
THE USUAL WAYS OF DOING THIS REQUIRES * FILE 028
SETTING UP A PROC, AND CODING A LARGE * FILE 028
NUMBER OF EXECUTIONS OF THE PROC, FOR * FILE 028
DIFFERENT DATASETS. YOU HAVE TO KEEP TRACK * FILE 028
OF THE FILE NUMBERS ON TAPE, AND IT'S A * FILE 028
BIG PAIN IN THE (YOU FILL IN THE BLANK), * FILE 028
AT ITS EASIEST. * FILE 028
* FILE 028
WITH "BACKEMUP" CLISTS YOU JUST HAVE TO * FILE 028
MAKE A LIST OF THE DATASETS ON A * FILE 028
CARD-IMAGE FILE, RUN A CLIST AGAINST THE * FILE 028
LIST, AND IN A FEW SECONDS, YOU HAVE YOUR * FILE 028
IEBCOPY JCL ! * FILE 028
* FILE 028
FURTHER HELP AND DESCRIPTION: * FILE 028
* FILE 028
PLEASE SEE MEMBER TSOBATV FOR GREAT * FILE 028
ASSISTANCE IN BACKING UP PO AND PS * FILE 028
DATASETS ON A GIVEN VOLUME. OUTPUT OF * FILE 028
THIS JOB IS CLOSE TO THE FORMAT USED FOR * FILE 028
INPUT TO THE CLIST CALLED "GENVOL". ONLY * FILE 028
MINOR MASSAGING WITH ISPF EDIT IS * FILE 028
NECESSARY. "VTOC" PGM FOUND ON CBT TAPE - * FILE 028
FILE 112. * FILE 028
* FILE 028
JEFF BROIDO WROTE THE ORIGINAL CLIST, * FILE 028
GENUNLD. I HAVE MODIFIED HIS ORIGINAL * FILE 028
VERSION FOR SEVERAL OF MY PURPOSES, AND * FILE 028
HAVE WRITTEN ANOTHER ONE, GENPOPS, THAT * FILE 028
ADDED THE CAPABILITY OF DUMPING SEQUENTIAL * FILE 028
DATASETS AFTER DOING THE PDS'ES. I USE * FILE 028
DAVE COLE'S DSCOPY PROGRAM PRODUCT FOR * FILE 028
SEQUENTIAL DATASET DUMPING TO TAPE. IT'S * FILE 028
A REAL GEM, BUT IT'S NOT FREE. YOU CAN * FILE 028
SUBSTITUTE THE PROGRAM CALLED "FTL" FROM * FILE 028
FILE 270 OF THIS TAPE, INSTEAD OF DSCOPY. * FILE 028
(SEE MEMBER CALLED $$$DOC3). OTHERWISE, * FILE 028
YOU CAN REWRITE THAT CLIST FOR IEBGENER, * FILE 028
OR SYSREPRO (CBT TAPE FILE 316) OR * FILE 028
WHATEVER YOU USE. THE ADVANTAGE OF DSCOPY * FILE 028
IS (AMONG OTHER USES IT HAS) THAT MANY * FILE 028
FILES CAN BE COPIED WITHIN ONE EXEC CARD. * FILE 028
* FILE 028
MY CLISTS USE THE TAPEMAP PROGRAM (ORIGINAL * FILE 028
WAS FROM UCLA) WHICH IS ON CBT TAPE FILE * FILE 028
299. THEY ALSO USE THE INIMITABLE PDS * FILE 028
PROGRAM FROM FILE 182, AND I (HAD) THE * FILE 028
VENDOR PRODUCT PDSFAST, WHICH SUBSTITUTES * FILE 028
FOR IEBCOPY WITH THE SAME JCL, EXCEPT FOR * FILE 028
PROGRAM NAME. THESE CLISTS MAY NEED TSO/E, * FILE 028
BUT IF YOU'RE CLEVER, YOU CAN GET AROUND * FILE 028
THAT (IT'S ONLY NEEDED DURING THE INPUT * FILE 028
FILE READ, IN WHICH THE DATASET NAMES ARE * FILE 028
CONVERTED INTO A HUGE STRING). * FILE 028
* FILE 028
IS A PROCEDURE TO ENLARGE THE VTOC OF AN ACTIVE * FILE 029
PACK FROM MR SAM GOLOB. THIS FILE IS IN IEBUPDTE * FILE 029
SYSIN FORMAT. * FILE 029
* FILE 029
THIS PROCEDURE PRESENTS A "COOKBOOK-STYLE" RECIPE * FILE 029
FOR ENLARGING THE VTOC OF AN ACTIVE DASD PACK. THE * FILE 029
VTOC INDEX HAS TO BE DEACTIVATED FIRST. EVERYTHING * FILE 029
IS HERE, AND ALL THE "INGREDIENTS" IN THE RECIPE * FILE 029
ARE ON THIS TAPE. IT'S AN EASY TO FOLLOW PATH. * FILE 029
ONCE YOU'VE DONE IT A FEW TIMES (BEING CAREFUL OF * FILE 029
COURSE) IT'S A PIECE OF CAKE. * FILE 029
* FILE 029
THE PROCEDURE INVOLVES BUILDING AN EXTENSION TO THE * FILE 029
END OF THE EXISTING VTOC. THEREFORE, ANY DATASETS * FILE 029
LYING ON THE TRACKS FOLLOWING THE END OF THE VTOC, * FILE 029
HAVE TO BE MOVED OUT OF THE WAY. * FILE 029
* FILE 029
IF FROM MR SAM GOLOB, AND CONTAINS THE CODE * FILE 030
NECESSARY TO CHANGE THE CONSOLE DEFAULT PFKEYS * FILE 030
ON MVS SYSTEMS BEFORE THE XA 2.2 LEVEL. * FILE 030
SEE THE MEMBER CALLED $$DOC FOR ADDITIONAL * FILE 030
INFORMATION. * FILE 030
* FILE 030
MOD TO CHANGE CONSOLE DEFAULT PFKEYS. * FILE 030
* FILE 030
ATTENTION MVS SP1.3.X AND SP2.1.X USERS .... * FILE 030
* FILE 030
NOW YOU DON'T HAVE TO BE SATISFIED WITH IBM'S * FILE 030
SELECTION OF *** DEFAULT *** PFKEYS ANYMORE. YOU * FILE 030
CAN SET 'EM THE WAY YOU WANT 'EM, AND THEY WON'T * FILE 030
FALL OFF AFTER AN IOGEN. * FILE 030
* FILE 030
I'VE CODED 2 SIMPLE USERMODS TO THE SYSGEN MACRO * FILE 030
SGIEA2D2 ON AGENLIB. VERY SIMILAR CODING CAN BE * FILE 030
USED EITHER ON SP1.3 OR ON XA. ONLY THE SEQUENCE * FILE 030
NUMBERS ARE DIFFERENT. THIS IS GOOD AT LEAST UNTIL * FILE 030
SP2.2. AFTER SP 2.2.X AND ESA, THESE MODS ARE * FILE 030
NOT NECESSARY, BECAUSE PFKEYS ARE SET IN A PARMLIB * FILE 030
MEMBER. * FILE 030
* FILE 030
PLEASE MAKE NOTE OF THE ONE FACT THAT THIS * FILE 030
PROCESS SETS ALL CONSOLES WITH THE SAME PFKEYS. * FILE 030
AT LEAST YOU CAN GET THE DEFAULTS CLOSER TO WHAT * FILE 030
YOU WANT. * FILE 030
* FILE 030
TWO USERMODS ARE SUPPLIED. THEY WILL HAVE TO * FILE 030
BE EDITED AND CUSTOMIZED TO YOUR SHOP. THEY MUST * FILE 030
BE ACCEPTED, TO HAVE AN EFFECT IN A SYSGEN OR * FILE 030
IOGEN, UNLESS YOU CONCATENATE THE MTS ABOVE * FILE 030
AGENLIB IN YOUR SYSGEN ASSEMBLY JCL. SAVE A COPY * FILE 030
OF THE ORIGINAL MACRO FOR A BACKUP. * FILE 030
* FILE 030
JUST USE MY SYSMODS AS MODELS. COMPARE THEM TO * FILE 030
THE VERSION OF MACRO SGIEA2D2 THAT YOU HAVE ON YOUR * FILE 030
AGENLIB LIBRARY. BE VERY CAREFUL WITH THE SEQUENCE * FILE 030
NUMBERS, AND IT'D PROBABLY BE BEST TO FOLLOW MY * FILE 030
SCHEME CAREFULLY. GOOD LUCK. * FILE 030
* FILE 030
ONE FURTHER NOTE. THIS USERMOD IS RUNNING ON * FILE 030
MY MVS/370 SYSTEM, BUT I AM UNABLE TO TEST THE XA * FILE 030
VERSION HERE. A FRIEND ASSEMBLED AN XA SYSGEN WITH * FILE 030
THE "IEBUPDTE"ED MACRO, AND THIS WAS SUCCESSFUL. I * FILE 030
COULDN'T PERSONALLY TEST THE RECEIVE, APPLY, AND * FILE 030
ACCEPT OF THE XA USERMOD. IT'S OK, HOWEVER. * FILE 030
* FILE 030
IS A IGGPRE00 EXIT FROM THE FORD AEROSPACE & * FILE 031
COMMUNICATIONS CORPORATION IN COLORADO SPRINGS, * FILE 031
COLORADO. THIS EXIT WILL ALLOW DASD ALLOCATION OF * FILE 031
NEW DATASETS ONLY ON VOLUMES MOUNTED STORAGE OR * FILE 031
PUBLIC UNLESS THE USER HAS BEEN GIVEN RACF * FILE 031
"OPERATIONS". * FILE 031
* FILE 031
IS FROM MR SAM GOLOB AND CONTAINS THREE PROGRAMS * FILE 032
THAT WERE PREVIOUSLY ON THIS TAPE. THEY WERE * FILE 032
GOTTEN FROM THE HUGE "MEMOREX" FILE OF AN OLD CBT * FILE 032
TAPE (VERSION 260 OR EARLIER - IT WAS FILE 313.) * FILE 032
THIS FILE IS IN IEBUPDTE SYSIN FORMAT. FOR * FILE 032
ADDITIONAL INFORMATION SEE THE MEMBERS CALLED * FILE 032
$$DOC*** IN THIS PDS. * FILE 032
* FILE 032
COPYPACK - A BATCH UTILITY WHICH COPIES (AND * FILE 032
OPTIONALLY RECATALOGS) GROUPS OF * FILE 032
DATASETS, BY PARTIAL NAME, FROM ONE * FILE 032
DISK PACK TO ANOTHER. IT CAN HANDLE * FILE 032
DSORG=PO, PS, OR DA. ALL SUCH DATASETS * FILE 032
ON THE ENTIRE PACK CAN BE MOVED. * FILE 032
ALLOCATION OF THE TARGET DATASETS IS * FILE 032
DONE BY THE PROGRAM AUTOMATICALLY. * FILE 032
PARM INPUT PROVIDES MUCH POWER AND * FILE 032
FLEXIBILITY. THIS CAN SAVE YOU A LOT * FILE 032
OF WORK. IF YOU HAVE FDR, FDRCOPY IS * FILE 032
BETTER FOR MOST PURPOSES. SO IS DFDSS * FILE 032
COPY. COPYPACK WILL DO A NICE JOB * FILE 032
COPYING MODEL DSCB'S FROM ONE PACK TO * FILE 032
ANOTHER. COPYPACK HAS BEEN FIXED TO * FILE 032
RUN UNDER XA. * FILE 032
* FILE 032
DOWNDATE - A UTILITY WHICH CREATES AN IEBUPDTE * FILE 032
FORMAT DIFFERENCE DECK BETWEEN TWO * FILE 032
VERSIONS OF A SOURCE PROGRAM. THIS NOT * FILE 032
ONLY FLAGS DIFFERENCES, BUT ALLOWS YOU * FILE 032
TO CONVERT FROM ONE SOURCE DECK TO THE * FILE 032
OTHER BY MEANS OF THE DIFFERENCE DECK. * FILE 032
* FILE 032
JCLSCAN - A TSO COMMAND PROCESSOR WHICH CALLS THE * FILE 032
MVS JCL CONVERTER TO CHECK A DATASET OF * FILE 032
JCL FOR ERRORS. SINCE THE ACTUAL * FILE 032
CONVERTER FROM IBM IS USED, YOU GET THE * FILE 032
SAME RESULT AS IF YOU DID TYPRUN=SCAN, * FILE 032
BUT WITHOUT RUNNING A JOB. IT USES AN * FILE 032
SVC TO DO THE CALLING OF THE CONVERTER. * FILE 032
OUTPUT IS DISPLAYED AT THE TUBE IN A * FILE 032
VERY CONVENIENT FORMAT. * FILE 032
* FILE 032
IS PUTXREF FROM THE DEPARTMENT OF THE TREASURY OF * FILE 033
THE STATE OF NEW JERSEY. THIS FILE IS IN IEBUPDTE * FILE 033
SYSIN FORMAT. FOR ADDITIONAL INFORMATION SEE THE * FILE 033
SOURCE CODE ITSELF. THIS PROGRAM TAKES THE PUT * FILE 033
PTF FILE (FILE 1 FROM A STANDARD IBM PUT TAPE), * FILE 033
AND PRODUCES A CROSS REFERENCE OF THE PTF'S * FILE 033
INCLUDED, SORTED BY FMID. IT CAN TAKE * FILE 033
CONCATENATED INPUT, BUT THE TAPE IDENTITY ON WHICH * FILE 033
THE PTF IS FOUND WILL BE LOST. THE PROGRAM SHOULD * FILE 033
BE USEFUL TO QUICKLY IDENTIFY WHAT PTF'S ARE ON A * FILE 033
GIVEN TAPE, WHAT FMID'S HAVE MAINTENANCE ON A * FILE 033
TAPE, AND TO DOUBLE CHECK THE STERLING FOREST * FILE 033
CROSS REFERENCE (IT LIES ONCE IN A WHILE.) ALSO * FILE 033
SEE THE MATERIAL ON FILE 118, WHICH IS RELATED, * FILE 033
AND WHICH MAY BE MORE HELPFUL. * FILE 033
* FILE 033
IS FROM NORTHEAST LOUISIANA UNIVERSITY AND * FILE 034
CONTAINS A COPY OF THEIR PROGRAM CALLED RACFUSER. * FILE 034
THIS IS AN ASSEMBLER PROGRAM WHICH WILL READ THE * FILE 034
RACF MASTER DATA SET, PRINT THE PASSWORD * FILE 034
EXPIRATION DATE, AND CLASSIFY A USERID INTO ONE OF * FILE 034
THE FOLLOWING CATEGORIES : * FILE 034
* FILE 034
A. PASSWORD WILL EXPIRE BEFORE A SPECIFIED * FILE 034
THRUDATE (WHICH IS SPECIFIED ON A PARM OR * FILE 034
ALLOWED TO DEFAULT TO SEVEN DAYS FROM * FILE 034
TODAY). * FILE 034
B. PASSWORD WILL REMAIN ACTIVE AFTER THE * FILE 034
THRUDATE, * FILE 034
C. PASSWORD CURRENTLY EXPIRED, OR * FILE 034
D. USERID HAS NEVER BEEN USED * FILE 034
* FILE 034
THIS INFORMATION CAN BE USED BY A SECURITY * FILE 034
ADMINISTRATOR TO CONTROL THE CONTENTS OF THE RACF * FILE 034
MASTER DATA SET WHICH INCLUDES ELIMINATING UNUSED * FILE 034
OR OBSOLETE USERIDS AND NOTIFYING DATA CONTROL * FILE 034
ABOUT UPCOMING PASSWORD EXPIRATIONS IN SELDOM RUN * FILE 034
BATCH JOBS. THIS HELPS PREVENT JCL ERRORS DUE TO * FILE 034
AN EXPIRED PASSWORD. * FILE 034
* FILE 034
IS A LOAD MODULE LIBRARY WITH USEFUL PROGRAMS IN IT. * FILE 035
* FILE 035
SOURCE FILE LOAD MODULE NAME * FILE 035
002 SOURCE CBT973 - uncompres tape files * FILE 035
006 SOURCE CBTUPD - insert ./ ADD cards * FILE 035
into this doc * FILE 035
018 DOCUMENTATION TSUPDATE * FILE 035
044 SOURCE ASMTOZAF - PL1/F ASMTOZAP * FILE 035
044 SOURCE ASMTOZAP - PL/1 OPTIMIZER * FILE 035
good with PL/1 V1.3 or more * FILE 035
093 SOURCE OFFLOAD * FILE 035
093 SOURCE PDSLOAD * FILE 035
094 SOURCE DAF * FILE 035
102 SOURCE TAPESC46 - Version 4.6 (64K) * FILE 035
102 SOURCE TAPESCAN - Version 5.2 (64K) * FILE 035
112 SOURCE VTOC * FILE 035
134 SOURCE HEL (moved to FILE 135) * FILE 035
134 SOURCE REVIEW (moved to FILE 135) * FILE 035
134 SOURCE ZAP (moved to FILE 135) * FILE 035
147 SOURCE ARCHINIT \\ * FILE 035
147 SOURCE ARCHIVER >> ARCHIVER * FILE 035
147 SOURCE ARCHPARS // * FILE 035
182 SOURCE PDS85 - PDS Vers 8.5 loadmod. * FILE 035
(Needs PANELS and MSGS to * FILE 035
run in ISPMODE. Will run * FILE 035
in line mode as is. Use * FILE 035
XISPM keyword when invoking. * FILE 035
SEE FILE 182 FOR PANELS AND * FILE 035
MESSAGES. * FILE 035
193 SOURCE TCOPY - Tape copying utility * FILE 035
218 SOURCE VSAMMAPP * FILE 035
229 SOURCE COPYMODS * FILE 035
264 SOURCE LOOK * FILE 035
266 SOURCE SS0104 tape mapping program * FILE 035
294 SOURCE VSAMADTL VSAMANAL * FILE 035
294 SOURCE VSAMAGET VSAMANAL * FILE 035
294 SOURCE VSAMAHLP VSAMANAL * FILE 035
294 SOURCE VSAMANAL VSAMANAL * FILE 035
294 SOURCE VSAMANDX VSAMANAL * FILE 035
294 SOURCE VSAMSIZE VSAMANAL * FILE 035
296 SOURCE BLKDISK BLK3380 BLK3390 * FILE 035
296 SOURCE BLK3375 BLK9345 BLK3350 * FILE 035
299 SOURCE TAPEMAP & TAPEMAPO * FILE 035
316 SOURCE COPYFILE - copies SL tape fls * FILE 035
316 SOURCE COPYSLNL - copies SL to NL * FILE 035
316 SOURCE COPYNLNL - copies NL to NL * FILE 035
316 SOURCE IGG019WD - with COPYFILE * FILE 035
316 SOURCE IGG019WE - with COPYFILE * FILE 035
316 SOURCE LISPDS (really LISTPDS) * FILE 035
316 SOURCE TAPEL - used with COPYFILE * FILE 035
365 SOURCE OSTAREDC - OSTARXMT error * FILE 035
checking assembler program * FILE 035
* FILE 035
IS A FIXPDS UTILITY FROM MR SAM GOLOB. THIS CODE * FILE 036
WAS WRITTEN BY MR ROBERT B. WEINSTEIN. THIS * FILE 036
UTILITY RESURRECTS DELETED MEMBERS OF A PDS, BUT IT * FILE 036
DOES SO WITHOUT USING THE DIRECTORY. THIS FILE IS * FILE 036
IN IEBUPDTE SYSIN FORMAT. * FILE 036
* FILE 036
THIS PROGRAM STOWS NEW DIRECTORY ENTRIES FOR * FILE 036
PHYSICAL FILES IN A DATASET WHICH WOULD LOOK LIKE A * FILE 036
PDS MEMBER. IT LOCATES THESE FILES WITHOUT BENEFIT * FILE 036
OF A PREVIOUS GOOD DIRECTORY. ALL IT NEEDS IS A * FILE 036
BLANK DIRECTORY. * FILE 036
* FILE 036
THIS FIXPDS PROGRAM RESTORES DELETED MEMBERS OF A * FILE 036
PDS WITH A BACKWARD SEARCH, STARTING FROM THE END * FILE 036
OF THE DATASET AND BROWSING EACH MEMBER (DELETED OR * FILE 036
NOT) WITH ISPF BROWSE. AFTER ENDING EACH BROWSE, * FILE 036
YOU HAVE AN OPPORTUNITY TO STOW A NAME IN THE * FILE 036
DIRECTORY FOR THAT MEMBER. THE PROGRAM PROCEEDS * FILE 036
BACKWARDS, MEMBER BY MEMBER, UNTIL YOU EXIT, OR * FILE 036
UNTIL YOU REACH THE BEGINNING OF THE LIBRARY. * FILE 036
* FILE 036
TWO FEATURES DISTINGUISH THIS PROGRAM FROM OTHERS * FILE 036
OF THIS TYPE. ONE, THE MEMBER SEARCH GOES * FILE 036
BACKWARDS, STARTING FROM THE END OF THE DATASET AND * FILE 036
GOING BACK, ONE MEMBER AT A TIME. THIS ALLOWS YOU * FILE 036
TO LOOK AT THE MOST RECENT ACTIVITY FIRST. TWO, * FILE 036
EACH MEMBER IS ISPF BROWSED. IT CAN BE EXAMINED IN * FILE 036
ITS ENTIRETY, AND IN DETAIL, BEFORE YOU DECIDE * FILE 036
WHETHER TO STOW A DIRECTORY ENTRY FOR IT OR NOT. * FILE 036
* FILE 036
IF YOU DO STOW A DIRECTORY ENTRY, IT DOESN'T MATTER * FILE 036
IF ONE ALREADY EXISTS FOR THAT MEMBER. THE NEW ONE * FILE 036
IS CREATED ALSO. IF AN OLD ENTRY WAS THERE TOO, * FILE 036
UNDER A DIFFERENT NAME, AN "APPARENT ALIAS" IS * FILE 036
CREATED. USING THE "PDS" PROGRAM (IN CBT TAPE FILE * FILE 036
182), ALL THE APPARENT ALIASES CREATED CAN BE FLAGGED * FILE 036
IN A JIFFY, USING THE "VERIFY" SUBCOMMAND OF PDS. * FILE 036
* FILE 036
EDITOR'S NOTE. IF ALL YOU WANT TO DO IS RESTORE * FILE 036
DELETED MEMBERS OF A PDS, THE "PDS" PROGRAM ON FILE * FILE 036
182 (WITH UTILITIES ON FILES 296 AND 112) IS * FILE 036
PROBABLY BETTER THAN FIXPDS, AND PDS IS MUCH * FILE 036
QUICKER. A THIRD REFERENCE IS THE "PDSGAS" PROGRAM * FILE 036
- FILE 316. ALSO, THE "PDS" PROGRAM DOES MANY MORE * FILE 036
THINGS, AND PDS IS NOT TOO HARD TO INSTALL. I * FILE 036
PERSONALLY HAVE RECEIVED MANY INQUIRIES FROM PEOPLE * FILE 036
TRYING TO INSTALL FIXPDS, BECAUSE MY NAME IS ON THE * FILE 036
CALL LIST. I AM SPEAKING FROM MUCH EXPERIENCE. * FILE 036
FIXPDS IS NICE TO HAVE, THOUGH, AND I DO NOT MEAN * FILE 036
TO DISCOURAGE PEOPLE FROM INSTALLING IT. SBG. * FILE 036
* FILE 036
IS AN MVS VERSION OF COPYCAT TO MOVE, SPLIT, * FILE 037
AND/OR REORGANIZE CVOL CATALOGS. THIS VERSION * FILE 037
RUNS UNDER MVS AND THE RESULTANT CVOL MAY BE * FILE 037
LISTED WITH IEHLIST. THIS VERSION HAS 3380 AND * FILE 037
3375 SUPPORT ADDED FROM UCLA. THIS FILE IS IN * FILE 037
IEBUPDTE SYSIN FORMAT SEE THE MEMBER CALLED $$DOC * FILE 037
FOR ADDITIONAL INFORMATION. * FILE 037
* FILE 037
$CBTJCL .. THE JCL USED AT CBT TO INSTALL * FILE 037
$MANUAL .. THE COPYCAT MANUAL * FILE 037
$UCLAJCL. THE JCL USED AT UCLA TO INSTALL * FILE 037
COPYCAT .. COPYCAT CODE ITSELF * FILE 037
FIX1 .. FIX ESATE01 - CONVERTS COPYCAT FROM STAE TO * FILE 037
ESTAE USE AND CORRECTS AN S30A ABEND THAT * FILE 037
OCCURS FOLLOWING AN X37 ABEND. * FILE 037
FIX2 ..... FIX XCP200 - CORRECTS AN S200 ABEND THAT * FILE 037
INTERMITTENTLY OCCURS IN COPYCAT AFTER AN * FILE 037
'X37' ABEND, DUE TO ALL OF THE I/O NOT * FILE 037
HAVING COMPLETED BEFORE SVC55 IS ISSUED * FILE 037
FOR AN END-OF-VOLUME INDICATION. * FILE 037
OAC1 ..... FIX DEV3380 - ADDS 3380 SUPPORT TO COPYCAT * FILE 037
OAC2 ..... FIX HASH001 - UCLA LOCAL MODE. SEE MEMBER * FILE 037
FOR ADDITIONAL INFORMATION. * FILE 037
* FILE 037
IS FROM MR LARRY WILLIAMS AND CONTAINS A VERY * FILE 038
ELABORATE SPACE WAR GAME CALLED " KLINGON ". IT * FILE 038
IS A LOT LIKE MOST STAR TREK GAMES EXCEPT YOU GET * FILE 038
TO BE THE BAD GUYS. THE GAME CAN RUN EITHER IN * FILE 038
LINE MODE OR IN FULL SCREEN MODE UNDER TSO ON A * FILE 038
3270 TYPE TERMINAL. THIS FILE IS IN IEBUPDTE * FILE 038
SYSIN FORMAT. SEE THE MEMBER CALLED ##DOC FOR * FILE 038
ADDITIONAL INFORMATION. * FILE 038
* FILE 038
NOTE. FOR PEOPLE HAVING PROBLEMS COMPILING THIS * FILE 038
WITH FORTRAN H, YOU CAN COMPILE IT WITH FORTRAN G. * FILE 038
* FILE 038
LARRY WILLIAMS * FILE 038
ILLINOIS BOARD OF GOVERNORS * FILE 038
COOPERATIVE COMPUTER CENTER * FILE 038
GOVERNORS STATE UNIVERSITY * FILE 038
UNIVERSITY PARK, IL 60466 * FILE 038
(630) 235-2138 * FILE 038
* FILE 038
is from Citibank in New York and contains : * FILE 039
* FILE 039
1. An SMF program to process type 14 and 15 records * FILE 039
using IBM DFSORT. * FILE 039
2. A modification to the IPOUPDTE program so it * FILE 039
will run against any partitioned dataset, and * FILE 039
it doesn't require the presence of a member * FILE 039
nameed $$$COIBM. * FILE 039
3. A modification to the CPPUPDTE program so it * FILE 039
will run against any partitioned dataset, and * FILE 039
it doesn't require the presence of a member * FILE 039
nameed $$$COIBM. (from Sam Golob 10/99) * FILE 039
* FILE 039
IS FROM PEOPLES NATIONAL BANK OF WASHINGTON AND * FILE 040
CONTAINS SEVERAL OF THEIR UTILITIES. THIS FILE IS * FILE 040
IN IEBUPDTE SYSIN FORMAT. FOR ADDITIONAL * FILE 040
INFORMATION SEE THE MEMBER CALLED $$DOC. * FILE 040
* FILE 040
DBACONSL - WTO/WTOR ASSIST SUBROUTINE * FILE 040
* FILE 040
DBAIOB - DSECT FOR AN IOB * FILE 040
* FILE 040
PDSCLEAN - CLEANS OUT A PDS WITHOUT REQUIRING A * FILE 040
DELETE/DEFINE. THE NUMBER OF DIRECTORY * FILE 040
BLOCKS MAY BE CHANGED AT THE SAME TIME. * FILE 040
SEVERAL PDS'S MAY BE CLEANED IN ONE * FILE 040
STEP. CAN BE EXECUTED IN TSO * FILE 040
FOREGROUND * FILE 040
* FILE 040
PDSPDS - A PDS MASS SCAN/UPDATE UTILITY. LOOK * FILE 040
AT ALL OR A SUBSET OF MEMBERS OF A PDS. * FILE 040
CHANGE AS REQUESTED. SINCE RECORDS ARE * FILE 040
NOT USUALLY ADDED OR DELETED UPDATES IN * FILE 040
PLACE SAVING COMPRESSES. XPDS TSO * FILE 040
CLIST AND PROCPDS PROC ARE INCLUDED * FILE 040
* FILE 040
RDOC72 - A DOCUMENTATION FORMATTER. PROVIDES * FILE 040
HEADERS, FOOTERS, TABLE OF CONTENTS, * FILE 040
PAGE NUMBERS, AND LOTS MORE * FILE 040
* FILE 040
REGS - REGISTER EQUATE MACRO * FILE 040
* FILE 040
SUPERGEN - SUPER IEBGENER. FIND AND (LIMITED) * FILE 040
CHANGE RECORDS IN A SEQUENTIAL FILE. * FILE 040
RELATIVE RECORD NUMBER, TTR, OR MBBCCHHR * FILE 040
ADDRESSES CAN BE USED. IDEAL FOR LOOKING * FILE 040
AT 'ACTUAL' DATA IN A LARGE FILE IN * FILE 040
FOREGROUND. SPGEN TSO CLIST AND PROCGEN * FILE 040
PROC ARE INCLUDED * FILE 040
* FILE 040
VDBS$DDF - SUBROUTINE TO SCAN TIOT TO FIND A DD * FILE 040
* FILE 040
VDBS$HEX - HEX PRINT UTILITY SUBROUTINE * FILE 040
* FILE 040
IS FROM BENJAMIN FRANKLIN FEDERAL SAVINGS AND * FILE 041
LOAN ASSOCIATION OF PORTLAND OREGON AND CONTAINS * FILE 041
EXITS TO MVS/SP JES2 TO PROVIDE TABLE DRIVEN FORMS * FILE 041
CONTROL FOR XEROX 8700 / 9700 LASER PRINTERS. * FILE 041
THE EXITS INSERT XEROX DJDE COMMANDS BETWEEN REPORTS * FILE 041
GOING TO THE PRINTERS BASED ON THE SYSOUT CLASS AND * FILE 041
FORMS ID SPECIFIED IN STANDARD JCL. THIS FILE * FILE 041
IS IN IEBUPDTE SYSIN FORMAT * FILE 041
* FILE 041
IS FROM DAVE DROUIN FROM CONN NATIONAL BANK THIS * FILE 042
CODE WILL TAKE FILE 001 OF THIS TAPE AND PUT IT INTO * FILE 042
INFO/MVS FORMAT SO IT CAN BE LOADED INTO A INFO/MVS * FILE 042
DATABASE. THIS FILE IS IN IEBUPDTE SYSIN FORMAT. * FILE 042
SEE THE MEMBER CALLED $DOC FOR ADDTIONAL INFORMATION * FILE 042
* FILE 042
A COMMENT ABOUT LOADING THIS FILE INTO AN INFO/MVS * FILE 042
DATA BASE. WE DO NOT USE VERSION 2 BUT IF YOU TAKE * FILE 042
THE INPUT TO LOAD VERSION 1 AND CONVERT IT TO FIXED * FILE 042
BLOCK WITH AN LRECL OF 80 BYTES AND SHIFT EVERYTHING * FILE 042
LEFT 8 BYTES (WITH THE PROPER JCL) YOU SHOULD BE * FILE 042
OKAY - USE THE LAST JOB IN FILE 003 FOR THE JCL TO * FILE 042
CREATE THE INPUT TO THE INFO/MVS DATA BASE AND THEN * FILE 042
CHANGE IT TO FIXED BLOCK AND SHIFT 8 BYTES LEFT. * FILE 042
YOU HAVE WILL TO CREATE YOUR OWN JCL TO LOAD THE * FILE 042
VERSION 2 DATA BASE * FILE 042
* FILE 042
IS FROM DAVE DROUIN FROM CONN NATIONAL BANK. THIS * FILE 043
FILE CONTAINS THE DATA FOR THE HEADER INFORMATION * FILE 043
FOR USE WITH FILE 042 ON THIS TAPE. THIS FILE IS * FILE 043
IS LRECL=255,BLKSIZE=3120,RECFM=VB * FILE 043
* FILE 043
IS FROM YALE UNIVERSITY AND CONTAINS A COPY OF * FILE 044
ASMTOZAP. THIS FILE IS IN IEBUPDTE SYSIN FORMAT, FOR * FILE 044
ADDITIONAL INFORMATION SEE THE MEMBER CALLED $DOC. * FILE 044
* FILE 044
ASMTOZAP IS A UTILITY WHICH READS AN ASSEMBLER * FILE 044
LISTING AND PRODUCES AMASPZAP CONTROL CARDS. THIS * FILE 044
ALLOWS NON-TRIVIAL PATCHES TO BE WRITTEN IN * FILE 044
ASSEMBLER LANGUAGE WITH FULL USE OF SYMBOLIC * FILE 044
REFERENCES, DSECTS, AND MACROS. CODE IS * FILE 044
POSITIONED AT THE CORRECT OFFSETS BY USE OF ORG. * FILE 044
SYMBOLIC ADDRESSES CAN BE GENERATED BY ORG, OR * FILE 044
FAKED BY EQU, OR COPYED, ETC. THERE IS LESS ROOM * FILE 044
FOR ERROR, IMPROVED LEGIBILITY, AND CONVERSION * FILE 044
FROM ONE RELEASE TO ANOTHER USUALLY INVOLVES ONLY * FILE 044
CHANGING A FEW ORG'S TO REFLECT THE NEW ADDRESSES * FILE 044
OF THE PATCH AREA OR ZAPPED INSTRUCTIONS. * FILE 044
* FILE 044
ASMTOZAP HAS BEEN TESTED USING ASSEMBLER H VERS 2 * FILE 044
AND THE IBM HIGH-LEVEL ASSEMBLER (HLASM). * FILE 044
* FILE 044
NOTE. THIS PROGRAM IS WRITTEN IN PL/1. HOWEVER, WE HAVE * FILE 044
TRIED TO MAKE IT POSSIBLE FOR ALL MVS SHOPS TO USE * FILE 044
ASMTOZAP. FIRST, THERE IS A VERSION THAT RUNS * FILE 044
UNDER PL1/F - THE FREE VERSION OF PL/1 WHOSE * FILE 044
COMPILER AND LIBRARY IS ON THIS TAPE - FILE 092. * FILE 044
SECOND, THE LOAD MODULE FOR ASMTOZAP THAT IS ON * FILE 044
FILE 035 IS AN OLD LOAD MODULE THAT WAS COMPILED * FILE 044
USING THE PL/1 OPTIMIZER VERSION 1.3.0. THEREFORE * FILE 044
YOU CAN RUN THAT MODULE, EVEN ON A VERY OLD VERSION * FILE 044
OF THE PL/1 OPTIMIZER TRANSIENT LIBRARY. (AND OF * FILE 044
COURSE YOU CAN RUN IT ON THE NEWER VERSIONS * FILE 044
OF PL/1.) SG - 03/22/94 * FILE 044
* FILE 044
PL1/F RETURN CODE PROCESSING PUT IN (AS WITH PL/1 * FILE 044
OPTIMIZER). THANKS TO JIM MARSHALL WHO SENT ME A * FILE 044
SET OF PL1/F MANUALS. SEE ALSO ASMTOZAF LOAD * FILE 044
MODULE ON FILE 035. SG - 04/11/94 * FILE 044
* FILE 044
IS AN ENHANCEMENT TO THE YALE COMPARE PROGRAM THAT IS * File 045
IN FILE 226 OF THIS TAPE. THE PURPOSE OF THIS CODE IT TO * FILE 045
ALLOW THE COMPARE PGM TO PROCESS TWO PDS FILES RATHER * FILE 045
THAN TWO SEQUENTIAL FILES. THE PROGRAM IS SELF CONTAINED. * FILE 045
SIMPLY ASSEMBLE AND LINK AND IT'S READY TO USE. * FILE 045
ADDITIONAL INFORMATION ON HOW TO USE THE PROGRAM IS * FILE 045
CONTAINED AS COMMENTS AT THE BEGINNING OF THE CODE * FILE 045
ITSELF. ALSO INCLUDED IS THE JES2 SOURCE COMPARE SYSTEM. * FILE 045
* FILE 045
COMPONENTS OF THIS FILE : * FILE 045
$$DOC - DOCUMENTATION OF THE JES2 COMPARE SYSTEM * FILE 045
PDSCMPR - ORIGINAL PDS COMPARE PROGRAM * FILE 045
* FILE 045
JES2 SOURCE COMPARE SYSTEM * FILE 045
JES2CMPR - AN ASSEMBLY LANGUAGE PROGRAM THAT * FILE 045
IS A MODIFICATION OF THE PDSCMPR * FILE 045
PROGRAM. THIS PROGRAM CREATES A * FILE 045
PDS THAT CONTAINS ALL OF THE * FILE 045
CHANGES BETWEEN TWO RELEASES. * FILE 045
JES2LIST - AN ASSEMBLY LANGUAGE PROGRAM THAT * FILE 045
READS THE ABOVE PDS, THE SYSPRINT * FILE 045
OUTPUT FROM THE ASSEMBLER AND * FILE 045
PRINTS A NEW ASSEMBLY LISTING * FILE 045
SHOWING WERE CHANGES HAVE * FILE 045
OCCURRED * FILE 045
CMPRPDS - A JCL STREAM THAT EXECUTES JES2CMPR * FILE 045
JES2ASM2 - A PROC THAT EXECUTES * FILE 045
THE ASSEMBLER AND THEN JES2LIST TO * FILE 045
CREATE THE POST ASSEMBLY LISTING * FILE 045
ASM88888 - A JCL STREAM THAT ASSEMBLES ALL OF * FILE 045
THE JES2 MODULES * FILE 045
THIS FILE IN IS IEBUPDTE SYSIN FORMAT * FILE 045
* FILE 045
IS THE MASS MUTUAL DISK PACK MAINTENANCE PROGRAM, * FILE 046
"PACKRAT". ITS ONLY FUNCTION IS TO EXAMINE THE * FILE 046
VTOC OF A PARTICULAR VOLUME AND SCRATCH THE * FILE 046
DATASETS SPECIFIED. THE UNCATALOG ONLY OCCURS IF * FILE 046
THE DATA SET IS CATALOGED ON THE VOLUME CURRENTLY * FILE 046
BEING EXAMINED. IF IT IS A MULTI-VOLUME DATA SET * FILE 046
IT IS NOT SCRATCHED OR UNCATALOGED. THIS PROGRAM * FILE 046
HAS BEEN USED ON 3330, 3350, 3380, AND 3390 * FILE 046
DEVICES. IT HAS BEEN RUN UNDER MVS SP 1.3, MVS/XA, * FILE 046
AND MVS/ESA. THIS "PACKRAT" PROGRAM MUST RUN * FILE 046
AUTHORIZED AND THE USER MUST HAVE OPERATOR * FILE 046
AUTHORIZATION. THE PROMPT SCREEN ALLOWS YOU TO * FILE 046
ENTER THE VOLSER YOU WISH TO EXAMINE AND THE SCAN * FILE 046
DATE. A FULL SCREEN OF DATA SETS CAN BE SCRATCHED * FILE 046
AT A TIME. HITTING THE ENTER KEY PAGES YOU * FILE 046
FORWARD THROUGH THE VTOC. ADDITIONAL INFORMATION * FILE 046
MAY BE FOUND IN THE COMMENTS OF THE CODE ITSELF. * FILE 046
* FILE 046
IS FROM TORONTO HYDRO IN TORONTO, ONTARIO, CANADA. * FILE 047
THIS FILE CONTAINS THE FOLLOWING, FOR ADDITIONAL * FILE 047
INFORMATION SEE THE MEMBER CALLED $INDEX : (THIS * FILE 047
FILE ALSO USES SOME MACROS THAT ARE IN FILES 435 AND * FILE 047
OR 464. THIS FILE HAS BEEN SUBMITTED BY MR JIM LANE * FILE 047
* FILE 047
THE CURRENT FILE IS A REFRESH AS OF 12/09/93. * FILE 047
* FILE 047
THIS FILE ALSO CONTAINS AN ESA VERSION OF CMD1. * FILE 047
(SEE THE BF GOODRICH VERSION ON FILE 261 WHICH MAY * FILE 047
BE FOR A HIGHER LEVEL OF MVS/ESA.) * FILE 047
* FILE 047
JIM'S CURRENT ADDRESS: * FILE 047
* FILE 047
JIM LANE * FILE 047
TORONTO HYDRO * FILE 047
TECHNICAL SERVICES * FILE 047
14 CARLTON STREET * FILE 047
TORONTO, ONTARIO M5B 1K5 * FILE 047
CANADA * FILE 047
416-542-2820 direct line * FILE 047
* FILE 047
Note: Jim Lane is now doing AIX, and this file is * FILE 047
now "functionally stabilized" until somebody * FILE 047
else takes it over. (SG - 07/99) * FILE 047
* FILE 047
THIS PDS CONTAINS THE FOLLOWING MEMBERS: * FILE 047
* FILE 047
EDX - "PERSONAL DATASET MANAGER" ISPF DIALOG. * FILE 047
EXITS - SOME JES2 AND MPF EXITS. * FILE 047
JCLFLOW - AN ISPF PROGRAM EDIT MACRO TO NEATLY * FILE 047
FORMAT JCL * FILE 047
LISTICAT - A BATCH PROGRAM TO 1-UP LIST DATASETS IN * FILE 047
AN ICF CATALOG. * FILE 047
NOCELL - A BATCH PROGRAM TO LIST DISK, TAPE AND * FILE 047
HSM MIGRATED DATASETS * FILE 047
RMFIII - A POST PROCEESOR FOR RMF MONITOR III * FILE 047
DATA. * FILE 047
SASEREP - A SAS PROGRAM TO PROCESS LOGREC RECORDS. * FILE 047
SASGTF - A SAS PROGRAM TO PROCESS GTF SVC TRACE * FILE 047
RECORDS. * FILE 047
SASHSM - A SET OF SAS PROGRAM TO ANALYZE HSM USAGE * FILE 047
SASRMF79 - A SAS PROGRAM TO PROCESS RMF TYPE 79 * FILE 047
RECORDS. * FILE 047
SASSYSLG - A SAS PROGRAM TO PROCESS SYSLOG DATA. * FILE 047
SASTLMS - A SAS PROGRAM TO PROCESS THE TLMS II * FILE 047
VOLUME MASTER FILE. * FILE 047
SMPELIST - A BATCH PROGRAM TO 1-UP LIST ENTRIES FROM * FILE 047
AN SMP-E CSI. * FILE 047
- EDX - * FILE 047
AN ISPF DIALOG CALLED "PERSONAL DATASET MANAGER". * FILE 047
EDX MAINTAINS AND DISPLAYS A TABLE OF DATASET * FILE 047
NAMES (OPTIONALLY INCLUDING A MEMBER NAME). THE * FILE 047
FOLLOWING OPERATIONS CAN BE REQUESTED ON ANY OF * FILE 047
THE DATASETS: * FILE 047
? TO DISPLAY INFORMATION ABOUT THE * FILE 047
DATASET'S ATTRIBUTES. * FILE 047
A TO ALLOCATE A NEW DATASET USING THIS ONE * FILE 047
AS A MODEL. * FILE 047
B TO ISPF BROWSE THE DATASET. * FILE 047
D TO DELETE THE DATASET. * FILE 047
E TO ISPF EDIT THE DATASET. * FILE 047
HM TO MIGRATE THE DATASET WITH DFHSM. * FILE 047
HR TO RECALL THE DATASET FROM DFHSM * FILE 047
MIGRATION. * FILE 047
P TO INVOKE THE PDS84 DIALOG ON THE * FILE 047
DATASET. * FILE 047
PR TO PRINT THE DATASET. * FILE 047
V TO SET OR UPDATE THE VOLSER FIELD. * FILE 047
X TO DROP THE DATASET FROM THE LIST. * FILE 047
* FILE 047
EDX PICKS UP ON THE FACT THAT A DATASET HAS BEEN * FILE 047
MIGRATED AND DISPLAYS A MESSAGE TO THAT EFFECT IF * FILE 047
YOU TRY TO DO SOMETHING THAT NEEDS THE DATASET * FILE 047
UNMIGRATED. YOU HAVE TO EXPLICITLY HRECALL IT * FILE 047
FIRST. * FILE 047
* FILE 047
THIS DATASET ALSO CONTAINS UPDATED VERSIONS OF * FILE 047
THE ED AND BR COMMAND TABLE COMMANDS THAT ADD THE * FILE 047
DATASET YOU EDIT OR BROWSE TO THE EDX DATASET * FILE 047
TABLE. THEY ALSO ACCEPT AN OPERAND OF "*" TO MEAN * FILE 047
THE MOST RECENT DATASET YOU EITHER EDITED OR * FILE 047
BROWSED. * FILE 047
- EXITS - * FILE 047
A SET OF JES2 AND MPF EXITS: * FILE 047
EXIT02 - ENFORCE JOBNAME AND JOBCLASS * FILE 047
STANDARDS * FILE 047
EXIT03 - CANCEL JOBS FLAGGED BY EXIT02 * FILE 047
EXIT04 - DUMMY OUT JOBCAT AND STEPCAT DD * FILE 047
STATEMENTS * FILE 047
MPFABEND - HIGHLIGHTED WTO FOR ABENDING * FILE 047
PRODUCTION JOB * FILE 047
MPFHOLD - REPLY NOHOLD TO IEF433D * FILE 047
MPFJCLER - HIGHLIGHTED WTO FOR PRODUCTION JOB * FILE 047
WITH JCL ERROR * FILE 047
MPFVINIT - START TSO AFTER VTAM IS UP * FILE 047
MPFVTAM - HIGHLIGHTED WTO WHEN NETWORK NODES * FILE 047
GO INACT * FILE 047
- JCLFLOW - * FILE 047
THIS PROGRAM WAS "OBTAINED" FROM FILE352 OF THE * FILE 047
CBT TAPE. IN ITS ORIGINAL FORM IT WAS A BATCH * FILE 047
UTILITY, READING JCL FROM SYSUT1 AND WRITING THE * FILE 047
REFORMATTED STUFF ONTO SYSUT2. I CHANGED IT BY * FILE 047
ALTERING THE I/O LOGIC TO USE ISPF EDIT MACRO * FILE 047
SERVICES. THE BASIC LOGIC IS TO START AT THE TOP * FILE 047
OF THE DECK ASSIGNING EACH LINE TO VARIABLE * FILE 047
"CARD". ANYTHING OTHER THAN PART OF A DD * FILE 047
STATEMENT IS LEFT AS IS. WHEN A DD STATEMENT IS * FILE 047
FOUND EACH LINE IS DELETED AFTER BEING READ. THE * FILE 047
LINE NUMBER AFTER WHICH TO INSERT REFORMATTED JCL * FILE 047
IS REMEMBERED IN VARIABLE "ADDLINE". AN ENTIRE DD * FILE 047
STATEMENT IS READ IN, CONTINUATION LINES AND ALL * FILE 047
AND STORED IN "TABLEIN", EACH INPUT LINE BEING * FILE 047
DELETED AFTER ASSIGNMENT. THE DD STATEMENT IS * FILE 047
THEN FORMATTED BY BEING COPIED ONE PARAMETER AT A * FILE 047
TIME OVER TO "TABLEOUT". FROM "TABLEOUT" NEW * FILE 047
LINES ARE INSERTED INTO THE DATASET TO CONTAIN * FILE 047
THE REFORMATTED DD STATEMENT. SINCE THE NUMBER OF * FILE 047
LINES IN THE DATASET COULD HAVE INCREASED, THE * FILE 047
LINE NUMBER OF THE LAST LINE IS RE-CALCULATED AS * FILE 047
NECESSARY AND REMEMBERED IN VARIABLE "LLINE". * FILE 047
- LISTICAT - * FILE 047
NAME LISTICAT * FILE 047
FUNCTION LIST THE CONTENTS OF AN ICF CATALOG * FILE 047
AND SELECTED DSCB AND VVDS FIELDS. * FILE 047
DESCRIPTION THE UCBS OF ALL ONLINE DASD VOLUMES * FILE 047
ARE LOCATED AND AN ATTEMPT IS MADE TO * FILE 047
ALLOCATE SYS1.VVDS.VVOLSER. IF THIS * FILE 047
WORKS AN ACB AND RPL ARE GENERATED AND * FILE 047
THEIR ADDRESSES ARE SAVED IN A LOOKUP * FILE 047
TABLE. THE BCS CLUSTER IS OPENED AS A * FILE 047
DATASET AND READ SEQUENTIALLY. THE BCS * FILE 047
RECORDS ARE SCANNED FOR CELL TYPES AND * FILE 047
THE FOLLOWING CELLS ARE LISTED: * FILE 047
NONVSAM * FILE 047
CLUSTER * FILE 047
INDEX * FILE 047
DATA * FILE 047
AIX * FILE 047
PATH * FILE 047
GDG BASE * FILE 047
GDG ENTRY * FILE 047
FOR NONVSAM ENTRIES THE FORMAT1 AND, * FILE 047
IF IT EXISTS THE FORMAT 3, DSCB IS * FILE 047
"OBTAINED" TO DETERMINE IF THE OBJECT * FILE 047
EXISTS. IF IT DOES THE LRECL, BLKSIZE * FILE 047
AND TOTAL TRACKS ALLOCATED ARE * FILE 047
EXTRACTED. IF THE OBJECT IS * FILE 047
CATALOGED TO VOLSER "MIGRAT" THE * FILE 047
DFHSM MIGRATION CONTROL DATASET IS * FILE 047
OPENED (SYSUT2) AND USED INSTEAD OF * FILE 047
THE VTOC. * FILE 047
* FILE 047
FOR DATA AND INDEX ENTRIES THE VVDS OF * FILE 047
THE VOLUME IN QUESTION, IF AVAILABLE, * FILE 047
IS SCANNED TO DETERMINE THE LRECL, * FILE 047
BLKSIZE AND TRACK ALLOCATION OF THE * FILE 047
OBJECT. * FILE 047
* FILE 047
ENVIRONMENT OS/VS2 MVS, JDM1113 OR HDQ1102 * FILE 047
MVS/XA 2.1.7 DF/HSM 2.1.0 * FILE 047
(HAS BEEN RUN ON MVS/ESA.) * FILE 047
INPUT THE BCS OF THE ICF CATALOG TO BE * FILE 047
LISTED. * FILE 047
OUTPUT OUTPUT CONSISTS OF A LISTING OF THE * FILE 047
CATALOG. * FILE 047
- NOCELL - * FILE 047
NAME NOCELL * FILE 047
INTRODUCTION * FILE 047
NOCELL IS A UTILITY THE PURPOSE OF WHICH IS TO * FILE 047
ANALYZE ALLOCATED DATASETS. THE PROGRAM CAN * FILE 047
PROCESS ALL DATASETS OR SELECT A SUBSET, AND * FILE 047
PRODUCE DETAIL LISTINGS OR SUMMARY REPORTS. * FILE 047
JCL REQUIREMENTS. * FILE 047
NOCELL CAN BE EXECUTED USING THE FOLLOWING JCL: * FILE 047
//STEP EXEC PGM=NOCELL,REGION=4096K * FILE 047
//STEPLIB DD DSN=,DISP=SHR * FILE 047
//SYSUT1 DD DSN=,DISP=SHR * FILE 047
//SYSUT2 DD DSN=,DISP=SHR * FILE 047
//VMF DD DSN=,DISP=SHR * FILE 047
//CATALOG DD DSN=,DISP=SHR * FILE 047
//SYSUDUMP DD SYSOUT= * FILE 047
//SYSIN DD * FILE 047
/* * FILE 047
INSTALLATION JCL TO INSTALL NOCELL IS CONTAINED IN * FILE 047
MEMBER $INSTALL WHICH ASSEMBLES AND * FILE 047
LINKS THE CODE AND COPIES THE * FILE 047
ELEMENTS OF THE ISPF DIALOG TO THE * FILE 047
PROPER LIBRARIES * FILE 047
DOCUMENTATION A USER'S GUIDE COMPLETE WITH JCL * FILE 047
EXAMPLES IS IN MEMBER $DOC. YOU WILL * FILE 047
NEED IBM'S DCF TO PRINT THIS MEMBER. * FILE 047
- RMFIII - * FILE 047
NAME ERB3POST * FILE 047
FUNCTION READS THE DATASET PRODUCED BY RMF 3.4 * FILE 047
MONITOR III, WRITES A REPORT OF * FILE 047
POSSIBLE ANOMALIES AND WRITES TWO * FILE 047
SEQUENTIAL FILES (ONE ABOUT ADDRESS * FILE 047
SPACES AND ONE ABOUT DEVICES) * FILE 047
SUMMARIZING THE MONITOR III * FILE 047
MEASUREMENTS. * FILE 047
DESCRIPTION THE DATASET PRODUCED BY RMF MONITOR * FILE 047
III AS OF 3.4 IS NOT IN ANY WAY * FILE 047
NORMAL. IT IS A VSAM ESDS OF 32K * FILE 047
RECORDS. THE 1ST RECORD, AFTER SOME * FILE 047
DESCRIPTIVE DATA IS FILLED WITH AN * FILE 047
ARRAY OF 28 BYTE POINTERS DESCRIBING * FILE 047
"SETS OF SAMPLES". A SET OF SAMPLES * FILE 047
IS WHAT MONITOR III CALCULATES EVERY * FILE 047
"MINTIME" SECONDS. THE SAMPLE DATA * FILE 047
FILLS RECORDS 2 THROUGH N. THE CATCH * FILE 047
IS THAT MONITOR III KEEPS TRACK OF * FILE 047
WHERE THINGS ARE IN THE DATASET BY * FILE 047
USING OFFSET FIELDS THAT ARE RELATIVE * FILE 047
TO BYTE 0 OF RECORD 1. IN EFFECT WHAT * FILE 047
YOU HAVE IS A CHECKPOINTED COPY OF AN * FILE 047
INCORE ARRAY OF SOME KIND, NOTHING IN * FILE 047
RECORDS 2 TO N IS IN ANY NECESSARY * FILE 047
ORDER. THEREFORE, IN ORDER TO PROCESS * FILE 047
THIS MESS YOU NEED THE WHOLE THING IN * FILE 047
CORE. * FILE 047
* FILE 047
ERB3POST PROCESSES BY READING THE * FILE 047
ENTIRE DATASET INTO MEMORY AND THEN * FILE 047
LOOPING OVER ALL SET OF SAMPLES * FILE 047
POINTERS IN RECORD 1. FOR EACH OF * FILE 047
THESE, TWO SUBROUTINES ARE CALLED ONE * FILE 047
TO PROCESS ASID'S AND ONE TO PROCESS * FILE 047
DEVICES. ASIDS AND DEVICES ARE EACH * FILE 047
HELD IN A TABLE POINTED TO BY THE SET * FILE 047
OF SAMPLES HEADER WHICH IS POINTED TO * FILE 047
FROM RECORD 1. THE SUBROUTINES PRINT * FILE 047
A LINE OF THE REPORT IF THE DELAY * FILE 047
PERCENTS SEEM HIGH AND WRITE A RECORD * FILE 047
TO THE EXTRACT FILES. THE DATA * FILE 047
WRITTEN TO THE EXTRACT FILES IS * FILE 047
ESSENTIALLY WHAT YOU WOULD SEE WITH * FILE 047
THE "DELAYJ" AND "DEVR" COMMANDS * FILE 047
UNDER RMFWDM. * FILE 047
ENVIRONMENT MVS/XA 2.1.7 * FILE 047
RMF 3.4 * FILE 047
DFP/XA 2.2 * FILE 047
INPUT A DATASET PRODUCED BY RMF MONITOR * FILE 047
III. * FILE 047
OUTPUT A PRINTED REPORT OF JOBS AND DEVICES * FILE 047
WITH HIGH DELAYS * FILE 047
A SEQUENTIAL FILE, ONE RECORD PER * FILE 047
ASID PER SET OF SAMPLES. * FILE 047
A SEQUENTIAL FILE, ONE RECORD PER * FILE 047
DEVICE PER SET OF SAMPLES. * FILE 047
- SASGTF - * FILE 047
SASGTF - A SAS PROGRAM TO DECODE GTF SVC TRACE * FILE 047
RECORDS. * FILE 047
- SASHSM - * FILE 047
THIS MEMBER CONTAINS 3 SAS PROGRAMS: * FILE 047
HLIST - READS THE DFHSM CONTROL DATASETS AND * FILE 047
PRINTS REPORTS. INTENDED TO ANALYZE THE * FILE 047
EFFECTIVENESS OF HSM IMPLEMENTATION. * FILE 047
HSMFSR - READS THE "FUNCTION STATISTICS RECORDS" * FILE 047
THAT DFHSM WRITES TO SMF. REPORTS ON * FILE 047
FUNCTIONS THAT DIDN'T WORK, HOW OFTEN * FILE 047
THINGS HAPPENED AND HOW LONG THEY TOOK. * FILE 047
HSMLOG - READS THE DFHSM LOG DATASET AND PRINTS * FILE 047
PLOTS OF WHEN THINGS HAPPENED. * FILE 047
- SASRMF79 - * FILE 047
SASRMF79 - A SAS PROGRAM TO PROCESS RMF TYPE 79 * FILE 047
RECORDS. SPECIFICALLY IT DEALS WITH * FILE 047
RECORDS PRODUCED BY THE OPTIONS ASD, * FILE 047
SRCS AND SPAG TO PLOT DATA ON 3090 * FILE 047
EXTENDED STORAGE USAGE (SUCH LITTLE DATA * FILE 047
AS THERE IS, ANYWAY). * FILE 047
- SASSYSLG - * FILE 047
SASSYSLG - A SET OF SAS PROGRAMS TO POST-PROCESS * FILE 047
SYSLOG DATA. WE USED THESE TO DESIGN OUR * FILE 047
MPF LIST AMONG OTHER THINGS. * FILE 047
- SASTLMS - * FILE 047
SASTLMS - A SAS PROGRAM TO REDUCE THE CONTENTS OF * FILE 047
THE TLMSII VOLUME MASTER FILE TO A SAS * FILE 047
DATABASE AND TO PRODUCE A REPORT FROM * FILE 047
IT ON LOW VOLUME TAPE DATASETS. * FILE 047
- SMPELIST - * FILE 047
SMPELIST - AN ASSEMBLER PROGRAM TO PRODUCE A * FILE 047
SOMEWHAT MORE COMPACT LISTING OF THE * FILE 047
MAC, MOD AND SYSMOD ENTRIES IN AN SMP-E * FILE 047
CSI DATASET. * FILE 047
* FILE 047
is a pds which contains the LISTVOL and LISTSPC * FILE 048
TSO commands, and it contains the LOCINDEX * FILE 048
subroutine, which they both need. * FILE 048
* FILE 048
HELP data for both commands is also contained in * FILE 048
this file. These programs used to exist in separate * FILE 048
files on the tape (since 1976 or so), and now these * FILE 048
files have been combined into one file. * FILE 048
* FILE 048
IS CURRENTLY EMPTY * FILE 049
* FILE 049
is an Internet Surfing file, which contains some * FILE 050
URL addresses for MVS-related sites on the Internet. * FILE 050
This file is intended to make looking for tools a * FILE 050
little easier. Sometimes, a good tool is available * FILE 050
on the Internet, but for some reason, it isn't a * FILE 050
good candidate to put on the CBT Tapes themselves. * FILE 050
This file is therefore intended as a pointer, to * FILE 050
help you get these materials yourself. * FILE 050
* FILE 050
File 050 lists sites which have free software * FILE 050
that is dowloadable, whereas File 051 lists vendor * FILE 050
software sites. * FILE 050
* FILE 050
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - * FILE 050
* FILE 050
No responsibility is assumed by anybody connected * FILE 050
with the CBT Tape materials, for anything that was * FILE 050
downloaded by anybody from any of these sites. * FILE 050
These sites are not under our control, and they may * FILE 050
change at any time. The URL's to get there, are * FILE 050
provided, just so that people can find out about * FILE 050
those materials, to determine if they are useful * FILE 050
to them. We do not guarantee in any way, that any * FILE 050
URL's will stay up-to-date. * FILE 050
* FILE 050
Actually, the purpose for creating this file, is to * FILE 050
let people know about materials that are specifically * FILE 050
NOT on the CBT Tape in the form that they are in. * FILE 050
Either they belong to somebody, or are copyrighted by * FILE 050
somebody, but the bottom line is that somebody else * FILE 050
controls them. It is understood that there is no * FILE 050
implied or explicit responsibility assumed by any * FILE 050
individual or corporate entity having to do with the * FILE 050
CBT Tape materials in any way, concerning anything * FILE 050
obtained at these sites, in the past or in the * FILE 050
future. Use all of these materials at your own * FILE 050
risk, or don't use them at all. * FILE 050
* FILE 050
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - * FILE 050
* FILE 050
Member - Short Description of Materials Available * FILE 050
------ ---------------------------------------- * FILE 050
* FILE 050
ALCOCK - Dave Alcock's home page * FILE 050
CBTTAPE - Online CBT Tape site * FILE 050
DAVECOLE - Dave Cole's updated free software * FILE 050
FADH - VM-like TSO/MVS tools and other stuff * FILE 050
FREEC - Free C Language Compiler that runs under * FILE 050
OS/390 Open Edition * FILE 050
LORIAUX - A tremendous collection of links to MVS * FILE 050
sites and S390 job information * FILE 050
NADEL - Doug Nadel's site. Contains TASID and a * FILE 050
lot of other good stuff. Could not be put * FILE 050
on the CBT Tape because of IBM copyright. * FILE 050
* FILE 050
is an Internet Surfing file, which contains some * FILE 051
URL addresses for MVS-related sites on the Internet. * FILE 051
This file is intended to make looking for tools a * FILE 051
little easier. Sometimes, a good tool is available * FILE 051
on the Internet, but for some reason, it isn't a * FILE 051
good candidate to put on the CBT Tapes themselves. * FILE 051
This file is therefore intended as a pointer, to * FILE 051
help you get these materials yourself. * FILE 051
* FILE 051
File 051 lists commercial (or pay, or vendor- * FILE 051
supported software), downloadable or listed at * FILE 051
Internet sites. * FILE 051
* FILE 051
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - * FILE 051
* FILE 051
No responsibility is assumed by anybody connected * FILE 051
with the CBT Tape materials, for anything that was * FILE 051
downloaded by anybody from any of these sites. * FILE 051
These sites are not under our control, and they may * FILE 051
change at any time. The URL's to get there, are * FILE 051
provided, just so that people can find out about * FILE 051
those materials, to determine if they are useful * FILE 051
to them. We do not guarantee in any way, that any * FILE 051
URL's will stay up-to-date. * FILE 051
* FILE 051
Actually, the purpose for creating this file, is to * FILE 051
let people know about materials that are specifically * FILE 051
NOT on the CBT Tape in the form that they are in. * FILE 051
Either they belong to somebody, or are copyrighted by * FILE 051
somebody, but the bottom line is that somebody else * FILE 051
controls them. It is understood that there is no * FILE 051
implied or explicit responsibility assumed by any * FILE 051
individual or corporate entity having to do with the * FILE 051
CBT Tape materials in any way, concerning anything * FILE 051
obtained at these sites, in the past or in the * FILE 051
future. Use all of these materials at your own * FILE 051
risk, or don't use them at all. * FILE 051
* FILE 051
- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - * FILE 051
* FILE 051
Member - Short Description of Materials Available * FILE 051
------ ---------------------------------------- * FILE 051
* FILE 051
DIGNUS - Dignus SYSTEMS/C C compiler to BAL * FILE 051
assembler. This is like PL/X, except that * FILE 051
it's a standard C language compiler. * FILE 051
Output is IBM S390 assembler code. * FILE 051
(This is a vendor product.) * FILE 051
At this site you can do C compiles online * FILE 051
(up to 200 lines), and get assembler output, * FILE 051
so you can see how this compiler works. * FILE 051
See also Files 419 and 420. * FILE 051
* FILE 051
FASTPATH - FastPath Inc. provides inexpensive (a la * FILE 051
MacKinney) software products, currently * FILE 051
emphasizing backup and recovery. ReMember * FILE 051
saves many copies of program source code * FILE 051
during the development process. FX2000 * FILE 051
provides quick VSAM and IAM backups and * FILE 051
restores, saving a lot of time from your * FILE 051
batch window. * FILE 051
* FILE 051
MACKINNE - MacKinney Systems index of products. * FILE 051
MacKinney is a provider of inexpensive but * FILE 051
useful software for MVS, CICS, and VSE. * FILE 051
This is contact information for the company * FILE 051
and an informal list of their products. * FILE 051
* FILE 051
IS CURRENTLY EMPTY * FILE 052
* FILE 052
IS FROM DELUXE CHECK PRINTERS AND IS PART OF THE * FILE 053
ISPF SYSTEM THEY SENT TO THE TAPE. THIS FILE IS * FILE 053
IN IEBUPDTE SYSIN FORMAT AND CONTAINS SOURCE * FILE 053
* FILE 053
IS FROM DELUXE CHECK PRINTERS AND IS PART OF THE * FILE 054
ISPF SYSTEM THEY SENT TO THE TAPE. THIS FILE IS * FILE 054
IN IEBUPDTE SYSIN FORMAT AND CONTAINS ISPF PANELS * FILE 054
* FILE 054
IS FROM DELUXE CHECK PRINTERS AND IS PART OF THE * FILE 055
ISPF SYSTEM THEY SENT TO THE TAPE. THIS FILE IS * FILE 055
IN IEBUPDTE SYSIN FORMAT AND CONTAINS ISPF MSGS * FILE 055
* FILE 055
IS FROM DELUXE CHECK PRINTERS AND IS PART OF THE * FILE 056
ISPF SYSTEM THEY SENT TO THE TAPE. THIS FILE IS IN * FILE 056
IEBUPDTE SYSIN FORMAT AND CONTAINS ISPF SKELETONS * FILE 056
* FILE 056
IS FROM DELUXE CHECK PRINTERS AND IS PART OF THE * FILE 057
ISPF SYSTEM THEY SENT TO THE TAPE. THIS FILE IS * FILE 057
IN IEBCOPY FORMAT AND CONTAINS ISPF CLISTS * FILE 057
* FILE 057
IS A TSO COMMAND CALLED LINKLIST FROM MR CHUCK * FILE 058
HOFFMAN OF GTE LABS IN WALTHAM, MA. THIS TSO * FILE 058
COMMAND PROCESSOR SHOWS THE SYSTEM ID AND THE * FILE 058
LINKLIST FOR THE RUNNING SYSTEM * FILE 058
* FILE 058
IS A COMBINATION OF CLISTS AND ASSEMBLER PROGRAMS * FILE 059
TO DISPLAY LAST IPL INFORMATION AND TODAY'S DATE * FILE 059
ON A HANDY ISPF PANEL. THIS FILE IS FROM KEN TOMIAK * FILE 059
OF THE DEPT OF INFORMATION TECHNOLOGY AND TELECOMMU- * FILE 059
NICATIONS (DOITT) OF NEW YORK CITY. * FILE 059
* FILE 059
THERE IS A SMALL ADDITION FROM SAM GOLOB. THIS IS * FILE 059
A PANEL CALLED "IDPANEL" WITH A REXX EXEC CALLED * FILE 059
"SMCASID". THIS PANEL IS MEANT TO BE EXECUTED VIA * FILE 059
AN ENTRY IN YOUR ISPF COMMAND TABLE ISPCMDS. THIS * FILE 059
PANEL SHOWS USEFUL INFORMATION ABOUT YOUR CURRENT * FILE 059
ISPF SESSION THAT IS INVOKING IT. THE REXX EXEC * FILE 059
"SMCASID" OBTAINS YOUR SYSTEM ID AND PUTS IT INTO * FILE 059
AN ISPF VARIABLE IN THE SHARED POOL. THIS IS GOOD * FILE 059
IF YOU HAVE MULTIPLE SYSTEMS LIKE WE HAVE. IF YOU * FILE 059
HAVE ONLY ONE SYSTEM, YOU CAN CHANGE IDPANEL TO * FILE 059
DELETE THE REFERENCES TO &SYSID AND THE COMMAND * FILE 059
SMCASID WHICH OBTAINS IT. THEN YOU DON'T NEED THE * FILE 059
REXX EXEC. IF YOU HAVE TSO/E 1.4 OR BELOW (WITHOUT * FILE 059
REXX) YOU HAVE TO DO THIS ANYWAY, OR USE AN * FILE 059
ASSEMBLER PROGRAM TO GET THE SYSTEM ID INTO A * FILE 059
VARIABLE INSTEAD. * FILE 059
* FILE 059
IS THE SOFTWARE STATUS REPORT ISPF APPLICATION FROM * FILE 060
MR CHARLES WELLS OF THE GEORGIA DEPARTMENT OF LABOR. * FILE 060
SOFTWARE STATUS REPORT IS AN ISPF APPLICATION * FILE 060
CONSISTING OF 3 LOAD MODULES, 2 CLISTS, 5 ISPF * FILE 060
PANELS, 5 ISPF TUTORIAL PANELS, AND 4 ISPF MESSAGE * FILE 060
MEMBERS. IT ALLOWS RECORDING OF SOFTWARE PRODUCTS * FILE 060
INSTALLED ON YOUR SYSTEM AND MAINTENANCE HISTORY FOR * FILE 060
EACH PRODUCT. PRODUCTS CAN BE DISPLAYED BY PRODUCT * FILE 060
NAME, ACRONYM, VENDOR, CATEGORY, FMID OR PTF/MOD. A * FILE 060
FORMATTED HARDCOPY REPORT CAN BE PRODUCED, WITH * FILE 060
PRODUCTS ORGANIZED ON THE REPORT ACCORDING TO * FILE 060
CUSTOMIZABLE COMBINATIONS OF VENDOR AND CATEGORY. * FILE 060
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 060
ALL THE SOURCE AND ISPF PANELS * FILE 060
THIS FILE GOES WITH FILES 061 062 063 064 * FILE 060
* FILE 060
IS THE SOFTWARE STATUS REPORT FROM THE GEORGIA * FILE 061
DEPARTMENT OF LABOR. THIS FILE CONTAINS THE * FILE 061
THE LOAD MODULES AND IS IN IEBCOPY FORMAT * FILE 061
THIS FILE GOES WITH FILES 060 062 063 064 * FILE 061
* FILE 061
IS THE SOFTWARE STATUS REPORT FROM THE GEORGIA * FILE 062
DEPARTMENT OF LABOR. THIS FILE CONTAINS THE * FILE 062
ONE RECORD FOR INITIALIZING SSRV.SOFTSTAT.INDXTBL * FILE 062
IT IS LRECL=2040 BLKSIZE=2040 RECFM=FB * FILE 062
THIS FILE GOES WITH FILES 060 061 063 064 * FILE 062
* FILE 062
IS THE SOFTWARE STATUS REPORT FROM THE GEORGIA * FILE 063
DEPARTMENT OF LABOR. THIS FILE CONTAINS THE * FILE 063
ONE RECORD FOR INITIALIZING SSRV.SOFTSTAT.PRODTBL * FILE 063
IT IS LRECL=8180 BLKSIZE=8180 RECFM=FB * FILE 063
THIS FILE GOES WITH FILES 060 061 062 064 * FILE 063
* FILE 063
IS THE SOFTWARE STATUS REPORT FROM THE GEORGIA * FILE 064
DEPARTMENT OF LABOR. THIS FILE CONTAINS THE * FILE 064
ONE RECORD FOR INITIALIZING SSRV.SOFTSTAT.HISTORY * FILE 064
IT IS LRECL=53 BLKSIZE=53 RECFM=FB * FILE 064
THIS FILE GOES WITH FILES 060 061 062 063 * FILE 064
* FILE 064
IS FROM MR JAMES PURDY OF REVLON IN NEW JERSEY AND * FILE 065
CONTAINS A MODIFICATION TO MODULE IEAVNP03 TO * FILE 065
RECOGNIZE A DATASET IN THE LINKLIST THAT IS EITHER * FILE 065
NOT CATALOGED OR IS CATALOGED BUT NOT IN THE MVS * FILE 065
MASTER CATALOG. THERE ARE SEVERAL LEVELS OF THE * FILE 065
MODIFICATION IN THIS FILE * FILE 065
* FILE 065
WHAT ELSE IS NEW? JIM ISN'T AT REVLON ANY MORE. * FILE 065
HIS CURRENT ADDRESS IS: * FILE 065
* FILE 065
JAMES PURDY * FILE 065
ANDERSEN CONSULTING * FILE 065
1345 MEADOW GLEN * FILE 065
SOUTHLAKE, TX 76092 * FILE 065
(214) 402-7511 * FILE 065
* FILE 065
IS FROM MR ALAN FIELD OF SUPER VALU IN EDEN PRAIRIE, * FILE 066
MINNESOTA AND CONTAINS SEVERAL OF THEIR UTILITIES. * FILE 066
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 066
THE FOLLOWING * FILE 066
* FILE 066
email: alan.field@supervalu.com * FILE 066
* FILE 066
1. CLIST - SOME CLISTS TO DEMONSTRATE THE USE * FILE 066
OF SOME OF THE UTILITIES INCLUDED IN * FILE 066
THIS FILE. * FILE 066
* FILE 066
2. CNTL - JCL TO RUN SOME OF THE UTILITIES * FILE 066
INCLUDED IN THIS FILE. * FILE 066
* FILE 066
3. ASM - ASSEMBLER LANGUAGE SOURCE FOR SOME * FILE 066
USEFUL UTILITIES. * FILE 066
* FILE 066
CPCMD - ENABLES MVS USERS RUNNING UNDER * FILE 066
VM TO ISSUE CP COMMANDS AND GET * FILE 066
THE RESPONSES BACK AT THEIR TSO * FILE 066
TERMINAL. CAN ALSO EXECUTED AS A * FILE 066
BATCH PROGRAM OR STARTED TASK. * FILE 066
LINK IT WITH AN ALIAS OF CP. ON * FILE 066
TSO THEN ENTER CP Q DASD FOR * FILE 066
EXAMPLE, OR CP ATT 58A MVS. * FILE 066
* FILE 066
DASDSUB - SUBROUTINE TO OBTAIN UCB * FILE 066
INFORMATION * FILE 066
* FILE 066
DISASM3B - THE SVC TABLE FROM THE * FILE 066
DISASSEMBLER ON THE CBT TAPE. * FILE 066
MODIFIED FOR MVSXA AND COPIED * FILE 066
INTO SVCTAB. * FILE 066
* FILE 066
DSSLVL - DISPLAY CURRENT DF/DSS PROGRAM * FILE 066
LEVEL. * FILE 066
* FILE 066
JULSUB - DATE CONVERSION SUBROUTINE. * FILE 066
* FILE 066
LASTCLPA - COMMAND TO DISPLAY DATE AND TIME * FILE 066
OF LAST CLPA. A COMPANION * FILE 066
PROGRAM TO LASTIPL WHICH IS ON * FILE 066
THE CBT TAPE. * FILE 066
* FILE 066
LNKLST - DISPLAY NAMES OF LINK LIST * FILE 066
DATASETS CURRENTLY IN USE. * FILE 066
* FILE 066
RACFDS - DISPLAY DATA ABOUT THE RACF * FILE 066
DATASET(S) IN USE. * FILE 066
* FILE 066
SMFDS - DISPLAY DATA ABOUT CURRENT SMF * FILE 066
DATASET USAGE. * FILE 066
* FILE 066
SVCTAB - PROGRAM TO DISPLAY SVCTABLE. * FILE 066
* FILE 066
TODCN - PROGRAM TO CONVERT TIMESTAMPS * FILE 066
INTO REAL DATES AND TIMES. * FILE 066
* FILE 066
VSAMNAME - CONVERT AND DISPLAY 'REAL' * FILE 066
DATASET NAMES ASSIGNED BY VSAM * FILE 066
FOR PAGE, MAN ETC. * FILE 066
* FILE 066
4. MACROS - MACROS NECESSARY TO ASSEMBLE SOURCE * FILE 066
IN MEMBER ASM. * FILE 066
* FILE 066
5. PLI - SOME PL/I UTILITIES. * FILE 066
* FILE 066
IS FROM COCA COLA IN ATLANTA AND CONTAINS TWO EXITS * FILE 067
THAT ARE USED TO CONTROL VIO ALLOCATION, SIZE, * FILE 067
FORCE TSO TEMPORARY DATA SETS TO DEDICATED TSO * FILE 067
"PUBLIC" VOLUMES AND A FEW OTHER MISCELLANEOUS * FILE 067
FUNCTIONS. THIS FILE IS IN IEBUDPTE SYSIN FORMAT * FILE 067
AND CONTAINS THE FOLLOWING : * FILE 067
* FILE 067
IEFDB401: * FILE 067
* FILE 067
SVC99 EXIT TO ALLOCATE TSO TEMPORARY DATASETS TO * FILE 067
A TSO ONLY SCRATCH PACK AND CONTROL THE SIZE OF * FILE 067
VIO DATA SETS FROM TSO. THIS EXIT CHANGES THE * FILE 067
UNIT NAME FOR ALL DYNAMIC ALLOCATIONS TO SUPPORT * FILE 067
THE FOLLOWING FUNCTIONS: * FILE 067
* FILE 067
1) CONTROL VIO ALLOCATION SIZE. THIS REQUIRES * FILE 067
THE USER TO SPECIFY UNIT(VIOALLOC). * FILE 067
UNIT=VIOALLOC IS NOT VALID IN THE SYSGEN * FILE 067
PARAMETERS. IF THE SPACE= SPECIFIES A * FILE 067
VALID AMOUNT OF DISK SPACE, THE UNIT= IS * FILE 067
CHANGED TO UNIT=VIODA WHICH IS A 3340. IF * FILE 067
UNIT=VIODA IS CODED IN THE JCL OR THE * FILE 067
SPACE= IS TOO LARGE, THE UNIT= IS CHANGED * FILE 067
TO UNIT=SYSDA. * FILE 067
* FILE 067
2) FORCE TSO TEMPORARY DATASETS TO A DEDICATED * FILE 067
"PUBLIC" VOLUME. UNIT(VIOALLOC) IS * FILE 067
SPECIFIED TO INVOKE THIS SERVICE. IF THE * FILE 067
SPACE= IS MET IN 1) ABOVE, THE DATASET GOES * FILE 067
TO VIO; OTHERWISE A CHECK IS MADE TO VERIFY * FILE 067
THAT THE DYNAMIC ALLOCATION IS MADE BY A * FILE 067
TSO USER. IF IT IS A TSO USER, UNIT=TSODA * FILE 067
IS USED TO FORCE TSO DATASETS TO DEDICATED * FILE 067
TSO "PUBLIC" VOLUMES. ANY ATTEMPT TO CODE * FILE 067
UNIT(TSODA) IS REPLACED BY UNIT(SYSDA). * FILE 067
* FILE 067
3) VERIFY THAT ALL IMS ALLOCATION OF AN * FILE 067
INTERNAL READER COMES FROM PROGRAM * FILE 067
O9061S75. THIS IS TO ENSURE THAT ACF2 HAS * FILE 067
THE CORRECT SYSTEM ID FOR JOBS SUBMITTED BY * FILE 067
IMS TRANSACTIONS. AN ATTEMPT TO VIOLATE * FILE 067
ACF2 REQUIREMENTS GETS THE USER A S0C3. * FILE 067
* FILE 067
4) UNIT=DISK IS SUBSTITUTED FOR ALL UNIT=XXXX * FILE 067
WHERE XXXX IS EXACTLY FOUR CHARACTERS LONG. * FILE 067
* FILE 067
IEFUJV: * FILE 067
* FILE 067
SMF EXIT TO CHANGE JCL TO MEET COMPANY STANDARDS. * FILE 067
IT SUPPORTS THE MSVGP= PARAMETER FOR A NON-3850 * FILE 067
ENVIRONMENT, CONTROLS VIO SPACE ALLOCATION AND * FILE 067
SEVERAL OTHER MISCELLANEOUS FUNCTIONS. SUPPORTS * FILE 067
THE FOLLOWING FUNCTIONS: * FILE 067
* FILE 067
I. JOB CARD -- NO ACTION * FILE 067
* FILE 067
II. EXEC CARD * FILE 067
* FILE 067
1) WRITE AN SMF TYPE 131 RECORD IF A PROC IS * FILE 067
EXECUTED. THIS IS TO ALLOW DETERMINATION * FILE 067
WHICH PROCS ARE USED AND WHICH ARE NOT * FILE 067
* FILE 067
III. DD CARD * FILE 067
* FILE 067
1) CONTROL VIO ALLOCATION SIZE. THIS REQUIRES * FILE 067
THE USER TO SPECIFY UNIT=VIOALLOC. * FILE 067
UNIT=VIOALLOC IS NOT VALID IN THE SYSGEN * FILE 067
PARAMETERS. IF THE SPACE= SPECIFIES A * FILE 067
VALID AMOUNT OF DISK SPACE, THE UNIT= IS * FILE 067
CHANGED TO UNIT=VIODA WHICH IS A 3340. IF * FILE 067
UNIT=VIODA IS CODED IN THE JCL OR THE * FILE 067
SPACE= IS TOO LARGE, THE UNIT= IS CHANGED * FILE 067
TO UNIT=SYSDA. THIS JOB HAS THE NAME OF * FILE 067
TWO BATCH JOBS THAT ARE ALLOWED TO USE VIO, * FILE 067
OTHERWISE VIO IS RESTRICTED TO TSO USERS * FILE 067
ONLY. BOTH UNIT= AND SPACE= MUST BE ON THE * FILE 067
SAME CARD FOR THIS TO WORK. UNIT= MUST * FILE 067
ALSO BE THE LAST PARAMETER ON THE LAST CARD * FILE 067
OF A DD CARD CONCATENATION. * FILE 067
* FILE 067
2) FORCE TSO TEMPORARY DATASETS TO A DEDICATED * FILE 067
"PUBLIC" VOLUME. UNIT=VIOALLOC IS * FILE 067
SPECIFIED TO INVOKE THIS SERVICE. IF THE * FILE 067
SPACE= IS MET IN 1) ABOVE, THE DATASET GOES * FILE 067
TO VIO; OTHERWISE A CHECK IS MADE TO VERIFY * FILE 067
THAT THE DYNAMIC ALLOCATION IS MADE BY A * FILE 067
TSO USER. IF IT IS A TSO USER, UNIT=TSODA * FILE 067
IS USED TO FORCE TSO DATASETS TO DEDICATED * FILE 067
TSO "PUBLIC" VOLUMES. ANY ATTEMPT TO CODE * FILE 067
UNIT(TSODA) IS REPLACED BY UNIT(SYSDA). * FILE 067
BOTH UNIT= AND SPACE= MUST BE ON THE SAME * FILE 067
CARD FOR THIS TO WORK. * FILE 067
* FILE 067
3) MSVGP=GDGDAN IS OUR INSTALLATION * FILE 067
SPECIFICATION FOR DISK GDG DATASETS * FILE 067
(CURRENTLY 2 3380-BE4 UNITS WORTH). THE * FILE 067
CODE TO IMPLEMENT THIS IS IN THIS EXIT. * FILE 067
MSVGP= MUST BE THE ONLY USEFUL INFORMATION * FILE 067
ON THE LAST CARD OF A DD CARD CONTINUATION * FILE 067
FOR THIS TO WORK BECAUSE THE ENTIRE CARD IS * FILE 067
REPLACED. * FILE 067
* FILE 067
4) THE ARCHAIC FORM OF THE INTERNAL READER IS * FILE 067
CHANGED TO THE CURRENTLY SUPPORTED VERSION. * FILE 067
* FILE 067
IS CURRENTLY EMPTY * FILE 068
* FILE 068
IS FROM CARMINE A. CANNATELLO OF NEW YORK CITY * FILE 069
AND CONTAINS MACHINE-READABLE COPY OF THE * FILE 069
CODING EXAMPLES FROM HIS EXCELLENT BOOK, "ADVANCED * FILE 069
ASSEMBLER LANGUAGE AND MVS INTERFACES", PUBLISHED * FILE 069
BY JOHN WILEY AND SONS. * FILE 069
* FILE 069
This file contains coding examples from the * FILE 069
Second Edition of Carmine's book - revised 1999. * FILE 069
* FILE 069
THE ADDRESS OF THE PUBLISHER IS: * FILE 069
* FILE 069
John Wiley & Sons Inc. * FILE 069
Professional, Reference and Trade Group * FILE 069
605 Third Avenue * FILE 069
New York, NY 10158-0012 * FILE 069
(212) 850-6000 MAIN NUMBER * FILE 069
* FILE 069
web site: http://www.wiley.com/compbooks * FILE 069
* FILE 069
To order a copy of the second edition of this book, * FILE 069
please call: 1-800-225-5945 extension 2497 * FILE 069
ISBN number: 0471-361-763 * FILE 069
* FILE 069
THIS BOOK IS A CLEAR GUIDE TO JUST ABOUT EVERY * FILE 069
TYPE OF ASSEMBLER CODING YOU MIGHT DO IN A SYSTEMS * FILE 069
PROGRAMMING APPLICATION. THE KNOWLEDGE GIVEN IN * FILE 069
HIS BOOK WILL HELP YOU TO UNDERSTAND THE METHODS * FILE 069
BEHIND MUCH OF THE CODING THAT YOU'LL FIND ON THIS * FILE 069
TAPE. I HIGHLY RECOMMEND THAT YOU GET THIS BOOK * FILE 069
FOR YOUR OWN PROFESSIONAL IMPROVEMENT. (SAM GOLOB) * FILE 069
* FILE 069
CARMINE NORMALLY SELLS THIS MATERIAL ON A DISKETTE * FILE 069
FOR 50 DOLLARS. HE HAS GRACIOUSLY ALLOWED THE * FILE 069
MATERIAL TO APPEAR ON THIS TAPE FOR THE BENEFIT * FILE 069
OF WORKING PRACTITIONERS IN THIS FIELD. THIS FILE * FILE 069
WAS CREATED FROM CARMINE'S DISKETTE. * FILE 069
* FILE 069
SEVERAL MVS MODIFICATIONS IN SMP FORMAT THAT * FILE 070
HAVE BEEN RECEIVED FROM COMPUTER SCIENCES CORP. * FILE 070
SAN DIEGO, CALIFORNIA 92123. AS WITH EVERYTHING * FILE 070
ON THIS TAPE USE AT YOUR OWN RISK. * FILE 070
* FILE 070
CURRENT ADDRESS FOR INQUIRIES: * FILE 070
* FILE 070
C.M. SINGER * FILE 070
COMPUTER SCIENCES CORPORATION - TMD * FILE 070
MAIL ZONE W1-5311 * FILE 070
5021 KEARNY VILLA ROAD * FILE 070
SAN DIEGO, CALIFORNIA 92123-1407 * FILE 070
* FILE 070
TELEPHONE 619-573-3020 * FILE 070
* FILE 070
THE FOLLOWING IS A LIST OF THE MODIFICATIONS FROM * FILE 070
GENERAL DYNAMICS THAT ARE INCLUDED IN THIS FILE. * FILE 070
NOTE !. CODE THAT IS PROPRIETARY OR COPYRIGHTED IS * FILE 070
NOT INCLUDED EVEN THOUGH THE FOLLOWING LIST MAY IMPLY * FILE 070
THAT IT IS. * FILE 070
* FILE 070
ALLOW DF/DSS TO RESTORE TO ALLOC VOL * FILE 070
DF/DSS ENQ EXIT - SKIP ENQ FOR ALL VOLS * FILE 070
FORCE DF/DSS TO RESTORE DSN LIKE FDRDSF * FILE 070
UPDATE GDG BASE LEVEL AT STEP END * FILE 070
MAKE '#' TAB CHARACTER FOR TSO EDIT * FILE 070
CHANGE VARY ON MOUNT ATTRIB TO PRIVATE * FILE 070
DO NOT ALLOW VIO FOR LARGE DATASETS, ETC. * FILE 070
IMS/VS AND NETEX RESOURCE CLEANUP MOD * FILE 070
IGC0805A ZAP FOR IMSVS FORMATTED DUMPS * FILE 070
IEFU83 TO NOT WRITE CERTAIN RECORDS, ETC * FILE 070
MAKE DEFAULT TSO ALLOC DISP=SHR * FILE 070
BYPASS 'DATA SET NOT FREED MESSAGE' * FILE 070
REGION LIMIT VALUES * FILE 070
EXTEND CERTAIN TSO USERS WAIT TIME TO 5 HR * FILE 070
LIMIT NUMBER OF RECORDS FOR SYS1.BROADCAST * FILE 070
LOGON PARAMTER CSECT * FILE 070
INSTALL STEP END STATISTICS MODULE * FILE 070
MAKE REAL DASD NOT IN VATLST PRIV/RSVD * FILE 070
MAKE 'RETAIN' DEFAULT VOL SPECIFICATION * FILE 070
USE IEASYSXX AS DEFAULT (XX=F(CPU SERIAL)) * FILE 070
TSO SUBMIT EXIT - KILL BAD JOBNAMES * FILE 070
CHANGES TO HOT IO DETECTION CONSTANTS * FILE 070
SUPPLY OUR IEAVMXIT (CHANGE ROUTE CODES) * FILE 070
ADD X AS SUBCOMMAND OF EDIT * FILE 070
PUT ACCT NUMBER IN ACF2 ACCT FIELD * FILE 070
DECREASE GVTOLINT AND GVTMEINT * FILE 070
INCREASE NIP SQA ALLOCATION * FILE 070
SMF EXIT TO CATCH TYPE04 & 34 RECORDS * FILE 070
ZAP DYNALLOC TO SYSDA FROM SYSALLDA * FILE 070
ZAP EXTERNAL WTR FOR JESLOGX (AJSW040) * FILE 070
UPDATE MACRO FOR SYSOUT COST EST.(AJSW042) * FILE 070
INCREASE NUMBER OF DEVICES ALLOWED TO 512 * FILE 070
INTERACTIVE DATA TRANSMISSION OPTIONS DSECT * FILE 070
ACF2 PRE-VALIDATION EXIT * FILE 070
ACF2 VIOLATION EXIT * FILE 070
ACF2 LOGON POST VALIDATION EXIT * FILE 070
COMMAND LIMITING LIST FOR ACF2 * FILE 070
ACF2/IMS INSTALLATION OPTIONS PROD & TEST * FILE 070
ACF2 FDR RECORD DEFINITION * FILE 070
SKIP SECURITY CHECK FOR TAPES OUTSIDE TMS * FILE 070
ADD INFO TO TYPE 26 SMF RECORD * FILE 070
SET TRANSMISSION SEQUENCE FOR NJE SECTIONS * FILE 070
INSTALL NOTE11 NEXT-KEY FUNCTION * FILE 070
NOTE12 INSTALLATION UM12001 * FILE 070
MAKE OLDGENER ALIAS * FILE 070
ALLOW ISAM UPDATES WITH DISP=SHR * FILE 070
IF DATASET IS VIO THEN BUFNO=1 * FILE 070
PUT CHARGE NUMBER IN FMT1 DSCB * FILE 070
DF/DS DASD ALLOCATION PREPROCESSING EXIT * FILE 070
DF/DS DASD ALLOCATION POSTPROCESSING EXIT * FILE 070
CHANGES TO SYSGEN JOBCARD MACRO * FILE 070
SPF COMMAND TO FRONT END ISPF/PDF * FILE 070
TSO COMMAND IN ISPF COMMAND TABLE * FILE 070
MIGRATION VOLUME EXIT * FILE 070
HSM TAPE DATASET EXIT * FILE 070
HSM - ACF2 INTERFACE EXIT * FILE 070
HSM MIGRATION EXIT - LIMIT TO < 50 CYL. * FILE 070
ACF2,RINGCHK,EXPDTCHK,STARS FOR IMS,CICS * FILE 070
ACCT + MAKE LINES FOR STC + TSO = OUTLIM * FILE 070
NON-STANDARD LABEL VERIFY ROUTINE * FILE 070
ALLOW GENERAL INQUIRY CMDS FROM RJP TERMS * FILE 070
UPDATE GDG BASE LEVEL AT STEP END * FILE 070
JOB HEADER PAGE INFORMATION * FILE 070
ACCT (ACCT #) VALIDATION + DSP DICT. * FILE 070
(PRE AJSW003) / RESTRICTED CLASS CHECKING * FILE 070
DO NOT ALLOW PRTY=0 TO BE RELEASED * FILE 070
MAKE ANYLOCAL MEAN PRT3800 + PRT3211 * FILE 070
COMPUTE OSE PRIORITIES, CANCEL JUNK, * FILE 070
MAKE SOME STARTED TASKS CLASS A * FILE 070
DEFINE USER FIELDS IN MACRO IATYTVT * FILE 070
COMPUTE JOB PRIORITY + CHANGE CLASS * FILE 070
JOB TRAILER PAGE INFORMATION * FILE 070
DON'T MLOG VERIFY MESSAGES DURING CONNECT * FILE 070
ALLOW *T ALL COMMAND TO SEND TO ALL SYSTEMS * FILE 070
ALLOW GENERIC STATUS AND CHECK OWNERSHIP * FILE 070
SMF RECORDING FOR NJE SYSOUT DATASETS * FILE 070
CHANGE MULTILEAVING DELAY TO .50 SECS * FILE 070
RETURN NEW SECOND LEVEL MESSAGE TO STATUS * FILE 070
PUT JULIAN DATE IN MLG MESSAGES(FROM EDSC) * FILE 070
DELETE TIME STAMP FROM 3277 MESSAGES * FILE 070
USE RQNETID IF NET = *NET-ID* FOR DJC WTO * FILE 070
ALLOW ALL AS MPNAME ON *I G AND *F G CMDS * FILE 070
BYPASS DESTINATION VALIDATION FOR XWTRS * FILE 070
PUT DATASET LINECOUNT IN SSOB FOR XWTR * FILE 070
ACF2 CODE FOR JCL PROCESSING * FILE 070
DON'T PRINT JESMSG, SYSMSG, JESJCL HEADERS * FILE 070
DSP DICTIONARY ENTRIES * FILE 070
ADD INIT BLIP MESSAGE IAT0001 * FILE 070
CREATE WRITE-TO-PROGRAMMER DSP (WTP) * FILE 070
*V XXX,ALL WILL VARY DEVICE TO ALL SYSTEMS * FILE 070
SYSLOG/EXTERNAL WTR EXECUTIVE * FILE 070
COST ESTIMATE INFO * FILE 070
ENHANCEMENTS TO THE *I,B COMMAND * FILE 070
MODS TO JSM TO SCAN ALL JOBS + NO CANCEL * FILE 070
PROGRAM TO ISSUE JES3 COMMANDS * FILE 070
JESOPER COMMAND * FILE 070
ISSUE DEVICE CLOSE IF UNDER VM * FILE 070
SILO JES3 SUPPORT MODS * FILE 070
RESTRICTED CLASS VERIFICATON USERMOD * FILE 070
VTAM USER EXIT (FRANK NASH) * FILE 070
3767 USER OUTPUT EXIT ROUTINE * FILE 070
* FILE 070
IS A COLLECTION OF DOCUMENTATION FILES FROM OTHER * FILE 071
TAPES. INCLUDED TAPES ARE: * FILE 071
* FILE 071
===>> CBT OVERFLOW TAPE (HAS OTHER MATERIALS SUCH AS * FILE 071
EUROPEAN AND AUSTRALIAN G.U.I.D.E. TAPES, FULL * FILE 071
CONTENTS OF THE SPLA MVS TAPE - FINAL VERSION) * FILE 071
===>> CICS SHARE TAPE * FILE 071
===>> SHARE SOFTWARE DISTRIBUTION DISKETTES (FROM THE PC * FILE 071
WHICH CONTAINS CONTRIBUTED SOFTWARE AT SHARE MEETINGS) * FILE 071
===>> JES2 SHARE TAPE * FILE 071
===>> JES2 NON-SP SHARE TAPE * FILE 071
===>> JES3 SHARE/GUIDE TAPE * FILE 071
===>> LOS ANGELES MVS USERS GROUP TAPE (NOW IN CBT OVERFLOW) * FILE 071
===>> NASPA VIP MVS TAPE * FILE 071
===>> NASPA VIP VM/VSE TAPE * FILE 071
===>> NASPA BEEM TAPE * FILE 071
===>> PL/I SHARE TAPE * FILE 071
===>> SPLA MVS TAPE * FILE 071
===>> CBT TAPE VERSION 249 (BEFORE MASSIVE DELETION) * FILE 071
===>> XEPHON ARTICLES AND CODE, DOWNLOADABLE FROM * FILE 071
WWW.XEPHON.COM - 2 YEARS OLD OR MORE, ARE FREE... * FILE 071
* FILE 071
PUTTING THESE DOCUMENTATION FILES TOGETHER MAKES * FILE 071
INFORMATION RESIDING ON OTHER PUBLIC TAPES EASIER * FILE 071
TO FIND. * FILE 071
* FILE 071
ALSO SEE FILE 077 WHICH CONTAINS A TAPEMAP OF THE * FILE 071
LOS ANGELES MVS USERS GROUP TAPE. * FILE 071
* FILE 071
IS FROM MORRIS KARLIN OF THE HUMAN RESOURCES * FILE 072
ADMINISTRATION OF NEW YORK CITY, AND CONTAINS HIS * FILE 072
ISPF INTERFACE TO THE PANEXEC PRODUCT. IN ORDER * FILE 072
TO RUN THIS INTERFACE, YOU HAVE TO BE LICENSED FOR * FILE 072
THE PANEXEC PRODUCT, FORMERLY FROM PANSOPHIC, AND * FILE 072
NOW FROM COMPUTER ASSOCIATES. THIS FILE, AND FILES * FILE 072
073 THRU 076 WHICH COME TOGETHER WITH IT, CONTAIN * FILE 072
NO LICENSED MATERIALS. * FILE 072
* FILE 072
THIS FILE CONTAINS PANELS, SKELETONS, MESSAGES, AND * FILE 072
TABLES FOR THE PANEXEC ISPF INTERFACE. * FILE 072
* FILE 072
INSTALLATION MATERIAL FOR THIS PACKAGE IS CONTAINED * FILE 072
IN MEMBERS PXP000B1 THRU PXP000B8 OF THIS FILE. * FILE 072
THE INSTALLATION MATERIALS APPEAR IN ISPF TUTORIAL * FILE 072
PANEL FORMAT. * FILE 072
* FILE 072
IS FROM MORRIS KARLIN OF THE HUMAN RESOURCES * FILE 073
ADMINISTRATION OF NEW YORK CITY, AND CONTAINS THE * FILE 073
LOAD MODULES FOR HIS PANEXEC ISPF INTERFACE. * FILE 073
* FILE 073
IS FROM THE NATIONAL SYSTEMS PROGRAMMERS ASSOCIATION * FILE 074
(NASPA) AND CONTAINS A COLLECTION OF ASSEMBLER MACROS * FILE 074
TO INTERFACE TO ISPF. THE MACROS WERE WRITTEN BY * FILE 074
ROBERT BECKER, AND SOME OF THEM WERE MODIFIED BY * FILE 074
MORRIS KARLIN. THESE MACROS ARE NECESSARY TO * FILE 074
ASSEMBLE THE SOURCE CODE ON FILE 075. * FILE 074
* FILE 074
IS FROM MORRIS KARLIN OF THE HUMAN RESOURCES * FILE 075
ADMINISTRATION OF NEW YORK CITY, AND CONTAINS THE * FILE 075
ASSEMBLER SOURCE FOR HIS PANEXEC ISPF INTERFACE. * FILE 075
* FILE 075
IS FROM MORRIS KARLIN OF THE HUMAN RESOURCES * FILE 076
ADMINISTRATION OF NEW YORK CITY, AND CONTAINS THE * FILE 076
PANEXEC COMMAND PROCEDURES NECESSARY TO RUN THE * FILE 076
ISPF DIALOGS FOR HIS PANEXEC ISPF INTERFACE. * FILE 076
* FILE 076
IS CURRENTLY EMPTY * FILE 077
* FILE 077
IS FROM JOHN KALINICH OF THE U.S. ARMY IN ST LOUIS, * FILE 078
MISSOURI, WITH ONE ADDITION FROM LIONEL DYCK OF * FILE 078
KAISER PERMANENTE IN WALNUT CREEK, CA. THIS FILE * FILE 078
CONTAINS A COLLECTION OF ISPF EDIT MACROS AND OTHER * FILE 078
ISPF GOODIES. THIS FILE COMES FROM JOHN AND * FILE 078
LIONEL'S ISPF FILES ON THE SHARE CD ROM (SHARE * FILE 078
85 CURRENTLY), BUT JOHN PREPARED THIS VERSION FOR * FILE 078
CBT TAPE DISTRIBUTION SPECIFICALLY. * FILE 078
* FILE 078
ISPF Edit Macros & Dialogs * FILE 078
July 16, 1998 * FILE 078
* FILE 078
John Kalinich * FILE 078
USA Logistics Systems * FILE 078
Support Center * FILE 078
AMSEL-SE-BSD-LS-TD, Room 7.103 * FILE 078
1222 Spruce Street * FILE 078
St. Louis, MO. 63103-2834 * FILE 078
* FILE 078
314-331-4521 * FILE 078
314-331-4520 (FAX) * FILE 078
* FILE 078
SHARE Installation Code: ALM * FILE 078
Internet mailbox: jkalinic@csc.com * FILE 078
* FILE 078
.------------------------------------------------------. * FILE 078
| Feel free to call if you have any problems | * FILE 078
| with this code. | * FILE 078
| If you can't reach me by phone, then send me | * FILE 078
| an e-mail or fax. | * FILE 078
'------------------------------------------------------' * FILE 078
* FILE 078
File Ext Description * FILE 078
* FILE 078
$CHANGE LOG Changes to macros/dialogs since SHARE 78 * FILE 078
$INSTALL ME An attempt at install instructions * FILE 078
$READ ME What you are reading * FILE 078
$WARRAN TEE The standard "mods" disclaimer * FILE 078
#ACFCOMP PAN Tutorial panel for ACFCOMP macro * FILE 078
#ACFTRAP PAN Tutorial panel for ACFTRAP macro * FILE 078
#ASA2PC PAN Tutorial panel for ASA2PC macro * FILE 078
#BROWSE4 PAN Tutorial panel for BROWSE4 macro * FILE 078
#EOL PAN Tutorial panel for EOL macro * FILE 078
#FX PAN Tutorial panel for FX macro * FILE 078
#FXC PAN Tutorial panel for FXC macro * FILE 078
#GO PAN Tutorial panel for GO macro * FILE 078
#JC PAN Tutorial panel for JC macro * FILE 078
#LISTDSI PAN Tutorial panel for LISTDSI macro * FILE 078
#MEMLIST PAN Tutorial panel for MEMLIST macro * FILE 078
#OPER PAN Tutorial panel for OPER macro * FILE 078
#PLUG PAN Tutorial panel for PLUG macro * FILE 078
#PROFSET PAN Tutorial panel for PROFSET macro * FILE 078
#RUN PAN Tutorial panel for RUN macro * FILE 078
#RUNACF PAN Tutorial panel for RUNACF macro * FILE 078
#SHOWCUT PAN Tutorial panel for SHOWCUT macro * FILE 078
#TESTACF PAN Tutorial panel for TESTACF macro * FILE 078
#UNX PAN Tutorial panel for UNX macro * FILE 078
#WEAVE PAN Tutorial panel for WEAVE macro * FILE 078
ACFCOMP REX ACFCOMP macro - Compile the ACF2 rule * FILE 078
currently being edited * FILE 078
ACFTRAP REX ACFTRAP macro - Queue ACF subcommands and * FILE 078
trap output * FILE 078
ASA2PC REX ASA2PC macro - Convert ASA printer control * FILE 078
to ASCII code * FILE 078
BROWSE4 CLI BROWSE4 macro - Invoke ISPF Browse/View * FILE 078
while in edit * FILE 078
BROWZE CLI CLIST dialog to browse data sets (for ISPF * FILE 078
command table usage) * FILE 078
CALCP PAN Pop-up window used in CALC * FILE 078
command/COMPUTE dialog * FILE 078
CEILING REX REXX function to find smallest integer * FILE 078
>= argument * FILE 078
CLONEID REX REXX dialog to decomp a logonid into * FILE 078
INSERT format for cloning * FILE 078
COMPUTE REX REXX dialog to calculate Rexx * FILE 078
arithmetic expressions * FILE 078
DSK33XX CLI CLIST dialog for disk space calculation * FILE 078
(3350/3380/3390) * FILE 078
DSK33XX PAN ISPF panel for disk space calculation * FILE 078
(3350/3380/3390) * FILE 078
DVOL CLI CLIST dialog to display disk free space * FILE 078
stats from DVOL command * FILE 078
DVOL PAN ISPF panel for DVOL dialog * FILE 078
DVOLTBLH PAN Tutorial panel for DVOL table display * FILE 078
(short) * FILE 078
DVOLTBLL PAN ISPF panel used by DVOL table display * FILE 078
(long) * FILE 078
DVOLTBLS PAN ISPF panel used by DVOL table display * FILE 078
(short) * FILE 078
EB CLI CLIST dialog to Edit/Browse by the * FILE 078
numbers from a menu of DSNs * FILE 078
EBH01A PAN Tutorial panel for Edit/Browse menu * FILE 078
EBH01B PAN Turorial panel for Edit/Browse set * FILE 078
default modes and libraries * FILE 078
EB00 MSG ISPF messages for Edit/Browse dialog * FILE 078
EB01A PAN ISPF panel for Edit/Browse menu * FILE 078
EB01B PAN ISPF panel for Edit/Browse set default * FILE 078
modes and libraries * FILE 078
EDET CLI CLIST dialog to edit data sets (for * FILE 078
ISPF command table usage) * FILE 078
EDITALL REX Run an ISPF Edit macro against every * FILE 078
member of a PDS. (from Lionel Dyck) * FILE 078
EOL REX EOL macro - Set cursor at end of * FILE 078
current screen line * FILE 078
FLOOR REX REXX function to find largest integer * FILE 078
<= argument * FILE 078
FX CLI FX macro - FIND 'str' ALL * FILE 078
after EXCLUDE ALL * FILE 078
FX SPF FX macro - REXX version for SPF/PC * FILE 078
Version 3.0 * FILE 078
FXC CLI FXC macro - FIND 'str @ cursor' ALL * FILE 078
after EXCLUDE ALL * FILE 078
GETACCT REX REXX sub-function to get accounting * FILE 078
info from ACT * FILE 078
GETACF2 REX REXX sub-function to get ACF2 release * FILE 078
identifier from ACCVT * FILE 078
GETATTR REX REXX sub-function to get TSO user * FILE 078
attributes from PSCB * FILE 078
GETCIB REX REXX sub-function to get command verb * FILE 078
code from 1st CIB * FILE 078
GETCPUM REX REXX sub-function to get CPU model * FILE 078
from CVT prefix * FILE 078
GETDEST REX REXX sub-function to get TSO SYSOUT * FILE 078
destination from PSCB * FILE 078
GETDFPL REX REXX sub-function to get DFP level * FILE 078
from DFA * FILE 078
GETGRPN REX REXX sub-function to get group * FILE 078
connect name from ACEE * FILE 078
GETIPLD REX REXX sub-function to get IPL date * FILE 078
from SMCA * FILE 078
GETIPLT REX REXX sub-function to get IPL time * FILE 078
from SMCA * FILE 078
GETJES2 REX REXX sub-function to get JES2 product * FILE 078
name from HASPSSSM * FILE 078
GETJOBID REX REXX sub-function to get JES2 job id * FILE 078
from SSIB * FILE 078
GETLPAR REX REXX sub-function to get LPAR mode * FILE 078
from SCCB * FILE 078
GETNAME REX REXX sub-function to get user name * FILE 078
from ACEE * FILE 078
GETPLEX REX REXX sub-function to get SYSPLEX name * FILE 078
from ECVT * FILE 078
GETPRGNM REX REXX sub-function to get programmer * FILE 078
name from ACT * FILE 078
GETREALM REX REXX sub-function to get real memory * FILE 078
size at IPL * FILE 078
GETREGK REX REXX sub-function to get region size * FILE 078
from LDA * FILE 078
GETSCPN REX REXX sub-function to get MVS SCP name * FILE 078
from CVT prefix * FILE 078
GETSMFID REX REXX sub-function to get smfid * FILE 078
from SMCA * FILE 078
GETSMS REX REXX sub-function to get SMS status * FILE 078
from JESCTEXT * FILE 078
GETSWA REX REXX sub-function to get location of * FILE 078
SWA from JCT * FILE 078
GETTRID REX REXX sub-function to get terminal id * FILE 078
from ACEE * FILE 078
GETUID REX REXX sub-function to get ACF2 userid * FILE 078
string * FILE 078
GO CLI GO macro - SUBMIT job then invoke IOF * FILE 078
IDCAMS REX IDCAMS macro - execute IDCAMS commands * FILE 078
(like =3.2.V 'exec') * FILE 078
IEBUPDTE BAT DOS batch file #2 to consolidate * FILE 078
members for upload to MVS * FILE 078
INFO ABC Action bar choice panel code to * FILE 078
display system information * FILE 078
ISFP CLI World's shortest CLIST * FILE 078
ISFPANEL PAN SDSF panel modifications for OPER macro * FILE 078
ISPCMDS TBL ISPF commands to be added to ISPCMDS * FILE 078
for dialog invocation * FILE 078
ISR@PRIM PAN ISPF Primary Option Menu (Version 3.3) * FILE 078
ISRUTIL PAN ISPF (Version 2.3) utility panel * FILE 078
modifications for =3.14B * FILE 078
ISRZ00 MSG ISPF messages ISRZ000W and ISRZ001W * FILE 078
displayed in windows * FILE 078
JC CLI JC macro - JOB card generator * FILE 078
JC PAN ISPF panel used by JC and JCI macros * FILE 078
JCI CLI JCI macro - JOB card generator (for * FILE 078
use after file tailoring) * FILE 078
LIBDIR REX REXX exec to display a CA-Librarian * FILE 078
index * FILE 078
LISTDSI CLI LISTDSI macro - List dataset info in * FILE 078
OPT32 format * FILE 078
LOGLIST CLI CLIST dialog to define output * FILE 078
descriptors for ISPLOG/ISPLIST * FILE 078
LOGLIST JCL ISPF skeleton used by LOGLIST dialog * FILE 078
LOGLIST PAN ISPF panel used by LOGLIST dialog * FILE 078
MEMLIST CLI MEMLIST macro - Display member list * FILE 078
of PDS on =NOTE= lines * FILE 078
MVS BAS MVS basica program - Pseudo-display * FILE 078
of ISPF Primary Option Menu * FILE 078
NOWARN REX REXX exec that issues RECOVERY OFF * FILE 078
NOWARN (used with PROFSET) * FILE 078
OPER CLI OPER macro - Issued canned operator * FILE 078
commands via SDSF * FILE 078
PDSDIR REX REXX exec to display a PDS directory * FILE 078
PDSFTP PAN ISPF pop-up panel used by PDSFTP dialog * FILE 078
PDSFTP REX REXX dialog to automate PDS member FTP's * FILE 078
PDSFTPLM PAN ISPF member list panel used by PDSFTP * FILE 078
PDSFTPT PAN Tutorial panel for PDSFTP * FILE 078
PLUG REX PLUG macro - Plug data into a range * FILE 078
of lines at a given column * FILE 078
PLUG SPF PLUG macro - REXX version for SPF/PC * FILE 078
Version 3.0 * FILE 078
PROFSET REX PROFSET macro - Mass change all edit * FILE 078
profiles for an applid * FILE 078
RESETID REX REXX exec to reduce ACF2 password * FILE 078
violation count by 1 * FILE 078
RUN CLI RUN macro - EXECute the CLIST/EXEC * FILE 078
that is being edited * FILE 078
RUNACF REX RUNACF macro - Issue ACF subcommands * FILE 078
currently being edited * FILE 078
SHOWCUT CLI SHOWCUT macro - Browse the ISPF CUT * FILE 078
table(s) - PDS 8.5 CUT * FILE 078
SHOWCUTP PAN ISPF panel used by SHOWCUT table * FILE 078
display * FILE 078
SORTWORK PAN ISPF panel used by SORTWORK dialog * FILE 078
SORTWORK REX REXX dialog to calculate SYNCSORT * FILE 078
sortwork space * FILE 078
STARTUP CLI CLIST code run during TSO start-up to * FILE 078
execute @LOGLIST * FILE 078
SUPERC CLI CLIST dialog for SEARCH-FOR batch job * FILE 078
(OPT314B) * FILE 078
SUPERC JCL ISPF skeleton JCL to invoke SUPERC * FILE 078
program in batch * FILE 078
SYSLOG CLI CLIST dialog for browsing of current * FILE 078
or previous SYSLOG * FILE 078
SYSLOG PAN ISPF panel used by SYSLOG dialog * FILE 078
TESTACF REX TESTACF macro - Test ACF2 rules based * FILE 078
on DSN= values in JCL * FILE 078
TRAPCMD REX REXX dialog to trap TSO/REXX output * FILE 078
and display in ISPF table * FILE 078
TRAPTBL PAN ISPF panel used by TRAPCMD table * FILE 078
display * FILE 078
TRICMDS PAN Tutorial panel for ISPF command help * FILE 078
TRIJOBS PAN ISPF panel used to display key jobs * FILE 078
with SDSF or IOF * FILE 078
TRIMACS PAN Tutorial panel for edit macro help * FILE 078
UNX CLI UNX macro - Show the first n line(s) * FILE 078
from each X-cluded block * FILE 078
UPLOAD BAT DOS batch file #1 to consolidate * FILE 078
members for upload to MVS * FILE 078
WEAVE REX WEAVE macro - Interlace CUT table * FILE 078
into a range of lines * FILE 078
* FILE 078
IS FROM WILLIAM SMITH, FORMERLY OF CHARLES SCHWAB IN * FILE 079
SAN FRANCISCO, CALIFORNIA. THIS FILE CONTAINS A * FILE 079
ROBUSTLY IMPLEMENTED "PRODUCTION" ISPF INTERFACE * FILE 079
FOR IBM'S DCF SCRIPT/VS. A PROTOTYPE ADDON IS * FILE 079
ALSO INCLUDED, TO CONVERT THIS INTERFACE INTO A * FILE 079
CUA COMPLIANT FORMAT. * FILE 079
* FILE 079
ADDRESS: WILLIAM SMITH * FILE 079
IBM * FILE 079
STORAGE SYSTEMS DIVISION * FILE 079
5600 COTTLE ROAD * FILE 079
DEPT. W98A * FILE 079
DRIVER BUILD & INTEGRATION * FILE 079
BUILDING 50, ROOM A382 * FILE 079
SAN JOSE, CA 95193-0001 * FILE 079
(408) 256-1557 OR * FILE 079
TIE LINE 276-1557 * FILE 079
* FILE 079
email: smithwj@us.ibm.com * FILE 079
goldens@ibm.net * FILE 079
* FILE 079
THERE ARE OTHER INTERESTING ITEMS IN THIS * FILE 079
FILE, WHICH ARE MOSTLY DESCRIBED BELOW: * FILE 079
* FILE 079
THIS COLLECTION OF TOOLS COMPRISES: * FILE 079
* FILE 079
DCF SCRIPT/VS ISPF INTERFACE, AS FOLLOWS: * FILE 079
* FILE 079
1) A COMPLETE PRODUCTION ISPF DIALOG INTERFACE TO * FILE 079
IBM'S DCF SCRIPT/VS FACILITY. * FILE 079
* FILE 079
TO INSTALL THIS INTERFACE, YOU NEED MEMBERS: * FILE 079
PLIB1, MSGS, CLIST1 TO BE IEBUPDTE-LOADED TO * FILE 079
A PANEL LIBRARY, A MESSAGE LIBRARY, AND A * FILE 079
CLIST LIBRARY, RESPECTIVELY. ALSO, YOU WILL * FILE 079
NEED ASSEMBLED, MEMBER IKJCT44B FROM THE SOURCE * FILE 079
MEMBER IN THIS PDS. THIS SOURCE MUST BE ASSEMBLED, * FILE 079
LINKEDITED, AND PLACED IN A (LINKLIST) LIBRARY * FILE 079
THAT IS ACCESSIBLE TO YOUR TSO SESSION. * FILE 079
* FILE 079
THIS PRODUCTION INTERFACE IS NOT CUA COMPLIANT * FILE 079
AS IT IS. * FILE 079
* FILE 079
2) A PROTOTYPE MODIFICATION TO THE ABOVE DCF SCRIPT/VS * FILE 079
INTERFACE, TO MAKE IT CUA COMPLIANT. THIS CONSISTS * FILE 079
OF PANELS AND CLISTS TO SUBSTITUTE FOR LIKE-NAMED * FILE 079
MEMBERS IN THE PANEL AND CLIST LIBRARIES CREATED * FILE 079
BY THE ABOVE INSTALLATION. * FILE 079
* FILE 079
PART OF THIS PROTOTYPE ADDITION CONSISTS OF AN * FILE 079
ISPF PRIMARY OPTION MENU CONTAINING A CALENDAR * FILE 079
AND ACTION BAR PULL-DOWNS. * FILE 079
* FILE 079
TO INSTALL THIS INTERFACE, YOU NEED MEMBERS: * FILE 079
PLIB2, CLIST2 TO BE IEBUPDTE-LOADED INTO PANEL * FILE 079
AND CLIST LIBRARIES THAT WILL BE CONCATENATED AHEAD * FILE 079
OF THE RESPECTIVE LIBRARIES CREATED BY THE INSTALL * FILE 079
PROCESS IN ITEM 1) ABOVE. * FILE 079
* FILE 079
IN ADDITION TO THE DCF SCRIPT/VS ISPF INTERFACE, THIS * FILE 079
FILE CONTAINS THE FOLLOWING OTHER MEMBERS: * FILE 079
* FILE 079
SOURCE - A COLLECTION OF VARIOUS EXITS TO JES2 * FILE 079
RELATING TO TSO. THERE IS ALSO A TSO * FILE 079
SESSION MANAGER EXIT, AND A GDDM PLOTTER * FILE 079
EXIT. THIS MEMBER IS IN IEBUPDTE UNLOADED * FILE 079
FORMAT AND MUST BE IEBUPDTE-LOADED INTO A * FILE 079
PARTITIONED DATASET. * FILE 079
* FILE 079
INCLUDED IN THIS MEMBER IS A CLIST VARIABLE * FILE 079
EXTENSION EXIT (IKJCT44B) THAT IS REQUIRED * FILE 079
BY MEMBER PLIB1. THIS MEMBER ADDS SOME * FILE 079
BUILT-IN FUNCTIONS TO THE CLIST LANGUAGE * FILE 079
AND IS REQUIRED FOR THE DCF SCRIPT/VS * FILE 079
INTERFACE. * FILE 079
* FILE 079
USERMODS - A COLLECTION OF ASSORTED MVS AND JES2 * FILE 079
LOCAL MODS PACKAGED IN SMP FORMAT. THE * FILE 079
USEFULNESS OF THIS COLLECTION LIES IN * FILE 079
THE FACT THAT THEY ARE SAMPLE MODS TO * FILE 079
IBM PRODUCTS, WHICH IBM NEVER PROVIDED * FILE 079
SAMPLES FOR. * FILE 079
* FILE 079
DOCLIB - THIS IS A 30-PAGE DOCUMENT DESCRIBING * FILE 079
THE DCF SCRIPT/VS DIALOG FRONTEND, AND * FILE 079
ITS HISTORY. THIS WAS A PRESENTATION * FILE 079
GIVEN AT SHARE 80 IN SAN FRANCISCO. * FILE 079
* FILE 079
DEFMACRO - A COLLECTION OF SCRIPT MACROS FOR VIRTUALLY * FILE 079
EVERY FONT FAMILY MARKETED BY IBM. THIS * FILE 079
COLLECTION ALLOWS EASY USE OF MANY FONTS * FILE 079
BY A SCRIPT USER. * FILE 079
* FILE 079
PUBTOOLS - THE COMPLETE CHARLES SCHWAB IN-HOUSE * FILE 079
STANDARDS GUIDE FOR MAINFRAME-BASED DESKTOP * FILE 079
PUBLISHING, IN SCRIPT FORMAT. (THIS TAKES * FILE 079
TIME TO FORMAT AND PRINT ON AN IBM PRINTER-- * FILE 079
ABOUT 40 MINUTES ON A 3820.) * FILE 079
* FILE 079
IS FROM THE CITY OF LONG BEACH. CA., AND CONTAINS * FILE 080
THE SOURCE CODE FOR FIVE PROGRAMS, ALL OF * FILE 080
WHICH EXTRACT DATA FROM THE RACF DATASET(S) * FILE 080
AND FORMAT IT INTO OUTPUT FILES SUITABLE FOR * FILE 080
USE WITH REPORT WRITERS OR INPUT TO USER * FILE 080
WRITTEN PROGRAMS. * FILE 080
* FILE 080
EACH OF THESE PROGRAMS PROCESSES A DIFFERENT * FILE 080
KIND OF RACF PROFILE. THE PROFILE TYPE * FILE 080
PROCESSED IS INDICATED IN THE PROGRAM NAME; * FILE 080
I.E., RACFUSER PROCESSES USER PROFILES, * FILE 080
RACFDSET PROCESSES DATASET PROFILES, RACFGRES * FILE 080
PROCESSES GENERAL RESOURCE PROFILES, AND * FILE 080
RACFGRP1 AND RACFGRP2 PROCESS GROUP PROFILES. * FILE 080
GENERIS IS A PROGRAM WHICH RETURNS THE PROTECTING * FILE 080
RACF PROFILE NAME FOR ANY INPUT DATASET(S). * FILE 080
* FILE 080
IS OS DEBE THAT HAS BEEN MODIFIED TO RUN UNDER MVS. * FILE 081
THERE IS A PROBLEM WITH THIS VERSION OF THE PROGRAM * FILE 081
IN THAT IT WILL NOT DUPLICATE A 32K BLOCK OF DATA * FILE 081
ON A TAPE TO TAPE OPERATION. IT DOES NOT TELL YOU * FILE 081
THIS EITHER, SNEAKY FELLOW. YOU JUST GET A LOT OF * FILE 081
SHORT BLOCKS. * FILE 081
* FILE 081
IS THE REFERENCE MANUAL FOR IEHMAP, MAPLPA, PTXREF * FILE 082
AND SUPERZAP (RECFM=FBA, LRECL=80) * FILE 082
* FILE 082
IS THE IEHMAP PROGRAM (WITH A LOT OF * FILE 083
DISASSEMBLED SOURCE THAT WAS UPDATED BY MR GUY * FILE 083
ALBERTELLI OF B.F. GOODRICH IN AKRON, OHIO.) * FILE 083
THIS FILE IS IN IEBUPDTE SYSIN FORMAT. THIS FILE * FILE 083
CONSISTS OF THE ORIGINAL IEHMAP PROGRAM (OBJECT) * FILE 083
AND ALL THE PUBLISHED ZAPS, PLUS SOME UNPUBLISHED * FILE 083
ZAPS. IT ALSO UPDATES IEHMAP SO THAT IT WILL WORK * FILE 083
ON EITHER SP, XA, OR ESA. THE LIBRARY CONTAINS THE * FILE 083
ORIGINAL IEHMAP OBJECT DECK IN TWO MEMBERS, AN * FILE 083
MVS / XA CSECT THAT WAS CREATED VIA THE DISASSEMBLER * FILE 083
AND THE NECESSARY ZAPS IN SEPARATE MEMBERS. * FILE 083
SEE THE MEMBERS CALLED $DOC390 AND $DOC370 FOR * FILE 083
ADDITIONAL INFORMATION. $DOC390 IS FOR MVS/ESA. * FILE 083
* FILE 083
NOW FIXED TO RECOGNIZE THE RES PACK IF IT HAS A * FILE 083
DYNAMIC UCB. ALSO INCLUDES DISASSEMBLIES OF THE * FILE 083
OBJECT DECKS, WITH APPROPRIATE ZAP FIXES ALREADY * FILE 083
APPLIED. (FOR REFERENCE ONLY) (S.GOLOB - SEP 95) * FILE 083
* FILE 083
IS THE OBJECT DECK FOR MAPLPA (SORRY NO SOURCE) * FILE 084
* FILE 084
IS THE OBJECT DECK FOR PTXREF (SORRY NO SOURCE) * FILE 085
* FILE 085
IS THE OBJECT DECK FOR SUPERZAP (SORRY NO SOURCE) * FILE 086
* FILE 086
IS FROM MARK DIEHL OF HERCULES/ALLEGANY BALLISTICS * FILE 087
AND IS A COPY OF THEIR ISPF SYSLOG UTILITY. * FILE 087
* FILE 087
THIS SYSLOG UTILITY WAS WRITTEN AS A RESULT OF A * FILE 087
REQUIREMENT WHICH DICTATED THAT THE SYSLOG BE PRINTED * FILE 087
AND RETAINED. THE PRACTICAL ALTERNATIVE IS TO RETAIN * FILE 087
THE SYSLOG ON SOME MACHINE-READABLE MEDIUM. TO * FILE 087
ACHIEVE THIS END, THE ABL ISPF SYSLOG UTILITY WAS * FILE 087
CREATED. THE UTILITY IS COMPRISED OF ASSEMBLER * FILE 087
PROGRAMS, CLISTS, JCL, AND, OF COURSE, MAKES USE OF * FILE 087
THE VARIOUS ISPF CAPABILITIES. MENU OPTIONS PROVIDE * FILE 087
THE ABILITY TO 'AUTOMATICALLY' RETAIN THE SYSLOG * FILE 087
DATA; SUBSEQUENTLY EXTRACT PERTINENT PORTIONS OF * FILE 087
THE RETAINED SYSLOG; PERFORM VARIOUS UTILITY * FILE 087
FUNCTIONS (E.G., LABEL TAPES); OBTAIN REPORTS * FILE 087
CONTAINING USER-SPECIFIED 'EXCEPTION' EVENTS (SYSLOG * FILE 087
POST-PROCESSOR). EXTRA EFFORT WAS SPENT ATTEMPTING * FILE 087
TO CREATE THE ISPF TUTORIAL PANELS TO SUPPORT THIS * FILE 087
UTILITY WITH A MINIMUM EFFORT ON THE PART OF SYSTEMS. * FILE 087
SEE MEMBER $$$INDEX FOR A DESCRIPTION OF THE SYSLOG * FILE 087
UTILITY COMPONENTS. THIS FILE IS IN IEBUPDTE SYSIN * FILE 087
FORMAT. * FILE 087
* FILE 087
is from Brian Westerman of Syzygy Inc. of Cary, * FILE 088
North Carolina and Pismo Beach, California. * FILE 088
The following is a list of what is in the file. * FILE 088
This file is in IEBUPDTE SYSIN format. * FILE 088
* FILE 088
My new address and phone number are * FILE 088
* FILE 088
Brian Westerman * FILE 088
Director of Research & Development * FILE 088
Syzygy Incorporated Syzygy Incorporated * FILE 088
1381 Kildaire Farm Road 897 Oak Park Blvd * FILE 088
Suite 326 Suite 500 * FILE 088
Cary, NC 27511-5525 Pismo Beach, CA 93449 * FILE 088
* FILE 088
Phone:(800) 767-2244 * FILE 088
Fax: (800) 366-4082 * FILE 088
* FILE 088
email: brian_westerman@juno.com * FILE 088
brianw45@aol.com * FILE 088
* FILE 088
This is the File abstract as of 02/20/00. * FILE 088
* FILE 088
Unless otherwise noted, all programs support OS/390 V2.8 * FILE 088
and below (within reason) * FILE 088
* FILE 088
Current Operating Systems at Syzygy (we support these * FILE 088
for customer testing) * FILE 088
* FILE 088
MVS 3.8E * FILE 088
MVS/SP 1.3.6 * FILE 088
MVS/XA 2.2.3 * FILE 088
MVS/ESA 3.1 * FILE 088
MVS/ESA 4.3 * FILE 088
MVS/ESA 5.1 * FILE 088
OS/390 1.3 * FILE 088
OS/390 2.4 * FILE 088
OS/390 2.5 * FILE 088
OS/390 2.7 * FILE 088
OS/390 2.8 * FILE 088
OS/390 2.9 --- testing * FILE 088
* FILE 088
We also have various releases of VM, VM/ESA and DOS/VSE * FILE 088
but they don't apply to this file. * FILE 088
* FILE 088
The following Items have been added as of 2/20/00. * FILE 088
* FILE 088
AUTO - Automatic command and job scheduler. This code * FILE 088
was originaly on the CBT tape many years ago, but * FILE 088
stopped working when MVS/ESA V5 came out because * FILE 088
of some new ways of doing things with that version * FILE 088
of MVS. This program allows you to schedule jobs * FILE 088
or commands to run at any time of day, any day of * FILE 088
week any month of (well you get the picture). It * FILE 088
runs as a started task (time=1440) and you can use * FILE 088
it to automatically schedule anything. You can * FILE 088
also fire off anything in it's files (by time or * FILE 088
jobname) at any time. There are 2 datasets that * FILE 088
you will need to create, in the code they are * FILE 088
SYZYGY.AUTO.COMMANDS and SYZYGY.AUTO.JOBS, (you * FILE 088
should probably rename those) and the directions * FILE 088
are easy to follow and are located in the first * FILE 088
few hundred lines of hte code. We have used this * FILE 088
as our ONLY scheduling system for years, and when * FILE 088
we go to customer sites for contracts, we normally * FILE 088
set it up for our stuff and the customer typically * FILE 088
moves over to using it before we leave. It's very * FILE 088
easy to use and uses no resources. You can give * FILE 088
it a very high priority, (and probably should), we * FILE 088
have thousands of jobs and commands scheduled with * FILE 088
this guy every day, and it typically uses less * FILE 088
than 1 minute (between 25 and 45 sec) of CPU time * FILE 088
per month, (We IPL once per month wheather we need * FILE 088
to or not). You can concatonate command and/or job * FILE 088
libraries as needed so that you can have * FILE 088
production and test jobs. You can run as many * FILE 088
copies of this little address space as you want * FILE 088
for different purposes (test and production), but * FILE 088
don't forget to use different command libraries * FILE 088
because you will end up doing everything multiple * FILE 088
times if you don't remember. * FILE 088
* FILE 088
COMMANDZ - This program was originally copied from * FILE 088
the CBT tape and was originally written by John V. * FILE 088
Hooper to execute a stack of commands to automate * FILE 088
processing. I have added a slew of code to this * FILE 088
program so that now you can use it for scheduling * FILE 088
and also I have included IF/Then logic parameters. * FILE 088
The added code allows the following functions: * FILE 088
* FILE 088
IFSTARTED JOBNAME - THIS GIVES THE ABILITY TO * FILE 088
EXECUTE COMMANDS WHICH FOLLOW THIS COMMAND * FILE 088
ONLY IF THE SPECIFIED JOBNAME IS ACTIVE. THE * FILE 088
ENDIF COMMAND ENDS THE IF NEST OF COMMANDS * FILE 088
* FILE 088
IFSTOPPED JOBNAME - THIS GIVES THE ABILITY TO * FILE 088
EXECUTE COMMANDS WHICH FOLLOW THIS COMMAND * FILE 088
ONLY IF THE SPECIFIED JOBNAME IS NOT ACTIVE. * FILE 088
THE ENDIF COMMAND ENDS THE IF NEST OF COMMANDS * FILE 088
* FILE 088
WTO=TEXT - ALLOWS YOU TO ISSUE WTOS OF ANYTHING * FILE 088
YOU WANT TO SAY, UP TO 72 CHARACTERS THE * FILE 088
FORMAT IS WTO=TEXT YOU WANT TO SAY * FILE 088
* FILE 088
STOPCODE=NNNN - ALLOWS YOU TO END PROCESSING * FILE 088
AND OPTIONALLY SET A CONDITION CODE OF UP TO * FILE 088
4 NUMERIC DIGITS. * FILE 088
THE FORMAT IS STOPCODE OR STOPCODE=NNNN WHERE * FILE 088
NNNN IS FROM 1 TO 4 DIGITS, IF YOU SPECIFY MORE * FILE 088
THAN 4 DIGITS, THE NUMBERS AFTER THE 4TH WILL * FILE 088
BE IGNORED. * FILE 088
* FILE 088
SHUTDOWN - Sample command file which shows how to use * FILE 088
the new featurs of COMMANDZ to control the * FILE 088
shutdown of the system. * FILE 088
* FILE 088
NOKEEP - This is an MPF exit which will COMPLETELY * FILE 088
suppress messages from everywhere so you need to be * FILE 088
careful, if you have messages that you have * FILE 088
successfully kept from going to to console but * FILE 088
still go to syslog then this is what you need. We * FILE 088
have a large phantom network and therefore we used * FILE 088
to get over 1 million lines from VTAM/TCP about the * FILE 088
nodes that were not up. We used this little exit * FILE 088
to keep from sending those to syslog and we have * FILE 088
saved ourseleves a lot of time and it make looking * FILE 088
for problems easier because you don't have to * FILE 088
search around the useless messages in syslog. * FILE 088
* FILE 088
REDMSG - This program was also originally from the CBT * FILE 088
Tape, and was changed somewhat. It allows you to * FILE 088
display a message on the console if the preceding * FILE 088
step had a non-zero return code. * FILE 088
* FILE 088
SLSUX06 - Storage Tek Silo Exit 6. This code has also been * FILE 088
given to STK as of 1/99 and will be distributed by * FILE 088
them, but since I wrote it, I wanted to put it here * FILE 088
as well. This exit gets invoked on cartridge * FILE 088
insert/eject processing. We had a problem whereby * FILE 088
when the operators printed the CA-1 scratch pick * FILE 088
list, they didn't know which tapes were already in * FILE 088
the silo and which ones were outside (and available * FILE 088
to be picked). This exit was already being used to * FILE 088
flag tapes as scratch as soon as they were entered, * FILE 088
(the one that STK has in their book and on the * FILE 088
sample tapes does not work), so I changed it so that * FILE 088
the tapes are now flagged as in or out of the silo. * FILE 088
I had a talk with Computer Associates and they were * FILE 088
nice enough to designate a flag which shows in or * FILE 088
out of the silo, you can even show which silo it's * FILE 088
in, (if you have more than 1) with this code. It * FILE 088
allows a lot of flexibility and has saved us the * FILE 088
cost of a lot of operator overtime. They also get * FILE 088
less upset about who has to pick tapes now! * FILE 088
* FILE 088
SYZYGYEJ - This program will take the output from a * FILE 088
TMSGRW run and create SLUADMIN input to eject the * FILE 088
tapes. This is a follow on to the STK exit 6 * FILE 088
previously outlined. The member SYZYGYE$ is the * FILE 088
JCL for this program. * FILE 088
* FILE 088
SYZYGYVR - This program will produce a VERY fast scratch * FILE 088
listing and it is in a format which lends itself * FILE 088
very nicely to multi columnizing with SAS for the * FILE 088
operators to pick tapes from. * FILE 088
* FILE 088
MULTICOL - Small SAS program from somewhere that * FILE 088
demonstrates the multi column stuff for the * FILE 088
SYZYGYVR program. * FILE 088
* FILE 088
SYZREORG - Program which will greatly increase the speed * FILE 088
of load/unload/reorg jobs for VSAM KSDS datasets. * FILE 088
The buffers are altered automatically by the job * FILE 088
which tends to increase the speed of the job by a * FILE 088
great deal. You can also do this by changing the * FILE 088
JCL, but this is easier. * FILE 088
* FILE 088
The following files are also in this dataset: * FILE 088
* FILE 088
CATLIST - EXEC TO READ CATALOG AND CREATE A COMPLETE * FILE 088
IDCAMS EXPORT JCL TO BACKUP ALL CATALOGS IN * FILE 088
THE SYSTEM. ANY TIME YOU CREATE A NEW * FILE 088
CATALOG, (OR DELETE ONE) ALL YOU NEED TO DO * FILE 088
IS RUN THE SYSBLD00 JOB WHICH EXECUTES THIS * FILE 088
EXEC AND WILL BUILD A SYSCATBK JOBSTREAM. * FILE 088
(ONE IS INCLUDED HERE AS WELL) * FILE 088
* FILE 088
EX8 - OS/390 COMPATABLE EXIT 8 FOR SENDING JOB END * FILE 088
MAX COND CODE. (SEE EXIT08 STUFF BELOW) * FILE 088
* FILE 088
EX16 - OS/390 COMPATABLE EXIT 16 FOR SENDING JOB END * FILE 088
MAX COND CODE. (SEE EXIT16 STUFF BELOW) * FILE 088
* FILE 088
EXIT004 - JCL SCAN EXIT (4) TO MAKE /** CARD A COMMENT * FILE 088
(WE HAVE SOME PRETTY DUMB USERS, AND TO MAKE * FILE 088
THE /*NOSETUP CARD A COMMENT SINCE WE USED TO * FILE 088
REQUIRE EITHER A SETUP OR A NOSETUP IN THE * FILE 088
PAST WE HAD TO AT LEAST IGNORE IT UNTIL OUR * FILE 088
USERS CHANGED ALL OF THERE JCL (IT'S BEEN OVER * FILE 088
A YEAR NOW AND THEY STILL SAY THAT THEY ARE * FILE 088
WORKING ON IT!!!) * FILE 088
* FILE 088
EXIT010 - NOTIFY EXIT (10) TO SEND THE JOB ENDED NOTIFY * FILE 088
MESSAGE TO WYLBUR USERS WHO SUBMIT JOBS, IT * FILE 088
LOOKS FOR A NOTIFY MESSAGE FOR A WYLBUR USER * FILE 088
AND REFORMATS IT INTO A F WYLBUR,TO XXXXXX * FILE 088
AND THEN THE MESSAGE TEXT. * FILE 088
* FILE 088
EXITP20 - END OF JOB INPUT EXIT (20) WHICH WILL CAUSE A * FILE 088
JOB TO BE ROUTED TO ANOTHER CPU IN A MULTI * FILE 088
ACCESS SPOOL COMPLEX AUTOMATICALLY WITHOUT * FILE 088
MAKING THE USER TYPE IN THE /*ROUTE STUFF * FILE 088
* FILE 088
EXIT020 - END OF JOB INPUT EXIT (20) WHICH CHECKS THE * FILE 088
JCT OF THE JOB ALSO THE JCL TO SE IF THE GUY * FILE 088
ASKED FOR A SPECIAL PRIORITY AND IF SO HE WILL * FILE 088
ISSUE A MESSAGE TO THE OPERATOR WHICH WILL BE * FILE 088
HIGHLIGHTED AND NOT ROLL OFF THE SCREEN WHICH * FILE 088
TELLS HIM THAT A SPECIAL PRIORITY JOB WAS * FILE 088
SUBMITTED. * FILE 088
* FILE 088
EX05... - 3 JES2 COMMAND EXITS (5) WHICH WILL DO * FILE 088
VARIOUS THINGS LIKE NOT ALLOW THE OPERATOR TO * FILE 088
PURGE THE ENTIRE QUEUE AND WILL DISPLAY JOB * FILE 088
SETUPS WITH A COMMAND. * FILE 088
* FILE 088
EX005UD - JES2 EXIT(5) WHICH WILL GIVE YOU THE $UNDUMP * FILE 088
COMMAND THIS ALLOWS YOU TO UNDO EVERTHING * FILE 088
THAT YOU HAVE DONE WITH THE $DUMP COMMAND, SO * FILE 088
THAT YOU DON'T HAVE TO DUMP AND RELOAD * FILE 088
EVERTHING JUST BECAUSE YOU FORGOT A PARAMETER * FILE 088
ON YOUR $DUMP COMMAND. * FILE 088
* FILE 088
JX05 - JES 2.2.0 VERSION OF THE ABOVE EX05... STUFF * FILE 088
* FILE 088
J005$DV - JES 2.2.0 $DV COMMAND TO DISPLAY DASD VOLUMES * FILE 088
FROM JES2 * FILE 088
* FILE 088
J005LOAD- JES 2.2.0 $LOAD COMMAND TO LOAD NEW COPIES OF * FILE 088
EXITS * FILE 088
* FILE 088
EXIT008 - JCT WRITE EXIT FOR JES2 EXIT(8) WHICH WILL * FILE 088
PUT THE CONDITION CODE OF THE JOB STEP INTO * FILE 088
THE JCT IF IT IS GREATER THAN WHAT IS ALREADY * FILE 088
THERE. THIS EXIT WORKS IN CONJUNCTION WITH * FILE 088
EXIT016 AND EXIT008 MUST BE IN LPALIB. IT IS * FILE 088
VERY SMALL SO THERE IS LITTLE WORRY ABOUT * FILE 088
PUTTING IT THERE. * FILE 088
* FILE 088
JX08 - MVS/XA 2.2.0 VERSION OF EXIT008 ABOVE * FILE 088
* FILE 088
EXIT016 - THIS JES EXIT(16) GETS INVOKED AT JOB * FILE 088
TERMINATION AND WILL TAKE THE DATA PLACED IN * FILE 088
THE JCT BY EXIT8 AND FORMAT A NOTIFY MESSAGE * FILE 088
FOR TSO USERS AS TO THE MAX CONDITION CODE OF * FILE 088
THE STEP AS WELL AS WHETHER IT ABENDED OR NOT * FILE 088
WITH EITHER A SYSTEM OR USER ABEND. THE USERS * FILE 088
ARE VERY PLEASED. * FILE 088
* FILE 088
JX16 - JES 2.2.0 VERSION OF THE ABOVE EXIT016 * FILE 088
* FILE 088
EXIT212 - THIS JES EXIT(212) IS A DUMPER/LOADER EXIT * FILE 088
WHICH ALLOWS YOU TO DYNAMICALLY ALLOCATE THE * FILE 088
DUMPER/LOADER TAPE DSN INSTEAD OF ALWAYS * FILE 088
HAVING TO HAVE A PRE-ALLOCATED TAPE DSN. * FILE 088
THIS HAS SOLVED ALOT OF HEADACHES FOR THE * FILE 088
OPERATIONS STAFF ... AND ME. THIS REQUIRES * FILE 088
THE PRCJ2212 USERMOD TO JES. ALL THE MOD * FILE 088
DOES IS ADD THE $EXIT POINT INTO HASPSTAM. * FILE 088
* FILE 088
EX99 ---- PROGRAM USED BY PRCM0005 SYSMOD * FILE 088
* FILE 088
FINDASCB- PROGRAM INDEXES THROUGH ASVT AND WILL LOCATE * FILE 088
A JOB OR ADDRESS SPACE WHO'S NAME MATCHES WHAT * FILE 088
YOU PUT IN REG1. * FILE 088
* FILE 088
GETINFO - PROGRAM ORIGINALLY FROM NTL BUT HAS SOME * FILE 088
MINOR CHANGES AND ALSO HAS BEEN CHANGED TO * FILE 088
RUN ON A MVS/SP SYSTEM INSTEAD OF OR I SHOULD * FILE 088
SAY AS WELL AS MVS/XA. * FILE 088
* FILE 088
IEFACTRT- THIS IS PRETTY STANDARD STUFF EXCEPT THAT IT * FILE 088
UPDATES THE JOBS OUTPUT RESOLUTION MESSAGE * FILE 088
AREA WITH WHAT WE LIKE TO CALL "BOX SCORES". * FILE 088
THIS IS SIMILAR TO WHAT IBM'S FREEBEE DOES * FILE 088
BUT PUTS IT IN A BETTER PLACE. YOU MAY WANT * FILE 088
TO CHANGE SOME CODE SINCE WE ALSO DO A COUPLE * FILE 088
OF CALCULATIONS TO TELL THE USER APPROXIMATELY * FILE 088
WHAT THE JOB COST TO RUN. THE CHARGE CODE IS * FILE 088
VERY SIMPLE SO NO ONE SHOULD HAVE ANY * FILE 088
PROBLEMS. * FILE 088
* FILE 088
JES215MD- TWO MODS TO JES 2.1.5 THE FIRST IS TO HASPSSSM * FILE 088
TO PUT THE DATE ON THE INITIATOR STARTED * FILE 088
MESSAGE $HASP373 THE SECOND MOD IS TO HASPCOMM * FILE 088
IT ALLOWS THE $D'JOBNAME COMMAND TO ACT AS A * FILE 088
GENERIC JOBNAME DISPLAY IE. IF YOU ENTERED * FILE 088
$D'IMS , YOU WOULD GET A LIST OF ALL JOBS IN * FILE 088
ALL QUEUES WHO'S PREFIX MATCHED THE LETTERS * FILE 088
"IMS". OPERATORS LIKE IT A LOT. * FILE 088
* FILE 088
MCS ---- A VERY UNIQUE SPY COMMAND FROM ONE OF THE PRC * FILE 088
SUBSIDIARIES. I'M NOT SURE WHICH ONE, BUT I * FILE 088
LIKE THE CODE. * FILE 088
* FILE 088
MINIGEN - THE GOOD OLD MINIGEN, WE HAVE USED IT FOR * FILE 088
YEARS AND CONTRARY TO POPULAR BELIEF IT CAN BE * FILE 088
USED EVEN IF YOU ARE ADDING A NEW DEVICE TYPE. * FILE 088
THE BEST WAY TO USE THIS GUY IS TO BROWSE YOUR * FILE 088
STAGE1 OUTPUT AND FIND ALL OCCURRENCES OF " * FILE 088
EXEC ASMS" THE MOD=XXXXXXX PARAMETER ON EACH * FILE 088
ONE OF THESE GUYS SHOULD BE PUT IN THE ASSEM ( * FILE 088
SECTION OF THE MINIGEN. THIS IS A HELL OF A * FILE 088
LOT SAFER THAN A IOGEN AND THIS WAY WE NEVER * FILE 088
LOSE ANY USERMODS * FILE 088
* FILE 088
PANBKPRT- THIS GUY WILL TAKE A PANVALET BACKUP TAPE AND * FILE 088
CREATE A LISTING OF WHAT PROGRAMS AND VERSIONS * FILE 088
AND SIZE AND ALL IS ON THE TAPE. JUST AS IF IT * FILE 088
WERE STILL ON DISK. THIS WAY YOU DONT HAVE TO * FILE 088
RESTORE THE WHOLE TAPE DOWN JUST TO FIND * FILE 088
SOMTHING THAT YOU DON'T REALLY KNOW THE NAME * FILE 088
OF OR EVEN GUESS AT. * FILE 088
* FILE 088
POSTER -- DOES WHAT IT SAYS, CREATES POSTERS-BANNERS. * FILE 088
* FILE 088
PRCJ2001- JES2/SP 1.3.4 MOD TO ALLOW GENERIC $D'XXX' FOR * FILE 088
PARTIAL JOBNAMES. * FILE 088
* FILE 088
PRCJ2004- JES2/SP 1.3.4 MOD TO MAKE THE DEFAULT TSU AND * FILE 088
STC MESSAGE CLASS A FOR JOBS THAT THEY SUBMIT. * FILE 088
THIS ALLOWS YOU TO STILL SET THE &STCMCLAS AND * FILE 088
&TSUMCLAS TO A DELETE CLASS TO KEEP FROM * FILE 088
GETTING ALL OF THE USELESS JCL AND STILL NOT * FILE 088
HAVE TO PUT A MSGCLASS= PARM ON ALL JOBCARDS. * FILE 088
YOU DON'T NEED THIS IF YOU HAVE TSO/E FOR TSO * FILE 088
BUT WE DON'T HAVE THE MONEY TO THROW AWAY ON * FILE 088
THAT KIND OF PRODUCT AND WE ALSO HAVE A COUPLE * FILE 088
OF STC'S THAT SUBMIT JOBS AND THIS HAS BEEN * FILE 088
INDISPENSABLE. * FILE 088
* FILE 088
PRCJ2212- JES2/SP 1.3.4 MOD TO ADD $EXIT 212 TO * FILE 088
HASPSTAM FOR DYNAMIC DUMPER/LOADER DSN'S. * FILE 088
* FILE 088
PRCM0001- SET IEALIMIT TO NOT GIVE ANY EXTRA MEMORY. * FILE 088
IN MOST SHOPS POEPLE DON'T CARE ABOUT GIVING * FILE 088
A JOB A LITTLE EXTRA, BUT OUR ACCOUNTING * FILE 088
SYSTEM IS MEMORY INTENSIVE SO WE CAN'T ALLOW * FILE 088
JOBS TO GET ANY MORE THAN THEY ASK FOR. * FILE 088
* FILE 088
PRCM0002- THIS MOD WILL ALLOW DEFAULT TSO DYNAMIC * FILE 088
ALLOCATION TO BE SHR INSTEAD OF OLD. THIS IS * FILE 088
FOR NON-TSO/E SYSTEMS, IF YOU HAVE TSO/E * FILE 088
THERE IS ALREADY ANOTHER MOD ON THE CBT TAPE * FILE 088
FOR THIS SAME TYPE OF THING. BUT IT IS ALOT * FILE 088
BIGGER. I GUESS THAT'S BECAUSE YOU HAVE TO * FILE 088
ACTUALLY PAY FOR TSO/E. * FILE 088
* FILE 088
PRCM0003- THIS MOD MUST BE APPLIED WITH THE PRCM0004 MOD * FILE 088
PRCM0004- WHICH IS ON THIS SAME FILE. THE FIRST ONE IS A * FILE 088
DUMMY MOD SO THAT I WILL BE INFORMED IF THERE * FILE 088
IS ANY MAINTENANCE THAT EFFECTS THIS MOD BEFORE * FILE 088
ITS TOO LATE. YOU DON'T NEED TO PUT IT ON IF * FILE 088
YOU DON'T WANT TO. THIS MOD WILL PUT THE EXCP * FILE 088
COUNTS ON THE IEF285I MESSAGE THAT COMES OUT ON * FILE 088
YOUR JOB LISTING IE. * FILE 088
* FILE 088
IEF285I C7BRIAN.VTOC.LOAD KEPT 2123 EXCP * FILE 088
IEF285I DATASET.NAME KEPT 0 EXCP * FILE 088
* FILE 088
PRCM0005- MOD TO ALLOW YOU TO HAVE TSO DEFAULT ALLOCATE * FILE 088
TO PACKS THAT ARE NOT MOUNTED AS PUBLIC OR * FILE 088
STORAGE. IT COMES WITH A PROGRAM CALLED EX99 * FILE 088
WHICH IS THE ACTUAL PCF EXIT THAT IS USED. * FILE 088
YOU DO NOT HAVE TO HAVE PCF TO USE THIS MOD. * FILE 088
WE DON'T HAVE IT AND WE RUN FINE. YOU CAN * FILE 088
SET THE ATTR2 FIELD IN THE PSCB TO ANY VOLUME * FILE 088
THAT YOU WANT OR YOU CAN USE THE SETVOL * FILE 088
PROGRAM ON THIS FILE TO DO IT FOR YOU * FILE 088
AUTOMATICALLY * FILE 088
* FILE 088
PRCM0010- THIS MOD WILL ELIMINATE THE DATASET NOT * FILE 088
FREED; IS NOT ALLOCATED MESSAGE. FROM THE TSO * FILE 088
ALLOC COMMAND. * FILE 088
* FILE 088
PRCM0017- THIS MOD WILL ELIMINATE THE CN(00) BEING * FILE 088
APPEND TO MESSAGES FROM THE OPERATOR AND ON * FILE 088
THE NOTIFY OF JOB ENDED STUFF. * FILE 088
* FILE 088
TALK ---- CLIST TO DO ISPF FULL SCREEN SENDS TO PEOPLE * FILE 088
* FILE 088
TALKP---- PANEL TO USE WITH THE TALK CLIST (PUT IT IN * FILE 088
ISPPLIB CONCAT) * FILE 088
* FILE 088
ULX..---- ISPF BASED VTOC ANALYSIS AND REPORTING * FILE 088
FACILITY * FILE 088
* FILE 088
USAGE - TSO COMMAND TO DISPLAY SESSION COST. * FILE 088
* FILE 088
WAITPROG- RUNS AS A BATHC JOB AND WILL ACCEPT A PARM * FILE 088
THAT HAS THE NUMBER OF SECONDS THAT YOU WOULD * FILE 088
LIKE TO WAIT AND DISPLAYS IT ON THE OS * FILE 088
CONSOLE FOR THE OPERATOR IT HIGHLIGHTS IT AND * FILE 088
WILL NOT ROLL OFF THE SCREEN. WHEN THE TIME * FILE 088
EXPIRES IT WILL ISSUE A DOM TO DELETE THE * FILE 088
MESSAGE AND PUT OUT A REGULAR MESSAGE ABOUT * FILE 088
REQUESTED TIME EXPIRED. THE JOBNAME IS ALSO * FILE 088
PUT IN BOTH MESSAGES. * FILE 088
* FILE 088
XJ2PTP -- THIS IS A JES 2.1.5 EXIT TO DRAIN ALL OF THE * FILE 088
TP LINES IN THE NETWORK WITH A SINGLE COMMAND * FILE 088
$PTP. IT IS EXTREMELY USEFULL EVEN IF YOU * FILE 088
DON'T HAVE OVER 600 LINES LIKE US. YOU CAN * FILE 088
ALSO START ALL TP WITH $STP OR RESTART WITH * FILE 088
$ETP TO ACCOMPLISH A LOT OF WORK QUICKLY. * FILE 088
* FILE 088
XJ2NET -- THIS IS A JES2 EXIT13 WHICH IS REQUIRED IF * FILE 088
YOU WANT TO NOTIFY A TSO USER WHEN DATA IS * FILE 088
RECEIVED FROM ANOTHER JES NODE. IT ADDS SOME * FILE 088
NEAT STUFF LIKE HOW MANY LINES AND SUCH. * FILE 088
* FILE 088
IEFUJV -- SMF UJV EXIT TO FORCE STANDARDS FOR MVS/XA * FILE 088
2.2.0 * FILE 088
* FILE 088
ITACCTBL- TABLE USED BY THE MVS 2.2.0 VERSION OF IEFUJV * FILE 088
FOR ACCOUNT #S * FILE 088
* FILE 088
IEFUTL - MVS/XA 2.2.0 SMF UTL EXIT * FILE 088
* FILE 088
IEFU29 - MVS/XA 2.2.0 SMF U29 EXIT * FILE 088
* FILE 088
IEFU83 - MVS/XA 2.2.0 SMF U83 EXIT * FILE 088
* FILE 088
IGGPRE00- MVS/XA 2.2.0 DADSM IGGPRE00 EXIT. THIS EXIT * FILE 088
USES 2 TABLES TSOTABL AND NODTABL WHICH ARE * FILE 088
LOADED DYNAMICALLY AND CAN BE CHANGED ON THE * FILE 088
FLY. THIS EXIT WILL ALLOW STUFF TO BE * FILE 088
ALLOCATED OR RENAMED ONLY TO THE PACKS WHICH * FILE 088
WE DECIDE SHOULD GET THE PREFIXES. THIS EXIT * FILE 088
IS VERY POWERFUL AND IS EXTREMELY VERSATILE. * FILE 088
THIS EXIT REQUIRES THE MACROS CONNECT, * FILE 088
EQUREGS, RELEASE, SETAMODE WHICH ARE ALSO * FILE 088
INCLUDED IN THIS DATASET. * FILE 088
* FILE 088
NODTAB22- MVS/XA 2.2.0 VERSION OF THE NODETABLE FOR THE * FILE 088
IGGPRE00 EXIT. THIS ONE GOES IN LINKLIST. * FILE 088
* FILE 088
TSOTAB22- MVS/XA 2.2.0 VERSION OF THE TSO UID TABLE FOR * FILE 088
THE IGGPRE00 EXIT. THIS ONE GOES IN LINKLIST. * FILE 088
* FILE 088
Good Luck! * FILE 088
* FILE 088
IS THE SOURCE FOR A DYNAMIC ALLOCATION INTERFACE * FILE 089
FOR HIGH LEVEL LANGUAGES FROM THE UNIVERSITY OF * FILE 089
MANITOBA * FILE 089
MR P.A. MACDONALD * FILE 089
SYSTEMS PROGRAMMING * FILE 089
THE UNIVERSITY OF MANITOBA * FILE 089
COMPUTER SERVICES, ENGINEERING BLDG * FILE 089
WINNIPEG, MANITOBA * FILE 089
CANADA R36 2N2 * FILE 089
(204) 474-9870 * FILE 089
* FILE 089
PAT MACDONALD HAS NOW RETIRED. * FILE 089
* FILE 089
INCLUDED IN FILE 089 IS THE DOCUMENTATION FOR THE * FILE 089
DYNAMIC ALLOCATION INTERFACE THAT WAS FORMERLY * FILE 089
CONTAINED IN FILE 089 OF THIS TAPE. THE DCB FOR * FILE 089
THE DOCUMENTATION MEMBER IS FBA. ANSI PRINT * FILE 089
CONTROL CHARACTERS ARE INCLUDED. * FILE 089
* FILE 089
is from David Noon and is a DELINKER program, which * FILE 090
converts load modules into 80-byte object decks. * FILE 090
This file was prepared for the CBT Tape by Greg * FILE 090
Price. * FILE 090
* FILE 090
This file (CBT File 90) contains the "Delinker" package * FILE 090
written by David W. Noon which consists of source code * FILE 090
(PL/I and Assembler) and documentation. * FILE 090
* FILE 090
David Noon's email: dwnoon@ibm.net -or- * FILE 090
dwnoon@compuserve.com * FILE 090
* FILE 090
In March 1999, someone asked how to read and write * FILE 090
RECFM=U data from PL/I in the comp.lang.pl1 USENET * FILE 090
newsgroup. David Noon posted that if a delinker written * FILE 090
in PL/I was wanted then just ask. That's not what the * FILE 090
original poster wanted, but I asked instead, and Dave * FILE 090
duly emailed it to me. * FILE 090
* FILE 090
The package turned out to be a powerful batch utility * FILE 090
to delink, resize and even package for later processing * FILE 090
(such as distribution and reinstallation) some or all * FILE 090
CSECTs of nominated load modules. It could, for * FILE 090
example, be used in a job stream to replace certain * FILE 090
CSECTs with newer versions. * FILE 090
* FILE 090
I ended up plugging it into REVIEW R31.0 (CBT File 134), * FILE 090
so that members tagged in the member list (or all * FILE 090
members if none are tagged) can be dynamically delinked. * FILE 090
* FILE 090
Please note that this Delinker will not process * FILE 090
scatter-load or segment-overlay programs correctly. It * FILE 090
will only process load modules, and not program objects. * FILE 090
* FILE 090
In case you do not have a suitable PL/I compiler handy, * FILE 090
I have supplied DELINKI and DWNSPDSR load modules in CBT * FILE 090
File 135. I proposed calling the program DELINK1 to * FILE 090
distinguish it from the DELINK/DELINK0 OS/360 FE Tool * FILE 090
(and its derivatives), but Sam Golob preferred DELINKI, * FILE 090
so DELINKI it is. (The 1 or I denotes that it is written * FILE 090
in PL/I.) * FILE 090
* FILE 090
A member contents list follows. * FILE 090
Greg Price, July 1999. * FILE 090
* FILE 090
-MEMBER- -CONTENTS------------------------------------ * FILE 090
* FILE 090
$$DOC - This member. * FILE 090
* FILE 090
DCFDOC - This is a documentation source file Dave made * FILE 090
in SGML. It can easily be converted to GML * FILE 090
and run through SCRIPT/VS. It can be TEXT * FILE 090
transferred to DELINK.IPF on the PC for * FILE 090
processing by the IPF compiler. I resolved a * FILE 090
lot (but not all) of character symbolics to * FILE 090
get it to fit into an 80-column file. It * FILE 090
also made the uncompiled source more * FILE 090
readable. * FILE 090
* FILE 090
&apos. was replaced by ' * FILE 090
&asterisk. was replaced by * * FILE 090
&colon. was replaced by : * FILE 090
&comma. was replaced by , * FILE 090
&eq. was replaced by = * FILE 090
&hyphen. was replaced by - * FILE 090
&lpar. was replaced by ( * FILE 090
&per. was replaced by . * FILE 090
&plus. was replaced by + * FILE 090
&rpar. was replaced by ) * FILE 090
&slash. was replaced by / * FILE 090
* FILE 090
DELINK - This is the main PL/I source member. * FILE 090
It should be compiled with OS PL/I Version 2 * FILE 090
or with PL/I for MVS & VM. Requires DWNSCAN * FILE 090
and DWNSHEX to be linked into the program * FILE 090
executable, and DWNSPDSR to be fetchable * FILE 090
during execution. * FILE 090
* FILE 090
DWNMPRLG - PL/I prologue macro used by DWNSCAN and * FILE 090
DWNSHEX. Seems to work for OS PL/I Version 2 * FILE 090
and PL/I for MVS & VM. * FILE 090
* FILE 090
DWNSCAN - Performs the same function as the PL/I SEARCH * FILE 090
built-in function. The SEARCH and SEARCHR * FILE 090
built-in functions are not yet available under * FILE 090
MVS (OS/390) at the time of writing. This * FILE 090
module should be assembled and made available * FILE 090
at bind (ie. link-edit) time for inclusion * FILE 090
into the main program. * FILE 090
* FILE 090
DWNSHEX - Performs a similar function to the PL/I HEX * FILE 090
built-in function. The HEX and HEXIMAGE * FILE 090
built-in functions are not yet available * FILE 090
under MVS (OS/390) at the time of writing. * FILE 090
This module should be assembled and made * FILE 090
available at bind (ie. link-edit) time for * FILE 090
inclusion into the main program. * FILE 090
* FILE 090
DWNSPDSR - Provides BPAM support for the main PL/I * FILE 090
program. It should be assembled and made * FILE 090
available for dynamic fetching at execute * FILE 090
time. * FILE 090
* FILE 090
DWNYBLDL - PL/I source structure for PDS program * FILE 090
directory entry. It was obviously meant to * FILE 090
be included in the source by some strange * FILE 090
control card (not %INCLUDE), so I just copied * FILE 090
it into the source. This member is therefore * FILE 090
no longer used. * FILE 090
* FILE 090
FMBLOCK - Housekeeping macros used by DWNSPDSR, all of * FILE 090
FMCREDT which were probably contributed to the SHARE * FILE 090
FMSTART tape by Ken True of Fairchild MSS (hence FM, * FILE 090
FMWORK1 no doubt). They were moved from from the * FILE 090
FMWORK2 SHARE tape to the Fairchild MSS "Mods" tape, * FILE 090
later called the Intel MVS "Mods" tape, circa * FILE 090
1982. * FILE 090
* FILE 090
PLIICB - PL/I Interrupt Control Block macro used by * FILE 090
DWNSHEX on error conditions. * FILE 090
* FILE 090
PLISIG - PL/I Signal macro used by DWNSHEX on error * FILE 090
conditions. * FILE 090
* FILE 090
XMITBOOK - TSO/E transmit file of DELINK.INF which was * FILE 090
created by compiling DELINK.IPF (source in * FILE 090
member DCFDOC) with IPFC under OS/2. Process * FILE 090
with INDATASET operand of the TSO/E RECEIVE * FILE 090
command to get a RECFM=U sequential data set. * FILE 090
BINARY transfer this file to the PC (byte * FILE 090
counts should match). Use the VIEW command of * FILE 090
OS/2 or PC-DOS to look at DELINK.INF which * FILE 090
contains the Delinker documentation. The * FILE 090
PC-DOS VIEW command also works from the MS-DOS * FILE 090
prompt (including under Win95). Apparently, * FILE 090
there is an IVIEW command downloadable from * FILE 090
IBM designed to work under Win95. * FILE 090
* FILE 090
IS FROM JIM MARSHALL, FORMERLY OF THE US AIR FORCE. * FILE 091
* FILE 091
JIM HAS RETIRED FROM THE AIR FORCE. HIS ADDRESS IS: * FILE 091
* FILE 091
JIM MARSHALL, US TREASURY * FILE 091
FINANCIAL MANAGEMENT SERVICE * FILE 091
PRINCE GEORGES PLAZA II - ROOM 400B * FILE 091
3700 EAST-WEST HIGHWAY * FILE 091
HYATTSVILLE, MD 20782 * FILE 091
202-874-8353 * FILE 091
* FILE 091
THIS IS A FILE OF THE JCL PROCEDURES FOR * FILE 091
USE WITH FILE 092, WHICH IS THE PL1/F COMPILER. * FILE 091
ALSO INCLUDED NOW ARE PROCEDURES FOR FORTRAN * FILE 091
(IN FILE 326), RPG (IN FILE 327), AND ALGOL * FILE 091
(IN FILE 176). THERE ARE SOME OTHER PROCEDURES * FILE 091
FROM THE MVT (OS RELEASE 21.8) PROCLIB. THE * FILE 091
ENTIRE PROCLIB MAY BE FOUND ON THE CBT OVERFLOW * FILE 091
TAPE (FILE 081 THERE). THE ENTIRE SYS1.SAMPLIB * FILE 091
MAY BE FOUND ON THE CBT OVERFLOW TAPE, FILE 079 * FILE 091
THERE. * FILE 091
* FILE 091
PL1L**** - THESE ARE PROCEDURES FOR PL1F. THE * FILE 091
LIBRARY FOR PL1/F IS IN FILE 092. * FILE 091
* FILE 091
FORTG*** - THESE ARE PROCEDURES FOR FORTRAN G AND * FILE 091
FORTH*** H. THE LIBRARY FOR FORTRAN G AND H IS * FILE 091
IN FILE 326. * FILE 091
* FILE 091
RPG**** - THESE ARE THE PROCEDURES FOR RPG/F * FILE 091
THE LIBRARY FOR RPG IS IN FILE 327. * FILE 091
* FILE 091
ALGO**** - THESE ARE THE PROCEDURES FOR ALGOL * FILE 091
THE LIBRARY FOR ALGOL IS IN FILE 176. * FILE 091
* FILE 091
NOTES: YOU CAN FIND OUT ALL THE DEFAULTS BY * FILE 091
EXECUTING THE COMPILERS WITH A PARM= * FILE 091
AND LOOK AT WHAT IS SET. * FILE 091
* FILE 091
IS FROM JIM MARSHALL, FORMERLY OF THE US AIR FORCE. * FILE 092
* FILE 092
THIS FILE CONTAINS THE COMPILER AND LIBRARY FOR * FILE 092
PL1/F. * FILE 092
* FILE 092
THIS COPY OF THE PLI/F COMPILER AND LIBRARY WAS * FILE 092
RE-LINKEDITED BY LARRY WILLIAMS, TO ALLOW IT TO * FILE 092
RUN ON AN MVS/XA OR MVS/ESA SYSTEM, HOPEFULLY * FILE 092
WITHOUT THE ABENDS EXPERIENCED WHEN THE ORIGINAL * FILE 092
LOAD MODULES WERE RUN ON XA. * FILE 092
* FILE 092
CONTAINS A SYSTEM TO SEQUENTIALIZE A PDS (ANY * FILE 093
LRECL) FROM MR SAM GOLOB. SOME OF THIS CODE IS * FILE 093
FROM THE SHARE PL1 TAPE. FOR ADDITIONAL * FILE 093
INFORMATION SEE THE MEMBERS CALLED $$$$DOC AND * FILE 093
$$$$DOC2. * FILE 093
* FILE 093
THIS SYSTEM SHOULD PROVE USEFUL IF YOU WANT * FILE 093
TO "SEQUENTIALIZE" A PDS. * FILE 093
* FILE 093
THIS LIBRARY CONTAINS TWO PAIRS OF PROGRAMS: * FILE 093
* FILE 093
1. OFFLOADW AND PDSLOADW (MODIFIED FROM * FILE 093
CBT TAPE BY GREG PRICE.) * FILE 093
* FILE 093
2. UNUPDTE AND UPDTE (FROM PL1 MODS * FILE 093
TAPE - SPLA. UNUPDTE WAS ENHANCED BY ART * FILE 093
TANSKY OF SUNGARD.) * FILE 093
* FILE 093
EACH PAIR IS A SELF-CONTAINED SYSTEM THAT IS * FILE 093
INDEPENDENT OF THE OTHER PAIR. * FILE 093
* FILE 093
OFFLOADW AND PDSLOADW ALLOW IEBUPDTE-TYPE UNLOADING * FILE 093
AND RELOADING OF PDS'ES TO SEQUENTIAL DATASETS. * FILE 093
THIS IS NOT RESTRICTED TO RECORD LENGTHS OF 80 FOR * FILE 093
THE DATA. ALMOST ANY PARTITIONED DATASETS ARE * FILE 093
ELIGIBLE FOR THIS TREATMENT. THIS OPENS * FILE 093
IEBUPDTE-TYPE UNLOADS TO TAPE OR DISK-SEQUENTIAL * FILE 093
DATASETS TO MUCH WIDER APPLICATION THAN HERETOFORE. * FILE 093
(ALSO SEE THE "=OFFLOAD" OPTION OF THE "REVIEW" TSO * FILE 093
COMMAND THAT IS ON FILE 134 OF THIS TAPE.) * FILE 093
* FILE 093
OFFLOAD AND PDSLOAD NOW AUTOMATICALLY ALLOW * FILE 093
FOR LRECL FROM 1 TO 256 NOW (FROM GREG PRICE) * FILE 093
WITH NO CONDITIONAL ASSEMBLY. * FILE 093
* FILE 093
THE RESULT WAS ACHIEVED BY SLIGHTLY MODIFYING * FILE 093
EXISTING PROGRAMS PDSLOAD (FROM CBT TAPE FILE * FILE 093
316) AND OFFLOAD (FROM CBT TAPE FILE 225). * FILE 093
YOU CAN GET THE IEBUPDTE-TYPE UNLOAD AND * FILE 093
RELOAD TREATMENT, COMPLETE WITH THE ./ ADD * FILE 093
CARDS AND ISPF STATISTICS PRESERVED. AFTER * FILE 093
GREG PRICE'S MODIFICATIONS, OFFLOAD AND PDSLOAD * FILE 093
ARE NOW A MATCHED PAIR OF PROGRAMS TO PERFORM * FILE 093
OPPOSITE FUNCTIONS: OFFLOAD SEQUENTIALIZES A PDS, * FILE 093
AND PDSLOAD RELOADS THE PDS FROM THE SEQUENTIAL * FILE 093
OFFLOADED FILE. * FILE 093
* FILE 093
THE UPDTE AND UNUPDTE PROGRAMS WERE LIFTED * FILE 093
FROM THE PL1 MODS TAPE THAT CAN BE OBTAINED * FILE 093
FROM SPLA (ORDER NUMBER 370D-03.2.019). * FILE 093
* FILE 093
THESE PROGRAMS ARE MORE FLEXIBLE THAN * FILE 093
PDSLOADW AND OFFLOADW IN THAT: * FILE 093
* FILE 093
1. THEY HANDLE RECFM=F AND ALSO RECFM=V * FILE 093
DATASETS. * FILE 093
* FILE 093
2. THE DATASET CAN HAVE ANY LRECL PERMITTED * FILE 093
BY THE SYSTEM. * FILE 093
* FILE 093
PROCESSING WITH THESE PROGRAMS SEQUENTIALIZES A * FILE 093
PDS BY LOADING EACH MEMBER TO A SEQUENTIAL * FILE 093
DATASET, PRECEDED BY A CONTROL RECORD THAT LOOKS * FILE 093
LIKE ./ ADD NAME=MEMBNAME , SIMILAR TO AN * FILE 093
IEBUPDTE CONTROL CARD. * FILE 093
* FILE 093
THE PROGRAM UNUPDTE CONVERTS A PARTITIONED * FILE 093
DATASET INTO SEQUENTIAL FORMAT DESCRIBED BY THE * FILE 093
PRECEDING PARAGRAPH. THE PROGRAM UPDTE LOADS * FILE 093
THE SEQUENTIALIZED DATASET OF THE ABOVE FORMAT * FILE 093
BACK INTO A PDS THAT HAS THE SAME DCB ATTRIBUTES * FILE 093
(EXCEPT FOR DSORG OF COURSE). * FILE 093
* FILE 093
IT IS ALSO ADVANTAGEOUS TO HAVE PDSLOADW AND * FILE 093
OFFLOADW AROUND, BECAUSE THEY HAVE SOME OPTIONS * FILE 093
WHICH UPDTE AND UNUPDTE DO NOT HAVE, SUCH AS * FILE 093
AUTOMATICALLY CONVERTING THE STRING ./ WITHIN A * FILE 093
MEMBER (IN COLUMNS 1-2) TO SOME OTHER STRING, * FILE 093
SUCH AS ><. THEREFORE I AM INCLUDING BOTH PAIRS * FILE 093
OF PROGRAMS IN THIS PACKAGE. * FILE 093
* FILE 093
JCL TO RUN THESE PROGRAMS IS OF THE SAME FORMAT * FILE 093
AS IEBUPDTE JCL, TO THE POINT WHERE EACH PROGRAM * FILE 093
MIMICS THE FUNCTION OF IEBUPDTE. FOR INSTANCE, * FILE 093
UNUPDTE, WHICH UNLOADS A PDS TO A SEQUENTIAL * FILE 093
DATASET, HAS DDCARDS SYSPRINT, SYSUT1, AND * FILE 093
SYSUT2. UPDTE, WHICH DOES THE OPPOSITE, HAS * FILE 093
CONTROL CARDS SYSPRINT, SYSIN, AND SYSUT2. YOU * FILE 093
GET THE PICTURE. * FILE 093
* FILE 093
THESE FOUR PROGRAMS (TWO PAIRS) TAKEN TOGETHER, * FILE 093
PROVIDE POWERFUL TOOLS FOR SEQUENTIALIZATION OF * FILE 093
PARTITIONED DATASETS. * FILE 093
* FILE 093
------------------------------------------------------------- * FILE 093
* FILE 093
PDSLOAD update notes from Greg Price: (see File 134 - REVIEW) * FILE 093
* FILE 093
PDSLOAD has now been further enhanced to handle any * FILE 093
LRECL for both fixed-length and variable-length * FILE 093
records. The LRECL of the input sequential data set * FILE 093
can but need not match the LRECL of the output * FILE 093
partitioned data set. * FILE 093
* FILE 093
When the output PDS has fixed-length records, the input * FILE 093
file may have fixed-length or variable-length records. * FILE 093
(Text files transferred from PCs often go to variable- * FILE 093
length record files on MVS.) * FILE 093
* FILE 093
When the output PDS has variable-length records, only * FILE 093
variable-length record input data is acceptable. * FILE 093
* FILE 093
Undefined record format files cannot be used for input * FILE 093
or output. * FILE 093
* FILE 093
The minimum input LRECL is 80. The minimum output * FILE 093
LRECL is 1 (plus 4 for RDWs, if present). * FILE 093
* FILE 093
PARM=NEW is used to specify that, like IEBUPDTE, the * FILE 093
input control+data stream is to be loaded from SYSIN, * FILE 093
instead of SYSUT1. In any event, if an OPEN for SYSUT1 * FILE 093
does not open successfully (and no abend occurs) the * FILE 093
OPEN is retried with SYSIN as the DDname. * FILE 093
* FILE 093
PARM=SPF can still be used to generate ISPF * FILE 093
"statistics". SSI information will be lost when this * FILE 093
is selected. The "userid" of generated stats is * FILE 093
'PDSLOAD'. * FILE 093
* FILE 093
John Kalinich's Y2K windowing fix allows for 2-digit * FILE 093
years below 66 to be deemed to belong to the 21st * FILE 093
century. This is necessary because the PDSLOAD stats * FILE 093
format on the ./ ADD statement only allows for 2-digit * FILE 093
years. (Generated stats did not have a Y2K bug.) * FILE 093
* FILE 093
The SPF stats current record count will always be set * FILE 093
from the record count processed by PDSLOAD, even when * FILE 093
this differs from the data supplied on a ./ ADD card. * FILE 093
Other data will not be overridden. Apart from the * FILE 093
userid, supplied stats are now verified to consist of * FILE 093
numeric characters. * FILE 093
* FILE 093
The asterisk (*), question mark (?) and percent sign * FILE 093
(%) are now treated as generic character placeholders * FILE 093
for member selection. The three mask characters * FILE 093
function identically, and cause a match for the * FILE 093
corresponding byte position of the member name. Thus, * FILE 093
S(ABC****X) will select all members beginning with * FILE 093
'ABC' and ending in 'X' in the eighth byte, and S(****) * FILE 093
will select all members with names no longer than four * FILE 093
non-blank characters. * FILE 093
* FILE 093
The IBM OS utility DDname override parameter can now be * FILE 093
used by PDSLOAD. The SYSIN, SYSPRINT and SYSUT2 * FILE 093
"slots" are relevant. (This was done to facilitate * FILE 093
dynamic invocation from the REVIEW TSO command.) See * FILE 093
the leading comments in the source code for more * FILE 093
information on DDname overrides. * FILE 093
* FILE 093
Parameter order is 'NEW,SPF,S(********),UPDTE(><)' for * FILE 093
example. Unwanted options can be omitted, but the * FILE 093
order is fixed. * FILE 093
* FILE 093
Greg Price 20 April, 1999 * FILE 093
* FILE 093
is from Michael Cleary, and contains a copy of * FILE 094
DAF (Dataset Audit Facility). This file is in * FILE 094
IEBUPDTE SYSIN format. * FILE 094
* FILE 094
MIKE CLEARY HAS A NEW ADDRESS: * FILE 094
* FILE 094
email: mcleary@pacbell.net * FILE 094
* FILE 094
Contact: Michael J. Cleary * FILE 094
Mainframe Technical Services * FILE 094
Bergen Brunswig * FILE 094
4000 Metropolitan Drive * FILE 094
Orange, California 92868 * FILE 094
Voice: 714.385.4052 * FILE 094
Fax 714.704.7052 * FILE 094
Email: mike.cleary@bergenbrunswig.com * FILE 094
* FILE 094
THE CURRENT VERSION OF DAF IS WRITTEN IN ASSEMBLER. * FILE 094
* FILE 094
DOCUMEMTATION IS INCLUDED IN THE CODE, AND I WILL * FILE 094
INCLUDE MORE DOCUMENTATION OF THE BAL VERSION IF IT * FILE 094
BECOMES AVAILABLE. * FILE 094
* FILE 094
The PL/I version of DAF, V1.3, is also included * FILE 094
here, as member OLDDAF, with its documentation * FILE 094
included. * FILE 094
* FILE 094
DAF IS A BATCH UTILITY PROGRAM THAT READS SMF * FILE 094
RECORDS AND GENERATES A REPORT. * FILE 094
* FILE 094
THE FOLLOWING CONTROL RECORDS CAN BE USED TO MODIFY * FILE 094
THE SELECTION CRITERIA. * FILE 094
* FILE 094
DDN= DEFAULT: ALL DDNAMES <### NOTE: * FILE 094
EACH TYPE OF * FILE 094
DSN= DEFAULT: ALL DATASETS <### CONTROL * FILE 094
RECORD CAN OCCUR * FILE 094
JOB= DEFAULT: ALL JOBS <### BETWEEN 0 AND * FILE 094
32 TIMES. * FILE 094
VOL= DEFAULT: ALL VOLUMES <### * FILE 094
* FILE 094
SD=YYDDD DEFAULT: START DATE 86001 * FILE 094
ED=YYDDD DEFAULT: END DATE 99365 * FILE 094
* FILE 094
DAF CAN SOLVE MANY COMMON MYSTERIES BY SHOWING: * FILE 094
* FILE 094
DATASET CREATE, ACCESS, RENAME, DELETE * FILE 094
HOW MANY EXCPS ? * FILE 094
WHAT DDNAME ? * FILE 094
WHAT JOB ? * FILE 094
WHAT TIME ? * FILE 094
WHAT VOLUME ? * FILE 094
* FILE 094
DAF CAN SOLVE SOME UNIQUE MYSTERIES BY SHOWING: * FILE 094
* FILE 094
WHAT VOLUMES DOES AN APPLICATION USE ? * FILE 094
WAS A CERTAIN DATASET USED LAST WEEKEND ? * FILE 094
* FILE 094
IS FROM MR PAUL G. DAVIS OF EDS IN LOUISVILLE, CO AND * File 095
CONTAINS A COPY OF HIS ISPF EDIT MACROS AND A PROGRAM * FILE 095
CALLED WHOIS WHICH MAY BE OF INTEREST TO ACF2 USERS * FILE 095
* FILE 095
EMAIL ADDRESS: Paul G Davis * FILE 095
* FILE 095
SEE FILE 251 WHICH HAS AN ALMOST ENTIRELY NEW COLLECTION * FILE 095
OF PAUL DAVIS' EDIT MACROS. LOOK BOTH AT THIS FILE AND * FILE 095
AT FILE 251 ALSO. * FILE 095
* FILE 095
WHOIS IS A PROGRAM * FILE 095
* FILE 095
EDS AND ENRON CORP IN NO WAY ASSUMES ANY RESPONSIBILITY FOR * FILE 095
THE USE OF ANY PART OF THIS CODE. HOWEVER, IF YOU * FILE 095
HAVE ANY QUESTIONS, FEEL FREE TO EMAIL. * FILE 095
* FILE 095
With a heavy heart, we regret to mention the passing of * FILE 095
Paul Davis on July 19, 2000. (SG) * FILE 095
* FILE 095
THIS FILE IS IN IEBUPDTE SYSIN FORMAT, FOR ADDITIONAL * FILE 095
INFORMATION PLEASE READ THE MEMBERS THAT START WITH * FILE 095
A DOLLAR SIGN ($). THIS FILE CONTAINS THE FOLLOWING: * FILE 095
* FILE 095
$BASIC BASIC INSTRUCTIONS FOR USE OF EDIT * FILE 095
MACROS * FILE 095
$CHANGES CHANGES AND MODIFICATIONS TO MEMBERS * FILE 095
$DESCRPT DESCRIPTION OF MACROS * FILE 095
$DOC THIS MEMBER * FILE 095
$SAMPJCL JCL TO COPY NEEDED MODULES AND COMPILE * FILE 095
LOAD MODULES * FILE 095
$SETUP SET UP FOR EDIT MACRO USE * FILE 095
COBLCAS COBOL SOURCE FOR LCASE (LOWER CASE) * FILE 095
EDIT MACRO * FILE 095
COBSEPL COBOL SOURCE FOR SEPLINE EDIT MACRO * FILE 095
COBUCAS COBOL SOURCE FOR UCASE (UPPER CASE) * FILE 095
EDIT MACRO * FILE 095
* FILE 095
$MACROS * FILE 095
* FILE 095
ADDCMDS CLIST TO ADD ASSIST IN ADDING COMMANDS TO * FILE 095
ISPF COMMAND TABLE * FILE 095
ASMBOX DRAW A BOX AROUND ASSEMBLY CODE LINES * FILE 095
(COMMENT THEM OUT) * FILE 095
B BROWSE A MEMBER IN SAME PDS WHEN IN EDIT * FILE 095
BIG CREATE BIG LETTERS IN YOUR TEXT * FILE 095
BIGS CREATE BIG SLANTED LETTERS IN YOUR TEXT * FILE 095
BLDCOPY BUILD IEBCOPY SYSIN STATEMENTS TO COPY * FILE 095
MEMBER OF A PDS * FILE 095
BRODUPDT NEATLY UPDATE SYS1.BRODCAST MESSAGES * FILE 095
CENTER CENTER TEXT IN YOUR TEXT * FILE 095
CHGALL QUICK CHANGE ALL COMMAND * FILE 095
CLISTBOX DRAW A BOX AROUND CLIST LINES (COMMENT THEM * FILE 095
OUT) * FILE 095
CLONE CLIST TO INVOKE CLONES AND CLONEP FROM ISPF * FILE 095
(3.4 ALSO) * FILE 095
CLONEP BUILD JCL TO CLONE A PDS * FILE 095
CLONES BUILD JCL TO CLONE A SEQUENTIAL FILE * FILE 095
CMDS DISPLAY COMMAND TABLE ENTRIES * FILE 095
CMDUPDT1 EDIT MACRO CALLED BY ADDCMDS CLIST * FILE 095
COBBOX DRAW A BOX AROUND COBOL CODE LINES (COMMENT * FILE 095
THEM OUT) * FILE 095
COMMENTS FIND ALL THE COMMENTS IN YOUR DATASET * FILE 095
COMPRESS COMPRESS CURRENT PDS IN PLACE * FILE 095
CONLY CHANGE "ONLY" COMMAND WITH SUB PARAMETERS * FILE 095
CONT PUT CONTINUATION CHARACTER IN COL 72 * FILE 095
CUSTBOX DRAW A CUSTOM BOX TO SPECIFICATION LENGTH X * FILE 095
WIDTH IN YOUR CODE * FILE 095
CUT CUT TEXT LINES FROM DATASET TO BE PASTED * FILE 095
LATER * FILE 095
CUTTO CUT TEXT LINES FROM DATASET TO ANOTHER * FILE 095
DATASET * FILE 095
D DELETE A MEMBER OF THE CURRENT PDS * FILE 095
DELCUT REMOVE A LEVEL OF CUT FROM PROFILE * FILE 095
DSIGENP CREATE IEBCOPY JCL FOR A PDS * FILE 095
DSIGENS CREATE IEBGENER JCL FOR A SEQUENTIAL * FILE 095
DATASET * FILE 095
E EDIT ANOTHER MEMBER OF THE CURRENT PDS * FILE 095
EDITPDS CLIST: PERFORM A COMMAND ON ALL MEMBERS OF * FILE 095
A CLIST * FILE 095
EMACS LIST TABLE SHOWING EDIT MACRO DESCRIPTIONS * FILE 095
FC FIND PENDING LINE COMMANDS * FILE 095
FIXJCL TIDY UP YOUR JCL * FILE 095
INIT INITIAL MACRO FOR EDIT MACRO PURPOSES * FILE 095
INITIAL INITIALIZE DATASET HEADERS FILL IN THE * FILE 095
BLANK INFO * FILE 095
JC CREATE A JOBCARD * FILE 095
JCLBOX DRAW A BOX AROUND JCL LINES (COMMENT THEM * FILE 095
OUT) * FILE 095
JC2 CREATE A SPECIALIZED JOBCARD * FILE 095
JC3 CREATE A JOBCARD WITH REFER INFO * FILE 095
JOBCARD CREATE A JOBCARD * FILE 095
LCASE CHANGE ENTIRE DATASET TO LOWER CASE * FILE 095
LCASEC CLIST MACRO TO CONVERT A DATASET TO LOWER * FILE 095
CASE * FILE 095
LJUST CHANGE AN ENTIRE DATASET TO UPPER CASE * FILE 095
MACHELP GET HELP FOR INDIVIDUAL MACROS * FILE 095
MACLIST DISPLAY A TABLE OF CURRENT ISPF EDIT MACROS * FILE 095
MEMLIST SHOW THE MEMBERS IN THE CURRENT PDS * FILE 095
MOVECOLS MOVE COLUMNS OF DATA WITHIN DATASET * FILE 095
MRCLEAN WIPE THE DATA OUT OF MEMBER BUT PRESERVE * FILE 095
THE BLANK LINES * FILE 095
MSTATS PROVIDE ISPF STATS ON MEMBER WITHOUT * FILE 095
LEAVING EDIT * FILE 095
ONLY FIND ONLY THE DATA WANTED * FILE 095
OTHER SAMPLE MACRO TO USE WITH PFSET (CHANGE TO * FILE 095
SUIT NEEDS) * FILE 095
PARA WORD PROCESSING POWER FOR ISPF EDIT * FILE 095
PARADOC DOCUMENTATION FOR PARA MACRO * FILE 095
PASTE PASTE DATASET LINE THAT WERE CUT EARLIER * FILE 095
PBOX DRAW A FLOWCHART BOX * FILE 095
PFCAN RESET PFKEYS BACK TO NORMAL * FILE 095
PFSET SET PFKEYS TO SPECIAL PURPOSE * FILE 095
PRTIT VPSPRINT CURRENT DATASET * FILE 095
QCREATE QUICK CREATE TO CURRENT DATASET * FILE 095
QREP QUICK REPLACE TO CURRENT DATASET * FILE 095
RCOLDEL DEL RULE LINES * FILE 095
RCOLS FANCY RULE * FILE 095
REPOTHER QUICK REPLACE TO OTHER DATASET * FILE 095
RJUST RIGHT JUSTIFY TEXT * FILE 095
RNAME RENAME A MEMBER WHILE IN EDIT * FILE 095
S EDIT A MEMBER OF CURRENT PDS * FILE 095
SEPLINE ADD SEPARATION LINES IN YOUR TEXT * FILE 095
SHOWCUT SHOW TEXT PREVIOUSLY CUT * FILE 095
SHOWCUT2 SHOW ONE LINE OF EACH CUT LEVEL * FILE 095
SHOWDCB SHOW CURRENT DATSET DCB * FILE 095
SHOWFLOW SHOW THE LOGIC FLOW OF CLIST OR PL/1 * FILE 095
PROGRAM * FILE 095
SHOWMACS SEE HELP FOR ALL EDITMACS ONE AT A TIME * FILE 095
SLINE PLACE A SINGLE SEPARATION LINE WHERE NEEDED * FILE 095
IN TEXT * FILE 095
SORTDUPS SORT CURRENT EDIT DATASET AND FIND DUPES * FILE 095
ST SUPERTYPE, TYPE A STRING OF BLOCK LETTERS * FILE 095
NICE.... * FILE 095
STAMP STAMP DATA INTO YOUR TEXT * FILE 095
STEDITY EDIT MACRO CALLED BY WHERMEM2 * FILE 095
STEDIT2 EDIT MACRO CALLED BY WHEREMEM * FILE 095
SUM SUM COLUMNS OF NUMBERS * FILE 095
T WHAT TIME IS IT * FILE 095
TABLBLD CLIST: CREATE ISPF TABLE FROM $DESCRPT * FILE 095
MEMBER USED BY EMACS * FILE 095
TYPE TYPE BLOCK CHARACTERS WITH EASE AND AUTO * FILE 095
SPACING * FILE 095
TYPESET EDIT MACRO TO USE WITH PFSET TO SET UP FOR * FILE 095
"TYPE" * FILE 095
UCASE CHANGE ENTIRE TEXT TO UPPER CASE * FILE 095
UCASEC CLIST MACRO TO CONVERT A DATASET TO UPPER * FILE 095
CASE * FILE 095
UNSEP REMOVE SEPARATION LINES CREATED BY SEPLINE * FILE 095
WHEREMEM CLIST: SHOW OCCURENCE OF MEMBER IN DD * FILE 095
CONCATENATION -- USEFUL * FILE 095
WHERMEM2 CLIST: SAME AS WHEREMEM MORE COMMANDS AND * FILE 095
INFO -- USEFUL * FILE 095
WIPEIT ERASE ALL LINES IN DATASET BUT MAINTAIN * FILE 095
BLANK LINES * FILE 095
XCOPY COPY A DATASET OTHER THAN THE PDS YOU ARE * FILE 095
WORKING IN * FILE 095
* FILE 095
THESE ARE A COLLECTION OF VARIOUS EDIT MACROS * FILE 095
THAT MAY BE SOMEWHAT USEFUL AT YOUR INSTALLATION. * FILE 095
SOME OF THEM ARE MY ORIGINAL, AND OTHERS ARE FROM * FILE 095
OTHER SHARE USERS. ALL OF THEM WORK AT THIS SITE. * FILE 095
SOME MAY WILL NEED TO BE MODIFIED TO WORK AT YOUR * FILE 095
SITE. TO USE THEM YOU WILL NEED TO HAVE ISPF 2.2 OR * FILE 095
LATER AND TSO/E REL 3 OR LATER. * FILE 095
* FILE 095
CONTAINS SEVERAL UTILITIES AND SYSTEM EXITS USED AT * FILE 096
THE UNIVERSITY OF MISSOURI HOSPITAL AND CLINICS OF * FILE 096
COLUMBUS, MISSOURI. * FILE 096
* FILE 096
THE FOLLOWING UTILITIES ARE INCLUDED IN THIS DATASET * FILE 096
(NOTE IF THE FIRST CHARACTER OF THE MEMBER IS "=" IT * FILE 096
IS REALLY AN AT-SIGN) * FILE 096
* FILE 096
***** DASD ALLOCATION/RENAME CONTROL ***** * FILE 096
* FILE 096
HCCDADSM - EXIT TO RESTRICT DASD DATASET ALLOCATIONS * FILE 096
BY DSNAME, VOLUME, AND USER RACF * FILE 096
AUTHORITY. * FILE 096
IGGPRE00 - DADSM EXIT TO CONDITIONALLY LINK TO * FILE 096
HCCDADSM ONLY IF IT IS PRESENT. * FILE 096
INIDADSM - PROGRAM TO PROCESS PARAMETERS AND SETUP * FILE 096
HCCDADSM CONTROL BLOCK (DADSMBLK) * FILE 096
INITNCT - PROGRAM TO BUILD USER CVT (WE CALL THIS * FILE 096
CONTROL BLOCK THE NETWORK CONTROL TABLE * FILE 096
OR NCT) AND PLACE ITS ADDRESS IN THE * FILE 096
CVTUSER FIELD. THIS CONTROL BLOCK IS * FILE 096
USED AS THE ANCHOR FOR THE DADSMBLK * FILE 096
ABOVE. * FILE 096
IPLDATE - TSO CP TO EXTRACT AND FORMAT THE LAST IPL * FILE 096
DATE AND TIME FROM THE NCT (SINCE THE NCT * FILE 096
IS CREATED FAIRLY LATE IN THE IPL, THIS * FILE 096
IS A BETTER APPROXIMATION OF THE ACTUAL * FILE 096
"SYSTEM AVAILABLE" DATE AND TIME THAN * FILE 096
THAT IN THE SMCA). * FILE 096
DADSMMOD - TSO CP TO ALLOW AUTHORIZED USERS TO * FILE 096
TEMPORARILY MODIFY DADSM PROTECTION * FILE 096
ATTRIBUTES IN DADSMBLK. * FILE 096
=DADSMMD - TSO HELP FOR DADSMMOD COMMAND. * FILE 096
=INIDASD - SAMPLE INITIALIZATION PARAMETERS FOR * FILE 096
INIDADSM ABOVE. * FILE 096
=DADSM - SAMPLE JCL FOR DADSM STARTED TASK TO SET * FILE 096
UP DADSMBLK. * FILE 096
=INITSYS - SAMPLE JCL FOR INITSYS STARTED TASK TO * FILE 096
SET UP NCT. * FILE 096
=NCTDOC - GENERAL COMMENTS ABOUT THE NCT, WHEN/HOW * FILE 096
IT IS CREATED, ETC. * FILE 096
* FILE 096
***** RETURN CODE CHECKER ***** * FILE 096
* FILE 096
HCCRCCK - PROGRAM TO FORCE AN ABEND ON A BAD RETURN * FILE 096
CODE, ALLOWING CONDITIONAL DISP TO BE * FILE 096
TAKEN FOR DATA SETS. * FILE 096
ATTCHATH - ATTACH/REAUTH SUBROUTINE USED BY HCCRCCK. * FILE 096
=HCCRCCK - SAMPLE JCL FOR EXECUTING THE HCCRCCK * FILE 096
PROGRAM. * FILE 096
* FILE 096
***** JES2 CHECKPOINT PERFORMANCE MONITOR **** * FILE 096
* FILE 096
HJUX2530 - SAMPLE JES EXIT 253 TO CUT SMF RECORDS * FILE 096
FOR JES2 CHECKPOINT PERFORMANCE * FILE 096
MONITORING. * FILE 096
TSJESSMF - PL/1 PROGRAM TO REDUCE AND ANALYZE SMF * FILE 096
RECORDS PRODUCED BY HJUX2530 ABOVE. * FILE 096
PDUMP - SUBROUTINE FOR TSJESSMF (PL/1 DATA AREA * FILE 096
FORMATTED DUMP) * FILE 096
=JESSMF - SAMPLE JCL TO EXECUTE THE TSJESSMF * FILE 096
PROGRAM. * FILE 096
=JESPARM - SAMPLE JES2 INITIALIZATION PARAMETERS FOR * FILE 096
HJUX2530. * FILE 096
=JESCKPT - VARIOUS STUFF ABOUT JES2 CHECKPOINT * FILE 096
PROCESSING * FILE 096
* FILE 096
***** JCL PRESCAN AND REPLACEMENT **** * FILE 096
* FILE 096
IEFUJV - SMF EXIT TO SCAN AND CONDITIONALLY * FILE 096
REPLACE CERTAIN SYMBOLIC PARAMETERS IN * FILE 096
JCL PRIOR TO CONVERSION (E.G., HOST NAME, * FILE 096
DAY OF WEEK, DATE, ETC. CAN BE PLACED IN * FILE 096
APPROPRIATE PLACES IN YOUR JCL PRIOR TO * FILE 096
CONVERSION). * FILE 096
=IEFUJV - INSTRUCTIONS FOR USING IEFUJV MODULE AS * FILE 096
SHIPPED. * FILE 096
* FILE 096
***** VARIOUS PL/1 STUFF **** * FILE 096
* FILE 096
PLIARRV - MACRO TO GENERATE PL/1 STANDARD ENTRY * FILE 096
POINT TO ASSEMBLY LANGUAGE SUBROUTINES. * FILE 096
PLIRETN - MACRO TO GENERATE PL/1 STANDARD RETURN * FILE 096
SEQUENCE FOR ASSEMBLY LANGUAGE * FILE 096
SUBROUTINES. * FILE 096
DSAD - MACRO TO GENERATE A DSECT DESCRIBING THE * FILE 096
PL/1 DYNAMIC STORAGE AREA (DSA). * FILE 096
TRIM - ASSEMBLY LANGUAGE SUBROUTINE TO CHOP * FILE 096
LEADING AND TRAILING BLANKS FROM A * FILE 096
CHARACTER STRING. * FILE 096
FINDCHR - ASSEMBLY LANGUAGE SUBROUTINE TO LOCATE * FILE 096
THE FIRST CHARACTER IN A STRING MATCHING * FILE 096
ANY CHARACTER IN AN INDEX STRING. * FILE 096
* FILE 096
***** SMP/E SUPPORT FOR ABOVE FUNCTIONS **** * FILE 096
* FILE 096
MDL0101 - SMP/E USERMOD TO INSTALL * FILE 096
HCCDADSM/IGGPRE00 INTO YOUR (MVS/SP * FILE 096
1.3.6) SYSTEM. * FILE 096
MDL0103 - SMP/E USERMOD TO INSTALL * FILE 096
HCCDADSM/IGGPRE00 INTO YOUR (MVS/SP 2.2) * FILE 096
SYSTEM. * FILE 096
MJL1401 - SMP/E USERMOD TO INSTALL EXIT POINTS FOR * FILE 096
EXIT 253 INTO YOUR JES2 (1.3.6) HASPCKPT * FILE 096
MODULE. * FILE 096
MJL1501 - SMP/E USERMOD TO ADD KNOWLEDGE OF * FILE 096
HJUX2530 (EXIT 253) TO YOUR JES2 (1.3.6) * FILE 096
SYSTEM. * FILE 096
MSL0101 - SMP/E USERMOD TO ADD KNOWLEDGE OF IEFUJV * FILE 096
INTO YOUR MVS (1.3.6) SYSTEM. * FILE 096
MSL0103 - SMP/E USERMOD TO ADD KNOWLEDGE OF IEFUJV * FILE 096
INTO YOUR MVS (2.2) SYSTEM. * FILE 096
* FILE 096
* FILE 096
IS FROM U.S. BANK OF WASHINGTON AND CONTAINS ALL THE * FILE 097
SOURCE CODE, JCL, AND DOCUMENTATION FOR THE COMPLETE * FILE 097
DISK MANAGEMENT SYSTEM OF PEOPLES NATIONAL BANK OF * FILE 097
WASHINGTON. ALL DISK MANAGEMENT SYSTEMS REQUIRE * FILE 097
CUSTOMIZATION TO FIT THE PARTICULAR NEEDS OF EACH * FILE 097
INSTALLATION. EXTENSIVE CUSTOMIZATION DOCUMENTATION * FILE 097
IS PROVIDED IN THE DOCPROG (PROGRAMMER'S * FILE 097
DOCUMENTATION) MEMBER. RUN PROCEDURES, REPORT * FILE 097
FORMATS, AND RECORD LAYOUTS ARE PROVIDED IN DOCUSER * FILE 097
(USER'S DOCUMENTATION). SAMPLE JCL AND CONTROL FILES * FILE 097
ARE PROVIDED IN OTHER MEMBERS OF THIS PDS. * FILE 097
* FILE 097
ALL OF THESE PROGRAMS HAVE BEEN COMPILED AND RUN IN * FILE 097
UNDER MVS/SP JES3. TO THE BEST OF OUR KNOWLEDGE THEY * FILE 097
HAVE NO XA OR JES DEPENDENCIES. * FILE 097
* FILE 097
THIS FILE IS IN IEBUPDTE SYSIN FORMAT SEE THE MEMBER * FILE 097
CALLED =DOC (WHERE = IS THE AT-SIGN) FOR ADDITIONAL * FILE 097
INFORMATION * FILE 097
* FILE 097
IS AN ISPF APPLICATION FOR USE WITH THE TSO/E XMIT * FILE 098
AND RECEIVE FUNCTION FROM DAYCO PRODUCT INC OF DAYTON * FILE 098
OHIO. THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND * FILE 098
CONTAINS A COPY OF THE DOCUMENTATION, CLISTS, * FILE 098
PANELS AND SKELETONS. FOR ADDITIONAL INFORMATION SEE * FILE 098
THE MEMBER CALLED $$$PROSE. FILE 099 OF THIS TAPE * FILE 098
CONTAINS A FILE THAT IS NEEDED BY THIS SYSTEM * FILE 098
* FILE 098
IS AN ISPF APPLICATION FOR USE WITH THE TSO/E XMIT * FILE 099
AND RECEIVE FUNCTION FROM DAYCO PRODUCT INC OF DAYTON * FILE 099
OHIO. THIS FILE IS IN NEEDED BY FILE 098 OF THIS * FILE 099
TAPE. THIS FILE IS IN IEBGENER FORMAT, THE DCB IS * FILE 099
LRECL=251 BLKSIZE=32630 RECFM=FB * FILE 099
* FILE 099
IS FROM DELUXE CHECK PRINTERS AND CONTAINS THEIR SPF * FILE 100
MENUS, PANELS AND MESSAGES FOR THE NEW ISPF/PDF. * FILE 100
THIS FILE IS IN IEBUPDTE SYSIN FORMAT, SEE THE * FILE 100
MEMBER CALLED $$$DOC FOR ADDITIONAL INFORMATION. * FILE 100
FILE 101 OF THIS TAPE CONTAINS THE CLISTS REQUIRED BY * FILE 100
THESE SPF MENUS. THE FOLLOWING IS A CONDENSED * FILE 100
VERSION OF WHAT IS IN THE $$$DOC MEMBER : * FILE 100
* FILE 100
ALL PANELS AND OR MENUS AND OR MESSAGES AND OR * FILE 100
SKELETONS HAVE BEEN CONVERTED TO THE NEWEST ISPF * FILE 100
AND ISPF/PDF FORMATS 5668-960 AND 5665-268 I THINK * FILE 100
* FILE 100
$$$$DISC DISCLAIMER ON CONTENTS * FILE 100
* FILE 100
SPF MENUS * FILE 100
* FILE 100
ABR***** ABR UTILITY SELECTION AND FUNCTIONS PANELS * FILE 100
COBOL2 FOREGROUND COBOL COMPILE PANEL * FILE 100
COBOL2B BACKGROUND COBOL COMPILE PANEL * FILE 100
GENER1 FOREGROUND IEBGENER PANEL * FILE 100
INFOMGT1 INFO MANAGEMENT PANEL * FILE 100
INFOSEL INFO MANAGEMENT DATABASE SELECTION PANEL * FILE 100
ISR PRIM REPLACEMENT FOR PRIMARY OPTION MENU * FILE 100
LINK3 FOREGROUND LINKAGE EDIT PANEL * FILE 100
LINK3B BACKGROUND LINKAGE EDIT PANEL * FILE 100
PLTCMPR1 COMPARE UTILITY PANEL * FILE 100
PSWDSEL PASSWORD (OS) MAINTENANCE SELECTION PANEL * FILE 100
PWADD PASSWORD (OS) ADDITION PANEL * FILE 100
PWCHNG PASSWORD (OS) CHANGE PANEL * FILE 100
PWDEL PASSWORD (OS) DELETION PANEL * FILE 100
S1ASM1 FOREGROUND SERIES 1 HOST ASSEMBLER PANEL * FILE 100
S1ASM1B BACKGROUND SERIES 1 HOST ASSEMBLER PANEL * FILE 100
S1OBJ1 FOREGROUND SERIES 1 OBJECT SHIPPING PANEL * FILE 100
USERSEL USER UTILITY SELECTION MENU * FILE 100
USERSELB USER BACKGROUND SELECTION MENU * FILE 100
USERVTOC VTOC UTILITY PANEL * FILE 100
* FILE 100
SPF TUTORIAL MENUS * FILE 100
* FILE 100
TABR**** ABR UTILITY FUNCTIONS TUTORIAL PANELS * FILE 100
TPLTCMP* COMPARE UTILITY TUTORIAL PANELS * FILE 100
TS1ASM1 SERIES1 OBJECT SHIPPING TUTORIAL PANEL * FILE 100
TVTOC** VTOC UTILITY TUTORIAL PANELS * FILE 100
* FILE 100
CLISTS * FILE 100
* FILE 100
ABR***** ABR CLISTS * FILE 100
****PASS PASSWORD (OS) MAINTENANCE CLISTS * FILE 100
GENER1 IEBGENER CLIST * FILE 100
INFOMGT1 INFO MANAGEMENT CLIST * FILE 100
PLTCMPR FOREGROUND COMPARE UTILITY CLIST * FILE 100
(REQUIRED SYNCSORT) * FILE 100
S1ASM1 FOREGROUND SERIES 1 HOST ASSEMBLER CLIST * FILE 100
S1ASM1B BACKGROUND SERIES 1 HOST ASSEMBLER CLIST * FILE 100
S1OBJ1 FOREGROUND SERIES 1 OBJECT SHIPPING CLIST * FILE 100
USERCOB FOREGROUND COBOL COMPILER CLIST * FILE 100
USERCOBB BACKGROUND COBOL COMPILER CLIST * FILE 100
USERLNK FOREGROUND LINK EDIT CLIST * FILE 100
USERLNKB BACKGROUND LINK EDIT CLIST * FILE 100
USERSELB BACKGROUND SELECTION PROCESSING CLIST * FILE 100
VTOCCMD1 VTOC UTILITY - REQUIRES VTOC COMMAND FROM CBT TAPE * FILE 100
* FILE 100
SPF MESSAGES * FILE 100
* FILE 100
ABR00 ABR UTILITY FUNCTIONS MESSAGES * FILE 100
PLTCM00 COMPARE MESSAGES * FILE 100
SASM00 SERIES 1 MESSAGES * FILE 100
VTOC00 VTOC UTILITY MESSAGES * FILE 100
* FILE 100
IS FROM DELUXE CHECK PRINTERS AND CONTAINS THEIR SPF * FILE 101
CLISTS FOR THE NEW ISPF/PDF. THIS FILE IS IN * FILE 101
IEBUPDTE SYSIN FORMAT, SEE THE MEMBER CALLED $$$DOC * FILE 101
IN FILE 100 ABOVE FOR ADDITIONAL INFORMATION * FILE 101
* FILE 101
is the TAPESCAN program, from Frank Pajerski of * FILE 102
Sacramento, California, and fixed to handle tapes * FILE 102
that have up to 64K blocks of data, by Sam Golob. * FILE 102
* FILE 102
email: fpajerski@earthlink.net * FILE 102
"Pajerski, Frank" * FILE 102
* FILE 102
email: sbgolob@attglobal.net or sbgolob@aol.com * FILE 102
* FILE 102
ABSTRACT - A PROGRAM TO PROVIDE AN OVERVIEW OF THE * FILE 102
DATA SETS ON A TAPE, COPY FILES AND * FILE 102
RECOVER DATA PAST THE FIRST END OF * FILE 102
VOLUME INDICATOR. INFORMATION PRESENTED * FILE 102
INCLUDES RECORD AND BYTE COUNT, LENGTH * FILE 102
ESTIMATE, DISPLAY OF THE FIRST 100 BYTES * FILE 102
OF THE FIRST FOUR RECORDS OF EACH DATA * FILE 102
SET, AND THE PHYSICAL TAPE FILE NUMBER. * FILE 102
* FILE 102
WARNINGS - WHEN DATA IS RECOVERED PAST THE END OF * FILE 102
VOLUME INDICATOR, THE FIRST RECORD MAY * FILE 102
HAVE BEEN TRUNCATED. IF ACCEPTED, IT * FILE 102
MAY LEAD TO PROBLEMS EVEN AFTER IT IS * FILE 102
COPIED. WHEN COPYING DATA SETS FROM A * FILE 102
STANDARD LABEL TAPE, THE DATA SET * FILE 102
SEQUENCE NUMBER STORED IN THE HEADER * FILE 102
RECORD ISN'T CHANGED. THIS HAS CAUSED * FILE 102
NO PROBLEMS SO FAR, BUT IS NOT SUPPORTED * FILE 102
BY IBM. SOME OPERATIONS OF THIS PROGRAM * FILE 102
ARE BASED ON THE NUMBER OF TAPE MARKS * FILE 102
ENCOUNTERED. * FILE 102
* FILE 102
TAPESCAN'S REPORTING HAS NOW (VERSION 5.2) BEEN * FILE 102
IMPROVED WHEN READING CARTRIDGES. I AM ALSO * FILE 102
INCLUDING THE OLDER VERSION (4.6A), JUST IN CASE. * FILE 102
VERSION 4.6A CAN READ CARTRIDGES, BUT REPORTS * FILE 102
THE FOOTAGES AS IF 6250 BPI TAPES. * FILE 102
* FILE 102
ABOUT TAPESCAN VERSION 5.2 - * FILE 102
* FILE 102
I've now included my 64K fix to Frank Pajerski's update * FILE 102
to Howard Dean's version of TAPESCAN. This version has * FILE 102
better 3480 support, and I also improved the report line * FILE 102
if you mounted a tape with a different VOLSER than the JCL * FILE 102
said. The report now shows both VOLSERs, so you can see * FILE 102
them. This version is called TAPESCAN Version 5.2. * FILE 102
Old Version 4.6 is being included for reference, and it * FILE 102
has also been fixed to show the JCL VOLSER and the internal * FILE 102
VOLSER that is on the VOL1 label of the tape, if they are * FILE 102
different. (SG 06/00) * FILE 102
* FILE 102
CONTAINS ISPF/DIALOGS FROM MR WILLIAM R HORTON OF * FILE 103
EASTMAN CHEMICAL COMPANY OF KINGSPORT, TN, WHICH * FILE 103
CONTAINS A COPY OF THEIR ISPF CONSOLE DIALOG AND * FILE 103
GRS/ENQ DIALOG. SEE THE MEMBER CALLED $INSTALL FOR * FILE 103
COMPREHENSIVE DOCUMENTATION PLUS INSTALLATION * FILE 103
INSTRUCTIONS. THIS FILE IS IN IEBUPDTE SYSIN FORMAT. * FILE 103
* FILE 103
BILL HORTON * FILE 103
EASTMAN CHEMICAL COMPANY * FILE 103
BUILDING 284 * FILE 103
KINGSPORT, TENNESSEE 37662 * FILE 103
PHONE (423) 229-3388 FAX (423) 229-3254 * FILE 103
IBMMAIL: USECHV58 (OV/VM), USECHU6L (TSO/MVS) * FILE 103
* FILE 103
email address: bhorton@cs.utk.edu * FILE 103
bhorton@eastman.com * FILE 103
* FILE 103
THIS FILE CONTAINS SAMPLE ISPF DIALOGS AND EDIT * FILE 103
MACROS DEVELOPED AT TENNESSEE EASTMAN COMPANY. * FILE 103
NO GUARANTEES ARE MADE AS TO THE ACCURACY, * FILE 103
SUITABILITY FOR YOUR INSTALLATION, ORIGINALITY, * FILE 103
NOVELTY, OR CLEVERNESS OF ANY OF THE PANELS, * FILE 103
CLISTS, OR PROGRAMS CONTAINED HEREIN. * FILE 103
* FILE 103
HERE ARE THE DESCRIPTIONS OF THE VARIOUS DIALOGS * FILE 103
CONTAINED IN THIS FILE: (UPDATED FOR OS/390 - 01-98) * FILE 103
* FILE 103
BROADCAST DATASET DIALOG * FILE 103
* FILE 103
THIS IS A DIALOG WHICH CAN BE USED TO KEEP * FILE 103
TRACK OF UPDATES TO THE TSO BROADCAST DATASET. * FILE 103
IT STORES INFORMATION ABOUT EACH MESSAGE IN * FILE 103
AN ISPF TABLE, AND STORES EACH BROADCAST * FILE 103
MESSAGE AS A PDS MEMBER. MESSAGES CAN BE * FILE 103
ADDED, MODIFIED, OR DELETED; ENTRY AND UPDATE * FILE 103
OF MESSAGES IS VIA ISPF EDIT. MESSAGES ARE * FILE 103
GIVEN AN EXPIRATION DATE AND WILL BE REMOVED * FILE 103
FROM THE BROADCAST DATASET THE NEXT TIME THE * FILE 103
DIALOG IS INVOKED (AND A BROADCAST MESSAGE IS * FILE 103
CHANGED) AFTER THE EXPIRATION DATE. * FILE 103
* FILE 103
ISPF TABLE EDIT DIALOG * FILE 103
* FILE 103
THIS DIALOG CAN BE USED TO EDIT A COMMAND * FILE 103
TABLE, INCLUDING ISRCMDS AND ISPCMDS. THIS IS * FILE 103
DONE BY COPYING THE TABLE TO THE USER'S PROFILE * FILE 103
DATASET (ASSUMED TO BE ALLOCATED TO DDNAME * FILE 103
ISPTABL) AND INVOKING THE ISPF COMMAND TABLE * FILE 103
EDIT PROGRAM, ISPUCM, AGAINST IT. IF THE TABLE * FILE 103
IS CHANGED BY ISPUCM, THEN IT IS COPIED BACK TO * FILE 103
ITS SOURCE. ISPF MUST BE RECYCLED TO SEE THE * FILE 103
EFFECTS OF THE CHANGE. * FILE 103
* FILE 103
CONSOLE DISPLAY FACILITY (CDF) * FILE 103
* FILE 103
THIS IS AN ISPF DIALOG TO DISPLAY MVS CONSOLE * FILE 103
INFORMATION (AS IN SPY). IF THE INVOKER IS * FILE 103
AUTHORIZED (HAS OPER AUTHORITY), THEN MVS * FILE 103
COMMANDS MAY ALSO BE ENTERED. I DIDN'T WRITE * FILE 103
THIS MYSELF. I GOT IT FROM A MODS TAPE * FILE 103
(PROBABLY THE CBT TAPE) AND MODIFIED IT * FILE 103
FOR EXTENDED DATA STREAM CONSOLES (E.G., 3290S * FILE 103
AND 3179S) AND FOR MVS SP 2.2.0. THERE ARE A * FILE 103
LOT OF WAYS TO ENTER MVS COMMANDS AND GET * FILE 103
RESPONSES NOWADAYS, BUT WE STILL LIKE THIS * FILE 103
WAY BEST. THIS CODE WORKS WITH MVS/SP 3.1.0E * FILE 103
(MVS/ESA). * FILE 103
* FILE 103
GRS/ENQ DIALOG * FILE 103
* FILE 103
THIS DIALOG DISPLAYS ENQUEUE INFORMATION. YOU * FILE 103
CAN REQUEST THAT ONLY CONTENTION INFORMATION * FILE 103
BE DISPLAYED, OR YOU CAN SPECIFY JOBNAME, QNAME, * FILE 103
AND / OR RNAME. THIS IS CODE I GOT SOMEWHERE * FILE 103
ELSE AND ADDED ISPF AROUND IT. * FILE 103
* FILE 103
PC3270 FILE TRANSFER DIALOG. * FILE 103
* FILE 103
THIS DIALOG IS MOSTLY JUST A PANEL WHICH * FILE 103
FACILITATES THE USE OF THE PC3270 FILE * FILE 103
TRANSFER PROGRAM WHILE IN ISPF. THE PANEL HAS * FILE 103
TUTORIAL PANELS WHICH GIVE SYNTAX AND SAMPLES * FILE 103
FOR THE PC SEND AND RECEIVE COMMANDS. * FILE 103
* FILE 103
THE DIALOG IS INVOKED BY ENTERING "PC" ON THE * FILE 103
COMMAND LINE OF THE BOTTOM PANEL OF ISPF. A * FILE 103
COMMAND TABLE ENTRY CAUSES THE CLIST VPCC TO * FILE 103
BE INVOKED. THIS CLIST DISPLAYS PANEL VPC WHICH * FILE 103
PUTS THE COMMAND LINE AT THE BOTTOM * FILE 103
(REQUIRED BY IND$FILE). THE USER CAN NOW ENTER * FILE 103
THE SEND OR RECEIVE COMMAND ON HIS DOS SCREEN. * FILE 103
* FILE 103
WHEN THE FILE TRANSFER PROGRAM ENTERS "IND$FILE * FILE 103
..." ON THE ISPF THE COMMAND LINE, A COMMAND * FILE 103
TABLE ENTRY INVOKES A CLIST (VPCTRAN) WHICH * FILE 103
ACTUALLY INVOKES THE IND$FILE COMMAND. * FILE 103
VPCTRAN IS BASED ON ADMUPCFT FROM IBM VIA GDDM. * FILE 103
* FILE 103
DIALOG TO DISPLAY LOGO OF SUBMITTER * FILE 103
* FILE 103
THIS PROGRAM DISPLAYS THE LOGO OF THE * FILE 103
SUBMITTER OF THESE MODS ON AN ISPF PANEL. IT * FILE 103
MAY BE INVOKED VIA COMMAND TABLE ENTRY LOGO. * FILE 103
NOTE THAT ENTERING "LOGO DEBUG" WILL CAUSE SOME * FILE 103
PROGRAM VARIABLES TO BE WRITTEN TO SYSPRINT, * FILE 103
AND WILL DISPLAY SOME OF THE ARCS USED TO DRAW * FILE 103
THE LOGO. * FILE 103
* FILE 103
EXIT DIALOG * FILE 103
* FILE 103
THIS DIALOG WILL END THE ISPF SESSION (IF * FILE 103
NOT IN SPLIT SCREEN), AND (OPTIONALLY) LOG THE * FILE 103
USER OFF TSO, AND LOG ANOTHER USER ON TSO. * FILE 103
IT IS INVOKED BY ENTERING "EXIT" FROM ANY ISPF * FILE 103
COMMAND LINE TO TERMINATE ISPF (GO TO TSO * FILE 103
READY), ENTERING "LOGOFF" TO TERMINATE ISPF * FILE 103
AND LOG THE USER OFF TSO, OR "LOGON" TO * FILE 103
TERMINATE ISPF, LOG THE USER OFF TSO, AND LOG * FILE 103
ANOTHER USER ON TSO (THIS IS CONSIDERABLY * FILE 103
QUICKER THAN LOGGING COMPLETELY OFF THEN * FILE 103
LOGGING BACK ON). * FILE 103
* FILE 103
PC3270 SCREEN COPY EDIT MACRO (COPYSCRN) * FILE 103
* FILE 103
THIS MACRO FACILITATES THE ENTRY OF DATA INTO * FILE 103
ISPF EDIT VIA THE WORK STATION CONTROL COPY * FILE 103
FUNCTION OF PC 3270S. IT PRESENTS A PANEL INTO * FILE 103
WHICH UP TO 80 BYTE RECORDS MAY BE * FILE 103
COPIED. AFTER THE DATA IS COPIED ONTO THE * FILE 103
PANEL, PRESSING THE ENTER KEY ADDS THE DATA TO * FILE 103
THE END OF THE CURRENT EDIT SESSION DATA AND * FILE 103
CLEARS THE COPY PANEL TO ACCEPT MORE INPUT. * FILE 103
* FILE 103
ELIST EDIT MACRO * FILE 103
* FILE 103
ELIST IS A MACRO WHICH CAN BE USED TO LIST THE * FILE 103
DATA CURRENTLY BEING EDITED VIA ISPF EDIT, * FILE 103
INCLUDING CHANGES WHICH HAVE BEEN MADE, WITHOUT * FILE 103
HAVING TO LEAVE EDIT OR SAVE THE DATA. SYNTAX IS: * FILE 103
* FILE 103
ELIST ATTR * FILE 103
* FILE 103
WHERE "ATTR" IS ANY VALID SYSOUT ATTRIBUTE WHICH * FILE 103
CAN BE SPECIFIED WITH THE TSO ALLOCATE COMMAND. * FILE 103
EXAMPLES: * FILE 103
* FILE 103
ELIST DEST(NYC.RMT21) LIST ON AN RJE PRINTER ON * FILE 103
ANOTHER NODE * FILE 103
ELIST DEST(VM1.USER66) SEND TO A VM USER'S VIRTUAL * FILE 103
READER * FILE 103
ELIST CHARS(GT12) LIST ON 3800 * FILE 103
* FILE 103
IF NO ATTRIBUTE IS ENTERED, THE DEFAULT * FILE 103
DESTINATION OF THE TSO USER'S SESSION WILL BE * FILE 103
USED. * FILE 103
* FILE 103
INFO EDIT MACRO * FILE 103
* FILE 103
THE INFO MACRO GETS INFORMATION ABOUT THE * FILE 103
DATASET AND MEMBER BEING EDITED, AND DISPLAYS * FILE 103
IT IN THE DATA VIA MSG AND NOTE LINES. THE * FILE 103
INFORMATION WILL NOT BE SAVED, AND MAY BE * FILE 103
CLEARED VIA THE RESET COMMAND. * FILE 103
* FILE 103
SPELL EDIT MACRO * FILE 103
* FILE 103
SPELL INVOKES IBM'S DOCUMENT * FILE 103
COMPOSITION FACILITY (SCRIPT/VS) TO CHECK * FILE 103
SPELLING OF THE DATA CURRENTLY BEING EDITED. * FILE 103
LINES CONTAINING MISSPELLED WORDS HAVE A NOTE * FILE 103
LINE INSERTED AFTER THEM, LISTING THE MISSPELLED * FILE 103
WORDS FOR THE LINE. * FILE 103
* FILE 103
ISPF SUPPORT FOR THE QUEUE COMMAND * FILE 103
* FILE 103
THIS IS AN UPDATE TO THE JES2 2.2.0 LEVEL OF * FILE 103
QUEUE TO PROVIDE RUDIMENTARY ISPF SUPPORT. THE * FILE 103
RESULT IS NOT VERY ELEGANT BUT THE MODS TO * FILE 103
QUEUE ARE SMALL SO THAT THE CODE CAN BE REWORKED * FILE 103
EASILY FOR NEW VERSIONS OF QUEUE. DETAILS ARE * FILE 103
IN MEMBER $$ISPF. THE QUEUE COMMAND ITSELF IS * FILE 103
NOT CONTAINED HERE, JUST THE MODULES WHICH HAVE * FILE 103
CHANGES FOR ISPF SUPPORT. * FILE 103
* FILE 103
TSO/E RACF CONVERSION AID * FILE 103
* FILE 103
THIS PROGRAM CAN BE USED, WHEN CONVERTING TSO * FILE 103
LOGON INFORMATION FROM SYS1.UADS TO RACF, TO * FILE 103
MIGRATE THE FIRST TSO COMMAND TO BE ISSUED FROM * FILE 103
SYS1.UADS TO RACF (WHICH IS NOT DONE BY THE * FILE 103
RACONVRT COMMAND). * FILE 103
* FILE 103
INPUT IS A FLAT FILE OF 172 BYTE SYS1.UADS * FILE 103
RECORDS. YOU SHOULD CONCATENATE ALL SYS1.UADS * FILE 103
MEMBERS TO PROVIDE THIS INPUT PUT. * FILE 103
* FILE 103
WHEN THE PROGRAM FINDS A TSO COMMAND TO BE * FILE 103
ISSUED, IT UPDATES THE APPROPRIATE FIELD IN * FILE 103
THE RACF DATA BASE, SO THAT THIS COMMAND WILL * FILE 103
NOT BE LOST ACROSS THE CONVERSION FROM * FILE 103
SYS1.UADS TO RACF. * FILE 103
* FILE 103
TSO LOGON UPDATE DIALOG * FILE 103
* FILE 103
THIS IS AN ISPF DIALOG TO FACILITATE THE * FILE 103
UPDATING OF CERTAIN TSO LOGON INFORMATION * FILE 103
FIELDS. SOME OF THESE FIELDS CAN BE UPDATED * FILE 103
FROM THE TSO/E FULLSCREEN LOGON PANEL, BUT MANY * FILE 103
OF OUR TSO USERS NEVER SEE THIS PANEL, AS WE * FILE 103
HAVE A WINDOWING PACKAGE WHICH AUTOMATICALLY * FILE 103
SUPPLIES THEIR PASSWORD. ALSO, IT'S MORE * FILE 103
CONVENIENT TO CHANGE THESE FIELDS WHEN YOU THINK * FILE 103
OF IT, RATHER THAN HAVING TO WAIT UNTIL YOUR * FILE 103
NEXT LOGON. * FILE 103
* FILE 103
INFORMATION WHICH MAY BE UPDATED IN THIS DIALOG * FILE 103
IS: * FILE 103
* FILE 103
NAME * FILE 103
STATION (FIRST FOUR BYTES OF INSTALLATION * FILE 103
DATA) * FILE 103
ACCOUNT * FILE 103
LOGON PROCEDURE * FILE 103
INITIAL COMMAND * FILE 103
* FILE 103
ALL OF THE ABOVE ARE THE STANDARD RACF DATA * FILE 103
BASE FIELDS TSO/E USES AFTER THE CONVERSION * FILE 103
FROM SYS1.UADS TO RACF. * FILE 103
* FILE 103
FIELDS WHICH REQUIRE RACF AUTHORIZATION TO USE * FILE 103
SPECIFIC VALUES WILL BE CHECKED AND ERROR * FILE 103
MESSAGES ISSUED IF THE USER IS NOT AUTHORIZED. * FILE 103
* FILE 103
CONTENTS OF EACH MEMBER OF THIS DATASET * FILE 103
* FILE 103
MEMBER CONTENTS * FILE 103
------ -------- * FILE 103
$$ISPF DOCUMENTATION FOR ISPF SUPPORT FOR THE * FILE 103
QUEUE COMMAND * FILE 103
$$SCRIPT SCRIPT SOURCE FOR THIS DOCUMENT * FILE 103
$DOC SHORT DESCRIPTION OF MODS * FILE 103
$INSTALL INSTALLATION INSTRUCTIONS (THIS * FILE 103
DOCUMENT) * FILE 103
$LEVEL MODIFICATIONS AND SOURCE SYSTEM LEVEL * FILE 103
#COPYSCR TUTORIAL PANEL FOR COPYSCRN EDIT MACRO * FILE 103
#ELIST TUTORIAL PANEL FOR ELIST EDIT MACRO * FILE 103
#INFO TUTORIAL PANEL FOR INFO EDIT MACRO * FILE 103
#SPELL TUTORIAL PANEL FOR SPELL EDIT MACRO * FILE 103
CDF SOURCE FOR MVS CONSOLE DIALOG (ASSEMBLER) * FILE 103
CDFDATAB PANEL USED BY MVS CONSOLE DIALOG * FILE 103
CDFHELP TUTORIAL PANEL FOR MVS CONSOLE DIALOG * FILE 103
COPYSCRN EDIT MACRO FOR SCREEN COPY * FILE 103
COPYSCT1 TUTORIAL PANEL FOR SCREEN COPY EDIT MACRO * FILE 103
COPYSCT2 TUTORIAL PANEL FOR SCREEN COPY EDIT MACRO * FILE 103
COPYSC01 PANEL FOR SCREEN COPY EDIT MACRO * FILE 103
DISPLAY SOURCE CODE FOR QUEUE COMMAND MODULE * FILE 103
DISPLAY MODIFIED FOR ISPF * FILE 103
ELIST EDIT MACRO FOR LISTING DATA * FILE 103
INFO EDIT MACRO FOR DISPLAYING DATASET INFORMATION * FILE 103
INIT SOURCE CODE FOR QUEUE COMMAND MODULE * FILE 103
INIT MODIFIED FOR ISPF * FILE 103
QCOMMON SOURCE CODE FOR QUEUE COMMAND MODULE * FILE 103
QCOMMON MODIFIED FOR ISPF * FILE 103
QUECMDS ISPF COMMAND TABLE FOR RUNNING QUEUE * FILE 103
QUEPROF ISPF APPLICATION PROFILE FOR RUNNING QUEUE * FILE 103
QUEUE SOURCE CODE FOR QUEUE COMMAND MODULE * FILE 103
QUEUE MODIFIED FOR ISPF * FILE 103
RACFTSO5 JOBSTREAM (JCL + SOURCE) TO MIGRATE * FILE 103
"FIRST TSO COMMAND" FROM * FILE 103
UADS TO RACF AFTER RUNNING RACONVRT * FILE 103
REPOS SOURCE CODE FOR QUEUE COMMAND MODULE * FILE 103
REPOS MODIFIED FOR ISPF * FILE 103
SPELL EDIT MACRO TO CHECK SPELLING * FILE 103
TECMODS PANEL USED TO INVOKE SOME OF THE MODS. * FILE 103
TECZ00 MESSAGES USED BY SEVERAL DIALOGS * FILE 103
TVENQ1 TUTORIAL PANEL FOR GRS/ENQ DIALOG * FILE 103
TVENQ11 TUTORIAL PANEL FOR GRS/ENQ DIALOG * FILE 103
TVENQ12 TUTORIAL PANEL FOR GRS/ENQ DIALOG * FILE 103
TVENQ2 TUTORIAL PANEL FOR GRS/ENQ DIALOG * FILE 103
VBROAD CLIST USED BY BROADCAST MESSAGE DIALOG * FILE 103
VBROADE ISPF EDIT MACRO USED BY BROADCAST MESSAGE DIALOG * FILE 103
VBROADI CLIST USED TO INITIALIZE BROADCAST MESSAGE DIALOG * FILE 103
VBROAD0 PANEL USED BY BROADCAST MESSAGE DIALOG * FILE 103
VBROAD1 PANEL USED BY BROADCAST MESSAGE DIALOG * FILE 103
VBROAD2 PANEL USED BY BROADCAST MESSAGE DIALOG * FILE 103
VCMDEDIC CLIST USED BY COMMAND TABLE EDIT DIALOG * FILE 103
VCMDEDIT PANEL USED BY COMMAND TABLE EDIT DIALOG * FILE 103
VENQ1 PANEL USED BY GRS/ENQ DIALOG * FILE 103
VENQ2 PANEL USED BY GRS/ENQ DIALOG * FILE 103
VEXIT PANEL USED WITH FAST EXIT/LOGOFF/LOGON DIALOG * FILE 103
VEXITC CLIST USED WITH FAST EXIT/LOGOFF/LOGON DIALOG * FILE 103
VISPFG2 SOURCE + JCL FOR LOGO PROGRAM (PL/I) * FILE 103
VLOGO PANEL USED WITH LOGO PROGRAM * FILE 103
VLOGOC CLIST USED WITH LOGO PROGRAM * FILE 103
VLOGON RACF UPDATE DIALOG SOURCE (BAL) * FILE 103
VLOGONP PANEL USED BY RACF UPDATE DIALOG * FILE 103
VPC PANEL USED BY PC FILE TRANSFER DIALOG * FILE 103
VPCC CLIST USED BY PC FILE TRANSFER DIALOG * FILE 103
VPCTRAN CLIST USED BY PC FILE TRANSFER DIALOG * FILE 103
VPCT000 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT001 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT002 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT003 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT010 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT011 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT012 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT013 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT014 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT015 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT016 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT017 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VPCT018 TUTORIAL PANEL FOR PC FILE TRANSFER DIALOG * FILE 103
VUTL16 SOURCE FOR GRS/ENQ DIALOG (ASSEMBLER) * FILE 103
* FILE 103
* FILE 103
is JRP from David Cartwright of Sutton Coldfield, * FILE 104
England. This file was modified from previous files * FILE 104
File 104 and File 158 from this tape. * FILE 104
* FILE 104
DAVID CARTWRIGHT * FILE 104
103, DARNICK ROAD, * FILE 104
SUTTON COLDFIELD * FILE 104
UK - B73 6PF * FILE 104
TEL. ++44 (0)121 355 3190 * FILE 104
* FILE 104
email address: dcuk@dcuk.demon.co.uk * FILE 104
* FILE 104
JRP IS A DSPRINT REPLACEMENT * FILE 104
* FILE 104
J R P (JES2 REMOTE PRINTERS) * FILE 104
* FILE 104
THIS PRODUCT WAS DESIGNED AND WRITTEN WITH THE * FILE 104
INTENT OF INCREASING USER AS WELL AS PROGRAMMER * FILE 104
PRODUCTIVITY. IT("JRP") MAKES USE OF 3270 PRINTER * FILE 104
DEVICES TO PRINT SPOOLED JES2 OUTPUT. OUTPUT * FILE 104
DEVICES ARE DEFINED TO "JRP" VIA A SEQUENTIAL DATA * FILE 104
SET. EACH CONTROL CARD IN THIS DATA SET DESCRIBES * FILE 104
THE ATTRIBUTES OF ONE PRINTER. * FILE 104
* FILE 104
AFTER "JRP" INITIALIZATION,A SUBSYSTEM REQUEST * FILE 104
IS ISSUED TO JES2 BASED ON EACH PRINTER'S * FILE 104
DESCRIPTION. IF JES2 CONFIRMS THAT OUTPUT IS * FILE 104
AVAILABLE FOR THE PRINTER DESCRIBED, A SUBTASK IS * FILE 104
CREATED, USING THE ATTRIBUTES DEFINED FOR THAT * FILE 104
PARTICULAR DEVICE. THE SPOOL DATASET IS READ, * FILE 104
BUFFERED, THEN WRITTEN TO THE PRINTER VIA "VTAM". * FILE 104
* FILE 104
"JRP" SUPPORTS VTAM SNA AND NONSNA TERMINALS AS * FILE 104
"JRP" CONTROL TERMINALS. A MAXIMUM OF 25(TWENTY * FILE 104
FIVE) TERMINALS ARE SUPPORT SIMULTANEOUSLY. ALL * FILE 104
FUNCTIONS REQUIRED TO SUPPORT "JRPS" PRINTER * FILE 104
DEVICES ARE AVAILIBLE FROM A "JRP" CONTROL * FILE 104
TERMINAL. * FILE 104
* FILE 104
MODIFIED TO HANDLE SUPPRESS PRINT CONTROL CHARACTER. * FILE 104
CAN NOW BE USED TO PRINT SAS GRAPHS. * FILE 104
* FILE 104
Tested on OS/390 Version 2.6. * FILE 104
* FILE 104
IS FROM MARK DIEHL OF HERCULES/ALLEGANY BALLISTICS * FILE 105
AND IS A COPY OF THEIR ISPF OUTLIST UTILITY. * FILE 105
THIS UTILITY WAS WRITTEN AS A REPLACEMENT FOR * FILE 105
ISPF/PDF'S 3.8 "OUTLIST" UTILITY. IT MAKES USE OF * FILE 105
ISPF'S TABLE SERVICES TO PROVIDE A SIMPLE, YET * FILE 105
EFFECTIVE USER INTERFACE TO THE JOB QUEUE. A SINGLE * FILE 105
CLIST DRIVES THIS VERSION OF THE OUTLIST UTILITY. THE * FILE 105
CLIST COMMENTS COMBINED WITH THE ISPF TUTORIAL PANELS * FILE 105
PROVIDE A SELF-DOCUMENTING SYSTEM. SEE MEMBER $$INDEX * FILE 105
FOR A DESCRIPTION OF THE OUTLIST UTILITY COMPONENTS. * FILE 105
MODIFICATIONS TO SUIT YOUR SHOP'S STANDARDS GOES * FILE 105
WITHOUT SAYING. IT IS STRONGLY ADVISABLE THAT ALL * FILE 105
COMPONENTS BE THOROUGHLY REVIEWED IN THEIR ENTIRETY * FILE 105
BEFORE IMPLEMENTING AT YOUR SHOP. * FILE 105
* FILE 105
THIS UTILITY IS GREAT FOR 4381-TYPE SHOPS WHO CAN'T * FILE 105
AFFORD THE LIKES OF 'WE WON'T MENTION NAMES' TO * FILE 105
PERFORM THE BASIC FUNCTIONS IT PROVIDES. THIS FILE * FILE 105
IS IN IEBUPDTE SYSIN FORMAT * FILE 105
* FILE 105
IS A PROGRAM TO TELL WHAT RACF ACCESS THE LISTED * FILE 106
USERS HAVE TO THE LISTED DATASETS, PROFILES, * FILE 106
ENTITIES OR WHATEVER. FOR ADDITIONAL INFORMATION * FILE 106
SEE THE MEMBER CALLED $DOC. THIS FILE IS IN * FILE 106
IEBUPDTE SYSIN FORMAT. * FILE 106
* FILE 106
THIS PROGRAM IS FROM: * FILE 106
* FILE 106
ART TANSKY * FILE 106
SUNGARD * FILE 106
600 LAUREL OAK ROAD - NEW ADDRESS * FILE 106
VOORHEES, NJ 08043 * FILE 106
(609) 566-3611 NEW PHONE * FILE 106
* FILE 106
is the Clemson University Structured Macro Library * FILE 107
from Mr James C Blalock. This file contains the * FILE 107
Macro Library and docmentation members on how to use * FILE 107
the system. This file is in IEBUPDTE SYSIN format. * FILE 107
For additional information see the members called * FILE 107
$$README and $$DOC. File 108 of this tape contains * FILE 107
the SAMPLIB Library for these structured macros. * FILE 107
* FILE 107
email : carey@clemson.edu * FILE 107
* FILE 107
The information in this file was downloaded from * FILE 107
Jim Blalock's home page at: * FILE 107
* FILE 107
http://people.clemson.edu/~carey * FILE 107
* FILE 107
The following explanations accompany the download * FILE 107
web page. * FILE 107
* FILE 107
Note: The Users Guide is written in DCF * FILE 107
(SCRIPT/VS) using GML. If anyone needs it and * FILE 107
doesn't have access to GML, the samplib contains * FILE 107
an FBM IEBGENER-able version: It isn't pretty * FILE 107
but you can read it. * FILE 107
* FILE 107
Support (yeah right): It's like this, folks: * FILE 107
We're all seasoned professionals here, and busy * FILE 107
people besides. I'll answer questions if I have * FILE 107
time, but please take a shot at figuring a * FILE 107
problem out on your own first. The SAMPLIB * FILE 107
should contain enough examples to get you past * FILE 107
the how-do-I questions. I'll try to add some * FILE 107
more stuff like MPF exits later. * FILE 107
* FILE 107
COPYRIGHT CLEMSON UNIVERSITY, 1989, 1998 * FILE 107
* FILE 107
THE MATERIALS CONTAINED IN FILES 107 AND 108 OF * FILE 107
THIS TAPE ARE PROVIDED FOR GENERAL USE BY CLEMSON * FILE 107
UNIVERSITY. ALTHOUGH THE PACKAGE HAS BEEN TESTED * FILE 107
TO CLEMSON UNIVERSITY'S SATISFACTION FOR THE * FILE 107
PURPOSE FOR WHICH IT WAS INTENDED, NO WARRANTY, * FILE 107
EXPRESSED OR IMPLIED, IS MADE BY CLEMSON UNIVERSITY * FILE 107
AS TO THE ACCURACY AND FUNCTIONING OF THE * FILE 107
PROGRAM(S) AND RELATED MATERIALS. CLEMSON * FILE 107
UNIVERSITY ASSUMES NO LIABILITY FOR ANY DAMAGE THAT * FILE 107
MAY BE CAUSED BY ANY USE OF THIS PACKAGE. * FILE 107
* FILE 107
THE MATERIALS CONTAINED IN THIS PACKAGE ARE * FILE 107
DISTRIBUTED ON AN 'AS-IS' BASIS. CLEMSON * FILE 107
UNIVERSITY IS UNDER NO OBLIGATION TO MAINTAIN OR * FILE 107
UPGRADE THIS PACKAGE, NOR IS CLEMSON UNIVERSITY * FILE 107
UNDER ANY OBLIGATION TO FURNISH ASSISTANCE OR * FILE 107
ADDITIONAL MATERIALS. * FILE 107
* FILE 107
BY USE OF THIS PACKAGE, THE ORGANIZATION AGREES TO * FILE 107
ACKNOWLEDGE CLEMSON UNIVERSITY AS THE ORIGINATOR OF * FILE 107
THE PACKAGE. * FILE 107
* FILE 107
is the Clemson University Structured Macro SAMPLIB * FILE 108
from Mr James C Blalock. This file contains the * FILE 108
SAMPLIB for the Macro System contained in File 107 * FILE 108
of this tape. * FILE 108
* FILE 108
See documentation for this package in the doc for * FILE 108
File 107. The contents of this package was * FILE 108
downloaded from the author's home page at: * FILE 108
* FILE 108
http://people.clemson.edu/~carey * FILE 108
* FILE 108
email: carey@clemson.edu * FILE 108
* FILE 108
----------------------------------------------------------- * FILE 108
* FILE 108
Clemson University Structured Macros SAMPLIB Contents * FILE 108
* FILE 108
JCL Procedures: * FILE 108
* FILE 108
ASMP - Run structured listing pgm only * FILE 108
ASMPC - Run list pgm, Assembler H * FILE 108
ASMPCL - Run list pgm, Assembler H, linkedit * FILE 108
ASMPCLG - Run list pgm, Assembler H, linkedit, * FILE 108
execute user pgm * FILE 108
* FILE 108
Sample Programs: * FILE 108
* FILE 108
BAR - ISPF edit macro: puts ' | ' in col 38-40 * FILE 108
of source code * FILE 108
CC - ISPF edit macro: puts '*' in column 72 * FILE 108
FLIP - ISPF edit macro: swaps excluded, * FILE 108
nonexcluded lines * FILE 108
MASKDATA - ISPF edit macro: applies maskline to * FILE 108
existing source code * FILE 108
MSC0150$ - Structured listing pgm. Example of * FILE 108
reentrant code. Used in ASMPxxx procs. * FILE 108
STGMAP - Prints addresses of MVS/XA storage areas * FILE 108
(ECSA, LPA, etc). Example of AMODE * FILE 108
switching. Writes to //SYSPRINT. * FILE 108
* FILE 108
Other Tools: * FILE 108
* FILE 108
CMTCLIST - ISPF edit macro (in CLIST) which will * FILE 108
insert various types of comment 'blocks' * FILE 108
for different block structures. Refer to * FILE 108
the member for details. * FILE 108
* FILE 108
CONTAINS AN IEFACTRT SMF EXIT FROM FIRST CHICAGO, * FILE 109
THIS VERSION OF THE CODE RUNS UNDER MVS/ESA. THIS * FILE 109
FILE ALSO CONTAINS CODE TO SUPPORT 2260'S UNDER ESA. * FILE 109
THIS FILE IS IN IEBUPDTE SYSIN FORMAT. SEE FILE 110 * FILE 109
FOR A SAMPLE OF THE OUTPUT * FILE 109
* FILE 109
ASMACTRT IS THE JCL WE USE TO ASSEMBLE THE SMF * FILE 109
EXIT IEFACTRT. YOU WILL NEED TO CHANGE * FILE 109
THE JCL ACCORDINGLY. * FILE 109
* FILE 109
IEFACTRT IS THE SOURCE CODE FOR THE IEFACTRT EXIT * FILE 109
AS WE USE IT. THIS SOURCE IS A * FILE 109
COMBINATION OF VARIOUS IEFACTRT ROUTINES * FILE 109
FROM PREVIOUS CBT TAPES AND SOME OF MY * FILE 109
OWN ENHANCEMENTS. IT HAS BEEN WRITTEN * FILE 109
TO USE THE SMF TYPE 30 RECORD AND TO RUN * FILE 109
IN 31 BIT ADDRESSING MODE. AN EXAMPLE * FILE 109
OF THE OUTPUT IS INCLUDED IN ANOTHER * FILE 109
FILE ON THIS TAPE. THIS EXIT WILL WORK * FILE 109
UNDER MVS/XA 2.2 AND MVS/ESA. IT SHOULD * FILE 109
BE ABLE TO RUN UNDER PREVIOUS XA * FILE 109
RELEASES. * FILE 109
* FILE 109
FEATURES - ISSUSES A WTO TO THE SYSTEM * FILE 109
CONSOLE WITH THE COMPLETION * FILE 109
CODE OF EACH STEP. * FILE 109
* FILE 109
- WRITES THE WTO INFORMATION TO * FILE 109
THE JOBLOG * FILE 109
* FILE 109
- GIVES EXCP STATS FOR EACH DD * FILE 109
ALLOCATED. * FILE 109
* FILE 109
- DDNAME, CONCATENATION NUMBER, * FILE 109
AND DEVICE ADDRESS ARE * FILE 109
INCLUDED. ON MESSAGE LOG. * FILE 109
* FILE 109
LNKACTRT JCL USED TO LINK THE IEFACTRT EXIT. * FILE 109
THE JCL WILL HAVE TO BE CHANGED. * FILE 109
* FILE 109
CBPUC001 THIS MODULE IS THE USER INTERFACE * FILE 109
MODULE (UIM) WE WROTE TO SUPPORT 2260 * FILE 109
UNDER MVS/XA 2.2. IT ALSO WORKS FOR * FILE 109
ESA * FILE 109
* FILE 109
IEAMLT99 THIS MODULE IS ALSO REQUIRED TO SUPPORT * FILE 109
THE 2260'S * FILE 109
* FILE 109
DISCLAIMER * FILE 109
* FILE 109
THESE PROGRAMS ARE BEING USED SUCCESSFULLY IN * FILE 109
OUR ENVIRONMENT. SUPPORT IS ON AN AS IS BASIS. * FILE 109
THESE MODULES HAVE BEEN RUNNING SUCCESSFULLY * FILE 109
UNDER MVS/XA 2.2 AND MVS/ESA. THEY SHOULD BE * FILE 109
ABLE TO RUN WITH EARLIER RELEASES OF MVS/XA. * FILE 109
* FILE 109
CONTAINS A SAMPLE OUTPUT OF THE IEFACTRT SMF EXIT * FILE 110
WHICH IS CONTAINED IN FILE 109 OF THIS TAPE * FILE 110
THIS FILE IS IN IEBGENER FORMAT RECFM = FBA * FILE 110
LRECL = 133 BLKSIZE = 32718 * FILE 110
* FILE 110
IS FROM MR JIM PURDY, FORMERLY OF REVLON. JIM'S * FILE 111
NEW ADDRESS: * FILE 111
* FILE 111
JIM PURDY * FILE 111
ANDERSEN CONSULTING * FILE 111
1345 MEADOW GLEN * FILE 111
SOUTHLAKE, TX 76092 * FILE 111
(214) 402-7511 * FILE 111
* FILE 111
THIS FILE CONTAINS SOME MPF EXITS, A TSO COMMAND * FILE 111
PROCESSOR FOR GDG'S AND A TSO SUBMIT EXIT. THIS * FILE 111
FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 111
THE FOLLOWING MEMBERS * FILE 111
* FILE 111
MEMBERS WTOETPS1 & WTOETPS2 ARE MODIFICATIONS OF ALL * FILE 111
THE COCA-COLA WTO EXITS. THESE EXITS WILL WRITE AN * FILE 111
SMF RECORD FOR EACH MOUNT AND DISMOUNT IN ADDITION * FILE 111
TO THE DISPLAY OF WHERE A TAPE WAS IF IT WAS * FILE 111
RECENTLY MOUNTED. MODIFICATIONS HAVE ALSO BEEN * FILE 111
MADE TO CREATE A USER CVT WHICH WAS NEEDED BY THE * FILE 111
EXITS. * FILE 111
* FILE 111
MEMBER WTOTAPMT MAY BE USED TO WRITE AN SMF RECORD * FILE 111
FOR EACH TAPE MOUNT IF THE WTOETPS1 AND WTOETPS2 * FILE 111
MODULES ARE NOT USED. * FILE 111
* FILE 111
MEMBER WTOERWAT IS A MODIFICATION OF THE COCA-COLA * FILE 111
EXIT WHICH WILL RESPOND 'WAIT' TO MESSAGE IEF238D * FILE 111
AND WRITE AN SMF RECORD TO INDICATE THE ALLOCATION * FILE 111
RECOVERY CONDITION. * FILE 111
* FILE 111
MEMBER WTOTAPAL IS THE EXIT TO ONLY WRITE THE SMF * FILE 111
RECORD FOR ALLOCATION RECOVERY. * FILE 111
* FILE 111
MEMBERS LISTGDGC AND LISTGDGP ARE A PAIR OF PROGRAMS * FILE 111
THAT COMPRISE THE LISTGDG TSO COMMAND. THIS * FILE 111
COMMAND WILL LIST THE ATTRIBUTES OF A GDG AND THE * FILE 111
MOST RECENTLY CREATED GENERATIONS. THE NUMBER OF * FILE 111
GENERATIONS RETAINED IN THE CATALOG MAY BE CHANGED * FILE 111
UPON REQUEST. NEW GDG BASE ENTRIES MAY ALSO BE * FILE 111
CREATED. THIS COMMAND WORKS WITH ICF CATALOGS AND * FILE 111
HAS SUPPORT FOR 3380 DISK AND 3480 CARTS. THE * FILE 111
COMMAND IS IN TWO PARTS: THE ALLOCATION PIECE * FILE 111
WHICH IS WRITTEN IN ASSEMBLER; AND THE LOGIC PIECE * FILE 111
WRITTEN IN PL1. * FILE 111
* FILE 111
MEMBER IKJEFF10 IS A TSO SUBMIT EXIT THIS EXIT WILL * FILE 111
CONDITIONALLY CHECK THE JOB CARD SUBMITTED TO * FILE 111
VERIFY THAT THE JOBNAME STARTS WITH THE USERID OR * FILE 111
FIRST N CHAR OF USERID. THE EXECUTION CLASS, * FILE 111
MSGCLASS, AND TIME PARAMETERS ARE ALSO * FILE 111
CONDITIONALLY CHECKED AND MAY BE MANDATORY AND/OR * FILE 111
IN THE APPROPRIATE TABLES. A TIME PARAMETER MAY * FILE 111
ALSO BE INSERTED BY THE EXIT. ALL CHECKING IS * FILE 111
BASED ON THE USERID AND THE PRIVILEGES ALLOWED THAT * FILE 111
USER IN THE UIDTABLE. JOB CLASSES MAY HAVE FLAGS * FILE 111
TO REQUIRE TIME PARAMETERS OR REQUIRE NOT TO HAVE * FILE 111
THEM. ALSO, THERE MAY BE MAX TIME AND DEFAULT TIME * FILE 111
BY CLASS. COMMAND AND CERTAIN JES 2 CONTROL CARDS * FILE 111
WILL NOT BE ALLOWED IN THE SUBMITTED JCL. * FILE 111
* FILE 111
IS THE SOURCE FOR THE TSO COMMAND PROMPTER CALLED * FILE 112
VTOC. THIS FILE IS IN IEBUPDTE FORM. THIS COMMAND * FILE 112
ALLOWS YOU TO SEARCH THE VOLUME TABLE OF CONTENTS OF * FILE 112
ONE OR MORE DISK VOLUMES AND OBTAIN LISTINGS OR TOTALS * FILE 112
OF DATA SETS MEETING SOME CRITERIA. THE SPECIFICATION * FILE 112
IS QUITE FLEXIBLE. THIS FILE ALSO CONTAINS THE HELP * FILE 112
DATA SET FOR THIS COMMAND. IT ALSO CONTAINS * FILE 112
INSTALLATION NOTES, SOME COMMENTS ON DEFAULTS THAT MAY* FILE 112
NOT BE TYPICAL ELSEWHERE, A LIST OF THE KNOWN ERRORS * FILE 112
IN THE COMMAND, AND IDEAS FOR FUTURE EXPANSION. * FILE 112
THIS VERSION SUPPORTS SU60, CATALOG DATASETS AND THE * FILE 112
ABILITY TO SORT THE OUTPUT ON ANYTHING. FOR ADDITIONAL* FILE 112
CHANGES SEE THE HELP MEMBER OF THE PDS. * FILE 112
THIS VERSION WILL RUN ON A SYSTEM THAT DOES NOT HAVE * FILE 112
SU60 INSTALLED, HOWEVER IF YOU TRY TO ASSEMBLE * FILE 112
ON A SYSTEMS THAT DOES NOT HAVE SU60 MACROS YOU WILL * FILE 112
GET ASSEMBLE ERRORS. YOU CAN GO IN AND JUST NO OP * FILE 112
THOSE INSTRUCTIONS. ITS LOAD MODULE IS IN FILE 035 * FILE 112
AND IS CALLED VTOC. * FILE 112
* FILE 112
VTOC IS CALLED BY A SUBCOMMAND OF PDS VERSION 8.5 * FILE 112
FROM FILE 182. IF YOU HAVE INSTALLED PDS VERSION 8.5 * FILE 112
YOU SHOULD ALSO INSTALL VTOC. * FILE 112
* FILE 112
IF YOU INSTALL PDS VERSION 8.5, SEE THE NOTES IN * FILE 112
THIS FILE AS TO WHICH VERSION OF THE VTOCPRNT MODULE * FILE 112
YOU SHOULD ASSEMBLE AND LINKEDIT INTO THIS COMMAND. * FILE 112
* FILE 112
BUGS FIXED, AND SUPPORT ADDED FOR 3990 MODEL 9. * FILE 112
YOU SHOULD RE-INSTALL VTOC. (UPDATED 08-94) * FILE 112
FIXED FOR MVS/ESA 5.1. (UPDATED 07-95) * FILE 112
FIXED FOR Y2K SUPPORT. (UPDATED 12-97) * FILE 112
David Spiegel fixes - dyn UCBs (UPDATED 05-99) * FILE 112
John Hooper fixes (UPDATED 07-99) * FILE 112
* FILE 112
(Thanks also to Seymour Metz.) * FILE 112
* FILE 112
**************************************************** * FILE 112
* IT APPEARS THAT THERE ARE ADDITIONAL MACROS * * FILE 112
* THAT ARE MISSING FROM THIS FILE THIS IS IN FACT * * FILE 112
* NOT TRUE. WHAT APPEARS TO BE OTHER MACROS WERE * * FILE 112
* JUST AN IDEA AND THOSE MACROS WERE NEVER * * FILE 112
* WRITTEN. I KNOW ! I SPENT WEEKS TRYING TO TRACK * * FILE 112
* THEM DOWN. * * FILE 112
* ARNIE * * FILE 112
**************************************************** * FILE 112
* FILE 112
KEYWORDS TSO CP COMMAND PROCESSOR VTOC COMMAND * FILE 112
* FILE 112
Note: The VTOC command processor is called by the LISTV * FILE 112
subcommand of PDS Version 8.x (see File 182). * FILE 112
If you're installing PDS, then it is very helpful * FILE 112
to also install VTOC. * FILE 112
* FILE 112
IS FROM COMMERCIAL UNION INSURANCE COMPANIES IN * FILE 113
BOSTON MASS AND CONTAINS A COPY OF THEIR SMPSCAN * FILE 113
SYSTEM. THE SMPSCAN PROGRAM WAS FIRST DEVELOPED AS A * FILE 113
GENERAL UTILITY TO REPLACE OUR EARLIER PTSSCAN * FILE 113
PROGRAM AND HELP US WITH SPECIAL CIRCUMSTANCES THAT * FILE 113
ARE NOT HANDLED WELL BY SMP/E. SMPSCAN READS SMP/E * FILE 113
LIST DATA SETS AS INPUT AND CAN DO ELEMENT SELECTION * FILE 113
AND CROSS - ZONE MATCHING FOR UP TO 16 LISTINGS * FILE 113
CONCURRENTLY. THE MAXIMUM NUMBER OF LISTINGS THAT * FILE 113
CAN BE CONCURRENTLY PROCESSED IS EASILY CHANGED * FILE 113
THROUGH RECOMPILATION. THE PROGRAM DOES WHAT IT WAS * FILE 113
DESIGNED TO DO, BUT SETUP CAN BE A BIT UNWIELDY. WE * FILE 113
HAD TO DECIDE WHETHER TO DEVELOP A BOOLEAN ALGEBRA * FILE 113
INPUT AND CODE A SYNTAX CHECKER, OR USE ARRAYS AND * FILE 113
FILL THEM UP USING PL/I GET DATA. WE FOUND THE CHOICE * FILE 113
FAIRLY EASY TO MAKE. THE SAMPLE MEMBERS (FILES 113 * FILE 113
AND 114) SHOULD BE OF HELP TO SOMEONE TRYING TO USE * FILE 113
THE PROGRAM. LAST YEAR WE USED SMPSCAN AS A * FILE 113
PERFORMANCE TUNING AID TO HELP RELIEVE VIRTUAL * FILE 113
STORAGE CONSTRAINTS IN MVS/XA SO WE COULD INCREASE * FILE 113
THE PRIVATE AREA SIZE BELOW 16M FOR CICS AND HELP * FILE 113
IMPROVE PERFORMANCE. WE HAVE INCLUDED THE MEMBERS * FILE 113
AND JOBSTREAMS WE USED FOR THIS ACTIVITY ON FILES * FILE 113
113 AND 114 OF THIS TAPE. * FILE 113
FILE 115 OF THIS TAPE CONTAINS THE SMPSCAN SOURCE * FILE 113
WHICH IS WRITTEN IN PL/I OPTIMIZING COMPILER CODE. * FILE 113
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 113
THE FOLLOWING : * FILE 113
* FILE 113
$$$DOC DOCUMENTATION MEMBER * FILE 113
SMPLGBL SAMPLE JOB TO LIST GLOBAL ZONE FOR INPUT * FILE 113
SMPL220 SAMPLE JOB TO LIST DLIB ZONE FOR INPUT * FILE 113
SMPLTMA SAMPLE JOB TO LIST TARGET ZONE FOR INPUT * FILE 113
SMPLPKA SAMPLE JOB TO LIST TARGET ZONE FOR INPUT * FILE 113
SMPSBTAM SAMPLE JOB TO LOCATE BTAM ELEMENTS * FILE 113
SMPSCLUP SAMPLE JOB TO LOCATE LPALIB VSCR DELETES * FILE 113
SMPSINFL SAMPLE JOB TO LOCATE LMOD DOWN-LEVELING * FILE 113
SMPSLPA2 SAMPLE JOB TO LOCATE 2-SYSLIB LPALIB LMODS * FILE 113
SMPSTCAM SAMPLE JOB TO LOCATE TCAM ELEMENTS * FILE 113
SMPSCAN SAMPLE CATALOGED PROCEDURE FOR SMPSCAN * FILE 113
* FILE 113
IS FROM COMMERCIAL UNION INSURANCE COMPANIES IN * FILE 114
BOSTON MASS AND CONTAINS A COPY OF THEIR SMPSCAN * FILE 114
SYSTEM. SEE FILE 113 ABOVE FOR A DETAILED * FILE 114
DESCRIPTION OF THEIR SMPSCAN SYSTEM * FILE 114
THIS FILE CONTAINS SAMPLES OF ONE OF THEIR JOBSTREAMS * FILE 114
FILE 115 OF THIS TAPE CONTAINS THE SMPSCAN SOURCE * FILE 114
WHICH IS WRITTEN IN PL/I OPTIMIZING COMPILER CODE. * FILE 114
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS * FILE 114
THE FOLLOWING : * FILE 114
* FILE 114
$$$DOC DOCUMENTATION MEMBER * FILE 114
SMPSBTAM SAMPLE CTL MBR TO LOCATE BTAM ELEMENTS * FILE 114
SMPSCLUP SAMPLE CTL MBR TO LOCATE LPALIB VSCR DELS * FILE 114
SMPSINFL SAMPLE CTL MBR TO LOCATE LMOD DOWN-LEVELING * FILE 114
SMPSLPA2 SAMPLE CTL MBR TO LOC 2-SYSLIB LPALIB LMODS * FILE 114
SMPSTCAM SAMPLE CTL MBR TO LOCATE TCAM ELEMENTS * FILE 114
* FILE 114
IS FROM COMMERCIAL UNION INSURANCE COMPANIES IN * FILE 115
BOSTON MASS AND CONTAINS A COPY OF THEIR SMPSCAN * FILE 115
SYSTEM. SEE FILE 113 ABOVE FOR A DETAILED * FILE 115
DESCRIPTION OF THEIR SMPSCAN SYSTEM * FILE 115
THIS FILE CONTAINS THE SOURCE AND IS IN IEBUPDTE * FILE 115
SYSIN FORMAT AND CONTAINS THE FOLLOWING : * FILE 115
* FILE 115
SCANDOC SMPSCAN PROGRAM DOCUMENTATION * FILE 115
SMPSCAN PROGRAM TO SCAN ONE OR MORE ZONE LISTINGS * FILE 115
* FILE 115
IS THE SOURCE FOR A DISK SEEK ANALYSIS PROGRAM * FILE 116
WRITTEN IN ASSEMBLER. USE A PARM OF SMAP AND CHECK * FILE 116
THE CODE FOR ADDITIONAL INFORMATION. THIS PGM WILL * FILE 116
SHOW WHERE YOU ARE SPENDING YOUR TIME VIA THE * FILE 116
DATA SET NAME RATHER THAN BY A TRACK ADDRESS * FILE 116
THIS CODE WILL SUPPORT 3380'S. THIS VERSION WILL * FILE 116
RUN UNDER MVS / XA * FILE 116
* FILE 116
*** THIS CODE HAS NOT BEEN MODIFIED TO HANDLE *** * FILE 116
*** INDEXED VTOCS OR ICF DATASETS THAT HAVE *** * FILE 116
*** MORE THAT 15 EXTENTS *** * FILE 116
* FILE 116
IS A SERIES OF WTO EXITS FROM JAMES COOK OF COCA * FILE 117
COLA IN ATLANTA GEORGIA * FILE 117
* FILE 117
USING THE "MESSAGE PROCESSING FACILITY" * FILE 117
OTHERWISE KNOWN AS "MANY WTO EXITS" * FILE 117
* FILE 117
ENCLOSED ARE SEVERAL WTO EXITS WRITTEN ACCORDING TO * FILE 117
THE STANDARDS OF THE "MESSAGE PROCESSING FACILITY" * FILE 117
UNDER MVS/SP2.1.2. THESE EXITS HAVE REPLACED "R2D2" * FILE 117
FROM THE CBT TAPE. OTHER FEATURES OF "R2D2" ARE NOT * FILE 117
USED AT OUR CENTER. NO CHANGE WAS MADE TO RUN UNDER * FILE 117
MVS/SP2.1.3. * FILE 117
* FILE 117
THE EXITS MUST BE ASSEMBLED AS "RENT,NOALIGN" AND * FILE 117
LINK-EDITED WITH THE OPTIONS "RENT,REUS" INTO THE LINK * FILE 117
LIST. THE "MPFLSTXX" MUST BE IN SYS1.PARMLIB AND AN * FILE 117
ENTRY MADE IN "IEASYSXX". * FILE 117
* FILE 117
THESE EXITS CAN ABEND ANYWHERE AND NOT CAUSE ANY * FILE 117
PROBLEMS. THE ONLY PROBLEM THAT I HAVE NOTICED IN * FILE 117
IMPLEMENTING ANY MPF EXIT IS THAT THE IEZMGCR MACRO * FILE 117
FROM IBM MUST HAVE AN "ORG" IMMEDIATELY AFTER IT TO * FILE 117
PREVENT PROBLEMS. * FILE 117
* FILE 117
IF "IEAVMXIT" IS LINKED INTO THE LINKLIST, IT WILL BE * FILE 117
USED. IT NEEDS NO ENTRY IN "MPFLSTXX". * FILE 117
* FILE 117
MOST OF THE EXITS ARE SELF-EXPLANATORY. THE ONES THAT * FILE 117
ARE IMPLEMENTED NOW ARE: * FILE 117
* FILE 117
01 WTODB103 WTO EXIT- DATACOM/DB BACKOUT MESSAGE * FILE 117
02 WTOD1001 WTO EXIT TO SCHEDULE DATACOM PXX CLEAR TASK * FILE 117
03 WTOECVT MACRO TO STORE FIELDS FROM IMS /DIS A * FILE 117
04 WTOEDB30 WTO EXIT TO DUMP DATACOM-DB LOG * FILE 117
05 WTOEF97I WTO EXIT TO SUPPRESS MSG IEF097I * FILE 117
06 WTOEIUTL WTO EXIT TO ISSUE IMS /DIS A * FILE 117
07 WTOEI000 WTO EXIT TO INTERPRET IMS /DIS A * FILE 117
08 WTOEI554 WTO EXIT TO INTERPRET IMS /DIS A * FILE 117
09 WTOEI996 WTO EXIT TO SAVE IMS REPLY NUMBER * FILE 117
10 WTOENROL WTO EXIT TO STOP A MESSAGE FROM ROLLING * FILE 117
11 WTOERD WTOR EXIT TO REPLY "D" TO MESSAGE * FILE 117
12 WTOERHLD WTOR EXIT TO REPLY "HOLD" TO MSG IEF225D * FILE 117
13 WTOERM WTOR EXIT TO REPLY "M" TO MESSAGE * FILE 117
14 WTOERNHL WTOR EXIT TO REPLY "NOHOLD" TO MESSAGE * FILE 117
15 WTOEROLL WTO EXIT TO CAUSE A MESSAGE TO ROLL * FILE 117
16 WTOERU WTOR EXIT TO REPLY "U" TO MESSAGE * FILE 117
17 WTOERWAT WTOR EXIT TO REPLY "WAIT" TO MESSAGE * FILE 117
18 WTOERY WTOR EXIT TO REPLY "Y" * FILE 117
19 WTOER301 WTOR EXIT TO REPLY "JOBNAME" TO IEC301A * FILE 117
20 WTOETPS1 WTO EXIT TO CAPTURE TAPE UNLOAD DATA * FILE 117
21 WTOETPS2 WTO EXIT TO DISPLAY TAPE UNLOADED DATA * FILE 117
22 WTOE176I WTO EXIT TO STOP EXTERNAL WRITER * FILE 117
23 WTOE315I PROCESS NPM MSGFNM315I AT SHUTDOWN * FILE 117
24 WTOE362A WTO EXIT TO DUMP AN SMF MANX DATASET * FILE 117
* FILE 117
THE TWO EXITS "WTOETPSN" ARE USED TO STORE THE LAST * FILE 117
TAPE USED ON EACH TAPE DRIVE AND DISPLAY IT FOR THE * FILE 117
OPERATOR WHEN ANOTHER MOUNT FOR THAT TAPE IS ISSUED. * FILE 117
THE MESSAGE IS "TAPE XXXXXX MAY STILL BE ON DRIVE * FILE 117
XXX". THIS WAS DESIGNED FOR THE IBM 3480 TAPE DRIVE * FILE 117
WITH THE TAPE STACKER FEATURE BECAUSE IT CAN HOLD SIX * FILE 117
"USED" TAPES PER DRIVE. IN OUR SHOP, THAT WORKS OUT * FILE 117
TO A MAXIMUM OF 148 TAPES THAT ARE STILL ON THE TAPE * FILE 117
DRIVES (UP FROM 28 BEFORE THE TAPE STACKER FEATURE) * FILE 117
AND EFFECTIVELY LOST AS FAR AS THE TAPE OPERATORS ARE * FILE 117
CONCERNED. THE TAPE CONFIGURATION MUST BE ASSEMBLED * FILE 117
INTO THE WTOETPS1 EXIT WITH THE INTERNALLY DEFINED * FILE 117
"STRING" MACRO. THE TABLE TO HOLD THE TAPE VOLUME * FILE 117
SERIAL NUMBER AND THE TAPE DRIVE ADDRESS IS IN * FILE 117
EXTENDED CSA. THE TABLE IS POINTED TO BY A FIELD IN * FILE 117
OUR USERCVT (NOT SUPPLIED) THAT IS ANCHORED IN THE * FILE 117
CVTUSER FIELD OF THE MVS CVT. THE EXITS DO A LOT OF * FILE 117
VALIDITY CHECKING SO EITHER EXIT CAN BE INSTALLED * FILE 117
FIRST. * FILE 117
* FILE 117
THE "WTOEIXXX" EXITS ARE TO AUTOMATICALLY CANCEL IMS * FILE 117
BMPS THROUGH THE OUTSTANDING REPLY. THEY DEPEND * FILE 117
HEAVILY ON OUR USERCVT AND WILL NOT ASSEMBLE WITHOUT * FILE 117
IT OR A REPLACEMENT. THEY ARE INCLUDED AS AN EXAMPLE * FILE 117
OF WHAT CAN BE DONE USING WTO EXITS TO PROCESS * FILE 117
MULTIPLE, ASYNCHRONOUS MESSAGES. * FILE 117
* FILE 117
SUPPORTED BY: * FILE 117
JAMES F. COOK * FILE 117
THE COCA-COLA COMPANY * FILE 117
ONE COCA-COLA PLAZA, N.W. * FILE 117
ATLANTA, GA 30313 * FILE 117
(404) 676-8522 * FILE 117
* FILE 117
email: jacook@na.ko.com * FILE 117
* FILE 117
IS FROM SAM GOLOB. THIS FILE IS IN IEBUPDTE SYSIN * FILE 118
FORMAT. FOR ADDITIONAL INFORMATION SEE THE MEMBER * FILE 118
CALLED $$NEWDOC * FILE 118
* FILE 118
Jerry Lawson's email: jlawson@thehartford.com * FILE 118
* FILE 118
Sam Golob's email: sbgolob@attglobal.net OR * FILE 118
sbgolob@aol.com * FILE 118
* FILE 118
NOTE: COBOL PROGRAMS WERE UPDATED FOR LE/370 * FILE 118
AND COMPILE-LINK JOBS ARE NOW INCLUDED. * FILE 118
* FILE 118
THIS FILE, WHICH CONSISTS OF SEVERAL PROGRAMS * FILE 118
AND SAMPLE JCL, ALLOWS THE SYSTEMS PROGRAMMER * FILE 118
TO PRE-VIEW AND INDEX, AND THOROUGHLY KEEP * FILE 118
TRACK OF HIS SMPPTFIN-FORMAT TAPES BEFORE SMP/E * FILE 118
HAS A CHANCE TO LOOK AT THEM. ANY TAPE OR DISK * FILE 118
SMPPTFIN FILE CAN GET THIS TREATMENT. FULL * FILE 118
FORFMID CAPABILITY IS PROVIDED, EXTERNAL TO * FILE 118
SMP/E. SINCE THIS PROCESSING HAS NOTHING TO DO * FILE 118
WITH SMP/E, IT IS COMPLETELY RELEASE-INDEPENDENT, * FILE 118
AND CAN BE USED WITH ANY SMPPTFIN-FORMAT FILE * FILE 118
REGARDLESS OF SMP RELEASE (STARTING WITH SMP4 * FILE 118
AND THROUGH ALL RELEASES OF SMP/E.) * FILE 118
* FILE 118
THE CORE OF THIS FILE IS THE PUTXREF PROGRAM * FILE 118
FROM JERRY LAWSON OF THE HARTFORD INSURANCE * FILE 118
GROUP, WHICH WAS SOMEWHAT MODIFIED BY ME. THIS * FILE 118
PROGRAM SORTS ALL SYSMODS IN A SMPPTFIN FILE BY * FILE 118
OWNING FMID. THE OUTPUT OF JERRY'S PUTXREF * FILE 118
PROGRAM IS A REPORT SHOWING THE FMID NAME AND * FILE 118
THE SYSMODS BELONGING TO IT LISTED AFTERWARDS. * FILE 118
(SEE FILE 033 OF THE CBT TAPE FOR ANOTHER * FILE 118
MODIFICATION OF PUTXREF, WHICH ALLOWS * FILE 118
SELECTIVITY BY FMID AND OTHER CRITERIA. THAT * FILE 118
ONE IS BY GENE CRAY OF THE NEW JERSEY TREASURY * FILE 118
DEPARTMENT IN TRENTON (GENE HAS SINCE MOVED ON). * FILE 118
* FILE 118
MY PROGRAM SMPFMUPV TAKES THE OUTPUT OF THE * FILE 118
PUTXREF PROGRAM AND MAKES IT "INPUTABLE" TO AN * FILE 118
SMP JOB. OUTPUT OF SMPFMUPV LOOKS LIKE: * FILE 118
* FILE 118
./ ADD NAME=EBB1102 * FILE 118
UY04130 /* FMID - EBB1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
UY09531 /* FMID - EBB1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
UY10163 /* FMID - EBB1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
UY10354 /* FMID - EBB1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
UY10882 /* FMID - EBB1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
./ ADD NAME=EDM1102 * FILE 118
UY10582 /* FMID - EDM1102 - FROM PUT TAPE - DONE 09/15/87 */* FILE 118
* FILE 118
YOU CAN OBVIOUSLY USE THIS AS INPUT TO ANOTHER * FILE 118
SMP/E JOB, AND THIS GIVES YOU FULL FORFMID POWER * FILE 118
FOR EACH PUT TAPE. * FILE 118
* FILE 118
THE THIRD FEATURE OF THIS PROCESSING IS MY * FILE 118
SMPUPD PROGRAM, WHICH ALLOWS THE BREAKING UP OF A * FILE 118
SMPPTFIN FILE INTO A PDS, WHOSE MEMBERS ARE THE * FILE 118
SEPARATE SYSMODS. SUPPORT IS PROVIDED FOR APAR, * FILE 118
USERMOD, AND FUNCTION SYSMODS AS WELL AS FOR * FILE 118
PTFS. THIS PROGRAM IS A RATHER QUICK-AND-DIRTY * FILE 118
WAY OF DOING THINGS, BUT IT GETS ITS JOB DONE * FILE 118
SUPERBLY, AND THAT'S WHAT COUNTS. BASICALLY, IT * FILE 118
LOOKS IN A FILE FOR ++ PTF OR ++ APAR OR ++ * FILE 118
USERMOD ETC. IT PARSES FOR THE 7-CHARACTER * FILE 118
SYSMOD NUMBER. IN THE PROCESS OF MAKING A * FILE 118
TEMPORARY COPY OF THE SMPPTFIN FILE, IT INSERTS A * FILE 118
CARD IN FRONT OF EACH SYSMOD, WITH THE FORMAT: * FILE 118
* FILE 118
./ ADD NAME=SYSMDNO * FILE 118
* FILE 118
IN ADDITION, ALL "./" STRINGS IN COLUMNS 1 TO 2 * FILE 118
OF THE COPIED SYSMOD FILE ARE CHANGED TO "><". * FILE 118
THEN THE PDSLOAD PROGRAM (FROM FILE 093 OF THE * FILE 118
CBT TAPE) CAN BE USED TO LOAD ALL THE SYSMODS * FILE 118
SEPARATELY INTO PDS MEMBERS, AND TO CONVERT THE * FILE 118
"><" STRINGS WITHIN THE SYSMODS, BACK TO "./". * FILE 118
* FILE 118
A SAMPLE JOBSTREAM, CALLED SMPUPDJ IN THIS PDS, * FILE 118
WILL SHOW YET ANOTHER STEP AT THE END. IT MAY * FILE 118
NOT BE WIDELY PUBLICIZED YET, BUT THE PDS * FILE 118
COMMAND PROCESSOR (FROM FILE 182 OF THE CBT * FILE 118
TAPE) AT VERSION 8.5, HAS THE CAPABILITY OF * FILE 118
SUPPLYING FULL ISPF STATISTICS TO A SOURCE PDS * FILE 118
MEMBER. THIS CAN ALSO BE DONE IN BATCH MODE. I * FILE 118
ADD A STEP AT THE END OF THE JOBSTREAM SMPUPDJ * FILE 118
WHICH RUNS TSO IN BATCH, AND ADDS ISPF * FILE 118
STATISTICS TO ALL THE SYSMODS, SO YOU KNOW HOW * FILE 118
MANY LINES EACH ONE HAS. ONCE THE PTFS OR * FILE 118
OTHER SYSMODS HAVE BEEN SEPARATED, YOU MAY * FILE 118
INQUIRE ABOUT THEM BY BROWSING OR EDITING THEM * FILE 118
INDIVIDUALLY. ALSO, SINCE THIS JOBSTREAM IS A * FILE 118
QUICK AND REPRODUCIBLE PROCESS (IT TAKES A FEW * FILE 118
MINUTES TO RUN ON MY MACHINE), YOU CAN LEAVE * FILE 118
THE OUTPUT DATASET ON A WORK PACK FOR A FEW * FILE 118
HOURS IF YOU'RE SHORT OF PERMANENT DISK SPACE. * FILE 118
THEN YOU CAN RECREATE IT AGAIN THE NEXT DAY. * FILE 118
* FILE 118
ONE MORE NOTE. SOMETIMES IBM WILL SEND OUT * FILE 118
DUPLICATE PTFS ON THE SAME PUT OR CBPDO TAPE. * FILE 118
THIS WILL OBVIOUSLY CREATE DELETED MEMBERS ON * FILE 118
YOUR OUTPUT LIBRARY, SINCE THE SECOND STOW OF A * FILE 118
PDS MEMBER WILL DELETE THE FIRST MEMBER THAT * FILE 118
HAS THE SAME NAME. THEREFORE, I USE ANOTHER * FILE 118
CAPABILITY OF THE PDS PROGRAM, WHICH IS THE * FILE 118
RESTORE FUNCTION TO RESURRECT DELETED MEMBERS. * FILE 118
THE DELETED MEMBERS ARE PUT BACK UNDER THE * FILE 118
NAMES $PTF0001, $PTF0002, ETC. SO THEY CAN BE * FILE 118
BROWSED AND COMPARED TO THE "REAL" ONES WHICH * FILE 118
HAD THE SAME NAME. (ACTUALLY, IN A RECEIVE * FILE 118
JOB, THE DELETED VERSION WOULD BE RECEIVED, * FILE 118
SINCE IT OCCURS FIRST IN THE FILE.) THE PDS * FILE 118
COMMAND IN PDS VERSION 8.5 WHICH DOES THIS IS: * FILE 118
* FILE 118
RESTORE $PTF REPEAT NOPROMPT * FILE 118
* FILE 118
IS FROM MR HOWARD DEAN, FORMERLY OF SYNTEX, AND * FILE 119
CONTAINS SEVERAL OF THEIR UTILITIES AND PROGRAMS. * FILE 119
* FILE 119
CURRENT ADDRESS: * FILE 119
* FILE 119
Howard M. Dean * FILE 119
Kaiser Foundation Health Plan * FILE 119
25 Via Monte Avenue * FILE 119
2nd Floor * FILE 119
Walnut Creek, CA 94598 * FILE 119
* FILE 119
(925) 926-3121 * FILE 119
* FILE 119
EMAIL - Howard.M.Dean@kp.org * FILE 119
* FILE 119
================================================== * FILE 119
STARTED TASK ACCOUNTING AND * FILE 119
JES2 CONTROL CARDS IN STARTED * FILE 119
TASKS * FILE 119
================================================== * FILE 119
JOBNAME FRONT END TO 'STARTED TASK * FILE 119
CONTROL' FOR ADDING JOB * FILE 119
ACCOUNTING AND JES2 CONTROL CARDS * FILE 119
* THIS CODE IS ON FILE 426 OF THE * FILE 119
CBT MODS TAPE * * FILE 119
LM00038 PART 1 LOCAL MODIFICATION FOR * FILE 119
STARTED TASK ACCOUNTING * FILE 119
LM00039 PART 2 LOCAL MODIFICATION FOR * FILE 119
STARTED TASK ACCOUNTING * FILE 119
STCADOC FORMAT OF 'SYS3.STCACCT' MEMBERS * FILE 119
X EXAMPLE OF STC ACCOUNTING (STARTS) * FILE 119
================================================== * FILE 119
IEFDB401 AND JES2 USER EXIT 6 * FILE 119
================================================== * FILE 119
DYNANAME SAMPLE DYNAMIC UNIT NAME INPUT * FILE 119
FOR DYNAMASK * FILE 119
DYNAJOB DYNAMASK CATALOGED PROCEDURE * FILE 119
IEFDB401 DYNAMIC ALLOCATION EXIT TO * FILE 119
SUPPORT DYNAMIC UNIT NAMES * FILE 119
JESUX006 JES2 USER EXIT TO SUPPORT DYNAMIC * FILE 119
UNIT NAMES * FILE 119
UNITDOC DOCUMENTATION AND JUSTIFICATION * FILE 119
FOR DYNAMIC UNIT NAME * FILE 119
MODIFICATION. * FILE 119
================================================== * FILE 119
DUMP TRANSFER UTILITY * FILE 119
================================================== * FILE 119
B CLIST FOR INVOKING ISPF BROWSE * FILE 119
FROM EITHER READY MODE OR AN ISPF * FILE 119
ENVIRONMENT. * FILE 119
E CLIST FOR INVOKING ISPF 'EDIT' * FILE 119
FROM EITHER READY MODE OR AN ISPF * FILE 119
ENVIRONMENT * FILE 119
JULDATE INNER CLIST FOR EXTRACTING * FILE 119
TIME/DATE/DAY OF WEEK * FILE 119
===> (THIS CLIST CAN BE USED AS * FILE 119
A GENERAL DATE ROUTINE) * FILE 119
MAKEDAY CLIST TO INITIALIZE DUMP TRANSFER * FILE 119
PDS * FILE 119
XFERJOB JOB TO TRANSFER SYSTEM DUMP * FILE 119
DATASET TO TAPE * FILE 119
XFERINST HINTS ON INSTALLATION OF THE DUMP * FILE 119
TRANSFER UTILITY * FILE 119
XFERUTIL TSO COMMAND SUBROUTINE TO * FILE 119
DETERMINE DUMP DATASET VOLUME * FILE 119
SERIAL. * FILE 119
XFERVOL SUBROUTINE OF XFERUTIL TO * FILE 119
DETERMINE VOLUME SERIAL # * FILE 119
XFERWTO PROGRAM TO ISSUE WTO FROM SYSIN * FILE 119
(USED WITH CLISTS) * FILE 119
XFER1 CLIST INVOKED UNDER TMP IN BATCH * FILE 119
TO UPDATE XFER PDS * FILE 119
XFER2 CLIST INVOKED UNDER TMP IN BATCH * FILE 119
TO UPDATE XFER PDS * FILE 119
XIX CLIST TO INQUIRE INTO THE DUMP * FILE 119
TITLE DATABASE * FILE 119
XIXHELP HELP MEMBER FOR XIX CLIST * FILE 119
================================================== * FILE 119
TSO COMMANDS AND UTILITIES * FILE 119
================================================== * FILE 119
ASID COMMAND TO PRINT ADDRESS SPACE * FILE 119
DATA CONVERTED TO WORK IN 31 BIT * FILE 119
MODE UNDER MVS/XA (WORKS ON * FILE 119
NON-XA SYSTEMS TOO, IF VARIABLE * FILE 119
SET) * FILE 119
ASHELP HELP TEXT FOR THE 'ASID' COMMAND * FILE 119
CLR3270 COMMAND TO CLEAR SCREEN OF 3270 * FILE 119
TERMINAL. CHECKS FOR SESSION * FILE 119
MANAGER ACTIVE AND RETURNS NULL * FILE 119
STRING TO AVOID FLICKER. * FILE 119
CLRHELP HELP TEXT FOR THE 'CLR3270' * FILE 119
COMMAND * FILE 119
HMDCHRON TIME OF DAY UTILITY - CONVERT * FILE 119
TIME-OF-DAY * FILE 119
JULGREG JULIAN-GREGORIAN AND VICE-VERSA * FILE 119
CONVERSION (SUBROUTINE OF * FILE 119
HMDCHRON) * FILE 119
HTIME TSO COMMAND TO FORMAT THE DATE * FILE 119
AND TIME OF DAY (CALLS HMDCHRON * FILE 119
AS SUBROUTINE) * FILE 119
PDFINIT PROGRAM FOR ALLOCATING THE "ISPF" * FILE 119
PROFILE DATASET AND OPTIONALLY * FILE 119
INVOKING EITHER A COMMAND OR * FILE 119
"USERID.PROFILE.CLIST" UPON * FILE 119
LOGON. CAN BE SET UP SIMILIAR TO * FILE 119
VM PROFILE EXEC INVOCATION. * FILE 119
PDFHELP HELP TEXT FOR THE 'PDFINIT' * FILE 119
COMMAND * FILE 119
SM COMMAND TO TURN SESSION MANAGER * FILE 119
ON/OFF. WORKS IN MVX/XA MODE * FILE 119
WHERE SESSION MANAGER CONTROL * FILE 119
BLOCKS ARE MOVED 'ABOVE THE * FILE 119
LINE'. * FILE 119
================================================== * FILE 119
MACROS AND SUBROUTINES * FILE 119
================================================== * FILE 119
EPUTL PUTLINE SUBROUTINE TO ACCEPT PARM * FILE 119
LIST "ABOVE THE LINE" * FILE 119
APUT MACRO TO INVOKE 'EPUTL' INSTEAD * FILE 119
OF TPUT * FILE 119
-------------------------------------------------- * FILE 119
CALL# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
DATA# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
END# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
ENDDATA# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
ENTRE# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
EXIT# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
IEXIT# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
INIT# INTERNAL STRUCTURED MACROS USED * FILE 119
BY XFER UTILITY * FILE 119
-------------------------------------------------- * FILE 119
INUSE INNER MACRO FOR * FILE 119
TSOENTER/TSOLEAVE/SETREG/EOJ * FILE 119
LUSE INNER MACRO FOR * FILE 119
TSOENTER/TSOLEAVE/SETREG/EOJ * FILE 119
LDROP INNER MACRO FOR * FILE 119
TSOENTER/TSOLEAVE/SETREG/EOJ * FILE 119
CSPL INNER MACRO FOR TSOENTER/TSOLEAVE * FILE 119
IOPL INNER MACRO FOR TSOENTER/TSOLEAVE * FILE 119
CPPL INNER MACRO FOR TSOENTER/TSOLEAVE * FILE 119
TSOENTER MACRO TO SET UP COMMAND PROCESSOR * FILE 119
ENVIRONMENT * FILE 119
TSOLEAVE MACRO TO RETURN TO TMP (USED * FILE 119
W/TSOENTER) * FILE 119
SETREG ENTRY SETUP MACRO - NON/TSO * FILE 119
ENVIRONMENT * FILE 119
EOJ EXIT RETURN MACRO - NON/TSO * FILE 119
ENVIRONMENT * FILE 119
XABSM BRANCH AND SET MODE MACRO FOR * FILE 119
MVS/XA 31 BIT CODING * FILE 119
* FILE 119
IS FROM SAM GOLOB AND CONTAINS HIS COLUMNS FROM * FILE 120
"TECHNICAL SUPPORT" MAGAZINE ENTITLED "MVS TOOLS * FILE 120
AND TRICKS OF THE TRADE". THERE ARE NOW OVER 11 * FILE 120
YEARS' WORTH OF ARTICLES, WHICH ARE INCLUDED HERE * FILE 120
BY CONSENT FROM THE PUBLISHER OF THE MAZAGINE. * FILE 120
(FOR SAM'S OLD ARTICLES, SEE FILE 014.) * FILE 120
* FILE 120
THIS FILE CONTAINS THE ORIGINAL VERSIONS OF SAM'S * FILE 120
COLUMN BEFORE THEY WERE EDITED, OR SHORTENED BY * FILE 120
THE MAGAZINE BECAUSE OF SPACE LIMITATIONS. * FILE 120
* FILE 120
IT IS PERHAPS CONVENIENT TO INCLUDE THESE ARTICLES * FILE 120
ON THE CBT TAPE ITSELF, BECAUSE MANY OF THEM TALK * FILE 120
ABOUT HOW TO MAKE BEST USE OF SOFTWARE OFFERINGS * FILE 120
WHICH ARE DISTRIBUTED WITH THIS TAPE. * FILE 120
* FILE 120
SUBJECT MATTER INDEX TO THE COLUMNS * FILE 120
(TOPICS THAT WERE COVERED) * FILE 120
* FILE 120
PDS MEMBER SUBJECT MATTER OR TITLE * FILE 120
---------- ----------------------- * FILE 120
* FILE 120
$$$CPYRT : COPYRIGHT NOTICE * FILE 120
$$$INDEX : MEMBER NAMING SCHEME FOR THIS FILE * FILE 120
$$$PERMT : PERMISSION TO DISTRIBUTE THIS MATERIAL * FILE 120
$$DIRECT : ONE-LINE SUBJECT MATTER INDEX TO THE COLUMNS * FILE 120
$$DIRFMT : FORMATTED SUBJECT MATTER INDEX TO THE COLUMNS * FILE 120
$$INTRO : AUTHOR'S PREFACE AND "QUICK INTRO" * FILE 120
----------------------------------------------------------- * FILE 120
BM0009SE : THE JOY OF "SHARE" (SEPARATE ARTICLE - NOT * FILE 120
PUBLISHED - DOES NOT BELONG TO NASPA) * FILE 120
CL8901JA : INTRO TO THE COLUMN, MISCELLANEOUS TOOLS, * FILE 120
THE CBT TAPE * FILE 120
CL8902FE : VARIOUS DATASET AND DASD MANAGEMENT TRICKS * FILE 120
CL8903MA : ISPF COMMAND TABLE, LPA LOADING AT IPL, THE * FILE 120
ABE EDITOR (SEE INCLUDED CORRECTIONS FOR LPA) * FILE 120
CL8904AP : ENLARGING THE VTOC OF AN ACTIVE DISK PACK * FILE 120
CL8905MY : DELINK AND RELINK OF LOAD MODULES * FILE 120
CL8905X1 : FURTHER NOTES ON ISPF COMMAND TABLE ADDITIONS * FILE 120
CL8906JN : RETRIEVING MATERIAL FROM IBM'S SOURCE TAPES * FILE 120
CL8907JL : THE AMAZING EXCP-COUNT ZAP * FILE 120
CL8909SE : THE SLAC MODS TO ASSEMBLER H * FILE 120
CL8910OC : VIEW JOBS AND OUTPUT DIRECTLY FROM * FILE 120
SPOOL--QUEUE & SDF * FILE 120
CL8911NV : NO-COST SUBSYSTEMS: TSSO, ETPS, AND CMD1 * FILE 120
CL8912DE : CONVERT CLIST LIBRARIES FROM VB TO FB AND * FILE 120
VICE-VERSA * FILE 120
CL9001JA : TAPE MAPPING, TAPE LOOKING, AND TAPE COPYING * FILE 120
CL9002FE : SOME CHANGING TOOLS ON THE CBT TAPE; * FILE 120
THE SLAC ASSEMBLER, UPDATE 2 * FILE 120
CL9004AP : THE PDS PROGRAM PRODUCT, PART 1 * FILE 120
CL9005MY : THE PDS PROGRAM PRODUCT, PART 2 * FILE 120
CL9006JN : THE EFFECT OF CHANGING SOME OF THE FIELDS IN * FILE 120
THE VTOC * FILE 120
CL9007JL : PRE-PROCESSING SMPPTFIN DATA (NOT DEPENDENT ON * FILE 120
SMP/E) * FILE 120
CL9008AU : SMP/E HACKING EXAMPLE - REGRESSING VTAM, * FILE 120
PART 1 * FILE 120
CL9009SE : SMP/E HACKING EXAMPLE - REGRESSING VTAM, * FILE 120
PART 2 * FILE 120
CL9010OC : MAPXA AND BLKDISK: TWO USEFUL TSO COMMANDS * FILE 120
CL9011NV : BILL GODFREY'S CONTRIBUTIONS; THE NEW * FILE 120
REVIEW COMMAND * FILE 120
CL9012DE : THE ARCHIVER - PART 1 - * FILE 120
A NEW PRODUCT AND CONCEPT * FILE 120
CL9101JA : THE ARCHIVER - PART 2 - * FILE 120
MORE ABOUT THIS NEW PRODUCT * FILE 120
CL9102FE : CONVERSION BETWEEN CLIST FORMATS: * FILE 120
VB-FB, FB-VB * FILE 120
CL9103MA : PUBLIC SOFTWARE TAPES REVISITED * FILE 120
CL9104AP : BROWSING VIRTUAL STORAGE: * FILE 120
THE "LOOK" TSO COMMAND * FILE 120
CL9105MY : MEMBER GROUP SELECTION IN PARTITIONED DATASETS * FILE 120
CL9106JN : DYNAMASK - CHANGING DEVICE NAMES ON A LIVE * FILE 120
SYSTEM * FILE 120
CL9107JL : MAKING YOUR OWN PTFS, A VALUABLE TECHNIQUE * FILE 120
- PART 1 * FILE 120
CL9108AU : MAKING YOUR OWN PTFS, A VALUABLE TECHNIQUE * FILE 120
- PART 2 * FILE 120
CL9109SE : EXPLOITING PDS DIRECTORY FIELDS - PART 1 * FILE 120
CL9110OC : EXPLOITING PDS DIRECTORY FIELDS - PART 2 * FILE 120
CL9111NV : EXPLOITING PDS DIRECTORY FIELDS - PART 3 * FILE 120
CL9112DE : ABOUT DATASET BLOCK SIZES AND I/O * FILE 120
EFFICIENCY - PART 1 * FILE 120
CL9201JA : ABOUT DATASET BLOCK SIZES AND I/O * FILE 120
EFFICIENCY - PART 2 * FILE 120
CL9202FE : ABOUT DATASET BLOCK SIZES AND I/O * FILE 120
EFFICIENCY - PART 3 * FILE 120
CL9203MA : A TOUR OF THE WORLD THROUGH * FILE 120
FULLSCREEN ZAP - PART 1 * FILE 120
CL9204AP : A TOUR OF THE WORLD THROUGH * FILE 120
FULLSCREEN ZAP - PART 2 * FILE 120
CL9205MY : MAKING THE MOST OF YOUR TOOLS * FILE 120
CL9206JN : PUBLIC SOFTWARE TAPES REVISITED * FILE 120
CL9207JL : SOME ASSEMBLER THOUGHTS: * FILE 120
THE NEW HIGH-LEVEL ASSEMBLER - PART 1 * FILE 120
CL9208AU : SOME ASSEMBLER THOUGHTS: * FILE 120
THE NEW HIGH-LEVEL ASSEMBLER - PART 2 * FILE 120
CL9209SE : SMP/E TOOLS YOU SHOULD HAVE - PART 1 * FILE 120
CL9210OC : SMP/E TOOLS YOU SHOULD HAVE - PART 2 * FILE 120
CL9211NV : HOW I FOLLOWED MY OWN ADVICE, AND * FILE 120
HOW NOT TO UPGRADE JES2 EXITS * FILE 120
CL9212DE : PUTTING YOUR TOOLS TOGETHER - PART 1 * FILE 120
- ISPF COMMAND TABLES * FILE 120
CL9301JA : PUTTING YOUR TOOLS TOGETHER - PART 2 * FILE 120
- TOOL PACKAGES * FILE 120
CL9302FE : PUTTING YOUR TOOLS TOGETHER - PART 3 - * FILE 120
EDIT MACROS, TSO COMMANDS, AND * FILE 120
MISCELLANEOUS TECHNIQUES * FILE 120
CL9303MA : "SHOW ME MVS" IN ONE PLACE - * FILE 120
THE SHOWMVS COMMAND * FILE 120
CL9304AP : COPYING TAPES CORRECTLY * FILE 120
CL9305JL : MAKING SEQUENTIAL FILES OUT OF PDS'ES, * FILE 120
AND VICE-VERSA * FILE 120
CL9306SE : TSO HELP, WITHOUT THE DRAWBACKS: * FILE 120
THE HEL COMMAND * FILE 120
CL9307NV : IEHMAP, AND OTHER STORIES. * FILE 120
CL9401JA : THE FASCINATION OF THE DISASSEMBLER - PART 1 * FILE 120
CL9402MA : THE FASCINATION OF THE DISASSEMBLER - PART 2 * FILE 120
CL9403MY : ASSEMBLING PROGRAM PATCHES - THE ASMTOZAP * FILE 120
PROGRAM * FILE 120
CL9404JL : 2 TOPICS: REBIRTH OF IEHMOVE, LOADING JES2 * FILE 120
EXITS DYNAMICALLY * FILE 120
CL9405OC : THE "REVIEW" COMMAND REVISITED * FILE 120
CL9406NV : YOUR TSO SESSION - USING THE PSCB * FILE 120
CL9407DE : YOUR TSO SESSION - USING THE TSO * FILE 120
SESSION MANAGER * FILE 120
CL9501JA : ON FINDING PROGRAMS - BLDL AND LLA * FILE 120
CL9502FE : ON DATASET RECOVERY - INTRODUCTION * FILE 120
CL9503MA : DATASET RECOVERY METHODOLOGY - PART 2 * FILE 120
CL9504AP : VTOC TIDBITS - PART 1 * FILE 120
CL9505MY : VTOC TIDBITS - PART 2 * FILE 120
CL9506JN : A VTOC ADVENTURE - PART 3 * FILE 120
CL9507JL : EXPLORING SYS1.BRODCAST * FILE 120
CL9508AU : A NOVICE'S GUIDE TO ASSEMBLER * FILE 120
PROGRAMMING - PART 1 * FILE 120
CL9509SE : A NOVICE'S GUIDE TO ASSEMBLER * FILE 120
PROGRAMMING - PART 2 * FILE 120
CL9510OC : WORKING WITH TSO - PART 1 * FILE 120
CL9511NV : WORKING WITH TSO - PART 2 * FILE 120
CL9512DE : KEEPING UP WITH THE UNIT CONTROL * FILE 120
BLOCK - PART 1 * FILE 120
CL9601JA : KEEPING UP WITH THE UNIT CONTROL * FILE 120
BLOCK - PART 2 * FILE 120
CL9602FE : EDIT AND SYSTEM RECOVERY * FILE 120
CL9603MA : YOUR OWN WORLD OF EDIT MACROS * FILE 120
CL9604AP : THE PLACE OF FREE SOFTWARE IN TODAY'S * FILE 120
MVS SHOP * FILE 120
CL9605MY : EYES - PART 1 * FILE 120
CL9606JN : EYES - PART 2 * FILE 120
CL9607JL : EYES - PART 3 - USING SMP/E * FILE 120
CL9608AU : PERSONAL TOOLS FOR YOUR SMP WORK * FILE 120
CL9609SE : TIDBITS * FILE 120
CL9610OC : GETTING STARTED WITH PUBLIC MVS SOFTWARE * FILE 120
CL9611NV : ALTERNATIVES AND DATASET RECOVERY * FILE 120
CL9612DE : ON FINDING THINGS * FILE 120
CL9702FE : CREATIVE ENQUEUING * FILE 120
CL9703MA : HARNESSING MACRO POWER - PART 1 * FILE 120
CL9704AP : HARNESSING MACRO POWER - PART 2 * FILE 120
CL9705MY : IT'S A BIRD, IT'S A PLANE, IT'S SUPRNAME * FILE 120
CL9706JN : TIMING OUT * FILE 120
CL9707JL : OLD CODE--OLD GOLD * FILE 120
CL9708AU : PROFILES IN CREATIVITY * FILE 120
CL9709SE : SYSTEM PROGRAMMER CREATIVITY * FILE 120
CL9710OC : WHY NOT RUN A BATCH JOB? * FILE 120
CL9711NV : HELP IN KEEPING YOUR SYSTEM UP * FILE 120
CL9712DE : REMEMBERING TSSO * FILE 120
CL9801JA : LOOKING AT VIRTUAL STORAGE * FILE 120
CL9802FE : ASSORTED UTILITIES - PART 1 * FILE 120
CL9803MA : ASSORTED UTILITIES - PART 2 * FILE 120
CL9804AP : OTHER PEOPLE'S PROBLEMS * FILE 120
CL9805MY : UNDELETING DATA - PART 1 * FILE 120
CL9806JN : UNDELETING DATA - PART 2 * FILE 120
CL9807JL : WHEN IBM SAYS YOU CAN'T... SOMETIMES YOU CAN * FILE 120
CL9808SE : WHEN IBM SAYS YOU CAN'T... SOMETIMES YOU CAN * FILE 120
- PART 2 * FILE 120
CL9809OC : AN IMPORTANT Y2K TECHNIQUE * FILE 120
CL9810NV : EXPANDING YOUR HORIZONS * FILE 120
CL9811DE : SETTING YOURSELF UP * FILE 120
CL9901JA : CBT TAPE SUPPORT ONLINE * FILE 120
CL9902FE : RESOURCE AFFINITY IMPLEMENTATION EFFORTS * FILE 120
CL9903MA : SMP/E PREPROCESSING * FILE 120
CL9904AP : AWARENESS * FILE 120
CL9905MY : HIGHLIGHTS OF CBT TAPE VERSION 420 * FILE 120
CL9906JN : SELECTIONS FROM CBT TAPE VERSION 420 (AND 421) * FILE 120
CL9907JL : WRITING YOUR OWN TSO COMMAND PROCESSOR * FILE 120
- PART 1 * FILE 120
CL9908AU : WRITING YOUR OWN TSO COMMAND PROCESSOR * FILE 120
- PART 2 * FILE 120
CL9908SE : PC'S, C, AND ASSEMBLER * FILE 120
CL9910OC : ZAPPING, DISASSEMBLING, DELINKING, AND * FILE 120
RE-LINKEDITING * FILE 120
CL9911NV : LEARNING OUR TRADE * FILE 120
CL9912DE : USING XMIT TO PACKAGE MVS FILES * FILE 120
CM0001JA : RECENT CBT TAPE NEWS * FILE 120
CM0002FE : ASSEMBLER MACRO COLLECTIONS - PART 1 * FILE 120
CM0003MA : ASSEMBLER MACRO COLLECTIONS - PART 2 * FILE 120
CM0004AP : LEARNING ABOUT YOUR MVS SYSTEM * FILE 120
CM0005MY : ACCUMULATING ASSEMBLER TECHNIQUES * FILE 120
CM0006JN : COPYING TAPES * FILE 120
CM0007JL : SCANNING FOR PARMS IN A BATCH PROGRAM * FILE 120
CM0008AU : THE CVT - THE BACKBONE OF MVS * FILE 120
* FILE 120
IS FROM SAM GOLOB AND CONTAINS WIDE ILLUSTRATIONS * FILE 121
FROM HIS COLUMNS IN "TECHNICAL SUPPORT" MAGAZINE. * FILE 121
THE COLUMNS THEMSELVES ARE IN FILE 120. THIS FILE * FILE 121
IS IN IEBCOPY UNLOADED FORMAT. * FILE 121
* FILE 121
CONTAINS THE RMSG SUB-SYSTEM AND SOME JES2 EXITS * FILE 122
USED AT ALLERGAN INC OF IRVINE CALIFORNIA. THIS * FILE 122
FILE IS IN IEBUPDTE SYSIN FORMAT, FOR ADDITIONAL * FILE 122
INFORMATION SEE THE MEMBER CALLED $$DOC * FILE 122
* FILE 122
THE RMSG SUB-SYSTEM IS AN 'AUTOMATIC OPERATOR' * FILE 122
SYSTEM THAT MONITORS AND REACTS TO SELECTED * FILE 122
CONSOLE TRAFFIC AND USER WRITTEN COMMANDS. * FILE 122
* FILE 122
THE RMSG SUB-SYSTEM RUNS ON MVS/SP AND MVS/XA * FILE 122
WITHOUT ANY MODIFICATION. THE J2SRB01 ROUTINE RUNS * FILE 122
ON MVS/SP AND MVS/XA WITHOUT ANY MODIFICATION. * FILE 122
* FILE 122
* FILE 122
MEMBER DESCRIPTION * FILE 122
* FILE 122
CMDRMSG SAMPLE MVS STARTUP COMMANDS ISSUED BY * FILE 122
RMSGLOAD * FILE 122
PLACE THIS MEMBER IN SYS1.PARMLIB. THIS * FILE 122
IS A LIST OF COMMANDS THAT ARE ISSUED BY * FILE 122
RMSGLOAD AFTER RMSG IS INITIALIZED. SEE * FILE 122
QUITMVS FOR SHUTDOWN COMMANDS THE PROC * FILE 122
RMSGLOAD REFERS TO THIS MEMBER * FILE 122
* FILE 122
COMEIN ENTRY MACRO FOR SOME ROUTINES * FILE 122
PLACE THIS MEMBER IN YOUR USER MACLIB * FILE 122
* FILE 122
GETOUT EXIT MACRO FOR SOME ROUTINES * FILE 122
PLACE THIS MEMBER IN YOUR USER MACLIB * FILE 122
* FILE 122
IEFSSN00 SAMPLE SUB-SYSTEM NAME TABLE * FILE 122
ADD AN ENTRY FOR "RMSG" TO YOUR * FILE 122
SUB-SYSTEM NAME TABLE IN SYS1.PARMLIB. * FILE 122
* FILE 122
JES2PARM SAMPLE JES2 PARMS * FILE 122
THESE JES2 PARMS ACTIVATE ALL OF OUR * FILE 122
JES2 EXITS AND STARTS A NJE/NJI LINK * FILE 122
BETWEEN MVS AND VM. BEWARE OF THE * FILE 122
VIRTUAL PRINTER NUMBERS. THEY ARE * FILE 122
CRITICAL BEWARE OF THE NJE NODE NAMES. * FILE 122
* FILE 122
J2SRB01 SRB TO CLOSE VIRTUAL PRINTERS * FILE 122
THIS SRB ISSUES A DIAGNOSE 8 TO CLOSE * FILE 122
VIRTUAL PRINTERS. IT IS LOADED BY * FILE 122
RMSGLOAD AND ACTIVATED BY J2XIT01. THE * FILE 122
LOAD MODULE MUST RESIDE IN THE SAME * FILE 122
LINKLIB AS RMSG. SEE THE //LOADLIB DD * FILE 122
IN THE RMSGSUB PROC. THE SSVT FOR RMSG * FILE 122
IS ALSO THE ANCHOR FOR J2SRB01 * FILE 122
* FILE 122
J2TBL03 ACCOUNT NUMBER TABLE FOR J2XIT03 ACCOUNT * FILE 122
NUMBER VALIDATION ROUTINE FOR BOTH MVS * FILE 122
AND CMS. THIS ROUTINE IS LOADED AND * FILE 122
CALLED BY J2XIT03. THIS ROUTINE, WHEN * FILE 122
ASSEMBLED UNDER CMS, CAN BE USED TO * FILE 122
VALIDATE ACCOUNT NUMBERS. * FILE 122
* FILE 122
J2XIT01 JES2 EXIT 1 TO CLOSE VIRTURAL PRINTERS * FILE 122
THIS ROUTINE KNOWS, BY PRINTER NUMBER, * FILE 122
WHICH PRINTERS ARE VIRTUAL PRINTERS. NO * FILE 122
ACTION IS TAKEN FOR REAL PRINTERS. IF * FILE 122
THE ENTRY IS FOR A START BANNER PAGE, A * FILE 122
1 LINE BANNER PAGE IS CREATED. IF THE * FILE 122
ENTRY IS FOR A ENDING BANNER PAGE, THEN * FILE 122
THE PRINTER ADDRESS (CUU) AND OTHER * FILE 122
INFORMATION IS FORMATTED FOR J2SRB01 AND * FILE 122
J2SRB01 IS CALLED TO SCHEDULE A SRB TO * FILE 122
CLOSE THE PRINTER. ENDING BANNER PAGES * FILE 122
ARE NOT PRODUCED FOR VIRTUAL PRINTERS. * FILE 122
* FILE 122
J2XIT02 JES2 EXIT 2 TO MODIFY JOB CARD AND INSERT * FILE 122
/*ROUTE CARD. * FILE 122
1) CHECK FOR STARTED TASKS AND INSERT AN * FILE 122
ACCOUNT NUMBER IN THE STC JOB CARD. * FILE 122
2) INSERT A /*ROUTE CARD IF THE JOB CAME * FILE 122
FROM THE NJE/NJI LINK. * FILE 122
* FILE 122
J2XIT03 JES2 EXIT 3 TO VALIDATE ACCOUNT NUMBERS * FILE 122
THIS ROUTINE LOADS J2TBL03 TO VALIDATE * FILE 122
ACCOUNT NUMBERS. SELECTED JOB NUMBERS * FILE 122
(SEE THE CODE) WILL CAUSE J2TBL03 TO BE * FILE 122
REFRESHED (RE-LOADED) OR INACTIVATED. * FILE 122
* FILE 122
J2XIT04 JES2 EXIT 3 TO MODIFY JCL * FILE 122
THIS ROUTINE COMMENTS OUT JOBCAT AND * FILE 122
STEPCAT CARDS FOR SELECTED JOB CLASSES. * FILE 122
IT ALSO ADDS SOME 'OUTPUT' CARDS TO * FILE 122
ROUTE THE JOBLOG ETC TO THE LOCAL NODE. * FILE 122
* FILE 122
J2XIT09 JES2 EXIT 9 TO ENFORCE OUTPUT EXCESSION * FILE 122
FOR TEST JOBS * FILE 122
THIS EXIT WILL ALLOW OUTPUT EXCESSION * FILE 122
FOR PRODUCTION JOBS. TEST JOBS WILL * FILE 122
ABEND WHEN OUTPUT EXCESSION OCCURS. * FILE 122
* FILE 122
QUITMVS A LIST OF COMMANDS TO SHUT MVS DOWN BEFORE * FILE 122
AN IPL * FILE 122
PLACE THIS MEMBER IN SYS1.PARMLIB. WHEN * FILE 122
THE OPERATOR ISSUES THE COMMAND 'QUIT * FILE 122
MVS' THESE COMMANDS WILL BE PUT ON THE * FILE 122
INTRDR BY RMSG. * FILE 122
* FILE 122
RCMD ISSUE SELECTED JES2 COMMANDS * FILE 122
WE DON'T WANT OUR PROGRAMMERS ISSUING * FILE 122
JES2 OR OPERATOR COMMANDS. * FILE 122
RCMD IS USED TO SEND A REQUEST TO RMSG * FILE 122
TO ISSUE SELECTED COMMANDS. RCMD IS * FILE 122
PARM DRIVEN AND WILL ISSUE THE * FILE 122
FOLLOWING COMMANDS. * FILE 122
* FILE 122
PARM COMMAND * FILE 122
SUPRA $TI10,V CHANGE INITIATOR CLASS * FILE 122
$SI10 START THE INITIATOR. * FILE 122
RLSE JOBNAME $A'JOBNAME' RELEASE A HELD JOB * FILE 122
REFRESH F LLA,REFRESH REFRESH THE LLA FOR XA * FILE 122
* FILE 122
* THE PRODUCTION CONTROL GROUP LINKS * FILE 122
ALL PRODUCTION PROGRAMS INTO A * FILE 122
LINKLIST DATASET. RCMD WITH THE * FILE 122
REFRESH PARM IS THE LAST STEP OF THE * FILE 122
LKED JOB. * FILE 122
* FILE 122
* IF THE F LLA,REFRESH COMMAND LOOKS A * FILE 122
LITTLE STRANGE, IT IS BECAUSE WE * FILE 122
HAVE MSX IN HOUSE AND ISSUE THE * FILE 122
COMMAND ON ALL PROCESSORS. REMOVE * FILE 122
THE '^ALL' AND THE COMMAND SHOULD * FILE 122
WORK FINE. * FILE 122
* FILE 122
EXAMINE THE CODE FOR ADDITIONAL FEATURES. * FILE 122
* FILE 122
RMSG AUTOMATIC OPERATOR SUB-SYSTEM * FILE 122
RMSG IS A SUB-SYSTEM THAT MONITORS ALL * FILE 122
CONSOLE TRAFFIC AND REACTS TO SELECTED * FILE 122
MESSAGES AND COMMANDS. THE SSVT FOR RMSG * FILE 122
IS ALSO THE ANCHOR FOR J2SRB01 RMSG * FILE 122
CONTAINS THE FOLLOWING FEATURES: * FILE 122
1) REPLY TO SELECTED WTOR MESSAGES. * FILE 122
EX: REPLY 'NOHOLD' TO THE REPLY HOLD * FILE 122
OR NOHOLD MSG. * FILE 122
2) RESPOND TO SELECTED WTO MESSAGES - * FILE 122
EX: WHEN RMSG SEES THE 'VTAM ACTIVE' * FILE 122
MSG IT WILL START TSO. * FILE 122
3) ALLOW USER COMMANDS. * FILE 122
EX: THE COMMAND 'QUIT MVS' WILL ISSUE A * FILE 122
SERIES OF COMMANDS TO SHUT DOWN MVS * FILE 122
(SEE QUITMVS MEMBER). JES2 WILL BE * FILE 122
STOPPED AND A Z EOD WILL BE ISSUED. * FILE 122
* FILE 122
RMSGCMD PROC USED BY RMSG TO WRITE COMMANDS TO THE * FILE 122
INTRDR * FILE 122
PLACE THIS MEMBER IN A PROCLIB * FILE 122
* FILE 122
RMSGLOAD INITIALIZE RMSG AND LOAD J2SRB01 THIS * FILE 122
ROUTINE INITIALIZES THE RMSG SUB-SYSTEM * FILE 122
AND LOADS THE J2SRB01 ROUTINE. IT ALSO * FILE 122
READS THE CMDRMSG MEMBER OF SYS1.PARMLIB * FILE 122
AND PUTS THE COMMANDS ON THE INTRDR. * FILE 122
* FILE 122
RMSGSUB PROC TO RUN RMSGLOAD AND INITIALIZE RMSG * FILE 122
SUB-SYSTEM * FILE 122
PLACE THIS MEMBER IN A PROCLIB * FILE 122
POINT TO THE LINKLIB THAT CONTAINS BOTH * FILE 122
RMSG AND J2SRB01. * FILE 122
TO START RMSG ENTER THE COMMAND 'S RMSGSUB'* FILE 122
WE PUT THIS COMMAND IN CMD00. * FILE 122
TO REFRESH RMSG AND J2SRB01 ENTER THE * FILE 122
COMMAND: * FILE 122
'S RMSGSUB,OPTION=FORCE'. * FILE 122
* FILE 122
IS CURRENTLY EMPTY * FILE 123
* FILE 123
IS FROM THE STATE OF WISCONSIN REGIONAL COMPUTING * FILE 124
CENTER OF MADISON, WISCONSIN AND CONTAINS * FILE 124
SEVERAL OF THEIR ISPF/PDF APPLICATIONS. THEY ARE * FILE 124
CURRENTLY WORKING UNDER ISPF/PDF V2 R3 M0. * FILE 124
* FILE 124
NO WARRANTY IS GIVEN OR IMPLIED BY WSRCC. * FILE 124
NO LIABILITY IS ASSUMED BY WSRCC FOR ANY OF * FILE 124
THE CODE IN THIS FILE. * FILE 124
* FILE 124
THIS FILE IS IN IEBUPDTE SYSIN FORMAT * FILE 124
* FILE 124
THIS FILE CONTAINS THE FOLLOWING MEMBERS : * FILE 124
* FILE 124
AUTH - MACRO, USED BY SPF (SEE BELOW). AUTH * FILE 124
IS USED BY THE SPF PROGRAM TO INVOKE * FILE 124
SVC 233 TO TURN ON AND OFF JSCB * FILE 124
AUTHORIZATION. * FILE 124
* FILE 124
BPPL - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
EDPRD - ISREDIT MACRO TO INVOKE THE PRINTDS * FILE 124
COMMAND FOR THE DATASET BEING EDITED. * FILE 124
USES THE PDPANL PANEL TO PROMPT FOR * FILE 124
OPTIONS WHICH ARE SAVED IN THE * FILE 124
PROFILE. THE MACRO WORKS AGAINST THE * FILE 124
DISK VERSION OF THE DATASET SO IF * FILE 124
CHANGES HAVE BEEN MADE THE DATASET * FILE 124
MUST BE "SAVE"ED BEFORE INVOKING * FILE 124
EDPRD. * FILE 124
* FILE 124
EDPRT - ISREDIT MACRO TO INVOKE THE PRINTOFF * FILE 124
COMMAND FOR THE DATASET BEING EDITED. * FILE 124
USES THE PRPANL PANEL TO PROMPT FOR * FILE 124
OPTIONS WHICH ARE SAVED IN THE * FILE 124
PROFILE. THE MACRO WORKS AGAINST THE * FILE 124
DISK VERSION OF THE DATASET SO IF * FILE 124
CHANGES HAVE BEEN MADE THE DATASET * FILE 124
MUST BE "SAVE"ED BEFORE INVOKING * FILE 124
EDPRT. * FILE 124
* FILE 124
EDSCR - ISREDIT MACRO TO INVOKE THE SCRIPT * FILE 124
COMMAND FOR THE DATASET BEING EDITED. * FILE 124
USES THE SCPANL PANEL TO PROMPT FOR * FILE 124
OPTIONS WHICH ARE SAVED IN THE * FILE 124
PROFILE. THE MACRO WORKS AGAINST THE * FILE 124
DISK VERSION OF THE DATASET SO IF * FILE 124
CHANGES HAVE BEEN MADE THE DATASET * FILE 124
MUST BE "SAVE"ED BEFORE INVOKING * FILE 124
EDSCR. * FILE 124
* FILE 124
ENTERR - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
GDGUTIL - ISPF CLIST WHICH INVOKES SEVERAL * FILE 124
FUNCTIONS ONE MIGHT WANT TO DO TO A * FILE 124
GDG. CREATE, LIST INDEX, LIST * FILE 124
DATASETS MODIFY LIMIT AND DELETE. * FILE 124
CAN BE USED FROM PANEL 6 OR INCLUDED * FILE 124
AS A SELECTION ENTRY ON ANOTHER * FILE 124
PANEL. USES GDGUTILP PANEL AND * FILE 124
RESETGDG PROGRAM TO DO THE WORK. * FILE 124
* FILE 124
GDGUTILP - ISPF PANEL USED BY GDGUTIL, SEE ABOVE. * FILE 124
* FILE 124
IGC0023C - SVC 233. THIS IS A NON-AUTHORIZED * FILE 124
TYPE 3 SVC THAT TURNS BITS IN THE * FILE 124
JSCB ON OR OFF BASED ON AN ENTRY * FILE 124
CODE IS REGISTER 1. IT IS CALLED BY * FILE 124
THE AUTH MACRO WHICH IS USED BY THE * FILE 124
SPF PROGRAM (SEE BELOW). * FILE 124
* FILE 124
IKJCVT - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
ISR=PDOC - ISPF/PDF PRIMARY OPTION PANEL * FILE 124
DOCUMENTAION. * FILE 124
* FILE 124
ISR=PRIM - ISPF/PDF PRIMARY OPTION PANEL AS USED * FILE 124
BY WSRCC. SEE THE MEMBER ISR=PDOC FOR * FILE 124
DESCRIPTION. * FILE 124
* FILE 124
KPPL - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
LEAVER - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
MOVE - MACRO TAKEN FROM CBT TAPE VERSION 259 * FILE 124
FILE 270. USED IN ASSEMBLY OF STACK * FILE 124
PROGRAM. * FILE 124
* FILE 124
PDPANL - PROMPTING PANEL FOR USE WITH EDPRD * FILE 124
MACRO. * FILE 124
* FILE 124
PRPANL - PROMPTING PANEL FOR USE WITH EDPRT * FILE 124
MACRO. * FILE 124
* FILE 124
PRT - 3.4 PRINTOFF CLIST, SAME AS J.PRT, * FILE 124
ALSO MAIN MEMBER FOR ALIASES PR1 AND * FILE 124
PR2 3.4 PRINTOFF CLISTS. * FILE 124
* FILE 124
PRTPNL00 - MEMBERS SELECTION LIST PANEL USED BY * FILE 124