Re: Bad numeric data

[Jon Paris <jon.paris@xxxxxxxxxxxxxx>]

No need for program described Booth.

If you use DS I/O then the errors will not be triggered as the whole buffer is moved not individual fields.

You can then use Monitor within the code to deal appropriately with the errant field(s).

For your delight and edification may I present http://www.itjungle.com/fhg/fhg031715-story01.html


Jon Paris

www.partner400.com
www.SystemiDeveloper.com

On May 14, 2015, at 11:37 AM, Booth Martin <booth@xxxxxxxxxxxx> wrote:

> Perhaps a small RPG program defining the file as a program-described file with I-fields defining the columns in question? Instead of eternally described?  That allows you to look at the data as-is to help define the problem? Once the problem is defined you can look at your options for repairing the problem.
> 
> On 5/14/2015 10:42 AM, John McKee wrote:
>> A field on a file on the remote 520 is defined as numeric 8 0.  Supposed to
>> have date in form of CCYYMMDD.  I ran a query on the field.  Lots of bad
>> values.  I was hoping to see what might be in the field.  Never worked with
>> CAST in SQL.    Never needed to before.
>> 
>> When I try this:
>> 
>> select cast(xxxxxx as char(20) from xxxxxx. I get either some numeric value
>> (usually a single 0) or the '+' sign with it repeated 20 times.
>> 
>> An IBM query on the field showed the values as different - at least when
>> sorted and grouped, each group had one record.
>> 
>> I am not sure, yet, what value should be forced into the field to clean up
>> the data.
>> 
>> How do I add a where to the above select to only locate non-numeric values?
>> 
>> John McKee
>> 
> -- 
> Booth Martin<br>
> www.martinvt.com<br>
> (802)461-5349<br><br>
> 
> For a while there I was worried that my tin foil beanie was blocking the
> TopFive.com website. Luckily it turned out to be a router problem.
>        -- Attributed to "wubwub", quoted on www.ruminate.com (2004)
> -- 
> This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> To post a message email: MIDRANGE-L@xxxxxxxxxxxx
> To subscribe, unsubscribe, or change list options,
> visit: http://lists.midrange.com/mailman/listinfo/midrange-l
> or email: MIDRANGE-L-request@xxxxxxxxxxxx
> Before posting, please take a moment to review the archives
> at http://archive.midrange.com/midrange-l.
>