problemas con Sql manager

[Elias011267]

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 ; ^

[Casimiro Noteví]

Será problema de ese software, por lo que veo tienen versión específica para firebird.
https://www.sqlmanager.net/en/tools/free

[[movorack]]

Bueno, no se si con el EMS SQL Manager esté ocurriendo eso. En todo caso si es así y es tu herramienta de preferencia, sería conveniente colocar el reporte en el foro del frabricante.

Con respecto a tu SP, viendo la documentación debes modificar un poco tu SP para que retorne el resultado de la consulta.

Código SQL [-]
CREATE PROCEDURE PRN_CALCULO (pe_nomina INTEGER)
RETURNS ( 
  v_id SMALLINT,
  v_codigo CHAR(4),
  v_nombre VARCHAR(30),
  v_apellido VARCHAR (30),
  v_concepto VARCHAR (30),
  v_valor DOUBLE PRECISION,
  v_salario DOUBLE PRECISION
)
AS
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 ; ^

De todos modos solo modifiqué el script que nos compartes. Debes echarle una revisada antes a ver si es lo que requieres realmente (Esto parace el disclaimer )

[Elias011267]

Gracias. Referente a tu observacion por el codigo, no necesito retornar ningun valor, solo actualizo la tabla de detalle de nomina por eso solo declare las variables .

[Elias011267]

Tambien voy descargar por medio del link que me refiere Casimiro, ya que estoy acostumbrado con EMS. Descargue el Ib expert, pero es un poco tedioso instalarlo..

[Casimiro Noteví]

Empezado por Elias011267

T... Descargue el Ib expert, pero es un poco tedioso instalarlo..

Siempre ha sido: Next, next... y se acabó
No sabía que hubiesen cambiado algo.

[Elias011267]

Si es tedioso, de hecho hay hasta un video para explicar como se instala. De momento lo instale, pero la costumbre de trabajar con EMS me condiciona para trabajar con otro producto. Cómo instalar IBExpert Personal 2020 sin errores.pdf

Gracias por siempre atender a tiempo a principiantes como yo.

Feliz año

[Casimiro Noteví]

Empezado por Elias011267

Si es tedioso, de hecho hay hasta un video para explicar como se instala. De momento lo instale, pero la costumbre de trabajar con EMS me condiciona para trabajar con otro producto. Archivo Adjunto 3883
Gracias por siempre atender a tiempo a principiantes como yo.
Feliz año

¡¡¡Ese documento/video es para CRACKEAR la versión de pago!!!


Descarga de ibexpert la versión personal, y listo.