You must be logged in to use the copy button.

        
**Free
Ctl-Opt
  Copyright('Copyright JAS, Inc.')
  Option(*SrcStmt :*NoDebugIO)  CCSID(*CHAR:*JOBRUN)
  DftActGrp(*No) DecEdit(*Jobrun) ALWNULL(*USRCTL)
  ActGrp('TEST')
  BNDDIR('JASTOOL');

/define cl_cmd_pr
/copy qProtosrc,jsclCmd

if cl_cmd('OVRPRTF FILE(PRINTER) TOFILE(PRINTER) OVRFLW(60)');
   dsply 'Override Success';
endif;

*Inlr = *on;