Procedure

[RolphyReyes]

Saludos.

Cambie un poco tu sentencia y a esto es que me refiero

Código SQL [-]
FOR SELECT A.ALM_CODIGO, B.ALM_DESCRIPCION
FROM PLANTA_ALMACENES A
INNER JOIN ALMACENES B ON A.ALM_CODIGO = B.ALM_CODIGO
WHERE A.PLAN_CODIGO = :PLANTA
INTO :CODIGO, ESCRIPCION
DO
BEGIN
  SUSPEND;
END;

Hasta luego.