! Описание процедур из внешних модулей
Формат:
PROCEDURE <Имя процедуры>(Параметр1[,Параметр2,.., ПараметрN]);
<Выражение1>;
.
.
<ВыражениеN>;
END.;
< Имя процедуры > - см. «ПРАВИЛА ИМЕНОВАНИЯ ПЕРЕМЕННЫХ»;
< Параметр > - см. «ПРАВИЛА ИМЕНОВАНИЯ ПЕРЕМЕННЫХ»;
Замечания:
· Параметры передаются по ссылке, т.е. их значение модифицируется в теле процедуры.
<Выражения> могут оперировать только переменными, описанными в списке параметров процедуры или созданными в теле этой процедуры.
Пример:
uses ffff;
procedure ФУН1(ПАРАМ1,ПАРАМ2,ПАРАМ3);
РД=КАЛЕНДАРЬДНЕЙ(ПАРАМ1,ПАРАМ2,"Б");
ВЫЧЕТЫ=РАБДНЕЙГРАФИК(ПАРАМ3,ПАРАМ1,ПАРАМ2,"","БКО","");
ПЛАН=РД-ВЫЧЕТЫ;
НОРМА=ПЛАН*336;
FFFF::ФУН2(НОРМА,ПАРАМ3,ПАРАМ1,ПАРАМ2);
END.;
Была ли статья полезна?