FiveTech Software tech support forums

... I ask (Italian) Mi puoi mostrare il codice di un programma scritto in linguaggio Harbour che crea un array di 3 numeri dal 1 al 90 dove la somma è uguale alla distanza ciclometrica ? (Espanol) ¿Me puede mostrar el código de un programa escrito en lenguaje Harbour que crea una matriz de ...

... "FALSCH", "FALSO" }, ; { "SUM(", "SUMA(", "SOMME(", "SOMA(", "SUMME(", "SOMMA(" }, ; { "SUBTOTAL(", "SUBTOTALES(", "SOUS.TOTAL(", "SUBTOTAL(", "TEILERGEBNIS(", "SUBTOTALE(" ...

Marco,


prova a fare la somma con Round( nValore1, 2 ) + Round( nValore2, 2 )


o

nTotale := INT( Round( nTotale, 2 ) )

Ho una casistica veramente particolare.
In pratica ho una variabile numerica che contiene la somma di una ventina di valori decimali.
Il risultato è 65.000000

il problema è che se faccio un int() di questa variabile per avere la sola parte intera, il risultato è 64 !!!!!

qualche idea ?

Ciao,
Io ho risolto così

@10,1.5 GET oImpdef VAR cImpdef OF oDlg picture if(euro = 1,"@E 99,999,999.99","@E 9,999,999,999") valid somma() SIZE 50,10

Stefano

Maybe you missed my advice:

(please replace SOMMA with your localized function name, ie. SUM)

EMG

The Whole syntax is right but when I execute the line of the SOMMA I got that error . Unrecoverable error 9023: hb_xgrab requested to allocate zero bytes Called from TOLEAUTO:SET(115) Called from TOLEAUTO:_VALUE(181) Called from EXECUTEXCEL(2699) Called ...

This is a working sample (please replace SOMMA with your localized function name, ie. SUM): FUNCTION MAIN() LOCAL oExcel, oSheet oExcel = CREATEOBJECT( "Excel.Application" ) oExcel:WorkBooks:Add() ...

... // codice normalizzato string codice = this.Abi + this.Cab + this.ContoCorrente; // calcolo valori caratteri int somma = 0; char[] c = codice.ToUpper().ToCharArray(); for (int k = 0; k < (L_CONTO + L_ABI + L_CAB); k++) { int i = numeri.IndexOf(c[k]); if (i < ...

... // codice normalizzato string codice = this.Abi + this.Cab + this.ContoCorrente; // calcolo valori caratteri int somma = 0; char[] c = codice.ToUpper().ToCharArray(); for (int k = 0; k < (L_CONTO + L_ABI + L_CAB); k++) { int i = numeri.IndexOf(c[k]); if (i < ...

... per 10 la prima cifra del codice, per nove la seconda, per otto la terza, continuando sino a moltiplicare per 2 la nona cifra. Poi si effettua la somma delle cifre e si divide per 11. Se il resto è Zero, questo sarà il carattere di controllo, altrimenti si sottrae 11 dal resto. La cifra ottenuta ...