Storep procedure con execute statment
 

Hola a todos de antemano gracias por su amable ayuda

Explico mi problema

trato de llenar una tabla que tiene los siguientes campos
codigo varchar(20)
cantidad numeric(15,2)

como se dieron cuenta se executa una sentencia execute statement donde el problema es que el campo q intento insertar es de tipo varchar y me da error al insertar

como puedo indicarle a este valor las comillas para q se ejecute bien

ejemplo

insert into prueba (codigo,enero) values (1.01.1,-1.10)


ahi se produce el error pues deberia ser insert into prueba (codigo,enero) values ('1.01.1',-1.10)

Código SQL [-]
create or alter procedure LLENAR_PIVOT
as
declare variable CODI varchar(20);
declare variable NOMB varchar(100);
declare variable TCNOMBRETABLA varchar(10);
declare variable LCCOLUMNA varchar(10);
declare variable CANTIDAD numeric(15,2);
declare variable LCUPDATE varchar(4096);
begin
tcNombreTabla='PRUEBA'  ;

FOR  select p.codigo,p.nombre,
case
WHEN extract(month from c.fecha_diario)=1 Then 'ENERO'
WHEN extract(month from c.fecha_diario)=2 THEN 'FEBRERO'
WHEN extract(month from c.fecha_diario)=3 THEN 'MARZO'
End mes
,sum(debe-haber) monto
 from cab_diario c , det_diario d ,plan_ctas p
where c.key_cab_diario=d.key_cab_diario
and c.estado='T'
and d.key_plan_ctas=p.key_plan_ctas
and extract(month from c.fecha_diario)<=3
Group by 1,2,3  INTO
      :codi,
      :nomb,
      :lcColumna,
      :Cantidad
   DO BEGIN
      lcColumna = Left(lcColumna, 28);
      lcUpdate = 'UPDATE OR INSERT INTO ' ||
                 tcNombreTabla || ' (' ||
                 'CODIGO, ' || lcColumna || ') VALUES (' ||
                 codi ||', '||
                 Cantidad || ') MATCHING codigo';
      EXECUTE STATEMENT lcUpdate;
      End

end

Ejemplo:

Código SQL [-]
cSql = cSql || 
      ' where codigoempresa='||cast(new.codigoempresa as varchar(18))||
      ' and ejercicio='||cast(new.ejercicio as varchar(18))||
      ' and codigocuenta='||''''||new.codigocuenta||'''';

Como dice Casimiro, debes agregar las comillas al generar la sentencia SQL.
Dentro de un string, si repites la comilla, la toma como una comilla literal (').

Código SQL [-]
'CODIGO, ''' || lcColumna || ''') VALUES (' ||

En firebird, dependiendo de algunas cosas también podrías utilizar las comillas dobles. (Puede que las interprete como nombre de un campo).

Código SQL [-]
'CODIGO, "' || lcColumna || "') VALUES (' ||