Estadísticas del código: RUTINA DE MONTO ESCRITO - Cobol

Hola, comparto con ustedes un programa COBOL que traduce un monto en números a su correspondiente monto escrito. Ejemplo:

Monto Numerico: 360321, 98
Monto Escrito : TRESCIENTOS SESENTA MIL TRESCIENTOS VEINTIUNO CON 98 CTVOS

Soporta hasta 999 miles de millones y devuelve un texto de 170 caracteres que pueden usar como mejor les convenga (separa en dos o más lineas).

Espero les sea de utilidad.

Saludos,


Sergio