RE: Scott K's CSV code

["Jack Tucky" <jacktucky@xxxxxxxxx>]

Thanks Scott.  I'll rename everything definitely :-)

The EDI spec  for the GS segment has 8 fields all of varying lengths.  I
have a file that I use as an ext-DS that has the fields defined as Alpha.
Other segments have numeric.  I know that I have to put the numerics into a
work field and then convert.

Can I change the procedure parameters to accept an alpha field that's 256
characters and pass a 2 character field?

Jack
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Scott Klement
Sent: Wednesday, March 12, 2014 1:28 AM
To: Midrange Systems Technical Discussion
Subject: Re: Scott K's CSV code

Jack,

There doesn't seem to be anything to reset your 'bufpos' variable back 
to 0 when you re-run the program.  Since it's already at the end of the 
string, there's nothing left to read.

My original code would reset this when you read a new record.

If you do change this to work on EDI-formatted data, I would consider 
naming the procedures EDI_open(), EDI_getdata, etc.   seems weird to 
still call them "CSV", and add an x to the end of the procedure names.

On 3/11/2014 9:10 PM, Jack Tucky wrote:
> Well I've been changing things and the first time I run my CSVDEMO5
program
> it runs great.
>
> Then next time the test data is blank.