Your Federal Quarterly Tax Payments are due April 15th Get Help Now >>

2817 - Bit Bucket X'0F' by puy20991

VIEWS: 128 PAGES: 36

									            Bit Bucket X’0F’
      R.P. Shannon                    Carl Youngren
 Programart Corporation              State of California
  124 Mt. Auburn Street       Health and Welfare Data Center
  Cambridge, MA 02138               Technology Division
      (617)498-2948                1651 Alhambra Blvd.
shannon@programart.com            Sacramento, CA 95816
                                       (916)739-7660
                              cyoungre@hwmail.cahwnet.gov


                     SHARE 90
                    Session 2817
                    Anaheim, CA
                  February 27, 1998

                                                               1
                   Bit Bucket X’0F’
Trademarks

APPN                                         IBM
CICS/ESA                                     IMS/ESA
DATABASE 2                                   MVS/ESA
DB2                                          NetView
DFSMS                                        OS/390
DFSMS/MVS                                    RACF
Enterprise System Connection Architecture    S/390
ES/9000                                      Sysplex Timer
ESCON                                        System/390
Hardware Configuration Definition            VTAM
IBM

CA-MIM
CA-1
IDMS




                                                             2
                               Bit Bucket X’0F’
Extended Indirect Volser Revisited

Introduced via PTF to facilitate cataloging datasets on
sysres overflow volumes

Q: How does one recatalog to return to a single sysres?
A: Set &SYSRn = &SYSR1

Q: How can one avoid recataloging DLIB datasets when a
   new release of OS/390 is installed?
A: Catalog using a symbolic for the DLIB volume

SYSDEF
     SYMDEF(&SYSR2.='&SYSR1.')
     SYMDEF(&SDLIB.='OS39D4')

DLIB symbolic can be “hard coded” or derived from
&SYSR1
                                                          3
                         Bit Bucket X’0F’
D LLA - Undocumented Command
CSV600I 14.29.26 LLA DISPLAY 443
EXITS: CSVLLIX1 - INACTIVE   CSVLLIX2 - ON
VLF: ACTIVE GET LIB ENQ: YES SEARCH FAIL COUNT: 0
LNKLST SET: IPL
40 LIBRARY ENTRIES FOLLOW
ENTRY   L F R P LIBRARY NAME
    1   L        SYS1.CMDLIB
    2   L        GIM.SGIMLMD0
    3   L        HLA.SASMMOD1
    4   L        SYS1.VTAMLIB
    5   L        IOA.SIOALMOD
                          
                          
Libraries are displayed in control block order, not concatenation order.
L = Linklist
F = Freeze
R = In the process of being removed
P = PDSE


                                                                           4
                               Bit Bucket X’0F’
Enhancement to LOADxx IODF Specification

OW19669: Available 4/97; Supports OS/390 R1+
Intent is to avoid changing LOADxx After changing the I/O
configuration
IODF Suffix:
   Can be a two-digit hexadecimal number (X'00 - FF'),
    asterisks ('**'), pluses ('++'), minuses ('--'), or equals ('==')
   When character strings are specified, MVS uses the IODF
    name found in the hardware configuration token. If not
    found, each character string causes a different action or
    takes a different search path
   Read the manual C A R E F U L L Y
HLQ of IODF can be specified as “========“
   Causes HLQ to be extracted from the hardware
    configuration token
   If not found, WAIT State

                                                                        5
                            Bit Bucket X’0F’
Catalog Search API
Originally extra charge - inexpensive but eschewed by most
shops
Included no charge in DFSMS 1.4
Basically a user-friendly interface in SVC 26
Module IGGCSI00 resides in SYS1.LINKLIB
Sample code provided in SYS1.SAMPLIB:
    IGGCSILC: Similar to LISTCAT; faster but not as much information
    IGGCSIRX: Rexx interface
    IGGCSICG: Calculate unused space for VSAM datasets
    IGGCSIVS: Find all datasets in given catalog on a given volume

A few annoying features:
    Input mapping macros is actually copy code
    No macro provided to map output
    Cludgy method to determine when all returned data has been
     processed! (May be due to SVC 26 - not to CSI)
                                                                        6
                              Bit Bucket X’0F’
Catalog Search API - Limiting the Search
CSIDTYPS identifies the type of catalog entry to be returned:

Type Description
A Non-VSAM data set
B Generation data group
C Cluster
G Alternate index
H Generation data set
R VSAM path
X Alias (MVS/DFP 3.2.0 and later only)
U User catalog connector entry (MVS/DFP 3.2.0 and later only)
L Tape volume catalog library entry (DFSMS 1.1.0 and later only)
W Tape volume catalog volume entry (DFSMS 1.1.0 and later only)

All blanks will return types A, B, C, G, H, R, X, and U
W and L must be explicitly coded

                                                                   7
                            Bit Bucket X’0F’
Catalog Search API - IGGCSINA
Maps the input parameters
Resides in SYS1.MACLIB(IGGCSINA)
CSIFIELD   DSECT
CSIFILTK   DS CL44    FILTER   KEY
CSICATNM   DS CL44    CATALOG NAME OR BLANKS
CSIRESNM   DS CL44    RESUME NAME OR BLANKS
CSIDTYPD   DS 0CL16   ENTRY TYPES
CSIDTYPS   DS 16CL1   ENTRY TYPES
CSIOPTS    DS 0CL4    CSI OPTIONS
CSICLDI    DS CL1     RETURN D&I IF C A MATCH Y OR BLNK
CSIRESUM   DS CL1     RESUME FLAG         Y OR BLANK
CSIS1CAT   DS CL1     SEARCH CATALOG      Y OR BLANK
CSIRESRV   DS XL1     RESERVED
CSINUMEN   DS H       NUMBER OF ENTRIES FOLLOWING
CSIENTS    DS 0CL8    VARIABLE NUMBER OF ENTRIES FOLLOW
CSIFLDNM   DS CL8     FIELD NAME




                                                          8
                        Bit Bucket X’0F’
Catalog Search API - Mapping Returned Data
    MACRO
           $CSIWORK
CSIWRHDR   DSECT        CSI return workarea
CSIUSRLN   DS    F      total length of workarea; user provided
CSIREQLN   DS    F      min work area size for 1 catalog and 1 entry
CSIUSDLN   DS    F      total size used for returning entries
CSINUMFD   DS    H      # field names +1
CSIWRHDR_L EQU *-CSIWRHDR header length

CSICATLG     DSECT        Map for catalog
CSICFLG      DS    XL1    catalog flag information
CSINTICF     EQU X'80'    Non-ICF catalog, not supported
CSINOENT     EQU X'40'    No entry found for this catalog
CSINTCMP     EQU X'20'    data for this catalog is not complete
CSICERR      EQU X'10'    error - entire catalog not processed
CSICERRP     EQU X'08'    error - catalog partially processed
CSICTYPE     DS    XL1    catalog type X'F0'
CSICNAME     DS    CL44   catalog name
CSICRETN     DS    0XL4   catalog return information
CSICRETM     DS    XL2    catalog return module ID
CSICRETR     DS    XL1    catalog return reason code
CSICRETC     DS    XL1    catalog return code
CSICATLG_L   EQU *-CSICATLG length of catalog entry



                                                                       9
                                 Bit Bucket X’0F’
Catalog Search API - Mapping Returned Data
CSIENTRY     DSECT           entry information
CSIEFLAG     DS    XL1       entry flag information
CSIPMENT     EQU X'80'       primary entry
CSIENTER     EQU X'40'       error indication is set
CSIEDATA     EQU X'20'       data is returned for this entry
CSIETYPE     DS    CL1       entry type
*                              + A Non-VSAM data set
*                              + B Generation data group
*                              + C Cluster
*                              + D Data component
*                              + G Alternate index
*                              + H Generation data set
*                              + I Index component
*                              + R Path
*                              + X Alias
*                              + U User catalog connector entry
*                              + L ATL Library entry
*                              + W ATL Volume entry
CSIENAME     DS     CL44     entry name
CSIERETN     DS     0XL4     error return information
CSIERETM     DS     XL2      entry return module ID
CSIERETR     DS     XL1      entry return reason code
CSIERETC     DS     XL1      entry return code
CSIENTRY_L   EQU    *-CSIENTRY
             MEND


                                                                  10
                                   Bit Bucket X’0F’
Catalog Search API - Workarea
WORKAREA    DSECT
SAVEAREA    DS    18F            savearea
IGGCSI00@   DS    F              epa of iggcsi00

$CSIPARMS   DS    0F
RC@         DS    F               ---> reason code
FILTER@     DS    F               ---> filter
CSIWORK@    DS    F               ---> workarea
CSI_RC      DS    F               reason code
            DS    0D
CSI_FILTER DS     CL(CSI_HDRLEN+(100*8))
            DS    0D
CSI_WORK    DS    XL(16*4096)     a 64K workarea is recommended
CSI_WORKLEN EQU   *-CSI_WORK      workarea length
CSI_HDRLEN EQU    CSINUMEN-CSIFIELD
WALEN       EQU   *-WORKAREA
            COPY IGGCSINA         IBM-supplied copy code
            $CSIWORK              RYO macro for workarea




                                                                  11
                               Bit Bucket X’0F’
Catalog Search API - Coding Example

                L        EP=IGGCSI00,ERRTN=LOAD_ERROR load the api
      N     R0,=X'7FFFFFFF'            clear hob
                ST     R0,IGGCSI00@              save address

*               setup for 'LISTCAT ALL'
                USING CSIFIELD,CSI_FILTER        map filter fields
    MVC   CSIFILTK,=CL44' '         init flter key to blanks
                MVC    CSIFILTK,=CL2'*'          request all entries
                MVC    CSICATNM,=CL44'OS390.MASTER.CATALOG' ind catalog
                MVC    CSIRESNM,=CL44' '         move blanks to resume name
                MVC    CSIDTYPS(16),=CL16' '     blanks to type
                MVC    CSIOPTS(4),=CL4' '        blanks to options
                XC     CSINUMEN,CSINUMEN         ind 0 entries
                MVC    CSI_WORK(4),=AL4(CSI_WORKLEN) ind workarea size

                 LA    R0,CSI_RC                     get rc addr
                 ST    R0,RC@                        store in parmlist
                 LA    R0,CSI_FILTER                 get filter addr
                 ST    R0,FILTER@                    store in parmlist
                 LA    R0,CSI_WORK                   get csi workarea addr
                 ST    R0,CSIWORK@                   store in parmlist

          LA     R1,$CSIPARMS                  get parmlist addr
          L      R15,IGGCSI00@                 get iggcsi00 addr
          BALR   R14,R15                       call iggcsi00
                                                                             12
                                 Bit Bucket X’0F’
Catalog Search API - Coding Example
    LTR    R15,R15                     work ok?
                 BNZ    CATAPI_ERROR                 bif no

          USING   CSIWRHDR,R10                 map work header
          LA      R10,CSI_WORK                 get addr returned info

          LA      R09,CSIWRHDR_L(,R10)         bump past header and
          LA      R09,CSICATLG_L(,R09)         catalog to 1st entry
          LA      R08,CSIENTRY_L               prime amt entry processed

ENTRY_LOOP DS 0H
           USING CSIENTRY,R09                  map entry
           TM     CSIEFLAG,CSIENTER            error for this entry?
           BO     NEXT_ENTRY                   bif yes
*
*          Do some processing
*
NEXT_ENTRY DS 0H
           LA     R08,CSIENTRY_L(,R08)         calc entry data processed
           C      R08,CSIUSDLN                 all entries processed?
           BH     ALL_ENTRIES_PROCESSED        bif yes
           LA     R09,CSIENTRY_L(,R09)         else bump to next entry




                                                                           13
                                 Bit Bucket X’0F’
Catalog Search API - Returned Data
07F30000.   00003000   00000000   000029DA   000100F0   *...............0*
            D4E5E2E5   F54BD4C1   E2E3C5D9   4BC3C1E3   *MVSV5.MASTER.CAT*
07F30020.   C1D3D6C7   40404040   40404040   40404040   *ALOG            *
            40404040   40404040   40404040   00000000   *            ....*
07F30040.   A0C30000   00000000   00000000   00000000   *.C..............*
            00000000   00000000   00000000   00000000   *................*
07F30060.   00000000   00000000   00000000   00000004   *................*
            0008A0E7   7CC7D440   40404040   40404040   *...X@GM         *
07F30080.   40404040   40404040   40404040   40404040   *                *
            40404040   40404040   40404040   40404040   *                *
07F300A0.   00040008   A0E7C1C1   C1404040   40404040   *.....XAAA       *
            40404040   40404040   40404040   40404040   *                *
07F300C0.   40404040   40404040   40404040   40404040   *                *
            40400004   0008A0E7   C1C2C440   40404040   * .....XABD      *
07F300E0.   40404040   40404040   40404040   40404040   *                *
            40404040   40404040   40404040   40404040   *                *




                                                                             14
                                    Bit Bucket X’0F’
APARs of Interest
Dumping Key 0-7 Programs - NOT!

A feature of OS/390 R3 changed IEAVTABD to prevent
ABDUMP/SYSMDUMP/SYSUDUMP of Key 0-7 tasks

New message - IEA848I DUMP SUPPRESSED - ABDUMP
MAY NOT DUMP STORAGE FOR KEY 0-7 JOB xxxxxxx

Change not documented

Recommended action is to have function issue a SDUMP
or set a SLIP trap

Severe impact on many ISV products

Multiple occurrences required to capture diagnostic data
                                                           15
                         Bit Bucket X’0F’
APARs of Interest
OW27748 (9709) provides relief; PE APAR OW29466
New RACF Facility Class Entity IEAABD.DMPAKEY
controls Key 0-7 tasks
     Users with READ access produce a dump
     STCs produce a dump regardless of access level
     IBM recommends UACC(NONE) and PERMIT for specific users
IEAABD.DMPAUTH covers "controlled" programs
     READ access required by everyone desiring a dump
     IBM recommends UACC(READ)

Since we were in a hurry and it has been this way for 20 years
we used:
   RDEFINE FACILITY IEAABD.DMPAUTH UACC(READ)
   RDEFINE FACILITY IEAABD.DMPAKEY UACC(READ)



                                                                 16
                              Bit Bucket X’0F’
APARS/PTFs of Interest
OW29775 (9711)
Loop in *MASTER* TCB IEAVTMTR (Csect CRGRSMGR)
after normal Memterm of an Address Space
  Affects OS/390 R3 and R4
  Omegamon showed 100% CP use
  CALLRTM (refer to Bit Bucket 11) was no help
  IPL required to reclaim CP


OW29048 (9709)
  Abend S0C4 in IFG0194K + x'1668' reading a 3420 tape
  Affects DFSMS 1.3 & 1.4
  Trying to access an IOBE which only exists for extended mode
   cartridge tape drives

Not HIPER but appears it should be
                                                                  17
                             Bit Bucket X’0F’
APARS/PTFs of Interest
OW28282 (9709 - HIPER)
  DB2 Image Copy (DSNUTIL) fails with Abend 214-10
  Msg IEC537I BLOCK COUNTS: DEVICE=42485, DCB=38
  Occurs after installing UW37471
  Affects DFSMS 1.3 & 1.4
  Description misleading "WRITE I/O TO DISK (EMULATING
    3480)..."
  In fact, it fails for all devices (including tape) when a second volume is
    used

OW30519 (Dup of OW28282):
IEBGENER drops records writing to either tape or DASD
output
  No indication of problem!
  Circumvention - code NCP=1 as DCB parm on input
Nasty, nasty, nasty problem - Data Loss/Data Integrity
                                                                                18
                               Bit Bucket X’0F’
APARS/PTFs of Interest
OW29383 (9710)

Abend 0C4 in IGC0001I + x'986'
    DFSMS 1.4
    Made HIPER recently
    Symptoms include a hang on SYSZVVDS or an Abend C78
    Caused by calling EOV to extend the VVDS
    The ACB is above the line
    Only a 3 byte address is passed




                                                           19
                            Bit Bucket X’0F’
ICKDSF and Y2K- The Battle Continues …..
ICKDSF doesn't handle "Never Expire" datasets as
unexpired in 2000 and beyond
    PQ10899 (DLL) documents the problem
    99365, 99366, and 99999* dates are treated as expired when the
     current date is 1/1/2000 or greater
    INIT MIMIC(ENU) does not properly reflect year 2000 creation
     dates

Extra Credit Trivia Question: What is date 99999?
    Introduced by OY08847 (8801)
    Support for IDCAMS DEFINE 'FOR(9999)' Keyword (never expire)
    Data Component DSCB contains x'63397'
    Index Component DSCB contains x'00000'




                                                                      20
                              Bit Bucket X’0F’
VSAM Catalog and CVOL Y2K Reminder

Not that any of us are affected(?) but VSAM and CVOL
Catalogs do not support Y2K

OW25632 & OW25988 (9704) introduced msg IEC331I
RC(4) RSN(33) to warn you when CAS opens a VSAM
Catalog

There is no warning for CVOLS

On 1/1/2000 the RSN changes to 34 - "Open denied"

WSC Flash 9741 reiterates the APARS

If you haven't converted by now - you must have a good
reason - but time is running out!
                                                         21
                       Bit Bucket X’0F’
What About the Y98 Crisis?
CA-1 (nee UCC-1, nee TMS) Tape Management System (and
others?) use 98ddd and 99ddd for special purposes
    98ddd is “Last Date Used” control
      98000 - Bypass TMS
      98001 or greater - Number of days from "last use" before
       scratching dataset
    99ddd is “Cycle” control
      99000 - Scratch the dataset when it is found to be Uncataloged
      99001 to 99364 - # generations (cycles) to be kept
      99365 or 99366 - Never expire




                                                                        22
                               Bit Bucket X’0F’
What About the Y98 Crisis?
Users tend to be confused by different uses of EXPDT=
between Tape and DASD datasets

For TMS 4.9, we changed 98001 or greater to be a Julian date
5.1 doesn't come with source code
CA has a Usermod (T5XD673) which is close to what we want

With TRUXPD(YES), treats all EXPDT as Julian dates except
98000 and 99000

99365/99366 are still a problem




                                                               23
                         Bit Bucket X’0F’
The Elusive and Mysterious Driver 98
Driver 98 (DR98) is the latest system code for 9672/9674 G3
& G4, Multiprise 2000, and StarterPak 3000 systems:
    Available as of Nov. 1997
    Refer to PSP bucket 9672DEVICE

Notable features include:
    Y2K Sysplex Datasource (G3 & G4)
    Optimized conversions of CF requests (G3 & G4 Servers only)
    Locking out disruptive tasks
    15 logical partitions (G4 only)
    Cryptographic Function (all except G3)
    Bob Shannon's elusive PLO instruction
    Remote operation over SDLC, ISDN, Ethernet or Token Ring
     connections using SNA or TCP/IP




                                                                   24
                              Bit Bucket X’0F’
The Elusive and Mysterious Driver 98
Remote operation of both the system and HMC using a WEB
browser
No need for OS/2 & TSCF

WEB Server Requirements:
    HTML 2.0 and JavaScript 1.0
    Tested combinations:
      OS/2 Warp & Netscape 2.02
      WIN NT & either Netscape 3.0 or IE 3.02
      Win 95 & either Netscape 3.01/4.0 or IE 3.02/4.0


Connectivity Requirements:
  Token Ring or Ethernet LAN connected via router or bridge to
   secured intranet
  WEB Server does not use a secured session



                                                                  25
                               Bit Bucket X’0F’
The Elusive and Mysterious Driver 98
WEB Server preparation
    Enable the HMC and SEC to allow remote connection
    Assign IP addresses to the HMC & SEC
    Define Userid/Password for each WEB accessor

Tasks available via the WEB Server: Activate, Deactivate,
Load, Reset Normal, Reset Clear, Assign Activation Profiles,
View Hardware Messages, View Operating System
Messages, Enter Operating System Commands

WEB Server differences:
  Presentation consists of Banners (equivalent to Views, i.e. Groups,
   Defined CPCs, Images, Exceptions)
  Icons (equivalent to Work area CPC image Icons)
  Pushbuttons (equivalent to Task area, i.e. Activate, Deactivate,
 Load, Reset Normal, etc.)
                                                                         26
                              Bit Bucket X’0F’
The Elusive and Mysterious Driver 98
Not a GUI
    No "drag and drop"
   One task on one object at a time
  Object status may change at any time, but indicators updated only
     on page reload
  Default (changeable) refresh is 2 minutes


References (when available):
    HMC Operations Guide - Version 1.4.2
    Support Element Operations Guide - Version 1.4.2
    WSC Flash ??? (whenever written)

Observations:
    Significantly expands options for remote control of systems
    Harbinger of future control techniques?


                                                                       27
                               Bit Bucket X’0F’
OS/390 Coexistence and Currency
During the week of 10/12/1997, a letter from Doug Balog
(OS/390 Product Manager) was sent to each IBM customer
extending the OS/390 coexistence and currency policy

WSC Flash 9742 also contains the information

Previously, only 3 consecutive releases could coexist in a
Sysplex:
    Required a migration every 18 months
    R1, R2, and R3 legal but not R1 & R4

Now 4 consecutive releases are allowed:
    24 months between migrations
    Still only 2 consecutive releases of key subsystems (DB2,
     CICS, IMS) can coexist
    Extension subject to change in the future but with 12 months
     advance notice                                                 28
                               Bit Bucket X’0F’
OS/390 Coexistence and Currency
Each release of OS/390 considered current for 3 years

Exception for OS/390 R1, R2, & R3

Each will be supported until at least 12/01/2000

Exception being made in recognition of customer's Y2K
workload

IBM done good!   


                                                        29
                          Bit Bucket X’0F’
Load vs Load and Clear
Traditionally, most shops perform a "load" to IPL MVS;
"Load & Clear" was redundant

With Sysplex, the rules have changed:
    First indication is message "IXL009W HSA Shortage"
    HSA of each processor used as anchor to (un)validate storage
     content with Coupling Facility structures

Shortage can occur due to:
    Orphaned HSA vector entries due to abrupt termination(s) of MVS
    Excessive number of list notification or local cache vector
     entries (programming error)

Solution is to always do a "Load & Clear" to IPL
    Refer to II09319 for specifics
    IBMLink item RTA000105224 describes procedure for removing an
     MVS image from a Sysplex
                                                                       30
                               Bit Bucket X’0F’
System Dataset Blocksize
IBM now recommends a BLKSIZE=32760 for all System
Datasets (Loadlibs)

Assumes DASD has a track size > 32760; 3350s need not
apply

BLKSIZE=0 will only allocate a BLKSIZE of 1/2 track

Linkedit and IEBCOPY COPYMOD will allocate a module
in chunks of 32K and 25K (approximately) to completely fill
a track - no wasted space

Valid for all load module datasets, but not PDSEs


                                                              31
                           Bit Bucket X’0F’
Where is Module CSNBKGN?
After installing VTAM V4R4 (OS/390 R3), user receives
"CSV003I REQUESTED MODULE CSNBKGN NOT
FOUND"

Module is not known by SMP/E and cannot be located
anywhere

Part of the Encryption product

VTAM changed the default option for ENCRYPTN from NO
to YES

Issue "F net,VTAMOPTS,ENCRYPTN=NO"

Change the VTAM start options for subsequent invocations
                                                           32
                         Bit Bucket X’0F’
SQA Shortage - SP 226 Key 0
SP226-0 (SQA < 16M) stores I/O related control blocks (IOQ,
RQE, EXCP Large Blocks and IOS Large Blocks
   Normal size is around 250K
   SP226-0 grew to 1.2M (overflowing into and filling CSA)
   100% CSA = System Failure


Cause was an IDMS utility purging "deleted" records
   Program issues 10 I/Os at once
   Customer submitted 30+ invocations running at the same time
   Each invocation used a different database, but all were on the
    same volume

At 2K of storage per I/O, the reason for failure became
obvious

Conclusion: users can hurt you, even if you provide a cushion
                                                                     33
                              Bit Bucket X’0F’
RACF Generic Profiles vs Long Life Address Spaces
RACF Dataset Generic Profiles are loaded into the user
address space
   Up to 4 HLQs profiles are in storage
   Changes to a "cached" profile are not immediately reflected to the
    address space

Techniques for updating the “cached” profiles
  1) Restart the address space. (Not practical for long life A.S. e.g.,
     CICS, OMVS, etc.)
  2)   Access four other HLQ (thereby purging the "cache" contents),
     then access the changed HLQ. Probably most practical for TSO
     users, but a possibility for CICS
  3) Issue RACF's “SETR REFRESH GENERIC(DATASET)”
      Not everyone authorized to SETR
      Invalidates the Generic Profiles in ALL address spaces




                                                                          34
                              Bit Bucket X’0F’
Dynamic Dump Datasets Deja Vu
We discussed the advantages of Dynamic DUMPs in Bit
Bucket 10
   Eliminates partial dumps
   Frees up disk space
   Flexible naming
   Eliminates need to copy/clear dump datasets


Two more advantages:
  Update BLSCUSER to include "SYSDDIR dsname"
    SVC Dump will create an entry in this dump directory for
     each dump
   List the directory by allocating it to IPCSDDIR and using
     IPCS Option4
   Assuming SMS allocation, use data compression to further reduce
   DASD storage requirements



                                                                      35
                             Bit Bucket X’0F’
Bibliography
“DFSMS/MVS Version 1 Release 4, Managing Catalogs”,
 SC26-4914-03, IBM Corporation
“MVS Initialization and Tuning Reference”; SC28-1752-03; IBM
Corporation
“S/390 Hardware Management Console Operations Guide, Version 1.4.2;
GC38-0459-01, IBM Corporation
“S/390 Support Element Operations Guide, Version 1.4.2”; GC38-3108-03;
IBM Corporation
“Anonymous Sources”, 1-800-237-5511, IBM Poughkeepsie

Contributers, willingly or unwillingly, knowingly or unknowingly; :
 Harv Emery, IBM WSC
 Bill Horton, Eastman Chemical
 Steve Hyduke, Bellcore
 Mike Loos, Innovation Data Processing
 Peter Relson, IBM Corporation
 Skip Robinson, Southern California Edison
 Cheryl Watson, Watson & Walker
                                                                      36
                              Bit Bucket X’0F’

								
To top