This routine is called whenever a key on input is preceded by '*', after all memory locations set up by the associated data card(s) have been written.
Its integer argument KEY is dimensioned to as many words as necessary to hold the key which caused the call to be stored in hollerith format to its significant length (blank padded, if necessary).