RE: Help with call command QCMDEXC

["Jim Wiant" <Jim.Wiant@xxxxxxxxxxxxxxxx>]

QCMDEXC also requires an argument for the length of the command you want
to execute. It needs to be defined as a 15 5 packed field. The contents
of that field need to be the length of the command string.
So something like

Cmd         S      128A   Inz('<your command here')
CmdLen      S       15  5 

Eval CmdLen = %Len(%Trim(%Cmd))
Call QCMDEXC
        Parm            Cmd
        Parm            CmdLen

I think that should help

JPW

 

The bitterness of poor quality remains long after low pricing is
forgotten! 

 

Cautillo, Leon M.



-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Willie J. Moore
Sent: Thursday, 16 March 2006 8:37
To: rpg400-l@xxxxxxxxxxxx
Subject: Help with call command QCMDEXC


I have a program that I want to use the 'QCMDEXC' command.
When I try to call it I get the following error:
 "Cannot resolve to object qcmdexc. Type and Subtype X'0201' Authority
X'0000'."

Here is a copy of the program:
Dparms            DS                                                
Dcmd                      1    255                                  
 /free                                                              
       cmd = 'RNM OBJ(''/pdf/2.pdf'') NEWOBJ(''test.pdf'')';        
 /end-free                                                          
C                   call      'qcmdexc'                             
C                   PARM                    cmd                     
C                   seton                                        lr 

Any help or pointers would be appreciated.

William Moore....