Using the SPIND field

Open ClientConnect uses the SPAREA SPIND field to inform the CSA that an additional message is available. The code fragment shows how a CSA accesses the SPIND field to get this information:

IF SPIND = 'M'
     PERFORM 6100-GET-MESSAGES    THRU 6100-EXIT
         UNTIL SPIND NOT = 'M'
 END-IF.