character*6 ename, etype character*1024 bufprm