Using the RMM SEARCHVOLUME subcommand

To create a volume pull list, you can issue the RMM SEARCHVOLUME subcommand as follows:

==>RMM SEARCHVOLUME VOLUME(*) STATUS(SCRATCH) TYPE(PHYSICAL) OWNER(*) LIMIT(*)

See SEARCHVOLUME: Creating a list of volumes for more information.

You can produce a scratch pull list in batch, and send the output to a printer so that you have a hardcopy listing available to use when pulling tape volumes from the library.

The JCL shown in Figure 1 produces a list of up to 100 scratch volumes. You can change the search parameters to produce a scratch pull list from the subset of all volumes in the library that you currently want to use for scratch processing.

Figure 1. Producing a list of scratch volumes

// EXEC PGM=IKJEFT01
  //SYSTSPRT DD SYSOUT=A
  //SYSTSIN DD *
  RMM SEARCHVOLUME VOLUME(*) STATUS(SCRATCH) TYPE(PHYSICAL) OWNER(*) LIMIT(100)
  /*