%N ctrlseta %F $MIR/src/subs/ctrl.for
%D Set the value of a control panel message.
%P jm
%: user-interaction, control-panel
%B
      subroutine ctrlseta(name, string)

      implicit none
      character name*(*),string*(*)

  This changes the value of a text message associated with a
  button, etc.  It is primarily useful for "status" items.

  NOTE: This routine ONLY is useful AFTER a call to CtrlView!!
  If CtrlView has not yet been called, no action will be performed.

  Inputs:
    Name     The name of the previously defined control panel item.
             This is the same name (including case) of the panel item
             defined in CtrlDef.
    String   A character string used as the message text.
