Correccion de Sintanxis

[sierraja]

Perdon por la etiqueta SQL. Tuve un error.

Código SQL [-]
 

 
FOR SELECT codigo_suscriptor, tipo_tarifa, tipo_factura, fecha, base_imponible, excento

 
    FROM facturacion f

 
    where (f.tipo_tarifa=:x_tipo_tarifa) and (f.tipo_factura=:x_tipo_factura) and (fecha=:x_fecha)

 
  INTO :cod, :tip_tar, :tip_fac, :fec, :bas_imp, :exc

 
  DO

 
    update facturacion

 
    set base_imponible=cloaca;

 
  suspend;

[Casimiro Noteví]

¿Y qué error tiene?, ¿qué quieres que haga y no hace?, ¿qué es cloaca? (aparte de un lugar repugnante), ¿para qué haces un for select de una tabla y recabas datos que almacenas en unas variables y luego actualizas una tabla con un valor que no tiene nada que ver con la otra?, ¿por qué no pones el código completo?

[sierraja]

He tratado de realizar lo siguiente:

Quiero hacer mediante un procedimiento almacenado una actualizacion. El campo base_imponible es un campo numerico y cloaca tambien lo es. Este es un sistema de facturacion por consumo de agua potable, en la cual quiero asignarle el valor que tiene el campo cloaca al campo base_imponible, para eso necesito los parametros que son tipo_tarifa (Residencial, Especial, Comercial, Industrial A) tipo_factura (Consumo o Servicio) y que sean del mes y el a#o que se suministre. Lo he intentado a traves de los componentes IBX en delphi pero no he podido hacer el cambio, de alli que me fui hacia el ibexpert para hacerlos directamente en la base y no me ha funcionado. Habia conseguido un link que me indicaba que los procedimientos almacenados se hacian de esa manera, la cual fue la que trate de modificar e hice le procedimiento presentado. Pero al fin la idea es actualizar los campos que mencione con los parametros requeridos. He realizados varios procedimientos para hacer varias cosas dentro de las tablas de la BD, pero en este caso estoy bastante desconcertado. De antemano gracias por la atencion prestada. No se si falta alguna otra informacion para tratar de resolver el asunto. Nuevamente gracias.

[Casimiro Noteví]

Mejor pon aquí las tablas implicadas y lo que quieres conseguir.

[sierraja]

Esta es la tabla:

Status-----Codigo---Cloaca---Tipo_tarifa---Fecha---Tipo---Base_Imponible
 
Por Facturar---237---0,38---Residencial---01/12/2009---Consumo 
Por Facturar---237---0,07---Residencial---01/01/2010---Consumo 
Facturado   ---237---0,11---Residencial---01/02/2010---Consumo 
Por Facturar---500---0,33---Residencial---01/12/2009---Consumo 
Por Facturar---500---0,12---Residencial---01/01/2010---Consumo---33,45
Por Facturar---500---0,01---Residencial---01/02/2010---Consumo---00,98
Por Facturar---500---0,87---Residencial---01/12/2009---Servicio--11,22
Por Facturar---500--- 1,2---Residencial---01/12/2009---Servicio
Por Facturar---700---0,38---Residencial---01/12/2009---Consumo

Quiero asignarle el valor que tiene cloaca a la base_Imponible en el mes de diciembre del 2009, tomando en cuenta los parametros de: Tarifa: Residencial, Tipo: Consumo y Mes de diciembre de 2009. Es decir los registros resaltados, pero debo hacerlo con un procedimiento almacenado.

Gracias por tu atencion...

[Casimiro Noteví]

Bueno, si no te he entendido mal, sería algo más o menos así:

create procedure  nombrequequieras (
  tarifa varchar(15),  /* el tipo que tenga el  campo */   
  tipo varchar(15),  /* el tipo que tenga el campo */    
  mes (integer)     /* supongo que el campo fecha es timestamp o date */ 
) 
as begin   
  update tabla comosellame   
  set base_imponible = cloaca   
  where tipo_tarifa=  :tarifa   
  and tipo= :tipo   
  and extract(month from fecha)= :mes  
end

[sierraja]

Esto lo he intentando varias veces pero no lo hace y este es el codigo:

Código SQL [-]
Begin
  update facturacion
  set base_imponible = cloaca   
  where tipo_tarifa=:x_tipo_tarifa and tipo_factura=:x_tipo_factura and extract(month from fecha)=:x_mes and extract(year from fecha):x_year;
  suspend;
end

Cuando reviso la tabla de un registro en especial no hace el cambio.

[cloayza]

Empezado por Casimiro Notevi

Bueno, si no te he entendido mal, sería algo más o menos así:

create procedure  nombrequequieras (
  tarifa varchar(15),  /* el tipo que tenga el  campo */   
  tipo varchar(15),  /* el tipo que tenga el campo */    
  mes (integer)     /* supongo que el campo fecha es timestamp o date */ 
) 
as begin   
  update tabla comosellame   
  set base_imponible = cloaca   
  where tipo_tarifa=  :tarifa   
  and tipo= :tipo   
  and extract(month from fecha)= :mes  
end

A este codigo le haria solo unos pequenos cambios...

create procedure  nombrequequieras (
  tarifa varchar(15),  /* el tipo que tenga el  campo */   
  tipo varchar(15),  /* el tipo que tenga el campo */    
  mes (integer),     /* supongo que el campo fecha es timestamp o date */ 
  ano (Integer)      /* Año*/ 
) 
as begin   
  update tabla comosellame   
  set base_imponible = cloaca   
  where Upper(tipo_tarifa)=  Upper(:tarifa)
  and Upper(tipo)= Upper(:tipo)
  and extract(month from fecha)= :mes
  and extract(year from fecha)= :ano  
end