Description:
This document illustrates how to reduce the amount of space used by a CA View database.
Solution:
In the event that a View database has been over-allocated, or if the requirements of the database has changed such that the amount of disk space needs to be reduced, here are procedures that can be used to alter the amount of space used by the database, depending on the availability of DASD space:
- All tasks against the database must be brought down. These tasks would include:
- SARSTC - the View started task
- SARFSS - any ACIF/Xerox/Text report collector tasks
- SARXMS - online tasks using cross-memory services
- RMOSTC - any CA Deliver tasks which write directly to the database
(RMOPARM: ARCHn=DIRECT[/...]
- If there is NOT sufficient DASD space available to allocate the new database, follow these steps:
- SARDBASE UNLOAD:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SARUNLD DD DSN=XXXXXX.XXXXXX.SARUNLD, <=== Modify DSN // DISP=(,CATLG,),// DCB=(RECFM=VB,LRECL=32756,BLKSIZE=32760),...//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB1 <=== Modify DB nameUNLOAD/*//
- SARDBASE DELETE:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB1 <=== Modify DB nameDELETE/*//
- SARDBASE ADDDS:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB1 <=== Modify DB nameADDDS DATA ...ADDDS INDEX .../*//
- SARDBASE LOAD:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SARLOAD DD DSN=XXXXXX.XXXXXX.SARUNLD, <=== Modify DSN // DISP=SHR//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB1 <=== Modify DB nameLOAD/*//
- If there IS sufficient DASD space available to allocate the new database, follow these steps:
- SARDBASE ADDDS:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB2 <=== New DB nameADDDS DATA ...ADDDS INDEX .../*//
- SARDBASE COPY:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB2 <=== New DB nameCOPY VIEW.DB1 <=== Original DB name (copied from)/*//
- SARDBASE RENAME:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB1 <=== Original DB nameRENAME VIEW.DB3 <=== Temporary DB name/*//
- SARDBASE RENAME:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB2 <=== New DB nameRENAME VIEW.DB1 <=== Original DB name/*//
- SARDBASE DELETE:
//XXXXXXXX JOB ...//SARDBASE EXEC PGM=SARDBASE //STEPLIB DD DISP=SHR,DSN=VIEW.CAILIB <=== Modify, if used//SYSPRINT DD SYSOUT=* //SYSIN DD * NAME VIEW.DB3 <=== Temporary DB nameDELETE/*//