Monstando um extrato

[kania 0]

Olá pessoal,

 

Alguém sabe se existe como montar em MySql e ASP, um código que efetuei calculo dentro de uma tabela, ficou estranho de entender né, vou colcoar uma imagem do que estou tentando fazer:

 

 

A idéia e´ter um extrato com estas colunas se observarem na imagem o meu problemna esta na coluna SALDO porque preciso que o calculo seja efetuado sempre com a consulta anterior, ou seja no exemplo eu tenho um SALDO ANTERIOR DE R$ 2.517,36, logo na sequencia eu tenho um DÉBITO de R$ 56,39, então ele deve pegar o SALDO ANTERIOR menos o DEBITO e me dar um saldo atual que fica R$ 2.460,97, até ai tudo bem, o problema esta dai por diante onde ele deve pegar o o novo saldo que é R$ 2.460,97 e efetuar o calculo conforme o próximo valor DEBITO ou CREDITO, na forma que fiz que esta errada ele esta sempre calulando sobre o SALDO ANTERIOR e não sobre o novo saldo que foi gerado pela consula, tem como eu conseguir pegar este valor que acabou de ser criado para fazer o calculo?

 

abaixo minha consulta SQL para o SALDO ANTERIOR

 

'VERIFICO O TOTAL DE DESCONTO NO PERIODO
Set RSSALDOANTC = Server.CreateObject("adodb.recordset")
SALDOANTC = "select date_format(datamovimento, '%d/%m/%Y') as datamov, historico, sinal, coalesce(sum(valor)) as DescAnt  from CONTACORRENTE3 where INSCRICAO='"&INSCRICAOASSOCIADO&"' and datamovimento >= '"&DATAINICIALCONV&"' and datamovimento < '"&DATAFINALCONV&"' and sinal='D' group by inscricao" 
RSSALDOANTC.Open SALDOANTC,Conn,3,3

TOTALDESCONTO = RSSALDOANTC("DescAnt")

RSSALDOANTC.Close
Set RSSALDOANTC = Nothing

'VERIFICO O TOAL DE CRÉDITOS NO PERIODO
Set RSSALDOANTD = Server.CreateObject("adodb.recordset")
SALDOANTD = "select date_format(datamovimento, '%d/%m/%Y') as datamov, historico, sinal, coalesce(sum(valor)) as CredAnt  from CONTACORRENTE3 where INSCRICAO='"&INSCRICAOASSOCIADO&"' and datamovimento >= '"&DATAINICIALCONV&"' and datamovimento < '"&DATAFINALCONV&"' and sinal='C' group by inscricao" 
RSSALDOANTD.Open SALDOANTD,Conn,3,3

TOTALCREDITO = RSSALDOANTD("CredAnt")

RSSALDOANTD.Close
Set RSSALDOANTD = Nothing

'ACHO O SALDO TOTAL ANTERIOR DON ASSOCIADO
SALDOANTERIOR = TOTALCREDITO - TOTALDESCONTO

Variaveis para preencher a tabela

 

DATAMOVIMENTO = RSEXTDATA("datamov")
HISTORICO = RSEXTDATA("historico")
CREDDEB = RSEXTDATA("sinal")
SALDO = RSEXTDATA("valor")
IF CREDDEB = "C" THEN
SALDONOVO = SALDOANTERIOR + SALDO
ELSE
SALDONOVO = SALDOANTERIOR - SALDO
END IF

Obs: os valores são calculados conforme a data inicial e final digitada anteriormente pelo usuário

[Felipe Fonseca 0]

Nao sei se entendi bem ...

 

nao seria so você somar seus debitos e creditos, depois subtrair da sua conta ... ??

[kania 0]

Seri se eu estivesse calculando um pelo outro, porem o cliente quer que os valores sejam atualizados em tempo real que eles acontecem, entende, conforme na figura que mostrei, ele vai montando a tabela e subtraindo ou adcionando valores conforme o tipo se é débito ou crédito e dando o saldo total na 3° coluna.

 

Ta um caso chegar em uma forma correta para fazer isto, hehehe

[kania 0]

Para dar uma idéia mais ampla do que estou precisando fazer coloquei uma planilha do excel no servidor com as fórmulas e calculos http://www.conquistta.com.br/MODELO%20DE%2...0CONQUISTTA.xls

 

Se aguem conseguir me ajudar a montar regra, agradeço.

 

Só esta faltando memso o cálculo do saldo, justamente porque tenho que pegar sempre o saldo anterior e este sempre vai estar uma linha acima do novo saldo.

 

eita problema bom de resolver, hehehe