The primary purpose of the DATA statement is to give names to
constants; instead of referring to pi as 3.141592653589793 at every
appearance, the variable PI can be given that value with a DATA
statement and used instead of the longer form of the constant. This
also simplifies modifying the program, should the value of pi change.
― FORTRAN manual for Xerox Computers
Sent from ProtonMail, Swiss-based encrypted email.
GPG Public Key -
https://api.protonmail.ch/pks/lookup?op=get&[email protected]
‐‐‐‐‐‐‐ Original Message ‐‐‐‐‐‐‐
On Thursday, June 17th, 2021 at 11:19 AM, Wayne Driscoll
<[email protected]> wrote:
> Until the definition of a token changes such that the new length is 32
> instead of 5. Changing the one macro that defines TOKEN_LEN is much easier
> than searching for all instances of LA Rx,5 and then determining if it is
> process a TOKEN, or if the value is for some other reason.
>
> Wayne Driscoll
>
> Rocket Software
>
> Note - All opinions are strictly my own.
>
> From: IBM Mainframe Discussion List [email protected] On Behalf Of Tom
> Brennan
>
> Sent: Wednesday, June 16, 2021 9:23 PM
>
> To: [email protected]
>
> Subject: Re: Coding for the future
>
> EXTERNAL EMAIL
>
> I'd actually rather read LA R7,5 so I don't have to hunt for where
>
> Token_Len is defined.
>
> On 6/16/2021 3:24 PM, Charles Mills wrote:
>
> > And if the instruction itself were
> >
> > LA R7,Token_Len
> >
> > Then it would be more clear and more maintainable.
> >
> > Charles
> >
> > -----Original Message-----
> >
> > From: IBM Mainframe Discussion List [mailto:[email protected]] On
> > Behalf Of Jesse 1 Robinson
> >
> > Sent: Wednesday, June 16, 2021 3:07 PM
> >
> > To: [email protected]mailto:[email protected]
> >
> > Subject: Re: Coding for the future
> >
> > Avoid embedding code specific details in comments.
> >
> > Init loop counter in R7 to 5
> >
> > A comment should not name anything explicitly stated in the instruction.
> > 'R7' in the comment is not merely redundant. If the loop register needs to
> > be changed later on, then the comment will have to be updated also. If it's
> > not updated, then it becomes misleading, perhaps worse than no comment at
> > all. I would prefer
> >
> > LA R7,5 Prepare to search for delimiter
> >
> > .
> >
> > .
> >
> > J.O.Skip Robinson
> >
> > Southern California Edison Company
> >
> > Electric Dragon Team Paddler
> >
> > SHARE MVS Program Co-Manager
> >
> > 323-715-0595 Mobile
> >
> > 626-543-6132 Office ⇐=== NEW
> >
> > [email protected]mailto:[email protected]
> >
> > -----Original Message-----
> >
> > From: IBM Mainframe Discussion List
> > <[email protected]mailto:[email protected]> On Behalf Of Mike
> > Schwab
> >
> > Sent: Wednesday, June 16, 2021 2:17 PM
> >
> > To: [email protected]mailto:[email protected]
> >
> > Subject: (External):Re: EXTERNAL: Coding for the future
> >
> > *** EXTERNAL EMAIL - Use caution when opening links or attachments ***
> >
> > But what is Register 7 going to be used for, and why does it need a 5?
> >
> > I. E. Init loop counter in R7 to 5.
> >
> > On Wed, Jun 16, 2021 at 11:48 AM Savor, Thomas
> > <[email protected]mailto:[email protected]>
> > wrote:
> >
> > > ==> LA R7,5 Put 5 in register 7
> > >
> > > It depends on the intended target audience. Now I and you know that a 5
> > > is put in Register 7, but many shops have only a couple Assembler
> > > Programmers....but many more Cobol programmers. Telling "them" that a 5
> > > is put in Register 7 can be helpful to solving a problem or learning what
> > > a program does.
> > >
> > > Way too many Cobol programmers that I run into are scared of looking at
> > > Assembler...like just looking at it or trying to learn it is going to
> > > give you Ebola...so even very basic instructions can be
> > > helpful...especially if Instruction says LA 7,5 then it really helps
> > > "them".
> > >
> > > Thanks,
> > >
> > > Tom
> > >
> > > -----Original Message-----
> > >
> > > From: IBM Mainframe Discussion List
> > > <[email protected]mailto:[email protected]> On
> > >
> > > Behalf Of Seymour J Metz
> > >
> > > Sent: Wednesday, June 16, 2021 11:58 AM
> > >
> > > To: [email protected]mailto:[email protected]
> > >
> > > Subject: Re: EXTERNAL: Coding for the future
> > >
> > > Long ago in a galaxy far away, they handed each of us a stack of manuals
> > > and told use that we were all enrolled in a 7070 class and had to read
> > > all of the manuals before the class started. It turned out that some of
> > > the students were answering questions that stumped the instructor, and
> > > that if you read the manuals you didn't need the course.
> > >
> > > The worst are the ones that score based on the quantity of comments
> > > instead of their quality. That guaranties cluttered and unhelpful
> > > comments. People will behave in such a fashion as to optimize how their
> > > organization ranks them; if teir grades or performance reviews depend on
> > > doing something sub-optimal, then that's what they'll do. Measure the
> > > things that actually matter.
> > >
> > > I generally frown on marking students down on stylistic issues like
> > >
> > > labels on separate lines, but I will mark down for
> > >
> > > LA R7,5 Put 5 in register 7
> > >
> > > Don't tell me what LA does, tell me why you're putting that value in that
> > > register. If there is nothing useful to say in the comment, then omit it.
> > >
> > > --
> > >
> > > Shmuel (Seymour J.) Metz
> > >
> > > https://eur02.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmasonhttps://eur02.safelinks.protection.outlook.com/?url=http%3A%2F%2Fmason
> > >
> > > gmu.edu/~smetz3http://gmu.edu/~smetz3
> > > &data=04%7C01%7Cthomas.savor%40fisglobal.com%7Cb
> > >
> > > e99c6f1bde54085afe408d930df9961%7Ce3ff91d834c84b15a0b418910a6ac575%7C0
> > >
> > > %7C0%7C637594559179362403%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAi
> > >
> > > LCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C1000&sdata=kaKOh2
> > >
> > > 8RkIFxgof3dWR3QMgfWMAyZeQ8ijJ7XLqXpXE%3D&reserved=0
> > >
> > > From: IBM Mainframe Discussion List [[email protected]] on
> > >
> > > behalf of Phil Smith III [[email protected]]
> > >
> > > Sent: Wednesday, June 16, 2021 11:17 AM
> > >
> > > To: [email protected]mailto:[email protected]
> > >
> > > Subject: Re: EXTERNAL: Coding for the future
> > >
> > > Crawford, Robert C. wrote, in part:
> > >
> > > > Oh, and I used to this:
> > >
> > > > LOOP MVC HERE,THERE
> > >
> > > > And now do this:
> > >
> > > > LOOP DS 0H
> > >
> > > > MVC HERE,THERE
> > >
> > > Yes, I was taught that early. Then I took a Commodore SuperPet
> > >
> > > assembler class (after writing 370 assembler for several years). That
> > >
> > > assembler had no
> > >
> > > DS 0H
> > >
> > > but it did have
> > >
> > > EQU *
> > >
> > > So I used that-and was marked down for it. At that point, I stopped
> > > taking the class seriously.
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> >
> > send email to [email protected]mailto:[email protected] with
> > the message: INFO IBM-MAIN
> >
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> >
> > send email to [email protected]mailto:[email protected] with
> > the message: INFO IBM-MAIN
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
>
> send email to [email protected]mailto:[email protected] with
> the message: INFO IBM-MAIN
>
> Rocket Software, Inc. and subsidiaries ■ 77 Fourth Avenue, Waltham MA 02451 ■
> Main Office Toll Free Number: +1 855.577.4323
>
> Contact Customer Support:
> https://my.rocketsoftware.com/RocketCommunity/RCEmailSupport
>
> Unsubscribe from Marketing Messages/Manage Your Subscription Preferences -
> http://www.rocketsoftware.com/manage-your-email-preferences
>
> Privacy Policy - http://www.rocketsoftware.com/company/legal/privacy-policy
> ========================================================================================================================================================================================================================================================================================================================================================================================================================================
>
> This communication and any attachments may contain confidential information
> of Rocket Software, Inc. All unauthorized use, disclosure or distribution is
> prohibited. If you are not the intended recipient, please notify Rocket
> Software immediately and destroy all copies of this communication. Thank you.
>
> -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
>
> For IBM-MAIN subscribe / signoff / archive access instructions,
>
> send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
