Code: |
"TAPE REW" "PIPE (END ?) TAPE", "| f: fanout", "? f: | TAKE 1 | SPECS 5.6 | var volser", "? f: | DROP 1 | TAKE 1 | SPECS 49.5 ", "| DATECONVERT REXXJ REXX_DATE_S | VAR TAPEDATE" "TAPE REW" "CP DETACH VIRTUAL 181" "CP SLEEP 15 SEC" "TAPCMD TAPEMOD VOL" volser "EXPDATE" tapedate "(WAIT" "TAPCMD TAPEQRY VOL" volser "(WAIT" |
output generated using printer-friendly topic mod. All times are GMT - 5 Hours