Support for IMS Aliases

The <IMSC> subtag in the <Auxiliary> section of Legacy.xml contains definitions for the standard CBLTDLI or PLITDLI programs. You can also use it to define aliases for non-standard IMS batch interfaces.

If the order of parameters in the alias program is the same as the order of parameters in the standard program, simply enter the alias name in the <Detect> and <APIEntry> tags, as follows:

<IMSC>
  <Cobol>
    <Detect>
      <item> 'CBLTDLI' </item>
      <item> 'MYCBLTDLI' </item>
    </Detect>
    ...
    <Process>
      <APIEntry name='IMS call'>
        <match stmt="CALL">
          <name value="CBLTDLI"/>
          <name value="MYCBLTDLI"/>
        </match>
    ...
    </Process>
  </Cobol>
</IMSC>

If the order of parameters in the alias program differs from the order in the standard program, you also need to specify a full API entry, using the:

• <match> tag to define the alias name and method of invocation.
• <flow> tag to characterize the program control flow.
• <ims-call> tag to specify the call parameters.

Use the definitions for CBLTDLI or PLITDLI as examples.

Attributes of <ims-call> are:

• count specifies the index of the parameter that contains the argument count.
• opcode specifies the index of the parameter that contains the operation code.
• pcb specifies the index of the parameter that contains the Program Control Block (PCB) pointer.
• arg-base specifies the index of the first data parameter, usually io-area.