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



If you go this route, you want to make sure than the negative symbol is either 
at the beginning or the end and not in the middle. You'll also need to make 
sure that just numbers are entered since using a character field would allow 
someone to enter garbage like A-B1. A validation routine like this would be a 
great service program. 

There are also examples of this type of code available. An example of one is at 
http://www.netshare400.com/cgi-bin/DSPSAMP?file=QRPGLESRC&mbr=F.CONVERT. This 
example strips non-numerics out so my garbage example would come back as -1. I 
use this specific routine quite a bit when validating numerics from CGI 
programs since all of the parameters come in as character data.

Matt

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of
ganeshkumar.murugesan@xxxxxxxxx
Sent: Wednesday, March 16, 2005 5:51 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: RE: Question of retreiving the negative value in the program



Use a character field (which is one length greater than the actual
field) in the screen. Inside your program, scan for the '-' sign and if
found process accordingly.

Note: This will work fine if the user enters the data either way. 100-
or -100.


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Matchrefree@xxxxxxxxx
Sent: Wednesday, March 16, 2005 3:58 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Question of retreiving the negative value in the program

Hi

I know when i enter 100- as the input i am getting the value as
negative.
But the question i like to ask is is there any way i can retreive the
nagative value in the program if the user enters -100 in the screen
field.

I am using

CVAR1             S           3P 0  INZ(0)

 this is the varaible that hold the value entered be the user in the
screen field FLD001 whihc is given as

 A            FLD001           3Y 0B  9 33

The program works fine for negative condition if the user enters 100-.
Is it possibel to catch -100 entered?.            Please excuse me if my
questions seems to be dumb.

Thanks a lot
Hari
<snip>


As an Amazon Associate we earn from qualifying purchases.

This thread ...


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.