COMENT ( nchars, coment, ifail )
================================

  Comment the journal file.

    Can be called from the GO.

Receives:
 <KI_int_nitems>           *nchars         --- number of chars in 'coment'
  KI_chr_string             coment[nchars] --- comment string

Returns:
  KI_cod_error             *ifail          --- failure code


Description:
  If journalling is on then 'coment' is journalled as a comment.