PAGE-COUNTER (Seitenzähler) ist ein Sonderregister, das für jede Liste, die in der REPORT SECTION der DATA DIVISION beschrieben ist, automatisch angelegt wird. Die interne Beschreibung dieses Sonderregisters ist in der COBOL-Schreibweise mit PICTURE S9(7) USAGE COMPUTATIONAL-3 gegeben.
Wenn die INITIATE-Anweisung für eine Liste ausgeführt wird, setzt das Listenprogrammsteuersystem das PAGE-COUNTER-Sonderregister durch eine interne MOVE-Anweisung auf 1. Sobald das Listenprogramm einen Seitenvorschub absetzt - nach der Erstellung des Seitenfußes und vor Erstellung des Seitenkopfes - erhöht es den Inhalt des PAGE-COUNTER-Sonderregisters um 1.
Das PAGE-COUNTER Sonderregister ist beliebig zugänglich, d.h. sein Inhalt darf nicht nur abgefragt, sondern auch geändert werden. Meistens wird es dazu verwendet, im Seitenkopf oder Seitenfuß die Seitennummer auszudrucken. Zu diesem Zweck wird das PAGE-COUNTER-Sonderregister einem druckfähigen Feld der betreffenden Liste durch die SOURCE-Klausel
SOURCE IS PAGE-COUNTER [OF report-name]
zugeordnet.
Die Verwendung eines PAGE-COUNTERS muss mit dem Listennamen gekennzeichnet werden, wenn mehr als eine Liste in der REPORT SECTION beschrieben ist.