Newsgroup: it.comp.appl.access
Titolo: Somma parziale in Query Raggruppamento

Dovrei, data una tabella di questo tipo, determinare l'ImpRiutilizzo in
questo modo, a scalare... cioè riutilizzando parte dell'incasso quanto
vale il credito, fino ad esaurimento...
CF   ImpIncasso  ImpCredito AgingCredito ImpRiutilizzo
01     100             30               2001           30
01     100             20               2002           20
01     100             10               2003           10
01     100             50               2004           40
01     100             25               2005            0
Potreste darmi qualche indicazione di come impostare nella query questo
campo (ImpRiutilizzo) OnTheFly?
Grazie
Paolo

 ha scritto nel messaggio 
news:1156922952.2...@h48g2000cwc.googlegroups.com...
Dovrei, data una tabella di questo tipo, determinare l'ImpRiutilizzo in
questo modo, a scalare... cioč riutilizzando parte dell'incasso quanto
vale il credito, fino ad esaurimento...
CF   ImpIncasso  ImpCredito AgingCredito ImpRiutilizzo
01     100             30               2001           30
01     100             20               2002           20
01     100             10               2003           10
01     100             50               2004           40
01     100             25               2005            0
Potreste darmi qualche indicazione di come impostare nella query questo
campo (ImpRiutilizzo) OnTheFly?
Grazie
Paolo
[risposta]
Nel sito comune (
www.sitocomune.com
) Sezione Queries ci sono degli esempi...
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
In realtà ho già cercato nel SC e l'unica soluzione che si potrebbe
avvicinare a quello che mi serve è la Faq 2.11 "Come si può ottenere
il totale progressivo di un campo in una query", ma non riesco ad
adattarla in quanto me servirebbe ottenere il riutilizzo dell'incasso
sui vari importi di credito suddivisi per aging, per cf. Nella Faq
invece ottengo un totale prg che ho difficoltà a legare all'importo
dell'incasso...
Grazie
Paolo


Immagino tu abbia una tabella o una query dei soggetti in cui c'č il CF ed
il ImpIncasso
e poi un'altra in cui hai ImpCredito, AgingCredito e ImpRiutilizzo e bisogna
valorizzare quest'ultimo campo
dim rstTemp as Dao.Recordset  'questo rst riempi la tab temporanea
dim rstNomi as dao.recordset    'Questa č la tua query ordinata per CF e per
Anno
Dim lngIncasso as Long
Dim db as dao.database
set db = currentdb
set rstNomi = db.openrecordset("TabNomi")
with rstTemp
'Apro la tabell aNomi e la scorro tutta
do
    set rstTemp = db.openrecordset("Select * from tuatabella where Cf = '" &
!CF & "' ORDER By AgingCredito" )
'Apro la seconda tabella filtrandola per il cf del nome che sto analizzando
e ordinandola per anno
        lngIncasso = !ImpIncasso
'Mi creo la variabile dell'Importo Incasso da "spendere"
        if not rstTemp.EOF
        do
'Se esiste un rst me lo scorro (nota che ora ci sono solo i record filtrati
per nominativo)
            if lngIncasso >=0 then
'Se non ho esaurito l'importo incasso
                rstTemp.edit
'controllo se la mia variabile č maggiore o minore dell'Importo credito
'e valorizzo il campo ImpRiutilizzo
'e scorro i record fino all'esaurimento della mia variabile
               if ImpCredito >= lngIncasso then
                    rstTemp!ImpRiutillizzo = lngIncasso
                else
                    rstTemp!ImpRiutilizzo = ImpCredito
            end if
                rstTemp.update
            end if
            rstTemp.movenext
        loop until rstTemp.eof
        end if
.movenext
loop until
end with
rstTemp.close : set rstTemp = Nothing
rstNomi.close : set rstNomi = nothing
set db = nothing
Credo che possa andare, l'ho scritta direttamewnte in OE e quindi ci possono
essere errori
Fammi sapere
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 loop until
loop until .Eof
