Buscar

¡Hola a tod@s!Este artículo es la continuación de mi artículo anterior, donde expliqué cómo es la estructura de una base de datos en Caché. En ese artículo describí los tipos de bloques, las conexiones que existen entre ellos y su relación con los globales. Como el artículo era completamente teórico, realicé un proyecto que ayuda a visualizar el árbol de bloques, y en este artículo explicaré su funcionamiento muy detalladamente.Con el propósito de hacer una demostración, creé una nueva base de datos y eliminé los globales que Caché inicializa de forma predeterminada para todas las bases de datos nuevas. Crearemos un global sencillo: set ^colors(1)="red" set ^colors(2)="blue" set ^colors(3)="green" ​ set ^colors(4)="yellow" Tengan en cuenta que en la imagen se muestran los bloques que conforman el global que creamos. Este es uno sencillo, esta es la razón por la que vemos su descripción en el bloque de tipo 9 (bloque del catálogo de globales). Lo siguiente es el bloque "puntero superior e inferior" (tipo 70), ya que el árbol de globales aún no es lo suficientemente profundo, y puede utilizar un puntero para un bloque de datos que todavía cabe en un solo bloque de 8 KB. Ahora, escribiremos tantos valores en otro global que no cabrán en un solo bloque y veremos los nuevos nodos en el bloque puntero señalando hacia los nuevos bloques de datos, que no caben en el primero. Escribiremos 50 valores, cada valor tendrá una longitud de 1000 caracteres. Recuerde que el tamaño del bloque en nuestra base de datos es de 8192 bytes. set str="" for i=1:1:1000 { set str=str_"1" } for i=1:1:50 { set ^test(i)=str } ​ quit Observen la siguiente imagen: Tenemos bastantes nodos en el nivel del bloque puntero que señala los bloques de datos. Cada uno de los bloques de datos contiene punteros para el siguiente bloque (es el "enlace correcto"). Offset señala el número de bytes que están ocupados en este bloque de datos. Tratemos de simular una separación de los bloques. Añadiremos tantos valores al bloque que su tamaño final superará los 8KB, lo cual provocará que el bloque se divida en dos. Ejemplo del código: set str="" for i=1:1:1000 { set str=str_"1" } set ^test(3,1)=str set ^test(3,2)=str ​ set ^test(3,3)=str El resultado puede verse a continuación: El bloque 50 se dividió y ahora está lleno de datos nuevos. Los valores que se reemplazaron ahora se encuentran en el bloque 58, y en el bloque puntero ahora aparece un puntero para este bloque. Los otros bloques permanecen sin ningún cambio. Un ejemplo con cadenas largas Si utilizamos cadenas con más de 8KB (el tamaño del bloque de datos), obtendremos bloques de "datos grandes". Por ejemplo, podemos simular una situación de este tipo escribiendo cadenas con 10,000 bytes. Ejemplo del código: set str="" for i=1:1:10000 { set str=str_"1" } for i=1:1:50 { set ^test(i)=str ​ } Echemos un vistazo al resultado: Como resultado, la estructura de los bloques en la imagen se mantuvo igual, ya que no agregamos nuevos nodos globales, sino que solo modificamos los valores. Sin embargo, el valor de Offset (el número de bytes ocupados) cambió para todos los bloques. Por ejemplo, el valor de Offset para el bloque #51 ahora es 172 en lugar de 7088. Ahora está claro que el nuevo valor no cabe en el bloque ya que, desde el puntero hasta el último byte de datos debería ser diferente pero, ¿dónde están nuestros datos? Por el momento, mi proyecto no es compatible con la posibilidad de mostrar información sobre los "bloques grandes". Utilicemos la herramienta ^REPAIR para obtener información sobre el contenido nuevo en el bloque #51. Permítanme explicar con más detalle el funcionamiento de esta herramienta. Vemos un puntero que señala como el bloque correcto al #52, y el mismo número se especifica en el bloque puntero principal del siguiente nodo. La compilación de los globales se establece con el tipo 5. El número de nodos que tienen cadenas largas es 7. En algunos casos, el bloque puede contener tanto valores de datos para algunos nodos como cadenas largas para otros, todo ello dentro de un mismo bloque. También vemos que la siguiente referencia del puntero debe esperarse al inicio del siguiente bloque. Respecto a los bloques de cadenas largas: vemos que la palabra clave "BIG" se especifica como el valor del global. Lo que esta palabra nos indica es que los datos se almacenan en "bloques grandes". La misma línea incluye la longitud total que tiene la cadena y la lista de los bloques que almacenan este valor. Echemos un vistazo al "bloque de cadenas largas", el bloque #73. Desafortunadamente, este bloque aparece codificado. Sin embargo, podemos observar que nuestros datos se encuentran después de la información de servicio, a partir del bloque del encabezado (que siempre tiene una longitud de 28 bytes). Conocer el tipo de datos hace que la decodificación del contenido del encabezado sea bastante sencilla: PositionValueDescriptionComment0-3E4 1F 00 00Offset pointing at the end of dataWe get 8164 bytes, plus 28 bytes of the header for a total of 8192 bytes, the block is full.418Block typeAs we remember, 24 is the type identifier for long strings.505CollateCollate 5 stands for “standard Caché”8-114A 00 00 00Right linkWe get 74 here, as we remember that our value is stored in blocks 73 and 74 Permítanme recordarles que los datos del bloque 51 solo ocupan 172 bytes. Esto sucedió cuando guardamos valores grandes. Por ello, parece como si el bloque estuviera casi vacío con solo 172 bytes de datos útiles y sin embargo, ¡ocupa 8KB! Está claro que en una situación como esta el espacio libre se llenará de valores nuevos, pero Caché también nos permite comprimirlos como un global. Por esta razón, la clase %Library.GlobalEdit tiene el método CompactGlobal. Para comprobar la eficacia de este método utilizaremos nuestro ejemplo con un gran volumen de datos, por ejemplo, al crear 500 nodos. Esto es lo que obtuvimos: kill ^test for l=1000,10000 { set str="" for i=1:1:l { set str=str_"1" } for i=1:1:500 { set ^test(i)=str } } quit En la siguiente imagen no se muestran todos los bloques, pero este punto debe quedar claro. Tenemos muchos bloques de datos, pero con un menor número de nodos. Si ejecutamos el método CompactGlobal: write ##class(%GlobalEdit).CompactGlobal("test","c:\intersystems\ensemble\mgr\test") Echemos un vistazo al resultado. El bloque puntero ahora solamente tiene 2 nodos, lo cual significa que todos nuestros valores se encuentran en esos dos nodos, mientras que inicialmente teníamos 72 nodos en el bloque puntero. Por lo tanto, nos deshicimos de 70 nodos y así redujimos el tiempo de acceso hacia los datos cuando pasan por el global, ya que se necesitan menos operaciones para leer los bloques. El método CompactGlobal acepta varios parámetros, como el nombre del global, la base de datos y el valor que indica la capacidad de llenado, el 90% lo hace de forma predeterminada. Y ahora vemos que Offset (el número de bytes ocupados) es igual a 7360, lo cual se encuentra alrededor de ese 90%. Algunos parámetros de salida de la función: el número de megabytes procesados y el número de megabytes después de la compresión. Anteriormente, los globales se comprimían con ayuda de la herramienta ^GCOMPACT, que ahora se considera obsoleta. Cabe destacar que una situación donde los bloques solo se llenan parcialmente es bastante normal. Por otra parte, en ocasiones es posible que no deseemos comprimir los globales. Por ejemplo, si su global se leyó casi completamente y tuvo pocas modificaciones, la compresión puede ser útil. Pero si el global se modifica todo el tiempo, cierta escasez en los bloques de datos evita el problema de tener que dividir los bloques con mucha frecuencia, y el almacenamiento de los nuevos datos será más rápido. En la siguiente parte de este artículo revisaré otra característica de mi proyecto, la cual se implementó durante el primer hackatón que se realizó en la escuela de InterSystems de 2015, un diagrama de distribución para los bloques en las bases de datos y su aplicación práctica. ¡Espero que les haya resultado útil!

Esta vez quiero hablar de algo que no es específico de InterSystems IRIS, pero que creo que es importante si quieres trabajar con Docker y tu máquina de trabajo es un PC o portátil con Windows 10 Pro o Enterprise. Como probablemente sabes la tecnología de contenedores viene básicamente del mundo Linux y, a día de hoy, es en los hosts que corren Linux donde pueden mostrar su máximo potencial. Los que usamos Windows vemos que tanto Microsoft como Docker han hecho grandes esfuerzos estos últimos años y nos permiten correr contenedores Linux en nuestro sistema Windows de una manera muy sencilla... pero no está soportado para entornos productivos y, aquí viene el gran problema, no es fiable si queremos mantener persistencia de datos fuera del contenedor, en el sistema host,... debido principalmente a las importantes diferencias entre los sistema de archivos de Windows y Linux. Al final el propio Docker for Windows utiliza una pequeña máquina Linux virtual (MobiLinux) sobre la que realmente se levantan los contenedores.... lo hace de forma transparente para el usuario de windows... y de hecho funciona muy bien hasta que, como digo, quieren hacer que tus bases de datos sobrevivan más allá de la vida del contenedor... En fin,... que me enrollo,... el caso es que muchas veces, para evitar problemas y simplificar, lo que se precisa es de un sistema Linux completo... y, si nuestra máquina es Windows, la única forma de tenerlo es vía una máquina virtual. Al menos hasta que salga WSL2 en Windows 10 en unos meses, pero eso es otra historia. En este artículo te voy a contar, paso a paso, como instalar un entorno en el que puedas trabajar con contenedores Docker sobre un Ubuntu en tu servidor Windows. Vamós allá... 1. Activa Hyper-V Si no lo tienes ya activado, entra en añadir características de Windows y activa Hyper-V. Tendrás que reiniciar. 2. Crea una máquina virtual Ubuntu sobre Hyper-V Creo que no hay forma más fácil de crearse una máquina virtual (MV). Simplemente abre la venta de Administrador de Hyper-V, ve a la opción Creación Rápida... (a la derecha de la ventana) y crea tu máquina virtual en alguna de las versiones de Ubuntu que te ofrezca (podrías bajarte el iso de otra distribución de Linux y crearte la MV con una distro distinta). En mi caso he elegido la última versión disponible de Ubuntu, la 19.10. En todo caso, lo mismo que hagamos vale para la 18.04. En unos 15 o 20 minutos, según tarde en bajarse la imagen, tendrás tu nueva máquina virtual creada y lista. Importante: Deja las opciones de conmutador por defecto (Default Switch). Esto te dará acceso a Internet tanto desde el host windows como desde la máquina virtual. 3. Crea una red local Uno de los problemas de utilizar máquinas virtuales que yo me he encontrado a menudo tiene que ver con la configuración de red... unas veces funciona, otras no, funciona si estoy con Wi-fi pero no si estoy con cable o al revés,... si tenemos una VPN en el host windows, a lo mejor no nos va el internet en la MV o no tenemos acceso entre la MV y mi host (Windows),... en fin, un poco locura. Genera inseguridad si utilizas tu máquina para hacer desarrollo, pequeñas demos o presentaciones en las que muy probablemente no es tan importate tener acceso a internet como que la comunicación entre tu host y tu(s) MV(s) funcione de forma fiable. Con una red local ad-hoc, compartida por tu host Windows y tus máquinas virtuales, lo solucionas. Para comunicarse entre ellas, utilizas esa red y listo. Asignas IPs fijas a tu host y a las MVs que vayas creando y ya lo tienes. Hacerlo es muy fácil con estos pasos que te voy a dar. Simplemente debes ir a "Administrador de Conmutadores Virtuales" que encontrarás en tu Adminitrador de Hyper-V: Una vez dentro, ve a la opción Nuevo Conmutador de red virtual (vendría ser una nueva tarjeta de red): Nos aseguramos eso sí que sea una Red Interna, le damos el nombre que nos guste y el resto de opciones por defecto: Si ahora nos vamos al Panel de Control de Windows --> Centro de Redes y Recursos compartidos, veremos que tenemos ahí el conmutador que acabamos de crear: 4. Configura la Red Local compartida por el Host y las Máquinas Virtuales Ahora ya puedes terminar de configurar tu nueva red local... coloca el cursor sobre la conexión asociada a Mi Nuevo Conmutador LOCAL, pincha y ve a propiedades y de ahí al protocolo IPv4 para asignar una IP fija: Importante: La IP que asignes aquí, será la IP de tu host (Windows) en esta subred local. 5. Asocia y configura la nueva red local a la máquina virtual Ahora vuelve a la ventana del Administración de Hyper-V. Si tienes la MV arrancada debes pararla. Una vez parada, entra en su configuración y añádele el nuevo conmutador interno: (Nota.- En la imagen verás que hay otro conmutador, el Hyper-V Conmutador INTERNO , es para otra subred que tengo creada en mi caso. Pero no es necesario para este ejemplo) Cuando le des a Agregar, sólo te quedará seleccionar el conmutador que has creado antes: Bien, pues hecho esto... le das a Aplicar y Aceptar y listo. Ya puedes iniciar y entrar de nuevo en tu máquina virtual para terminar de configurar la conexión interna. Para ello, una vez rearrancada la máquina, pincha en el icono de red (arriba a la derecha) y verás que tienes 2 redes: eth0 y eth1. La eth1 aparece apagada... por ahora: Entra en la configuración de Ethernet (eht1) e indica una IP fija en esa subred local, por ejemplo: 155.100.101.1, la máscara 255.255.255.0 y listo. Ya tienes tu máquina virtual, identificada con la IP 155.100.101.1 en la misma subred que el host. 7. Permite el acceso a Windows 10 desde tu máquina virtual Lo que probablemente te encuentres es que Windows 10 no te permite conexiones desde otros servidores y, para él, la máquina virtual que acabas de crear es precisamente eso, un servidor externo... así que tendrás que añadir una regla en el Firewall para poder conectarte desde estas máquinas virtuales. ¿Cómo? Muy fácil, busca Firewall de Windows Defender en el Panel de Control de Windows, ve a Configuración Avanzada y crea una nueva Regla de Entrada: Indica un rango o rangos de puertos... (o también puedes indicar todos los puertos)... Como acción queremos que se permita la conexión... Para todos los tipos de red... Le das un nombre a la regla... E importante, inmediatamente a continuación, abre las propiedades de la regla que acabas de crear y limita el ámbito de aplicación, para que sólo se aplique en conexiones dentro de tu Subred local... 8. LISTO. Instala Docker y cualquier otra aplicación en tu nueva Máquina Virtual Ubuntu Una vez que hayas pasado por todo el proceso de instalación y tengas tu nueva MV lista y actualizada, con acceso a internet, etc... puedes instalarte las aplicaciones que quieras, ... como mínimo Docker, que de eso se trata en este caso, también puedes instalarte un cliente VPN corporativo, VS Code , Eclipse+Atelier... En concreto, para instalar Docker, entra en tu MV y sigue las instrucciones que verás aquí: https://docs.docker.com/install/linux/docker-ce/ubuntu/ Asegúrate de que Docker funciona, bájate alguna imagen de prueba, etc... Una vez que estés seguro de que todo está bien, estás listo. Y bueno, con esto... ¡ya lo tienes!, ahora podrás tener contenedores ejecutándose a pleno potencial en tu máquina virtual Ubuntu, con la que te podrás conectar desde tu host Windows 10, desde un navegador u otra aplicación y a la inversa, desde la máquina o máquinas Ubuntu, a tu host Windows 10. Todo ello utilizando direcciones IP locales en tu subred, que funcionarán independientemente de si tienes una VPN conectada o no, o de si estás por Wi-Fi o por cable. Ah... un último consejo. Si quieres intercambiar ficheros entre Windows 10 y tus máquinas virtuales, una opción muy sencilla y práctica es WinSCP. Es gratuito y funciona muy bien. Bueno, seguro que hay otras configuraciones... pero esta me ha servido a mí. Espero que te ayude también a tí y te evite dolores de cabeza. ¡Happy Coding! ¡ Hola Salva ! ( @Jose-Tomas.Salvador ) Sabes que no soy fanático de Docker Desktop for Windows. Pero me motivaste a probarlo.Mi contribución al concurso Open Exchange WebSocket Client JS with IRIS Native API as Docker Micro Server funciona tan bien en Windows como en Linux. Tiene un poco de ajuste de código común .Una sorpresa positiva. ¡ Gracias por la sugerencia ! ¡Hola Robert! Me alegro de que te haya servido!! Ahora toca probar con el soporte nativo a Linux que incorpora la última versión de Windows... veremos que tal el WSL2. Un fuerte abrazo. Este artículo está etiquetado como "Mejores prácticas" ("Best practices") (Los artículos con la etiqueta "Mejores prácticas" incluyen recomendaciones sobre cómo desarrollar, probar, implementar y administrar mejor las soluciones de InterSystems).

Resulta que un día estás trabajando en Widgets Direct, distribuidor líder de widgets y accesorios, y tu jefe te pide que desarrolles un nuevo portal dedicado a los clientes, el cual permita que la cartera de clientes tenga acceso a la siguiente generación de widgets... y él quiere que utilices Angular 1.x para comunicarte con el servidor Caché del departamento. Solamente hay un problema: Nunca has utilizado Angular y no sabes cómo hacer que se comunique con Caché (o IRIS).En esta guía veremos cómo se realiza todo el proceso de configuración de un conjunto de subsistemas en Angular, el cual se comunica con un backend de Caché utilizando JSON para llamar un API REST. Esta es la página principal de una serie que incluye varias partes sobre la creación de una aplicación con Documentos-Angular1x-REST-JSON-Caché. La lista de artículos disponibles es la siguiente:ArtículoEnlaceParte 1 - Configuración y Hello Worldhttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-1-many Parte 2 - "De modo que tu jefe te gritó por enviarle una página web con un Hello World sin formato" o por trabajar con JSONhttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-2Parte 3 - Vamos a iterar con algunos conjuntos y ng-repeathttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-3Parte 4 - Aplicación en la IUhttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-4Parte 5 - Manipulemos nuestros Widgetshttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-5Parte 6 - Regresemos a los Datos persistenteshttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-6Parte 7 - Las cosas van a rompersehttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-7Parte 8 - Puntos extra por el rompimientohttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-8Parte 9 - Veamos un poquito de CRUDhttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-9Parte 10 - Reconociendo los méritos de EDIThttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-10Parte 11 - Modificar nuestro formulariohttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-11Parte 12 - WWWidgetshttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-12Parte 13 - Cómo crear un Widgethttps://community.intersystems.com/post/lets-write-angular-1x-app-cach%C3%A9-rest-backend-part-13Requisitos previosEn estos ejemplos se utilizó Caché 2016.2, donde se implementó una nueva sintaxis para manejar el contenido en JSON. En Caché 2016.1 había soporte preliminar para JSON, pero la sintaxis es diferente e incompatible con las versiones posteriores. El código que se mostró en estos ejemplos fue escrito de una forma que pueda adaptarse fácilmente a la sintaxis de 2016.1, ya que no se utilizó ninguna de las funciones extendidas de JSONAunque hay cierto grado de compatibilidad con REST y JSON en las versiones anteriores, recomiendo ampliamente conocer más sobre la versión 2016.1 como un requisito mínimo.En este tutorial no veremos Angular detalladamente. Pero hay muchos cursos excelentes sobre los Principios básicos de Angular, que están disponibles de forma gratuita en línea y se mencionan en las Partes 1 y 2. Tanto AngularJS como Angular 2 y superiores son ampliamente compatibles con la tecnología InterSystems, ya sea Caché 2016.2 como IRIS 2019.1 permiten implementar APIs REST y WebServices con rapidez y simplicidad.EnlacesEl código que se utilizó en estos ejemplos podrá consultarse en Github poco tiempo después de que se publique el artículo. Puedes tener acceso a él desde https://github.com/iscChris/CacheRESTStack

¡Hola a tod@s!El Portal de Administración del Sistema Caché incluye una potente herramienta de consultas en SQL basada en la web, aunque para algunas aplicaciones lo más conveniente es utilizar un cliente dedicado SQL que esté instalado en la PC del usuario.SQuirreL SQL es un conocido cliente SQL de código abierto construido en Java, que utiliza JDBC para conectarse a un DBMS. Como tal, podemos configurar SQuirreL para que se conecte a Caché usando el controlador JDBC en Caché.Encontrar el controlador JDBC de Caché en archivos JAREl archivo JAR que contiene el controlador JDBC de Caché se instala automáticamente por el instalador de Caché cuando se instala una instancia completa de Caché o cuando se instalan únicamente los componentes de cliente. Puede encontrarse en el directorio lib, debajo del directorio de instalación principal.Para esta instalación Caché del cliente en un equipo PC con Windows, el archivo JAR puede encontrarse en la siguiente ruta:C:\InterSystems\CACHEClient\lib\cachejdbc.jarInstalación de SQuirreL SQLSQuirreL SQL puede descargarse desde el sitio web principal de SQuirreL:http://www.squirrelsql.org/Siga las instrucciones del sitio web para instalar SQuirreL SQL y compruebe que funciona adecuadamente.Añadir una entrada para el controlador en SQuirreL SQLAbra SQuirreL SQL y seleccione la pestaña "Drivers" que se encuentra en el lado izquierdo de la ventana. Haga clic en el icono “+” para crear una nueva entrada del controlador.En el cuadro de diálogo "Add Driver", seleccione la pestaña "Extra Class Path" y haga clic en "Add" para añadir una nueva entrada para el archivo JAR del controlador JDBC de Caché.En la parte superior de la ventana "Add Driver", introduzca un nombre para el controlador como “Caché 2016.1”. Al crear una conexión hacia una base de datos se mostrará una URL de ejemplo, la cual sirve como una excelente referencia. Para "Example URL", introduzca este ejemplo de una URL:jdbc:Cache://127.0.0.1:56772/Samples O bien, puede utilizar una URL que etiquete cada parte de la URL:jdbc:Cache//[HOST NAME OR IP]:[SUPERSERVER PORT]/NAMESPACEHaga clic en el botón "List Drivers" que se encuentra a la derecha de la ventana "Add Drivers" y, a continuación, seleccione "com.intersys.jdbc.CacheDriver" en la lista desplegable Class Name.Más información sobre la configuración de la conexión JDBC y las propiedades del controlador JDBC de Caché, en la siguiente documentación:http://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KEY=BGJD_connecting#BGJD_connecting_urlhttp://docs.intersystems.com/latest/csp/docbook/DocBook.UI.Page.cls?KEY=BGJD_connecting#BGJD_connecting_connpropsHaga clic en "OK" para guardar la nueva entrada del controlador.Incorporar una entrada para la conexión (Alias)En SQuirreL SQL, un perfil de conexión para el servidor de una base de datos específica se llama Alias. Seleccione la pestaña "Aliases" que se encuentra en la parte izquierda de la ventana principal y haga clic en el icono "+" para añadir un nuevo alias.En la ventana "Add Alias", introduzca un nombre para este Alias. Seleccione nuestro nuevo controlador en el menú desplegable.Después de seleccionar el controlador, el cuadro URL se completará automáticamente utilizando la URL de ejemplo que añadimos a la configuración del controlador. Edite esta URL para utilizar el nombre de host o dirección IP correctos y el número de puerto del super servidor para el servidor de Caché, y configure el espacio de nombres correcto.Introduzca el nombre de usuario y la contraseña de un usuario de Caché, que tenga los privilegios SQL adecuados.Haga clic en el botón "Test" y compruebe que la conexión se realizó correctamente.Haga clic en OK para guardar el nuevo Alias.Conectarse a CachéAhora puede conectarse al servidor de la base de datos haciendo doble clic en la entrada de la pestaña Alias que se encuentra en la ventana principal.Para obtener instrucciones sobre cómo utilizar SQuirreL SQL para ejecutar consultas, visualizar esquemas de información y realizar otras tareas, consulte la documentación de la aplicación en el sitio web de SQuirreL SQL. ¿Como se pueden crear los usuarios? Hola Paola ! Si te refieres a los usuarios de Caché / IRIS / Ensemble, estos se crean en la SMP (System Management Portal), en la opción System Administration > Security > Users. Cuando instalas el producto en el modo de seguridad intermedio, normalmente te pide que ingreses una contraseña, esta será asignada a los usuarios SuperUser, _SYSTEM y Admin. Puedes usar alguno de ellos para realizar directamente consultas SQL en Squirrel, pero también puedes ingresar con ellos al SMP para crear un usuario particular que será usado para usar Squirrel. Muchos éxitos.

Si desarrollas en IRIS, te enfrentas a dos fenómenos principales: un motor de almacenamiento de datos increíblemente rápido y con un excelente diseño un lenguaje para trabajar en este motor de almacenamiento, llamado ObjectScript Motor de almacenamiento Se trata de un concepto de almacenamiento organizado jerárquicamente y se consideró "anticuado" cuando "relacional" era la palabra de moda del momento.Sin embargo, si usas sus fortalezas, con su sencilla y eficiente construcción, supera a todos sus competidores "gigantes".Y esto sigue siendo cierto desde el día 1. Me sorprende cómo esos competidores copiaron a lo largo del tiempo varias funciones de este motor de almacenamiento, confirmando indirectamente la calidad del concepto básico. ObjectScript Mirando el lenguaje, es bastante fácil separar el subconjunto perfectamente delimitado de elementos del lenguaje que manipulan y navegan por el motor de almacenamiento, que ha visto solo algunas extensiones y ajustes a lo largo de su vida. Yo llamo a esto el NÚCLEO.Sus compañeros son la Navegación (en su mayoría similar a otros lenguajes) y la Estética (todo para manipular el contenido de los datos). La navegación es un requisito estructural inevitable, pero ha tenido varias mejoras, principalmente para comodidad de los programadores. No es obligatorio, pero es similar a los lenguajes más nuevos. La estética es el campo de más rápido crecimiento y hasta hoy sus propuestas me sorprenden de vez en cuando. Su existencia viene de cuando el motor de almacenamiento también formaba parte de un sistema operativo (y nada más) sobre el HW. Historia Desde el pasado, los desarrolladores solían escribir aplicaciones con ObjectScript. Incluso InterSystems hizo esto a gran escala (Interoperability, es decir, Ensemble), Analytics (es decir, DeepSee, Health*...). ObjectScript era/es el "puede con todo, hace de todo". Pero ObjectScript era más bien un "llanero solitario". El intento de tener algo más popular en el mercado fue BASIC (ya era un "caballo muerto" en ese momento). La oportunidad de saltar a la ola de JavaScript se perdió ~ hace unos 15 años. La disponibilidad de una amplia gama de adaptadores de lenguajes pudo ocultar la dimensión del problema durante algún tiempo, pero nunca alcanzó la fuerza que el principal competidor mostró cuando PL/SQL fue congelado y reemplazado por Java. Hoy en día Veo que el número de desarrolladores formados en ObjectScript se reduce con el tiempo por puros efectos demoscópicos. Encontrar y educar desarrolladores que quieran escribir en ObjectScript es un ejercicio duro, que experimenté personalmente varias veces. E incluso si son brillantes y muy hábiles, no es garantía de que se queden con uno. La demanda sigue siendo espectacular. Delante de este trasfondo, veo la llegada de Python embebido como lenguaje completo al mismo nivel que ObjectScript como un gran paso adelante con IRIS.La navegación y la estética están cubiertas y añadir las funcionalidades NUCLEARES no requiere un aprendizaje dramático. De modo que vemos un mercado mucho más grande de recursos de desarrollo especializados que acaban con la limitación que en ese aspecto teníamos con ObjectScript . Futuro Con Python, veo mucha energía nueva entrando en el mundo de IRIS. Después de todo, es un paso que algunos competidores dieron hace bastante tiempo y el inconveniente de "nunca visto en ningún otro lugar" queda superado. El paradigma: "Lo programo porque es posible"; se romperá. Nos libera de una serie de ruedas re-inventadas. ObjectScript seguirá funcionando en paralelo y tendrá un papel importante en todas las actividades cercanas al NÚCLEO de almacenamiento. Nadie (seguramente) lo usará para lógica empresarial o (espero que no) para replicar interfaces que ya están disponibles fuera a mayor escala. ObjectScript se reducirá a una dimensión que vemos hoy para C, C ++ o para código en cualquier lenguaje ensamblador. Las aplicaciones existentes no se verán afectadas. La forma en que se integró Python parece ser una garantía para una migración sin problemas y sin presión de tiempo. Los desarrolladores de ObjectScript de hoy no perderán sus trabajos. Hay suficientes tareas complejas en torno al diseño y mantenimiento de bases de datos. Pero podrían deshacerse de tareas poco atractivas (en mi opinión): estilos CSS, colorear páginas web,. . . . Sin olvidar el exigente desafío de leer y comprender el código existente e interpretar y comunicar su contenido y lógica. Los "Golf Code" (1) pueden ser divertidos, pero se trata de una lógica de negocio muy seria en muchas aplicaciones escritas tradicionales antiguas e incluso en algunas utilidades en "%SYS". Veo a los desarrolladores de hoy como los sacerdotes de ObjectScript, del mismo modo que los sacerdotes egipcios que comprenden los jeroglíficos y leen "El libro de los muertos" y celebran sus milagros. 15 de julio de 2021

¡Hola Comunidad! ¿Sabéis cómo publicar en la Comunidad de Desarrolladores? ¿Y conocéis todos los tipos de publicaciones que hay? ¿Y sabéis que podéis, por ejemplo, publicar encuestas en una publicación? ¿o adjuntar PDFs? Si queréis sacar el máximo partido a las publicaciones y, por tanto, a la Comunidad... seguid leyendo, porque os vamos a contar tooooodos los detalles de las publicaciones: Reglas generales Preguntas Artículos y Anuncios Debates Reglas generales Para empezar a participar en la Comunidad, haced clic en el botón "Nueva publicación" arriba del todo en la página de inicio de la Comunidad: Aparecerá el editor para crear una Pregunta, un Anuncio, un Artículo o un Debate. Cada tipo de publicación tiene su propio conjunto de campos, unos obligatorios y otros opcionales. Primero vamos a hablar sobre los campos comunes a todos los tipos de publicación y después veremos los particulares de cada uno. Básicamente, todas las publicaciones tienen un Título*, Cuerpo*, Etiquetas y otras opciones adicionales. Todos los campos marcados con un asterisco (*) son obligatorios. Así que primero hay que elegir el tipo de publicación: Pregunta, Anuncio, Artículo o Debate. Después, hay que expresar la idea principal de forma clara y concisa y escribirla en el Título. En el Cuerpo de la publicación hay que escribir lo que quieres compartir con la Comunidad. Hay dos opciones de edición: WYSIWYG o Markdown. Elegid la que prefiráis y el resultado será el mismo, por supuesto. vs. Después de escribir el texto, hay que escoger el Grupo, que es la tecnología, producto o servicio de InterSystems del que vais a hablar en la publicación. Después, en el campo Etiquetas se pueden añadir etiquetas relacionadas con el contenido de la publicación. Hay muchas etiquetas, así que hay que elegir las adecuadas, porque otras personas utilizan las etiquetas para buscar información en la Comunidad. Después hay un enlace para ver más opciones. Estas son: Adjuntar PDF, indicando el nombre del documento. Añadir una encuesta. Hay que rellenar los campos con la pregunta, posibles respuestas, duración de la encuesta, etc. Una vez cumplimentados todos los campos, se puede visualizar la publicación en Vista previa para comprobar cómo se verá una vez publicada; se puede Guardar para seguir editándola después; o se puede Publicar. También se puede programar la publicación. Solo hay que hacer clic en la flecha hacia abajo, elegir Programar publicación y fijar el día y la hora cuando se va a publicar la publicación. Por último, hay que hacer clic en Programar publicación y se publicará el día y la hora escogida. Y básicamente estos son los campos comunes a todos los tipos de publicaciones. Preguntas Como su nombre indica, hay que escoger este tipo de publicación cuando necesitéis ayuda y/o queráis consultar algo. En la Comunidad de Desarrolladores en español hay un montón de especialistas y alguien puede haberse encontrado en vuestra misma situación. Así que no hay que dudar en preguntar... y en responder! 😉 Al escribir una pregunta, hay que formular la idea principal y escribirla como título. A continuación, elegir la "Versión del producto" que estéis utilizando, porque diferentes versiones tienen diferentes funcionalidades y clases; y una respuesta puede ser válida para unas versiones, pero no para otras. Para ser incluso más preciso, se puede indicar en el campo $ZV la versión completa que se está usando. Para obtenerla, se puede abrir Terminal y ejecutar el comando: write $ZV Se puede hacer lo mismo en el IDE que estéis usando o verlo en el "Management Portal": El resto de campos de la pregunta son los mismos que hemos descrito anteriormente. Artículos y Anuncios Los Artículos se utilizan para compartir conocimientos y/o tu experiencia. Y los Anuncios para dar una noticia, anunciar algo, etc. Estos dos tipos de publicaciones tienen los campos comunes y otros adicionales, como son: Anuncio anterior, Anuncio siguiente y Enlace a la aplicación en Open Exchange. Es decir, si el Artículo/Anuncio está relacionado con otro, se puede añadir el enlace de ese Artículo/Anuncio anterior en el campo "Artículo/Anuncio anterior" y así, al final de la publicación, se pueden ver todas las publicaciones relacionadas. No hay que abrir el Artículo/Anuncio anterior para enlazarlo con la nueva publicación, ya que se hace automáticamente. También se puede ir fácilmente de una publicación a otra con los botones de navegación situados en la parte de arriba de los artículos que están relacionados. Por último, si la publicación está relacionada con una aplicación en Open Exchange, se puede añadir el enlace al proyecto en el campo "Enlace a la aplicación en Open Exchange". Debates Si queréis comentar alguna funcionalidad o compartir vuestra experiencia o preguntar la opinión de otros desarrolladores, se puede iniciar un Debate. Este tipo de publicación tiene todos los campos comunes y también los enlaces a Publicación anterior y Siguiente publicación. ¡Y eso es todo lo que necesitáis saber para participar en la Comunidad y aprovechar al máximo todo lo que ofrece! Esperamos que os resulte útil... ¡y esperamos vuestros comentarios!

Cuando creamos un repositorio FHIR en IRIS, tenemos un endpoint para acceder a la información, crear nuevos recursos, etc. Pero hay algunos recursos en FHIR que probablemente no tengamos en nuestro repositorio, por ejemplo, un recurso Binary (este recurso devuelve un documento, como un PDF, por ejemplo). He creado un ejemplo en el que cuando se solicita un recurso Binary, el endpoint de FHIR devuelve una respuesta, como si existiera en el repositorio. En primer lugar, necesitamos un Namespace y un endpoint FHIR. Después, necesitamos configurar una producción de interoperabilidad que se conectará al endpoint de FHIR. Esta producción debe tener estos elementos: Business Operations: HS.Util.Trace.Operations (de hecho, esto es opcional, pero puede ser muy útil) HS.FHIRServer.Interop.Operation, con la propiedad TraceOperations establecida a *FULL* Business Service: HS.FHIRServer.Interop.Service, con la propiedad TraceOperations establecida a *FULL* y la propiedad Target Config Name con el valor del nombre de la operación HS.FHIRServer.Interop.Operation Así es como se ve la producción: Después de crear esta producción, necesitamos conectarla con el endpoint de FHIR. Por lo tanto, editamos el endpoint de FHIR y configuramos el parámetro Service Config Name con el nombre del Business Service: Ahora, si comenzamos a enviar solicitudes al repositorio FHIR, veremos todas las trazas en el Visor de mensajes: Ahora podemos tener un Business Process para controlar qué hacer con rutas específicas. En este ejemplo tenemos un Business Process que recibe cada solicitud (ahora el Business Service está conectado a este Business Process, en lugar de la Business Operation) y 2 nuevas Business Operation que realizan otras acciones que se explicarán más adelante: Veamos el Business Process llamado FHIRRouter: Si echamos un vistazo, veremos que, si la propiedad RequestPath contiene "Binary/", entonces haremos algo con esta solicitud: generar nuestra respuesta Binary personalizada. De lo contrario, enviaremos la solicitud al repositorio FHIR directamente. Veamos la secuencia llamada "Generate Binary": En primer lugar, creamos una nueva instancia de HS.FHIRServer.Interop.Response. Y obtenemos el ID del documento de la propiedad RequestPath. ¿Cómo? Cada vez que alguien quiere un recurso Binary, debe solicitarlo con el ID del documento en la ruta URL, algo así: ..../fhir/r4/Binary/XXXXX. Por lo tanto, extraemos el ID del documento de la ruta con esta expresión: $Replace(request.Request.RequestPath,"Binary/","") (No es muy elegante, pero funciona). Si tenemos un ID de documento, entonces realizamos una llamada a una Business Operation llamada Find para encontrar el nombre de archivo asociado a ese ID de documento: De hecho, esta Business Operation Find siempre devuelve el mismo nombre de archivo: Es un ejemplo de lo que podemos hacer. Si tenemos un nombre de archivo, entonces, llamamos a otra Business Operation llamada File para obtener el contenido de este archivo, codificado en base64: Y finalmente, podemos devolver 2 tipos de respuestas: Si no tenemos el contenido del archivo (porque no tenemos un ID de documento o no encontramos su nombre de archivo o contenido asociado), devolvemos una respuesta 404, con este contenido personalizado: set json = { "resourceType": "OperationOutcome", "issue": [ { "severity": "error", "code": "not-found", "diagnostics": "<HSFHIRErr>ResourceNotFound", "details": { "text": "No resource with type 'Binary'" } } ] } set json.issue.%Get(0).details.text = json.issue.%Get(0).details.text_" and id '"_context.docId_"'" set qs = ##class(HS.SDA3.QuickStream).%New() do qs.Write(json.%ToJSON()) set response.QuickStreamId = qs.%Id() set response.ContentType = "application/fhir+json" set response.CharSet = "UTF-8" Si tenemos contenido de archivo, entonces devolvemos una respuesta 200 con este contenido personalizado set json = { "resourceType": "Binary", "id": "", "contentType": "application/pdf", "securityContext": { "reference": "DocumentReference/" }, "data": "" } set json.id = context.docId set json.securityContext.reference = json.securityContext.reference_json.id set json.data = context.content.Read(context.content.Size) set qs = ##class(HS.SDA3.QuickStream).%New() do qs.Write(json.%ToJSON()) set response.QuickStreamId = qs.%Id() set response.ContentType = "application/fhir+json" set response.CharSet = "UTF-8" La clave aquí es crear un HS.SDA3.QuickStream, que contenga el objeto JSON. Y añadir este QuickStream a la respuesta. Y ahora, si probamos nuestro endpoint, si solicitamos un documento Binary, veremos la respuesta: Y si solicitamos un documento Binary que no existe (puedes probarlo sin pasar ningún ID de documento), veremos la respuesta 404: En resumen, conectando nuestro endpoint FHIR con interoperabilidad podemos hacer lo que queramos, con todas las capacidades de InterSystems IRIS.

Con el lanzamiento de InterSystems IRIS Cloud SQL, recibimos cada vez más preguntas sobre cómo establecer conexiones seguras mediante JDBC y otras tecnologías de drivers. Aunque contamos con una documentación resumida y detallada sobre las tecnologías de los drivers, nuestra documentación no describe herramientas cliente individuales, como nuestra favorita personal, DBeaver. En este artículo, describiremos los pasos para crear una conexión segura desde DBeaver a vuestra implementación de Cloud SQL. 📺 Si preferís ver un vídeo en lugar de leer, echad un vistazo a este video en el que os guiamos por los pasos que se detallan a continuación. Paso 0: Crear vuestra implementación Primero, iniciad sesión en el Portal de Servicios en la Nube y cread una implementación de Cloud SQL. Lo único que debéis tener en cuenta es marcar la casilla para habilitar conexiones externas. Por lo demás, los ajustes por defecto deberían funcionar bien. Paso 1: Instalar el certificado Para conectar de forma segura, usaremos certificados que cifran todo lo que se envía a través de la red. Podéis descargar el certificado desde la página de detalles de la implementación, pulsando el botón "Obtener certificado X.509". Luego, necesitáis almacenar este certificado en un almacén de claves confiable usando la utilidad keytool. Esto es una parte estándar de la infraestructura Java, por lo que no es nada específico de IRIS o DBeaver en este punto. Usad el siguiente comando para importar el certificado. La ubicación del archivo certificateSQLaaS.pem no importa después de ejecutar este comando, así que podéis eliminarlo de la carpeta de descargas una vez hecho. La ubicación del archivo keystore.jkssí importa, así que aseguraos de ejecutar el comando desde una carpeta que tenga sentido y esté protegida de desinstalaciones o actualizaciones, como por ejemplo un directorio cert dentro de vuestra carpeta de usuario. El parámetro -alias es opcional, pero útil si tenéis intención de reutilizar el mismo archivo keystore para almacenar varios certificados. keytool -importcert -file path-to-cert/cert-file.pem -keystore keystore.jks -alias myDeploymentName Para más detalles, echad un vistazo a la documentación. Paso 2: Crear un archivo SSLConfig.properties A continuación, necesitáis indicarle al driver JDBC de IRIS cómo encontrar este keystore, lo cual se logra mediante un archivo SSLConfig.properties. Este archivo de texto simple debe colocarse en el directorio de trabajo del programa Java que abrirá la conexión JDBC. En Windows, esto es %LOCALAPPDATA%\DBeaver, que corresponde a C:\Users\<usuario>\AppData\Local\DBeaver. En Mac, suele ser /Applications/DBeaverEE.app/Contents/MacOS. Como alternativa, también podéis crear el archivo en otra ubicación y establecer la ruta completa en una variable de entorno llamada com.intersystems.SSLConfigFile. En su forma más simple, este archivo solo necesita apuntar al keystore e incluir la contraseña. Tened en cuenta que la ruta a vuestro archivo keystore.jks debe estar correctamente escapada para que Java pueda leerla, por lo que en Windows deberéis usar dobles barras invertidas (\). trustStore=/path/to/keystore/keystore.jks trustStorePassword=keystore-password Hay muchas configuraciones adicionales que podéis ajustar a través de este archivo, descritas en la documentación, incluyendo configuraciones con nombre, pero lo anterior es suficiente. Paso 3: Crear vuestra conexión en DBeaver Ahora que habéis instalado el certificado y especificado dónde puede encontrarlo el driver JDBC de IRIS, podéis crear vuestra conexión en DBeaver. Todas las configuraciones para la pestaña "principal" en el diálogo de creación de conexión se encuentran en la pantalla de detalles de la implementación, como se mostró arriba: Lo único que queda por hacer es indicarle a DBeaver que active el cifrado, lo cual se logra configurando el "nivel de seguridad de la conexión" a 10 en la pestaña "Propiedades del controlador". ¡Eso es todo! Si hacéis clic en "Probar conexión", deberíais obtener un visto bueno o un mensaje de error útil. En este último caso, consultad este documento de solución de problemas si no está claro qué debéis cambiar. Nota para usuarios de Mac Si usáis Mac, parece que hay un error en DBeaver por el cual lo anterior puede no ser suficiente. La solución es poco convencional, pero funciona. En el campo Database/Schema, donde normalmente pondríais 'USER', debéis introducir esta cadena completa en su lugar: USER:sslConnection=true;sslTrustStoreLocation=/pathToTruststore/truststore.jks;sslTrustStorePassword=123456; Consejos por cortesía de @Richard.Guidice

Hace un tiempo se publicó el [paquete AppS.REST](https://community.intersystems.com/post/appsrest-new-rest-framework-intersystems-iris). AppS.REST es un *framework* para exponer fácilmente clases persistentes de IRIS como recursos REST. Las clases que tienen habilitado AppS.REST soportan operaciones CRUD con poco esfuerzo del desarrollador, acortando la brecha entre los datos persistentes en IRIS y los consumidores de datos, como una aplicación front-end de Angular. ¡Pero las clases de IRIS son mucho más que una simple definición para cargar y guardar registros individuales! Este artículo tiene como objetivo destacar algunas maneras de aprovechar el poder de IRIS en tus aplicaciones REST.  Usando la aplicación de ejemplo Phone.Contact, veremos el soporte de consultas incluido en AppS.REST, el uso de consultas de clase y finalmente los métodos ObjectScript. ## Preparación Puedes encontrar el [paquete AppS.REST en Open Exchange](http://openexchange.intersystems.com/package/apps-rest). Este artículo utilizará ejemplos de la [aplicación Sample Phonebook (disponible en github)](https://github.com/intersystems/apps-rest/blob/master/docs/sample-phonebook.md).  Ambos paquetes se pueden instalar fácilmente con Objectscript Package Manager, que se puede encontrar [aquí](https://openexchange.intersystems.com/package/ObjectScript-Package-Manager-2%C2%A0%C2%A0).  Una vez instalados, la aplicación Sample Phonebook generará algunos datos ficticios y configurará la aplicación web necesaria. Esa aplicación web reenviará todas las solicitudes a la clase Sample.Phonebook.REST.Handler. Como estoy haciendo las pruebas en mi equipo local, todas mis solicitudes http estarán en `http://localhost:52773/csp/USER/phonebook-sample/api/`, pero tu servidor y tu puerto pueden ser diferentes a los míos. Utilicé la extensión Talend API Tester de Google Chrome para probar todas estas llamadas REST, pero hay muchas buenas herramientas API disponibles. ## Cómo habilitar solicitudes simples Echemos un vistazo a la clase Model.Person, que está habilitada para REST al extender de AppS.REST.Model.Adaptor. Vemos que se muestra como el recurso "contact", como se define en el parámetro RESOURCENAME. Class Sample.Phonebook.Model.Person Extends (%Persistent, %Populate, %JSON.Adaptor, AppS.REST.Model.Adaptor) { Parameter RESOURCENAME = "contact"; Ten en cuenta que aunque la clase IRIS se llama "Person", estamos mostrando la clase como el recurso "contact" a nuestros consumidores de REST. Empezaremos con una solicitud básica de GET para demostrar como un consumidor de datos puede interactuar con este recurso:   `http://localhost:52773/csp/USER/phonebook-sample/api/contact/2` { "_id": "2", "name": "Harrison,Angela C.", "phones":[ {"_id": "2||15","number": "499-388-2049","type": "Office"}, {"_id": "2||32","number": "227-915-3954","type": "Mobile"} ]} Genial, ¡ya estamos consumiendo datos de IRIS a través de REST!  ## Consultas pre-construidas listas para usar Lo anterior es bueno para cargar una instancia particular conocida de un recurso, pero ¿qué sucede si quieres aprovechar las funcionalidades de consulta de datos de IRIS? El *framework* AppS.REST nos da algunas capacidades de consulta listas para usarse directamente. Por ejemplo, la siguiente solicitud GET busca todos los contactos: `http://localhost:52773/csp/USER/phonebook-sample/api/contact` Fíjate que tiene el mismo aspecto que la anterior, sólo que sin especificar el ID del contacto. Para solicitar contactos con un nombre determinado, podemos añadir un parámetro URL: `http://localhost:52773/csp/USER/phonebook-sample/api/contact?name[eq]=Harrison,Angela C.` [{ "_id": "2", "name": "Harrison,Angela C.", "phones":[{"_id": "2||15", "number": "499-388-2049", "type": "Office"…] }] Podemos imaginar una aplicación que permita al usuario buscar contactos por medio de las primeras letras de su apellido. Podemos conseguirlo con otro operador: `http://localhost:52773/csp/USER/phonebook-sample/api/contact?name[stwith]=Harri` Ahora recuperamos todos los contactos cuyos nombres empiezan con "Harri": [{ "_id": "2", "name": "Harrison,Angela C.", "phones":[{"_id": "2||15", "number": "499-388-2049", "type": "Office"…] },{ "_id": "47", "name": "Harrison,Yan N.", "phones":[{"_id": "47||26", "number": "372-757-5547", "type": "Mobile" },…] }] AppS.REST admite 7 operadores que se traducen directamente a SQL:         "lte": " < "         "gte": " > "         "eq": " = "         "leq": " <= "         "geq": " >= "         "stwith": " %startswith "         "isnull": " es nulo" ## Cómo exponer consultas de clase como acciones REST ¿Qué pasa si queremos aprovechar consultas más complicadas o previamente existentes en nuestra aplicación REST?  ¡Podemos exponer cualquier consulta de clase como una acción REST! La clase Person tiene una consulta llamada FindByPhone, que utiliza la tabla `PhoneNumber` para buscar personas por un phoneFragment: Query FindByPhone(phoneFragment As %String) As %SQLQuery { select distinct Person from Sample_Phonebook_Model.PhoneNumber where $Translate(PhoneNumber,' -+()') [ $Translate(:phoneFragment,' -+()') } El *framework* AppS.REST generará automáticamente la representación de JSON apropiada a partir de los ID que devuelve la consulta. Para exponer la consulta como acción REST, añadimos una entrada en el bloque XData llamado ActionMap de la clase Person para definir un endpoint "find-by-phone" en el recurso contact: ``` XData ActionMap { } ``` Esa acción ahora se dirige a la consulta de clase de FindByPhone, y espera un argumento para phoneFragment como parámetro de la URL. Ahora, si hacemos una solicitud GET al endpoint $find-by-phone del recurso de contacto, obtendremos todos los contactos que tengan un número de teléfono que coincida:http://localhost:52773/csp/USER/phonebook-sample/api/contact/$find-by-phone?phoneFragment=641 [{ "_id": "19", "name": "Ipsen,Rob Z.", "phones":[{"_id": "19||211", "number": "641-489-2449", "type": "Home"}] },{ "_id": "86", "name": "Newton,Phil Y.", "phones":[{"_id": "86||108", "number": "380-846-4132", "type": "Mobile"}] }] Cómo exponer métodos de ObjectScript como acciones REST Mostrar consultas puede ser útil, pero ¿qué pasa si queremos mostrar el código de la aplicación que está escrito en ObjectScript? Echemos un vistazo al método AddPhoneNumber de Model.Person: Method AddPhoneNumber(phoneNumber As Sample.Phonebook.Model.PhoneNumber) As Sample.Phonebook.Model.Person {     Set phoneNumber.Person = $This     $$$ThrowOnError(phoneNumber.%Save())     Quit $This } Este método de instancia se llama para añadir un número de teléfono a una persona que ya existe en la base de datos, así que vamos a ver cómo se puede mostrar como una acción REST, al igual que el ejemplo de consulta de clase anterior. En el ActionMap de Model.Person, vemos otra entrada que llama al método AddByPhone: <action name="add-phone" target="instance" method="POST" call="AddPhoneNumber"> <argument name="phoneNumber" target="phoneNumber" source="body" /> </action> A diferencia de la acción find-by-phone, esta se dirige a una instancia de Model.Person, por lo que nuestra solicitud de URL deberá incluir un ID después del recurso: http://localhost:52773/csp/USER/phonebook-sample/api/contact/2/$add-phone El *framework* AppS.REST automáticamente creará una instancia de un objeto para la persona con ID=2, y ejecutará el método de instancia en él. El Action Map define esto como una acción POST, y espera un phoneNumber en la estructura de la solicitud. AppS.REST traducirá automáticamente la estructura JSON de la publicación en una instancia de la clase Phone, ya que ésta también se extiende a AppS.REST.Model.Adaptor. Poniendo todo junto, ejecutamos POST en http://localhost:52773/csp/USER/phonebook-sample/api/contact/2/$add-phone con la siguiente estructura: {"number":"123-456-7890","type":"Mobile"} Si la solicitud tiene éxito, el número de teléfono se añade a nuestro contacto y recibimos de vuelta el objeto Person completo, con el nuevo número de teléfono incluido: { "_id": "2", "name": "Harrison,Angela C.", "phones":[ {"_id": "2||301", "number": "123-456-7890", "type": "Mobile"}, {"_id": "2||15", "number": "499-388-2049", "type": "Office"}, {"_id": "2||32", "number": "227-915-3954", "type": "Mobile"} ]} Las acciones son muy flexibles, lo que te permite mostrar casi cualquier funcionalidad de las clases a tus consumidores REST. Conclusión Espero que esta rápido vistazo de la aplicación Sample.Phonebook haya demostrado las muchas maneras en que el *framework* AppS.REST facilita la exposición rápida y sencilla de las clases de IRIS a través de REST.  AppS.REST.Model.Adaptor permite habilitar operaciones CRUD sobre REST para tus clases IRIS con muy pocos pasos manuales. Mostrar las consultas de clase y los métodos de ObjectScript se puede hacer definiendo Acciones en el ActionMap de tu clase.

Con IRIS 2021.1, realizamos una importante revisión de nuestra API de utilidades SQL en [`%SYSTEM.SQL`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL). Sí, eso fue hace algún tiempo, pero la semana pasada un cliente hizo unas preguntas sobre ello y entonces @Tom.Woodfin me empezó a presionar un poco ;-) para que describiera con más detalle en la Comunidad de Desarrolladores las razones de estos cambios. ¡Así que allá vamos! A principios de 2020, la API `%SYSTEM.SQL` pasó de ser un útil envoltorio de clases alrededor de unas rutinas clave a un gran número de puntos de acceso no tan coherentes para diversas funcionalidades relacionadas con SQL. Eso no debería sorprendernos, ya que el motor SQL de IRIS (y antes el motor SQL de Caché) creció mucho en funcionalidades y facilidad de uso. Como nos preocupamos mucho por la compatibilidad con las versiones anteriores, casi todos los cambios de la API fueron una incorporación neta, un nuevo método o una extensión de la estructura de un método. En algunos casos, este objetivo de compatibilidad con las versiones anteriores significó que el intento de simplificar las cosas mediante la eliminación de un argumento de métodos (para algo que ahora estaba automatizado) se diluyó al eliminar el argumento en la clase de referencia, pero dejándolo en su lugar para no alterar el código que lo utilizaba. En otras palabras, la API comenzó a parecerse a un famoso plato italiano que no es una pizza. _Si a estas alturas piensas: "¡Qué lío has hecho, eso nunca nos pasaría a nosotros!" - puedes dejar de leer aquí. _ _... Creo que aún sigues ahí :-)_ Probablemente sea justo decir que este tipo de crecimiento orgánico es inevitable y, en cierto modo, no necesariamente negativo, ya que significa que progresas y te preocupas por tus usuarios, ya que no destruyes su código al adaptar la API entre cada versión. Pero en algún momento hay que sacar la escoba y limpiar. Y eso es lo que hicimos en 2020.3 con las herramientas SQL de IRIS. ## Ordenando las cosas El primer problema que queríamos resolver era la gran cantidad de métodos, que eran demasiados para que una sola API fuera manejable. Así que empezamos por dividir la clase en una serie de clases API más pequeñas y más centradas en el paquete `%SYSTEM.SQL`, lo que significaba que podríamos conservar la agradable sintaxis abreviada de $SYSTEM. * [`SYSTEM.SQL.Functions`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Functions) – por si no lo sabes, `%SYSTEM.SQL` tiene equivalentes en ObjectScript para todas las funciones escalares simples de IRIS SQL, como `%SYSTEM.SQL.ABS()`. * [`SYSTEM.SQL.PTools`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.PTools) – las [Herramientas para analizar rendimiento](https://docs.intersystems.com/irislatest/csp/docbook/DocBook.UI.Page.cls?KEY=GSQLOPT_querytoolkit) son un grupo de utilidades para analizar en profundidad el rendimiento de las consultas individuales. Este avanzado conjunto de herramientas lo utilizan principalmente el servicio de Soporte de InterSystems y los clientes más experimentados, pero es una API muy potente y bien documentada, por lo que merece la pena echarle un vistazo si necesitas resolver esa dichosa consulta * [`%SYSTEM.SQL.Schema`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Schema) – la verificación de la existencia de tablas, la importación o exportación de sentencias DDL y otras funciones para consultar o modificar objetos del esquema ahora están aquí. * [`%SYSTEM.SQL.Security`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Security) – agrupa los puntos de acceso ObjectScript para los comandos GRANT y REVOKE * [`%SYSTEM.SQL.Statement`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Statement) – como probablemente sabrás, InterSystems IRIS incluye una completa gestión y almacenamiento de sentencias SQL. Esta clase agrupa métodos para administrar el contenido del [Índice de sentencias](https://docs.intersystems.com/irislatest/csp/docbook/DocBook.UI.Page.cls?KEY=GSQLOPT_sqlstmts), como importar y exportar planes, así como freezing y thawing, si se quiere forzar el uso de alguna en particular. * [`%SYSTEM.SQL.Stats.Table`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Stats.Table) – Aquí es donde puedes recopilar [estadísticas de las tablas](https://docs.intersystems.com/irislatest/csp/docbook/DocBook.UI.Page.cls?KEY=GSQLOPT_opttable#GSQLOPT_opttable_tunetable) y, opcionalmente, anularlas, importarlas o exportarlas. Es un nivel más profundo que los demás, ya que hay otros elementos sobre los que nos gustaría recopilar y gestionar estadísticas en el futuro. * [`SYSTEM.SQL.Util`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL.Util) – No todo encaja en un cajón temático limpio, así que aquí es donde ponemos los restos: la funcionalidad que queríamos conservar de %SYSTEM.SQL, pero para la que no encontramos un lugar más adecuado. Solo un número muy reducido de tareas extremadamente comunes, como [`%SYSTEM.SQL.Explain()`](https://docs.intersystems.com/irislatest/csp/documatic/%25CSP.Documatic.cls?LIBRARY=%25SYS&CLASSNAME=%25SYSTEM.SQL#Explain), se quedaron en la clase de nivel superior. Por supuesto, todavía nos preocupamos por los usuarios con un código que llama a los puntos de acceso preexistentes, por lo que hemos dejado todos los métodos originales en la clase `%SYSTEM.SQL` y los hemos marcado como internos y obsoletos usando palabras clave para los métodos, dejando una nota sobre la nueva ubicación preferida de la función. Una de las ventajas de este enfoque con nuevas clases es que no tenemos que preocuparnos de que lo nuevo se interponga en el camino de lo que ya existe. En la mayoría de nuestras API REST (como /api/deepsee/ y /api/iknow/*), introdujimos un número de versión en la propia URL de la API (por ejemplo, /api/iknow/v1/namespace/domains) para tener en cuenta estos cambios en la API. También probamos brevemente esa idea aquí, pero pensamos que quedaría muy mal en el nombre de una clase y no invitaría a los usuarios a adoptarla en vez del punto de acceso base que ya existe y está obsoleto. Los nuevos puntos de acceso también son un poco más extensos, pero al menos el token extra tiene sentido con respecto a lo que intenta conseguir. De manera implícita, esto significa que suponemos con cierto optimismo que nunca volveremos a tener que cambiar estas API, así que vamos a echar un vistazo al otro cambio importante que hemos hecho: revisar las estructuras de los métodos. ## Limpieza profunda Como hemos descrito en la introducción, no solo veíamos un número desmesurado de métodos, sino que algunos tenían una estructura desmesurada en el mismo método. Algunos buenos ejemplos eran los métodos TuneTable() y Export(), a los que se les agregaron un gran número de indicadores a lo largo de los años. Normalmente, los argumentos más interesantes son los nuevos del final, y habitualmente veía incluso a los desarrolladores más experimentados contar las comas antes de poner ese 1 o 0 para anular un valor (esperamos que decente) predeterminado. Claramente era un área que podíamos mejorar, y así lo hicimos. La primera pregunta que debemos hacernos es, obviamente, si merecía la pena mantener cada argumento. Algunos han sido superados con el tiempo o por nuevas funcionalidades, y pueden omitirse sin problemas. Después, pusimos los más importantes y obligatorios al principio y agrupamos todos los indicadores opcionales en un nuevo argumento _qualifiers_, de naturaleza similar a los calificadores utilizados en varios métodos %SYSTEM.OBJ. Admitimos un objeto dinámico o un formato heredado. El primero se puede pasar como una instancia %DynamicObject, o en formato de cadena JSON, como { "silent": 1, "logFile": "/tmp/xyz.log" }. El último utiliza el mismo formato que en `%SYSTEM.OBJ` usando barras, en el que los calificadores anteriores podrían expresarse como "/silent /logFile=/tmp/xyz.log". Este mecanismo ha sido una excelente forma de ofrecer métodos API fáciles de usar, de documentar y de evolucionar. Además de cambiar la lista de argumentos, también hicimos otras cosas más sencillas, como un uso más estandarizado de los valores de retorno %Status y los parámetros ByRef. Y por último, pero no por ello menos importante, cambiar los nombres de los métodos para que sean más uniformes y autoexplicativos, a menudo facilitado por el paso a un subpaquete con nombre razonable. ¿Sabrías decir sin mirar si el antiguo método `%SYSTEM.SQL.Export()` exportaba datos o información del esquema? ¡No tengo nada más que decir! ## Pensando en el futuro ¿Ya terminamos? Definitivamente no. Estoy muy agradecido por el tiempo que el equipo ha dedicado a revisar este cambio de especificación, implementación y pruebas, pero cuando lo lanzamos con 2020.3, ya habíamos identificado algunos casos en los que podríamos haber ido un poco más lejos o haber simplificado aún más las cosas. Continuaremos buscando oportunidades de este tipo y, ahora que la mayor parte de esta primera gran limpieza se ha llevado a cabo, podemos impulsar de forma práctica cambios más pequeños que se ajusten a las normas descritas anteriormente. Si estás buscando una razón por la que antes podías llamar a `%SYSTEM.SQL.FreezePlans(1, 3, "MyTable")` y ahora se recomienda usar `%SYSTEM.SQL.Statement.FreezeRelation("MyTable")`, espero que esto te haya sido útil. Si buscabas consejos generales sobre la evolución de la API, espero que al menos esto no te haya parecido una pérdida de tiempo :-) y estaré encantado de escuchar vuestras opiniones sobre cómo lo hicimos y cómo lo haríais vosotros de otra manera. No hay absolutamente ninguna ciencia exacta en lo anterior. Adoptamos un enfoque pragmático, para intentar que las cosas fueran más fáciles de utilizar sin cambiar los métodos por el placer de hacerlo y tratando de economizar en tiempo de desarrollo y pruebas. Esperamos que, con el tiempo, también ahorre tiempo en el aprendizaje y el uso de la API, pero sobre todo, ¡que ahorre el tiempo dedicado a contar las comas!

Este es un ejemplo de código que funciona en IRIS 2020.1 y en Caché 2018.1.3 No se mantendrá sincronizado con las nuevas versiones. Y NO cuenta con el servicio de soporte de InterSystems. De vez en cuando, puedes encontrarte una situación en la que, por diferentes razones, ODBC es la única opción para acceder a un sistema remoto. Lo cual es suficiente mientras necesites examinar o cambiar tablas. Pero no puedes ejecutar directamente algunos comandos o cambiar algunos globals. En este artículo vamos a ver 3 procedimientos SQL que permiten acceder a los globals usando ODBC. SQLprocedure Ping() devuelve Server::Namespace::$ZV. Permite verificar la conexión. SQLprocedure Xcmd(<commandline>,<resultvar>) ejecuta la línea de comandos que envías y devuelve el resultado en <resultvar>. SQLprocedure Gset(<global>,<subscript>,<value>,<$data>) te permite establecer o eliminar un global. <global> es un nodo del global perteneciente al *namespace* del servidor remoto. Hay que incluir el símbolo inicial, por ejemplo, '^MyGlobal' . <subscript> representa el subíndice completo incluyendo los paréntesis, por ejemplo: '(1,3,"something",3)' . <value> es el valor que queremos establecer. <$data> controla si se establece el Nodo global o se ejecuta un ZKILL en él, por ejemplo: 1, 11 para establecer el valor. 0,10 para borrar (ZKILL) el valor. El procedimiento Gset está diseñada para hacer uso del Global Scanning descrito en otro artículo. Gset permite copiar globals a través de cualquier conexión ODBC. Instalación: - En el sistema remoto necesitas la clase que se encuentra en OpenExchange.- Además necesitas definir los procedimientos como "Linked SQL Procedures", para ello emplea este asistente: SMP>System>SQL> Wizards>Link Procedure En los ejemplos se usa el namespace rccEX.- Si quieres ejecutar la copia de globals también necesitas instalar la clase Global Scanning desde OEX Ejemplos: USER>do $system.SQL.Shell() SQL Command Line Shell [SQL]USER>>select rccEX.Ping() Expression_1 cemper9::CACHE::IRIS for Windows (x86-64) 2020.1 (Build 215U) Mon Mar 30 2020 20:14:33 EDT Verifica la existencia del global ^rcc [SQL]USER>>select rccEX.Xcmd('set %y=$d(^rcc)','%y') ok: 10 Establece algún valor en ^rcc4(1,"demo",3,4) [SQL]USER>>select rccEX.Gset('^rcc4','(1,"demo",3,4)','this is a demo',1) Expression_1 ok: ^rcc4(1,"demo",3,4) Haz una copia de ^rcc2 a ^rcc4. Primero vemos el contenido de ^rcc2: USER>>select reference,value,"$DATA" from rcc_G.Scan where rcc_G.scan(^rcc2,4)=1 Reference Value $Data ^rcc2 10 (1) 1 1 (2) 2 11 (2,"xx") 10 (2,"xx",1) "XX1" 1 (2,"xx",10) "XX10" 1 (2,"xx",4) "XX4" 1 (2,"xx",7) "XX7" 1 (3) 3 1 (4) 4 11 (4,"xx") 10 (4,"xx",1) "XX1" 1 (4,"xx",10) "XX10" 1 (4,"xx",4) "XX4" 1 (4,"xx",7) "XX7" 1 (5) 5 1 16 Rows(s) Affected Ahora ejecuta la copia del contenido de ^rcc2 en ^rcc4: [SQL]USER>>select rccEX.Gset('^rcc4',reference,value,"$DATA") from rcc_G.Scan where rcc_G.scan('^rcc2',4)=1 Expression_1 ok: ^rcc4 ok: ^rcc4(1) ok: ^rcc4(2) ok: ^rcc4(2,"xx") ok: ^rcc4(2,"xx",1) ok: ^rcc4(2,"xx",10) ok: ^rcc4(2,"xx",4) ok: ^rcc4(2,"xx",7) ok: ^rcc4(3) ok: ^rcc4(4) ok: ^rcc4(4,"xx") ok: ^rcc4(4,"xx",1) ok: ^rcc4(4,"xx",10) ok: ^rcc4(4,"xx",4) ok: ^rcc4(4,"xx",7) ok: ^rcc4(5) 16 Rows(s) Affected Un agradecimiento especial para @Anna.Golitsyna por inspirarme a publicar esto.

InterSystems IRIS ofrece la posibilidad de crear interfaces REST con el enfoque *spec-first*, esto es, partiendo de las especificaciones de la API. Puedes echarle un vistazo a este artículo para más información al respecto : [https://es.community.intersystems.com/post/cómo-desarrollar-una-api-rest-con-un-enfoque-spec-first](https://es.community.intersystems.com/post/c%C3%B3mo-desarrollar-una-api-rest-con-un-enfoque-spec-first). Algo muy práctico que tiene este enfoque y la propia OpenAPI, es la definición de los **objetos** que se van a intercambiar. El comando `do ^%REST` crea las rutas y los métodos asociados, pero sin embargo no crea las definiciones de los objetos. Este es la salida del comando `do ^%REST` para el ejemplo de Petshop: ``` USER>do ^%REST REST Command Line Interface (CLI) helps you CREATE or DELETE a REST application. Enter an application name or (L)ist all REST applications (L): PetShop REST application not found: PetShop Do you want to create a new REST application? Y or N (Y): Y File path or absolute URL of a swagger document. If no document specified, then create an empty application. OpenAPI 2.0 swagger: https://petstore.swagger.io/v2/swagger.json OpenAPI 2.0 swagger document: https://petstore.swagger.io/v2/swagger.json Confirm operation, Y or N (Y): -----Creating REST application: PetShop----- CREATE PetShop.spec GENERATE PetShop.disp CREATE PetShop.impl REST application successfully created. Create a web application for the REST application? Y or N (Y): Specify a web application name beginning with a single '/'. Default is /csp/PetShop Web application name: /csp/petshop -----Deploying REST application: PetShop----- Application PetShop deployed to /csp/petshop ``` Como vemos en el ejemplo, se han generado 3 clases: * una clase disp (no accesible al usuario). * una clase impl (que contiene la implementación de la API). * una clase spec (que contiene la definición de OpenAPI en un bloque XData) ¿Y si además pudiésemos crear un paquete que contenga todas las definiciones de clases incluidas en la especificación? Eso es lo que vamos a hacer con esta aplicación de OpenExchange disponible con el gestor de paquetes ZPM. Para instalarlo con zpm: ``` USER>zpm zpm: USER>install objectscript-openapi-definition [objectscript-openapi-definition] Reload START [objectscript-openapi-definition] Reload SUCCESS [objectscript-openapi-definition] Module object refreshed. [objectscript-openapi-definition] Validate START [objectscript-openapi-definition] Validate SUCCESS [objectscript-openapi-definition] Compile START [objectscript-openapi-definition] Compile SUCCESS [objectscript-openapi-definition] Activate START [objectscript-openapi-definition] Configure START [objectscript-openapi-definition] Configure SUCCESS [objectscript-openapi-definition] Activate SUCCESS ``` Una vez instalado puedes utilizarlo de la siguiente forma: ``` zw ##class(Grongier.OpenApi.Definition).Process("PetShop.spec") Compilation started on 04/06/2020 15:40:49 with qualifiers '' Compiling 6 classes, using up to 8 worker jobs Compiling class PetShop.Definition.ApiResponse Compiling class PetShop.Definition.Category Compiling class PetShop.Definition.Tag Compiling class PetShop.Definition.Order Compiling class PetShop.Definition.Pet Compiling class PetShop.Definition.User Compiling routine PetShop.Definition.Tag.1 Compiling routine PetShop.Definition.Category.1 Compiling routine PetShop.Definition.Order.1 Compiling routine PetShop.Definition.ApiResponse.1 Compiling routine PetShop.Definition.User.1 Compiling routine PetShop.Definition.Pet.1 Compilation finished successfully in 0.183s. ``` Como ves, se han generado las clases incluidas en la especificación OpenAPI. Las clases generadas, incluyen: * campos requeridos * tipos * valores mínimos/máximos De esta forma, podrías convertir un cuerpo de un mensaje a un objeto de una de estas clases generadas: ``` ClassMethod addPet(body As %Stream.Object) As %Stream.Object { // Verify payload confirmity against definition Set tPaylaod = ##class(PetShop.Definition.Pet).%New() Set tSC = tPaylaod.%JSONImport(body) If ($$$ISERR(tSC)) { Do ..%ReportRESTError(500,tSC,1) Quit "" } Quit "" } ``` Puedes encontrar el código y más ejemplos en este repositorio: https://github.com/grongierisc/objectscript-openapi-definition

A lo largo de los años, me he encontrado con la necesidad de crear varios mensajes HL7 basados en un solo mensaje entrante. Por lo general, toman la forma de un pedido o son el resultado de un laboratorio. Cada vez que he afrontado el reto, he intentado empezar de cero, con la convicción de que el intento anterior podría haberse hecho mejor. Recientemente, volvió a surgir la necesidad y pude crear una solución de la que no me avergonzaba. Mi principal preocupación era que siempre me encontraría enterrado en un BPL, o usaría ObjectScript e intentaría editar mensajes usando el método SetValueAt para la clase de mensaje HL7. ProblemaCuando el Sistema A procesa múltiples pedidos para un solo paciente, el resultado vendrá en un solo mensaje con ORCgrp repetido con los segmentos OBR y OBX contenidos en este. El sistema B solo puede recibir un único OBR por mensaje. EstrategiaDesarrollar un proceso de ObjectScript que dividirá un solo mensaje en varios, en función del número de repeticiones de ORCgrp, y hacerlo manipulando únicamente el mensaje HL7 con una DTL. Ejecución El Código (parte 1)Para empezar, necesitamos una clase que extienda Ens.BusinessProcess y espere un mensaje HL7 bajo pedido: Class Demo.Processes.MessageSplitter Extends Ens.BusinessProcess{ Method OnRequest(pRequest As EnsLib.HL7.Message) As %Status{ Quit $$$OK } } El siguiente paso es recorrer el mensaje en función del número de repeticiones de ORCgrp. Para ello, necesitaremos 2 cosas: El número de repeticiones Un bucle For Para obtener el número de repeticiones, podemos tomar el recuento del mensaje usando el siguiente código: Set ORCCount = pRequest.GetValueAt("PIDgrpgrp(1).ORCgrp(*)") Esto establecerá la variable "ORCCount" en el número de repeticiones. Poniendo esto junto con un bucle For y un seguimiento para ver algunos resultados, se ve así: Method OnRequest(pRequest As EnsLib.HL7.Message) As %Status{ Set ORCCount = pRequest.GetValueAt("PIDgrpgrp(1).ORCgrp(*)") For i=1:1:ORCCount { $$$TRACE("This is loop number: "_i) } Quit $$$OK } Pasar un mensaje con dos repeticiones ORCgrp a través de este proceso desde dentro de una producción nos da: Como puedes ver, obtenemos dos rastros. Ahora, desde aquí, necesitamos poder llamar a una transformación, y también poder decirle a esa transformación qué iteración del ORCgrp debería estar devolviendo. Para esto, usaremos el parámetro "aux" (que a veces es ignorado) para las clases de transformación. La transformación La transformación en sí puede ser muy simple. Todo lo que queremos para esto es: Copiar el encabezado MSH mientras haces que MessageControlID sea único para tu mensaje dividido Establecer el primer ORCgrp del mensaje de destino en la iteración en la que estamos desde la fuente Establecer el Target SetIDOBR en "1", ya que siempre será el primero en el mensaje de destino Para esto, nuestra transformación debería verse un poco así: Pero espera, ¿de dónde obtiene aux.StringValue los datos? Para averiguarlo, tenemos que volver al código... El Código (parte 2)Podemos pasar una clase a la transformación a través del parámetro aux, y para este escenario solo voy a usar un contenedor de cadenas. También vamos a enviar la salida de la transformación a un objetivo para que podamos ver los resultados: Class Demo.Processes.MessageSplitter Extends Ens.BusinessProcess{ Property TargetConfigName As Ens.DataType.ConfigName; Parameter SETTINGS = "TargetConfigName"; Method OnRequest(pRequest As EnsLib.HL7.Message) As %Status{ Set ORCCount = pRequest.GetValueAt("PIDgrpgrp(1).ORCgrp(*)") For i=1:1:ORCCount { Set contextString = ##class(Ens.StringContainer).%New() Set contextString.StringValue = i $$$QuitOnError(##Class(Demo.Transformations.R01Split).Transform(pRequest,.SplitR01,.contextString)) $$$QuitOnError(..SendRequestAsync(..TargetConfigName,SplitR01,0)) } Quit $$$OK } } Luego, en la producción, establecemos un destino usando la nueva opción de configuración que creamos con la propiedad y el parámetro en la parte superior de la clase, y deberíamos ver algo como esto: Conclusión Como dije al principio, siempre me parece que desarrollo una solución para este tipo de problema y luego miro hacia atrás y pienso que podría hacerse mejor. Esta no es una excepción, pero ciertamente es mejor que las iteraciones anteriores. Para mejorar esto en el corto plazo, añadiré comentarios descriptivos al ObjectScript. A largo plazo, me gustaría poder añadir una configuración para la clase de transformación, para que pueda controlarse desde fuera de ObjectScript. En general, puedo ver esto como un enfoque que tomaré para desarrollos futuros, y no comenzaré completamente desde cero. (P.D.: Estoy feliz de compartir el código para esto, aunque solo puedo adjuntar un pdf a este artículo. Parece poco para ser algo para Open Exchange, pero si hay algún interés en que lo cargue allí o en otro lugar, decídmelo). Este artículo ha sido etiquetado como "Mejores prácticas" ("Best practices"). Los artículos con la etiqueta "Mejores prácticas" incluyen recomendaciones sobre cómo desarrollar, probar, implementar y administrar mejor las soluciones de InterSystems.

Quiero anunciar el lanzamiento de algo muy interesante - y revolucionario, de hecho. Puede sonar exagerado, pero no creo que hayáis visto nada como esto, ¡ni si quiera imaginar que sería posible! Hemos sacado un nuevo módulo JavaScript/Node.js llamado glsdb del que podéis leer todo aquí: https://github.com/robtweed/glsdb No obstante, para el propósito de este anuncio, me voy a centrar en una parte de glsdb: sus APIs que abstraen las Clases de IRIS (o Cache) como Objetos JavaScript equivalentes. Con esto quiero decir que los Objetos de JavaScript serán en realidad ¡Objetos IRIS persistidos en la base de datos! Suponed que tengo instalados los datos SAMPLES del repositorio de InterSystems, como se describe aquí: https://docs.intersystems.com/irislatest/csp/docbook/DocBook.UI.Page.cls?KEY=ASAMPLES Así que, para acceder a estos datos SAMPLES usando glsdb, primero tengo que abrir una conexión con IRIS (glsdb usa nuestro interfaz mg-dbx para hacer esa conexión), por ejemplo: const {glsDB} = await import('glsdb'); let glsdb = new glsDB('iris'); let options = { connection: 'network', host: '172.17.0.2', tcp_port: 7042, username: "_SYSTEM", password: "xxxxxx", namespace: "SAMPLES" } glsdb.open(options); Ahora, si deseo acceder a un registro de Empleado (Employee) en la base de datos SAMPLES, bastaría con lo siguiente: let Employee = glsdb.irisClass('Sample.Employee'); let employee = Employee(101); Por ahora, quizás, no os sorprenda. Pero aquí es donde empieza lo alucinante. Hemos creado un Objeto JavaScript llamado employee que parece representar la instancia Employee con un OID de 101, pero realmente es un Objeto JavaScript bastante especial: es un Objeto Proxy de JavaScript que está directamente mapeado a la instancia física de la Clase IRIS en la base de datos. Tenemos acceso directo a todas las propiedades y métodos de la Clase IRIS así que, cuando manipulamos el Objeto Proxy, ¡estamos realmente manipulando la instancia de la Clase IRIS en la base de datos! Por lo tanto, podremos hacer cosas como esta: let salary = employee.Salary; console.log('employee.Salary = ' + salary); let company = employee.Company; let name = company.Name; console.log('Company: ' + name); Lo importante que hay que tener en cuenta aquí es que el objeto employee no es una copia de JavaScript almacenada en memoria de una instancia de la Clase IRIS - es la instancia de la Clase IRIS real, en la base de datos! Como podéis ver aquí debajo, podemos acceder a atributos de subclases a través de la relación entre el Empleado (Employee) y la Compañía (Company) como se haría en ObjectScript, pudiendo hacerlo de una sóla vez: console.log(employee.Company.Name); De tal forma podremos acceder, a través de las propiedades, directamente a la Clase física de IRIS en la base de datos. También podremos guardar los cambios de los objetos - para ello utilizaremos un método especial llamado _save(), por ejemplo: employee._save() Para crear una nueva instancia de un empleado (sin especificar el OID), por ejemplo: let newEmployee = Employee(); glsdb proporciona un método más rápido para definir y guardar un nuevo registro de una sola vez, este método será _set(), por ejemplo: let ok = newEmployee._set({ Title: 'Manager' Salary: 60000 }) Podréis incluso examinar los métodos y propiedades disponibles para la Clase: console.log(employee._properties); console.log(employee._methods); Esto ha sido un vistazo rápido a glsdb: ¡espero que os haya permitido conocer un poco lo fantástico que es! Es posible que os estéis preguntando cómo se pueden hacer este tipo de cosas. A modo de resumen, todo se reduce a una funcionalidad relativamente nueva de JavaScript: Objetos Proxy. Los Objetos Proxy son objetos especiales que actúan, como su nombre indica, como proxy de otro objeto real. Pero su verdadero poder está en el hecho de que puedes configurar pasarelas para acceder o cambiar las propiedades del Objeto Proxy y (esta es la parte importante) puedes aplicar lógica personalizada a esas pasarelas. En el caso de glsdb, esa lógica personalizada utiliza las APIs mg-dbx por detrás para llevar a cabo el acceso y los cambios equivalentes que sucedan sobre el Objeto Proxy en la clase IRIS correspondiente. De todas formas, esto es un vistazo rápido al increible mundo de posibilidades con glsdb. Lo que he publicado es una primera versión, por lo que estoy seguro de que hay aspectos del proxy de IRIS que irán siendo modificados. Probadlo y ved lo que puede hacer, si encontráis algo que no funciona correctamente no dudéis en poneros en contacto conmigo. Y por cierto, comprobad las otras APIs que glsdb proporciona - ¡son igual de interesantes y alucinantes! Por último, glsdb es software Open Source, así que podéis probar el código y postearlo en el repositorio de Github si queréis echar una mano con los desarrollos futuros.

Estimados miembros de la Comunidad. Una problemática muy común en muchos usuario es el uso de una base de datos externa como entrada de datos a una producción de IRIS. Como ya sabréis tenemos dos métodos de conexión directas a bases de datos externas desde IRIS, la primera es mediante ODBC y la segunda es recurriendo a una conexión vía JDBC. En nuestro ejemplo procederemos a realizar una conexión mediante JDBC y para ello montaremos un pequeño proyecto en Docker para que podáis jugar con ello cuanto queráis. Tenéis el código disponible en esta url: https://github.com/intersystems-ib/workshop-sql-jgw En nuestro docker-compose.yml configuraremos las imágenes que vamos a necesitar: version: "2.2" services: # mysql mysql: build: context: mysql container_name: mysql restart: always command: --default-authentication-plugin=mysql_native_password environment: MYSQL_ROOT_PASSWORD: SYS MYSQL_USER: testuser MYSQL_PASSWORD: testpassword volumes: - ./mysql/sql/dump.sql:/docker-entrypoint-initdb.d/dump.sql adminer: container_name: adminer image: adminer restart: always depends_on: - mysql ports: - 8080:8080 # java gateway jgw: build: context: java dockerfile: Dockerfile depends_on: - mysql container_name: jgw restart: always ports: - 44444:44444 environment: - PORT=44444 # iris iris: init: true container_name: iris build: context: . dockerfile: iris/Dockerfile depends_on: - 'jgw' ports: - 52773:52773 - 51773:51773 command: --check-caps false MySQL: nuestro motor de base de datos. Adminer: aplicación web que nos permitirá administrar nuestra instancia de MySQL. IRIS: con la versión community más reciente de IRIS. JGW: el Java Gateway que nos permitirá conectarnos vía JDBC a nuestra base de datos. Para desplegar los contenedores deberemos ejecutar los siguientes comandos: docker-compose build ... docker-compose up -d ... docker-compose start Una vez arrancados los contenedores podréis acceder al administrador de base de datos en la siguiente url con las siguientes valores: Motor de base de datos: MySQL Servidor: mysql Usuario: root Contraseña: SYS Podréis ver que se encuentra configurada una base de datos llamada test dentro de la cual hay una tabla llamada patient con dos registros. Será sobre esa tabla sobre la que lanzaremos la consulta desde el Business Service. Finalmente, accediendo al portal de gestión de la instancia de IRIS, podremos revisar la producción en el Namespace USER que se carga por defecto, Test.Production: Analizaremos los diferentes elementos que la componen: EnsLib.JavaGateway.Service: este business service será el responsable de permitir la conectividad vía JDBC a nuestra base de datos, para este ejemplo ha sido necesario desplegar un container (JGW) en el que ubicaremos nuestro JDK y que se encontrará escuchando en el puerto 44444. Si queréis configurarlo en un IRIS instalado en Windows o Linux sólo necesitaréis añadir el business services, definir la ruta al JAVA HOME y la ubicación de la librería de java que nos permitan la conexión a la base de datos, el puerto por defecto en ese caso será el 55555. EnsLib.SQL.Service.GenericService: mediante este servicio deberemos configurar una serie de opciones. DSN: url de conexión a nuestra base de datos (jdbc:mysql://mysql:3306/test). Credentials: las credenciales necesarias para la conexión (root/SYS). Target config names: a donde vamos a enviar el objeto obtenido tras la lectura de la base de datos. Query: consulta que vamos a lanzar periódicamente a nuestra base de datos para obtener los últimos registros añadidos. Message Class: objeto que se creará con los datos obtenidos a partir de la consulta (sus propiedades deben coincidir con el nombre utilizado en los campos de la consulta). Java Gateway Service: el nombre en nuestra producción del JavaGateway service. JDBC Driver: el nombre del driver de conexión a nuestra base de datos (en nuestro caso será el de MySQL, com.mysql.jdbc.Driver). Test.PatientToString: business process de ejemplo en el que se capturan los datos del objeto definido en el Message Class anterior y se envían a un business operation. EnsLib.File.PassthroughOperation: business operation estándar que nos escribirá el resultado en un fichero de salida. Si vemos en más detalle el objeto que generaremos por cada nuevo registro en la base de datos podremos comprobar que sus propiedades coinciden con las usadas en la consulta: Class Test.Patient Extends (%Persistent, %JSON.Adaptor, %XML.Adaptor, Ens.Request) { Property Id As %Integer; Property Name As %String; Property Lastname As %String; } Este objeto nos permitirá mapear automáticamente nuestra query a un objeto, sin necesidad de realizar ninguna transformación farragosa. ¡Si tenéis cualquier pregunta o sugerencia no dudéis en añadir un comentario!