Thanks for the guidance. I believe this will work. I tested it using a variety
of numbers and came up with the information I need.
This cares for whole numbers, numbers greater than one with a decimal and those
with just a decimal. That is exactly what I needed.
I knew it was something that needed a combination of functions.
NOTE: The vtcpc is the text number received from a DIALOG
SET VAR vcpc NUMERIC(9,2) = .vtcpc
IF vcpc > 1 THEN
SET VAR vmcpc DOUBLE = (MOD(.vcpc,1))
IF vmcpc = 0 THEN
SET VAR vrcpc REAL = .vcpc
ELSE
SET VAR vrcpc REAL = (.vcpc - (AINT(.vcpc)))
ENDIF
ELSE
SET VAR vrcpc REAL = .vcpc
ENDIF
RETURN
Karen. I had never seen the MOD function. Thanks.
James Belisle
Making Information Systems People Friendly Since 1990
[cid:[email protected]]
From: [email protected] [mailto:[email protected]] On Behalf Of
Doug Hamilton
Sent: Tuesday, March 17, 2020 9:41 AM
To: R:Base List
Subject: Re: [RBASE-L] - capture just the decimal
SET VAR vNumReal REAL = 3.14159
SET VAR vNumDecimal REAL = (.vNumReal - (AINT(.vNumReal)))
SHOW VAR vNum%
RETURN
Doug
On 3/17/2020 9:03 AM, Jim Belisle wrote:
What is the function or combination of functions that will give me just to
decimal portion of a numeric number?
I want to use the decimal portion to determine my next action.
James Belisle
Making Information Systems People Friendly Since 1990
[cid:[email protected]]
--
For group guidelines, visit
http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to
[email protected]<mailto:[email protected]>.
To view this discussion on the web visit
https://groups.google.com/d/msgid/rbase-l/CH2PR02MB7047ED5091A4C04CE8BE2AF4A0F60%40CH2PR02MB7047.namprd02.prod.outlook.com<https://groups.google.com/d/msgid/rbase-l/CH2PR02MB7047ED5091A4C04CE8BE2AF4A0F60%40CH2PR02MB7047.namprd02.prod.outlook.com?utm_medium=email&utm_source=footer>.
________________________________
--
For group guidelines, visit
http://www.rbase.com/support/usersgroup_guidelines.php
---
You received this message because you are subscribed to the Google Groups
"RBASE-L" group.
To unsubscribe from this group and stop receiving emails from it, send an email
to [email protected].
To view this discussion on the web visit
https://groups.google.com/d/msgid/rbase-l/CH2PR02MB70472D1CA4EBF3FC05684EC3A0F60%40CH2PR02MB7047.namprd02.prod.outlook.com.
