× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: Formatting Data in RPG 4
  • From: "Justin Kiteley" <justin@xxxxxxxxxx>
  • Date: Wed, 25 Apr 2001 16:11:25 -0400
  • Organization: Application Solutions Inc.

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


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

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

This mailing list archive is Copyright 1997-2024 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.