RE: DCL array variable in CL

["Paramasivam Murugesan , Gurgaon" <ParamasivamM@xxxxxxxxxxxxxxx>]

fkany,

Pass single Character type value to the CLP, then Pass the same to the RPG
Pgm, there Use  
a data structure to bifurcate your flat field to array elements.

D FRED          DS
D Field1              1 1000 DIM(500)
....
C    *ENTRY    Plist
C              PARM                       FRED

Again, it depends on the Size of the Array. There is a limitation in CL that
you can have a character variable with the length 9999. If your Array is of
size 1000,each element would be of length 10, then this way you can't
proceed.

Thanks
Murugesh




-----Original Message-----
From: Barbara Morris [mailto:bmorris@xxxxxxxxxx]
Sent: Wednesday, July 23, 2003 11:19 PM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: DCL array variable in CL


fkany@xxxxxxxxxxxxxxxxxx wrote:
> 
> 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.
> 

Frank, if the CL just needs to pass on the array parameter, and doesn't
actually need to use the array data, you can define the array parameter
in CL as anything you want.

Parameters are passed to CL by reference, and passed on from CL by
reference, meaning that pointers are being passed around.  If the CL
program isn't ever going to use the parameter value, it doesn't matter
what the CL program thinks the parameter-pointer is pointing at.

(I usually define pass-through CL parameters as char(1), although that
breaks my own rule that says "Never lie to the compiler".)

_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.