Anónimo
Consulta, uso de case en query
Hola, tengo el siguiente código para una consulta a bd con query, el problema es que me manda un error de no coincidencia de tipos, pero creo que más bien el problema esta en la sintaxis cuando uso el "case", anexo código, gracias anticipadas;
.CommandText = Array( _
"SELECT AGX055.AG54FC AS 'Fecha', AGX050.codigo_agencia AS 'CodAg', AGX050.AG50MN AS 'Monto', (case AGX050.AG50ST = 1 AS 'Pendiente', AGX050.AG50ST = 2 'Correspondido' else 'Rechazado') end AS 'Estado Actual'" _
, _
, "" & Chr(13) & "" & Chr(10) & "FROM " & base & ".dbo.AGX050 AGX050, " & base & ".dbo.AGM069 AGM069, " & base & ".dbo.AGX055 AGX055" _
, "" & Chr(13) & "" & Chr(10) & "WHERE ((AGX055.AG54FC between = {ts '" & Sheets("Conexion").Range("R8").Text & "'})) AND (AGX055.codigo_agencia = AGX050.codigo_agencia)")
.CommandText = Array( _
"SELECT AGX055.AG54FC AS 'Fecha', AGX050.codigo_agencia AS 'CodAg', AGX050.AG50MN AS 'Monto', (case AGX050.AG50ST = 1 AS 'Pendiente', AGX050.AG50ST = 2 'Correspondido' else 'Rechazado') end AS 'Estado Actual'" _
, _
, "" & Chr(13) & "" & Chr(10) & "FROM " & base & ".dbo.AGX050 AGX050, " & base & ".dbo.AGM069 AGM069, " & base & ".dbo.AGX055 AGX055" _
, "" & Chr(13) & "" & Chr(10) & "WHERE ((AGX055.AG54FC between = {ts '" & Sheets("Conexion").Range("R8").Text & "'})) AND (AGX055.codigo_agencia = AGX050.codigo_agencia)")
1 respuesta
Respuesta
Lo siento, si bien uso algo de sql, lo mío es más básico en esta parte; si no conseguís ayuda te recomiendo que pruebes en el rubro de sql o base de datos...