#1: S0C7 error Author: vijaysridharan, Posted: Mon Mar 03, 2003 5:42 am — Hi,
If anyone of you may explain why this error occurs , it may be helpful for me. remedy is also appreciated.
Thanks in advance for your help.
_____________________________________________________________
working storage in pgm A
01 ws-var.
......
.......
03 var1 s9(17) comp-3.
77 ws-var2 pic s9(12) value zeros.
procedure division
move zeros to var1.
read file1 into ws-var.
display var1.
***Test data in file1 for the comp-3 field
100346113
When I display this value it's just 10034611. '3' is lost. i think it's because of the sign byte. next
move var1 to ws-var2.
display ws-var2.
when I tried moving this comp-3 variable to ws-var2 there is an S0C7 abend.
Pl. let me know why does this happen.
Next when I pass this var1 to pgm 'B'
Pgm B
77 ws-var1 pic s9(17) comp-3
procedure division
move zeros to ws-var1
move var1 to ws-var1
i get a s0c7 ABEND immediately after this move has been made.
Pl. explain why this happens.
#2: Author: Mervyn, Location: Hove, EnglandPosted: Mon Mar 03, 2003 5:18 pm — vijaysridharan, please show the hexadecimal representation of the important part of your input record. The reason I ask this is that all of these symptoms would occur if the last byte of your var1 variable contained '13' instead of '3c'.
Hope this helps.
Cheers,
Merv
#3: Author: dharmaraju, Location: BangalorePosted: Tue Mar 11, 2003 6:51 am — Hello Vijay
Let me know how u have declared ur FD entry record description.
If you have only one dataname declaring the whole length of the file record, then ur move will become alphanumeric move and results in SOC7 error. Could u come up with the details???
