Need to add scratch logic to an EARL TLMS report.
Release : 14.0
Component : TLMS Tape Management
Find the following code in your EARL/TLMS program:
SET TYPRUN = R_VOLUME
IF TAPEDB = 'E'
Insert the following code after that:
IF SCRATCH_IND = 'N'
1). IF SCRATCH_IND = 'N' . Check if the volume is a non-scratch/active volume.
2). If the volume is still active, skip this volume and get the next volume in the VMF.
3). Close out 'IF' statement.