Bom dia. Estou com um Problema e devido não estou conseguindo fazer a diferença. Quando eu coloco SUM(Valor_Atual_Contrato) ele dá error. Se tira ele dar certo porém não aparece nada.
O erro :Você tentou executar uma consulta que não inclui a expressão 'Cod' especificada como parte de uma função agregada.
Não tem como fazer a diferença do (Valor_Atual_Contrato)- (vlr_atual_Reajuste). ou (vlr1)-(vlr2)
O Código que eu to utilizado segue abaixo. Tem como me ajudar?
set rs=Server.CreateObject("ADODB.recordset")
sql = "select Cod, Conta, Razao_Social, Contrato_SGV, Contratual_Reajuste, Indice_Reajuste, Data_Proximo_Reajuste, Valor_Atual_Contrato, Valor_Atual_Faturado, Contrato_GUC, OE_GSI, Status_Reajuste, Dt_Previsao, Motivo, Dt_Reajuste, Reajuste, Contrato_Cliente,
Aditivo, vlr_apos_reajuste ,Delta_Reajuste ,Diretoria ,GC ,Aplicado ,EC ,PVC ,Tipo ,Comentarios ,Mes_reajuste ,Analista ,Data ,Acao, SUM(Valor_Atual_Contrato) as vlr1, SUM(vlr_apos_reajuste) as vlr2 FROM contrato where Mes_reajuste Like '%"&Mes_reajuste&"%'"
If Razao_Social <> "" Then
sql = sql + " AND Razao_Social Like '%"&Razao_Social&"%' "
End If
If Status_Reajuste <> "" Then
sql = sql + " AND Status_Reajuste Like '%"&Status_Reajuste&"%' "
End If
If Dt_Previsao <> "" Then
sql = sql + " AND Dt_Previsao Like '%"&Dt_Previsao&"%' "
End If
If Dt_Reajuste <> "" Then
sql = sql + " AND Dt_Reajuste Like '%"&Dt_Reajuste&"%' "
End If
If Diretoria <> "" Then
sql = sql + " AND Diretoria Like '%"&Diretoria&"%' "
End If
If Tipo <> "" Then
sql = sql + " AND Tipo Like '%"&Tipo&"%' "
End If
rs.CursorLocation=3
rs.Open sql, conn