Open Exchange App Traducir un número en texto

Primary tabs

This is the translation of the original article.

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