Mike,

I don't have an example at the moment but I do know that you make calls to at two procedures, maybe three if you want to do some housecleaning.  The three intrinsics are "HPLOADCMPROCEDURE", "HPSWITCHTOCM" and "HPUNLOADCMPROCEDURE".  The "HPLOADCMPROCEDURE" intrinsic loads a CM procedure from a SL that you specify and using the same search criteria as the LIB=G,P,S but with some extensions.  The "HPSWITCHTOCM" is used to call your CM procedure and the parameters are used to define the parameters that are passed to your CM procedure.  The last "HPUNLOADCMPROCEDURE" is used to unload the CM procedure from your program and releasing the resources if you no longer need them.

Sorry for no examples.  Hopefully some fellow listers have forwarded some examples to you.

Enjoy!!

Tom Renz

>>> Michael Watson <[log in to unmask]> 08/24/99 11:02AM >>>

Does anyone have any COBOL code to call a Native Mode subprogram from a
Compatibility Mode program?

Thanks in advance,
Michael W Watson
[log in to unmask]