Who's On?

	Membership:
	Latest: Kezia West
	Past 24 Hours: 0
	Prev. 24 Hours: 1
	Overall: 5246

	People Online:
	Visitors: 380
	Members: 0
	Total: 380

Name	Points
Greg Moeller	4184
David Williams	3349
JonA	3291
Kat V	2984
Woozy	1973
Jimmy Chiu	1883
Kwane McNeal	1437
Ragu Raghavan	1375
Roger French	1315
mark.cook	1244

Flooring a number in 4GL

2 Replies

0 Subscribed to this topic

17 Subscribed to this forum

Sort:

Author

Messages

Woozy

Veteran Member Send Private Message

Posts: 709

11/17/2010 10:09 PM

Hi All. I'm working on a 4GL payroll custom calc that needs to take a value and floor it (i.e. round down to the nearest whole number). How do I do this in 4GL/cobol? If it matters, we're on DB2/Unix. Thanks!

John Henley

Posts: 3351

11/17/2010 11:01 PM

Move varA defined as S9(12)V99 to varB defined as S9(12). The move varB back to varA. It will drop the cents. Is that what you mean? =

Woozy

Veteran Member Send Private Message

Posts: 709

11/18/2010 1:56 PM

DOH! Geez...I should have thought of that. A little tunnel-vision I guess. Thanks John.