/DISPLAY command examples and format identifiers

This example shows how format identifiers (FID) can be returned on operator commands. The REXX program issues two commands: /DISPLAY ACT and /DISPLAY STATUS.

Address LINK 'CSLULXSB'                                          
if rc = 0 then
  do
    ADDRESS IMSSPOC
    "IMS  PLEX1"
    "CART  DISCART1"
    "DISPLAY ACT"
    RSP_RC1= CSLULGTS('DISCART1','ACT1.')
  End  

In this example using /DISPLAY ACT, the command response includes the FIDs, because the default is to provide the FIDs.

In the example that follows using /DISPLAY STATUS, the CSLULOPT function is invoked before the command is issued. The CSLULOPT function specifies that FIDs are not to be included in the command response. In the command response, no FIDs are included.

OPT_RC = CSLULOPT('NOFID')
"CART  DISCART2"
"DISPLAY STATUS"
RSP_RC2= CSLULGTS('DISCART1','STAT1.')