• Subject: Re: Procedures/Sub-Procedures
  • From: HwaRangRon@xxxxxxx
  • Date: Tue, 16 Nov 1999 22:53:34 EST

In a message dated 11/16/99 5:53:42 PM Pacific Standard Time, 
bmorris@ca.ibm.com writes:

<< s the data area used solely for this purpose?  If so, you might consider
 dropping the data
 area entirely and instead add a setCurrentCompany procedure to the module
 with the
 "getCurrentCompany" procedure, with a global variable to hold the name.
The data area only contains a 3 character acronym that we use to set the 
library list for that company. The company name is actually stored in a 
control file that you can get to once you have set the library list correctly.

So really, just defining the data area with UDS gets the acronym brought into 
a program, without the need for a procedure. However, I can see that EVAL 
ACRO = GETACRO is a lot easier to follow, logically. Also, as you point out, 
I'll only need to effect changes in one place if we need to change it in the 

Whats more, this is fun stuff to code.
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com

This thread ...

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2020 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].