Forté 4GL era un servidor de aplicaciones propietario desarrollado por Forté Software y utilizado para desarrollar aplicaciones empresariales escalables y de alta disponibilidad.
Forté 4GL fue creado como una solución integrada para desarrollar y gestionar aplicaciones cliente/servidor. Forté 4GL consta de un servidor de aplicaciones, herramientas para implementar y monitorear una aplicación y un lenguaje de programación propietario orientado a objetos , TOOL (lenguaje transaccional orientado a objetos) . Dado que TOOL sólo se ejecuta en el servidor de aplicaciones Forté, muchos usuarios simplemente se refieren a sus aplicaciones "TOOL" como aplicaciones "Forté". La primera versión de Forté 4GL se publicó en agosto de 1994. Después de lanzar este producto inicial, Forté Inc. procedió a crear varias extensiones, entre ellas:
En 1999, Forté Software lanzó una versión de Forté basada en Java en lugar de TOOL llamada synerJ y también conocida como "Forté para Java". Al igual que con los productos originales basados en HERRAMIENTAS, este consistía en un IDE de desarrollo, un repositorio de código y un entorno de ejecución. Este nuevo producto Java despertó el interés de Sun Microsystems, que compró la empresa. Las extensiones basadas en HERRAMIENTAS enumeradas anteriormente se agruparon y se renombraron como Unified Development Server (UDS) y Integration Server (IS) bajo la división IPlanet . Posteriormente, los módulos del servidor se agruparon como Enterprise Application Integration (EAI).
Sun declaró el final de la vida útil del producto, indicando que no hay planes futuros para continuar con el desarrollo del producto. El apoyo oficial de Sun a Forté terminó en abril de 2009. [1]
Al ser un sistema de desarrollo de aplicaciones empresariales, Forté 4GL admitía una estrecha vinculación con varios sistemas de bases de datos relacionales diferentes , incluidos Oracle , Sybase , Microsoft SQL Server , Informix y DB2 . Estos vínculos podrían realizarse a través de SQL integrado en el código de la HERRAMIENTA o mediante SQL construido sobre la marcha.
También tenía soporte para aplicaciones distribuidas: el desarrollador crearía una instancia de una clase específica, que se colocaría en un servidor especificado por el usuario. Las llamadas a métodos a través de instancias se enviarían a través de la red de forma transparente; el desarrollador no necesitaría conocer los detalles subyacentes de cómo se transmitiría la llamada.
TOOL es un lenguaje orientado a objetos con las siguientes características (entre otras):
ObjectEl código HERRAMIENTA no distingue entre mayúsculas y minúsculas. Una declaración siempre termina con punto y coma. Las declaraciones compuestas están encerradas por las palabras clave beginy end. Los comentarios se indican con // o -- (el resto de la línea se convierte en un comentario), /* ... */.
Tipos de datos
Los tipos de datos simples son:
Los tipos de datos de objeto correspondientes son (algunos ejemplos):
Las matrices están indicadas por las palabras clave Array of. El primer elemento de una matriz está indexado por 1.
Declaración de variables
nombre: cadena = 'Juan';resultado: número entero;dataArray: Matriz de IntegerData = nuevo;
Declaraciones condicionales (declaración if, declaración de caso)
si resultado = 5100 entonces ...elseif resultado! = 0 entonces ...demás ...terminara si;el resultado del caso es cuando lo hago .... cuando 2 lo hacen .... demás ...caso final;
Iteración, bucles
para k en 1 a 10 por 2 hacer ...terminar para;para dataItem en dataArray hacer ...terminar para;k : entero = 2;mientras k < 14 hacer ... k = k + 1;terminar mientras;
Eventos
Un evento se publica, por ejemplo, mediante la siguiente declaración:
publicar EV_CustomerSet(id = ID seleccionado);
Esta declaración publica un evento llamado EV_CustomerSet. Este evento tiene un argumento llamado "id".
Los eventos son manejados por controladores de eventos, por ejemplo:
bucle de eventos preinscribirse registrar GeneralHandler(); ... posregistro waitTimer.IsActive = verdadero; ... cuando EV_CustomerSet (id) lo hace ... cuando waitTimer.Tick() lo hace salida; cuando tarea.Apagar hacer salida;evento final;
Manejo de excepciones
comenzar ... aumentar UsageException(); ...excepción cuando e: UsageException hacer tarea.ErrMgr.Clear(); ... demás ... aumentar;fin;
subprocesos múltiples
Se abre un nuevo hilo con una declaración comostart task report.Print();