× 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.




Isn't that what the MONITOR op code is for?

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com


|-----------------------------+-------------------------------------------|
|   "Bob Cozzi"               |                                           |
|   <cozzi@xxxxxxxxx>         |                                           |
|   Sent by:                  |                                         To|
|   rpg400-l-bounces@midrange.|                                   "'RPG   |
|   com                       |                                   programm|
|                             |                                   ing on  |
|   08/09/2004 12:59 PM       |                                   the     |
|                             |                                   AS400 / |
|         Please respond to   |                                   iSeries'|
|      RPG programming on the |                                   "       |
|          AS400 / iSeries    |                                   <rpg400-|
|      <rpg400-l@xxxxxxxxxxxx>|                                   l@midran|
|                             |                                   ge.com> |
|                             |                                         cc|
|                             |                                           |
|                             |                                     Fax to|
|                             |                                           |
|                             |                                    Subject|
|                             |                                   RE: %Int|
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|                             |                                           |
|-----------------------------+-------------------------------------------|






This is what I was talking about a few months ago... both %INT and %DEC
require that you first check the field to make sure it has a valid numeric
value in it before using the built-in.  I wish it would "just return zero"
when the field is blank, but that's why I continue to use the RPG xTools'
chartonum() procedure.
-Bob


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Tim Kredlo
Sent: Monday, August 09, 2004 12:41 PM
To: RPG400-L@xxxxxxxxxxxx
Subject: %Int

I am using %Int to convert an alpha screen field (6D B CHECK(RB) ) to a
shorter numeric field (5S 0).
Works except when the field is ALL blanks, then I get a 'A character
representation of a numeric value is in error' error.

Checked manual ("Blanks are allowed anywhere in the data. For example, ' +
3
' is a valid parameter.") and archives.

Am I doing something wrong or does %Int not work with 'all blank' fields.

TIA

Tim Kredlo
Exterior Wood,




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



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




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.