Abschnitt 22: Programme zur Zeiterfassung
343
Vorbereitung der Zusammenfassung. Die folgenden Routinen 16schen Register und erzeugen die Uberschrift der
Zusammenfassung.
113+0LBL 86
114 SF 23
115 CLREGX
116 FS2C 25
117 610 &1
118 ROL 84
131
128 +
121 PSIZE
122 2O
123 GT0 @6
124¢LBL &1
125 §F 12
126 CF 13
127 SF 21
128 AY
129 ABY
130 - ZEITDATEN-
e
132 PRA
133 F32C 25
134 670 &2
135 CF 21
136 RVIEK
137 PSE
Die Zeilen 113 bis 123 loschen die Register zur Speicherung der téglichen und
der gesamten Stundenzahl. Die Zeilen 114 und 115 versuchen, den Registerblock
zu 16schen. Wenn geniigend Register der Datenspeicherung zugewiesen sind (d.h.
wenn R,existiert), ibergeben die Zeilen 116 und 117 die Programmausfiihrung
an Zeile 124. Andernfalls ordnen die Zeilen 118 bis 121 nnn+ 1 Register
der Datenspeicherung zu. Zeile 122 legt 6.nnn im X-Register ab und Zeile
123 verzweigt das Programm zu Zeile 113.
Die Zeilen 124 bis 137 beginnen den Aufbau der Kopfzeile der Uberschrift der
Zusammenfassung. Die Zeilen 125 vnd 126 wihlen den Druckmodus: doppelte
Zeichenbreite und GroBbuchstaben. Die Zeilen 128 und 129 bedingen einen
Papiervorschub um zwei Zeilen. Zeile 130 legt die Uberschrift im Alpha-Register
ab. Zeile 131 setzt den Flag zum Ignorieren eines Fehlers, um die Druckerfunk-
tion (PRA| (print Alpha) in Zeile 132 vorzubereiten. Bei angeschlossenem und
eingeschaltetem Drucker wird nach Ausdruck des Alpha-Registerinhalts die
Programmausfithrung durch die Zeilen 133 und 134 an Zeile 138 iibergeben. Bei
fehlendem bzw. ausgeschaltetem Drucker 16scht Zeile 135 den Flag zur Drucker-
steuerung (sonst wiirde die Funktion [PRA]die Programmausfithrung unter-
brechen); danach zeigen die Zeilen 136 und 137 die Uberschrift an.