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 CBT249.FILEnnn for file nnn of the CBT tape 249.
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)
IS THE JCL THAT CREATED THIS TAPE
( YOU ARE READING IT NOW )
COMPRESSION / DECOMPRESSION PROGRAM FOR THIS TAPE .
THIS IS THE CODE USED FOR COMPRESSION AND DECOMPRESSION
OF THIS TAPE
IS A JCL STREAM WITH INSTREAM PROCS TO DROP DOWN
THIS WHOLE MODS TAPE ( SAVE FILES THAT HAVE BEEN
DELETED ) TO A DISK PACK ( IF YOU HAPPEN TO HAVE THE
LUXURY OF HAVING A DISK PACK LAYING AROUND DOING
NOTHING )
IN A TEST RUN ON A 3033 IT TOOK 17.04 ELAPSED MINUTES
TO DROP DOWN VERSION 168 . CPU TIME WAS 1 MIN 22.81 SEC
SRB WAS 4.73 SECONDS
283 DATA SETS OCCUPIED 3330 TRACKS ON A 3350
FOR A TOTAL OF 64127 KBYTES
IN A TEST RUN ON A VERY HEAVILY LOADED 3081 ( 95% BUSY )
IT TOOK 216.15 ELAPSED MINUTES TO DROP DOWN VERSION 208
CPU TIME WAS 5 MINUTES 27.50 SEC SRB WAS 45.68 SECONDS
352 DATA SETS OCCUPIED 3712 TRACKS ON A 3380
JOB 1 37.50 1 MIN 10.69 SEC 09.63 SRB
JOB 2 63.84 MIN 58.18 SEC 07.37 SRB
JOB 3 49.02 1 MIN 19.33 SEC 11.31 SRB
JOB 4 65.79 1 MIN 59.30 SEC 17.37 SRB
IN A TEST RUN ON A LIGHTLY LOADED 3081 ( 30% - 40% BUSY )
IT TOOK 58.40 ELAPSED MINUTES TO DROP DOWN VERSION 209
CPU TIME WAS 5 MINUTES 07.12 SEC SRB WAS 47.58 SECONDS
352 DATA SETS OCCUPIED 3716 TRACKS ON A 3380
JOB 1 11.33 1 MIN 05.83 SEC 10.05 SRB
JOB 2 10.12 MIN 53.07 SEC 7.42 SRB
JOB 3 14.46 1 MIN 15.44 SEC 12.12 SRB
JOB 4 22.49 1 MIN 52.78 SEC 17.99 SRB
IN A TEST RUN ON A 3081 . IT TOOK 144.47 ELAPSED MINUTES
TO DROP DOWN VERSION 235 CPU TIME WAS 5 MINUTES 14.04
SECONDS , SRB WAS 54.88 SECONDS .
413 DATA SETS OCCUPIED 4748 TRACKS ON A 3380
JOB 1 22.34 0 MIN 49.43 SEC 7.97 SRB
JOB 2 28.00 0 MIN 46.89 SEC 7.35 SRB
JOB 3 36.28 1 MIN 09.89 SEC 12.48 SRB
JOB 4 46.93 2 MIN 11.12 SEC 24.22 SRB
JOB 5 10.92 0 MIN 16.78 SEC 2.86 SRB
FOR A TOTAL OF 128805 MBYTES
THE LAST JOB IN THIS FILE WILL TAKE FILE 1 OF THIS TAPE
AND LOAD IT INTO AN INFO/MVS DATABASE FOR PROCESSING . THIS
JOB REQUIRES A PRE-DEFINED VSAM CLUSTER TO HOLD THE
DATA OUT OF FILE 001
IS FROM DAVE DROUIN FROM CONN NATIONAL BANK THIS
CODE WILL TAKE FILE 001 OF THIS TAPE AND PUT IT INTO
INFO/MVS FORMAT SO IT CAN BE LOADED INTO A INFO/MVS
DATABASE . THIS FILE IS IN IEBUPDTE SYSIN FORMAT .
SEE THE MEMBER CALLED $DOC FOR ADDTIONAL INFORMATION
IS FROM DAVE DRUIN FROM CONN NATIONAL BANK THIS
FILE CONTAINS THE DATA FOR THE HEADER INFORMATION
FOR USE WITH FILE 004 ON THIS TAPE . THIS FILE IS
IS LRECL=255,BLKSIZE=3120,RECFM=VB
IS THE MVS FREEALL COMMAND FOR TSO
IS AN SMF EXIT IEFACTRT
THIS EXIT WILL PUT OUT ADDITIONAL INFORMATION ON THE
CONSOLE AND JCL LISTING . ON THE CONSOLE IT WILL SHOW
WHEN A JOB GOES THROUGH STEP AND JOB TERMINATION
AND ITS RETURN CODE . IT THE STEP WAS NOT EXECUTED
IT WILL SHOW NXEQ INSTEAD OF THE RETURN CODE .
AT STEP TERMINATION IT WILL PUT OUT THE FOLLOWING
INFORMATION IN THE FOLLOWING ORDER ON THE JCL LISTING
FIRST LINE SECOND LINE
JOBNAME PAGE INS
STEP NUMBER PAGE OUTS
STEP NAME PAGES SWAPPED IN
PROGRAM NAME PAGES SWAPPED OUT
STEP INITIATION TIME VIO PAGES IN
STEP TERMINATION TIME VIO PAGES OUT
TCB STEP TIME
SRB TIME FOR THE STEP
ELAPSED TIME
SWAPS FOR THIS STEP
V OR R JOB
STORAGE USED
COMPLETION CODE
FOR JOB TERMINATION IT WILL PUT OUT THE FOLLOWING
INFORMATION IN THIS ORDER ON THE JCL LISTING
JOBNAME
SERVICE UNITS USED
TOTAL TRANSACTION TIME
JOB INITIATION TIME
JOB TERMINATION TIME
TCB JOB TIME
SRB TIME FOR THE JOB
TOTAL SWAPS
COMPLETION CODE
THIS IS FOR MY USE TO SHOW SOME STATS
IS IN IEBUPDTE FORMAT FROM COCA COLA IN ATLANTIC AND
CONTAINS A COPY OF THEIR SYNCSORT EXIT .
THIS EXIT WAS TAKEN OFF THE CBT MODS TAPE AND
MODIFIED TO CHANGE THE VSCORE PARAMETER BY TIME OF
DAY . THE ORIGINAL VERSION OFF THE MODS TAPE CHANGED
THE PARAMETER VSIO BY TIME OF DAY .
THIS ROUTINE WILL BE CALLED BY SYNCSORT TO DETERMINE
WHETHER TO USE "VSCORE=256K" OR "VSCORE=1536K" . IF
THE TIME IS BETWEEN THE CUTOFFLO AND THE CUTOFFHI
TIME , A PARM OF "VSCORE=256K" WILL BE PASSED TO
SYNCSORT . IF THE TIME IS OUTSIDE OF THE CUTOFFLO
AND CUTOFFHI TIMES A PARM OF "VSCORE=1536K" WILL BE
PASSED .
THIS MODULE SHOULD BE LINKEDITED INTO THE LIBRARY
THAT CONTAINS SYNCSORT WITH THE NAME $ORTPARM . THE
"OPTION FLAG #1" AT HEX (5A) IN CSECT SYNCVEC OF
SYNCSORT MUST HAVE BIT 4 TURNED ON (X'08')--
PRESENTLY THE FLAG IS X'E8' . THE DESCRIPTION OF THE
"SYNCSORT OPTIONS VECTOR" (CSECT SYNCVEC) IS IN
SECTION 2 OF THE SYNCSORT PROGRAMMERS GUIDE . THE
DESCRIPTION OF THE "PARMEXIT FACILITY" IS IN SECTION
3 OF THE SYNCSORT PROGRAMMERS GUIDE .
IS THE DOCUMENTATION FILE FOR GPSAM FROM THE YALE
COMPUTER CENTER WRITTEN BY MR HOWARD GILBERT . THIS
FILE IS FBA FORMAT . THE SOURCE FOR GPSAM IS CONTAINED
IS CONTAINED IN FILE 011 OF THIS TAPE
IS THE SOURCE FOR GPSAM FROM THE YALE COMPUTER CENTER
WRITTEN BY MR HOWARD GILBERT . THIS FILE IS IN
IEBUPDTE SYSIN FORMAT .
GPSAM LETS YOU WRITE YOUR OWN "ACCESS METHOD" AND
MAKE IT LOOK LIKE A SEQUENTIAL DATASET TO ANY
APPLICATION PROGRAM OR UTILITY . IT CAN BE USED TO
PROVIDE DBMS , VTAM , TSO FULLSCREEN , BTAM , OR
SPECIALIZED DEVICE SUPPORT .
SIMPLE : INSTALLS ON ANY MVS SYSTEM . NO IBM CODE
IS MODIFIED . TAKES ONLY A FEW MINUTES TO RUN
LINKEDIT STEPS AND BUILD PROCEDURES .
SMALL : 700 BYTES IN LPA . 160 BYTES IN PRIVATE
ADDRESS SPACE .
SAFE : ONLY ONE INSTRUCTION EXECUTES IN KEY 0 AND
MODIFIES A GENERAL SYSTEM CONTROL BLOCK . ANOTHER
18 INSTRUCTIONS OPERATE IN A SYSTEM KEY AND ONLY 4
OF THEM CHANGE STORAGE , STORING VALUES IN JOB
RELATED CONTROL BLOCKS IN THE PRIVATE AREA . EVEN
THE MOST CONSERVATIVE INSTALLATION CAN DESK CHECK
THE SINGLE AUTHORIZED CSECT SEVERAL TIMES OVER IN
AN HOUR .
UNIVERSAL : WHILE A SYSTEM PROGRAMMER MUST INSTALL
THE PACKAGE IN AUTHORIZED LIBRARIES , ANY
APPLICATION PROGRAMMER CAN WRITE HIS OWN "ACCESS
METHOD" IN ASSEMBLER AND USE IT FROM HIS OWN
PROGRAMS . THE USER SPECIFIES THE MODULE NAME ON
HIS DD CARD OR IN THE TSO ALLOCATION OF THE
DDNAME . THESE USER MODULES RUN IN PROBLEM STATE
AND CAN COME FROM ANY LIBRARY . CONTROL IS GIVEN
TO THE ROUTINE FROM THE OPEN , CLOSE , GET , PUT ,
READ , OR WRITE STATEMENTS .
SECURE : MVS INTEGRITY IS MAINTAINED . IF AN
AUTHORIZED PROGRAM OPENS A GPSAM FILE , THE "ACCESS
METHOD" MODULE IS LIMITED TO THOSE EXPLICITLY
PERMITTED BY AN INSTALLATION SUPPLIED NAME TABLE
AND THE MODULE MUST COME FROM AN APF LIBRARY .
IS FROM JOHN HANCOCK MUTUAL LIFE INSURANCE COMPANY
AND IS THEIR ISPF BACKGROUND JOBS DRIVER
THIS FILE CONSISTS OF OPTIONS DESIGNED TO BE USED WITH
THE INTERACTIVE SYSTEM PRODUCTIVITY FACILITY / PROGRAM
DEVELOPMENT FACILITY ( ISPF/PDF ) .
NOTE: SOME OF THESE OPTIONS WILL WORK ONLY UNDER ISPF
VERSION 2. PANELS/SKELETONS/MESSAGES PROVIDED FOR USE
WITH JH#PDF8 ARE INTENDED ONLY AS SAMPLES. SOME
MODIFICATION (E.G., ACCOUNTING FIELDS) WOULD BE
REQUIRED AT YOUR INSTALLATION. PANELS THAT CONTAIN A
"VOLUME SERIAL" FIELD DETERMINE A UNIT NAME IN THEIR
)PROC SECTION. THIS SHOULD BE CHECKED FOR
INSTALLATION COMPATIBILITY.
CHANGES 03/04/85: MODIFICATIONS TO EXPLOIT ISPF
VERSION 2: MACRO ISPCALL NOW SUPPORTS ISPEXEC
FORMAT (SEE NEW JH#PDF8 FOR EXAMPLE); JH#PDF8
MODIFIED TO USE LM SERVICES TO ENABLE VIO
ISPCTLN DATA SETS TO BE EDITED (UNDER V1
JH#PDF8 WORKS AS BEFORE); PANEL JHAEFR01 ADDED
(USED BY JH#PDF8 UNDER V2); JH ISR^PRIM
REPLACED FOR V2; MSGS JHA^M04 ADDED; MANY
PANELS/SKELETONS/MESSAGES FORMERLY PREFIXED Z*
ARE NOW PREFIXED JHA*; CLIST ISRCTBL RENAMED
JH#YCTBL; JH EDIT INTERFACE ALTERED FOR V2;
CLIST TSEDITPR RENAMED JH#TEDPR AND CHANGED TO
PROCESS PDF V2 FIELDS; ADDED JH#GTDSN (A DIALOG
PROGRAM THAT RETURNS VOLUME SERIAL AND DATA SET
NAME WHEN PROVIDED A DDNAME - USED BY OTHER
DIALOGS); ADDED JH#TEDRT TO DISPLAY AND EDIT A
USER'S PDF EDIT RECOVERY TABLE; ADDED ISRUOLJH,
IBM'S ISRUOL (PDF 3.8) MODIFIED TO RUN FASTER
BY USING TEMPORARY DATA SETS; ADDED JH#TPRGM TO
INVOKE IEHPROGM FOREGROUND; ADDED JH#EDTMP TO
ALLOW EDITING OF VIO ISPCTLN DATA SETS.
CHANGES 10/18/83: TABLE DISPLAY UTILITY REWRITTEN AND
ENHANCED. CLIST RENAMED JH#YDTBL FROM
ISRYDTBL.
CHANGES 10/3/83: JOHN HANCOCK EDIT INTERFACE IS
ENHANCED TO ALLOW USER-DEFINED ABBREVIATIONS
(SEE #3 BELOW); SMALL CHANGES TO JH#PDF8 AND
ASSOCIATED SAMPLE PANELS; ADDED #MAXTOP #8, #9.
1. JOHN HANCOCK BATCH JOBS DRIVER (JH#PDF8) IS A
GENERAL PURPOSE ISPF FUNCTION FOR THE GENERATION OF
JCL BASED ON DATA ENTERED ON PANELS. PROCESSING IS
CONTROLLED BY AN INITIAL PARM AND BY ISPF
VARIABLES. SEE THE COMMENTS AT THE BEGINNING OF
THE JH#PDF8 SOURCE FOR ADDITIONAL INFORMATION.
SOME DIFFERENCES BETWEEN PDF OPTION 5 AND JH#PDF8:
JH#PDF8 DOES NOT ALLOCATE DATA SETS FOR
VERIFICATION, WHERE OPTION 5 OPTIONALLY ALLOCATES
THE INPUT DATA SET (ONLY); JH#PDF8 ALLOWS A USER TO
EDIT THE TEMPORARY GENERATED JCL IN ADDITION TO
SUBMITTING OR CANCELING THE JOB; JH#PDF8 ALLOWS
INITIAL AND FINAL SKELETONS TO BE TAILORED FOR EACH
INVOCATION; JH#PDF8 ALLOWS TWO OR MORE PANELS TO
PROVIDE INPUT TO ONE TAILORING OPERATION; WITH
JH#PDF8 PROCESSING SUCH AS JOB CHARACTER
INCREMENTATION IS DONE IN THE PANELS (SEE SAMPLE
JHABP^B) INSTEAD OF IN THE DRIVER PROGRAM.
SAMPLE PANELS, SKELETONS, AND MESSAGES ARE PROVIDED
FOR USE WITH JH#PDF8. IT IS POSSIBLE, HOWEVER, TO
CREATE TOTALLY DIFFERENT ISPF COMPONENTS FOR USE
WITH THIS DRIVER. THE ONLY REQUIREMENTS ARE THAT
THERE BE A PSEUDO-SELECTION PANEL WHOSE NAME IS
PASSED VIA A PARM TO JH#PDF8 (SAMPLE IS JHABP^A)
AND THAT THE COMPONENTS SET ISPF VARIABLES TO
DICTATE PROCESSING (AGAIN, SEE THE COMMENTS).
JH#PDF8 CODE IS REENTERANT; THE MODULE MAY BE
PLACED IN LPALIB WITH OTHER ISPF MODULES.
2. CLIST JH#YDTBL WILL DISPLAY THE CONTENTS
(NON-EXTENSION VARIABLES) OF ANY TABLE IN TABLE
DISPLAY (SCROLLABLE) FORMAT. AS PROVIDED HERE IT
SUPPORTS FIVE DIFFERENT TABLE DISPLAY FORMATS. IT
MAY BE INVOKED FROM ISPF/PDF OPTION 6, VIA THE ISPF
TSO COMMAND, OR FROM A SELECTION PANEL (E.G.,
ISRYXD1).
3. PANEL JHTEPE01 IS A JOHN HANCOCK EDIT INTERFACE.
TO USE IT, ADD THE FOLLOWING ENTRY TO A SELECTION
PANEL:
N,'PGM(ISREDIT) PARM(P,JHTEPE01)
NEWAPPL(ISR)'
NOTE: FUTURE RELEASES OF PDF MAY NOT SUPPORT THIS
METHOD OF IMPLEMENTATION.
4. CLIST JH#TEDPR WILL DISPLAY THE CONTENTS OF A
USER'S CURRENT EDIT PROFILE (FOR THE APPLICATION HE
HAS ENTERED). IT MAY BE INVOKED FROM ISPF/PDF
OPTION 6, VIA THE ISPF TSO COMMAND, OR FROM A
SELECTION PANEL. THE CLIST MUST BE MODIFIED FOR
YOUR INSTALLATION'S ISPF PROFILE NAMING CONVENTION.
5. CLIST TSCMDTB WILL DISPLAY THE CONTENTS OF THE
CURRENT SYSTEM COMMAND TABLE. THIS MAY BE USED BY
END-USERS, SINCE THE "DESCRIPTION," NOT THE
"ACTION," IS DISPLAYED. IF THIS CLIST IS TO BE
USED, IT IS RECOMMENDED THAT A COPY OF THE SYSTEM
COMMAND TABLE (ISPCMDS) BE MADE UNDER A DIFFERENT
NAME (SYSCMDS IS USED IN THE CLIST). STRANGE
THINGS WILL HAPPEN IF YOU ATTEMPT TO OPEN AND CLOSE
A COMMAND TABLE THAT ISPF HAS ALREADY OPENED.
TSCMDTB MAY BE INVOKED FROM ISPF/PDF OPTION 6, VIA
THE ISPF TSO COMMAND, OR FROM A SELECTION PANEL.
6. CLIST JH#YCTBL DRIVES THE TABLE RECONSTRUCTION
UTILITY. THIS ALLOWS FIELDS TO BE ADDED TO/REMOVED
FROM TABLES WITHOUT LOSING THE TABLE DATA. IT MAY
BE INVOKED FROM ISPF/PDF OPTION 6, OR FROM A
SELECTION PANEL (E.G., ISRYXD1).
7. PANEL JHAYP14^ PROVIDES ENTRY TO A FOREGROUND
INTERFACE TO THE IBM-SUPPLIED SELECTION PANEL
UPDATE UTILITY (ISPPUP). THIS MAY BE ENTERED FROM
A HIGHER-LEVEL SELECTION PANEL (XX,'PANEL(ZYPUP^)')
OR FROM TSO READY (ISPSTART PANEL(ZYPUP^)).
8. CLIST ISRALTK ALLOWS A USER TO DEFINE AND ACTIVATE
A SECOND SET OF PROGRAM FUNCTION KEY DEFINITIONS.
READ HELP PANEL XALTK BEFORE USING. IT MAY BE
INVOKED FROM A SELECTION PANEL (E.G.,ISPOPTA) BY
"'XX,CMD(%ISRALTK)'." AN ENTRY IN A COMMAND TABLE
IS ALSO A GOOD IDEA:
VERB ACTION
K2 SELECT CMD(%ISRALTK PARM('&ZPARM'))
9. PANEL PANELID IS A EXAMPLE OF HOW "PANELID ON" MAY
BE SET WITHOUT THE USER HAVING TO ENTER THE ISPF
COMMAND. THE CODE IN THIS PANEL COULD BE USED IN
ANY SELECTION PANEL, INCLUDING ISR^PRIM AND
ISP^MSTR.
10. CLIST JH#TEDRT ALLOWS THE DISPLAYING AND
MODIFICATION OF A USER'S EDIT RECOVERY TABLE. IT
MAY BE INVOKED FROM ISPF/PDF OPTION 6, OR FROM A
SELECTION PANEL. THE CLIST MUST BE MODIFIED FOR
YOUR INSTALLATION'S ISPF PROFILE NAMING CONVENTION.
11. CLIST ISRUOLJH IS JOHN HANCOCK'S MODIFIED ISRUOL,
THE CLIST THAT DRIVES PDF OPTION 3.8. IT HAS BEEN
MODIFIED TO RUN FASTER BY USING TEMPORARY DATA
SETS, BYPASSING CATALOGING AND DELETION. IT USES
PROVIDED DIALOG PROGRAM JH#GTDSN (WHICH CAN BE IN
LPA IF HEAVILY USED). (THIS CLIST HAS ALSO BEEN
MODIFIED TO USE THE SAME JOB CARDS AS OPTION 3.6.)
12. CLIST JH#TPRGM PROVIDES A PANEL TO RUN IEHPROGM
FOREGROUND. TO USE IT ADD THE FOLLOWING ENTRY TO A
SELECTION PANEL:
NN,'CMD(%JH#TPRGM PANEL(JHTEP0M)
PANEL2(JHTEP0M2) SKEL(JHTES0M))'
13. PROGRAM JH#EDTMP PUTS THE USER INTO EDIT OF AN ISPF
TEMPORARY CONTROL DATA SET (ISPCTLN). IT SUPPORTS
VIO AS WELL AS DASD DATA SETS. IF NO PARM IS
SUPPLIED, THE DATA SET ASSOCIATED WITH THE CURRENT
LOGICAL SCREEN IS USED. TO ACCESS THE DATA SET
USED BY THE PDF SUBMIT COMMAND, USE A PARM OF 0
(ZERO). THIS PROGRAM MAY BE INVOKED VIA THE ISPF
SELECT SERVICE FROM ANOTHER DIALOG FUNCTION. AN
ENTRY MAY ALSO BE PLACED IN A COMMAND TABLE:
VERB T ACTION
EDTEMP 3 SELECT PGM(JH#EDTMP) PARM(&ZPARM)
NEWAPPL(ISR)
THEN A USER CAN ENTER THE EDTEMP COMMAND ON ANY
SCREEN AND EDIT THE DATA SET.
CONTENTS OF THIS PDS:
SOURCE: JH#EDTMP
JH#GTDSN
JH#PDF8
MACROS: ENTER
ISPCALL
LEAVE
REQUS
SCANLINE
JCL: $INSTALL (COPY ISPF COMPONENTS AND
ASSEMBLE PROGRAMS)
$LOAD (SAMPLE JCL TO LOAD
DISTRIBUTION LIB FROM TAPE)
CLISTS: SEE IEBCOPY STATEMENTS IN $INSTALL
MEMBER
PANELS: SEE IEBCOPY STATEMENTS IN $INSTALL
MEMBER PLUS MODIFIED ISR^PRIM
SKELETONS: SEE IEBCOPY STATEMENTS IN $INSTALL
MEMBER
MESSAGES: SEE IEBCOPY STATEMENTS IN $INSTALL
MEMBER
CONTAINS A PROGRAM DEVELOPED AT GRUMMAN WHICH PRINTS
THE CURRENT SYSTEM CONFIGURATION . MEMBER ' CONFJCL '
IS SAMPLE JCL .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
CONTAINS SOME UTILITIES FROM GRUMMAN DATA SYSTEMS
1 MCOREZAP IS A PROGRAM TO ZAP COMMON AREAS OF
VIRTUAL MEMORY . IT HAS ONLY BEEN USED ON THE
NUCLUES
2 PSLSTBLD IS THE ZAP DEVELOPED TO REDUCE THE
EXCESSIVE CPU TIME CONSUMED IN NON-SPECIFIC
DEVICE ALLOCATION
3 PLSAB436 CONTAINS ONLY THE PL/S CODE FOR THE
ABOVE ZAP
4 UICMON IS A PROGRAM TO MONITOR THE UIC VALUE
RECEIVED BY AN ONLINE SYSTEM . IT IS INTENDED AS
A TOOL TO TUNE THE VARIABLE STORAGE FENCE MOD
5 VARFENCE IS GRUMMAN DATA SYSTEMS VERSION OF THE
VARIABLE STORAGE FENCE MOD . IT USES A TABLE TO
DEFINE ANY NUMBER OF FENCED ADDRESS SPACES
IS THE TSO COMMAND PROCESSOR CALLED STATE THIS TSO
COMMAND PROCESSOR WILL ISSUE A MESSAGE INDICATING
THE STATE ( STATUS ) A NAMED DATASET AND PASS A RETURN
CODE INDICATING SAME ( SIMILAR TO THE LISTDS COMMAND )
THIS COMMAND HOWEVER, WILL PASS A REURN CODE ALLOWING
A CLIST TO QUERY A DATASET'S STATE ( STATUS 0 PRIOR TO
ISSUING DELETE OR ALLOCATE COMMANDS
AN OPTIONAL PARAMETER (RETCODE) ALLOWS THE USE OF THE
RETURN CODE FEATURE WITHOUT ANY MESSAGES BEING ISSUED
STATE AS USED HERE IMPLIES STATUS OF A DATASET .
THE STATUS (EXISTS OR DOES NOT EXIST) MAY BE PASSED
TO A CLIST VIA RETURN CODES AS FOLLOWS :
RETURN CODE 0 = THE DATASET IS CATALOGED AND EXISTS
4 = THE DATASET IS CATALOGED ,
BUT DOES NOT EXIST
8 = THE DATASET IS NOT CATALOGED
IS THE PGM TO GENERATE A PTF TAPE XREF REPORT . THIS
PROGRAM WILL GENERATE FOUR REPORTS :
REPORT 01 WILL BE A LIST OF ALL THE PTF'S ON THE TAPE
REPORT 02 WILL CONTAIN A LIST OFF ALL ELEMENTS (MODULE ,
MACROS , ETC . ) ON THE TAPE AND THE PTF ' S
THAT REFERENCE THEM
REPORT 03 WILL LIST ALL THE COVER LETTERS ON THE TAPE
REPORT 04 WILL LIST ALL THE FMID ' S ON THE TAPE AND THE
PTF ' S THAT REFERENCE THOSE FMIDS
CONTAINS SEVERAL UTILITIES FROM RAINIER BANK
CDSLIST - A MODIFIED VERSION OF THE CDSLIST
PROGRAM , ORIGINALLY FROM FILE 132 OF THE
CBT TAPE . MODIFIED FOR SYSPRINT LRECL OF
150 . ALSO , A CONTROL CARD IN SYSIN OF THE
FORM FMID=XXXXXXX WILL RESTRICT THE
LISTING TO THOSE ELEMENTS OWNED BY THE
SPECIFIED FMID . THIS WAS A COPY OF CDSLIST
BEFORE IT WAS UPDATED ON 1-28-80 ( VERSION
134 OF THE CBT TAPE ) .
DISKMAPA - A PROGRAM TO ALLOCATE ALL ONLINE DASD
VOLUMES AND THEN LINK TO THE DISK MAPPING
PROGRAM DISKMAP ( FROM CBT FILE 260 ). MUST
BE LINKED AC=1 . REQUIRES DYNAM FROM CBT
FILE 89 OR THE SLIGHTLY MODIFIED VERSION
FROM THIS FILE .
DYNAM - A SLIGHTLY MODIFIED VERSION OF THE DYNAMIC
ALLOCATION INTERFACE FROM CBT FILE 89 .
HANDLES MORE OF THE ALLOWABLE ALLOCATION
KEYWORD UNITS THAN THE VERSION ON THE
TAPE .
RGROUP - FOR SHOPS THAT RUN RACF , ALLOWS THE USER
TO SWITCH TO A DIFFERENT CONNECT GROUP
WITHOUT HAVING TO LOGOFF AND LOG BACK ON
SPECIFYING THE DIFFERENT GROUP ON THE
LOGON COMMAND . BASICALLY , IT PERFORMS A
RACINIT "CHANGE" FUNCTION . MUST BE LINKED
AND EXECUTED AC=1 . CAN BE RUN IN BATCH OR
AS A TSO CP .
SPFCOPY - A PROGRAM TO COPY A " CARD-IMAGE " DATASET
OR PDS MEMBER INTO A PDS MEMBER WITH
DISP=SHR . PRESERVES DATASET INTEGRITY BY
USING AN SPF ENQUEUE/RESERVE TO LOCK OUT
OTHER RUNNING SPFCOPY PROGRAMS OR TSO
USERS WHILE THE COPY TAKES PLACE .
VTOC - A TSO CP FOR LOOKING AT VTOCS AND
OPTIONALLY SCRATCHING AND UNCATALOGING
DATA SETS . CONTAINS SOME INSTALLATION
SENSITIVE CODE , BUT SHOULD WORK WITHOUT
MODIFICATION . THE VTOC COMMAND CAN INVOKE
THE PDS COMMAND (VIA ' ALIAS ' LPDS) OR THE
RLSE COMMAND , BUT IT REQUIRES THE PCF X
FACILITY TO DO SO
MACROS - NEEDED BY VTOC
LOCUCB
REGEQU
RSAVE
RTURN
IS THE DOCUMENTATION FROM CONRAIL FOR THEIR PROGRAM
CALLED TSUPDATE WHICH IS CONTAINED IN LOAD MODULE
FORM IN FILE 035 OF THIS TAPE . THIS IS A PROGRAM
WHICH IS A VERY FLEXIBLE , DYNAMIC MASS CHANGE PDS
TO MANIPULATE PDS ' S . UNFORTUNATELY THERE IS NO
SOURCE AVAILABLE . YOU WILL FIND IF YOU EXECUTE THE
CODE THAT IT IS A PROPRIETARY PROGRAM FROM CONRAIL
BUT THEY HAVE GIVEN PERMISSION THAT IT BE PUT
ON THIS TAPE . THIS FILE IS 133 X 32718 FBA
IS A SERIES OF PROGRAMS FROM THE BRITISH COLUMBIA
SYSTEMS CORPORATION , CANADA . THIS SOFTWARE CONSISTS
OF :
A NETSOL - A VTAM RECORD MODE NETWORK SOLICITOR
B NESTOP - A VTAM PROGRAMMED OPERATOR
C NETINIT - A VTAM APPLICATION USED TO START VTAM
APPLICATIONS ONCE VTAM IS UP
THIS SOFTWARE IS CURRENTLY RUNNING AT BCSC AT MVS 3.8
AS ON 5/83 ACF/VTAM 2 ACF/NCP 2 .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND THE MEMBER
CALLED $DOC HAS ADDTIONAL INFORMATION
MEMBER DESCRIPTION
$DOC THIS MEMBER
@NETINIT VTAM APPLICATION DEFINITION FOR ' NETINIT '
@NETSOL VTAM APPLICATION DEFINITION FOR ' NETSOL '
@NETSTOP VTAM APPLICATION DEFINITION FOR ' NETSTOP '
LOGTAB VTAM INTERPRET TABLE USED BY ' NETSOL '
LOGTABA JCL TO ASSEMBLE ' LOGTAB ' . NOTE THAT
ACF/VTAM 2 ALLOWS THE INTERPRET TABLE TO GO
IN ' SYS1.VTAMLIB '.
MACROS MACROS USED BY NETSOL
NETINIT VTAM APPLICATION TO HANDLE STARTUP OF VTAM
APPLICATIONS
NETINIT$ INSTALLATION INSTRUCTIONS FOR 'NETINIT' AND
' NETSTOP '
NETINITA JCL TO ASSEMBLE ' NETINIT ' .
NETINITI SAMPLE INPUT TO ' NETINIT ' .
NETINITP SAMPLE JCL TO RUN ' NETINIT '
NETSOL VTAM RECORD-MODE NETWORK SOLICITOR
' NETSOL '
NETSOL$ INSTALLATION INSTRUCTIONS FOR 'NETSOL'
NETSOLA JCL TO ASSEMBLE ' NETSOL '
NETSOLP SAMPLE JCL TO RUN ' NETSOL '
NETSTOPI SAMPLE INPUT TO ' NETSTOP '
NETSTOPP SAMPLE JCL TO RUN ' NETSTOP '
WAS SUBMITTED FROM MEMOREX AND CONTAINS A TSO
COMMAND PROCESSOR TO INVOKE THE WATERLOO SCRIPT PGM .
THIS FILE DOES NOT CONTAIN THE WATERLOO SCRIPT
PGM . A HELP MEMBER IS ALSO INCLUDED AND THIS FILE
IS IN IEBUPDTE SYSIN FORMAT
CONTAINS THE JCL AND ZAPS FOR DMS .
THE DYNAMIC MONITOR SYSTEM MONITORS THE INTER-ACTIONS
BETWEEN THE OS/VS SYSTEM EVENTS AND THE CORRESPONDING
DYNAMICALLY ACTIVATED EVENT HANDLING ROUTINES . A
STANDARD SET OF EVENT HANDLING ROUTINES IS AVAILABLE .
THIS ROUTINE PERFORMS AN EVENT TRACE FUNCTION . DMS
WAS DEVELOPED SPECIFICALLY TO ANALYSE THE I/O
ACTIVITIES OF AN IBM/OS 370 MVS-MP SYSTEM .
A PRINCIPAL DESIGN GOAL FOR DMS IS TO KEEP THE CPU
OVERHEAD AND STORAGE REQUIREMENTS BELOW AN ACCEPTABLE
THERSHOLD , SO IT WILL BE POSSIBLE TO MONITOR AN ENTIRE
TP NETWORK DURING THE ENTIRE ONLINE OPERATION .
IN ADDITION , DMS GIVES THE SYSTEM PROGRAMMER A
CONVENIENT MEANS OF WRITING SIMPLE PROGRAMS CONTAINING
BOTH SELECTION AND DECISION LOGIC WHICH CAN BE BASED
ON A SELECTED GROUP OF SYSTEM EVENTS . THE TIME STAMP
FROM THE TIME OF DAY CLOCK GIVES THE POSSIBILITY TO
CREATE REPRODUCABLE TIME MEASUREMENTS .
DMS IS A HELPFULL TOOL FOR PROBLEM DETERMINATION
CONTAINS THE DOCUMENTATION FOR DMS
CONTAINS THE NON-MVS/SE SOURCE FOR DMS . FILE IS
IN IEBUPDTE FORMAT
CONTAINS THE NON-MVS/SE LOAD MODULES FOR DMS
CONTAINS THE MVS/SE RELEASE 1 SOURCE FOR DMS . THIS
FILE IS IN IEBUPDTE FORMAT
CONTAINS THE MVS/SE RELEASE 1 LOAD MODULES FOR DMS
IS THE MTRACE EXIT TO PRINTDUMP . ITS FUNCTION IS TO
FORMAT THE MASTER TRACE TABLE FOR AN SVC OR STANDALONE
DUMP . IT WILL 1ST CHECK TO MAKE SURE THAT THE SYSTEM
HAS SU64 INSTALLED AND THE MASTER TRACE IS ACTIVE . THE
OUTPUT WILL BE IN ' REVERSE ' ORDER DUE TO THE FACT
THAT THE MASTER TRACE IS A BACKWARD WRAP-AROUND TABLE
IS CBT224 WITH FILE 29 PRODUCES CSECTS WITHIN MODULES
FOR SMP FROM A SET OF DLIBS
IS CBT225 WITH FILE 28 PRODUCES CSECTS WITHIN MODULES
FOR SMP FROM A SET OF DLIBS
IS MVS FREEALL WHICH WILL SHOW THE NAMES OF THE FILES
THAT ARE FREED
IS MVS FREEALL WHICH IS THE SAME AS FILE 30 EXCEPT
THAT IS WILL NOT SHOW THE NAMES OF THE FREED FILES
CONTAINS AN ACF2 SECURITY EXIT FOR NCCF FROM ROHM AND
HAAS COMPANY , PA . THIS FILE IS IN IEBUPDTE
SYSIN FORMAT AND THE MEMBER CALLED $DOC CONTAINS
ADDITION INFORMATION
THIS MODIFICATION PLACES CONTROL OF IBM ' S NETWORK
COMMUNICATIONS CONTROL FACILITY ( NCCF ) LOGON SECURITY
UNDER ACF2 AND PROVIDES A BASE ON WHICH FURTHER ACF2
CONTROL OF NCCF FUNCTIONS MAY BE IMPLEMENTED . IT WAS
DEVELOPED USING NCCF RELEASE 2 BUT SHOULD BE APPLICABLE
TO EARLIER RELEASES AS WELL .
THE FOLLOWING MEMBERS OF THIS LIBRARY ARE PARTS OF THE
NCCF LOGON SECURITY MODIFICATION :
DSIEX14 THE NCCF NORMAL LOGOFF EXIT
LIDREC SMP FORMAT CHANGES TO USERLID AND
ACFFDR MEMBERS OF ACFMAC
M99A0N THE NCCF LOGON SECURITY FRONTEND MODULE
RH00026 SMP FORMAT UPDATE TO NCCF MACRO DSIPSS
RH00027 SMP FORMAT ADDITION OF M99A0N AND JCLIN
FOR DSILAN
ALL OTHER MEMBERS ARE MACROS REQUIRED TO ASSEMBLE
DSIEX14 AND/OR M99A0N . ASSEMBLY OF M99A0N AND DSIEX14
REQUIRES ACFMAC AND THIS LIBRARY IN THE ASSEMBLER
SYSLIB CONCATENATION .
LIDREC
THE LIDREC SMP CHANGES ADD THREE FIELDS TO THE USERLID
PORTION OF THE LIDREC AND DEFINITIONS OF THESE FIELDS
TO THE ACF2 FIELD DEFINITION RECORD ( FDR >) . THESE
FIELDS ARE USED TO CONTROL WHO MAY LOGON TO NCCF AND
WHAT LOGON OPTIONS ARE AVAILABLE .
M99A0N
M99A0N IS THE FRONTEND CODE FOR THE NCCF NORMAL LOGON
VALIDATION MODULE , DSILAN . WHEN IT RECEIVES CONTROL ,
IT ALLOCATES A PRIVATE DATA AREA WHICH IS CHAINED FROM
THE NCCF TASK VECTOR BLOCK ( TVB ) USER FIELD , TVBUFLD ,
AND CONTAINS THE ACF2 REQUEST PARAMETER LIST , MESSAGE
BUFFER , AND POINTERS TO THE ACMCB AND LIDREC FOR THE
LOGGED ON USER . M99A0N THEN PROCEEDS TO PRE-VALIDATE
THE LOGONID AND PASSWORD ENTERED ON THE NCCF LOGON
SCREEN AND CALLS ACF2 TO VALIDATE THE LOGONID/PASSWORD
COMBINATION AND RETURN THE APPROPRIATE LIDREC . IF THE
COMBINATION IS VALID , THE PASSWORD ENTERED BY THE USER
IS CHANGED TO A CONSTANT ' A ' SO THAT THE NCCF DSIOPF
MEMBER NEED NOT BE MAINTAINED FOR PASSWORD CHANGES AND
THE NCCF LOGON CONTROL BIT IN THE LIDREC IS CHECKED TO
ASSURE THAT THE LOGONID IS APPROVED TO USE NCCF .
WITH THE LIDREC AVAILABLE, M99A0N CHECKS FOR ENTRY OF
AN NCCF PROFILE NAME ON THE LOGON SCREEN . IF ONE IS
ENTERED , A BIT IN THE LIDREC IS TESTED FOR AUTHORITY TO
ENTER A PROFILE NAME . IF NO PROFILE NAME IS ENTERED,
THE PARSE DESCRIPTOR BLOCK ( PDB ) FOR THE LOGON COMMAND
AND THE LOGON COMMAND BUFFER ARE ALTERED TO CONTAIN THE
DEFAULT PROFILE NAME FROM THE LIDREC .
M99A0N ALSO VALIDATES THE HARDCOPY DEVICE NAME FROM THE
LOGON COMMAND. IF THE DEVICE NAME IS ' NO ' , IT IS
ELIMINATED FROM THE PDB. IF THE DEVICE NAME IS ' YES ' ,
THE LIDREC HARDCOPY DEVICE FIELD IS TESTED FOR AN
ENTRY ; IF THE LIDREC HARDCOPY DEVICE FIELD CONTAINS A
DEVICE NAME , IT IS SUBSTITUTED IN THE PDB AND COMMAND
BUFFER FOR THE WORD ' YES ' ; IF THE LIDREC HARDCOPY
DEVICE FIELD CONTAINS NO ENTRY , THE REQUEST FOR
HARDCOPY LOGGING IS REJECTED . IF THE DEVICE NAME
ENTERED IN THE LOGON COMMAND IS NEITHER ' YES ' NOR ' NO ' ,
IT IS ASSUMED TO BE A DEVICE NAME AND A BIT IN THE
LIDREC IS TESTED FOR AUTHORITY TO ENTER A HARDCOPY
DEVICE NAME .
IF ALL LOGON VALIDATION CHECKS ARE PASSED SUCCESSFULLY,
CONTROL IS PASSED TO DSILAN WITH NO EVIDENCE OF
M99A0N ' S EXISTENCE EXCEPT THE PRIVATE DATA AREA CHAINED
FROM TVBUFLD . THIS DATA AREA IS AVAILABLE TO ALL OTHER
NCCF FUNCTIONS FOR THE USER AND ITS POINTERS TO ACF2
DATA AREAS MAY THEREFORE BE USED TO IMPLEMENT
ADDITIONAL ACF2 CONTROL OF NCCF FUNCTIONS . IF THE
LOGON ATTEMPT FAILS VALIDATION, CONTROL IS RETURNED TO
M99A0N ' S CALLER AFTER RELEASING ALL RESOURCES ACQUIRED .
A CONSEQUENCE OF THIS APPROACH IS THAT ALL POSSIBLE
VALID COMBINATIONS OF LOGON PARAMETERS MUST BE DEFINED
IN NCCF ' S PARAMETER MEMBERS SO THAT A LOGON ATTEMPT
WHICH PASSES M99A0N VALIDATION IS GUARANTEED TO PASS
DSILAN ' S VALIDATION . THE EASIEST WAY TO PROVIDE THIS
GUARANTEE IS TO DEFINE ALL OPERATORS WITH ALL POSSIBLE
PROFILE NAMES AND LET M99A0N CONTROL THE SITUATION .
THE SAME IS TRUE FOR HARDCOPY DEVICES ; NCCF SHOULD KNOW
ALL POSSIBLE HARDCOPY DEVICE NAMES .
NOTE THAT THE LOGONID USED BY THE NCCF STARTED TASK
MUST HAVE THE MUSASS AND NO-SMC ATTRIBUTES .
DSIEX14
DSIEX14 IS THE NCCF NORMAL LOGOFF EXIT . ITS FUNCTION
IN THE MODIFICATION IS TO RELEASE THE PRIVATE DATA AREA
AND ACF2 RESOURCES ACQUIRED BY M99A0N WHEN THE USER
LOGGED ON . IT SHOULD BE PLACED IN A LINKLIST LIBRARY
FOR LOADING BY NCCF .
RH00026
RH00026 IS A MODIFICATION TO NCCF MACRO DSIPSS ( THIS IS
THE ONLY ACTUAL MODIFICATION OF NCCF DISTRIBUTED CODE
CONTAINED IN THIS MOD ) TO SUPPORT THE RESTORE PARAMETER
OF THE OPTIONS KEYWORD . THIS PARAMETER IS USED
INTERNALLY BY DSILAN AND IS SUPPORTED BY THE PL/S
VERSION OF THE DSIPSS MACRO BUT NOT BY THE DISTRIBUTED
ASSEMBLER VERSION OF THE MACRO . THIS USERMOD SHOULD BE
INSTALLED BEFORE M99A0N IS ASSEMBLED OR AN MNOTE WILL
BE ISSUED FOR THE DSIPSS MACRO INSTRUCTION IT CONTAINS .
RH00027
RH00027 IS THE SMP INSTALLATION OF MODULE M99A0N AS A
FRONTEND TO DSILAN . IT CONTAINS JCLIN TO INFORM SMP OF
THE NEW LINKAGE EDIT REQUIREMENTS FOR DSILAN .
IS FROM THE LIBRARY OF CONGRESS AND CONTAINS A COPY
OF THEIR IEECVXIT . SEE THE CODE FOR ADDITIONAL
INFORMATION
FUNCTION : THIS PROGRAM IS USED USED AS AN MCS
EXIT . IT CAN MINIPULATE CONSOLE
MESSAGES OR TRIGER AN EVENT BECAUSE OF A
CONSOLE MESSAGE BEING ISSUED .
THIS ROUTINE HAS TWO INTERNAL SUBROUTINES :
IEECR2D2 IS A SUBROUTINE THAT OPERATES
UNDER SRB MODE . IRBROUT IS A SUBROUTINE
THAT REQUESTS SVC 34 FUNCTIONS UNDER AN IRB
THAT BELONGS TO ' CMD1 ' . ' CMD1 ' IS A TASK
THAT IS ALWAYS RUNNING . ( IN OUR SHOP ' CMD1 '
IS STARTED AT IPL , AND PERFORMS A WAIT THAT
IS NEVER POSTED ) .
NOTES ON OPERATION : THIS ROUTINE OPERATES AS
AN MCS EXIT . IT IS CAPABLE OF PERFORMING
THE FOLLOWING FUNCTIONS :
. CHANGING ROUTING CODES ON MESSAGES SO
THAT MESSAGES CAN BE SENT TO DIFFERENT
CONSOLES THAN THOSE ORIGINALLY
REQUESTED .
. CHANGING DESCRIPTOR CODES ON MESSAGES
INORDER TO CHANGE MESSAGES TO
ROLLABLE / NON-ROLLABLE .
. DELETEING MESSAGE COMPLETELY BY CHANGING
THE ROUTING CODE TO ZERO .
. TRIGERING AN ACTIVITY ( IE . START A TASK
IF A SPECIFIC MESSAGE IS ISSUED .
. REPLY TO 'WTORS' AUTOMATICALLY
MODULE - IEECVXIT ( MCS EXIT ) REL 2.0 15 JUNE 82
THIS MCS EXIT IS BASED ON THE SOURCE FROM
' SYS1.SAMPLIB ' FROM THE IPO SYSTEM . THIS CODE
CAME BY WAY OF FAIRCHILD CAMERA CORPORATION
THROUGH THE SHARE SPLA MVSMODS TAPE .
THAT IS WHERE THE SIMILIARITY ENDS . WE NOT ONLY
WANT TO DO THE CHANGING OF ROUTCDE ' S , DESC CODES
ETC , BUT ALSO WE WANT TO DO SOME AUTOMATIC
REPLIES . WHY WAKE UP THE OPER- ATOR ??? SO FOR
THINGS LIKE WHEN VTAM IS INITIALIZED , THEN WE
ALWAYS ' S TSO '. THUS ' R2D2 ' ( ROUTINE
IEECR2D2 ) IS NOW ALIVE AND DOING GOOD THINGS .
EVER GET AN OPERATOR TO REPLY ' HOLD ' TO THAT
NASTY ALLOCATION MESSAGE AND MAKES YOU 3033 LOOK
LIKE IT IS RUNNING OS/MVT ( Q4 IS LOCKED ) . SO
THERE ARE ALL KINDS OF POSSIBILITIES. HOPEFULLY
THE DIRTY WORK IS DONE . GOOD LUCK ALL
NOTE : MODULE IS REENTRANT AND SHOULD STAY THAT
WAY
----- IMPORTANT INSTALLATION NOTE ----- ( JTS-CDC )
THERE ONCE WAS AN APAR DESCRIBING A DISTRIBUTION
ERROR FOR THE BASE MVS 3.7 SYSTEM . APAR OZ45469
DESCRIBES IT . MODULE IEECVXIT ( DUMMY BR14 MCS
EXIT ) WAS DISTRIBUTED ON SYS1.AOSC5 WITH THE LKED
ATTRIBUTES OF ' NONE ' INSTEAD OF ' RENT ' AND ' REFR '*
AS IT SHOULD HAVE BEEN . DURING STAGE 2 OF THE
SYSGEN PROCESS , THIS MODULE ALONG WITH THREE
OTHERS ( IEAVVWTO & IEAVMWTO ON AOSC5 AND IGC0203E
ON AOSB3 ) WERE INCLUDED TOGETHER TO PRODUCE
MODULE IGC0003E ON LPALIB . ALTHOUGH THE OTHER
THREE MODULES WERE SHIPPED WITH ' RENT ' AND ' REFR '
AS THEY SHOULD HAVE BEEN , THE IEECVXIT MODULE
ATTRIBUTE OF ' NONE ' CAUSE THE FINAL IGC0003E
MODULE TO BE GENERATED AS ' NOT RENT ' AND ' NOT
REFR ' . IGC0003E RUNNING SERIAL MODE DOES LITTLE
FOR SYSTEM PERFORMANCE SINCE IT IS IN CONTROL FOR
EVERY CONSOLE MESSAGE ISSUED . APAR OZ45469 WAS
CLOSED AS ' SUGGESTED SYSTEM IMPROVEMENT ' AND
EVENTUALLY , MVS 3.8 WAS SHIPPED CORRECTLY ,
HOWEVER , THE IPO FOLKS MANAGED TO MAKE THE SAME
MISTAKE WITH IEECVXIT AND AS FAR AS WAS KNOWN BY
TAMPA BAY AS OF 5/27/82 ( SEE PROBLEM 5X333 ), THE
IPO ERROR HAD NOT BEEN OFFICIALLY APARED , BUT
LEVEL 2 INDICATED AWARENESS OF THE ERROR AND
PROMISED TO CORRECT THE DISTRIBUTED CODE ON
FUTURE SHIPS . THE CIRCUMVENTION , OF COURSE , IS
TO ZAP THE ATTRIBUTE OF IEECVXIT ON AOSC5 AND
IGC0003E ON LPALIB TO ' RENT ' & ' REFR ' . WE HAVE
DONE THIS WITHOUT INCIDENT AT CDC .
IS THE SOURCE FOR THE DUMMY GHOST ROUTINES FOR APEMAN
IS A LOAD MOUDLE LIBRARY WITH SEVERAL PROGRAMS WITHIN
SOURCE FILE LOAD MODULE NAME
018 DOCUMENTATION TSUPDATE
038 SOURCE BPAGE STARTREK
038 SOURCE CPAGE STARTREK
038 SOURCE QTIME STARTREK
038 SOURCE QDATE STARTREK
038 SOURCE DEDUCT STARTREK
038 SOURCE RANKING STARTREK
038 SOURCE ST79INIT STARTREK
038 SOURCE SUPRTREK STARTREK
112 SOURCE $VTOC
128 SOURCE ADVENT
145 SOURCE CPU FROM HOBART
182 SOURCE PDSXXX
255 SOURCE RMFPP
294 SOURCE VSAMADTL VSAMANAL
294 SOURCE VSAMAGET VSAMANAL
294 SOURCE VSAMAHLP VSAMANAL
294 SOURCE VSAMANAL VSAMANAL
294 SOURCE VSAMANDX VSAMANAL
294 SOURCE VSAMSIZE VSAMANAL
299 SOURCE TAPEMAP
317 SOURCE ADL STATDIE SYSTEM
317 SOURCE AMDPRSEG STATDIE SYSTEM
317 SOURCE ASMTOZAP STATDIE SYSTEM
317 SOURCE COMWAIT STATDIE SYSTEM
317 SOURCE LINKER STATDIE SYSTEM
317 SOURCE LOADPTR STATDIE SYSTEM
317 SOURCE PLIMISC STATDIE SYSTEM
317 SOURCE PTRIN STATDIE SYSTEM
317 SOURCE PTROUT STATDIE SYSTEM
317 SOURCE SDL STATDIE SYSTEM
317 SOURCE STATDIE STATDIE SYSTEM
317 SOURCE STATPOST STATDIE SYSTEM
317 SOURCE STATSTDE STATDIE SYSTEM
317 SOURCE STATUTL STATDIE SYSTEM
317 SOURCE STCK STATDIE SYSTEM
317 SOURCE SVC STATDIE SYSTEM
317 SOURCE TCAPTR STATDIE SYSTEM
317 SOURCE TODCNVRT STATDIE SYSTEM
317 SOURCE TODCNVT STATDIE SYSTEM
318 SOURCE ANALYSIS PACKER SYSTEM
318 SOURCE DIRECT PACKER SYSTEM
318 SOURCE GENCNTS PACKER SYSTEM
318 SOURCE LPAMAP PACKER SYSTEM
318 SOURCE MODMAP PACKER SYSTEM
IS A COLLECTION OF AMDPRDMP EXITS AND ZAPS REQUIRED
FOR PUT8004 LEVEL . THIS FILE IS FROM SHERING-PLOUGH
AND IS IN IEBUPDTE SYSIN FORMAT
IS AN MVS VERSION OF COPYCAT TO MOVE , SPLIT , AND/OR
REORGANIZE CVOLS CATALOGS . THIS VERSION RUNS UNDER
MVS AND THE RESULTANT CVOL MAY BE LISTED WITH IEHLIST
THIS VERSION HAS 3380 AND 3375 SUPPORT ADDED FROM
UCLA . THIS FILE IS IN IEBUPDTE SYSIN FORMAT SEE THE
MEMBER CALLED $$DOC FOR ADDITIONAL INFORMATION .
$CBTJCL .. THE JCL USED AT CBT TO INSTALL
$MANUAL .. THE COPYCAT MANUAL
$UCLAJCL . THE JCL USED AT UCLA TO INSTALL
COPYCAT .. COPYCAT CODE ITSELF
FIX1 .. FIX ESATE01 - CONVERTS COPYCAT FROM STAE TO
ESTAE USE AND CORRECTS AN S30A ABEND THAT
OCCURS FOLLOWING AN X37 ABEND
FIX2 ..... FIX XCP200 - CORRECTS AN S200 ABEND THAT
INTERMITTENTLY OCCU IN COPYCAT AFTER AN
'X37' ABEND DUE TO ALL OF THE I/O NOT HAVING
COMPLETED BEFORE SVC55 IS ISSUED FOR AN
END-OF-VOLUME INDICATION .
OAC1 ..... FIX DEV3380 - ADDS 3380 SUPPORT TO COPYCAT
OAC2 ..... FIX HASH001 - UCLA LOCAL MODE . SEE MEMBER
FOR ADDITIONAL INFORMATION
IS A SERIES OF THREE PROGRAM FROM FEDERAL EXPRESS
01 SMPSEL - A PROGRAM THAT ' S BEEN FOUND TO BE
VERY USEFUL IN APPLYING MAINTENANCE TO MVS ,
EXPECIALLY WITH PUT . YOU CAN SELECT EVERY
SYSMOD IN THE PTS THAT IS APPLICABLE TO A
PARTICULAR FMID . THIS CAN THEN BE USED TO
AUGMENT THE EXCLUDE LIST
02 PROGDQUE - A PROGRAM THAT WILL BUILD THE PRINT
QUEUE DATASET FOR THE TSO/VTAM VERSION OF DSPRINT
IT REPLACES THE USE OF IEBDG TO INITIALIZE THE
DATASET . IT IS MUCH FASTER AND EASIER TO USE ,
EXPECIALLY FOR LARGE NUMBER OF PRINTERS
03 SUPRTREK - AN ADVANCED VERSION OF STARTRE
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
BPAGE CPAGE DEDUCT QDATE QTIME RANKING
ST79INIT SUPRTREK . YOU NEED FORTRAN H TO COMPILE
THIS CODE , IT APPEARS THAT FORTRAN G1 WORKS BUT
IT DOES NOT PROPERLY RUN AFTER A G1 COMPILE
CONTAINS SEVERAL PROGRAMS , TSO COMMAND PROCESSORS ,
MACROS , ETC ., FROM A MIDWESTERN INSTALLATION . THIS
FILE IS IN IEBUPDTE SYSIN FROMAT . SEE THE MEMBER
CALLED $$$DOC FOR ADDITIONAL INFORMATION
IS A SP1.3 VER OF DIDOCS FROM DANIEL INTERNATIONAL
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
IS THE CHIMP MVS MONITOR
TO INSTALL THIS MONITOR ASSEMBLE AND LINKEDIT IT INTO
A LINK-LIST LIBRARY . THEN FROM TSO JUST CALL IT
FROM A 3270 TUBE
SEE THE ACTUAL CODE FOR HOW TO CHANGE DISPLAYS .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT AND CONTAINS AN
MVS/SE VERSION AND A NON-MVS/SE VERSION
IS AN IEBUPDTE STREAM FROM KAISER PERMANENTE OF THE
USER MODIFICATIONS THAT THEY HAVE APPLIED TO THEIR
SYSTEM
IS THE SAMPLE OUTPUT FROM KAISER'S IEFACTRT SMF EXIT
THE SOURCE IS IN FILE 42 . LRECL=133,BLKSIZE=32718
IS FROM KAISER AND CONTAINS CLISTS FOR THE PGMS IN
FILE 42 . IT IS IN IEBCOPY FORMAT
IS AN ENHANCEMENT TO THE YALE COMPARE PROGRAM THAT IS
IN FILE 226 OF THIS TAPE . THE PUPOSE OF THIS CODE IT TO
ALLOW THE COMPARE PGM TO PROCESS TWO PDS FILES RATHER
THAN TWO SEQUENTIAL FILES THE PROGRAM IS SELF CONTAINED
SIMPLY ASSEMBLE AND LINK AND IT ' S READY TO USE .
ADDITIONAL INFORMATION ON HOW TO USE THE PROGRAM IS
CONTAINED AS COMMENTS AT THE BEGINNING OF THE CODE
ITSELF . ALSO INCLUDED IS THE JES2 SOURCE COMPARE SYSTEM
COMPONENTS OF THIS FILE :
$$DOC - DOCUMENTATION OF THE JES2 COMPARE SYSTEM
PDSCMPR - ORIGINAL PDS COMPARE PROGRAM
JES2 SOURCE COMPARE SYSTEM
JES2CMPR - AN ASSEMBLY LANGUAGE PROGRAM THAT
IS A MODIFICATION OF THE PDSCMPR
PROGRAM . THIS PROGRAM CREATES A
PDS THAT CONTAINS ALL OF THE
CHANGES BETWEEN TWO RELEASES .
JES2LIST - AN ASSEMBLY LANGUAGE PROGRAM THAT
READS THE ABOVE PDS , THE SYSPRINT
OUTPUT FROM THE ASSEMBLER AND
PRINTS A NEW ASSEMBLY LISTING
SHOWING WERE CHANGES HAVE
OCCURRED
CMPRPDS - A JCL STREAM THAT EXECUTES JES2CMPR
JES2ASM2 - A PROC THAT EXECUTES
THE ASSEMBLER AND THEN JES2LIST TO
CREATE THE POST ASSEMBLY LISTING
ASM88888 - A JCL STREAM THAT ASSEMBLES ALL OF
THE JES2 MODULES
THIS FILE IN IS IEBUPDTE SYSIN FORMAT
IS THE MASS MUTUAL DISK PACK MAINTENANCE
PROGRAM IT ' S ONLY FUNCTION IS TO EXAMINE THE
VTOC OF A PARTICULAR VOLUME AND SCRATCH THE
DATASETS SPECIFIED . THE UNCATALOG ONLY OCCURS
IF THE DATA SET IS CATALOGUED ON THE VOLUME
CURRENTLY BEING EXAMINED . IF IT IS A MULTI
VOLUME DATA SET IT IS NOT SCRATCHED OR
UNCATALOGUED . THIS PROGRAM HAS BEEN USED ON
3330 AND 3350 DEVICES . IT HAS BEEN RUN UNDER
MVS 3.8 VANILLA AND MVS 3.8 SP1 . IT MUST RUN
AUTHORIZED AND THE USER MUST HAVE OPERATOR
AUTHORIZATION . THE PROMPT SCREEN ALLOWS YOU
TO ENTER THE VOLSER YOU WISH TO EXAMINE AND
THE SCAN DATE . A FULL SCREEN OF DATA SETS CAN
BE SCRATCHED AT A TIME . HITTING THE ENTER KEY
PAGES YOU FORWARD THROUGH THE VTOC .
ADDITIONAL INFORMATION MAY BE FOUND IN THE COMMENTS
OF THE CODE ITSELF
IS A COPY OF IEAIPS00 FROM STANDARD OIL ' S
MVS/SE ' S SYSTEM
IS THE LISTVOL CP FOR TSO FOR MVS
IS THE LISTSPC CP FOR TSO FROM MVS
IS LOCINDEX SUBROUTINE NEEDED FOR FILES 048 & 049
IS THE HELP DATA SET FOR LISTVOL AND LISTSPC
( CONTAINED IN FILES 48 AND 49 )
IS THE MACHINE-READABLE SOURCE FOR 'MVS IS BREAKING
MY HEART' SINCE ITS ORIGINAL RELEASE IN 1975 , THE
PRODUCT HAS HAD ONLY ONE SERVICE UPDATE AND THAT WAS
AN RPQ RATHER THAN A BUG ( IDENTIFIED IN THE TEXT
AS BWM78311 )
CHKDUMPS SOURCE . THIS PROGRAM DISPLAYS THE TITLE OF
EACH FULL SYS1.DUMP DATA SET , ALONG WITH THE TIME
AND DATE WHEN THE DUMP OCCURED . ALL OUTPUT IS
DIRECTED TO THE OPERATOR ' S CONSOLE .
A MODULE OF THE AMDPRDMP UTILITY IS NEEDED TO CONVERT
THE TIME-OF-DAY CLOCK FORMAT TIME STAMP INTO JULIAN
DATE AND 24 HOUR TIME .
TO DO THIS THE PROGRAM MUST BE LINKED TOGETHER WITH
THE AMDPRDMP MODULE NAMED AMDPRESEQ .
SOURCE FOR AMDPRSEG CAN BE FOUND IN COMP
LIBRARY 5752-SC113 ON THE SOURCE TAPES DISTRIBUTED
BY IBM . TO COMPENSATE FOR THE TIME ZONE VARIANCES
ONE INSTRUCTION MUST BE NOP-ED . IN REL 3 THIS IS
WITH THE SEQ NUMBER 01322000 .
THE JCL TO EXECUTE THIS PROG IS AS FOLLOWS ,
//S1 EXEC PGM=CHKDUMPS
//IN01 DD DSN=SYS1.DUMP01,DISP=SHR,FREE=CLOSE
//IN02 DD DSN=SYS1.DUMP02,DISP=SHR,FREE=CLOSE
//IN03 DD DSN=SYS1.DUMP03,DISP=SHR,FREE=CLOSE
//IN04 DD DSN=SYS1.DUMP04,DISP=SHR,FREE=CLOSE
//IN05 DD DSN=SYS1.DUMP05,DISP=SHR,FREE=CLOSE
//IN06 DD DSN=SYS1.DUMP06,DISP=SHR,FREE=CLOSE
//IN07 DD DSN=SYS1.DUMP07,DISP=SHR,FREE=CLOSE
//IN08 DD DSN=SYS1.DUMP08,DISP=SHR,FREE=CLOSE
//IN09 DD DSN=SYS1.DUMP09,DISP=SHR,FREE=CLOSE
IS THE ZAP FOR CHKDUMPS
LPAREA SOURCE CODE . THIS MODULE IS STARTED FROM THE
CONSOLE AND TAKES A LOAD MODULE NAME AND GIVES THE
ENTRY POINT ADDRESS OF THE MODULE . IT ALSO TELLS
THE ADDRESS OF THE START OF THE MLPA ADDRESS
VCOREZAP SOURCE . THIS MODULE PERMITS THE ALTERATION
OR DISPLAY OF STORAGE LOCATIONS IN THE NUCLEUS , THE *
CSA, OR THE PLPA/MLPA . FOR INFORMATION ON HOW THE
PROGRAM WORKS ISSUE A START COMMAND FOR THE JOB AND
REPLY ' EXP ' TO THE WTOR
CONTAINS PANSPOOL WHICH IS A JES2 SYSMSG SPOOLING
SYSTEM . LARGE COMPUTING SYSTEMS ENCOUNTER PROBLEMS
IN PRINTING , REVIEWING AND STORING LARGE QUANTITIES
OF PRODUCTION JCL LISTINGS . PANSPOOL IS A JES2
EXTERNAL WRITER THAT INTERCEPTS ALL PRODUCTION JCL
LISTINGS AND ROUTES THEM TO A PANVALET LIBRARY . THE
LISTINGS ARE KEPT ONLINE FOR A SPECIFIED NUMBER OF
DAYS AND THEN ARCHIEVED TO TAPE FOR AN ADDITIONAL
PERIOD . FAILED JOBS ARE IDENTIFIED TO ELIMINATE THE
POSSIBILITY OF UNDETECTED FAILURES . JCL LISTINGS CAN
BE DISPLAYED OR PRINTED VIA A CLIST FROM TSO . FOR
FURTHER INFORMATION SEE THE MEMBERS CALLED $DOC AND
#INDEX .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
SEE ALSO FILE 067 FOR AN UPDATED VERSION
CONTAINS SEVERAL PROGRAMS , TSO COMMAND PROCESSORS ,
MACROS , ETC ., FROM THE FLORIDA POWER & LIGHT CO .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT . SEE THE
MEMBER CALLED $$$DOC FOR MORE INFORMATION
SYSTEMS WHICH SUPPORT EXECUTION OF THE TMP IN THE
BACKGROUND WILL SUPPORT DVOL , DSN , DENQ , AND DSAT
( EXCEPT PDS OPTION ) UNDER THE TMP AS BATCH JOBS .
MVS SYSTEMS WHICH ALSO SUPPORT BACKGROUND DYNAMIC
ALLOCATION WILL SUPPORT ALL OF THE TSO COMMANDS UNDER
THE TMP AS BATCH JOBS .
THE SOURCE FOR DSAT , DVOL , DSN / DENQ , AND FREEALL IS
OPERATING SYSTEM DEPENDENT . THE PROPER OPERATING
SYSTEM MUST BE SPECIFIED AS THE VALUE FOR &OPSYSTM
BEFORE ASSEMBLING . THE REMAINING PROGRAMS ARE
OPERATING SYSTEM INDEPENDENT ( MVT SVS MVS ).
THE MVT ASSEMBLER F WILL NOT ASSEMBLE SOME OF THE
MACROS PROPERLY . THE SVS AND MVS ASSEMBLER XF , THE H
ASSEMBLER , AND SOME VERSIONS OF THE G ASSEMBLER WILL
ASSEMBLE THE MACROS WITHOUT ERROR . THE F ASSEMBLER
DOES NOT RECOGNIZE THE &SYSDATE AND &SYSTIME SYSTEM
VARIABLE SYMBOLS IN THE $ENTER MACRO AND DOES NOT
ALLOW THE MNOTE STATEMENT BEFORE THE LOCAL AND GLOBAL
SYMBOL DEFINITIONS IN SEVERAL OF THE MACROS .
THE FOLLOWING IS A BRIEF DESCRIPTION OF THE MEMBERS IN
THIS PDS .
MORE DETAILED DOCUMENTATION IS INCLUDED IN COMMENT
STATEMENTS IN EACH SOURCE PROGRAM AND MACRO .
MACROS REQUIRED TO ASSEMBLE PROGRAMS
$ENTER ENTRY LINKAGE
$CALL INVOKE A SUBROUTINE
$RTRN RETURN LINKAGE
#CTGPL MAP A VSAM CATALOG PARAMETER LIST
#SORT SORT A TABLE
#TSOBLKS CONSTRUCT TSO CONTROL BLOCKS
#TSOMSG CONSTRUCT TSO PUTLINE MESSAGE
#VTCFMT1 DESCRIBE A FORMAT 1 DSCB
#VTCFMT3 DESCRIBE A FORMAT 3 DSCB
#VTCFMT4 DESCRIBE A FORMAT 4 DSCB
#VTCFMT5 DESCRIBE A FORMAT 5 DSCB
IKJATRCB IBM MACRO TO MAP ATTRIBUTE CONTROL
BLOCK ( NOT DISTRIBUTED WITH MVT )
THE FOLLOWING MACROS MAY BE HELPFUL , BUT ARE
NOT REQUIRED TO ASSEMBLE THE OTHER PROGRAMS
#UCS GENERATE UCS CHARACTER IMAGES
IKJEBEST IBM PRIVATE MACRO TO GENERATE TSO
EDIT SUBCOMMAND TABLE
TESTMACS IBM PRIVATE MACROS USED TO INSTALL
AND ASSEMBLE TEST SUBCOMMANDS
( AVAILABLE FROM OPTIONAL MATERIAL )
BRKELEM BREAK ELEMENT DESCRIPTION
IKJEGDBE
IKJEGDME
IKJEGSIO SET OF I/O MACROS
IKJEGSPL
IKJEGSUB GENERATE SUBCOMMAND TABLE
IKJEGSVB
IKJEGSVQ
IKJEGS6A
IKJEGS9G
IKJPARMA DESCRIBE AN ADDRESS PDE
TCOMTAB DESCRIBE TEST COMMUNICATIONS TABLE
PROGRAMS
DSAT TSO COMMAND TO DISPLAY DATA SET
ALLOCATION
DSATHELP HELP MEMBER FOR DSAT
DVOL TSO COMMAND TO DISPLAY FREE SPACE
ON DIRECT ACCESS VOLUMES
DVOLHELP HELP MEMBER FOR DVOL
DSN/DENQ TSO COMMANDS TO DISPLAY
ALLOCATIONS ON DATA SETS OR ANY
QNAME/RNAME COMBINATION
DSNHELP HELP MEMBER FOR DSN
DENQHELP HELP MEMBER FOR DENQ
FREEALL TSO COMMAND TO FREE ALL ALLOCATED
DATA SETS
FALLHELP HELP MEMBER FOR FREEALL
RLSE TSO COMMAND TO RELEASE UNUSED
SPACE FOR DISK DATA SETS
RLSEHELP HELP MEMBER FOR RLSE
MMDEL TSO COMMAND TO DELETE MULTIPLE
MEMBERS FROM A PDS
MMDLHELP HELP MEMBER FOR MMDEL
DQ ENHANCED STATUS COMMAND SHOWING
QUEUE NAME AND POSITION OR
STEPNAME IF EXECUTING ( FOR JES2
VERSION 4.0 OR 4.1 )
DQHELP HELP MEMBER FOR DQ
SS0812 FIND SUBCOMMAND OF TEST
HELP0812 HELP DATA FOR SS0812
SS0813 LISTBKPT SUBCOMMAND OF TEST
HELP0813 HELP DATA FOR SS0813
SS0104 TAPE MAPPING PROGRAM
SS0278 TAPE DUPLICATION PROGRAM
SS0108 PROGRAM TO GENERATE CARDS WITH PDS
MEMBER NAMES SUBSTITUTED FOR
CONTROL CHARACTERS
SS0127 PROGRAM TO IDENTIFY UNCATALOGED
DATA SETS
SS0300 PROGRAM TO PRINT OR PUNCH MEMBERS
OF A PDS IN ALPHABETICAL OR
SELECTED ORDER
SS0136 PROGRAM TO LIST THE CHANNELS
SPECIFIED BY FCB IMAGES FOR 3211
PRINTERS
SS0272 PROGRAM TO READ A LINK MAP AND
LIST UNREFERENCED CONROL SECTIONS
DMPSPOOL PROGRAM TO DUMP INPUT JOBS FROM
JES2 RELEASE 4.0 SPOOL
UNITNAME PROGRAM TO LIST DEVICES SPECIFIED
BY EACH GENERIC AND ESOTERIC UNIT
NAME
IS THE MVS/SE DCMS USER ' S GUIDE FOR VERSION 2
2 RELEASE 3 , FEB 1979 . THIS FILE IS IN IEBGENER
FORMAT . RECFM=VBA,LRECL=137,BLKSIZE=32747
IS IN IEBUPDTE FORMAT WHICH CONTAINS THE MVS/SE
DCMS SOURCE LIBRARY VERSION 2 RELEASE 3 , FEB 79
IS IN IEBUPDTE FORMAT WHICH CONTAINS THE MVS/SE
DCMS MACRO LIBRARY VERSION 2 RELEASE 3 , FEB 79
IS A STATEMENT SAYING THAT THIS FILE SHOULD CONTAIN
THE MVS/SRM MACROS FOR MVS/SE DCMS BUT BECAUSE
OF THE COPYRIGHT LAWS IT DOES NOT . IF YOU NEED THESE
YOU MUST GET THE OPTIONAL MATERIAL FOR MVS/SE FROM
IBM . YOU HAVE TO HAVE A LICENSE FOR MVS/SE
( 5740-XE1 ) TO OBTAIN IT
IS IN IEBUPDTE FORMAT WHICH CONTAINS THE MVS/SE
DCMS OBJECT LIBRARY VERSION 2 RELEASE 3 , FEB 79
IS IN IEBCOPY FORMAT WHICH CONTAINS THE MVS/SE
DCMS LOAD MODULE LIBRARY VERSION 2 RELEASE 3 , FEB 79
CONTAINS A SERIES OF PGMS FROM B.F. GOODIRCH THEY ARE
#JC - CMD SUBSYSTEM #J REPLACEMENT . THIS #J
ALLOWS THE OPTION #JC WHICH WAITS FIVE
SECONDS AND DISPLAYS EACH JOB AND THEIR
CPU PERCENTAGE IN A FORMAT SIMILAR TO
THE NORMAL #J .
CLOKSYNC - THIS JOB ISSUES THE OPERATOR COMMAND T
TIME= TO SYNCHRONIZE THE TIMES ON TWO
LOOSELY COUPLED MACHINES . THIS JOB
NEEDS TO BE KICKED OFF ON BOTH MACHINES
AND IT COMMUNICATES THROUGH A BDAM
DATASET . ONE OF THE MACHINES WILL HAVE
ITS TIME SET TO THE OTHER MACHINES .
CMDEXEC - A PROGRAM WHICH TAKES OPERATOR COMMANDS
AS EXECUTE PARMS ISSUES THEM VIA SVC34 .
IEFUJV - SMF JOB VERIFY EXIT . THIS EXIT SCANS
EXEC JCL STATEMENTS LOOKING FOR PROC
NAMES . WHEN PROC NAMES ARE FOUND , THEY
ARE RECORDED BY WRITING AN SMF RECORD .
THIS EXIT WAS USED TO CLEAN UP OUR
PROCLIBS . WE INSTALLED THIS EXIT FOR
ABOUT SIX MONTHS , PROCESSED THE SMF
DATA , AND FOUND THAT WE COULD DELETE
ABOUT 1/3 OF OUR PROCS .
KEYVAL - A KEYWORD VALIDATION ROUTINE USED TO
PARSE KEYWORDS AND VALUES RECEIVED AS
INPUT INTO A PROGRAM . THIS PROGRAM IS
INVOKED USING TWO MACROS . THE FIRST --
KEYVAL -- IS USED TO INVOKE THE ROUTINE
AND GENERATES AN INLINE CSECT WHEN
FIRST USED . OTHER USES IN A PROGRAM
USE THE FIRST COPY . THE SECOND MACRO
-- KEYT -- IS USED TO BUILD A KEYWORD
VALIDATION TABLE THAT TELLS WHAT TO DO
WHEN A KEYWORD MATCH IS FOUND . THIS
ROUTINE IS REENTRANT . THE TWO MACROS
GIVEN HERE MAY BE USED INLINE OR PLACED
INTO A MACLIB .
SMART - SMART IS A MANUAL FORMATING PROGRAM .
SMART WILL AUTOMATICALLY PRODUCE A
TABLE OF CONTENTS , INDEX , AND CHECK THE
SPELLING OF WORDS .
WHICH - APPLICABLE TO LOOSELY COUPLED
MULTI-PROCESSING SYSTEMS . THIS PROGRAM
MAY BE EXECUTED AS A JOB STEP AND GIVES
A RETURN CODE DEPENDING ON WHICH SYSTEM
IT IS RUNNING ON . THIS RETURN CODE MAY
BE INTERROGATED BY THE COND JCL
PARAMETER ON SUBSEQUENT STEPS TO
DETERMINE IF THAT STEP IS THE RUN ON
THAT SYSTEM . USEFUL FOR DAILY
MAINTENCE JOBS , SUCH AS SMFDUMPS ETC .
THE SAME JOBNAME MAY BE EXECUTED ON
EACH SYSTEM AND ONLY THE CORRECT STEPS
WILL BE RUN DEPENDING ON THE SYSTEM .
WORDS - SPELLING WORDS DATABASE USED IN
CONJUNCTION WITH SMART .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
CONTAINS AN UPDATED QUE FROM B.F. GOODRICH
BELOW IS A LIST OF THE MODS THAT WERE MADE
1 ADDED THE $ COMMAND TO ENTER JES2 COMMANDS
2 ADDED THE XC COMMAND TO SCAN THE INCORE WQE'S
3 REPLACED BSAM WITH EXCP AS ACCESS METHOD TO
JES2 CKPT . MAKES Q RUN NOTICABLY FASTER . RUN
NOTICABLY FASTER
4 ADDED THE RM COMMAND TO INVOKE RMF
5 ADDED EXECUTING JOB CLASS TO THE XI COMMAND
6 MODIFIED FIND COMMAND TO NOT REQUIRE
DELIMITERS
7 ADDED THE CPU % AND DEMAND PAGING RATE TO THE
UPPER LEFT HAND CORNER OF THE DISPLAY
8 AUTOMATICALLY AUTHORIZE CERTAIN USERS BY
THERE LOGON ID
9 DISABLED THE XP COMMAND
10 ENABLE MESSAGES TO INTERRUPT THE SCREEN SO
THEY ARE NOTICABLE
11 CHANGE SLOG COMMAND TO ACCEPT SYSTEM SMF ID
NAMES . EX : SLOG IPO1 ( THIS WILL NEED TO BE
TAILORED TO YOUR SYSTEM AS THE NAMES ARE
HARDCODED )
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
CONTAINS A MODIFIED PANSPOOL FROM B.F. GOODRICH
THAT ALLOWS IT TO INTER-FACE WITH A KODAK KOMSTAR
MICROFILMER . THIS FILE IS IN IEBUPDTE SYSIN
FORMAT . THIS IS THE CODE THAT WAS WRITTEN UP IN
COMPUTER WORLD .
SEE FILE 057 FOR THE ORIGINAL PANSPOOL
CONTAINS MODS FROM B.F. GOODRICH TO ALLOW THE IBM
INFO SYSTEM TO ALLOW IT TO RUN IN BATCH . THIS FILE
IS IN IEBUPDTE SYSIN FORMAT
INFO/MVS INFO MVS
IS IN IEBUPDTE SYSIN FORMAT WHICH IS FROM GTE . THIS
FILE CONTAINS DOCUMENTATION AND MODIFICATIONS TO
INSTALL 43 LINE SUPPORT FOR 3278'S UNDER TCAM10 .
IT ALSO CONTAINS TSO HELP MEMBERS FOR ABEND CODES , *
DAIR CODES AND OTHER TSO ERROR CODES
SEVERAL MVS MODIFICATIONS IN SMP FORMAT THAT
HAVE BEEN RECEIVED FROM GENERAL DYNAMICS ,
SAN DIEGO, CALIFORNIA 92138 . AS WITH EVERYTHING
ON THIS TAPE USE AT YOUR OWN RISK .
THE FOLLOWING IS A LIST OF THE MODIFICATIONS FROM
GENERAL DYNAMICS THAT ARE INCLUDED IN THIS FILE .
NOTE ! . CODE THAT IS PROPRIETARY OR COPYRIGHTED IS
NOT INCLUDED EVEN THOUGH THE FOLLOWING LIST MAY IMPLY
THAT IT IS .
ALLOW DF/DSS TO RESTORE TO ALLOC/SYS VOL
DF/DSS ENQ EXIT - SKIP ENQ FOR ALL VOLS
FORCE DF/DSS TO RESTORE DSN LIKE FDRDSF
UPDATE GDG BASE LEVEL AT STEP END
MAKE '#' TAB CHARACTER FOR TSO EDIT
CAUSE CONDITIONAL DISP TO OCCUR IF JOBFAIL
LINE NUMBER ALONE WILL NOT DELETE LINE
CHANGE TSO EDIT DEFAULTS: V ON + TAB OFF
CHANGE ILRSLOTC/V TO 8/16
CHANGES TO PROGRAM PROPERTIES TABLE
DO NOT ALLOW VIO FOR LARGE DATASETS, ETC.
IMS/VS AND NETEX RESOURCE CLEANUP MOD
IEFU83 TO NOT WRITE CERTAIN RECORDS
MAKE DEFAULT TSO ALLOC DISP=SHR
BYPASS 'DATA SET NOT FREED MESSAGE'
ADD ADDITIONAL AMDPRDMP EXITS
CHANGE D U DEFAULT TO 1 UNIT
MAKE DUMP LINE COUNT 80 LINES/PAGE
OLD TSO LOGON PREPROMPT EXIT
DUMP FORMATING EXIT FROM IMS/VS
AUTOMATIC ROLL MODE MODIFICATION
FIX FOR 0C4 IN LOGDATA AMDPRDMP EXIT
MAKE PROF WTP EFFECTIVE FOR ALL TSO USERS
INSTALL STEP END STATISTICS MODULE
REMOVE BLDLS FROM EDIT AND TEST
ALLOW MVS COMMANDS UNDER TSO OPER (PART 1)
MAKE REAL DASD NOT IN VATLST PRIV/RSVD
ALLOW MVS COMMANDS UNDER TSO OPER (PART 2)
CHANGE IEALIMIT TO 128K
GRS RESOURCE NAME LIST
ALLOW TSO OUTPUT COMMAND FOR ANY JOBNAME
INSTALL TSOMON MODULE
FORCE IEECVXIT FOR ALL MESSAGES.
SUPPRESS 13E ABEND IF ATTN OUT OF OUTPUT
ALLOW BATCH 2X WAIT TIME OF TSO (JWT)
MAKE 'RETAIN' DEFAULT VOL SPECIFICATION
USE IEASYSXX AS DEFAULT (XX=F(CPU SERIAL))
ALLOW ALL TSO USERS TO ALLOCATE 3330V
ADD ABBREVIATION FOR 'QUIESCE' COMMAND
TSO SUBMIT EXIT - KILL BAD JOBNAMES
USE IEAPAKXX AS DEFAULT (XX=F(CPU SERIAL))
CHANGES TO HOT IO DETECTION CONSTANTS
SUPPLY OUR IEECVXIT (CHANGE ROUTE CODES)
ZAP TO INCREASE NUMBER OF PCCWS CREATED
ALLOW AUTHORIZED COMMANDS AND PROGRAMS
ADD X AS SUBCOMMAND OF EDIT
AUTOMATIC ROLL MODE MODIFICATION
SMF JOB INITIATION EXIT
DECREASE GVTOLINT AND GVTMEINT
INCREASE NIP SQA ALLOCATION
ACF2 PRE-VALIDATION EXIT
ACF2 VIOLATION EXIT
ACF2 LOGON POST VALIDATION EXIT
GIVE SOURCE OF PROD FOR CERTAIN LOGONIDS
COMMAND LIMITING LIST FOR ACF2
ACF2/IMS INSTALLATION OPTIONS PROD & TEST
ACF2 FDR RECORD DEFINITION
SKIP SECURITY CHECK FOR TAPES OUTSIDE TMS
PUT ACCT NUMBER IN ACF2 ACCT FIELD
ALLOW PROGRAM PATHING IN ISPF/PDF
UCC ONE (TMS)
ALLOW ISAM UPDATES WITH DISP=SHR
AUTOMATIC CVOL POINTER MODIFICATION
IF DATASET IS VIO THEN BUFNO=1
BYPASS ALLOCATION OF CVOL CATALOGS
DF/DS DASD ALLOCATION PREPROCESSING EXIT
USE UNCATDX FORM FOR UNCATALOGING
CHANGES TO SYSGEN JOBCARD MACRO
CHANGE FETCH BUFFER SIZE TO 64K
PRINT DSN AND VOLSER OF SYSLMOD
BYPASS RESERVE IF TO TEMP OR NEW DATASET
MAKE HSM MIGRATE 'LIST' DATASETS ALSO
RECALL EXIT TO FORCE DSN TO CERTAIN VOLS
PUT ACF2 SUPPORT IN FOR HSM
CHANGE JES3 DELAY MIGRATION DATE TO 2
ALLOW RECALL TO AUTOBACKUP VOLS
ALLOW JES3 TO RUN AS OTHER THAN JES3
ACF2,RINGCHK,EXPDTCHK,STARS FOR IMS,CICS
DPAP + MAKE LINES FOR STC + TSO = OUTLIM
NSL VERIFY ROUTINE
ALLOW GENERAL INQUIRY CMDS FROM RJP TERMS
UPDATE GDG BASE LEVEL AT STEP END
JOB HEADER PAGE INFORMATION
DPAP (ACCT #) VALIDATION + DSP DICT.
DO NOT ALLOW PRTY=0 TO BE RELEASED
ALLOW JES3 CMDS VIA WTO + DEST CHANGES
REROUTE MSGIAT7005 + IAT6285 TO MLOG(8I R)
MAKE ANYLOCAL SYN WITH PRT3800 + PRT3211
COMPUTE OSE PRIORITIES & CANCEL JUNK
FIX FOR ALLOC PROBLEM CAUSED BY AZ46037
COMPUTE JOB PRIORITY + CHANGE CLASS
TEMP MOD TO "DRY UP" JOB NUMBERS > 2500
JOB TRAILER PAGE INFORMATION
DON'T MLOG VERIFY MESSAGES DURING CONNECT
ALLOWS HOLD CLASS FOR NJE JOBS
ALLOWS GENERIC STATUS AND CHECKS OWNERSHIP
SMF RECORDING FOR NJE SYSOUT DATASETS
CHANGE MULTILEAVING DELAY TO .50 SECS
RETURN NEW SECOND LEVEL MESSAGE TO STATUS
PUT JULIAN DATE IN MLG MESSAGES(FROM EDSC)
DELETE TIME STAMP FROM 3277 MESSAGES
ONLY LOOK AT JOBS IN OUTSERV FOR OUTPUT
USE RQNETID IF NET = *NET-ID* FOR DJC WTO
ADD TIME STAMP TO OSE
BYPASS DESTINATION VALIDATION FOR XWTRS
PUT DATASET LINECOUNT IN SSOB FOR XWTR
ACF2 CODE FOR JCL PROCESSING
INSTALL FLASHER DSP
ADD INFO TO TYPE 26 SMF RECORD
CHANGE NJE DISPATCH PRTY TO 3 + NJESND TO 2
3767 USER OUTPUT EXIT ROUTINE
SEVERAL MVS MODIFICATIONS IN SMP FORMAT THAT
HAVE BEEN RECEIVED FROM CONNECTICUT NATIONAL BANK IN
CONNECTICUT
SEVERAL MVS MODIFICATIONS IN SMP FORMAT THAT
HAVE BEEN RECEIVED FROM C.B.T. HARTFORD ,
CONNECTICUT
IS IN IEBUPDTE SYSIN FORMAT WHICH CONTAINS A CHANNEL
ACTIVITY ANALYSIS PROGRAM AND A DISK ACTIVITY
ANALYSIS PROGRAM AND THEIR ASSOCIATED DOCUMENTATION
FROM THE NATIONAL WESTMINISTER BANK IN ENGLAND
CONTAINS 2 OUTPUT SAMPLES OF THE PROGRAMS CONTAINED
IN FILE 073 . ( RECFM=FBA LRECL=133 BLKSIZE=32718 )
IS A TSO COMMAND PROCESSOR WHICH ALLOWS THE USER TO
ACCESS AND MANIPULATE DISK DATA SETS AND DISK VOLUME
TABLE OF CONTENTS. TO MODIFY THE VTOC OF A VOLUME
THE CP MUST BE MARKED AC=1 . THE FILE IS IN IEBUPDTE
SYSIN FORMAT AND CONTAINS A HELP MEMBER AS WELL AS
THE SOURCE ITSELF
AN SQA MONITOR
SQAMON SEARCHES SQA DQE CHAIN CALCULATING SPACE
ALLOCATED AND ISSUES A MESSAGE TO THE OPERATOR
NOTIFYING HIM EACH TIME THE ALLOCATED SPACE CHANGES .
NOTE THAT CHANGES ARE NORMALLY 4K INCREMENTS AND
TIME FOR SQAMON IS 10 SECONDS .
WE RUN WITH ADDRSPC=REAL , REGION=12K AND
DISPATCHING PRIORITY OF 253
IS DOCUMENTATION FOR FILE 78 WHICH IS AN INCORE ZAP
PROGRAM . ( THIS FILE IS IN FBA FORMAT )
IS THE INCORE ZAP PROGRAM ( OBJECT DECK ONLY )
INCOREZAP IS A SERVICE AID PROGRAM AVAILABLE TO RUN
UNDER MVS . INCORZAP INSPECTS OR MODIFIES PROGRAMS IN
MAIN STORAGE WITHOUT MODIFYING THE ORIGINAL COPY OF
THE PROGRAM THAT RESIDES ON DIRECT ACCESS STORAGE IN
A PROGRAM LIBRARY . INCORZAP ALLOWS ZAPS TO BE APPLIED
DIRECTLY TO NUCLEUS OR LINK PACK AREA ( LPA ) MODULES
WITHOUT THE REQUIREMENT TO RE-IPL AFTER THE ZAP HAS
BEEN APPLIED
IS A SET OF JCL TO RUN APEMAN AND GET A COPY OF EACH
OF THE REPORTS. THIS JCL RAN FOR 3.61 CLOCK MINUTES
ON A 370/158 MODEL 3 , 2 MEG WITH 15 ADDRESS SPACES
ACTIVE .
THE MONITOR( APEMAN1 ) RAN FOR 1 MINUTE
41 SECONDS CLOCK ( 3.06 CPU SECONDS ) .
AND SAMPLED ONCE EVERY 15 SECONDS FOR 1 MINUTE WERE :
MONA MONZ MONP MONS
THE ANALYZER ( APEMAN2 ) RAN FOR 1 MINUTE 28 SECONDS
CLOCK ( 52.27 CPU SECONDS ) .
AND PRODUCED OVER 5400 LINES OF OUTPUT
A LITTLE BIT WITH THIS MONITOR GOES A LONG-LONG WAY
IS AN IEBUPDTE FILE WITH 8 MEMBERS FOR AN MVS
SPOOL DUMP/RESTORE SYSTEM
THE MEMBERS ARE :
1 DOC DOCUMENTATION
2 JCL SAMPLE JCL
3 ZAP SUPERZAP FOR IASXSD82
4 EWTR1 ASSEMBLER SOURCE CODE
5 EWTR2 ASSEMBLER SOURCE CODE
6 EWTR2SVS ASSEMBLER SOURCE CODE
7 EWTR3SVS ASSEMBLER SOURCE CODE
8 SYMGR REGISTER EQUATE MACRO
LAST UPDATED OCTOBER 16, 1976
TALKED TO AUTHOR ON MARCH 31, 1982 AND HE SAID
WHILE THEY DO NOT RUN THE CODE ANY MORE HE FELT
IT SHOULD STILL WORK EVEN THOUGH THE ZAP FOR
IASXSD82 PROBABLY HAS A NEW OFFSET
IS OS DEBE THAT HAS BEEN MODIFIED TO RUN UNDER MVS
THERE IS A PROBLEM WITH THIS VERSION OF THE PROGRAM
IN THAT IT WILL NOT DUPLICATE A 32K BLOCK OF DATA
ON A TAPE TO TAPE OPERATION . IT DOES NOT TELL YOU
THIS EITHER . SNEAKY FELLOW , YOU JUST GET A LOT OF
SHORT BLOCKS
IS THE REFERENCE MANUAL FOR IEHMAP , MAPLPA , PTXREF
AND SUPERZAP ( RECFM=FBA , LRECL=80 )
IS THE OBJECT DECK FOR IEHMAP ( SORRY NO SOURCE )
THE FOLLOWING ZAP WHICH IS IN FILE 117 IS NEEDED
SO IEHMAP WILL CORRECTLY HANDLE A 3350 IN NATIVE MODE
NAME IEHMAP MAPDEV
VER 0128 000C,000C,0001,0001,000C,20A0
REP 0128 001E,001E,0001,0001,001E,410A
THE FOLLOWING ZAP WHICH IS IN FILE 117 IS NEEDED FOR
3380 SUPPORT
NAME IEHMAP MAPDEV
VER 001C 08 DEVICE TYPE
VER 001D F2F3F1F440 DEVICE DESCRIPTION
VER 002C 0000001400000001 SCAL FACTORS FOR CCHH OF DEV
VER 0034 0014 NUMBER OF TRACKS/PER CYL
VER 0036 0FA0 MAX RELATIVE TRACK FOR DEVICE
REP 001C 0E DEVICE TYPE
REP 001D F3F3F8F040 DEVICE DESCRIPTION
REP 002C 000F000F00010001 SCAL FACTORS FOR CCHH OF DEV
REP 0034 000F 2UMBER OF TRACKS/PER CYL
REP 0036 33DB MAX RELATIVE TRACK FOR DEVICE
DUMPT IEHMAP MAPDEV
THE FOLLOWING ZAP WHICH IS IN FILE 117 IS NEEDED
SO IEHMAP WILL CORRECTLY HANDLE A 3375 IN NATIVE MODE
NAME IEHMAP MAPDEV 3375 SUPPORT FROM ROYAL
VER 0134 FFFFFFFF
REP 0134 0CF3F3F7,F540C4C9,E2D240D7,C1C3D240
REP 0144 000C000C,00010001
REP 014C 000C2CF4,FFFFFFFF
FILE 176
CONTAINS THREE ZAPS TO IEHMAP TO WORK CORRECTLY
WHEN YOU HAVE DATASETS AND/OR OS CATALOG SPREAD OVER
MORE THAN ONE VOLUME . WE HERE AT CBT DO NOT HAVE THIS
PROBLEM SO WE HAVE NOT IMPLETEMENTED THESE ZAPS .
HOWEVER A USER OF IEHMAP WHO DID HAVE THIS PROBLEM
CREATED THE ZAPS AND THEY WORK FINE IN HIS
INSTALLATION
* SPACE FOR MULTIPLE VOLUMES
NAME IEHMAP MAPINIT
VER 08D0 47F0,C198,0700,0700
REP 08D0 4400,C9B4,47F0,C198
* CAT DSN - MULTIPLE VOLUMES 1 MORE THAN CAT
NAME IEHMAP MAPCAT3
VER 0398 5820,9098,1222
REP 0398 58E0,9098,12EE
VER 03A2 1892
REP 03A2 189E
IS THE OBJECT DECK FOR MAPLPA ( SORRY NO SOURCE )
IS THE OBJECT DECK FOR PTXREF ( SORRY NO SOURCE )
IS THE OBJECT DECK FOR SUPERZAP ( SORRY NO SOURCE )
IS AN IMS COMPRESSION EXIT IN IEBUPDTE SYSIN FORMAT
COMPRISING INSTALLATION DOCUMENTATION AND SOURCE FOR
SEVERAL ASSEMBLER MODULES FORM THE UNIVERSITY OF
MANITOBA
IS PART OF THE IMS COMPRESSION EXIT CONTAINED IN FILE
087 . IT IS IN IEBCOPY FORMAT AND CONTAINS SOURCE FOR
2 PLI PROGRAMS . DOCUMENTATION FOR THE COMPRESSION
ALGORITHM IS NOT INCLUDED BUT WILL BE SUPPLIED TO
ANYONE ON REQUEST TO :
MR P.A. MACDONALD
SYSTEMS PROGRAMMING
THE UNIVERSITY OF MANITOBA
COMPUTER SERVICES , ENGINEERING BLDG
WINNIPEG , MANITOBA
CANADA R36 2N2
(204) 474-9870
IS THE SOURCE FOR A DNYAMIC ALLOCATION INTERFACE
FOR HIGH LEVEL LANGUAGES FROM THE UNIVERSITY OF
MANITOBA
IS THE DOCUMENTATION FOR THE DYNAMIC ALLOCATION
INTERFACE CONTAINED IN FILE 089 OF THIS TAPE . THE
DCB RECFM=FBA
IS A JOB STREAM TO INSTALL A VSAM EDITOR TO EDIT
VSAM DATASETS .
THE JOB STREAM CONSISTS OF ASSEMBLER SOURCE IN
IEBUPDTE SYSIN FORMAT FOLLOWED BY JCL TO PERFORM
ASSEMBLIES , LINK-EDITS AND ZAPS . THE ZAPS GO AGAINST
COPIES OF TSO EDIT MODULES AND MAY HAVE TO ADJUSTED
FOR MAINTENANCE . THE FINAL STEP INSTALLS THE HELP
DOCUMENTATION . THIS IS FROM THE UNIVERSITY OF
MANITOBA
IS APEMAN FROM GRUMMAN IN IEBUPDTE SYSIN FORMAT AND
CONTAINS ALL ASSEMBLER PROGRAMS FOR APEMAN , INCLUDING
SOME ROUTINES USED IN THE ANALYSIS OF DATA RECORDED
BY THE APEMAN MONITOR
IS APEMAN FROM GRUMMAN IN IEBUPDTE SYSIN FORMAT AND
CONTAINS ALL THE FORTRAN PROGRAMS FOR APEMAN
IS APEMAN FROM GRUMMAN IN IEBUPDTE SYSIN FORMAT AND
CONTAINS THE JCL TO LINKEDIT AND RUN THE APEMAN
MONITOR AND ANALYZER
IS APEMAN FROM GRUMMAN AND CONTAINS THE DOCUMENTATION
FOR APEMAN . THE FILE IS RECFM=FBA
IS APEMAN FROM GRUMMAN AND IS A SAMPLE OUTPUT FROM
THE APEMAN MONITOR AND ANALYZER
( RECFM = FBA LRECL=133, BLKSIZE=32718 )
IS APEMAN FROM GRUMMAN AND IS A SAMPLE OUTPUT FROM
THE PAGE FRAM TABLE ANALYZER
( RECFM = FBA LRECL=133 BLKSIZE=32718 )
IS A MOD TO ALLOW LINKLIST LIBRARIES IN THE MASTER
CATALOG FROM REVLON
IS A ZAP TO INCREASE SAS PERFORMANCE FROM REVLON
IS FROM DELUXE CHECK PRINTERS AND CONTAINS THEIR SPF
MENUS , PANELS AND MESSAGES FOR THE NEW ISPF/PDF .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT , SEE THE
MEMBER CALLED $$$DOC FOR ADDITIONAL INFORMATION .
FILE 101 OF THIS TAPE CONTAINS THE CLISTS REQUIRED BY
THESE SPF MENUS . THE FOLLOWING IS A CONDENSED
VERSION OF WHAT IS IN THE $$$DOC MEMBER :
ALL PANELS AND OR MENUS AND OR MESSAGES AND OR
SKELETONS HAVE BEEN CONVERTED TO THE NEWEST ISPF
AND ISPF/PDF FORMATS 5668-960 AND 5665-268 I THINK
$$$$DISC DISCLAIMER ON CONTENTS
SPF MENUS
ABR***** ABR UTILITY SELECTION AND FUNCTIONS PANELS
COBOL2 FOREGROUND COBOL COMPILE PANEL
COBOL2B BACKGROUND COBOL COMPILE PANEL
GENER1 FOREGROUND IEBGENER PANEL
INFOMGT1 INFO MANAGEMENT PANEL
INFOSEL INFO MANAGEMENT DATABASE SELECTION PANEL
ISR PRIM REPLACEMENT FOR PRIMARY OPTION MENU
LINK3 FOREGROUND LINKAGE EDIT PANEL
LINK3B BACKGROUND LINKAGE EDIT PANEL
PLTCMPR1 COMPARE UTILITY PANEL
PSWDSEL PASSWORD ( OS ) MAINTENANCE SELECTION PANEL
PWADD PASSWORD ( OS ) ADDITION PANEL
PWCHNG PASSWORD ( OS ) CHANGE PANEL
PWDEL PASSWORD ( OS ) DELETION PANEL
S1ASM1 FOREGROUND SERIES 1 HOST ASSEMBLER PANEL
S1ASM1B BACKGROUND SERIES 1 HOST ASSEMBLER PANEL
S1OBJ1 FOREGROUND SERIES 1 OBJECT SHIPPING PANEL
USERSEL USER UTILITY SELECTION MENU
USERSELB USER BACKGROUND SELECTION MENU
USERVTOC VTOC UTILITY PANEL
SPF TUTORIAL MENUS
TABR**** ABR UTILITY FUNCTIONS TUTORIAL PANELS
TPLTCMP* COMPARE UTILITY TUTORIAL PANELS
TS1ASM1 SERIES1 OBJECT SHIPPING TUTORIAL PANEL
TVTOC** VTOC UTILITY TUTORIAL PANELS
CLISTS
ABR***** ABR CLISTS
****PASS PASSWORD ( OS ) MAINTENANCE CLISTS
GENER1 IEBGENER CLIST
INFOMGT1 INFO MANAGEMENT CLIST
PLTCMPR FOREGROUND COMPARE UTILITY CLIST
( REQUIRED SYNCSORT )
S1ASM1 FOREGROUND SERIES 1 HOST ASSEMBLER CLIST
S1ASM1B BACKGROUND SERIES 1 HOST ASSEMBLER CLIST
S1OBJ1 FOREGROUND SERIES 1 OBJECT SHIPPING CLIST
USERCOB FOREGROUND COBOL COMPILER CLIST
USERCOBB BACKGROUND COBOL COMPILER CLIST
USERLNK FOREGROUND LINK EDIT CLIST
USERLNKB BACKGROUND LINK EDIT CLIST
USERSELB BACKGROUND SELECTION PROCESSING CLIST
VTOCCMD1 VTOC UTILITY - REQUIRES VTOC COMMAND FROM CBT TAPE
SPF MESSAGES
ABR00 ABR UTILITY FUNCTIONS MESSAGES
PLTCM00 COMPARE MESSAGES
SASM00 SERIES 1 MESSAGES
VTOC00 VTOC UTILITY MESSAGES
IS FROM DELUXE CHECK PRINTERS AND CONTAINS THEIR SPF
CLISTS FOR THE NEW ISPF/PDF . THIS FILE IS IN
IEBUPDTE SYSIN FORMAT , SEE THE MEMBER CALLED $$$DOC
IN FILE 100 ABOVE FOR ADDITIONAL INFORMATION
IS DSPACE AND VTOCLIST THAT HAVE BEEN MODIFIED TO
WORK WITH INDEXED VTOCS . THIS FILE WAS RECEIVED FROM
GTE LABS IN WALTHAM , MASS . AND IS IN IEBUPDTE SYSIN
FORMAT . IT CONTAINS :
A DSPACE DISPLAYS THE FREE SPACE AVAILABLE ON ALL
ONLINE DISK VOLUMES
B VTOCLIST PROGRAM TO PRINTOUT AVAILABLE SPACE ON A
DISK DRIVE
IS APEMAN VERSION 2 GRAPHICAL ANALYSIS ROUTINES
THIS IS WRITTEN IN PLI
IS SUBMAN OPERATING INSTRUCTIONS
( RECFM=FBM LRECL=133 BLKSIZE=32718 )
IS SUBMAN COMMON ROUTINES ( BAL )
IS SUBMAN BTAM MAIN ROUTINES ( BAL )
IS SUBMAN TSO 3270 MAIN ROUTINE ( BAL )
IS SUBMAN TSO MAIN ROUTINE ( BAL )
IS AN MVS SYSGEN CROSS - REFERENCE PROGRAM
IS THE 3.7/3.8 VABDUMP
IF YOU USE THE ABEND TABLE TO SURPRESS CERTAIN ABEND
CODES THE FOLLOWING MESSAGE WILL APPEAR ON THE
OPERATOR ' S CONSOLE
IEA912I RECOVERY/TERMINATION DUMP FAILED
THIS MESSAGE WILL BE PREFIXED WITH JOB ' S JES ID .
ALSO THE FOLLOWING LINES WILL APPEAR AS THE LAST FOUR
LINES ON THE DUMP
DUMP NOT REQUIRED FOR THIS COMPLETION CODE ,
REMAINDER OF DUMP SUPPRESSED BY ABEND/SNAP USER EXIT
USER/PP CONTROL BLOCK UNAVAILABLE
DUMP TRUNCATED FOR INSUFFICIENT STORAGE
IS A SAMPLE OUTPUT OF THE 3.7/3.8 VABDUMP
( RECFM=FBM LRECL=133 BLKSIZE=32718 )
IS THE SOURCE FOR THE TSO COMMAND PROMPTER CALLED
VTOC . THIS FILE IS IN IEBUPDTE FORM . THIS COMMAND
ALLOWS YOU TO SEARCH THE VOLUME TABLE OF CONTENTS OF
ONE OR MORE DISK VOLUMES AND OBTAIN LISTINGS OR TOTALS
OF DATA SETS MEETING SOME CRITERIA . THE SPECIFICATION
IS QUITE FLEXIBLE . THIS FILE ALSO CONTAINS THE HELP
DATA SET FOR THIS COMMAND . IT ALSO CONTAINS
INSTALLATION NOTES , SOME COMMENTS ON DEFAULTS THAT MAY
NOT BE TYPICAL ELSEWHERE , A LIST OF THE KNOWN ERRORS
IN THE COMMAND , AND IDEAS FOR FUTURE EXPANSION .
THIS VERSION SUPPORTS SU60 , CATALOG DATASETS AND THE
ABILITY TO SORT THE OUTPUT ON ANYTHING . FOR ADDITIONAL
CHANGES SEE THE HELP MEMBER OF THE PDS .
THIS VERSION WILL RUN ON A SYSTEM THAT DOES NOT HAVE
SU60 INSTALLED , HOWEVER IF YOU TRY TO ASSEMBLE
ON A SYSTEMS THAT DOES NOT HAVE SU60 MACROS YOU WILL
GET ASSEMBLE ERRORS . YOU CAN GO IN AND JUST NO OP
THOSE INSTRUCTIONS . ITS LOAD MODULE IS IN FILE 035
AND IS CALLED $VTOC
****************************************************
* IT APPEARS THAT THERE ARE ADDITIONAL MACROS *
* THAT ARE MISSING FROM THIS FILE THIS IS IN FACT *
* NOT TRUE. WHAT APPEARS TO BE OTHER MACROS WERE *
* JUST AN IDEA AND THOSE MACROS WERE NEVER *
* WRITTEN . I KNOW ! I SPENT WEEKS TRYING TO TRACK *
* THEM DOWN . *
* ARNIE *
****************************************************
IS A UCB MAP PROGRAM FROM CONN NATIONAL BANK
IT IS WRITTEN IN PL/I OPTIMIZER . THIS PGM READS YOUR
STAGE I SYSGEN . IT USES THE INFORMATION FROM EACH
IODEVICE MACRO TO SET THE DEVICE TYPE FIELD IN A
TABLE FOR EACH ADDRESS , A RANGE OF ADDRESS IN AN
IODEVICE MACRO WILL CREATE A RANGE OF TABLE ENTRIES
IT WILL ALSO HANDLE OPTCHAN AND CONSOLE MACROS .
THE PROGRAM WILL THEN PRINT A REPORT OF ALL THE
ADDRESSES IN THE SYSTEM , SHOWING THE DEVICE TYPE
ASSIGNED TO EACH ADDRESS . MSS VIRTUAL VOLUMES ARE
ALSO HANDLED
A SAMPLE OUTPUT FROM THE PROGRAM IN FILE 113
( RECFM=FBA LRECL=133 BLKSIZE=32718 )
IS FROM L.L. BEAN AND CONTAINS A THEIR EXITS AND
MODIFICATIONS THAT ALLOW SPECIFYING PASSWORDS FOR
DATASETS WITHIN THE JCL .
THIS FILE WHICH IS IEBUPDTE SYSIN FORMAT CONTAINS
A JES2 EXIT 4
B JES2 EXIT 7
C JES2 EXIT 8
D JES2 SOURCE UPDATE TO HASPSSM
E ZAP TO LMOD READPSWD CSECT READPSWD
F WTO EXIT IEECVXIT
FOR ADDITIONAL INFORMATION SEE THE MEMBER CALLED
$$DOC
IS THE SOURCE FOR A DISK SEEK ANALYSIS PROGRAM
WRITTEN IN ASSEMBLER . USE A PARM OF SMAP AND CHECK
THE CODE FOR ADDITIONAL INFORMATION . THIS PGM WILL
SHOW WHERE YOU ARE SPENDING YOUR TIME VIA THE
DATA SET NAME RATHER THAN BY A TRACK ADDRESS
THIS CODE WILL SUPPORT 3380'S . THIS VERSION WILL
RUN UNDER MVS / XA
A SUPERZAP AGAINST IEHMAP ( FILE 83 ) SO IEHMAP WILL
CORRECTLY HANDLE A 3350 AND 3380 ' S
IS FROM COMBUSTION ENGINEERING THAT TAKES A PUT PTF
FILE ( FILE 1 FROM A STANDARD IBM PUT TAPE ) , AND
PRODUCES A CROSS REFERENCE OF THE PTF ' S INCLUDED ,
SORTED BY FMID . THE PROGRAM SHOULD BE USEFUL TO
QUICKLY IDENTIFY WHAT PTF ' S ARE ON A GIVEN TAPE WHAT
FMID ' S HAVE MAINTENANCE ON A TAPE , AND TO DOUBLE
CHECK THE STERLING FOREST CROSS REFERENCE ( IT LIES
ONCE IN A WHILE )
SEVERAL MVS MODIFICATIONS IN SMP FORMAT THAT
HAVE BEEN RECEIVED FROM THE FIRST NATIONAL BANK
OF CHICAGO
CONTAINS A COPY OF THE DOCUMENTATION FILE FROM THE
NON-SP 1.3 VERSION OF THE JES2 MODIFICATION TAPE VER
24 , DATED NOVEMBER 1981 . THERE IS NO CODE CONTAINED
IN THIS FILE . SEE FILE 314 FOR THE MVS/SP1.3 VERSION
OF THE JES2 MODIFICATION TAPE
CONTAINS A COPY OF THE DOCUMENATION FILE FROM
THE LATEST SPLA MODIFICATION TAPE . THERE IS NO CODE
CONTAINED IN THIS FILE
CONTAINS 3 TSO CP'S FROM ARAMCO AND THEIR ASSOCIATED
HELP MEMBERS AND MACROS
PRINTOFF - MODIFIED TSO PRINTOFF TO SUPPORT 3800
PARAMETER , IE FLASH , CHARS AND BURST
PRINTODD - MODIFIED PRINTOFF WHICH ACCEPTS DDNAMES
RATHER THAN DSNAME
LOGALLOC - TSO CP TO MARK ALL OR SELECTED DDNAMES
AS ALLOCATED AT LOGON TIME .
THIS FILE IS IN IEBUPDTE SYSIN FORMAT SEE THE MEMBER
CALLED $INDEX FOR ADDITIONAL INFORMATION
CONTAINS INSTRUCTIONS ON HOW TO SUBMIT YOUR
MODIFICATIONS TO THE TSO-GUIDE TAPE THIS FILE IS
FBA FORMAT
IS FOR THE ANALYSIS OF GTF DATA FROM GPU SERVICE
CORPORATION IN PENNSYLVANIA . THIS FILE CONTAINS
SEVERAL PROGRAMS FOR GTF ANALYSIS .
A P0493900 FOR GTF SIO ANALYSIS
B P0494000 FOR GTF SIO ANALYSIS
C P0494100 FOR GTF SIO ANALYSIS
D P0256000 FOR USE WITH ABOVE GTF SIO PGMS
D P1000300 FOR USE WITH ABOVE GTF SIO PGMS
E SAS PROGRAM GTFMIS FOR THE ANALYSIS OF SVC
6 , 7 , 8 , 18 ,42 . THIS SAS PROGRAM IS GEARED
TOWARD THE ANALYSIS OF IMS ON GPU 'S SYSTEM
F SAS PROGRAM GTFSIO WHICH WILL ANALYZE THE
MEMBERS OF A PDS BASED ON GTF DATA
G LOCAL MAROCS NEEDED FOR THE ABOVE
H $$DOC MEMBER WHICH CONTAINS DOCUMENTATION
THIS FILE IS IN IEBUPDTE SYSIN FORMAT
G P U D I S C L A I M E R
THE INFORMATION OR MATERIAL BEING PROVIDED TO YOU BY GPU
SERVICE CORPORATION ( GPUSC ) , WHETHER IN HARD COPY OR
MACHINE READABLE FORM , HAS BEEN DEVELOPED BY GPUSC FOR ITS
OWN PRUPOSES AND FOR USE ON ITS OWN EQUIPMENT AND WITHIN
ITS OWN DATA PROCESSING SYSTEM . ACCORDINGLY , GPUSC DOES
NOT WARRANT , AND MAKES NO REPRESENTATIONS , WHETHER
EXPRESSED OR IMPLIED , CONCERNING SUCH INFORMATION OR
MATERIAL AND ASSUMES NO RESPONSIBLITY FOR ITS QUALITY OR
FITNESS FOR ANY OTHER PURPOSE OR FOR USE WITH OTHER THAN
GPUSC ' S OWN EQUIPMENT . YOU ARE , THEREFORE ,
ACCEPTING THIS INFORMATION ON AN ' AS IS ' BASIS AND WILL
BE USING IT AT YOUR OWN RISK . FURTHERMORE , GPUSC HAS NOT
UNDERTAKEN TO CORRECT , MAINTAIN OR UPDATE THIS INFORMATION
IN THE FUTURE AND WILL NOT BE RESPONSIBLE FOR ANY FAILURE
TO DO SO .
CONTAINS A VERY VERY VERY CONDENSED SAMPLE OUTPUT
FROM THE PROGRAMS CONTAINED IN FILE 124 OF THIS TAPE
FROM GPU SERVICE CORPORATION IN PENNSYLVANIA . THIS
FILE IS RECFM=FBA LRECL=133 BLKSIZE=32718
IS AN ASSEMBLER PROGRAM TO GIVE INFORMATION ON THE
SMF DATA SETS IN AN SMF VSAM FILE ENVIRONMENT ONLY
IS IN IEBUPDTE FORMAT FROM
**FILE 127 REPLACEMENT FROM: CLARK HUNTER
** COMPUWARE CORPORATION
** SOUTHFIELD, MICHIGAN
** 313-540-0900
**
**COMMENTS FROM V232 VERSION OF CBT TAPE WITH MY UPDATES:
**FILE 127 IS IN IEBUPDTE FORMAT FROM CHRYSLER AND
CONTAINS :
1. DASD SEEK ANALYSIS PROGRAM . THIS
PROGRAM READS IN GTF DATA AND SUMMARIZED
DASD SIO/IO RECORDS . THIS PROGRAM IS IN
IEBUPDTE SYSIN FORMAT AND REQUIRES THE
VTOC MACROS THAT ARE CONTAINED IN EITHER
FILE 112 OR FILE 198
BY DEVICE CALCULATE NUMBER SIO CC = 0-3
TOTAL CYLINDERS SEEKED
AVERAGE CYLINDERS SEEKED
AVERAGE IO TIME
MAX. IO TIME OVER RUN
**10JAN85 FIXED FOR XA, MISC PROGRAM BUGS
FIXED
2. A SAMPLE IEECVXIT PROGRAM
**10JAN85 REMOVED DUE TO LACK OF
INTEREST
3. SUBROUTINE TO PRODUCE A NICE PRINTABLE
HEADER DATE
4 TSO CP FOR STANDALONE DIDOCS (DCMS)
AUTO UPDATE
**10JAN85 REMOVED DUE TO LACK OF
INTEREST
5 PROGRAM TO LOCATE, ALLOC, DUMP THE
MVS/SE2 SMF D.S.
**10JAN85 REMOVED DUE TO LACK OF
INTEREST
6 COMPANY USER MODS IN SMP4 FORMAT
**10JAN85 REMOVED DUE TO LACK OF
INTEREST
7 SEE NEW STUFF BELOW:
PDS CONTAINS:
MACROS: - @ENT @RET @STCK CLEAR CONV ENTER ENTERX
LEAVE MSG PDEDSNAM REGS SYSGET SYSPUT
TSCVDATE VTCALL VTEXCP VTFMT VTOC VTOCMSG
VTOCOM VTOCPARS
$DOC - DOCUMENTATION FILE
JCL - SAMPLE JCL USED TO DUMP PDS.
AND TRY TO CHECK THAT I DIDNT FORGET ANY
MACROS
TSGTFMAP - PGM TO REDUCE GTF SIO/IO TRACE RECORDS.
SEE COMMENTS AT BEGINNING OF PROGRAM FOR
HOW TO RUN. USES SUBR: TSCVDATE, VTOCEXCP
NOW SUPPORTS XA FORMAT OF GTF RECORDS
TSCALL - TSOCP TO CALL PROGRAMS FROM
"TASKLIB"/STEPLIB/ LNKLST/LPALIB. IDEA IS
TO NOT USE TSO "CALL" WITH HARDCODED
LOADLIBS THAT HAVE TO BE OPENED.
TSCVDAT - SUBROUTINE TO MAKE NICE PRINTABLE DATE FOR
HEADINGS.
TSDYNLXA - PGM XA DYNALIST TO LIST ESOTERIC UNITNAMES
(NOTE: USES ESTAES TO EXECUTE
UNAUTHORIZED!!)
TSENQSP3 - TSOCP (AKA $DENQ) SCAN FOR GENERIC SYSDSN
ENQS, LOOK FOR ENQ LOCKOUTS, LOOK FOR
RESERVE ENQS. (NOTE USES GQSCAN)