|
Buck, I think I got confused about shared opens (i.e. OPNQRYF) and overrides. You are correct that the override gets carried over to the activation group fine. I even ran your program to prove you wrong but it proved me wrong :) Scott Mildenberger > -----Original Message----- > From: Buck Calabro [mailto:Buck.Calabro@commsoft.net] > Sent: Wednesday, May 08, 2002 12:40 PM > To: rpg400-l@midrange.com > Subject: RE: Activation Groups 102, the plot thickens.... > > > >> I have OPM pgm A, which does > >> overrides, and calls OPM pgm B. > >> > >> If I convert OPM pgm B to ILE pgm B, > >> should I use AG *CALLER to ensure > >> the overrides remain visible to the > >> ILE pgm? > > > >I would, or use the ovrscope parm > >on the overrides. > > I have the oddest feeling that I missed something. Goes with > the week I > suppose. On my V5R1 system, the ILE program inherits the OPM > override: > > ovrprtf qrpglesrc mbr(ag01a) > call ag01a - AG(QILE) > > * Print a source member (80-80 list) > > h debug dftactgrp(*no) actgrp('QILE') > * dbgview(*list) > > fqrpglesrc ip f 112 disk infds(srcInfds) > fqsysprt o f 132 printer oflind(*inof) > > dsrcInfds ds > d FILE_NAM 83 92 > d FILE_LIB 93 102 > d FILE_MBR 129 138 > d NUM_RCDS 156 159I 0 > d SRC_IND 163 163 > d OPEN_COUNT 207 208I 0 > > iqrpglesrc aa 01 > I 13 112 srcdta > > oqsysprt h 1p 2 03 > o or of > o udate y 8 > o 64 'Source listing' > o 127 'AG01A Page' > o page z 132 > o h 1p 2 03 > o or of > o FILE_NAM > o FILE_LIB + 2 > o FILE_MBR + 2 > o NUM_RCDS j + 2 > o OPEN_COUNT j + 2 > o SRC_IND + 2 > > o d 01 1 > o srcdta 100 > > This works whether I compile this program > DFTACTGRP(*YES), > DFTACTGRP(*NO) ACTGRP('QILE') or > DFTACTGRP(*NO) ACTGRP(*CALLER) > --buck
As an Amazon Associate we earn from qualifying purchases.
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.