9/16/2023 0 Comments Rexx calling cobol programs![]() ![]() This IBM site titled Calling REXX from COBOL contains a link to a downloadable document that contains two examples of calling REXX from COBOL - one that uses IRXJCL and one that uses IRXEXEC, and describes which one to use for which conditions. Thus, my COBOL utility also calls IRXSTK to retrieve the data from the stack. If the REXX program wants to pass data back to COBOL - it needs to do so by pushing something onto the program stack and not by using the standard way: RETURN something. I was unable to make this work so I settled on the following ugly workaround. ![]() Rexx programs can optionally return data to the calling COBOL program. Ill send it to you offlist as an email attachment. The COBOL program changes one of the values and passes it back to REXX. When I wrote this thing I had trouble accessing return parameters that REXX passes back to COBOL. I have a very basic example of how to call a COBOL program from REXX and pass it a couple of values. SuperK - correct me if I'm wrong - not 100% sure on this. If your REXX program needs to use TSO services I'm pretty sure you need the call to IKJTSOEV. Our version also includes a call to IKJTSOEV to create a TSO environment before the actual call to REXX happens. In the REXX exec now I am calling this program ADDRESS TSO 'CALL .LOADLIB (MLBCHGMD)' I need to be able to pass to fields as parms to this program. Any assistance on what the REXX command would look like would be great. The version I have here looks very much like the one provided by SuperK. call a cobol program and pass it 2 data fields. If possible also give a description about the interface programs Can anybody provide me with a sample code for calling REXX from COBOL. ![]()
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |