× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  • Subject: Re: Activation Groups vs Overrides
  • From: FKolmann@xxxxxxxxxxxx
  • Date: Mon, 23 Jul 2001 06:47:49 -0400

Try this,

Files:
SomeLib/SomeFile
SomeOtherLib/SomeFile

CL:
OVRDBF SomeFile SomeLib/SomeFile
Call PgmA

PgmA:
Open SomeFile (opens SomeLib/SomeFile)
Call PgmB

PgmB:

OVRDBF SomeFile SomeOtherLib/SomeFile SECURE(*YES)
Open SomeFile (Opens SomeOtherLib/SomeFile)

(Note  I used the  SECURE parameter.)



>Date: Fri, 20 Jul 2001 08:11:28 -0700
>From: Jim Langston <jimlangston@conexfreight.com>
>Subject: Re: Activation Groups and  Threads
>
>Hmm... okay, how would normal overrides handle this?  Let me try to
>explain the example a little better:
>
>Files:
>SomeLib/SomeFile
>SomeOtherLib/SomeFile
>
>CL:
>OVRDBF SomeFile SomeLib/SomeFile
>Call PgmA
>
>PgmA:
>Open SomeFile (opens SomeLib/SomeFile)
>Call PgmB
>
>PgmB:
>Open SomeFile (Opens SomeLib/SomeFile)
>
>Now, what we actually want is for PgmB to open SomeOtherLib/SomeFile.
>SomeOtherLib is in the library list, SomeLib is not.  How do you get
>PgmB to open SomeOtherLib/SomeFile?
>
>Now, if PgmA was in one activation group, and PgmB was in another
>activation group...  Say PgmA is in activation group *CALLER.  PgmB
>is in named activation group Utilities.  We leave the programs just
>as they are (since OVRDBF defaults to *ACTGRPDFN).  We recompile PgmB
>giving it activation group Utilities.  We run this procedure again.
>
>Now PgmB is going to open SomeOtherLib/SomeFile.  Like we want it to,
>in this hypothetical case.  Because the OVRDBF no longer applies to it,
>since it's in a different activation group.
>
>How would you do this with OVRDBF and no named Activation Groups?  There
>may be a way, I just don't know what it is.
>
>Regards,
>
>Jim Langston
>
>Me transmitte sursum, Caledoni!
>
>-  SNIP-
Regards
Frank Kolmann
FIAWOL (A fellow Trekkie, or a Latin scholar, which?/both?)




__________________________________________________________________
Your favorite stores, helpful shopping tools and great gift ideas. Experience 
the convenience of buying online with Shop@Netscape! 
http://shopnow.netscape.com/

Get your own FREE, personal Netscape Mail account today at 
http://webmail.netscape.com/

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:

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

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

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.