BPX1FCM (fchmod) example

The following code changes the permissions for the standard input file. For the callable service, see fchmod (BPX1FCM, BPX4FCM) — Change the mode of a file or directory by descriptor. For the data structure, see BPXYMODE — Map the mode constants of the file services and BPXYFTYP — File type definitions. AMODE 64 callers use BPX4FCM (fchmod) example.

                                              
         XC    S_MODE,S_MODE                                            
         MVI   S_MODE2,S_IRUSR       All permissions                    
         MVI   S_MODE3,S_IRWXU2+S_IRWXG+S_IRWXO                         
         SPACE ,                                                        
         CALL  BPX1FCM,              Change file modes                 +
               (=A(STDIN_FILENO),    Input: File descriptor            +
               S_MODE,               Input: Mode, BPXYMODE, BPXYFTYP   +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------