Re: Client Access woes...

Making everything uppercase should be easy enough to do with RPG - the
XLATE op code works great, and Bob Cozzi's example in his book shows just
how to do this. There are also other methods -- I think some of them have
been discussed on this list (or maybe RPG-L).

As for the formatting, how about creating your file on the AS/400 with
only one (large) field; then fill the field with whatever you want, making
it look just the way the state requires? CA download shouldn't affect this
since all formatting will be internal to the field (just download as plain
old ASCII text format). If you're using RPGIV, the EVAL op code would be
ideal for this, together with some of the BIFs (what a godsend!); in
RPGIII, you'd have to set up a DS over the field & maybe do some fancy
array work if you want to eliminate embedded spaces.

If you'd like more details, feel free to ask.

hth,

MIDRANGE-L@midrange.com writes:
>We are an insurance company which recently have been forced to provide
>monthly data covered insured motorist to a state in which we do business,
>all defined to their specifications. We have developed the RPG program
>which
>retrieves and displays the data as per their specs, however, when we
>download the file from AS/400 to PC, Client Access inserts an additional
>space between each field, which we have been notified is unacceptable.
>Another required spec that has been a problem, the data must be submitted
>in
>uppercase. Can anyone recommend a means to meet both requirement using
>Client Access?
>
>Thanks in advance!
>Kenny


Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA  01376
413-863-4357 x444
mnaughton@juddwire.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
+---