BPX4TFH (tcflush) example

The following code flushes all the data in the standard input file. the callable service, see tcflush (BPX1TFH, BPX4TFH) — Flush input or output on a terminal. For the data structure, see BPXYTIOS — Map the termios structure. AMODE 31 callers use BPX1TFH (tcflush) example.
                                              
         CALL  BPX4TFH,              Line control flush                +
               (=A(STDIN_FILENO),    Input: File descriptor            +
               =A(TCIFLUSH),         Input: Queue selector BPXYTIOS    +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------