C INCLUDE FILE: L H D R 1 C VERSION: 26-NOV-84 LOGICAL*1 BUF1(80) LOGICAL*1 ACCESS LOGICAL*1 BLKCNT(6) LOGICAL*1 CREDAT(6) LOGICAL*1 EXPDAT(6) LOGICAL*1 FSET(6) LOGICAL*1 FILID(17) LOGICAL*1 FSECNO(4) LOGICAL*1 FSEQNO(4) LOGICAL*1 GENNO(4) LOGICAL*1 GENVER(2) LOGICAL*1 LABEL1(4) LOGICAL*1 RESVD(7) LOGICAL*1 SYSCOD(13) REAL*4 LABEL EQUIVALENCE (BUF1(1), LABEL1(1)), 1 (BUF1(5), FILID(1)), 2 (BUF1(22), FSET(1)), 3 (BUF1(28), FSECNO(1)), 4 (BUF1(32), FSEQNO(1)), 5 (BUF1(36), GENNO(1)), 6 (BUF1(40), GENVER(1)), 7 (BUF1(42), CREDAT(1)), 8 (BUF1(48), EXPDAT(1)), 9 (BUF1(54), ACCESS) EQUIVALENCE (BUF1(55), BLKCNT(1)), 1 (BUF1(61), SYSCOD(1)), 2 (BUF1(74), RESVD(1)), 3 (BUF1(1), LABEL) DATA HDR1 /'HDR1'/, 1 EOF1 /'EOF1'/, 2 EOV1 /'EOV1'/