RE: data decimal errors

[rick.baird@xxxxxxxxxxxxxxx]

Jon,

Thanks!  your 5.1 trick should do the trick.

I hadn't thought of that (obviously), and as it happens, i already have a
monitor group around the calcs in question, so it should be a no brainer
change!

btw, enjoyed your cgidev2 class at common.

thanks again,

Rick Baird
317-655-7318



-----rpg400-l-bounces@xxxxxxxxxxxx wrote: -----

To: <rpg400-l@xxxxxxxxxxxx>
From: "Jon Paris" <Jon.Paris@xxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
Date: 09/21/2003 01:43PM
Subject: RE: data decimal errors

>> my rpg program blows up on the read - no chance for the MONITOR in the
calcs.

Two simple options that allow for Monitor (TestN is a waste of time - it
doesn't always work! - you could use the numeric validation routine from
CGIDEV2 though.)

Option 1 - for V5R1+.

Program describe the file - use the option to have the Read go directly
into
an externally described DS created from the database. Wrap MONITOR round
the operations of the file fields - the explosion will only happen when the
fields are "touched" not when the record is read into the DS.

Option 2 - for V5R2+.

Same as option 1 but no need to externally describe the file. Simply create
the DS using the LIKEREC keyword and read directly into the DS.

Voila! Problem solved.


Of course if you really like hard work you could parse the CSV file
yourself
in RPG and validate the (supposedly) numeric fields as mentioned above -
but
these options are real easy to implement within your current framework.

Jon Paris
Partner400
www.Partner400.com


_______________________________________________
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
 Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.