BPX1CLO (close) example

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

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