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
 

 

Picture with Comma?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
alabama

New User


Joined: 27 Aug 2008
Posts: 5
Location: Munich

PostPosted: Thu Oct 09, 2008 2:23 pm    Post subject: Picture with Comma?
Reply with quote

I have a DEC FIX(13,2) variable and must be copy in a Picture Variable.

with PIC'9999999999999' lost the two Comma position.
but PIC=DECFIX*100 is not allowed.

How do i declare the Picture Variable with comma?


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

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7935
Location: Bellevue, IA

PostPosted: Thu Oct 09, 2008 4:48 pm    Post subject:
Reply with quote

From the Language Reference manual link that can be found on this page:
Quote:
15.3.3.1 Insertion and decimal point characters


The point, comma, or slash can be used in conjunction with the V to cause insertion of the point (or comma or slash) in the position that delimits the end of the integer portion in and the beginning of the fractional portion of a fixed-point (or floating-point) number, as might be desired in printing, since the V does not cause printing of a point. The point must immediately precede or immediately follow the V. If the point precedes the V, it is inserted only if an unsuppressed digit appears to the left of the V, even if all fractional digits are significant. If the point immediately follows the V, it is suppressed if all digits to the right of the V are suppressed, but it appears if there are any unsuppressed fractional digits (along with any intervening zeros).

The following example shows decimal conventions that are used in different countries.


declare A picture 'Z,ZZZ,ZZZV.99',
B picture 'Z.ZZZ.ZZZV,99',
C picture 'ZBZZZBZZZV,99';
A,B,C = 1234;
Back to top
View user's profile Send private message
alabama

New User


Joined: 27 Aug 2008
Posts: 5
Location: Munich

PostPosted: Thu Oct 09, 2008 5:13 pm    Post subject:
Reply with quote

Thank you!
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Removing Extra Spaces in a comma sepa... Puspojit DFSORT/ICETOOL 3 Tue Sep 13, 2016 7:46 am
No new posts Sortcard to put comma after particula... sakrat DFSORT/ICETOOL 21 Mon May 11, 2015 8:20 pm
No new posts Reformatting the input with leading z... venkatprasana DFSORT/ICETOOL 3 Wed Jan 08, 2014 12:25 pm
No new posts Add comma to end of the record sun_job DFSORT/ICETOOL 2 Fri Dec 20, 2013 2:28 pm
No new posts need help in removing comma's in 70 b... ravi243 PL/I & Assembler 13 Sun Nov 10, 2013 9:56 pm


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