RE: Pointer puzzle

-----Message d'origine-----
Pointer not set for location referenced.

Seems much more efficient in English!

How is the address assigned to the pointer?

D wInfAdh DS LIKEDS ( AnotherDS )
D BASED ( wPtr_In )
D wPtr_InfAdh S *

wPtr_In = %ADDR ( wInfAdh );

IF NOT ExcRouter (
'My program to call' :
AnErrMg :
wPtr_in :
wPtr_out
);
RETURN *OFF;

ENDIF;

This seems to be the same way I used to test programme B directly, where I had no problems.