Часть 5. Выполнение кода ABL

В завершение выполним ABL-код. Вы исполните процедуру SimpleClient.p, которая вызывает процедуры connect.p и FindFirstCustomerName.p.

1. Двойным щелчком мыши откройте процедуру SimpleClient.p в каталоге src/Test проекта Client.

   

2. Изучите код ABL в этом файле. Он использует оператор run для вызова процедуры connect.p, которая будет подключаться к базе данных, а затем использует оператор run для вызова процедуры GetFirstCustomerName.p, которая возвращает имя клиента. Затем эта процедура отображает имя клиента в пользовательском интерфейсе, используя оператор message.
3. Выполните процедуру SimpleClient.p:
   • Щёлкните по иконке запуска
   • Выберите пункт меню Run As > Progress OpenEdge Application.

     

     Процедура будет выполнена в AVM проекта. На экране появится сообщение именем первого клиента. Щёлкните по кнопке OK чтобы закрыть его.

4. Измените процедуру SimpleClient.p так, чтобы оно дополнительно выполнила процедуру GetLastCustomerName.p и вывела её значение. В редакторе OpenEdge вы можете копировать и вставлять операторы. Убедитесь в том, что если вы вставляете какой-либо ABL-код, то он помещается перед оператором return.

   

5. Сохраните изменения и исполните код. Вы видите два сообщения?

   
   

6. Закройте все открытые файлы.

Упражнение завершено.