> -----Original Message-----
> From: IBM Mainframe Discussion List On Behalf Of Greg Shirey
>
> Hello all,
>
> I'd appreciate some help interpreting COBOL.
>
> A programmer was updating a program which contained the following:
>
> IF WC-FUNC (SUB) = ("X" OR "Z")
> AND (WC-AMTUSE (SUB) + WC-AMT-PENDING (SUB)) < 0
Move the rightmost parenthesis to the right of the 0. The arithmetic
expression is incomplete as written.
> GO TO G100-FIND-CREDIT-X.
>
> and the compiler spit out:
> IGYPS2048-S An invalid abbreviated relation condition was found.
The
> statement was discarded.
-jc-
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
