How to display comp-3 variable in SYSOUT

yogeshbabu · New User Joined: 30 Nov 2005 Posts: 19 Location: India

Hi all,
I want to know how we can display a comp-3 variable in SYSOUT?

Thanks & Regards,
Yogesh.

raghunathns · Posted: Mon Jan 30, 2006 7:19 pm

there is no direct way to display.

you define equivalent working storage variable and display that variable.
Ex:
01 filed1 pic s9(3) comp-3.
01 filed2 pic -z99.

move field1 to field2.
display 'data:' field2

Mane Sagar · New User Joined: 12 Jul 2005 Posts: 41 Location: mumbai

Hi yogeshbabu,

raghunathns is very right..

mmwife · Super Moderator Joined: 30 May 2003 Posts: 1592

I think it should be mentioned that comp-3 #s diSplay well except for the 1 lowest order digit.

If you're using displays for testing it's probably not worth the effort to do the moves. I just display them the way they are and use the following table to get the lowest #:

yogeshbabu · New User Joined: 30 Nov 2005 Posts: 19 Location: India

Thanks a lot