Funte de datos Stored Procedure y Transact SQL

Trabajando con Datawindow y las diferentes fuentes de datos (DataSource), al utilizar la fuente de datos Stored Procedure me ha sido de gran utilidad los siguientes enlaces para trabajar con Transact SQL y la programación para el SQL dinámico generando consultas con criterios de búsqueda.

Referencias:

SQL dinámico en Transact SQL

The Curse and Blessings of Dynamic SQL

Dynamic Search Conditions in T-SQL

Poblar un DropDownListBox control desde base datos

Para poblar dinámicamente un DropDownListBox control desde una tabla en Power Builder podemos usar un DataStore, en el contructor del DropDownListBox hacemos el retrieve sobre el datastore y luego insertamos en el control los elementos recuperados. Ejemplo:

datastore ds

ds = create datastore

ds.dataobject='dw_tdo_doc'

ds.settransobject(sqlca)

ds.retrieve()

int li

for li=1 to ds.rowcount()

insertitem(ds.getitemstring(li,'tdo_desc'),li)

next

insertitem('Seleccionar...',1)

selectitem(1)

Referencia:

DropDownListBox - TodoExpertos - Power Builder

Datos y Notación por punto en Power Builder

En un post anterior vimos las diferencia entre Culumnas computadas vs Campos computados en Power Builder. Es importante entender estos conceptos para facilitar la implementación sobre los datawindows.

Ahora si queremos por ejemplo acceder al valor de un campo computado, de un datawindow que esta en el header, footer o summary se especifica el número de fila como 1 a través de la notación por puntos, ejemplo:

dw_1.Object.avg_cf[1]

He encontrado referencia sobre este tema en PowerBuilder Technique - Data and Dot Notation. Espero que les sirva de aclaración o ayuda.

Power Builder 10.5 ShellExecute

Para abrir cualquier tipo de documentos desde Power Builder versión 10.5 debemos hacer lo siguiente:

• Declaramos la función local externa:

FUNCTION long ShellExecute(ulong ihwnd,string lpszOp,string lpszFile,string lpszParams, string lpszDir,int wShowCmd ) LIBRARY "shell32.dll" ALIAS FOR "ShellExecuteW"

Para la versión 10.5 utilizamos ShellExecuteW en vez de ShellExecuteA porque PB en la version 10.5 usa Unicode en vez de ASCII.

Este problema se le da respuesta en la siguiente hilo de la lista del grupo de Google comp.soft-sys.powerbuilder.

• Luego podemos utilizar la función externa de la siguiente forma:

ShellExecute( 0 , "open" , ls_full_path , ls_parm , ls_path , 1 )

Espero que les sea de utilidad.

Referencias:

Use file association to start an application

Enviar archivos por FTP desde Power Builder

Modify DropDown Datawindow DDDW en Power Builder

En la entrada anterior he dejado referencias para el trabajo con el control DropDownDW. Uno de los contratiempos que he tenido trabajando con este control es cuando aplicamos la función Modify sobre un campo, del DataWindow control, que ha sido editado con este estilo (DropDownDW ) y luego queremos acceder a los registros del Datawindow Child, devolvía valores nulos.

Conclusiones, deberíamos recoger los valores antes de aplicar la función Modify, por ejemplo si nos interesaría proteger el campo o mostrar siempre la flecha.

A otros colegas les ha sucedido algo similar y pueden ver sus comentarios en TodoExpertos .

Trabajando con DropDownDW Datawindow

El Datawindow posee varios controles que forman parte del Datawindow Object, los cuales pueden ser modificados en tiempo de deseño o ejecución. Esta vez les dejo referencia sobre como trabajar con el dropdown datawindow para obtener o establecer las propiedades que necesitemos. Por ejemplo si recuperamos datos desde una tabla código-descripción y queremos establecer un item por defecto.

Referencias:

Working with DDDW Properties

Retaining DDDW Display Values When DDDW Contents Change

DDDW Tips and Tricks

Culumnas computadas vs Campos computados en Power Builder

En el trabajo con Datawindow en Power Builder, podemos diseñar un datawindow object con columnas computadas. Estas poseen gran utilidad frente a los campos computados, pues las columnas computadas forman partes del datawindow object, pudiendo establecer o leer los valores mediantes las funciones GetItemString (Number,Decimal,Date,Time,DateTime) o SetItem.

Para construir una columna computada, vamos a Painter Datawindow, luego definimos el Data Source, en modo Sintaxis en "Design - Convert to Syntax" y establecemos la consulta SQL del datawindow object con las columnas de nuestro interes en la tabla seleccionada. Luego podemos adicionar otra columna como número o cadena en el SELECT y al volver al Painter DataWindow se adiciona automáticamente una columna computada a nuestro datawindow object .

Esta es una manera de adicionar columnas, a nuestro datawindow, que no se reflejan en la tabla selecccionada y poder realizar operaciones sobre ella como parte del datawindow object.

Puedes ver el siguiente ejemplo en Converting a Computed Field to a Computed Column

Control de Versiones de Fuente en Power Builder con Subversion

Para lograr esta integración los requisitos son los siguientes:

Requisitos:

Power Builder 10.5

Subversion (aplicaciones de consola SVN)

TortoiseSVN (interfaz visual SVN para Window)

PbSccProxy (ver 2009-08-01)

PBSCC Proxy

Power Builder 10.5 posee una utilidad para hacer algunas operaciones de control de versiones llamadas PBNativo, la cual cumple con el estándar SCC (Source Code Control). Un buen documento que explica como configurar y utilizar un repositorio de fuentes PBNativo se puede consultar en MTBase Sysbase de Colombia.

PBNativo vs. PBSCC Proxy

En el repositorio de fuentes PBNativo no se almacena un histórico de las versiones de cada objeto, es decir de los cambios hechos en cada check-out. Aunque cuando se hace un check-in se incrementa el número de versión del objeto, solamente queda guardada la última versión en el repositorio; mientras que con PBSCC y TortoiseSVN podemos obtener un histórico de manera fácil, además de todas las bondades que podemos tener usando Subversion como control de versiones de nuestros fuentes.

Desarrollo

En esta entrada abordare sobre el software necesario que necesitaríamos para hacer un buen control de versiones en Power Builder utilizando Subversion y PbSccProxy.

1. Descargamos, configuramos e instalamos Subversion. Asegurarse de que este ejecutándose como servicio (svnserve.exe)

2.Creamos el repositorio para los fuentes en Subversion (svnadmin) o mediante TortoiseSVN.

3. Instalamos TortoisesSVN y creamos el repositorio local SVN.

4. Instalamos PbSccsetup (pbsccsetup.exe)

5. Abrimos y configuramos las propiedades del espacio de trabajo (workspace) de nuestro proyecto, para un control de Fuentes utilizando PBSCC Proxy. Veamos las propiedades establecidas:

6. Nos conectamos al repositorio SVN

7. Adicionamos los objetos de nuestro espacio de trabajo al repositorio SVN (Add to Source Control…, haciendo click derecho sobre el workspace)

8. Escribimos el mensaje para log del SVN

9. Verificar que los objetos (SR*) fueron adicionados al repositorio SVN

10. Actualizamos nuestra espacio de trabajo haciendo un "PowerBuilder Check Out"

11. Ver el historial del objeto, haciendo click derecho sobre el objeto de la librería y "Show History".

Informe de Bodega III

Estas son las últimas respuestas a preguntas relacionadas con el Informe de Bodega (I y II)

Confeccionar una consulta SQL que permita:

5. Obtener para cada producto el stock actual (considerar todas las compras y ventas)

SELECT p.pro_codigo, ((

SELECT ISNULL(SUM(compra.com_cantidad),0)

FROM compra

WHERE p.pro_codigo=compra.pro_codigo)-(

SELECT ISNULL(SUM(venta.vta_cantidad),0)

FROM venta

WHERE p.pro_codigo=venta.pro_codigo)) AS stock

FROM producto p

6. Obtener un listado de todos los productos que se encuentran bajo el stock crítico.

SELECT p.pro_codigo

FROM producto p

GROUP BY p.pro_codigo, p.pro_stock

HAVING p.pro_stock > ((

(

SELECT ISNULL(SUM(compra.com_cantidad),0)

FROM compra

WHERE p.pro_codigo=compra.pro_codigo)-(

SELECT ISNULL(SUM(venta.vta_cantidad),0)

FROM venta

WHERE p.pro_codigo=venta.pro_codigo))

)

7. Obtener por cada producto, el código, nombre y precio vigente el 01 de Enero de 2008.

SELECT p.pro_codigo , producto.pro_nombre, p.pre_valor

FROM precio p, producto

WHERE pre_desde = (

SELECT MAX(pre_desde) FROM precio

WHERE pro_codigo=p.pro_codigo AND pre_desde < '20080101')

AND producto.pro_codigo=p.pro_codigo

Informe de Bodega II

Continuamos respondiendo dos preguntas sobre el Informe de Bodega que vimos recientemente. Pueden obtener los datos de ejemplo en el respaldo de la base de datos. Recuerden compartir sus respuestas o vias de solución, dejando sus comentarios.

Confeccionar una consulta SQL que permita:

3. Obtener el código y nombre de cada producto que registre más de 500 unidades vendidas durante el 2005.

SELECT producto.pro_codigo, producto.pro_nombre

FROM producto, venta

WHERE producto.pro_codigo=venta.pro_codigo AND vta_fecha BETWEEN '20050101' AND '20051231'

GROUP BY producto.pro_codigo, venta.vta_cantidad, producto.pro_nombre

HAVING 500 < SUM(vta_cantidad)

4. Obtener cada uno de los productos que no registra ventas en el último mes.

SELECT producto.pro_codigo, producto.pro_nombre

FROM producto

WHERE pro_codigo NOT IN

(SELECT pro_codigo

FROM venta

WHERE venta.vta_fecha BETWEEN DATEADD(mm, DATEDIFF(mm,0,getdate()), 0) AND dateadd(ms,-3,DATEADD(mm, DATEDIFF(m,0,getdate())+1, 0))

)