COMMON	/PRGDAT/ PASNUM, PRGSIZ, TSECS, TIMES, ERRCNT, ERRFLG,
     $			 LERCNT, ERRNAM, ERRTAB
	INTEGER		 PASNUM, ERRCNT, ERRFLG(4), LERCNT, ERRTAB(2,50)
	INTEGER*4	 TIMES(2) , PRGSIZ, ERRNAM(8,26)