Page 2 of 2

Re: Problem with System completion code = 0C7

PostPosted: Tue Jan 08, 2013 8:48 pm
by Robert Sample
You need to consider defensive coding:
DISPLAY 1
IF  INTERMEDIARIO NUMERIC
    MOVE INTERMEDIARIO TO PROPOSTA
ELSE
    DISPLAY 'NON-NUMERIC VALUE'
    MOVE ZERO TO PROPOSTA
END-IF
DISPLAY 2

Re: Problem with System completion code = 0C7

PostPosted: Fri Jan 25, 2013 10:18 pm
by Dashimir
Thank you Robert Sample it worked perfectly.

Now i am having trouble to deal with s(9) comp-3 variables and etc. I have to get those variables ex[ S9(9) COMP-3] and move to pic 9(9). when i try i always get a number with some dirty thing like:


07226077C should be 072260777
00716114{
00846023{
01172505{
07226124I should be 072261249
06908804{
071825110

Re: Problem with System completion code = 0C7

PostPosted: Fri Jan 25, 2013 10:37 pm
by dick scherrer
Hello,

07226077C should be 072260777
Most likely not . . . I suspect it should be 773 not 777.

What you see is signed zoned-decimal values. Which are totally valid.

Re: Problem with System completion code = 0C7

PostPosted: Fri Jan 25, 2013 11:13 pm
by Dashimir
so a=1 b=2 c=3 ? and what is }?

i change thos to numbers with evaluate or there is a better way ? =D.

Re: Problem with System completion code = 0C7

PostPosted: Fri Jan 25, 2013 11:17 pm
by c62ap90
      HEX         
DEC  (COMP) EBCDIC
---  ------ ------
192    C0   {   (left bracket  - positive value)
208    D0   }   (right bracket - negative value)

Re: Problem with System completion code = 0C7

PostPosted: Sat Jan 26, 2013 12:38 am
by dick scherrer
Hello,

so a=1 b=2 c=3 ? and what is }?
"J" is a negative one. '}' is a negative zero.
Positive values are x'C0' thry x'C9".
Negative values are x'D0' thru x'D9'
Enter a few values in a file or member and show these in hex.

i change thos to numbers with evaluate or there is a better way ? =D.
A MOVE or COMPUTE will do what you want - no need for an EVALUATE.

Re: Problem with System completion code = 0C7

PostPosted: Mon Jan 28, 2013 6:59 pm
by Dashimir
I just removed the s(09) -> (09), i was afraind that moving to comp s etc were the problem. Now everything works fine thx.