JCantero, te pido disculpas porque crei que el programa me lo habia mandado JOSBERT y ahora lei bien y vi que lo hiciste tu.
Tal como le dije a Josbert, me encanta la simpleza del programa, simple, directo y consigue el objetivo con pocas lineas.
Es igual que el que escribi en PSEINT pero adecuado al COBOL.
Muchas gracias por tu tiempo y pido disculpas a ti y a Josber por haberme apurado en compilar y no leer.
Ahora tengo los 2 programas, el que me mandaste tu y el de KUK juntos (asteriscado el que no uso) para poder estudiar las diferencias que son notorias, pero ambos logran el objetivo sin problemas.
GRACIAS A AMBOS.
Un abrazo.
