1  REM  ****  HP BASIC PROGRAM LIBRARY  **********************
2  REM
3  REM        CTC4:  CTC PAYROLL PROGRAM, PART 1 OF 34
4  REM
5  REM         36213 REV B  6/73
6  REM
10  FILES E1,E2,EP1,EP2,EH1,EH2
15  N=1001
20  FOR I=1 TO 2
30  FOR J=1 TO 200
40  IF  END #I THEN 65
45  N=N+1
50  PRINT #I,J;"",-1,N,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
60  NEXT J
65  NEXT I
70  FOR I=3 TO 6
80  FOR J=1 TO 200
90  IF  END #I THEN 120
100  PRINT #I,J;0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0
101  PRINT #I;0,0,0,0,0,0
110  NEXT J
120  NEXT I
130  END 
