@jmeza, tienes que poner, cada cierta cantidad de registros y dentro del bucle de lectura
Código COBOL:
INVOKE POW-SELF "ThruEvents"
, eso hará que "se actualicen" todos los eventos en pantalla, entre otras cosas, y te muestre el contador actualizado, de lo contrario, por defecto, PWC, espera a que termine el bucle para "actualizarse". No te digo que lo hagas cada vez que leas un registro, porque ralentizaría el programa, (aunque todo es cuestión de que pruebes y compares tiempos), pero, cada 25 ó 50 lecturas, estaría bien.
Un salu2.-