Search found 11 matches: noventa

Return to advanced search

Re: Antonio: Num2Word.prg

... "trinta", "quarenta", "cinquenta", "sessenta", "setenta", "oitenta", "noventa" } aUnits := { "cento", "mil", "milhão", "bilhão" } cAnd := " e"
by vilian
Tue Jun 06, 2017 2:12 pm
 
Forum: FiveWin for Harbour/xHarbour
Topic: Antonio: Num2Word.prg
Replies: 17
Views: 3493

Re: problema con SetFont

... " ; Num_C[ 7] = "Seiscientos " Num_B[ 8] = "Ochenta " ; Num_C[ 8] = "Setecientos " Num_B[ 9] = "Noventa " ; Num_C[ 9] = "Ochocientos " Num_C[ 10] = "Novecientos " //Se vacias valores de control CtrlTexto = STR(ElNumero,8,0) ...
by MOISES
Mon Feb 23, 2015 1:54 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: problema con SetFont
Replies: 17
Views: 5773

Dividir String y que quede bien gramaticalmente

Estimados: Tengo una variable cDigoImporte :="Ciento veintitres mil cuatrocientos noventa y nueve pesos con 00/100" (La variable sale de una funcion del foro ImporteConLetras,( Gracias Algredo Arteaga) Y deseo que entre en un determinado lugar en cmts., de ...
by Ruben Fernandez
Wed Jul 13, 2011 9:36 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Dividir String y que quede bien gramaticalmente
Replies: 4
Views: 867

Ayuda con esta funcion...

... y ','')" DEC7="'setenta'+IIF(UNIDAD<>'O',' y ','')" DEC8="'ochenta'+IIF(UNIDAD<>'O',' y ','')" DEC9="'noventa'+IIF(UNIDAD<>'O',' y ','')" CEN0="''" CEN1="IIF(DECENA+UNIDAD='00','cien','ciento')" CEN2="'doscient'+IIF(GRUPO<3,'os','os')" ...
by JoseGS
Thu Jan 14, 2010 1:41 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Ayuda con esta funcion...
Replies: 7
Views: 1711

Re: Link de Convierte numero a letras ya no funciona :(

... VEINTIOCHO " ONE_UNIT := ONE_UNIT+"VEINTINUEVE " TEN_UNIT := " TREINTA CUARENTA CINCUENTASESENTA " TEN_UNIT := TEN_UNIT+"SETENTA OCHENTA NOVENTA " CEN_UNIT := "CIENTO DOSCIENTOS TRESCIENTOS CUATROCIENTOS" CEN_UNIT := CEN_UNIT+ "QUINIENTOS SEISCIENTOS SETECIENTOS " CEN_UNIT := CEN_UNIT+ ...
by FranciscoA
Wed Oct 22, 2008 11:50 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Link de Convierte numero a letras ya no funciona :(
Replies: 2
Views: 849

... ; "seis", "siete", "ocho", "nueve"} Local aDec:= {"diez", "veinte", "treinta", "cuarenta", "cincuenta",; "sesenta", "setenta", "ochenta", "noventa"} Local aCen:= {"cien", "doscientos", "trescientos", ; "cuatrocientos", "quinientos", "seiscientos",; "setecientos", "ochocientos", "novecientos"} ...
by ARCC
Sun Mar 02, 2008 9:09 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Convertir Número a texto
Replies: 11
Views: 3837

... aNumero[40] := "cuarenta"; aNumero[50] := "cincuenta" aNumero[60] := "sesenta" aNumero[70] := "setenta"; aNumero[80] := "ochenta"; aNumero[90] := "noventa" aNumero[100] := "ciento"; aNumero[200] := "doscientos" aNumero[300] := "trescientos"; aNumero[400] := "cuatrocientos" aNumero[500] := "quinientos"; ...
by Manuel Valdenebro
Sat Mar 01, 2008 6:25 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Convertir Número a texto
Replies: 11
Views: 3837

... = "TREINTA" decena[4] = "CUARENTA" decena[5] = "CINCUENTA" decena[6] = "SESENTA" decena[7] = "SETENTA" decena[8] = "OCHENTA" decena[9] = "NOVENTA" centena[1] = "CIEN" centena[2] = "DOSCIENTOS" centena[3] = "TRESCIENTOS" centena[4] = "CUATROCIENTOS" centena[5] = "QUINIENTOS" centena[6] ...
by caducca
Fri Feb 29, 2008 8:16 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Convertir Número a texto
Replies: 11
Views: 3837

... ; "seis", "siete", "ocho", "nueve"} Local aDec:= {"diez", "veinte", "treinta", "cuarenta", "cincuenta",; "sesenta", "setenta", "ochenta", "noventa"} Local aCen:= {"cien", "doscientos", "trescientos", ; "cuatrocientos", "quinientos", "seiscientos",; "setecientos", "ochocientos", "novecientos"} ...
by ARCC
Fri Feb 29, 2008 7:13 pm
 
Forum: FiveWin para Harbour/xHarbour
Topic: Convertir Número a texto
Replies: 11
Views: 3837

usa lo siguiente

... vd3[2] = 'VEINTE' vd3[3] = 'TREINTA' vd3[4] = 'CUARENTA' vd3[5] = 'CINCUENTA' vd3[6] = 'SESENTA' vd3[7] = 'SETENTA' vd3[8] = 'OCHENTA' vd3[9] = 'NOVENTA' vd4[1] = 'CIENTO' vd4[2] = 'DOSCIENTOS' vd4[3] = 'TRESCIENTOS' vd4[4] = 'CUATROCIENTOS' vd4[5] = 'QUINIENTOS' vd4[6] = 'SEISCIENTOS' vd4[7] ...
by Ramon Paredes
Mon Aug 13, 2007 5:48 pm
 
Forum: FiveWin para CA-Clipper
Topic: Transformar importes en letras
Replies: 2
Views: 1334

... ","veintisiete ","veintiocho ","veintinueve "} a_Dec:={"diez ","veinte ","treinta ","cuarenta ","cincuenta ","sesenta ",; "setenta ","ochenta ","noventa "} a_Cen:={"ciento ","doscientos ","trescientos ","cuatrocientos ","quinientos ",; "seiscientos ","setecientos ","ochocientos ","novecientos ...
by Ruben Fernandez
Tue Jan 30, 2007 2:11 am
 
Forum: FiveWin para Harbour/xHarbour
Topic: RUTINA PARA CONVERTIR CIFRAS A LETRAS ( en ingles )
Replies: 4
Views: 1680

Return to advanced search