Re: Formatting Data in RPG 4

["Justin Kiteley" <justin@xxxxxxxxxx>]

Title: RE: Formatting Data in RPG 4

 

David,

 

  Hehe, I had the same reaction when I heard it.  I threw it in there to see if I got any bites of recognition.  One of my co-workers used to be in a shop where they formatted data for EDI purposes in the same way I'm trying to do.  They referred to the formatted data as "snake" files! 

 

For example.

Instead of having:

 

Record 1 -  ABC  123   ABC

Record 2 -  DEF  456   DEF

Record 3 -  GHI   789   GHI

 

You would format it like this:

 

Record 1 - ABC 123 ABCDEF 456 DEFGHI 789 GHI

 

 

 

Justin Kiteley

 

 

----- Original Message -----

From: Leland, David

To: 'RPG400-L@midrange.com'

Sent: Wednesday, April 25, 2001 3:44 PM

Subject: RE: Formatting Data in RPG 4

Okay, I'll bite <gr>.  What's a "snake" file?

-----Original Message-----
From: Justin Kiteley [mailto:justin@asiwms.com]
Sent: Wednesday, April 25, 2001 1:48 PM
To: RPG400-L@midrange.com
Subject: Formatting Data in RPG 4

Hello everyone,

   Anybody have any experience formatting data into a "snake" file?  I've
written a module that reads in data from a file, uses checkr to find out the
right most data in an 80 column field, if the right most data is not 80 then
reads the next record, uses %subst to fill up the orig line to 80 chars,
writes out the new 80 char field and so on. Currently I'm having trouble
with recognizing the necessary spaces in the data and allowing for them.

   My question:  Is there an API, command, or method that is easier to
implement and follow and that will accomplish the same thing that I'm doing?
Thanks in advance for any help!

Justin Kiteley
justin@asiwms.com

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