*********************************************************************** SUBROUTINE RPCKEY *********************************************************************** * return end