3.50 PEXEC - externes Programm ausführen
| | | | | |
Format:
CALL PEXEC USING Programm.
| |
| | | |
Mit PEXEC kann ein beliebiges Programm aus dem Cobolprogramm heraus aufgerufen werden. Der Name bzw. Pfad des Programms befindet sich in dem Feld Programm.
Im Unterschied zu TEXEC wird hierbei die Linkage-Section übergeben wobei das gerufene Programm eine identische Linkage- Section besitzt.
Das angegebene Programm wird zur Ausführung gebracht und die Linkage-Section entsprechend verändert.
Alle Files bleiben geöffnet.
Nach Beendigung des aufgerufenen Programms wird das aktuelle Programm wieder fortgesetzt.
Beispiel:
Inhalt von pexec.cob:
identification division.
data division.
linkage section.
01 tfeld pic x(10).
01 retval pic x(10).
procedure division.
move 'tfeld' to tfeld.
move 'retval' to retval.
display 'In pexec: '.
call getchar.
call pexec using 'pexec1.exe' tfeld retval.
display 'Zurück in pexec'.
call getchar.
Inhalt von pexec1.cob:
identification division.
data division.
linkage section.
01 tfeld pic x(10).
01 retval pic x(10).
procedure division using tfeld retval.
display 'In pexec1: tfeld: ' tfeld ' retval: ' retval.
call getchar.
move all 'x' to tfeld.
move 'Ok' to retval.
Siehe auch: TEXEC EXECBACKGROUND DOM PDOM SHELL DOMCM DOMST
Zurück zu PDOM - Befehle ausführen
Hoch zu Funktionslibrary
Weiter zu PNDOM: Ausführung von MSDOS-Befehlen ohne Echo
|