Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Bases de datos > MS SQL Server
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 24-01-2009
Avatar de alexia
alexia alexia is offline
Miembro
 
Registrado: abr 2008
Ubicación: venezuela
Posts: 60
Poder: 17
alexia Va por buen camino
Problemas en consulta Sql Server 2000

Hola a todos
Tengo una consulta en donde comparo un mes elegido con los meses que se encuentran en la base de datos para hallar un valor en particular, pero me muestra todos los valores en cero.
El query es el siguiente:


Código SQL [-]
SELECT dbo.CEPE_META.Id_MetaPadre, dbo.CEPE_META.Id_Meta, dbo.CEPE_META.Des_Meta AS Des_meta_hijo,
CEPE_META_1.Des_Meta AS Des_meta_padre, dbo.CEPE_META.Referencia, dbo.CEPE_META.ID_Nivel, dbo.CEPE_ValorMeta.Id_Meta AS Expr1,
dbo.CEPE_ValorMeta.VALOR_PIPE, MONTH(dbo.CEPE_ValorMeta.Fecha) AS Expr2, dbo.CEPE_ValorMeta.ACCIONES
FROM dbo.CEPE_META INNER JOIN
dbo.CEPE_META CEPE_META_1 ON dbo.CEPE_META.Id_MetaPadre = CEPE_META_1.Id_Meta INNER JOIN
dbo.CEPE_ValorMeta ON dbo.CEPE_META.Id_Meta = dbo.CEPE_ValorMeta.Id_Meta AND
CEPE_META_1.VersionMeta = dbo.CEPE_ValorMeta.VersionMeta AND CEPE_META_1.VersionPipe = dbo.CEPE_ValorMeta.VersionPipe AND
CEPE_META_1.ID_Pipe = dbo.CEPE_ValorMeta.ID_Pipe
WHERE (YEAR(dbo.CEPE_META.VersionPipe) = 2008) AND (MONTH(dbo.CEPE_ValorMeta.Fecha) = "&mes&")
GROUP BY dbo.CEPE_META.Id_MetaPadre, dbo.CEPE_META.Id_Meta, dbo.CEPE_META.Des_Meta, CEPE_META_1.Des_Meta, dbo.CEPE_META.Referencia,
dbo.CEPE_META.ID_Nivel, dbo.CEPE_ValorMeta.Id_Meta, dbo.CEPE_ValorMeta.ACCIONES, MONTH(dbo.CEPE_ValorMeta.Fecha),
dbo.CEPE_ValorMeta.VALOR_PIPE
HAVING (dbo.CEPE_ValorMeta.ACCIONES = '1') AND (SUBSTRING(dbo.CEPE_META.Des_Meta, 1, 7) = 'Costo U')






Luego tengo lo siguiente:
Código:
Metapun.Source = SQLPIT
Metapun.Open
j=0
  redim id_m(j)
  While Metapun.EOF = False
  redim preserve fec(j+1)
  redim preserve qit(j+1)
 
  fec(j) = Metapun.Fields.Item(9).Value
  qit(j) = Metapun.Fields.Item(8).Value
 
  j=j+1
 
  Metapun.MoveNext
  Wend
  Metapun.close
 
<%if pit(j) <> "" Then 
 if (fec(j) = mes) then
  display_pit = cdbl(pit(i)) 
 end if
else 
  display_pit  ="n.d"
end if%>
<%=formatnumd(display_pit)%>
¿Dónde puede estar el problema?

Gracias anticipadas...
Responder Con Cita
Respuesta



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
consulta sql server 2000 con pivot, ni idea... Gaim2205 SQL 2 05-12-2007 22:40:11
Problemas conectividad instalando sql server 2000 en w2k server ospaco69 MS SQL Server 1 16-02-2007 04:39:17
Pasar consulta de FireBird a MS SQL server 2000 sakuragi SQL 8 30-08-2005 20:51:09
Problemas Con La Instalacion Sql Server 2000 sebas78 MS SQL Server 0 31-07-2003 23:08:27
Problemas con la instalacion de SQL Server 2000 Delphos MS SQL Server 3 22-06-2003 19:45:50


La franja horaria es GMT +2. Ahora son las 00:41:38.


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