Re: AW: return from RPGLE mod to CLLE mod errs with MCH3601

rob@xxxxxxxxx wrote:

The thing is, I'm calling the RPGLE from the CL.  Does it still work that
way?  And, what happens if I call that RPGLE mod from another RPGLE mod?

It works either direction; *CL says "use CL calling conventions".

You have to recompile your other RPG modules if you change the prototype
to use *CL.

If you can't do that (or don't want to), you'll have to do the
type(*char) len(2) workaround, or add a second *CL version of the
procedure for CL to call.  The *CL one would call through to the other
one to do the actual work of the procedure:

D ChkJobCl         PI                  like(rChkJob)
D                                      extproc(*CL:'CHKJOBCL')
D  JobName                      10a    CONST 

P ChkJobCl         B                   EXPORT 
D ChkJobCl         PI                  like(rChkJob)
D  JobName                      10a    CONST 
 /free
      return ChkJob(JobName);
 /end-free
P ChkJobCl         E