*-- Author : Stephen Burke 28/08/91
SUBROUTINE FKEM(IUTIL,IROUT,ISEV,ICODE)
*-----------------------------------------Updates 27/07/93-------
**: FKEM 30907 SB. Change 'error 17' message.
*-----------------------------------------Updates 04/05/92-------
**: FKEM 30907 SB. Severity added to ERRLOG messages.
*-----------------------------------------Updates 27/04/92-------
**: FKEM 30301.SB. New error messages for FKLPAS and FKLPAF.
*-----------------------------------------Updates 24/01/92-------
**: FKEM 30205.SB. New error code (IOVCV).
**: FKEM 30205.SB. Message format changed.
*-----------------------------------------Updates----------------
**********************************************************************
* *
* Interface to ERRLOG error reporting *
* *
**********************************************************************
&, 'FKQG: ','FKLOOK:','FKHUNT:','FKCHPR:','FKCHXY:'
**********************************************************************
CMESS(3,9,0) = 'LMES(JPL) not set by FKLOOK or FKHUNT'
CALL ERRLOG(1000,'W:FKEM: Illegal error code')
CALL ERRLOG(1000+2000*IUTIL+100*IROUT+ICODE1,MESS)
*