Die Lösung hast du fast selbst beschrieben. Du brauchst zwar im Artikelbereich nicht für jede Zeile ein Format.

write ... at eop ...

EOP wird gemeldet, wenn die Überlaufzeile erreicht bzw. überschritten wird.
Mit dem nächsten WRITE ohne EOP wird das Flag wieder gelöscht.

Alternative aber komplizierter ist das Lesen der I-O-FEEDBACKAREA (ACCEPT) aber eigentlich nicht nötig.