MVSFORUMS.com

mainframemouli · Beginner Joined: 23 Feb 2005 Posts: 87 Topics: 33

When alpha numeric value is the moved to Comp/COMP-3 it is displaying the following result, instead of giving SOC7 Abend.

DATA DIVISION.

WORKING-STORAGE SECTION.
01 A PIC X(4) VALUE 'ABCD'.
01 B PIC S9(2) COMP-3.
01 U PIC S9(2) COMP.

PROCEDURE DIVISION.
MOVE A TO B.
MOVE A TO U.
DISPLAY B.
DISPLAY U.

Output:
34
34

Can anyone please clarify this????

kolusu · Posted: Thu Jul 07, 2005 6:02 am Post subject:

mainframe_mouli,

check these links which explains about the compiler option numproc

http://mvsforums.com/helpboards/viewtopic.php?t=2099&highlight=numproc

http://mvsforums.com/helpboards/viewtopic.php?t=2103&highlight=numproc

Hope this helps...

Cheers

kolusu
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu

mainframemouli · Beginner Joined: 23 Feb 2005 Posts: 87 Topics: 33

Thank you Kolusu....Now i got it