Fórum DÚVIDA - Valor em sequência #367984

Olá, estou querendo fazer é o seguinte, tenho 2 valores um inicial e um final,
preciso pegar o valor final do dia anterior e passá-lo automaticamente para o valor inicial do dia posterior, ex:

28/01/2009 - caixa 1 - valor iniicial = 1000 valor final = 2000
29/01/2009 - caixa 1 - valor inicial = 2000 valor final = 3000
30/01/2009 - caixa 1 - valor inicial = 3000 valor final = 4000

28/01/2009 - caixa 2 - valor iniicial = 2222 valor final = 2589
29/01/2009 - caixa 2 - valor inicial = 2589 valor final = 3745
30/01/2009 - caixa 2 - valor inicial = 3745 valor final = 4500

e etc


Delphi 7, firebird 1.5