midrange.com code scratchpad |
Name:
Use QCMDCHK to screen CALL commands
|
Scriptlanguage:
Plain Text
|
Tabwidth:
4
|
Date:
12/14/2008 04:28:11 am
|
IP:
Logged
|
|
Description:
This program calls QCMDCHK in order to prompt a CALL command and to return the full CALL command string. The PGM() parm is extracted from the string. Both the library and the program names are then extracted. Any programs that shouldn't be called or libraries that shouldn't be accessed can cause an exit. If all is well, QCMDEXC will execute the CALL.
|
Code:
|
|