13 Prozedurvariable

Eine Variable kann auch eine Referenz auf eine Prozedur sein, also vom Typ PROCEDURE sein. Dazu wird als Datentyp das Schlüsselwort PROCEDURE gefolgt von einer öffnenden Klammer, den Datentypen der Parameter und einer schließenden Klammer. Hat die Prozedur keine Parameter, so werden dennoch die Klammern angegeben.

Bsp.:

VAR
   p,q : PROCEDURE(INTEGER);
   r : PROCEDURE();
   s : PROCEDURE(REAL):REAL;

Prozedurvariable könenn einander zugewiesen werden, sie können aber auch auf den Wert eier Prozedur gesetzt werden.

Bsp.:

PROCEDURE a(x:INTEGER)
BEGIN
   WriteInt(x,10);
END a;

BEGIN
   p := a;
   q := p;
   ...

Die Prozedur, die einer Prozedurvariablen zugewiesen wurde, kann über diese Variable auch wieder aufgerufen werden oder aber als Parameter an andere Prozeduren übergeben werden.

Bsp.:

BEGIN
   p(10);
   ...

Dadurch ergibt sich die Möglichkeit, an eienr zentralen Stelle in einer Abfrage eine Prozedurvariable entsprechend zu setzen und im restlichen Programm mit dieser Variable ohne weitere Abfragen zu arbeiten.

English version not yet available.