Re: Temporary Addresses - What causes them to be used up?

["Gary Monnier" <GaryMon@xxxxxxxxxxxxxxxxxx>]

You may want to consider using DSPJRN rather than RCVJRNE.   You can put
multiple entries to a data file with DSPJRN thus reducing the number of
temporary addresses consumed.   It would, obviously, require some redesign
of the program using RCVJRNE.

-----Original Message-----
From: Bob Buchanan <bobbyb@camstar.com>
To: MIDRANGE-L@midrange.com <MIDRANGE-L@midrange.com>
Date: 19 January 2000 07:05
Subject: Re: Temporary Addresses - What causes them to be used up?


>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
>+---

+---
| 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
+---