Converting comp-3 with decimals to alphanumeric?



Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS

Converting comp-3 with decimals to alphanumeric?

Postby dexik » Thu Jul 26, 2012 9:04 am

It is related to my previous question. I think the problem is that I am trying to output comp-3 field as an alphanumeric field (qsysprt) without converting first. So, if I have this:

01 MY-COMP3 PIC 9(3)V99 COMP-3.

01 MY-ALPHA PIC X(3).
01 MY-DOT PIC X VALUE '.'.
01 MY-DECIMAL PIC X(2).


Say, MY-COMP3 contains 123.88. How do I move MY-COMP3 to MY-ALPHA and MY-DECIMAL?
dexik
 
Posts: 28
Joined: Tue Jun 12, 2012 4:30 am
Has thanked: 0 time
Been thanked: 0 time

Re: Converting comp-3 with decimals to alphanumeric?

 

Re: Converting comp-3 with decimals to alphanumeric?

Postby dick scherrer » Thu Jul 26, 2012 9:27 am

Hello,

To continue a topic, reply that topic - do not start new posts to continue your topic.

This duplicate is being locked. Please reply to your original topic. We can talk about your new issue there.

d
User avatar
dick scherrer
Global moderator
 
Posts: 6304
Joined: Sat Jun 09, 2007 8:58 am
Has thanked: 3 times
Been thanked: 91 times


Return to IBM Cobol

 


  • Related topics
    Replies
    Views
    Last post