Assign the name of an HDS object to a message token
This routine has no STATUS argument and does not perform normal error checking. If it should fail, then no value will be assigned to the message token and this will be apparent in the final message.