Для того чтобы выполнить эту хранимую процедуру в Delphi 4, необходимо использовать компонент TQuery со свойством SQL:

SELECT * FROM GET_EMPLOYEES_IN_DEPT(:iDEPT_NO)

Обратите внимание, что в данном случае используется оператор SELECT, как если бы процедура была таблицей. Как видите, разница между хранимой процедурой и таблицей ? наличие входного параметра iDEPT_NO.

Teпеpь разработаем микропроект, иллюстрирующий выполнение описанной хранимой процедуры. Пpoект qryGetEmployees содержит компонент TQuery, выполняющий хранимую процедуру, приведенную в листинге 28.13. Он получает параметр из gryDepartment, который выполняет обычный оператор SELECT в таблице DEPARTMENT в базе данных. Объект qryGetEmployees связан с объектом dbgEmployees, который отображает список отделов. Когда пользователь просматривает список dbgDepartment, вызывается обработчик события OnDataChange объекта dsDepartment. Неoбходимо заметить, что объект dsDepartment связан с объектом qryDepartment. Этoт обработчик события выполняет код, приведенный в листинге 28.14, который устанавливает параметр объекта qryGetEmployees и получает его результирующий набор.