Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups 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 Formatting VB File Learncoholic DFSORT/ICETOOL 3 Mon Mar 20, 2017 12:29 pm
No new posts SQL query not working in Cobol program. CuriousMainframer COBOL Programming 14 Wed Feb 22, 2017 5:56 pm
No new posts Execute TSO ACF commands from COBOL-I... supreethi.srid TSO/ISPF 0 Tue Feb 21, 2017 5:19 pm
No new posts Joinkeys with decimal scdinesh DFSORT/ICETOOL 3 Fri Feb 10, 2017 4:46 am
No new posts Mainframe Interview Questions CICS,CO... akshathan Mainframe Interview Questions 6 Thu Feb 09, 2017 6:38 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us