!***********************************UNMESSAGE***********************************
define verb UNMESSAGE
   image EXE$DIR:UNMESSAGE
   parameter P1
      value (type=$infile)
   qualifier OUTPUT
      value (type=$outfile)