5 ! SETS SCALARS TO ZERO FOR TCF, PLF, & PAF.
8 ! PROGRAM NAME:"PRZBF" - BY JAC
10 OPEN "DK1:PAYROL.TCF" AS FILE 1%:DIM #1%,T$(500%)=64%,T%(0%)
20 OPEN "DK1:PAYROL.PLF" AS FILE 2%:DIM #2%,L$(200%)=64%,L%(0%)
30 OPEN "DK1:PAYROL.PAF" AS FILE 3%:DIM #3%,A1$(100%)=64%,A1%(0%)
40 T%(0%)=0%:L%(0%)=0%:A1%(0%)=0%:CLOSE 1%,2%,3%
50 PRINT "TCF, PLF, & PAF ARE READY"
60 END