[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
RE: [open-cobol-list] feature request: EVALUATE: partial-expression
From: |
William M. Klein |
Subject: |
RE: [open-cobol-list] feature request: EVALUATE: partial-expression |
Date: |
Wed Feb 18 11:04:01 2004 |
I am NOT at all positive about this, but I *think* that the MF extension is
slightly different from the ISO 2002 Support. As I recall - MF allows:
Evaluate ABC >
When "X"
....
While the ISO 2002 Standard would only allow
Evaluate ABC
When > "X"
In other words, I think that MF allows the expression to be "broken"
anywhere - while ISO 2002 REQUIRES that only the "subject" be in the
EVALUATE statement - and the rest be in the WHEN.
Bottom-Line:
Before implementing this, one needs to "check" out the exact supported
syntax in each definition.
> -----Original Message-----
> From: address@hidden
> [mailto:address@hidden On
> Behalf Of Thomas Biehler
> Sent: Wednesday, February 18, 2004 9:33 AM
> To: address@hidden
> Cc: Keisuke Nishida
> Subject: [open-cobol-list] feature request: EVALUATE:
> partial-expression
>
> Hi Keisuke,
>
> i have described my feature request in the following autotest:
> (integrate in (1985) extension.at or cobol2002-run.at ?)
>
> I do not need the combination of:
> "partial-expression with boolean expression"
> => new in ISO 2002 !
>
> I need only the original MF-Extenstion to ANSI 1985!
>
> ===========================================================
> # MF-Extension to ANSI 1985
> # See Language Reference MF-COBOL 4.2.10
> # EVALUATE Statement Syntax Rules (7)
> # and !!!
> # ISO/IEC 1989:2002
> # 14.8.12.1 (9) ==> Table 16
>
> AT_SETUP([EVALUATE: partial expression])
>
> AT_DATA([prog.cob], [
> IDENTIFICATION DIVISION.
> PROGRAM-ID. prog.
> DATA DIVISION.
> WORKING-STORAGE SECTION.
> 01 X PIC X VALUE "1".
> 01 Y PIC X VALUE "2".
> PROCEDURE DIVISION.
> EVALUATE X ALSO "2" ALSO (1 + 2)
> WHEN = "1" ALSO = Y ALSO > 2
> DISPLAY "OK" NO ADVANCING
> END-EVALUATE
> STOP RUN.
> ])
>
> AT_CHECK([${COMPILE} -o prog prog.cob])
> AT_CHECK([./prog], [0], [OK])
>
> AT_CLEANUP
> =================================================
>
> Shall i hurry me, with my requests? ;-)
>
> Thank you for your great work!
>
> Thomas
>
> P.S. Say stop, if i am to fast! :-))
> ... my TODO list is now a little bit shorter ...
>
>
> -------------------------------------------------------
> SF.Net is sponsored by: Speed Start Your Linux Apps Now.
> Build and deploy apps & Web services for Linux with
> a free DVD software kit from IBM. Click Now!
> http://ads.osdn.com/?ad_id56&alloc_id438&op=ick
> _______________________________________________
> open-cobol-list mailing list
> address@hidden
> https://lists.sourceforge.net/lists/listinfo/open-cobol-list
>
- [open-cobol-list] feature request: EVALUATE: partial-expression, Thomas Biehler, 2004/02/18
- RE: [open-cobol-list] feature request: EVALUATE: partial-expression,
William M. Klein <=
- Re: [open-cobol-list] feature request: EVALUATE: partial-expression, Thomas Biehler, 2004/02/19
- RE: [open-cobol-list] feature request: EVALUATE: partial-expression, William M. Klein, 2004/02/19
- Re: [open-cobol-list] feature request: EVALUATE: partial-expression, Thomas Biehler, 2004/02/19
- RE: [open-cobol-list] feature request: EVALUATE: partial-expression, William M. Klein, 2004/02/19
- RE: [open-cobol-list] feature request: EVALUATE: partial-expression, Gary Cowell, 2004/02/20
- Re: [open-cobol-list] feature request: EVALUATE: partial-expression, Keisuke Nishida, 2004/02/21