Como integrar la gestión de documentos en una aplicación
La gestión de documentos nos permite tener organizados toda una serie de ficheros que podamos querer conservar y tener a mano disponibles de forma fácil y rápida. Por ejemplo, puede que lo necesitemos en el programa que gestiona los pedidos de los clientes para tener el propio pedido en un archivo, el fax escaneado o un e-mail del cliente de forma que mientras consultamos el pedido tengamos acceso directo a los documentos originales con los que se generó dicho pedido.
Para añadir las funcionalidades de la gestión de documentos a los registros de una aplicación existente deberemos entrar a la edición de pantallas desde la empresa de programación (s000). Buscamos la pantalla que queremos modificar y pulsamos el botón copiar pantalla. Como pantalla origen ponemos eines y en los controles inicial y final, 96 y 99 respectivamente, que son los correspondientes a la gestión de documentos. El control inicial de la pantalla de destino lo dejamos tal y como está, ya que será el primero libre. Los campos Pos.sup.izq. sirven para indicar la posición del primer control en la pantalla de destino, el resto se situarán en posiciones relativas a este.
Una vez ya están en su sitio los nuevos controles, ocultamos los dos últimos que están ligeramente desplazados hacia abajo.
En el control correspondiente al origen 96 (consulta documentos), en la función 1, deberemos modificar el select, pasando la naturaleza y para que componga el título de la asociación que queremos ver y en la función 2, deberemos sustituir el campo 170, que se enlaza con el 137, por el que contiene el oid de la nueva aplicación y en el campo correspondiente al 97 (nuevo documento), deberemos sustituir el valor de enlazar ctrl por el correspondiente de la aplicación actual, que será el primer control que hayamos copiado.
También deberemos añadir la correspondiente naturaleza, en la tabla varval, por ejemplo:
insert into varval (val_tab,val_codi,val_desc,val_needed,val_liter) values (5,'pdc','Pedidos de clientes','&#$#','_pdcli ');