The Legac-e Information Site

LE to REXX

It is possible for a called LE compliant program to updated REXX viables directly.

This is achieved by using the IRXEXCOM service, which relies upon the SHVBLOCK structure to identify the variable to be manipulated.

Besides being able to return information about the REXX environment, SHVBLOCK allows a variable's content to be retrieved, (Fetch) updated (Set) and deleted (Drop). The links opposite display working examples developed from earlier examples in this discussion.

Using IRXEXCOM and SHVBLOCK within an LE Compliant program.

• The REXX routine used as the driver.
  
  The still uses INITLE as in the Twin Function version, but CALLLEX as been modified to only deliver a Return Code.
  
  
• The Assembler programs (INITLE) and (CALLLEX) invoked from REXX
  
  No longer passes parameters to the LE Compliant program and have been compiled and executed in 31-bit AMODE and RMODE.
  
  
• The COBOL program invoked by the Assembler interface
  
  Uses IRXEXCOM and SHVBLOCK to retrieve and update REXX variables.
  
  
• The Job Control Language (JCL) used for the test.
  
  Batch jobs were used for all test runs to aid debugging as and when necessary.
  
  
• The Job Control Language (JCL) to load the KSDS Cluster.
  
  
• Data loaded into the KSDS Cluster.