Etiqueta

23 de diciembre de 2015

Programación asíncrona con Omnis

Existen dos enfoques básicos a la hora de programar determinadas funciones o métodos, nos referimos a la programación “sincrónica” y “asincrónica”. Con programación “sincrónica”, la ejecución de cada función o método deberá completarse antes de iniciarse el siguiente. Este es el comportamiento predeterminado en Omnis. La desventaja de este modelo es que el proceso puede quedar congelado por largo tiempo debido a la esperar por una acción del usuario o de la ocurrencia de un evento a fin de poder ejecutar otras tareas. Una solución a esto la encontramos bajo el modelo de programación “asíncrona”. En este caso, una función o método es ejecutado en un hilo separado, siendo posible el procesado en paralelo de otras funciones, cada una en su propio hilo. Sin duda (dependiendo del tipo de tareas a realizar) éste método es más rápido y eficiente, ya que la ejecución de un método nunca se queda parado a la espera de un suceso.

Imagine una situación en la que una aplicación necesita realizar una importación de datos, pero sin que eso le impida al mismo tiempo llevar a cabo alguna otra función. Bajo el modelo “sincrónico”, tendría que completarse primero la importación de datos, lo cual dejaría al programa bloqueado, mientras que en modo “asíncrono” la importación de datos podría ejecutarse en segundo plano, si impedir la ejecución de cualquier otro código.

El siguiente ejemplo hace uso del componente “Web Services”. Tomemos un ejemplo sencillo: en un bucle vamos incrementado el valor de una variable, mientras que, al mismo tiempo, se le presenta un “OK message” al usuario indicándole que existe un proceso ejecutándose en segundo plano.

En primer lugar, añadiremos a nuestra librería una “remote task” de nombre “RTest”, sobre la que crearemos el método denominado “$backgroundMethod()”. Pulsamos botón-derecho sobre el método y lo marcamos como “Web Service Method static”, tal y como mostramos en la siguiente imagen.


A continuación, añadiremos al método el siguiente código:

For contador from 1 to 1000000 step 1
  Calculate contador2 as contador+1
End For
OK message {¡Proceso en segundo plano finalizado!}

Ahora crearemos una ventana con un botón, al cual añadir en su método “$event()” el siguiente código:

Start server
Do async method rTest/$backgroundMethod
OK message {¡Método contador ejecutándose en segundo plano!}

Para probarlo, abra la ventana y haga clic sobre el botón. Primero aparecerá el “OK message” indicando que se está ejecutando el método. Aunque pulse “Aceptar”, el proceso seguirá su curso, pero a su conclusión se le mostrará otro “OK message” indicando su finalización.

Cuando esté ejecutando métodos en modo “asíncrono”, deberá asegurarse de que se está programando en un entorno "seguro para subprocesos", es decir, asegurarse de no utilizar variables globales o comandos que puedan modificar indicadores globales. Los resultados podrían resultar los no esperados, si utilizamos comandos que (por ejemplo) cambien el valor de #F. Para volver al modo de ejecución “sincrónica” (el modo por defecto), deberemos usar el comando “Stop server”.

19 de diciembre de 2015

Cómo verificar y/o reparar los permisos del disco en OS X Capitán

Abra la aplicación Terminal (se encuentra en /Aplicaciones/Utilidades/) y use el comando siguiente:

sudo /usr/libexec/repair_packages --verify --standard-pkgs /

Si desea comprobar los permisos de una unidad diferente, especifique el volumen correspondiente en lugar de "/".  El comando se ejecutará, mostrando las diferencias que se encuentre, del siguiente modo:

Permissions differ on "usr/libexec/cups/cgi-bin", should be drwxr-xr-x , they are dr-xr-xr-x .
Permissions differ on "usr/libexec/cups/daemon", should be drwxr-xr-x , they are dr-xr-xr-x .
Permissions differ on "usr/libexec/cups/driver", should be drwxr-xr-x , they are dr-xr-xr-x .
Permissions differ on "usr/libexec/cups/monitor", should be drwxr-xr-x , they are dr-xr-xr-x .


Si se han encontrado permisos que difieren y le gustaría para repararlos, simplemente deberemos sustituir la bandera -verify por -repair, del modo siguiente:

sudo /usr/libexec/repair_packages --repair --standard-pkgs --volume /





16 de diciembre de 2015

Acceso directo HTTP con Omnis

La técnica Omnis denominada “Cliente-Ligero” o “Ultra-thin” nos permite invocar una tarea remota o “remote task” desde un formulario HTML, sin necesidad de utilizar el cliente JavaScript o el también llamado “jsClient”. En éstos casos Omnis crea una instancia para la tarea remota particular, he invoca a su método “$construct()”. El valor de retorno, será texto HTML standard.

La invocación directa http, deberá seguir la siguiente estructura:

http://≤Servidor≥:≤Puerto≥/Cliente-ligero

≤Servidor≥ es el nombre de dominio o dirección IP del equipo en el que se esté ejecutando Omnis Studio. La dirección 127.0.0.1, será apropiada si se trata de nuestra propia máquina.

≤Puerto≥ es el número de puerto previamente fijado sobre la propiedad “$ServerPort” de Omnis Studio; de forma predeterminada es el 5912, pero puede cambiarse por cualquier otro entre 1 y 32767. La propiedad “$ServerPort” forma parte del grupo “$root.$prefs”.

Para probar esto, puede optar por descargarse la librería denominada “DirectHTTP”, la cual está disponible para su descarga gratuita desde la web de Aula Omnis, o bien créela una con ese mismo nombre y después añádale una “remote task” con el nombre “rtDirectHTTP” e inserte en su método “$construct()” el código siguiente:

; Sobre el $construct()
; Cree también la siguientes variables
; Cómo parámetro: pParams (Row)
; Como locales: fullhtml (Char 100000000) y html (Char 100000000)

Begin text block
  Text: ≤html≥ (Carriage return,Linefeed)
  Text: ≤body bgcolor="FFFFFF"≥ (Carriage return,Linefeed)
  Text: ≤title≥Hello [pParams.User] ≤/title≥ (Carriage return,Linefeed)
  Text: ≤H1≥Hello [pParams.User] ≤/H1≥ (Carriage return,Linefeed)
  Text: ≤a href="javascript:history.go(-1);"≥Go back≤/a≥ (Carriage return,Linefeed)
  Text: ≤/BODY≥ (Carriage return,Linefeed)
  Text: ≤/html≥ (Carriage return,Linefeed)
End text block
Get text block html

Calculate fullhtml as con('content-type: text/html',chr(13,10),'content-length:',len(html),chr(13,10,13,10),html)
Quit method fullhtml


La “remote task” es invocada desde dentro del formulario HTML del modo siguiente:

≤html≥
  ≤form action="http://127.0.0.1:5912/ultra" method="Get"≥
    ¿Cuál es su nombre? ≤input br="" maxlength="50" name="User" size="30" type="Text" /≥    ≤input type="Submit" name="Send" value="Send"≥
    ≤input type="hidden" name="OmnisLibrary" value="DirectHTTP"≥
    ≤input type="hidden" name="OmnisClass" value="rtDirectHTTP"≥
  ≤/form≥
≤/html≥


Deberá cambiar la dirección IP y el puerto 5912 para que se conforme a su configuración, la dirección IP y el número de puerto indicados anteriormente son los usados por Omnis como valores por defecto.

A continuación, abra el formulario HTML en un navegador, introduzca un nombre y haga clic en “Send”. Esto provocará la invocación del método “$construct” de la tarea remota “rtDirectHTTP”, pasándole el parámetro denominado “User”, que contendrá el texto introducido en el formulario. La llamada http completa es la siguiente:

http://127.0.0.1:5912/ultra?User=Santa&Send=Send&OmnisLibrary=DirectHTTP&OmnisClass=rtDirectHTTP

La “remote task” procesa los valores del formulario y devuelve al navegador texto HTML estándar, como se muestra a continuación: