Well don't leave me hanging.. Help me fix it..Please Thanks
> -----Original Message----- > From: Coffin Michael C [mailto:[EMAIL PROTECTED] > Sent: Monday, July 26, 2004 2:51 PM > To: [EMAIL PROTECTED] > Subject: Re: mp2003 > > Ralph, > > Where did you get this? It's a combination of EXEC 1/2 > (technically, EXEC1 because &CONTROL is the first record, but > then you immediately have an EXEC2 > &TRACE) and REXX that will never work............. At least > not as expected (you'll probably get RC -3 Invalid command > for 'SAY', for example). > > Michael Coffin, VM Systems Programmer > Internal Revenue Service - Room 6527 > 1111 Constitution Avenue, N.W. > Washington, D.C. 20224 > > Voice: (202) 927-4188 FAX: (202) 622-6726 > [EMAIL PROTECTED] > > > > -----Original Message----- > From: Linux on 390 Port [mailto:[EMAIL PROTECTED] On > Behalf Of Noll, Ralph > Sent: Monday, July 26, 2004 3:42 PM > To: [EMAIL PROTECTED] > Subject: Re: mp2003 > > > 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 > > ---------------------------------------------------------------------- > 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 > ---------------------------------------------------------------------- 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
