Round Number to 50 and 100 - Formula

[markbwillard]

Re: Round Number to 50 and 100 - Formula

You are right! Good thinking!

[GGandhi]

Re: Round Number to 50 and 100 - Formula

you want number 76.99 to be 49.99?
does not sound good!

[markbwillard]

Re: Round Number to 50 and 100 - Formula

Thanks a lot!

Is there anyway we can seperate that.

One function to confer any given number to #49.99 and
another one to #99.99

I think that will work better.

I greatly appreciate your time. Thanks again.

[GGandhi]

Re: Round Number to 50 and 100 - Formula

I would like following:
1) If 23.45 then 49.99
2) If 123.49 then 149.99
3) If 1247.76 then 1249.99
GENERAL: if #(Less than 50).## then #49.99
3) if 158.67 then 199.99
4) if 198.65 then 199.99
5) if 4569.65 then 4599.99
GENERAL: if #(less than 100 and greater than 50).## then #99.99

?getNumber(23.45)
= "49.99"

?getNumber(123.49)
= "149.99"

?getNumber(1247.76)
= "1249.99"

?getNumber(158.67)
= "199.99"

?getNumber(198.65)
= "199.99"

?getNumber(4569.65)
= "4599.99"

this is what i got using the code.

[markbwillard]

Re: Round Number to 50 and 100 - Formula

I am looking for following:

I would like following:
1) If 23.45 then 49.99
2) If 123.49 then 149.99
3) If 1247.76 then 1249.99
GENERAL: if #(Less than 50).## then #49.99
3) if 158.67 then 199.99
4) if 198.65 then 199.99
5) if 4569.65 then 4599.99
GENERAL: if #(less than 100 and greater than 50).## then #99.99

[GGandhi]

Re: Round Number to 50 and 100 - Formula

just post an example
if this i want this.

i will check against the code
i have since modified the code and made it compact, i am sure you can do that too.

[markbwillard]

Re: Round Number to 50 and 100 - Formula

Hi Ghandi:
Thanks for the help. Actually I used it to calculate in the table and gave you the desktop. since I am just starting out converting to web format.

Quick questions:

When I pass "276.23" why does this spit out "249.99" rather 299.99? 

And when I pass 327.77 it spits out 399.99 rather 349.99 

FUNCTION getNumber AS C (n AS N )

dim intN as n
dim intN2 as n
dim modN as n
dim modN2 as n
dim modN3 as n

modN3 = mod((n*100),50)
if modN3 = 0 then
intN2 = int(n/50)
getNumber = ((intN2+1) * 50)- 1
else
intN = int(n/100)
modN = mod(n,100)
mod2 = if(modN > 50,99.99,49.99)
getNumber = intN*100 + mod2
end if

getNumber = alltrim(str(getNumber,250,2))

END FUNCTION

[GGandhi]

Re: Round Number to 50 and 100 - Formula

i looked into the zip file. it is on desktop.
you are better off posting this in the desktop forum ( you have already started similar thread there, you can post this zip file there)
you will get better help there.
i am not that well equipped in desktop. i may not be that much of help as opposed some fantastic people out there. they can do much better job than i can.

[markbwillard]

Re: Round Number to 50 and 100 - Formula

New Issue:

How can I get this code to spit out only #49.99 or #99.99 not #49.00 or #100.00?

FUNCTION getNumber AS C (n AS N )

dim intN as n
dim intN2 as n
dim modN as n
dim modN2 as n
dim modN3 as n

modN3 = mod((n*100),50)
if modN3 = 0 then
intN2 = int(n/50)
getNumber = ((intN2+1) * 50)- 1
else
intN = int(n/100)
modN = mod(n,100)
mod2 = if(modN > 50,99.99,49.99)
getNumber = intN*100 + mod2
end if

getNumber = alltrim(str(getNumber,250,2))

END FUNCTION

[markbwillard]

Re: Round Number to 50 and 100 - Formula

HI Gandhi:

Running into a problem when I use this into a calculated filed. Would you kinldy take a look at this?

Please take a look at the table "secondspecialorder" and calulated filed "grade1_rounder".

Note that it triggers based on the value "rounder_id".

I am attaching the project.


Thanks.
Mark

[markbwillard]

Re: Round Number to 50 and 100 - Formula

I am on both. I am in the process of converting a desktop to a web.

Thanks for the help!

[GGandhi]

Re: Round Number to 50 and 100 - Formula

I will have three checkboxes on the form how do I corporate this?

are you working on a desktop or web application?

[GGandhi]

Re: Round Number to 50 and 100 - Formula

How about:
If the value is 432.99 should be 432.99
If the value is 34.87 then it should be 34.99
If the Value is 56.12 then it should be 56.99
If the value is 59.00 then it should be 59.99
Basically it is rounding to it's closet (10.00-.01) = ##.99

FUNCTION getTen AS C (n AS N )
	
	dim intN as n
	intN = int(n)
	
	getTen = intN+0.99
	getTen = alltrim(str(getTen,250,2))
	
	
END FUNCTION

?getTen(432.99)
= "432.99"

?getTen(34.87)
= "34.99"

?getTen(56.12)
= "56.99"

?getTen(59.00)
= "59.99"

[markbwillard]

Re: Round Number to 50 and 100 - Formula

Also:

How about:
If the value is 432.99 should be 432.99
If the value is 34.87 then it should be 34.99
If the Value is 56.12 then it should be 56.99
If the value is 59.00 then it should be 59.99
Basically it is rounding to it's closet (10.00-.01) = ##.99

Thanks! You helped a lot!

[markbwillard]

Re: Round Number to 50 and 100 - Formula

Hi Gandhi:

Looks good!

Questions to you.

I will have three checkboxes on the form how do I corporate this?

If CASE 1 check is selected then the field would calculate CASE 1 function. Only one check can be selected.

I am using table field calculator directly.