CA1 TMSSPLIT / TMSMERGE volsers selection question
Article ID: 113629
Updated On:
Products
CA 1 Flexible Storage
CA 1 Tape Management - Copycat Utility
CA 1 Tape Management - Add-On Options
Issue/Introduction
We have 2 TMC files to merge.How can we generate the list of volsers without typing all of them to be used in input for the TMSSPLIT.
Environment
Release:
Component: 1
Component: 1
Resolution
The input of the TMSSPLIT must be a list of volsers and NOT a range of volumes.
We can use TMSGRW utility to generate a list of all active tapes using the following input:
//SYSIN DD *
CONTROL-SECTION
SORT VOLSER
ALTER INPUT=TMC
TITLE ' ACTIVE TAPES '
DEFINE DEL HX '02'
DEFINE SCR HX '04'
PROCESS-SECTION
WHEN FLAG1 ON SCR
REJECT
WHEN FLAG1 ON DEL
REJECT
WHEN VOLSER EQ VOLSER
LIST
REPORT-SECTION
PRINT VOLSER
PRINT DSN
PRINT EXPDT
The OUTPUT DD from TMSGRW can be used as input to TMSSPLIT.
We can use TMSGRW utility to generate a list of all active tapes using the following input:
//SYSIN DD *
CONTROL-SECTION
SORT VOLSER
ALTER INPUT=TMC
TITLE ' ACTIVE TAPES '
DEFINE DEL HX '02'
DEFINE SCR HX '04'
PROCESS-SECTION
WHEN FLAG1 ON SCR
REJECT
WHEN FLAG1 ON DEL
REJECT
WHEN VOLSER EQ VOLSER
LIST
REPORT-SECTION
PRINT VOLSER
PRINT DSN
PRINT EXPDT
The OUTPUT DD from TMSGRW can be used as input to TMSSPLIT.
Feedback
Yes
No
Powered by
