BPX4CLO (close) example

The following code closes the standard input file. For the callable service, see close (BPX1CLO, BPX4CLO) — Close a file. AMODE 31 callers use BPX1CLO (close) example.

                                              
         CALL  BPX4CLO,              Close a file                      +
               (=A(STDIN_FILENO),    Input: File descriptor            +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               MF=(E,PLIST)          ----------------------------------