cobol formatting for decimal numbers

simimathew · New User Joined: 26 Jan 2006 Posts: 23 Location: London

Hello,

Can somebody plz help me with a cobol formatting problem?

I would like to know how to suppress the zeros after the decimal point, just in the same way as we suppress the leading zeros.

For eg:- I have a field with declaration s9(3)v9(7), when a value 100.0000000 is there in the field, I would like to format it as 100.00.

Can somebody please guide me as to what to do in this case?

Many Thanks,
Simi

jayaraman · New User Joined: 25 Jul 2006 Posts: 2

hi .
input =100.0000000
pic clause= s9(3)v9 BLANK WHEN ZERO
would give you output =100.0

THANKS
JAY

simimathew · New User Joined: 26 Jan 2006 Posts: 23 Location: London

Thanks a lot!!!

Cheers,
Simi