IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Doubt in Pic clause


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
nithivenkat

New User


Joined: 15 Sep 2008
Posts: 22
Location: Mumbai

PostPosted: Tue Dec 29, 2009 2:15 pm
Reply with quote

Hi,

I am new to cobol coding. Can someone explain me how will the following variables be defined?

05 CON-PRICE PIC $$$.999.

05 CON13-PRICE REDEFINES CON-PRICE

PIC $$$.99B.

Note: Basically i want to know what the "B" in the second pic clause stands for?

Thanks
Back to top
View user's profile Send private message
Escapa

Senior Member


Joined: 16 Feb 2007
Posts: 1399
Location: IL, USA

PostPosted: Tue Dec 29, 2009 2:25 pm
Reply with quote

"B" stands for blank. It is simple insertion type of editing symbol
Back to top
View user's profile Send private message
nithivenkat

New User


Joined: 15 Sep 2008
Posts: 22
Location: Mumbai

PostPosted: Tue Dec 29, 2009 2:33 pm
Reply with quote

For example, if i give value for both the variables as 100.999, the first variable will hold 100.999 but the second one will hold 100.99 [The last byte is blanked out]??

Please confirm if my understanding is correct.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Tue Dec 29, 2009 9:38 pm
Reply with quote

nithivenkat,

suggest you do some research on REDEFINES clause.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts To search DB2 table based on Conditio... DB2 1
No new posts Doubt about pl/1 (job offer) General Talk & Fun Stuff 5
No new posts NOT IN clause in COBOL pgm COBOL Programming 8
No new posts SUSBSCRIPT WITH SIGN IN PIC CLAUSE COBOL Programming 3
No new posts usage of CASE in WHERE clause DB2 10
Search our Forums:

Back to Top