Filename Filetype Fm Format Lrecl    Records     Blocks   Date
Time   
   DEB      EXEC     A1 F         78         25          1  7/26/04
15:28:57 
   DEB      TAPE     A1 F         78         27          1  7/26/04
15:26:25 
   DEBIAN   PARMFILE A1 F       1024          1          1  7/26/04
14:08:26 
   DEBIAN   KERNEL   A1 F       1024       2447        524  7/26/04
14:08:20 
   DEBIAN   INITRD   A1 F       1024       1284        321  7/26/04
14:08:11 
   MAINT    NETLOG   A0 V        107         10          1  5/14/04
7:54:00 
   SFPURGER LOG04135 A1 F       1024          1          1  5/14/04
7:53:44 
   SFPURGER TST04135 A1 F       1024          4          1  5/14/04
7:53:44 
   VM43USER DIRECT   A1 F         80       2163         43  3/08/04
10:48:24 
   MAINT    FILELIST A0 V        169         14          1 12/18/03
12:30:07 
   SFPURGER LOG03350 A1 F       1024          6          2 12/16/03
19:13:49 
   SFPURGER RUN03350 A1 F       1024          8          2 12/16/03
19:13:49 
   SFPURGER TST03350 A1 F       1024          8          2 12/16/03
19:13:37 
   VM43USER DISKMAP  A1 F         80        945         19 12/16/03
9:24:48 
   VM43DIRS DIRECT   A1 F         80       2162         43 12/15/03
11:30:52 
   Z800SAV  IOCP     A1 F         80         78          2 12/12/03
2:22:12 
   Z800RN   IOCP     A1 F         80        103          3 12/12/03
2:07:10 
Help       2= Refresh  3= Quit   4= Sort(type)  5= Sort(date)  6=
Sort(size) 
Backward   8= Forward  9= FL /n 10=            11= XEDIT/LIST 12= Cursor


Above is what I have the deb is the exec proc below.....am I just about
there.........????

&CONTROL OFF                                                          
&TRACE ALL                                                            
CP SP PRINTER CLASS O                                                 
*---------------------------------------------------------------------
*   CHECK OUT THE TAPE DRIVE                                          
*---------------------------------------------------------------------
-CHKTAPE                                                              
CP REWIND 181                                                         
TAPE WTM 25                                                           
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 DEBIAN KERNEL A                                      
FILEDEF IN2 DISK DEBIAN PARMFILE A                                    
FILEDEF IN3 DISK DEBIAN INITRD A                                      
FILEDEF OUT TAP1 (RECFM F BLOCK 1024 LRECL 1024 PERM)                 
MOVEFILE IN1 OUT                                                      
MOVEFILE IN2 OUT                                                      
MOVEFILE IN3 OUT                                                      
MOVEFILE IN3 OUT                                                     
SAY 'DONE.'                                                          
TAPE RUN                                                             
&TYPE *** DONE RALPH ***                                             
&EXIT 0                                                              
* * * End of File * * *                                              
                                                                     

-----Original Message-----
From: David Boyes [mailto:[EMAIL PROTECTED] 
Sent: Monday, July 26, 2004 8:58 PM
To: [EMAIL PROTECTED]
Subject: Re: mp2003

On Mon, Jul 26, 2004 at 03:35:10PM -0500, Noll, Ralph wrote:
> Ok.. I used vm to transfer the 3 files to vm rdr..
> Ran the rexx exec to write to tape
> Ipl'ed the mp2003 and now I get a disabled wait..
> Like the tape is not what it is expecting....

For the exec to succeed as written, the files need to be on disk, not in
the VM spool space.

The FILEDEF commands in the exec are the equivalent of VSE logical name
assignments. As written, they point to disk files, not spool files.
MOVEFILE is equivalent to IEBGENR - all it does is read from input,
write to output, repeat until EOF on the input file.

-- db

----------------------------------------------------------------------
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

Reply via email to