If you have a proVIP membership you might interested in taking a look at
something I wrote a few years back for control records.

From: Vern Hamberg <vhamberg@xxxxxxxxxxx>
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx>
Date: 05/13/2011 02:49 PM
Subject: Re: DataArea vs. Tables
Sent by: midrange-l-bounces@xxxxxxxxxxxx

Hi Jeff

Very cool! Do you want to come write one for me?



On 5/13/2011 1:18 PM, Jeff Crosby wrote:

I do have front ends that bring up those control records. And they do
show what I want shown.

On Fri, May 13, 2011 at 12:43 PM, Vern Hamberg<vhamberg@xxxxxxxxxxx>

Hi Jeff

The use of data areas varies according to your kind of shop, I think.
When everything is in-house, then using copy members and the like might
be fine. I think for a vendor, things are different. One could use a
single-record control file, but then you need some way to maintain it -
DFU works, as does OpsNav, but a front-end is probably better. Again,
our case, we have some commands wrapped around the CHGDTAARA, but it'd
be cool to have a menu option that brings up panels with all the values
we want people to manage - same kind of thing could be used with
control-record files.


On 5/13/2011 11:17 AM, Jeff Crosby wrote:
I don't.

I have individual application single record control files to store
like last invoice number used, current billing date, etc.

Other things are defined as constants and stored in copy members. An
example of this is we use route 995 for customer pickups. So in a
member I have

D @PkpRot C 995

And yes, I know the @ could cause a problem if we go multinational,
but I
don't see that happening.

On Fri, May 13, 2011 at 11:17 AM, Birgitta

Hi guys,

we just had a discussion about using data areas.

In my opinion they are not heavily used or needed.

I either create a table/physical file or store the information in
variables in a specific service program. The data within these global
variables is set and retrieved by calling procedures.

I?m just curious, are you using data areas (heavily) or not?

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars."

"If you think education is expensive, try ignorance." (Derek Bok)

"What is worse than training your staff and losing them? Not training
and keeping them!"

This thread ...


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

This mailing list archive is Copyright 1997-2019 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].