RE: Parameters passed not what is received

With options(*VARSIZE) the compiler won't complain if you pass a 30a
varying variable in that position.

Not sure that options(*VARSIZE) makes a whole lot of sense for a I/O
varying parameter for an external program since I don't see another
parameter that might contain the length of the *VARSIZE one.  If it was
a bound procedure, the called procedure could be using operation
descriptors and the CEEDOD API to determine the actual length (30a for
instance) passed in.

Maybe it makes sense if the output is never any bigger than the input.

HTH,

Charles Wilt
--
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
  

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx 
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Lim Hock-Chai
Sent: Wednesday, October 25, 2006 3:09 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Parameters passed not what is received

I've never declare a parameter with both varying and options(*varsize)
keywords.  What is the purpose/benefit of declaring parameter that a
way.
 
     d                               40a   Varying Options(*VarSize)

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of
Rick.Chevalier@xxxxxxxxxxxxxxx

Prototype from submitted program:
     d LO1800R         pr                  ExtPgm('LO1800R')

     d                                3a

     d                               15a   Const

     d                               10a   Const

     d                               10a   Const

     d                               40a   Varying 

Options(*VarSize)

     d                              128a   Varying

     d                                     Options(*Nopass :*Omit
:*VarSize)
     d                              128a   Varying

     d                                     Options(*Nopass

:*VarSize)

-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) 
mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.