The two are fairly close. I've used, and like, both.
-- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 ________________________________________ From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Schmitt, Michael [michael.schm...@dxc.com] Sent: Tuesday, March 28, 2023 11:15 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value] You're close but this is an IBM product. -----Original Message----- From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of Thomas Kern Sent: Tuesday, March 28, 2023 10:01 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value] I haven't seen the inside of Waterloo Script macros for al LONG time. It will take me a while to get back into reading/debugging this just like working with COBOL. Tom On 3/28/2023 10:50 AM, Pommier, Rex wrote: > Are you sure this is a program and not the result of a cat dancing a jig on > your keyboard? LOL > > -----Original Message----- > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of > Schmitt, Michael > Sent: Tuesday, March 28, 2023 9:41 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: [EXTERNAL] Re: Stop the ragging on COBOL please [was: RE: ASM call > by value] > > Yeah, but you can come back to a program years later and understand what it > is doing. > > Unlike this: > > .if &*i = 0 .th .se *i = 1 > .el .se *i = 2 > .se *tp = '' > .se *pos = &*tp > ..@tbloop > .se *l = &L'&*&*i > .se *l = &*l + 2 + &$IN > .se *pos = &*pos + &*l > .se *tp = '&*tp &*pos' > .se *i = &*i + 1 > .if &*i <= &*0 .th .go @tbloop > .tp &*tp > .br > .dm off > .dm inwidth on > .if &U'&*1 = OFF .th .se *direct = '-' > .el .se *direct = '+' > .se *str = '&*&*0' > .se *width = '&DH'&W'&*str > .in &*direct.&*width.DH > .dm off > .dm setup on > .if &E'@SEsetup = 1 .th .me > .se @SEsetup = yes > .im &* > > > -----Original Message----- > From: IBM Mainframe Discussion List <IBM-MAIN@LISTSERV.UA.EDU> On Behalf Of > billogden > Sent: Tuesday, March 28, 2023 9:26 AM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: Re: Stop the ragging on COBOL please [was: RE: ASM call by value] > >> I myself dislike COBOL for the very simple and personal reason that >> it's so WORDY. > ******* > I am not a COBOL programmer, except for some very minor attempts a long time > ago. However, I very much respect the proper use of the WORDY aspect. It > seems to help with maintenance and updating of large, complex commercial > programs that were originally written (in good, well-thought out words) long > ago. The language itself has been carefully updated and seems to lack the > constantly changing, sometimes not-so-well-thought-out aspect of many of the > PC languages today. (And, since so much of COBOL programming seems to be in > significant financial areas, it seems to avoid the frequent "little problem > details" that apparently afflict the "more modern" languages.) > > Very short story: Long ago, my manager and I were sent to a smaller, rather > "northern" country to evaluate (to sell to customers) a potential application > program written there. I cannot remember the application, but I do remember > seeing a listing that fit on a single page, being an extreme opposite of > WORDY. It was APL, of course, and even the authors needed considerable > practice to be able to explain how it worked. (We rejected the potential SW > product and managed to escape without being murdered.) > > Bill Ogden > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, send email to > lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > ---------------------------------------------------------------------- > The information contained in this message is confidential, protected from > disclosure and may be legally privileged. If the reader of this message is > not the intended recipient or an employee or agent responsible for delivering > this message to the intended recipient, you are hereby notified that any > disclosure, distribution, copying, or any action taken or action omitted in > reliance on it, is strictly prohibited and may be unlawful. If you have > received this communication in error, please notify us immediately by > replying to this message and destroy the material in its entirety, whether in > electronic or hard copy format. Thank you. > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN