To execute the CL commands from an ILE RPG program, use a prototype to call the QCMDEXC program. This program requires two parameters. The first parameter is of type Character, and this will be the command you wish to execute. The second parameter will be of length 15 with 5 decimal places. By using the %Size function you do not need to hard code the command length.
** The below prototype is used call the QCMDEXC system program DQCmdExc PR ExtPgm('QCMDEXC') D Cmd 1024A Options(*Varsize) Const D CmdLen 15P 5 Const In your 'C' specs: CallP QCmdExc('
' : %size('command string'))
This was first published in June 2001