PROG-NAME( ) Programmnamen abfragen

Anwendungsgebiet: Programm-Information

Die Funktion PROG-NAME( ) liefert den auf acht Zeichen abgeschnittenen internen Namen des aktuell geladenen Programms. Wenn der Name eines Bindemoduls aus der Bindemodulbibliothek (OML) geliefert werden soll, werden 0 Zeichen ausgegeben.

Format

PROG-NAME( )

Ergebnistyp

STRING

Eingabeparameter

Keine

Ergebnis

Programmname als String

Fehlermeldung

SDP0435  GEWUENSCHTE INFORMATION NICHT VERFUEGBAR

Beispiel

In einer Prozedur wird das Dienstprogramm LMS gestartet:

/START-LMS

...

Der Programmlauf wird unterbrochen und der Programmname geprüft:

/IF (PROG-NAME( ) = 'LMSSDF')
/   RESUME-PROGRAM
/ELSE
/   ...
/END-IF