@Alex ha scritto:
Ora se quel 100.15 deve diventare 101.00 allora ti basta chiamarla mettendo ZERO come numero di DECIMALI... di DEFAULT arrotonda per Eccesso...
Ovviamente la devi usare su BEFOREUPDATE dei dati e lo dovrai gestire nelle maschere di interfaccia...!
Grazie per la risposta, ma non ti mettere a ridere per quello che leggerai di seguito.
Quel poco che so l'ho imparato navigando in rete, non sono all'A B C ma sono ancora alla A
Ti riepilogo, in breve, cosa dovrei fare.
sono un commercialista e mi sto preparando un DB per poter fare le fatture.
Ho creato una maschera chiamata "CLIENTI" che prende i valori di "NOMINATIVO" e "ONORARIO" dalla tabella "CLIENTI"
A questa maschera ho associata una sotto maschera chiamata "SPESE" che attinge i valori "SPESA" e ONORARIO" dall'omonima tabella "SPESE"
Per poter fare la fattura è necessario calcolare l'IVA ed altre cose.
Quindi nel piè di pagina della maschera "CLIENTI" ho inserito una casella di testo chiamata "IMPONIBILE" che prende il valore dalla somma dei campi "ONORARIO" della tabella CLIENTI e "SPESE" e "ONORARIO" della sotto maschera "SPESE".
Fin qui tutto bene.
Tramite un'altra casella di testo aggiungo l'IVA e quindi determino il valore della fattura.
Per esigenze di pagamento, dovrei fare in modo che il totale della fattura risulti sempre di cifra pari ad esempio se il tot. fattura è 101,15, creo un'altra casella di testo che chiamo "TOTALE_FATTURA" la quale, tramite la funzione che mi hai gentilmente inviato, dovrebbe dare come risultato 102,00 (quindi il valore arrotondato) e quindi creo una nuova casella "ARROTONDAMENTO" di 0.85 (102,00-101.15) per far in modo che, sul documento venga visualizzata l'intera procedura di calcolo.
Come ti ho detto sono ancora alla "A" e quindi quello che per te è normale amministrazione per me è arabo.
Ho inserito il codice che mi hai inviato direttamente in Visual Basic come funzione in before update della casella "TOTALE_FATTURA" ed ho inserito il seguente codice (sicuramente sbagliato perché non so quali parametri indicare)
Private Sub TOTALE_FATTURA_BeforeUpdate(Cancel As Integer)
arrotonda
End Sub
sono andato nell'origine di controllo digitando = arrotonda([TOTALE_FATTURA[), ma anche qui nulla.
In altre parole non riesco a capire come utilizzare il codice che mi hai inviato.
Scusa se ti rompo e capisco se non vorrai rispondermi.
In ogni caso grazie ugualmente
Giorgio