BPX4TDR (tcdrain) example
The following code waits until all output sent to the
standard output file has been transmitted.
For the callable service, see tcdrain (BPX1TDR, BPX4TDR) — Wait until output has been transmitted. AMODE 31 callers use BPX1TDR (tcdrain) example.
CALL BPX4TDR, Wait for output transmittal +
(=A(STDOUT_FILENO), Input: File descriptor +
RETVAL, Return value: 0 or -1 +
RETCODE, Return code +
RSNCODE), Reason code +
MF=(E,PLIST) ----------------------------------