|
Yes, but if you are waiting on a journal for new entries (ala MIMIX) so you can go do something or use the info to update a summary file, there is really no good way to "group" the journal accesses. Thanks, I have what I wanted to know. (Not that I like it, but it may just be the 2x4 these guys need to get off their CISC) -Bob > Gary Monnier wrote: > > Yes, RCVJRNE is one way. RTVJRNE and DSPJRN are others. It > doesn't > matter if you are pulling 1 or multiple entries at a time. Each time > they > are executed a temporary address is consumed. If you execute > RCVJRNE for > each journal entry sequence number between 1 and 1,000 you consume > 1,000 > temporary addresses. If you execute RCVJRNE for the range of sequence > > numbers 1 through 1,000 you consume 1 temporary address. > > The following code snippet will consume 1000 temporary addresses. > > CHGVAR VAR(X) VALUE(1) > NEXT: > RCVJRNE JRN(ABC) FROMENT(X) TOENT(X) > CHGVAR VAR(X) VALUE(X + 1) > IF (X *LT 1000) Then(GOTO NEXT) > > This code snippet consumes 1 temporary address. > > RCVJRNE JRN(ABC) FROMENT(1) TOENT(1000) > > -----Original Message----- > From: Bob Buchanan <bobbyb@camstar.com> > To: Gary Monnier <GaryMon@powertechgroup.com> > Cc: MIDRANGE-L@midrange.com <MIDRANGE-L@midrange.com> > Date: 19 January 2000 10:33 > Subject: Re: Temporary Addresses - What causes them to be used up? > > >By journal receiver extractions, are you talking about RCVJRNE? That > > >would explain a lot. > >-Bob > > > >> Gary Monnier wrote: > >> > >> Check for journal receiver extractions. Each time you extract data > > >> from a > >> journal receiver it eats a temporary space. > >+--- > >| 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 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 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 +---
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.