I am currently testing with logic very similar to your code. I can make it
work, and if this was a one-time deal that would be ok. In this case I just
need a simple way to do it. I am defining the screen field as alpha but
that gets ugly because I have to translate both directions, and check for a
valid numeric value. And the field can be populated by the user or from the
file (multiple places). And we're talking about dozens of fields across
hundreds of programs. That's why I'm looking for a simple solution.
"Dan Kimmel" <dkimmel@xxxxxxxxxxxxxxx> wrote in message
news:mailman.38585.1279040035.2580.midrange-l@xxxxxxxxxxxxxxx
untested:
if %scan('.',thefield)>0 then
numval = %dech(thefield:15:4)
else
numval = %dec(thefield:15:0)*.0001
endif
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Wintermute, Sharon
Sent: Tuesday, July 13, 2010 11:29 AM
To: Midrange Systems Technical Discussion
Subject: RE: Was a decimal point keyed?
But there again, it is one way or the other, not both at the same time.
Sharon Wintermute
-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Michael Naughton
Sent: Tuesday, July 13, 2010 11:25 AM
To: Midrange Systems Technical Discussion
Subject: Re: Was a decimal point keyed?
Actually, some calculators can be set to assume a decimal point, so for
example keying "123" becomes "1.23", while keying "123." becomes
"123.00". I think it's called "accountant mode". I got used to using
that mode years ago when I had to add up long columns of dollar amounts,
and I like it -- it does save keystrokes. :-)
Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> writes:
Did you try to tell them "its like a calculator, you need to tell it
what to do."
They have to key the point on a calculator, why should it be any
different?
Sharon Wintermute
Mike Naughton
Senior Programmer/Analyst
Judd Wire, Inc.
124 Turnpike Road
Turners Falls, MA 01376
413-676-3144
Internal: x 444
mnaughton@xxxxxxxxxxxx
****************************************
NOTICE: This e-mail and any files transmitted with it are confidential
and solely for the use of the intended recipient. If you are not the
intended recipient or the person responsible for delivering to the
intended recipient, be advised that any use is strictly prohibited. If
you have received this e-mail in error, please notify us immediately by
replying to it and then delete it from your computer.
midrange.com
