Prototyping procedure pointers

M
Hello all,

How do I provide a prototype for a procedure pointer?  For example, how can I 
make the 
compiler verify the parameters passed on the call to whatever procedure 
HNDLR_ENTRY 
will eventually point to?  

D HDLR_ENTRY_     S               *   PROCPTR     

The prototype is supposed to look like the following:
     
D HDLR_ENTRY      PR                                   
D   curCondition                      LIKE(FEEDBACK_)  
D   token                             LIKE(POINTER_)   
D   resultCode                        LIKE(INT4_)      
D   newCondition                      LIKE(FEEDBACK_)  

but I cannot have a variable (the pointer) and a prototype with the same name.  
I 
don't want to use a bound call (CALLB) but want to use a prototyped call 
(CALLP).

Maybe I'm missing something but I can't see how to accomplish this.

Regards,
Simon Coulter.

«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
«» FlyByNight Software         AS/400 Technical Specialists       «»
«» Eclipse the competition - run your business on an IBM AS/400.  «»
«»                                                                «»
«» Phone: +61 3 9419 0175      Mobile: +61 0411 091 400           «»
«» Fax:   +61 3 9419 0175      mailto: shc@flybynight.com.au      «»
«»                                                                «»
«» Windoze should not be open at Warp speed.                      «»
«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
+---
| 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
+---