Firebird 1.5 Soporta Case When else end?

[IcebergDelphi]

Hola que tal duilioisola, mira pegue el Codigo en el SQl Editor y me sigue dando los mismo erroeres, lo tratare de probar en un SP, haber que pasa y te cuento, la verdad se me hace rraro que me de este tipo de error en SQL server lo hago perfectamente.
Saludos y gracias.

[[duilioisola]]

Me he dado cuenta de que el when va justo despues del nombre del campo

Código SQL [-]
Select  Sucursales.IdSucursal as Org_ID,Acreditados.IdAcreditado as Acred_Id, Acreditados.rfc,
        Acreditados.CredecialElector as IFE, Acreditados.ApellidoPaterno as Primer_Ape,Acreditados.ApellidoMaterno as Segundo_Ape,
        Acreditados.Nombres as Nombre,Acreditados.Fecha_Nacimiento as Fecha_Nac,Acreditados.A_Estados as Edo_Nac,Acreditados.ASexo as Sexo,
        Acreditados.Telefono as Tel, Acreditados.Fax,Acreditados.Correo_Elec,
        Origen.Origen as Nacionalidad_Origen,EstadoCivil.CodigoEdoC as Cve_Edo_Civil,Acreditados.Fecha_Nacimiento as Fecha_Nac_txt,
        Acreditados.A_Estados as Edo_Res,Acreditados.A_Municipios as Municipio,Acreditados.A_Ejidos as Localidad,
        Acreditados.Direccion,Acreditados.A_Colonia as Colonia,Acreditados.Cp,Pagos.P_Producto as Metodologia,
        Pagos.P_Grupo as Nom_Grupo ,Acreditados.Estudios,Pagos.P_IdGiro as Actividad,Pagos.Ingreso_Semanal,
        Sucursales.IdSucursal,Sucursales.Sucursal ,Giros.Giro ,Pagos.MontoCredito as cantidad_beneficio,
        Pagos.FechaAltaCredito as fecha_beneficio ,Pagos.FechaUltimoPago as fecha_vencimiento,
        Pagos.P_InteresEmpresa as Tasa,Producto.P_PeriodoDescripcion as Frecuencia_Pagos,
       
case /*when*/ Producto.P_PeriodoDescripcion when 'SEMANAL' THEN 'S'  end as Frecuencia_Pagos,

        Producto.Producto as Tipo_credito,
        Pagos.P_NombreGrupoNoFormal as Bloque,Pagos.Renovacion as Ciclo
From    Sucursales,Acreditados,Pagos,Origen,EstadoCivil,Giros ,Producto
Where   Pagos.IdSucursal=Sucursales.IdSucursal and Pagos.P_IdAcreditado=Acreditados.IdAcreditado
        and Acreditados.A_IdOrigen=Origen.IdOrigen and Acreditados.A_IdEdoCivil=EstadoCivil.IdEstadoCivil
        and Pagos.P_IdGiro=Giros.IdGiros  and Pagos.Idperiodo=Producto.P_IdPeriodo

Pruébalo y me dices algo ...

[IcebergDelphi]

Hola amigo , fijate que ya intente asi como dices he incluso pegue el codigo que me enviastes ayer y no funciona ahorita te digo donde marca el error:
el error aparece en esta Linea:
case Producto.P_PeriodoDescripcion when 'SEMANAL' THEN 'S' end as Frecuencia_Pagos,etc.

Ahi donde te estoy marcando en rojo aparece el error, y si muevo esa parte aveces me da error del When pero ahorita me mando esto:

Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 13, char 15.
.


Seguire viendo que puede ser, parace que Firebird 1.5 No Soporta el Case When a la perfeccion, me seguire documentando, y te agradesco mucho por la ayuda. Saludos desde Villaflores, Chiapas Mexico.

[[RONPABLO]]

Código SQL [-]
Select  
       case Producto.P_PeriodoDescripcion 
            when 'SEMANAL' THEN 'S'
       end as Frecuencia_Pagos

       
From    Producto

Prueba de esta forma y descartas si es el case el error

[xander]

Todas las condiciones de Firebird deben ir entre parentesis...

Código SQL [-]
Select  Sucursales.IdSucursal as Org_ID,Acreditados.IdAcreditado as Acred_Id, Acreditados.rfc,
        Acreditados.CredecialElector as IFE, Acreditados.ApellidoPaterno as Primer_Ape,Acreditados.ApellidoMaterno as Segundo_Ape,
        Acreditados.Nombres as Nombre,Acreditados.Fecha_Nacimiento as Fecha_Nac,Acreditados.A_Estados as Edo_Nac,Acreditados.ASexo as Sexo,
        Acreditados.Telefono as Tel, Acreditados.Fax,Acreditados.Correo_Elec,
        Origen.Origen as Nacionalidad_Origen,EstadoCivil.CodigoEdoC as Cve_Edo_Civil,Acreditados.Fecha_Nacimiento as Fecha_Nac_txt,
        Acreditados.A_Estados as Edo_Res,Acreditados.A_Municipios as Municipio,Acreditados.A_Ejidos as Localidad,
        Acreditados.Direccion,Acreditados.A_Colonia as Colonia,Acreditados.Cp,Pagos.P_Producto as Metodologia,
        Pagos.P_Grupo as Nom_Grupo ,Acreditados.Estudios,Pagos.P_IdGiro as Actividad,Pagos.Ingreso_Semanal,
        Sucursales.IdSucursal,Sucursales.Sucursal ,Giros.Giro ,Pagos.MontoCredito as cantidad_beneficio,
        Pagos.FechaAltaCredito as fecha_beneficio ,Pagos.FechaUltimoPago as fecha_vencimiento,
        Pagos.P_InteresEmpresa as Tasa,Producto.P_PeriodoDescripcion as Frecuencia_Pagos,
       
case  
          when ( Producto.P_PeriodoDescripcion = 'SEMANAL') THEN 'S'  end as Frecuencia_Pagos,

Producto.Producto as Tipo_credito,
        Pagos.P_NombreGrupoNoFormal as Bloque,Pagos.Renovacion as Ciclo
From    Sucursales,Acreditados,Pagos,Origen,EstadoCivil,Giros ,Producto
Where   Pagos.IdSucursal=Sucursales.IdSucursal and Pagos.P_IdAcreditado=Acreditados.IdAcreditado
        and Acreditados.A_IdOrigen=Origen.IdOrigen and Acreditados.A_IdEdoCivil=EstadoCivil.IdEstadoCivil
        and Pagos.P_IdGiro=Giros.IdGiros  and Pagos.Idperiodo=Producto.P_IdPeriodo

Revisa las Release Notes de Firebird y ahi te daras cuenta de las sintaxis que se pueden usar con esta y otras instrucciones

[IcebergDelphi]

Empezado por xander

Todas las condiciones de Firebird deben ir entre parentesis...

Código SQL [-]
Select  Sucursales.IdSucursal as Org_ID,Acreditados.IdAcreditado as Acred_Id, Acreditados.rfc,
        Acreditados.CredecialElector as IFE, Acreditados.ApellidoPaterno as Primer_Ape,Acreditados.ApellidoMaterno as Segundo_Ape,
        Acreditados.Nombres as Nombre,Acreditados.Fecha_Nacimiento as Fecha_Nac,Acreditados.A_Estados as Edo_Nac,Acreditados.ASexo as Sexo,
        Acreditados.Telefono as Tel, Acreditados.Fax,Acreditados.Correo_Elec,
        Origen.Origen as Nacionalidad_Origen,EstadoCivil.CodigoEdoC as Cve_Edo_Civil,Acreditados.Fecha_Nacimiento as Fecha_Nac_txt,
        Acreditados.A_Estados as Edo_Res,Acreditados.A_Municipios as Municipio,Acreditados.A_Ejidos as Localidad,
        Acreditados.Direccion,Acreditados.A_Colonia as Colonia,Acreditados.Cp,Pagos.P_Producto as Metodologia,
        Pagos.P_Grupo as Nom_Grupo ,Acreditados.Estudios,Pagos.P_IdGiro as Actividad,Pagos.Ingreso_Semanal,
        Sucursales.IdSucursal,Sucursales.Sucursal ,Giros.Giro ,Pagos.MontoCredito as cantidad_beneficio,
        Pagos.FechaAltaCredito as fecha_beneficio ,Pagos.FechaUltimoPago as fecha_vencimiento,
        Pagos.P_InteresEmpresa as Tasa,Producto.P_PeriodoDescripcion as Frecuencia_Pagos,
       
case  
          when ( Producto.P_PeriodoDescripcion = 'SEMANAL') THEN 'S'  end as Frecuencia_Pagos,

Producto.Producto as Tipo_credito,
        Pagos.P_NombreGrupoNoFormal as Bloque,Pagos.Renovacion as Ciclo
From    Sucursales,Acreditados,Pagos,Origen,EstadoCivil,Giros ,Producto
Where   Pagos.IdSucursal=Sucursales.IdSucursal and Pagos.P_IdAcreditado=Acreditados.IdAcreditado
        and Acreditados.A_IdOrigen=Origen.IdOrigen and Acreditados.A_IdEdoCivil=EstadoCivil.IdEstadoCivil
        and Pagos.P_IdGiro=Giros.IdGiros  and Pagos.Idperiodo=Producto.P_IdPeriodo

Revisa las Release Notes de Firebird y ahi te daras cuenta de las sintaxis que se pueden usar con esta y otras instrucciones

Hola Xabder gracias por tu respuesta de hecho anteriormente lo intente asi , ya lo he intentado de varias formas ahora el error que me da es el siguiente:
Invalid token.
Dynamic SQL Error.
SQL error code = -104.
Token unknown - line 14, char 11.
when.

[[RONPABLO]]

Ya probo haciendo este query solamente???

Código SQL [-]
Select       
   case Producto.P_PeriodoDescripcion            
   when 'SEMANAL' THEN 'S' end as Frecuencia_Pagos 
From    Producto