What's the result: MOVE A to B and B to A

ruby.sen · New User Joined: 04 Feb 2006 Posts: 6

If there is a declaration as :

01 ws-sal1 pic x(5)
01 ws-sal2 pic s9(5) comp-3

what will happen if:
1. move ws-sal1 to ws-sal2
2. move ws-sal2 to ws-sal1

Such kind of move is possible or not if yes how and if not what is the error we get . Do we get runtime error or compilation error?

How do we solve this problem?

REASON TO BAN: Use meaningful Topic Title

vinodmaanju · New User Joined: 10 May 2005 Posts: 28 Location: Pune

we will get S0C7 abend

richie_techin · New User Joined: 21 Jan 2006 Posts: 16 Location: india

hi ruby,

U will get a DATA EXCEPTIONAL ERROR i.e. S0c7

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

It depends on the content of ws-sal1. If all the chars are numeric there s/b no prob.

If any of the non lo-ord chars have lo-ord nibbles that are not 0 thru 9 or the lo-ord char is a non-numeric and is not of the form X'Cn' or X'Dn' you will abend on the move back w/an 0C7.

Probably more than you wanted to know, but it's da truff.