Examples

The following example shows the input message for a z/TPF host:

Input:
        input_msg  = 'ZSTAT U'
        call SEND_TO_HOST

The following example shows the input message to activate another variation:

Input:
        input_msg  = 'AUTO ACT TEST274'
        call SEND_TO_HOST

The following example shows the input message to enter the command again if z/TPF is busy:

RESULT = 0
do until (RESULT <> 'ETOS_TPF_CMD_REJECT')
      input_msg = 'ZSTAT U'
      call SEND_TO_HOST
end