Epson SRC-300 Referenzhandbuch Seite 28

Befehlsbeschreibung
BEISPIEL
Ohne Include-Datei
FILE1 (MAIN.PRG)
>10 FUNCTION MAIN
>20 EXTERN FUNCTION INIT
>30 ENTRY REAL WORK(100)
>40 ENTRY DOUBLE A_SIN,A_COS
>50 XQT !2 INIT
>60 FEND
FILE2 (INIT.PRG)
>100 FUNCTION INIT
>110 EXTERN REAL WORK(100)
>120 EXTERN DOUBLE A_SIN, A_COS
>130 EXTERN FUNCTION DISP
.
.
.
>180 XQT !3 DISP
>190 FEND
FILE3 (PRI.PRG)
>200 FUNCTION DISP
>210 EXTERN REAL WORK(100)
>220 EXTERN DOUBLE A_SIN, A_COS
.
.
.
>290 FEND
10
Wird keine Include-Datei verwendet, müssen für jede Datei, in der Variablen
verwendet werden, die entsprechenden Variablen deklariert bzw.Variablenna-
men geändert und neue hinzugefügt werden.
So kann beispielsweise in dem vorherigen Beispiel durch Verwendung einer
Include-Datei die Änderung einer Variablendefinition durch Änderung der
Variablen an nur zwei Stellen (FILE1.PRG und VAL.PRG) durchgeführt
werden. Dies ist besonders nützlich zur Steigerung der Programmeffizienz,
besonders dann, wenn viele Tasks verwendet werden.
Mit Include-Datei
INCLUDE FILE (VAL.PRG)
>300 EXTERN REAL WORK(100)
>310 EXTERN DOUBLE A_SIN,A_COS
FILE1 (MAIN.PRG)
>10 FUNCTION MAIN
>20 EXTERN FUNCTION INIT
>30 ENTRY REAL WORK(100)
>40 ENTRY DOUBLE A_SIN, A_COS
>50 XQT !2 INIT
>60 FEND
FILE2 (INIT.PRG)
>100 FUNCTION INIT
>110 EXTERN REAL WORK(100)
>130 EXTERN FUNCTION DISP
.
.
.
FILE3 (PRI.PRG)
>200 FUNCTION DISP
>210 #include "VAL.PRG"
.
.
.