Re: Tilde delimited fields in a PC file - how to upload & convert fields to AS/400 physical file

["L. S. Russell" <leslier@xxxxxxxxxx>]

You could use perl;

$record =  "40354~KMART STORE# 37~3665 HWY
6~~DALLAS~TX~77478~~~~~713-980-8888~~~4362~~100~3~0~0~~0~";

@fields = split(/~/, $record);


You would get the record from the delimited file, and I am not sure but
I think you could use the system, or exec operations in perl to pass the
@fields to an RPG which could write the record.


http://www.as400.ibm.com/tstudio/workshop/tiptools/perl.htm


> "Stone, Joel" wrote:
> 
> An example record:
> 
> 40354~KMART STORE# 37~3665 HWY
> 6~~DALLAS~TX~77478~~~~~713-980-8888~~~4362~~100~3~0~0~~0~
> 
> Are there any utilities to split a file with records as shown above
> into an AS/400 PF?  I would like the tilde's gone, where each tilde
> acts as the delimiter to begin a new field.
> 
> Can Client/Access do this job by itself?
> 
> What other options to I have.  Does anyone know of a magazine article
> with a free utility program?  Other options?
> 
> Must I build the DDS by hand?  I have a listing of field names and
> lengths.
> 
> The data is from a query tool on a Unix box.
> 
> Thanks!

--
L. S. Russell Programmer/Analyst
Datrek Professional Bags, Inc.
2413 Industrial Drive
Springfield, TN. 37172
mailto:leslier@datrek.com
http://www.datrek.com
--
+---
| 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
+---