Ejecutar Stored Procedure Firebird en PowerBuilder

En este post ya habiamos visto como usar un Stored Procedure de Firebird en un DataWindow:
 
http://desarrolladorpowerbuilder.blogspot.pe/2015/10/usando-stored-procedure-firebird-en.HTML

Ahora veremos como ejecutar un Stored Procedure de Firebird desde PowerScript.

Primer Ejemplo:

En Firebird tenemos un Stored Procedure que nos devuelve el ultimo numero de un documento sumándole uno.

Vamos a PowerBuilder y debemos ejecutar el Stored Procedure con el siguiente PowerScript:

SELECT  NRO_SER,
                 NRO_ACT
    INTO :ls_Serie, :li_Numero
  FROM USP_SEL_DOCUMENTO_NUMERACION(gs_Empresa, gs_Sucursal, gs_Terminal, ls_Documento);

Segundo Ejemplo:

En Firebird tenemos un Stored Procedure que actualiza el ultimo numero de un documento sumándole uno.

Vamos a PowerBuilder

Para ejecutar este Stored Procedure Firebird tenemos que declararlo como una función externa en un Standard Class de tipo Transaction, siguiendo estos pasos:

1. New, clic en Standard Class, OK:

 

2. Seleccionar Transaction, clic en OK.

 

3. Guardamos el objeto.

 

4. En propiedades del objeto Application dar clic en el botón Additional Properties

 

 

5. Ubicamos la pestaña Variable Types y en la caja SQLCA, digitamos el nombre del objeto Transaction, luego clic en OK.

 

 

 

6. Abrimos el objeto de tipo Transaction y ubicar Local External Functions.

 

 

 7. Declaramos el Stored Procedure Firebird

 

 

8. Por ultimo las siguientes líneas deben estar dentro del evento o función donde se va ejecutar el Stored Procedure Firebird:

 

SQLCA.USP_UPD_DOCUMENTO_NUMERACION(gs_Empresa, gs_Sucursal, gs_Terminal, ls_Documento);



Usar Stored Procedures en Packages de Oracle en DataWindow

Para poder usar cualquier Stored Procedure que se encuentre en un Package de Oracle en un DataWindow, seguimos los siguientes pasos:

1. Buscamos la conexión de la Base de Datos Oracle que tenemos, clic derecho Properties:

2. Activamos la casilla List Package Subprograms de la pestaña System:

Usando Stored Procedure Firebird en DataWindow

El siguiente post es la respuesta a las preguntas que he recibido de como usar un Stored Procedure creado en Firebird en un DataWindow.

Primero: El siguiente Stored Procedure en Firebird

CREATE PROCEDURE USP_LISTA_RUTA(
v_RUTA VARCHAR(25))

RETURNS(  COD_RUT VARCHAR(4) ,
  NOM_RUT VARCHAR(25))

AS

BEGIN

  FOR SELECT COD_RUT,
                          NOM_RUT
              FROM RUTA
           WHERE NOM_RUT CONTAINING :v_RUTA

  INTO :COD_RUT,
            :NOM_RUT

    DO SUSPEND;

END;

Segundo: En PowerBuilder

1. Creamos un nuevo objeto DataWindow:

2. Elegimos SQL Select, clic en Next.

3. Clic en el botón Cancel.

4. Clic en Convert To Syntax de la opción Design

6. Creamos un argumento

8. Debemos escribir lo siguiente:

 9. Clic en Next



10. Clic en Finish

 Nota:

1. Para el ejemplo usamos un Stored Procedure Firebird seleccionable (porque contiene el comando SUSPEND).

2. Se ejecuta un Stored Procedure Firebird como si fuera una tabla.

DataWindow Stored Procedure

Para crear un DW de tipo Stored Procedure, seguimos los sgtes pasos:

1 - Clic en New del PowerBar, luego en la pestaña DataWindow elegimos Grid y OK

2 - Luego nos mostrara la sgte ventana donde elegiremos Stored Procedure y Next

3 - Luego en la sgte ventana buscamos el Stored Procecure con el que queremos trabajar y Next, Next, Finish.

4 - Por ultimo asociamos el Objeto DataWindow de tipo Stored Procedure al Control DataWindow de la ventana en la que deseamos mostrar los datos.