Re: Formatting an unformatted file -- MIDRANGE-L

Monarch would do the job.  Normally used to translate Report text files to 
table format, it would be capable of formatting your example into a "flat" 
CSV, Tab delimited or spreadsheet format, all of which could be uploaded to 
the AS/400 via Client Access, and, with the proper authority and version, 
create an externally described database file.




boothm@ibm.net on 11/16/98 07:43:43 PM
Please respond to MIDRANGE-L@midrange.com
To:     MIDRANGE-L@midrange.com
cc: 
Subject:        Re: Formatting an unformatted file

Jeff, just as a thought: one choice would be to write an RPG program that 
resides and runs on the PC and builds this file for you directly onto the 
AS/400.

Most people don't get all excited and tingly about Visual Age RPG, but 
VaRPG can read that PC file as a local program described Input Primary File 
on the PC and write the record(s) as an Output file  as an externally 
described AS/400 Data File, all in the same progam.

In <3650883D.AE1F6E09@fwi.com>, on 11/16/98 
   at 03:17 PM, Jeff Crosby <jlcrosby@fwi.com> said:

>To all,

>I am going to be doing an application whereby I must read a file from a
>PC that looks like this:

>ROUTE "0541"

>INVOICE "1234567890"
>DELIVER_DATE "19981116"
>DELIVER_TIME "121500"
># comment lines start with #
>TERMS 01
>ADJ_QUANT 1 5 2
>ADJ_PRICE 1 5.1295 12.25
>ADJ_ALLOW 1 295 "FSPI" $ 2.5051 02

>INVOICE "987650"
>DELIVER_DATE "19981116"
>DELIVER_TIME "131500"
>TERMS 01
>ADJ_QUANT 1 4 3
>ADJ_PRICE 1 4.12 6.25
>ADJ_ALLOW 1 295 "FSPI" $ 2.51 02
>ADJ_QUANT 1 1 2
>ADJ_PRICE 1 4.00 4.10

>ROUTE "0545"
>INVOICE "1267890"
>DELIVER_DATE "19981116"
>DELIVER_TIME "121500"
># this is a comment line
>TERMS 01
>ADJ_QUANT 1 5 2
>ADJ_PRICE 1 5.1295 12.25
>ADJ_ALLOW 1 295 "FSPI" $ 2.5051 02

>INVOICE "987650"
>DELIVER_DATE "19981116"
>DELIVER_TIME "131500"
>TERMS 01
>ADJ_QUANT 1 4 3
>ADJ_PRICE 1 4.12 6.25
>ADJ_ALLOW 1 295 "FSPI" $ 2.51 02
>ADJ_QUANT 1 1 2
>ADJ_PRICE 1 4.00 4.10

>etc, etc, etc.

>and put it into formatted OS/400 files.  Consecutive input records can
>all relate to what will become a single OS/400 database record.

>Blank records and comments are to be ignored.

>I have done this on a smaller scale in the past via the Brute Force And
>Ignorance Method(1), but I can't believe there isn't an easier way to do
>it.  This is not the forte of RPG, though the RPGIV syntax makes it a lot
>easier.  Has anyone got or seen a good way that you can point me in the
>direction of?  Thanks.

>-Jeff

>(1) "Brute Force And Ignorance Method" is a registered trademark of Dave
>Shaw.  Used here totally without his permission or knowledge.  I'll
>probably hear about it too. <g>
>+---
>| 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
>+---


-- 
-----------------------------------------------------------
boothm@ibm.net
Booth Martin
-----------------------------------------------------------

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




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