Prueba esto:

ClassMethod Indirection()

{
    set TABLES(0)="EVEN"
    set TABLES(1)="ODD"
    for i=1:1:100
    {
        set table = TABLES((i#2))
        set @table@(i)=i 
    }

    zw @table
    set evenTotal=0
    set i=""
    for
    {
        set i=$ORDER(@table@(i)) QUIT:i=""  
        set evenTotal = evenTotal+@table@(i)
    }
    zwrite evenTotal
}

Hola, la mayoría de los componentes de interoperabilidad son clases, así que se puede utilizar ZPM sin problemas. 

Hay otros componentes relacionados con la interoperabilidad que no son clases y que ZPM también soporta:

  • .LUT - Tablas de Lookup
  • .ESD - para Ens.Config.DefaultSettings
  • .X12 - para documentos X12 

Si utilizas esos componentes, lo tendrás ubicados por defecto en el directorio i14y de tu proyecto.

Aquí tienes una plantailla que puedes usar: interoperability-sample.

En IRIS puedes decidir cual es el nombre con que se proyecta una propiedad en SQL utilizando el cualificador SqlFieldName al definir la propiedad en la clase:

https://docs.intersystems.com/irislatest/csp/docbook/Doc.View.cls?KEY=RO...

Igualmente, podrías utilizar directamente el nombre en su formato digamos SQL, fist_name en la propia definición de la clase... simplemente inclúyelo entre comillas:

Property "first_name" as %String 

De este modo, tanto la propiedad en Objetos, como la columna en SQL se llamarían igual... A mí esta segunda opción me gusta menos, porque obliga a utilizar esa propiedad entre comillas en nuestro código cuando la manipulemos como propiedad de un objeto ... Si sólo atacas IRIS desde el punto de vista relacional, te da más igual.

Hola,

habría varias opciones. Quizá la más habitual:

1. Instalar un servidor web público (WindowsLinux).

2. Conectarlo a InterSystems IRIS.

2. Habilitar HTTPS en el servidor web. LA forma más sencilla es Let's Encrypt.

Otra opción sería utilizar un proxy server en docker. Como Guillaume Rongier hace en este ejemplo publicado en GitHub: https://github.com/grongierisc/Https-Proxy-IRIS-Docker o este de Lorenzo Scalese: https://github.com/lscalese/isc-webgateway-letsencrypt

Una de las opciones - No usar el namespace USER.

Por qué preocuparnos de lidiar con USER? Una opción más productiva y limpia es crear tu propia base y namespace desde cero.

Eso es por lo que creamos una nueva base de datos y namespace IRISAPP en cada plantailla, por ejemplo: las plantillas objectscriptrest o ZPM package

Con esta aproximación del tipo infrastructure-as-a-code, sabes con seguridad que namespaces, mapeos, seguridad, bases de datos, usuarios, ... utilizas y cómo se configuran, porque son los que creas tu.

En todo caso, en instalaciones iniciales de InterSystems IRIS, al menos desde la versión 2020.1, el namespace USER no viene configurado por defecto con la opción de interoperabilidad activada.

La sentencia tiene un error sintáctico, constraint debe ir precedido por una coma.

Por otro lado, si lo que se quiere es tener un identificador de fila autoincremental creciente, basta con no indicar la columna ID (y por tanto eliminar la constraint por innecesaria), ya que IRIS creará por defecto una columna ID que mantendrá un valor único numérico creciente por cada nueva fila. Quedaría:

CREATE TABLE SQLUser.Teste (coluna1 VARCHAR (255), coluna2 VARCHAR (255), coluna3 VARCHAR (255), coluna4 VARCHAR (255))

En este caso no tendríamos Primary Key, tendríamos sólo un IDKEY, proyectado en SQL como la columna ID, cuyos valores identifican unívocamente cada fila.

Si lo que queremos es tener una primary key que podamos insertar explícitamente nosotros, pues esa sentencia valdría, añadiendo la coma que falta claro:

CREATE TABLE SQLUser.Teste (ID INT NOT NULL, coluna1 VARCHAR (255), coluna2 VARCHAR (255), coluna3 VARCHAR (255), coluna4 VARCHAR (255), CONSTRAINT TestePK PRIMARY KEY (ID))

En ese caso, al existir ya una columna con nombre ID, IRIS generaría una columna de nombre ID1 donde igualmente nos daría un valor numérico creciente único por fila. Este ID1 sería el IDKEY (no confundir con Primary Key) e ID la Primary Key.

Si quisiéramos tener una Primary Key que coincidiera con el IDKEY, haríamos:

CREATE TABLE SQLUser.Teste (ID INT IDENTITY, coluna1 VARCHAR (255), coluna2 VARCHAR (255), coluna3 VARCHAR (255), coluna4 VARCHAR (255), CONSTRAINT TestePK PRIMARY KEY (ID))

@Julius Kavay  ha dado una muy buena alternativa.

En lugar de insertar debug_macros, prueba la utilidad TRACE de Intersystems.

write $$DIR^TRACE("c:\Temp\") ; to set an output directory
write $$ON^TRACE(jobnr) ; the pid of the process you want to trace
; zn "appNamespace"
; do ^yourProgram
; zn "%SYS"
write $$OFF^TRACE(jobnr) ; to stopp the trace
do ^TRACE ; to display the trace result

TRACE muestras las llamadas a métodos/funciones con argumentos.

Para hacer uso de ella, debéis de estar en el namespace %SYS... o podéis mapearla al namespace %ALL y así la podréis utilizar desde cualquier sitio. No aparece actualmente en la documentación oficial, pero podéis encontrar información de uso ejecutando do ^TRACE y en la propia rutina ^TRACE.int (podéis ver el código fuente completo desde el portal, el Studio, VS Code,...)

Hola Mathew,

Sí. Si hay un error interno en alguna de las llamadas que hace para localizar la tabla y hacer el purgado, el error podría aparecer en $ZERROR. No obstante, hay varias llamadas a métodos internos... no me ha parecido, pero alguno de ellos podría poner a "" el $ZERROR si gestiona el error y considera que debe ponerlo a null. He seguido la cadena de llamadas hasta 3 o 4 niveles y no he visto ningún set $ZE="" explícito... o sea que en principio, si hay algún error interno tras la llamada, $ZE o %objlasterror deberían tener algún valor....

OJO, esto no implica necesariamente que la operación de purgado haya fallado... algún metodo o rutina intermedia puede lanzar una excepción (lo que modificaría el $ZE), que a su vez podría ser gestionada por algún método/rutina del nivel superior sin mayor problema y sin afectar a la acción de purgado. No creo que sea así en este caso, pero podría ocurrir. 

Hola Robert, 

lamentablemente no hay mucho material de introducción a la tecnología en español. Evoluciona e incorpora novedades con tanta velocidad que se hace difícil estar al día si no es inglés. Te aconsejo utilizar las opciones de traducción automática de tu navegador cuando sea posible o veas que te resulta complicado seguir en inglés. 

Por otro lado, en esta Comunidad puedes plantear tus dudas concretas en español y seguro que obtendrás ayuda.

También te puede interesar... en los últimos años se han ido incorporando webinars en español que tratan temas variados. Los puedes consultar aquí : 

Como punto de entrada a la tecnología yo empezaría por:

Respecto al IDE, te recomiendo también mirar lo último que está apareciendo sobre programación en Objectscript con VSCode. Existen algunas extensiones OpenSource para este IDE que permiten trabajar con Objectscript y que serán oficialmente soportadas por InterSystems a partir de su versión 1.0 prevista para finales de Octubre de este año. Esta previsto que las funcionalidades de VS Code como IDE para desarrollo en Objectscript superen a Atelier en muy poco tiempo. 

Hola Bernabé, eres la prueba viviente de la resiliencia de una buena tecnología! Lo cierto es que han pasado varias "eras" tecnológicas desde los tiempos que comentas... pero a ver quien es el milenial que se enfrenta a un dinosaurio a pecho descubierto!  laugh 

Te aconsejaría "empaquetar" la lógica que tienes en tus rutinas en clases... y dejar Caché a un lado, con todos los honores que se merece, para empezar con InterSystems IRIS... A partir de ahí, depende de lo que tengas, te resultará más o menos fácil, pero en la mayoría de los casos tendría que ser bastante directo.

Una vez que te manejes con las clases, tus opciones son muchas... puedes desarrollar APIs REST, o Web Services,... que te sirvan para publicar funcionalidad que luego puedan utilizarse desde una aplicación en Angular, React, Vue..si te inclinas por aplicaciones web, o en .Net, Java,... Por supuesto siempre puedes ejecutar comandos en modo terminal para funciones atómicas, pero si quieres un interfaz más moderno, el terminal queda descartado.

No te libras de tener que familiarizarte con alguna tecnología de front-end... las que te comento u otras... cuando lo hagas, siguiendo algún tutorial, verás que todo absolutamente todo lo que te planteen en temas de intercomunicación con un motor de BD, lo puedes hacer con IRIS.

Pero bueno, hay camino que recorrer... aparte de este foro, tienes el Open Exchange, con muchas aplicaciones open source que te pueden ser muy útiles y dar ideas. También tienes cursos gratuitos en la sección de Learning... 

En el Try InterSystems IRIS puedes probar en una máquina virtual durante un mes... o también puedes bajarte una versión gratuita de InterSystems IRIS Community aquí.

Para ir haciéndote una idea... puedes empezar por los Quick Start.

Ponerse al día puede ser lento al principio... en cuanto le cojas el hilo a los objetos, empezarás a correr. En todo caso, por seguir tu analogía... desde cuando los obstáculos de unos mamíferos bípedos insignificantes han parado a un T-Rex??!! laugh

Bueno, espero haberte ayudado... o encaminado al menos.