BPX1TSA (tcsetattr) example

The following code turns off the HUPCL (hang up on last close) bit for the standard input file. For the callable service, see tcsetattr (BPX1TSA, BPX4TSA) — Set the attributes for a terminal. For the data structure, see BPXYTIOS — Map the termios structure. AMODE 64 callers use BPX4TSA (tcsetattr) example.

                                              
         NI    C_CFLAG+HUPCL_O,X'FF'-HUPCL   Turn off HUPCL             
*        termios was retrived by a prior tcgetattr                      
         CALL  BPX1TSA,              Set terminal attributes           +
               (=A(STDIN_FILENO),    Input: File descriptor            +
               =A(TCSADRAIN),        Input: Action            BPXYTIOS +
               TIOS,                 Input: Terminos struct   BPXYTIOS +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------