Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
cobol formatting for decimal numbers

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
simimathew

New User


Joined: 26 Jan 2006
Posts: 23
Location: London

PostPosted: Tue Jul 25, 2006 2:50 pm    Post subject: cobol formatting for decimal numbers
Reply with quote

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
Back to top
View user's profile Send private message

jayaraman

New User


Joined: 25 Jul 2006
Posts: 2

PostPosted: Tue Jul 25, 2006 3:29 pm    Post subject:
Reply with quote

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

THANKS
JAY
Back to top
View user's profile Send private message
simimathew

New User


Joined: 26 Jan 2006
Posts: 23
Location: London

PostPosted: Tue Jul 25, 2006 3:52 pm    Post subject: Re: cobol formatting for decimal numbers
Reply with quote

Thanks a lot!!!

Cheers,
Simi
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Extend the decimal values in DIVISION Balaryan DFSORT/ICETOOL 3 Thu Oct 05, 2017 4:05 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us