martes, 21 de julio de 2015

Obtener nombre de la ventana activa

Para obtener el nombre de la ventana activa debemos escribir

This.ClassName()

Ejemplo:

String ls_NombreVentana

ls_NombreVentana = This.ClassName()

MessageBox('Nombre de Ventana Activa', ls_NombreVentana)

Obtener Fecha y Hora de Servidor Oracle

Para obtener la fecha del servidor Oracle creamos una función (Function Object):

$PBExportHeader$f_fecha_servidor.srf
global type f_fecha_servidor from function_object
end type

forward prototypes
global function datetime f_fecha_servidor ()
end prototypes

global function datetime f_fecha_servidor ();

// -------------------------------------------------------------------------------------
// Funcion : f_fecha_servidor
// Proposito: Devuelve la fecha y hora del servidor Oracle
// Creador : Jorge A. Barzola Rosadio
// Fecha : 12/03/2013

// -------------------------------------------------------------------------------------

DateTime ldt_fecha

 SELECT SYSDATE
  INTO :ldt_fecha
  FROM dual;

Return ( ldt_fecha )

end function

Este ejemplo es para asignar la fecha y hora del servidor Oracle a un campo del DW:

dw_1.Object.fecha[ll_Fila] = f_fecha_servidor()

Conexión a Oracle 11g desde PowerBuilder Classic 12.5

Para conectarse a una Base de Datos Oracle 11g desde PowerBuilder Classic 12.5 seguimos los siguientes pasos:

1. Buscamos el Driver ORA Oracle




2. Clic derecho y elegimos New Profile...

3. Ingresamos los datos de conexión en la pestaña Connection


4. En la pestaña System ingresamos el nombre del propietario del catalogo


5. En las pestaña Preview clic en botón Test Connection y listo.


Aquí el detalle del soporte de PowerBuilder y Oracle: