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

["Gary Monnier" <GaryMon@xxxxxxxxxxxxxxxxxx>]

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