Calling Natural from CICS and passing a result

How can I call a Natural subroutine / subprogram from a CICS program, and pass a result back to the calling program? I see that I can pass data to the Natural program via parameters, but ny question is how to do pass something back.

Is it possible to read/write to the COMMAREA?

Thanks
Simon