DEFINE VERB VERSION

   IMAGE "DSK1:[UTILITIES.VERSION]VERSION.EXE"

     PARAMETER  P1  
                PROMPT="Enter image"
                VALUE(REQUIRED,TYPE=$FILE)

     QUALIFIER  OUTPUT
                VALUE(REQUIRED, TYPE=$FILE)