Re: Basing Pointers

[leif@xxxxxxx]

I do not wish to beat a dead horse too much, but what does the
SETSPP MI-instruction do? It assigns an address to a pointer variable.
If you were talking about assigning an address to (say) a character
variable, that is - of course - not only impossible, but also meaningless.
I did not appreciate that we were discussing the meaningless, mea culpa.

You can 'cheat' as in:
DCL DD CHAR-VAR CHAR(16) BDRY(16);
DCL SPCPTR PTR-VAR DEF(CHAR-VAR) POS(1);
DCL DD XX BIN(4);
SETSPP PTR-VAR, XX;
now the CHAR-VAR contains the 'address' of the variable XX.

I agree that SETSPP CHAR-VAR, XX cannot be done,  but as I said
that is meaningless in itself. You can cheat though.

> Jon Paris and I stated categorically that assigning an address to a
> variable on the fly could not be done - not even in MI . And we're
> right. Read back over the thread - modifying the address stored in a
> basing pointer was not the issue in question and we indicated this could
> be done in ILE RPG etc too.
> > 
> > Yeah, that is what I thought too. Somebody in this list categorically
> > stated that it could not be done, not even in MI.
> > Below is the standard way of doing I/O in MI using the SEPT.
> > Note how the ADDSPP instruction modifies the basing pointer:


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