Download BIM-Dr.D - CSI International

BIM-Dr.D (Doctor D)
USERS GUIDE
Restoring Private Libraries
Specifying 'COPY/RESTORE=PC, PR, PS, PP' will rebuild a Private- CORE,
RELO, SOURCE, or PROC library, respectively.
The library may be restored on top of an existing library, completely overlaying
its contents but having the same size and number of directory tracks. This is
done by putting 'LIB=O' (OLD).
The library may be restored adding its contents to a library. This is done by
setting 'LIB=A' (ADD). In either case the restored library already exists and may
be communicated to Dr.D by any of the four optional ways shown below.
1.
Default filename (IJSYSCL, IJSYSRL, IJSYSSL, IJSYSPL)
2.
Specified filename ('RFILE=').
3.
Specified file-ID ('RIDENT=') with default SYSNO (SYSCLB, SYSRLB,
SYSSLB, SYSPLB).
4.
Specified file-ID ('RIDENT=') and specified SYSNO ('RSYSNO=') the default
is 'LIB=OLD'.
Example 18. Backup, Condense, Private Source library.
This example condenses a Private Source statement library on 131. Assume
SYSSLB is permanently assigned to 131. Also assume DLBL/EXTENTS for
IJSYSSL are in the label area.
//
//
//
//
JOB L18 BACK-UP PSL
ASSGN SYS007,280
TLBL TAPEOUT,'SAVE PSL'
EXEC DRD,SIZE=200K
SAVE=PSOURCELIB
/*
/&
//
//
//
//
JOB L18 CONDENSE PSL
ASSGN SYS008,280
TLBL TAPEIN,'SAVE PSL'
EXEC DRD,SIZE=200K
RESTORE=PSOURCELIB
/*
/&
Sometimes it is necessary to change the size of the directory, or library, or create
a private library on a pack where there wasn't one before. To accomplish this
specify 'LIB=N' (NEW). It will create and format an empty private library before
Copying/Restoring. The library will have a total size equal to that specified in
the DLBL and extents defining the library. The rebuilt library will have a number
of directory blocks or tracks in exact proportion to the ratio of directory size to
the total size of the original library (i.e., if the original library has 100 cylinders
and 10 directory tracks and the rebuilt one has 150 cylinders, it will have fifteen
Stabilized Components
Page 163