Traducir un número en texto
Hola a todos,
Tengo el placer de anunciar este proyecto personal para convertir un número en texto, en español, inglés, catán y ruso.
El objetivo de esta función es convertir los números a texto. Permite un número máximo de 15 dígitos.
Descripción general
La traducción se hace en varios idiomas. Los idiomas permitidos son
- es: Español
- en: Inglés
- ca: Catalán
- ru: Rus0
La función también permite utilizar números de hasta 109 dígitos (millardos) en el formato que se utiliza los países de habla inglesa. Consulte el siguiente enlace Billon Wikipedia
w ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc) one hundred and twenty-three w ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"es") ciento veintitres w ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"ca") cent vint-i-tres w ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc,"ru") Сто двадцать три w ##class(NumberTranslate.NumberTranslate).GetText(1000000000,.tSc,"en",1) one billion w ##class(NumberTranslate.NumberTranslate).GetText(1000000000,.tSc,"es",0) mil millones
Por favor, echa un vistazo al siguiente enlace:
https://openexchange.intersystems.com/index.html#!/package/CosNumberTranslate
¿Cómo instalarlo?
Abrir el enlace de la última versión 1.1.2 CosNumberTranslation_v1.1.2.xml
Hacer click derecho y seleccionar "Guardar como..."
Descargar el archivo .xml
Cargar desde el terminal en tu namespace (por ejemplo USER)
USER> do $System.OBJ.Load("c:\temp\CosNumberTranslation_v1.1.2.xml","cs")
prueba un número
USER> w ##class(NumberTranslate.NumberTranslate).GetText(123,.tSc) one hundred and twenty-three
Espero que te sea deutilidad en tus desarrollos.
Saludos cordiales
Francisco López