Traduce numero in lettere in Italiano, Francese, Inglese, Tedesco, Spagnolo, Olandese.

E' il primo programma logicamente complesso che ho scritto dopo tre mesi di esperienza nel 1976. Rivisto nel 1986 per inserire le altre lingue.

Andrebbe riscritto in maniera piu' pulita ma funziona e non ne conosco altri che risolvano piu' lingue con un unico impianto.

20-02-2014 Mi sono esercitato per la prima volta a costruire CALLP partendo da questa utility. Bella la possibilita' di usare la funzione risultante in una espressione in free o nella specifica di calcolo estesa. Peccato che l'uso di EXTPGM nella definizione di procedura ne impedisca proprio l'uso nelle espressioni. Ho schivato il problema facendo la mia solita CALL dentro una procedure, facendomi impressione l'annidamento delle procedure per definire una sola funzione.
In questa occasione, dopo aver letto nel newsgroup che la CALLP e' piu' prestazionale della CALL, ho trovato che la manualistica dice esattamente il contrario.

Genera numeri casuali

Usa la Api CEERAN0 per generare un numero a caso. Verificata generando milionate di numeri, la Api si e' dimostrata deboluccia e primitiva. Ho alterato la gestione del "seme" per rendere accettabil1 i risultati.

Puo' essere usata per scegliere a caso un numero tra 1 ed n con una distribuzione ragionevole dei risultati.