View previous topic :: View next topic
|
Author |
Message |
kalyan.v
New User
Joined: 04 Feb 2008 Posts: 65 Location: Hyd
|
|
|
|
Hello,
I have a variable defined in easytrieve like this.
Ezt declaration:
I-CASH 1 16 N 2
COBOL equalent declaration:
I-CASH PIC S9(13)V9(2) SIGN IS TRAILING SEPARATE
Value :
Code: |
----+----1----+-
000000000038330+
|
When i am performing computations on this field i am getting SOC7 abend.
Please let me know whether the field declaration is correct or not.
If not let me know the correct declaration.
Thanks,
Kalyan.[/code] |
|
Back to top |
|
|
Bill Woodger
Moderator Emeritus
Joined: 09 Mar 2011 Posts: 7309 Location: Inside the Matrix
|
|
|
|
Check your manual, but I don't think you can do this directly in Easytrieve Plus.
I would define the sign-byte (as an A), check that it is + or - (and user-abend if not) and if -, do field = 0 - field. Have previously done a small macro, so that it self-documents. |
|
Back to top |
|
|
|