gracias por la respuesta
pero despues de tantas pruebas y errores y tanto batallar lo solucione de la siguiente manera....
espero que a alguien mas le pueda servir
Código Delphi
[-]select Left(M.cuenta, 2) As Cuenta, M.Libro, V.Vardel, P.Descripcion,
SUM (Case when M.DH in ('D','I','1','+') then M.n_IMP else 0.00 End) AS DEBE
y me funciona bien