The Legac-e Information Site

Twin Functions

Having successfully performed the creation of the LE enclave via an External Function, it was decided to convert the program which invokes the LE compliant program to a second External Function.

The CALLLE function accepts two parameters, the control information and the key of the record to be located by the LE compliant program.

The function returns the content of the record if located and an error message if not.

These are the components used to demonstrate using Twin External Functions

• The REXX routine used as the driver.
  
  Basically the same as on the previous page except that the LE program caller within the DO Loop has been converted to an Externtal Function as described opposite. the DO loop.
  
  
• The Assembler Function to create the LE enclave
  
  
• The Assembler Function to invoke the LE compliant program
  
  
• The COBOL program invoked by the Assembler interface
  
  The linkage between this and the CALLLE function was amended to
  
  
• 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.