Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > SQL
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 02-06-2010
Avatar de Softweb
Softweb Softweb is offline
Miembro
 
Registrado: ago 2008
Posts: 46
Poder: 0
Softweb Va por buen camino
Ya lo tengo solucionado.

Código SQL [-]
CREATE PROCEDURE dbo.PROC_BUSCAR_HOJILLAS
@CENTRO int, 
@PEDIDO int, 
@TOTAL int OUT
AS
DECLARE @PRETOTAL INT, @ISBN varchar(20),
@EXIS_INI_DEPOSITO INT, @EXIS_ACT_FIRME INT, @EXIS_ACT_DEPOSITO INT, @UNIDAD_EXAMEN INT
SET @PRETOTAL=0
SET @ISBN='' 

DECLARE ElCursor CURSOR STATIC LOCAL FORWARD_ONLY FOR
  SELECT PEDUSMD_ISBN FROM dbo.PEDIDOS_USMARCD 
  WHERE CENTRO_CODIGO=@CENTRO AND PEDUSMD_CODIGO=@PEDIDO

OPEN ElCursor FETCH NEXT FROM ElCursor INTO @ISBN
  WHILE (@@FETCH_STATUS = 0) 
    BEGIN
    SELECT
    @EXIS_INI_DEPOSITO=SUM(ARTICULOS_EXIS_INI_DEPOSITO),
    @EXIS_ACT_FIRME=SUM(ARTICULOS_EXIS_ACT_FIRME),
    @EXIS_ACT_DEPOSITO=SUM(ARTICULOS_EXIS_ACT_DEPOSITO),
    @UNIDAD_EXAMEN=SUM(ARTICULOS_UNIDAD_EXAMEN)
    FROM dbo.ALMACEN_STOCK
    WHERE ARTICULOS_CODIGO IN (SELECT ARTICULOS_CODIGO FROM dbo.ARTICULOS WHERE ARTICULOS_REFERENCIA_PROVEEDOR=@ISBN)
                    
    IF ((@EXIS_ACT_FIRME + @EXIS_ACT_DEPOSITO)- @UNIDAD_EXAMEN - @EXIS_INI_DEPOSITO) > 0
      BEGIN
      SET @PRETOTAL = @PRETOTAL+1
      END      
    FETCH NEXT FROM ElCursor INTO @ISBN
    END
CLOSE ElCursor
DEALLOCATE ElCursor

SET @TOTAL = @PRETOTAL
GO


Saludos y gracias.
Responder Con Cita
  #2  
Antiguo 03-06-2010
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is online now
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 19.474
Poder: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Gracias por colocar la solución final.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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 dentro de un store procedure con DB2 María Belén DB2 1 26-05-2010 14:24:36
Recorrer Tabla, contar registro repetidos y escribir totales en otra Tabla Lucas_diaz1810 Conexión con bases de datos 1 25-12-2006 13:04:34
For dentro de un Stored Procedure en IB alapaco Firebird e Interbase 2 24-07-2006 18:10:19
commit dentro de un procedure de firebird cahosoft Firebird e Interbase 2 10-09-2005 04:02:03
asignacion dentro de un stored procedure febito Oracle 1 10-06-2004 15:33:55


La franja horaria es GMT +2. Ahora son las 11:37:02.


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