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, acabo de añadir un PDF con las diapositivas que utilicé en el tutorial. Siéntete libre de utilizarlas. Sí te pido que, si lo haces, incluyas un link referenciando a este post en la Comunidad.

Por cierto, para los que me habéis comentado, efectivamente tenía el repositorio de ejemplos en GitHub marcado como privado... ya está accesible: Repositorio GitHub - Ejemplos

Como ya extiendes de %XML.Adaptor, directamente pueden utilizarse las funcionalidades de esa clase para obtener el XML, por ejemplo: 

do objectTest.XMLExportToString(.xml)
write xml

que ya te generará:

<Test><Person><name>John</name><age>22</age></Person><Address><location>New York NY 10036</location></Address></Test>

Parecía que no, pero finalmente llega el momento de cerrar este tutorial de ObjectScript... Publico hoy el Capítulo 6 - ¿Qué pasa con SQL?, dedicado al acceso SQL a IRIS Data Plataform y  cierre de este tutorial. Lo he centrado particularmente en los 2 mecanismos básicos de tratar SQL en ObjectScript, de forma estática, embebiendo SQL en el código ObjectScript, o dinámica, a través de las clases del paquete %SQL.

Por supuesto, hay muuuucho más que contar y aprender... os invito a navegar por esta comunidad, por la sección de formación de InterSystems, por los cursos online gratuitos, por la sección del desarrollador, a visualizar los webinars que periodicamente realizamos y, si tenéis la opción, complementar vuestra formación con un curso oficial. Ah.. y no olvidéis que la documentación es vuestra amiga! Ahí encontraréis explicaciones en detalle y multitud de ejemplos que os ayudarán a avanzar. 

En fin... poco más que decir. Para mí ha sido toda una experiencia.... sobre todo la post-producción 😰😉...  Espero que os haya sido útil... Con haber ayudado a unos pocos, habrá valido la pena. Happy coding!!

Ya están disponibles las nuevas imágenes con la clave extendida en el InterSystems Container Registry. Puedes descargarte las imágenes nuevas ejecutando:

docker pull containers.intersystems.com/intersystems/iris-community:2021.1.0.215.3

docker pull containers.intersystems.com/intersystems/iris-community-arm64:2021.1.0.215.3

docker pull containers.intersystems.com/intersystems/irishealth-community:2021.1.0.215.3

docker pull containers.intersystems.com/intersystems/irishealth-community-arm64:2021.1.0.215.3

Hola Kurro... estos links concretos te funcionan a ti? Creo que los asistentes asociados al New... en el Studio sólo generan el código fuente y lo entregan al editor del Studio... Pero el VSCode no recoge bien esa salida y la muestra tal que así:

<template>
<![CDATA[ BODY##www.intersystems.com:template_delimiter##Include %occInclude /// %Installer Manifest MyApp.MyInstaller Class MyApp.MyInstaller { /// Definición de manifiesto. XData MyManifest [ XMLNamespace = INSTALLER ] { <Manifest> <Namespace> <Configuration> <Database> <!-- Your Manifest code here --> </Database> </Configuration> </Namespace> </Manifest> } /// Este es un generador de métodos cuyo código es generado por XGL. ClassMethod setup(ByRef pVars, pLogLevel As %Integer = 3, pInstaller As %Installer.Installer, pLogger As %Installer.AbstractLogger) As %Status [ CodeMode = objectgenerator, Internal ] { #; Permitir que nuestro documento XGL genere código para este método. Quit ##class(%Installer.Manifest).%Generate(%compiledclass, %code, "MyManifest") } } ##www.intersystems.com:template_delimiter##CLASS##www.intersystems.com:tem... ]]>
</template>

De aquí sí que podríamos extraer el fuente generado... desde el ##Include hasta "MyManifest")}}... pero es un poco engorroso.

En el caso de los Complementos (Add-ins) que automatizan la generación de clases, sí que funcionan prácticamente igual que en el Studio... 

Bueno, ha tardado más de 3 semanas en salir del horno pero aquí lo tienes, calentito, calentito, el Capítulo 5 - Objetos, penúltimo de este tutorial de ObjectScript. En él nos introducimos ya en la parte de Orientación a Objetos. Me ha quedado un pelín largo para mi gusto, algo más de 2 horas, así que tómatelo con tranquilidad, trocealo a tu gusto,...o ¡qué narices!, ¡dale caña y ponle el turbo al video! laugh 

Espero que lo disfrutes y te sirva de ayuda. Ah... recien metido en el horno el Capítulo 6, en el que te contaré un poquito qué pasa con SQL y como también ObjectScript lo incorpora de forma nativa... con él cerraré ya este tutorial. A ver lo que tarda en hacerse. ¡Hasta un rato!

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))