BPX1CHA (chaudit) example

The following code changes the audit flags for the file identified by pathname. For the callable service, see chaudit (BPX1CHA, BPX4CHA) — Change audit flags for a file by path. For the data structure, see BPXYAUDT — Map flag values for chaudit and fchaudit. AMODE 64 callers use BPX4CHA (chaudit) example.
                                              
         MVC   BUFFERA(18),=CL18'/usr/inv/network.t'                    
         MVC   BUFLENA,=F'18'                                           
         MVI   AUDTREADACCESS,AUDTREADFAIL                              
         MVI   AUDTWRITEACCESS,AUDTWRITEFAIL                            
         MVI   AUDTEXECACCESS,AUDTEXECFAIL                              
         MVI   AUDTRSRV,0                                               
         SPACE ,                                                        
         CALL  BPX1CHA,              Change audit                      +
               (BUFLENA,             Input: Pathname length            +
               BUFFERA,              Input: Pathname                   +
               AUDT,                 Input: Audit flags, BPXYAUDT      +
               =F'0',                Input: 0 user, 1 security auditor +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------