BPX1MNT (mount) example

The following code requests that the file system mount the system file TESTLIB.FILESYS1 and ready it for use. For the callable service, see mount (BPX1MNT) — Make a file system available. For the data structure, see BPXYMTM — Map the modes for mount and unmount.
                                              
         XC    MTM(MTM#LENGTH),MTM                                      
         MVI   MTM1,MTMRDWR          Mount mode - read-write            
         MVC   BUFLENA,=F'2'         Max 1023                           
         MVC   BUFFERA(02),=CL02'/u'                                    
         MVC   FSNAME(44),=CL44'TESTLIB.FILESYS1'                       
         MVC   FSTYPE(8),=CL08'HFS'                                     
         CALL  BPX1MNT,              Ready a file system for use       +
               (BUFLENA,             Input: Mount point length         +
               BUFFERA,              Input: Mount point name           +
               FSNAME,               Input: File system name (44 char) +
               FSTYPE,               Input: File system type (8 char)  +
               MTM,                  Input: Mount mode         BPXYMTM +
               =A(0),                Input: Parm length, future        +
               =A(0),                Input: Parm, future               +
               RETVAL,               Return value: 0 or -1             +
               RETCODE,              Return code                       +
               RSNCODE),             Reason code                       +
               VL,MF=(E,PLIST)       ----------------------------------