Re: Tape Processing on the AS/400(OS400 3.2)?

[Billy Rowe <billyrowe@xxxxxxx>]

David W. Loveless wrote:
> 
> I've got a few tape handling problems on our AS/400.....
> 
> (1) I'm trying to read in a 3480 tape created on an MVS system - create a 
>file on
> the AS/400, possibly change it and then FTP to another system. I can use 
>DSPTAP
> or DMPTAP to see the contents of the tape but I need to put it down
> on to the AS/400 as a file. The tape contains an MVS file that's Variable 
>Blocked
> with a Maximum Blocksize of 32K. Do you have any idea how to define the
> file and what tools to use to change it on the AS/400 before FTPing it?

If the DMPTAP command doesn't show you the record length then you need
to get
the record length of the file(s) from whomever sent you the file(s),
then you
can create a empty file with that record length using the CRTPF command
and use
the CPYFRMTAP command to copy the file(s) to the disk file.
You should use QTAPE as the from file parameter and then specify the
rest of
the parameters similar to the following:

                           Copy From Tape
(CPYFRMTAP)                           
                                                                                
 Type choices, press
Enter.                                                     
                                                                                
 Tape file  . . . . . . . . . . . > QTAPE        
Name                          
   Library  . . . . . . . . . . .     *LIBL       Name, *LIBL,
*CURLIB          
 To file  . . . . . . . . . . . . > X             Name,
*PRINT                  
   Library  . . . . . . . . . . . >   X           Name, *LIBL,
*CURLIB          
 Sequence number  . . . . . . . . > 1             1-65535, *TAPF,
*NEXT         
 Tape label . . . . . . . . . . .  
*TAPF                                       
 Member . . . . . . . . . . . . . > *FIRST        Name, *FROMLABEL,
*FIRST      
 Device . . . . . . . . . . . . . > TAP01         Name,
*TAPF                   
                + for more
values                                               
 Copy from
reels:                                                               
   Label processing type  . . . . > *NL           *TAPF, *SL, *NL, *NS,
*BLP... 
   Number of reels  . . . . . . .   *TAPF         1-255,
*TAPF                  
 Record length  . . . . . . . . . > XXXXXX        Number, *TAPF,
*CALC          
 End of tape option . . . . . . .   *TAPF         *TAPF, *REWIND,
*UNLOAD...    
 Replace or add records . . . . . > *ADD          *NONE, *ADD,
*REPLACE         
Volume identifier  . . . . . . .   *TAPF         Character value, *TAPF,
*NONE 
               + for more
values                                               
Block length . . . . . . . . . .   *TAPF         1-524288, *TAPF,
*CALC        
Record block type  . . . . . . . > XXXXX         *TAPF, *F, *FB, *V,
*VB...    
Number of records to copy  . . .   *END          Number,
*END                  





> (2) I'm trying to copy a tape (3480) that was created using IBM's SAVE Entire
> System. When I use the DUPTAP command it only copies the first part of the 
>tape 
> the part that holds the SAVSYS output. How do I get the system to copy the    
>   > ENTIRE tape?

Do a DSPTAP on the tape you are trying to duplicate and manually enter
the first
and last sequence# to copy.

Hope this helps!!!

Billy

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---