Външни функции



Външите функции са всъщност програми, които връщат определен
резултат в променливата "SRESULT$".
Викащата програма чете този резултат чрез същата променлива.
Ето един пример за външна функция:


======== начало на програмата SAY.PRG ================
: say.prg
: функция пробна
x fparam(1)
отг 'под нулата'
ако (x>=0) and (x<5) то отг 'между 0 и 5'
ако (x>=5) and (x<25) то отг 'между 5 и 25'
ако (x>=25) and (x<28) то отг 'между 25 и 28'
ако (x>=28) то отг 'най-малко 28'
SRESULT$ отг

: край
======== край на програмата SAY.PRG ===================

извикване

======== начало на програмата TEST.PRG ================
...........
...........

база SOME_TABLE
чист SRESULT$
x (3,2)
поле (1,2)=SAY.PRG(x)
..........
..........
======== край на програмата TEST.PRG =========






===================край=====================