SOMAR NO ASP

USUARIO.EXCLUIDOS 24/05/2007 12:40:09
#218083
Pessoal,

Estou com uma dificuldade....

Criei um relatorio, e nao estou sei coloar uma linha com total...
segue codigo do relatorio..

 
  <%do while not rslocal.eof%>
  <tr>
  <td class="text"><div align="center"><%=rslocal("NUMEROCONTRATO")%> </div></td>
  <td class="text"><div align="center"><%=rslocal("ACORDO")%> </div></td>
  <td class="text"><div align="center"><%=rslocal("DTMOVTO")%> </div></td>
  <td class="text"><div align="center"><%=rslocal("DATAPAGAMENTO")%> </div></td>
  <td class="text"><div align="center"><%=formatcurrency(rslocal("VALORPAGAMENTO"))%> </div></td>
  <td class="text"><div align="center"><%=rslocal("NUMDOCUMENTO")%> </div></td>
  <td class="text"><div align="center"><%=rslocal("PONTUACAO")%> </div></td>
  <tr>
  <td bgcolor="black" colspan="30" class="linha"> <img src="http://172.16.0.102/platmala/mis/images/pixel.gif" width="900" height="1"></td>
  <tr>
	<%rslocal.movenext %>
	<%loop%>



precisaria colocar um linha totalizadora no VALORPAGAMENTO, mais nao sei como posso fazer isto...alguem pode me ajudar???

Att,

Marcelo Bressan
USUARIO.EXCLUIDOS 24/05/2007 14:49:12
#218114 Resposta escolhida
Tente assim:

<%
Dim total as Double

total = 0
%>
<%do while not rslocal.eof%>
<tr>
<td class="text"><div align="center"><%=rslocal("NUMEROCONTRATO")%> </div></td>
<td class="text"><div align="center"><%=rslocal("ACORDO")%> </div></td>
<td class="text"><div align="center"><%=rslocal("DTMOVTO")%> </div></td>
<td class="text"><div align="center"><%=rslocal("DATAPAGAMENTO")%> </div></td>
<td class="text"><div align="center"><%=formatcurrency(rslocal("VALORPAGAMENTO"))%> </div></td>
<td class="text"><div align="center"><%=rslocal("NUMDOCUMENTO")%> </div></td>
<td class="text"><div align="center"><%=rslocal("PONTUACAO")%> </div></td>
<tr>
<td bgcolor="black" colspan="30" class="linha"> <img src="http://172.16.0.102/platmala/mis/images/pixel.gif" width="900" height="1"></td>
<tr>
<% total = total + rslocal("VALORPAGAMENTO") %>
<%rslocal.movenext %>
<%loop%>
<td bgcolor="black" colspan="30" class="linha"> Total <%=formatcurrency(total) %> </td>
<tr>
USUARIO.EXCLUIDOS 24/05/2007 15:16:55
#218124
Piolho,

Isto funcionou...
so que esta contecendo um erro...
meu select tem varios varametros...
passei um parametro que nao tem...e na hora de rodar o relatório ele apresenta um erro
que nao tem como formatar campo null...
como posso colocar uma mensagem informando que nao foi encontrado nenhum registro????


Att,
Marcelo Bressan
USUARIO.EXCLUIDOS 24/05/2007 15:49:19
#218132
coloque assim:

if rsLocal.RecordCount = 0 then
response.write("Nenhum registro encotrado")
endif
Tópico encerrado , respostas não são mais permitidas
Voltar