> -----Ursprungligt meddelande-----
> Från: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> För Shmuel Metz (Seymour J.)
> Skickat: den 20 februari 2013 01:20
> Till: IBM-MAIN@LISTSERV.UA.EDU
> Ämne: Re: SV: SV: Article for the boss: COBOL will outlive us all
> 
> In
> <a90e503c23f97441b05ee302853b0e628645c29...@fspas01ev010.fspa.myntet.se
> >,
> on 02/18/2013
>    at 02:48 PM, Thomas Berg <thomas.b...@swedbank.se> said:
> 
> >Do you imply that these features is promoting/helping obfuscating ?
> 
> It's not the features that are bad in those instances, but rather the
> syntax for requesting the features; that syntax is about as far from
> the purported English-like character of COBOL as you can get.
> 
> >I can't immediately see that (except maybe COMPUTATIONAL-n).
> 
> If you're just learning COBOL, the magic numbers 77 and 88 totally
> obscure the intent; I consider them to be worse than COMPUTATIONAL-n in
> that regard.

Do you in this regard prefer, e g, that:

01  NAME1               PIC X.
    88  ONE  VALUE '1'.
    88  ZERO VALUE '0'.

- instead be:

01  NAME1               PIC X.
    WHEN VALUE '1' SETTRUE ONE.
    WHEN VALUE '0' SETTRUE ZERO.

?

But I can't see level number 77 be much confusing, out of line of "normal" 
COBOL and maybe superfluous but not much other than that. 



Regards
Thomas Berg
________________________________________________________________
Thomas Berg   Specialist   z/OS/IT Delivery   SWEDBANK AB (Publ)

----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Reply via email to