FiveTech Software tech support forums

... <cbc:InvoiceTypeCode listID="0101">01</cbc:InvoiceTypeCode> <cbc:Note languageLocaleID="1000"><![CDATA[TRESCIENTOS OCHENTA CON 20/100 SOLES]]></cbc:Note> <cbc:DocumentCurrencyCode>PEN</cbc:DocumentCurrencyCode> <cac:Signature> ...

... = "Ciento " Num_B[ 3] = "Treinta " ; Num_C[ 3] = "Doscientos " Num_B[ 4] = "Cuarenta " ; Num_C[ 4] = "Trescientos " Num_B[ 5] = "Cincuenta " ; Num_C[ 5] = "Cuatrocientos " Num_B[ 6] = "Sesenta " ; Num_C[ 6] = "Quinientos ...

... " 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+ "OCHOCIENTOS NOVECIENTOS " GRUPO_STR := ...

... aDec:= {"diez", "veinte", "treinta", "cuarenta", "cincuenta",; "sesenta", "setenta", "ochenta", "noventa"} Local aCen:= {"cien", "doscientos", "trescientos", ; "cuatrocientos", "quinientos", "seiscientos",; "setecientos", "ochocientos", "novecientos"} Local aAux1:= {"once", "doce", "trece", ...

... := "setenta"; aNumero[80] := "ochenta"; aNumero[90] := "noventa" aNumero[100] := "ciento"; aNumero[200] := "doscientos" aNumero[300] := "trescientos"; aNumero[400] := "cuatrocientos" aNumero[500] := "quinientos"; aNumero[600] := "seiscientos" aNumero[700] := "setecientos"; aNumero[800] ...

... = "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] = "SEISCIENTOS" centena[7] = "SETECIENTOS" centena[8] = "OCHOCIENTOS" ...

... aDec:= {"diez", "veinte", "treinta", "cuarenta", "cincuenta",; "sesenta", "setenta", "ochenta", "noventa"} Local aCen:= {"cien", "doscientos", "trescientos", ; "cuatrocientos", "quinientos", "seiscientos",; "setecientos", "ochocientos", "novecientos"} Local aAux1:= {"once", "doce", "trece", ...

... 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] = 'SETECIENTOS' vd4[8] = 'OCHOCIENTOS' vd4[9] = 'NOVECIENTOS' ...

... "} a_Dec:={"diez ","veinte ","treinta ","cuarenta ","cincuenta ","sesenta ",; "setenta ","ochenta ","noventa "} a_Cen:={"ciento ","doscientos ","trescientos ","cuatrocientos ","quinientos ",; "seiscientos ","setecientos ","ochocientos ","novecientos "} c:=INT(Importe/100) re:=Importe-(c*100) ...