Cristal report y los IF en un stored.

Ya puse el codigo, pero como no se como redirecciónarte a ese post, lo copio
y pego a continuación...

Aqui pongo dos codigos.
El primero, codigo de barra funcióna bien ya que no tiene IF´s


ALTER procedure ImprimirCodigoDeBarra(@CodCompra int) as
select ('*' + compraproducto.codprod + '*'),compraproducto.codprod, convert
(varchar, productos.precioefectivo),convert (varchar,
productos.precioefectivo) from compraproducto inner join productos on
compraproducto.codcompra=@CodCompra and compraproducto.codprod productos.codprod and len(productos.codprod) <= 8

En el cristal me aparece:
Campos de bases de datos
ImprimirCodigoDeBarra;1
Expr1000
codprod
Expr1002
Expr1003

Campos de parametros
CodCompra

Pero si utilizo este store procedure:


ALTER Procedure InformeVentasprueba(@tipo char (1),@fechadesde datetime,
@fechahasta datetime, @codentfin int) as


if @tipo ='*'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
end
end
if @tipo ='-'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
end
end
if @tipo ='b'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
end
end

Aparece en el cristal report:

Campos de base de datos
InformeVentasPrueba;1

Campos de parametros
@Tipo
@FechaDesde
@FechaHasta
@CodEntFin

Como podras ver no me aparecen las tablas de la BD debajo de
InformeVentasPrueba;1
Ese es el problema, sin esas tablas no puedo harmar el reporte y parece que
al estar dentro de IF´s no las lee.


Daniel.


"Alejandro Mesa" escribió en el
mensaje news:

Daniel,

Si nos muestras el sp pudieramos saber de que hablas. Por ejemplo, segun
lo
que posteas, yo te recomendaria usar:

select nombre from cliente where estado = @Tipo
go


AMB

"Daniel G. Samborski" wrote:

Es que son varios IF anidados.
Es una consulta algo compleja y manejarla en varios SP creo que seria muy
incomodo.

El ejemplo que di es algo sencillo, solo como ejemplo.

Daniel.

"Maxi" escribió en el mensaje
news:
> Hola, pues no se como lo maneja CR, quizas sea un problema del reporte.
> De
> todas maneras en lugar de hacer IF porque no armas un Sp's por cada
> condicion?
>
>
> Salu2
> Maxi [MVP SQL SERVER]
>
>
> "Daniel G. Samborski" escribió
> en
> el mensaje news:
>> Hola, tengo el siguiente problema.
>>
>> En un store procedure tengo varios if y cuando lo quiero utilizar en
>> cristal
>> report no me muestra los campos.
>> Y sacando los IF muestra los campos.
>>
>> Por ej.
>>
>> procedure (@Tipo char(1)) as
>>
>> if @Tipo='a'
>> select nombre from cliente where estado='a'
>> if @Tipo='i'
>> select nombre from cliente where estado='i'
>>
>>
>> Porque sucede esto y como se puede solucionar.
>>
>>
>> Daniel.
>>
>>
>
>

Daniel,

Si, el codigo esta muy complicado y CR no sabe cual sera el resultado. De
todas maneras, si tu sabes cuales son las columnas que seran devuelta, puedes
adicionarlas y usarlas para crear el reporte. buscate en el help / ayuda de
CR. Yo lo he hecho antes, pero no recuerdo los pasos a seguir.


AMB

"Daniel G. Samborski" wrote:

Ya puse el codigo, pero como no se como redirecciónarte a ese post, lo copio
y pego a continuación...

Aqui pongo dos codigos.
El primero, codigo de barra funcióna bien ya que no tiene IF´s


ALTER procedure ImprimirCodigoDeBarra(@CodCompra int) as
select ('*' + compraproducto.codprod + '*'),compraproducto.codprod, convert
(varchar, productos.precioefectivo),convert (varchar,
productos.precioefectivo) from compraproducto inner join productos on
compraproducto.codcompra=@CodCompra and compraproducto.codprod > productos.codprod and len(productos.codprod) <= 8

En el cristal me aparece:
Campos de bases de datos
ImprimirCodigoDeBarra;1
Expr1000
codprod
Expr1002
Expr1003

Campos de parametros
CodCompra

Pero si utilizo este store procedure:


ALTER Procedure InformeVentasprueba(@tipo char (1),@fechadesde datetime,
@fechahasta datetime, @codentfin int) as


if @tipo ='*'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
end
end
if @tipo ='-'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'j'
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'j'
end
end
if @tipo ='b'
begin
if @codentfin = 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta
and ventas.tipo = 'b'
end
if @codentfin <> 0
begin
select ventas.codven,
ventas.fecven,
nomentfinanciera.descripcion,isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago <> 'Ef' and Ventas.Tipopago <>
'Ch' join extensionclientes on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Efectivo',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ef' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
union
select ventas.codven,
ventas.fecven,
'Cheque',isnull(convert(int,ventas.cancuo),'0'),
convert(varchar,ventas.imptotal),
cliente.apellnomb,cliente.tipodoc,
cliente.nrodoc,extensionclientes.ApeNombre, ventas.naprobacion, ventas.tipo
from ventas inner join cliente on cliente.CodCli=ventas.CodCli
join nomentfinanciera on ventas.codentfin=nomentfinanciera.codentfin
and ventas.EstadoVen='a' and ventas.Tipopago = 'Ch' join extensionclientes
on
ventas.codext = extensionclientes.codext and ventas.fecven between
@fechadesde and @fechahasta and ventas.codentfin = @codentfin
and ventas.tipo = 'b'
end
end