RE: DCL array variable in CL

[qsrvbas@xxxxxxxxxxxx (Tom Liotta)]

Frank:

There shouldn't be any problem doing this as long as the variable you DCL in 
your CL program is large enough. If your array takes 500 bytes, then DCL the 
parm variable to *CHAR len(500).

Whether or not you issue the OVRPRTF in an external wrapper or internal to the 
RPG program might depend on your design requirements. I probably wouldn't have 
a function such as this OVRPRTF internal because that's normally a control 
function, unrelated to the business logic. ("...normally...", not absolutely.)

I rarely see a need to use such an override, i.e., to a different *outq, from 
within a compiled business-logic program because the application environment 
ought to handle it. I'd only override when the normal environment needs to 
be... ummmm... overridden -- and that's an external function.

Tom Liotta

midrange-l-request@xxxxxxxxxxxx wrote:

>  10. DCL array variable in CL (fkany@xxxxxxxxxxxxxxxxxx)
>
>Is it possible to define an array variable in a CL program?  I have an RPG
>program that receives parms(some parms are arrays) and generates a couple
>reports.  I want to call a CL program that will OVRPRTF the generated
>reports to an OUTQ, but I need to pass the array parms into the CL so that
>it can execute the RPG program.  I've looked in my CL book and CL
>programming.pdf's but can't find anything on defining an array.  I'm trying
>to pass arrays defined as character.  I asked a co-worker and they said
>something about breaking the array up into fields and passing the all the
>new fields.  We're at V5R2.

-- 
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788 x313
Fax    253-872-7904
http://www.powertechgroup.com


__________________________________________________________________
McAfee VirusScan Online from the Netscape Network.
Comprehensive protection for your entire computer. Get your free trial today!
http://channels.netscape.com/ns/computing/mcafee/index.jsp?promo=393397

Get AOL Instant Messenger 5.1 free of charge.  Download Now!
http://aim.aol.com/aimnew/Aim/register.adp?promo=380455