Hola, estoy intentando poner una consulta de sql que funciona bien cuando lo ejecuto en el query analizer pero en VB me da error. Me pueden decir que es lo que esta mal y como debe ser ?
Query Analyzer
select a.idproducto,b.Descripcion,
sum(case when tipo = 'NC' then preciounitario * -1
else preciounitario end)
from movimientoventas a join productos b on a.idproducto = b.idproducto
group by a.idproducto,b.Descripcion
Programa VB
Set rs = cls.Consultar("select a.IdProducto, sum(case a.Tipo = 'NC' then a.PrecioUnitario * -1 else a.PrecioUnitario end) as Suma from MovimientoVentas a join Productos b on a.IdProducto = b.IdProducto group by a.IdProducto, b.Descripcion" & "")
Saludos cordiales.
Fabian