      read(iud,err=1) nla,ipf,ipb,ire1,irp1,ijob,cfile
