Ver Mensaje Individual
  #14  
Antiguo 27-10-2012
novato_erick novato_erick is offline
Miembro
 
Registrado: ago 2010
Ubicación: Panamá
Posts: 396
Reputación: 14
novato_erick Va por buen camino
Vuelvo a empezar a ver en que parte me estoy equivocando:

Este es mi procedimiento de Consulta:

Código SQL [-]
SET TERM ^ ;

CREATE PROCEDURE CONSULTACEDULA(
  CEDULA VARCHAR(20) CHARACTER SET NONE COLLATE NONE)
RETURNS(
  ID INTEGER)
AS
BEGIN
  /* Procedure body */
  SELECT ID_EMPLEADOS FROM TEMPLEADOS WHERE CEDULA_EMPL =:CEDULA INTO :ID;
  suspend;
END^

SET TERM ; ^

No hay problema ya que si funciona correctamente

ahora hago prueba haciendo esto:
Código SQL [-]
 EXECUTE procedure CONSULTACEDULA(:Cedula)
y lo hace me devuelve mi id;

ahora el procedimiento para llamar a consulta y realizar insercion:

Código SQL [-]
CREATE PROCEDURE ADJUNTO(
  ID_EMPL INTEGER,
  HOJADVIDA CHAR(1) CHARACTER SET NONE COLLATE NONE,
  FOTO CHAR(1) CHARACTER SET NONE COLLATE NONE,
  CED CHAR(1) CHARACTER SET NONE COLLATE NONE,
  TITULOS CHAR(1) CHARACTER SET NONE COLLATE NONE,
  REFERENCIAS CHAR(1) CHARACTER SET NONE COLLATE NONE,
  RP CHAR(1) CHARACTER SET NONE COLLATE NONE,
  EXAM CHAR(1) CHARACTER SET NONE COLLATE NONE)
  RETURNING_VALUES ID_CEDULA INTEGER
AS
DECLARE VARIABLE CEDULA VARCHAR(20);
DECLARE VARIABLE ID INTEGER;
BEGIN
EXECUTE procedure CONSULTACEDULA(:Cedula) RETURNING_VALUES ID;
INSERT INTO TADJUNTOSEMPL (ID_EMPLEADOS,HOJADEVIDA,FOTOCARNET,COPIACED,
                           COPIATITULOS,REFERENCIAS,RECORDPOLICIACO,EXAMEMBARAZO)
  VALUES (:ID,:HOJADVIDA,:FOTO,:CEDULA,:TITULOS,:REFERENCIAS,:RP,:EXAM);
  SUSPEND;
END^

es aqui donde no se que pasa ya que en el primer parametro me pone

1 parametro: ID_EMPL =
2 Parametro: HOJADVIDA =
3 Parametro: FOTO =
4 Parametro: CED =
5 Parametro: TITULOS =
6 Parametro: REFERENCIAS =
7 Parametro: RP =
8 Parametro: EXAM =

En fin no me hace el Excecute para devolver el valor y ponerlo en el primer parametro que es id_empl
Responder Con Cita