Newsgroup: it.comp.appl.access
Titolo: ci riprovo: formula su record successivi

Salve a tutti
Ho una scheda che mi visualizza ordina e filtra i dati
provenienti da una tabella. Ho creato delle formule
per eseguire dei calcoli con i dati del singolo
record, ma non riesco a creare qualcosa che mi faccia
la differenza tra i valori di due record consecutivi
visualizzati, del tipo:
nome   valore  diff
pippo    1      -
pluto    3      2    (=3-1)
paperino 4      1    (=4-3)
e cosě via.
Qualcuno sa darmi un suggerimento ?
Grazie infinite
Marcello
mch...@yahoo.com
__________________________________________________
Do You Yahoo!?
Yahoo! Mail - Free email you can access from anywhere!
http://mail.yahoo.com/
--
Posted from 
web123.yahoomail.com
 [205.180.60.191] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Ciao,
se usi la query per un Report, io trasformerei
la query da selezione a creazione tabella
(eventualmente creando anche il campo
diff ) e poi farei l'operazione con del codice.
Una cosa del tipo ;
Public Function PerMarcello()
Dim rec As Recordset, x As Integer
Set rec = CurrentDb.OpenRecordset("Nometabellacreata")
x = rec!Valore
rec.MoveFirst
Do Until rec.EOF
rec.Edit
rec!Diff = rec!Valore - x
x = rec!Valore
rec.Update
rec.MoveNext
Loop
End Function
Ciao Marco
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

 
mch...@yahoo.com
Come master ho utilizzato una risposta del portatile di lbo ad un quesito
precedente .
Tabella tblDiffRecPr
IDP     oData              Nome              oValore
1         01/01/2000     Dotto                      1
2         02/01/2000     Cucciolo                  3
3         03/01/2000     Gongolo                  5
4         04/01/2000     Pisolo                     9
5         05/01/2000     Mammolo              22
6         06/01/2000     Brontolo                 22
7         07/01/2000     Eolo                      25
Query qryDiffRecPr
SELECT T1.IDP, ([T2].[ovalore]-[T1].[ovalore]) AS P, T1.oData, T1.oValore
FROM tblDiffRecPr AS T1, tblDiffRecPr AS T2
WHERE (((T1.oData)=[T2].[oData]+1))
ORDER BY T1.IDP, tblDiffRecPr.oData;
Costruire una query di unione qryDiffRecPrUnione
SELECT tblDiffRecPr.IDP, tblDiffRecPr.oValore, qryDiffRecPr.P,
qryDiffRecPr.oData
FROM tblDiffRecPr LEFT JOIN qryDiffRecPr ON tblDiffRecPr.IDP =
qryDiffRecPr.IDP
ORDER BY tblDiffRecPr.IDP;
giuseppe

C'č stato qualcuno recentemente che ha fatto una domanda simile, ma con
date successive.
La soluzione che era stata proposta (mi pare da Lbo?) era quella di
scriversi una funzione
function valprec (chiave As String) as Long
    nella funzione trovi il valore precedente data la chiave corrente,
con una select o qualcosa di un po' piů complesso.
end function
in questo modo puoi scrivere
select chiave, valore - valprec (chiave) from tabella;
Ciao,
    Matteo

 giuseppe
nulla da togliere a Lbo, ma forse era mia ;-)
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 ha scritto nel messaggio
news:39BE8756...@paperino.libero.it...

ricordo che le due risposte arivarono in sequenza , ho invertito
l'abbinamento
scusami
giuseppe

7         07/01/2000     Eolo                      25
Cavolo!
Ma te li ricordavi veramente a memoria i settenani? :-)
--
Lorenzo Coronati
--
<<Si perché forse Ilbo (ed altri come lui) sono 
convinti che noi poveri principianti (nel senso 
ironico) scrivano le domande senza pensare.>>
(Ivan Lelli, 25/08/2000)
--

 Lorenzo Coronati
Capirai, con tutti quegli aspetti inqueti e torbidi , ancora da chiarire ,
che la fiaba offre.......
giuseppe

che la fiaba offre.......
L'hai sentita la versione "corta" di Cordialmente?
:->
