Una consulta con débitos y créditos

[Marina]

Hola a todos!

Trabajo con Interbase 6, versión gratuita.
En una tabla tengo guardados movimientos de débitos y créditos, en la cual, para diferenciarlos, se utiliza un campo TIPO que contiene una "D" o una "C"; los campos de importes y cantidades son comunes para ambos tipos de movimientos.

El problema se presenta cuando creo una vista de esta tabla, en la cual, para poder tener todo junto debo hacer una unión.
Ejemplo:

CREATE VIEW XX(
CODIGO,
DESCRIPCION,
IMPORTE,
CANTIDAD)
AS
SELECT
CODIGO,
DESCRIPCION,
IMPORTE,
CANTIDAD
FROM VEMOV
WHERE TIPO='D'

UNION ALL
SELECT
CODIGO,
DESCRIPCION,
IMPORTE * -1,
CANTIDAD
FROM VEMOV
WHERE TIPO='C'


Al usar UNION la vista se torna lenta, ya lo he podido comprobar, pero de que otra forma puedo resolver esto si no es con una unión. Existe alguna UDF que pueda usar para esto?

Gracias anticipadas.

Marina

[[maeyanes]]

No necesitas usar un UNION para mostrar todos los registros, ya que al ser la misma tabla, con que no filtres por el campo TIPO, debes obtener todos los registros de la tabla:

Código SQL [-]
SELECT
  CODIGO,
  DESCRIPCION,
  IMPORTE,
  CANTIDAD
FROM 
  VEMOV

[Marina]

Necesito hacerlo de esta forma porque luego esta vista la llamo desde otro lado donde hago SUM del campo importe, lo que me debe sumar los débitos y restar los créditos. Si no hice la distinción entre positivo y negativo me va a sumar todo y el resultado no va a ser real.

Marina

[kinobi]

Hola,

Crea una columna en la vista que sea una expresión númerica de la diferencia entre débito y crédito. Después, podrás lanzar una consulta "SUM" de esa columna para obtener el resultado que buscas.

Saludos

[[maeyanes]]

No me fijé en la multiplicación por -1 en la segunda parte...

Por que no lo hace mediante un procedimiento almacenado? Podría ser algo como:

Código SQL [-]
create procedure XX
returns(
  CODIGO INTEGER, 
  DESCRIPCION VARCHAR(n), 
  IMPORTE NUMERIC(19,2),
  CANTIDAD INTEGER)
as
declare variable TIPO CHAR(1);
begin
  for
    select
      CODIGO, DESCRIPCION, IMPORTE, CANTIDAD, TIPO
    from
      VEMOV
    into
      :CODIGO, ESCRIPCION, :IMPORTE, :CANTIDAD, :TIPO
  do
  begin
    if (TIPO = 'C') then
      IMPORTE = IMPORTE * -1;
    suspend;
  end
end

Ya luego puedes llamar el procedimiento como un select cualquiera:

Código SQL [-]
select sum(IMPORTE) from XX

Espero que te sirva...



Saludos...

[kinobi]

Empezado por maeyanes

No me fijé en la multiplicación por -1 en la segunda parte...

Vaya, yo también caí en el mismo error. Me sumo a la idea del procedimiento almacenado.

Saludos.

[Marina]

Gracias a ambos, voy a probar a ver como resulta

Marina