Below is the rexx exec I have... Will it Work????? &CONTROL OFF
&TRACE ALL CP SP PRINTER CLASS O - CP LINK MAINT 123 F123 RR *--------------------------------------------------------------------- * CHECK OUT THE TAPE DRIVE *--------------------------------------------------------------------- -CHKTAPE CP REWIND 181 &IF &RETCODE = 0 &GOTO -TAPEOK &TYPE ATTACH BACKUP TAPE AS 181 AND RE-START THIS EXEC &EXIT &RETCODE -TAPEOK FILEDEF IN1 DISK SLES7 IMAGE A FILEDEF IN2 DISK SLES7 PARM A FILEDEF IN3 DISK SLES7 INITRD A FILEDEF OUT TAP1 (RECFM F BLOCK 1024 LRECL 1024 PERM') say 'Writing: ' left(file1,23) MOVEFILE IN1 OUT say 'Writing: ' left(file2,23) MOVEFILE IN2 OUT say 'Writing: ' left(file3,23) MOVEFILE IN3 OUT say 'Done.' TAPE RUN &TYPE *** done ralph *** &EXIT 0 ---------------------------------------------------------------------- For LINUX-390 subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: INFO LINUX-390 or visit http://www.marist.edu/htbin/wlvindex?LINUX-390
