| Pregunta: | 4690 - CONVERSION |
| Autor: | Ricardo Lopez |
| Quisiera saber si alguno de ustedes cuenta con un codigo que convierta un numero x en caracteres, por ejemplo; 5 = cinco, si aulguna persona lo tiene por favor aviseme | |
| Respuesta: | CARLOS NOE ZELAYA |
| MIRA YO TENGO UN PROGRAMA QUE HACE EXACTAMENTE LO QUE TU DESEAS SOLO NECESITA DE UNA BASE DE DATOS INDEXZADA Y UNA RUTINA DE UNOS 40 LINEAS PUEDES ESCRIBIRME A MI CORREO PARA YO ENVIERTE EL PROGRAMA POR ESCRITOS Y EL DETALLE DE LA TABLA COMO DE VA A CONSTRUIR... AMI ME DA MUY BUENOS RESULTADOS
| |
| Respuesta: | vikingo ii |
| definelo como funcion o procedimiento PARAMETER numero xunidad="" xdecena="" xcentena="" munidad="" mdecena="" mcentena="" millunidad="" milldecena="" millcentena="" cadmil="" cadmillon="" resul="" DIMENSION unidad(9) DIMENSION decena(9) DIMENSION centena(9) DIMENSION ccentena(9) DIMENSION dece(9) DIMENSION raros(15) STORE "uno" TO unidad(1) STORE "dos" TO unidad(2) STORE "tres" TO unidad(3) STORE "cuatro" TO unidad(4) STORE "cinco" TO unidad(5) STORE "seis" TO unidad(6) STORE "siete" TO unidad(7) STORE "ocho" TO unidad(8) STORE "nueve" TO unidad(9) STORE "diez" TO decena(1) STORE "veinte" TO decena(2) STORE "treinta" TO decena(3) STORE "cuarenta" TO decena(4) STORE "cincuenta" TO decena(5) STORE "sesenta" TO decena(6) STORE "setenta" TO decena(7) STORE "ochenta" TO decena(8) STORE "noventa" TO decena(9) STORE "dieci" TO dece(1) STORE "veinti" TO dece(2) STORE "treinta y " TO dece(3) STORE "cuarenta y " TO dece(4) STORE "cincuenta y " TO dece(5) STORE "sesenta y " TO dece(6) STORE "setenta y " TO dece(7) STORE "ochenta y " TO dece(8) STORE "noventa y " TO dece(9) STORE "1" TO raros(1) STORE "2" TO raros(2) STORE "3" TO raros(3) STORE "4" TO raros(4) STORE "5" TO raros(52 | |