Please read: Pointer not set for location .....

Hi,
i found following post on midrange list:
http://archive.midrange.com/midrange-l/200001/msg00450.html



and change return variable definition from 1 *char to 16 *char even RPG
procedure returns only 1 *char.

Now it works , first byte contain return value and other 15 some none
displayable characters.

Can anybody explain it?



CL help for return value:

       CL variable for returned value (RTNVAL) - Help

 *NONE
     The called procedure does not return a value.

 return-variable-name
The name of the variable that is to contain the return
value from the called procedure.  This may be either a
decimal or a character variable.  Variables used as
return variables will be aligned on a 16-byte boundary.







Slava.Zharichenko@exel.com@midrange.com on 05/30/2001 03:27:45 PM

Please respond to RPG400-L@midrange.com

Sent by:  owner-rpg400-l@midrange.com


To:   RPG400-L@midrange.com
cc:

Subject:  Found it Re: Pointer not set for location .....




Found it
http://archive.midrange.com/midrange-l/200001/msg00450.html





Slava Zharichenko
05/30/2001 02:38 PM


To:   RPG400-L@midrange.com
cc:

Subject:  Pointer not set for location .....  (Document link: Slava
      Zharichenko)

I am calling RPG procedure from a CL. Procedure returns   1A value.

When RPG hits RETURN opcode the following message appears:

Message ID . . . . . . :   MCH3601       Severity . . . . . . . :   40
Message type . . . . . :   Diagnostic
Date sent  . . . . . . :   05/30/01      Time sent  . . . . . . :
14:37:25
Message . . . . :   Pointer not set for location referenced.
Cause . . . . . :   A pointer was used, either directly or as a basing
  pointer, that has not been set to an address.

I have seen somebody had similar problems but i can not find post for some
reason.
Thanks







______________________________________________________________________

Important Email Information



The information in this email is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this email
by anyone else is unauthorized. If you are not the intended recipient, any
disclosure, copying, distribution or any action taken or omitted to be
taken in reliance on it, is prohibited and may be unlawful. If you are not
the intended addressee please contact the sender and dispose of this
e-mail.


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---




______________________________________________________________________

Important Email Information

The information in this email is confidential and may be legally
privileged. It is intended solely for the addressee. Access to this email
by anyone else is unauthorized. If you are not the intended recipient, any
disclosure, copying, distribution or any action taken or omitted to be
taken in reliance on it, is prohibited and may be unlawful. If you are not
the intended addressee please contact the sender and dispose of this
e-mail.

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---