Buen dia.
Es firebird 3.0 con EMS SQL MANAGER FREEWARE LITE. El problema es solo con los procedure en especifico cuando utilizo el comando for select ya con los otros procedure no presenta problemas. por ejemplo en el procedure siguiente al compilar me borra todo el cuerpo donde declaro las variable, repito, solo con los procedure seleccionables (donde aplico los ' for select'). Descargue el ib expert en caso de no conseguir solucion..
Código SQL
[-]CREATE PROCEDURE PRN_CALCULO (pe_nomina INTEGER)
AS
DECLARE VARIABLE v_id SMALLINT;
DECLARE VARIABLE v_codigo CHAR(4);
DECLARE VARIABLE v_nombre VARCHAR(30);
DECLARE VARIABLE v_apellido VARCHAR (30);
DECLARE VARIABLE v_concepto VARCHAR (30);
DECLARE VARIABLE v_valor DOUBLE PRECISION;
DECLARE VARIABLE v_salario DOUBLE PRECISION;
BEGIN
for select emp_id, emp_nombre, emp_apellido, emp_salario
FROM empleado where emp_condicion= 'A' INTO :v_id, :v_nombre,
:v_apellido, :v_salario DO
BEGIN
for select cue_codigo, cue_nombre,cue_factor from CUENTAS
WHERE cue_fijo INTO :v_codigo, :v_concepto, :v_valor do
BEGIN
INSERT INTO DETNOMINA (det_nominaid, det_concepto, det_monto,
det_empid) VALUES (:PE_NOMINA, :v_concepto, :v_valor,
:v_id);
END
SUSPEND;
END
SUSPEND;
END^
SET TERM ; ^