PGM
/* Create UTIL_BND binding directory in *CURLIB                  */
/*  Change next statement if a different library is needed       */
             CRTBNDDIR  BNDDIR(*CURLIB/UTIL_BND) TEXT('Utilities +
                          Service PGMs')
             ADDBNDDIRE BNDDIR(UTIL_BND) OBJ((SRV_MSG *SRVPGM *DEFER))
             ENDPGM