Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > Firebird e Interbase
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

 
 
Herramientas Buscar en Tema Desplegado
  #2  
Antiguo 11-11-2016
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Poder: 38
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola
Cita:
Empezado por ronalg Ver Mensaje
...
talvez sea un disparate pero bueno, la idea es:

Si el parámetro cod_cliente es -1 (Que devuelva todos los registros de todos los clientes)
Si el parámetra cod_cliente es >1 (que devuelva todos los registros de ese cliente)
Basándome en los campos que mostras en tu código, podrías hacer:
Código SQL [-]
SET TERM ^ ;

CREATE OR ALTER PROCEDURE SP_TEST (
  COD_CLIENTE INTEGER )
RETURNS (
  R_CODIGO           INTEGER,
  R_NUMERO_CV        INTEGER,
  R_TIPO_TRANSACCION INTEGER )
AS
  DECLARE VARIABLE SENTENCIA VARCHAR(512);
BEGIN
  IF ( COD_CLIENTE = -1 ) THEN
    SENTENCIA = 'SELECT A.CODIGO, A.NUMERO_CV, A.TIPO_TRANSACCION '||
                'FROM TB_COMPRAS_VENTAS A';
  ELSE
    SENTENCIA = 'SELECT A.CODIGO, A.NUMERO_CV, A.TIPO_TRANSACCION '||
                'FROM TB_COMPRAS_VENTAS A' ||
                'WHERE A.REF_CLIENTE = ' || :COD_CLIENTE;

  FOR EXECUTE STATEMENT SENTENCIA
  INTO
    :R_CODIGO,
    :R_NUMERO_CV,
    :R_TIPO_TRANSACCION
  DO
    SUSPEND;
END^

SET TERM ; ^

Ejemplo de uso:
Código SQL [-]
SELECT R_CODIGO, R_NUMERO_CV, R_TIPO_TRANSACCION FROM SP_TEST(6)

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
If o Case en cláusula WHERE Jere_84 SQL 6 26-03-2013 22:15:16
Como usar el CASE en 2 SubConsultas ???? AGAG4 Firebird e Interbase 13 16-10-2006 23:08:45
Problemas al usar case David OOP 5 28-07-2006 17:14:19
Case Anidados ¿Se puede? jam888 MS SQL Server 5 31-01-2006 14:39:38
Incluir un IF dentro de un CASE Javi2 SQL 1 21-04-2005 11:59:31


La franja horaria es GMT +2. Ahora son las 00:14:40.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi