Re: Question of retreiving the negative value in the program

%int will give you the good result.

----- Original Message ----- 
From: <ganeshkumar.murugesan@xxxxxxxxx>
To: <rpg400-l@xxxxxxxxxxxx>
Sent: Wednesday, March 16, 2005 11:50 AM
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
>
> Booth Martin <booth@xxxxxxxxxxxx> wrote:
> Can you give a little more information? What is the C-spec that you are
> using to recover the value?
>
> (This sounds like something else is going on. There should be little
> problem in getting a negative number.)
>
> ---------------------------------
> Booth Martin
> http://www.martinvt.com
> ---------------------------------
> -------Original Message-------
>
> From: RPG programming on the AS400 / iSeries
> Date: 03/15/05 06:27:14
> To: RPG400-L@xxxxxxxxxxxx
> Subject: Question of retreiving the negative value in the program
>
> Hi
>
> How to retreive the neagtive value entered by the user from the screen
> to
> the program.
> I have a numeric field Var1. If I enter a value as -100, inside the
> program
> i am getting the value as 100. So the condition for negative valued gets
> skipped.
> I have alos tried few Editcodes and but i ends in vain.
> Could anyone tell me how to capture the negative values (entered in the
> screen) inside the RPFLE program.
>
>
> Thanks
> Hari
>
> __________________________________________________
> Do You Yahoo!?
> Tired of spam? Yahoo! Mail has the best spam protection around
> http://mail.yahoo.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.
>
>
> .
> --
> 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.
>
>
>
> ---------------------------------
> Do you Yahoo!?
>  Yahoo! Small Business - Try our new resources site!
> --
> 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.
>
>
>
> Confidentiality Notice
>
> The information contained in this electronic message and any attachments
to this message are intended
> for the exclusive use of the addressee(s) and may contain confidential or
privileged information. If
> you are not the intended recipient, please notify the sender at Wipro or
Mailadmin@xxxxxxxxx immediately
> and destroy all copies of this message and any attachments.
>
> -- 
> 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.
>
>