The following code deletes the file named newprots located in a previously looked-up directory whose vnode token is in DIRVNODETOK. For the callable service, see v_remove (BPX1VRM, BPX4VRM) — Remove a link to a file. For the data structure, see BPXYOSS — Map operating system specific information.

         MVC   BUFFERA(8),=CL8'newprots'
         MVC   BUFLENA,=F'8'
         MVC   OSSSTOR,OSS           Initialize BPXYOSS area
         SPACE ,
         CALL  BPX1VRM,              Remove a file                     +
               (DIRVNODETOK,         Input: Directory vnode token      +
               OSSSTOR,              Input/output: BPXYOSS             +
               BUFLENA,              Input: File name length           +
               BUFFERA,              Input: File name                  +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------