Invoke ISPF services that use CALL ISPEXEC format.
Restriction: This topic applies only when the AppMaster Builder AddPack has been installed, and applies only to Windows platforms.
Syntax:
DLG-ISPEXEC commandproceduresyntax
General Rule:
- Data field DLG-ISPEXEC-RC contains the return code after the call execution.
Parameter:
commandproceduresyntax
|
Syntax for call executed in Command Procedure (CLIST) format.
|
Example:
Use the CONTROL service to disable the user's split screen capability.
DLG-ISPEXEC CONTROL SPLIT DISABLE
IF DLG-ISPEXEC-RC = 8
/* SPLIT SCREEN ALREADY DISABLED
TRUE SPLIT-SCREEN-DISABLED
ELSE-IF DLG-ISPEXEC-RC = 0
/* SPLIT SCREEN DISABLED
TRUE SPLIT-SCREEN-DISABLED
Define an application message library to search before the default message library.
DLG-ISPEXEC LIBDEF ISPMLIB DATASET
ID('ABC.DEF.ISPMLIB')
IF DLG-ISPEXEC-RC = 0
/* OK
ELSE
DISPLAY '??? LIBDEF ISPMLIB ERROR, RC = ' DLG-
ISPEXEC-RC
Invoke a command procedure to allocate application files.
DLG-ISPEXEC SELECT CMD(%ALOCFILE ALLOC)
IF DLG-ISPEXEC-RC = 0
/* OK
ELSE
DISPLAY '??? ALOCFILE ERROR, RC = ' DLG-
ISPEXEC-RC