Re: Restoring a .txt file

Angela,
When I was searching for information on how to code subprocedures I came
across this page,
http://www-1.ibm.com/servers/enable/site/ebiz/cgi.html. It has an
example of a program that will convert character to numeric, an example
of how to use it and an outline of how it works.

HTH

Terry

> 
> message: 6
> date: Wed, 9 Feb 2005 12:38:57 -0500
> from: "Angela Wawrzaszek" <awawrzaszek@xxxxxxxxxxxxxxx>
> subject: Restoring a .txt file
> 
>    Help!
> 
>  
> 
>     I have a .txt file that was saved from an as/400 inventory file.  It
> was saved as a fixed format file.   I now want to bring that .txt file
> back to the as400 to run queries on it.   However since it was fixed
> there is not comma delimiters etc.   So I copied it back to a flat file
> on the as400 and then tried using the cpyfrmimpf command to copy it back
> into its regular format.   The problem occurs because there is numeric
> data in the file.  Therefore the copy crashes because I am trying to
> copy  17.00  - which is beign treated as a character field to a numberic
> field.
> 
>  
> 
> The command used to copy the data to the .txt file was:
> 
>  
> 
>  
> 
> CPYTOIMPF  FROMFILE(Mylib/MyFile) +                           
> 
>              TOSTMF('home/yearend/yearend2004/MyFile.t +
> 
>              xt') MBROPT(*REPLACE) +                       
> 
>              STMFCODPAG(*PCASCII) RCDDLM(*CRLF) +          
> 
>              DTAFMT(*FIXED) STRDLM(*NONE)    
> 
>  
> 
>  
> 
> Can anyone help me to restore this to its original data formats?
> 
>  
> 
> Thanks!              
> 
>  
> 
>  
> 
>  
> 
> Angela Wawrzaszek
> 
> IT Supervisor
> 
> awawrzaszek@xxxxxxxxxxxxxxx
> 
> (315) 258-4205
> 
>  
> 
> 
> 
> ------------------------------
>