BPX4TGA (tcgetattr) example

The following code retrieves control information about the standard input file. For the callable service, see tcgetattr (BPX1TGA, BPX4TGA) — Get the attributes for a terminal. For the data structure, see BPXYTIOS — Map the termios structure. AMODE 31 callers use BPX1TGA (tcgetattr) example.
                                              
         CALL  BPX4TGA,              Get a terminal control structure  +
               (=A(STDIN_FILENO),    Input: File descriptor            +
               TIOS,                 Termio structure, BPXYTIOS        +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------