×

Good News Everybody!

The new search engine is LIVE!

Please report any problems to david (at) midrange.com.




Phil,

If your moving data to the IFS you don't need to use
the "To data base file:" parameter, just specify
your stream file (as you have done).

Also, if this file is going to be read by PC based
applications, change your "Stream file code page"
to *PCASCII and you'll have better results opening
it.

Terry


> -----Original Message-----
> From: Phil Campbell [mailto:pcampbell@xxxxxxxxxxxx] 
> Sent: Tuesday, March 09, 2004 11:46 AM
> To: cobol400-l@xxxxxxxxxxxx
> Subject: [COBOL400-L] CPYTOIMPF command
> 
> 
>              
> Thanks for all of your help.  I greatly appreciated it.  I 
> tried the following command.
> It game me the command that followed.  Am I on the right 
> track? What is the 'data base' file that the system is 
> copying to?  There is data on DELOPEN.  Why do i get the 
> message that no records are copied?
> 
> Thanks .. Phil
> 
> pcampbell@xxxxxxxxxxxx
> 
> --------------------------------------------------------------
> ------------------
> 
>                         Copy To Import File (CPYTOIMPF)       
>             
>                                                               
>             
> Type choices, press Enter.                                    
>             
>                                                               
>             
> >From file:                                                   
>              
>   File . . . . . . . . . . . . . > DELOPEN       Name         
>             
>     Library  . . . . . . . . . . >   QS36F       Name, *LIBL, 
> *CURLIB     
>   Member . . . . . . . . . . . .   *FIRST        Name, *FIRST       
> To data base file:                                            
>                  
>   File . . . . . . . . . . . . . > DELOPEN       Name         
>                  
>     Library  . . . . . . . . . . >   QS36F       Name, *LIBL, 
> *CURLIB          
>   Member . . . . . . . . . . . .   *FIRST        Name, *FIRST 
>                  
> To stream file . . . . . . . . . > '"h:phil''s data\delopen"' 
>                  
>                                                               
>                  
> Replace or add records . . . . . > *REPLACE      *ADD, 
> *REPLACE                
> To CCSID . . . . . . . . . . . .   *FILE         1-65533, 
> *FILE                
> Stream file code page  . . . . .   *STMF         1-32767, 
> *STMF, *PCASCII...   
> Record delimiter . . . . . . . . > *CRLF         Character 
> value, *EOR...      
> Record format of import file . . > *FIXED        *DLM, *FIXED 
>                  
> Null field indicator . . . . . .   *NO           *NO, *YES 
> Decimal point  . . . . . . . . .   *PERIOD       *PERIOD, 
> *COMMA               
> Date format  . . . . . . . . . .   *ISO          *ISO, *USA, 
> *EUR, *JIS, *YYMD 
> Time format  . . . . . . . . . .   *ISO          *ISO, *USA, 
> *EUR, *JIS        
>                                                               
>                                      
>                                                               
>          More... 
> F3=Exit   F4=Prompt   F5=Refresh   F12=Cancel   F13=How to 
> use this display    
> F24=More keys                                                 
>                  
>                              
> --------------------------------------------------------------
> -----------------
> 
>  No records copied from file DELOPEN in QS36F. 
>                                                   
> 
> _______________________________________________
> This is the COBOL Programming on the iSeries/AS400 
> (COBOL400-L) mailing list
> To post a message email: COBOL400-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/cobol400-l
> or email: COBOL400-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/cobol400-l.
> 

As an Amazon Associate we earn from qualifying purchases.

This thread ...


Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2026 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.