Re: How to call cmd runqry from RPG with QCMDEXEC

[nhdennis@xxxxxxxxxxx via MIDRANGE-L <midrange-l@xxxxxxxxxxxx>]

E specs were used for array processing in RPG, RPG II, RPG III and RPG400. You may need to look up 'array processing'. 
 Do you recall using arrays and indexing? 
I guess much is lost in old memory :-) 

Norm Dennis 


----- Reply message -----
From: "Booth Martin via MIDRANGE-L" <midrange-l@xxxxxxxxxxxx>
To: "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
Subject: How to call cmd runqry from RPG with QCMDEXEC
Date: Sat, May 17, 2014 03:47


I do not remember an "E" spec nor could I find  any reference material for it.  I am suspicious that there is some thing in that line that is not doing what you believe it is doing.

I would be more comfortable with a line like:
  D  M                         S 80A                            DIM(2) PERRCD(1)  CTDATA


On 5/16/2014 10:42 AM, gio.cot via MIDRANGE-L wrote:
> Hi
>
> here my problem with an example :
>
>                                       >       E                    M       1   2 80
>       C*
>       C                     Z-ADD80        LUNG   155
>        *
>       C                     CALL 'QCAEXEC'
>       C                     PARM           M,1
>       C                     PARM           LUNG
>        *
>       C                     CALL 'QCAEXEC'
>       C                     PARM           M,2
>       C                     PARM           LUNG
>        *
>       C                     SETON                     LR
> **
> RUNQRY    QRY(QCUST) RCDSLT(*YES)
> RUNQRY    QRY(QGPL/QCUST) RCDSLT(*YES)
>
> the first CALL QCAEXEC run fine, the second go on thi error: ( the RUNQRY
> with library name seem is not allowed !!??)
>
> ID message. . . . . :   CPD0104
>
> Date ............. . . . :   16/05/14 time . . . . :   17:29:16
>   >
> Message. . . :   Expression not allowed for the parameter QRY.
>   >
> Cause. . . . . :  The expressions are allowed only a program CL. The
>    expressions cannot interactively be performed in a flow of
>    immission batch, from the program of the applications using the key F4 or
> using
>    an automatic application from a program CL.
>
> Correction. . . :   To introduce a valid value for this parameter. For
>
>    further information on the parameters and the expressions, to consult the
> manual
>    CL Reference.
>
>   >
>   >
>   >
>   <http://www.code400.com/forum/editpost.php?p=75936&do=editpost> Edit /
> Delete
>
>   >