EGL

EGL — современный высокоуровневый язык программирования для создания бизнес-приложений. Разработан IBM. EGL схож по синтаксису с другими языками программирования для упрощения обучения. Программы на EGL обычно создаются и отлаживаются в виде EGL-программы, а затем могут быть скомилированы в COBOL, Java или JavaScript.

Примеры программ

Каждая программа EGL имеет единственную точку входа: функцию main. Функции EGL состоят из операторов EGL, переменных и констант. Программа, выводящая строку на экран:

Program HelloWorld
 
        const GREETING string = "Hello, ";
 
        function main
                myName string = "John";
                sayHello;
        end     
 
        function sayHello
                SysLib.writeStdOut;
        end
 
end

Наборы различных данных могут быть объединены в Запись. Пример записи CustomerRecord с шестью полями:

Record CustomerRecord type BasicRecord
        customerNumber INT;            
        customerName STRING;
        customerAddr1 STRING;
        customerAddr2 STRING;
        customerAddr3 STRING;
        customerBalance MONEY;
end

Для обмена данными с СУБД, EGL имеет специальный тип записей, называемые SQLRecord. В следующем примере запись Employee связывается с SQL-таблицей Employee:

record Employee type sqlRecord { tableNames =
            ], keyItems =}
    EMPNUMBER string{ column = "EMPNO", maxLen = 6};
    FIRSTNME string{ sqlVariableLen = yes, maxLen = 12};
    MIDINIT string{ isSqlNullable = yes, maxLen = 1};
    LASTNAME string{ sqlVariableLen = yes, maxLen = 15};
    DEPT string{ column = "WORKDEPT", isSqlNullable = yes, maxLen = 3};
    PHONENO string{ isSqlNullable = yes, maxLen = 4};
    HIREDATE date{ isSqlNullable = yes};
end

Сервисами в EGL называют наборы функций, которыми могут пользоваться другие приложения. В примере определен сервис с двумя функциями:

package com.mycompany.services;
 
service EmployeeService
 
    function getEmployees returns
        records Employee; // определяет пустой массив записей
        get records; // запрашивает записи из СУБД
        return ; // возвращает записи
    end
 
    function addEmployee returns 
        try
                add remp;
                return ;
        onException 
                return ;
        end
    end
 
end

Интернет магазин китайских планшетных компьютеров

Компьютеры - EGL

Примеры программ