Example 7: Adding a PRINT value to UTILITY entries

In this example, a PRINT value of MYOUTPUT is being added to all UTILITY entries that have a NAME subentry value that begins with the character string 'IEB' and which do not currently have a PRINT value. The following ZONEEDIT command makes this change:

SET      BDY(TZONE1)         /* Set to zone to edit.        */.
ZONEEDIT UTILITY             /* Edit UTILITY entries        */.
IF       (NAME=IEB*)         /* For all IEB utilities       */
CHANGE   PRINT('',MYOUTPUT)  /* Add PRINT value of MYOUTPUT */.
ENDZONEEDIT                  /* End of ZONEEDIT             */.

To add a PRINT value of MYOUTPUT to all UTILITY entries that do not currently have a PRINT value, the following ZONEEDIT command can be used:

SET      BDY(TZONE1)         /* Set to zone to edit        */.
ZONEEDIT UTILITY	            /* Edit UTILITY entries       */.
CHANGE   PRINT('',MYOUTPUT)  /* Add PRINT value of MYOUTPUT*/.
ENDZONEEDIT.                 /* End of ZONEEDIT            */.