Re: RPGIV inconsistancies.

[David Morris <dmorris@xxxxxxxxxxxxx>]

Han,

It would be great if it just worked.  The operational descriptors do work for 
%subst CONST parameters, so I just assumed they would work in all cases.  The 
Rochester people really should spend some time making operational descriptors 
work for all types of fields.  I have spent many hours coding around the 
limited support for parameterized types that OPDESC provides.  The support that 
is there is still lots better than nothing.

Thanks,

David Morris


>>> Hans Boldt <boldt@ca.ibm.com> 07/06 7:06 AM >>>
>David wrote:
>Can anyone tell me why %subst is not treated consistantly?  %subst only works
>with contiguous storage and it seems should be allowed anywhere that the first
>argument could be used.  For example, the following works:

>EVAL %subst(fld: 1: 1) = 'A'

>Why can't I use %subst(fld: 1: 1) for a parm that is passed by reference?
>Isn't that functionally equivalent?  It seems like this could work.  I am
>asking because if I pass a *varsize field by reference I cannot get the
?length unless I pass the length as a separate parameter.


Hi David!  Well, most of us here are back again after an
extra long weekend.

It would, of course, be easy to allow %SUBST as a reference
parameter.  But, it looks like you want the length to be
passed as well.  You want to be able to pass, say, a 1 char
substring where the procedure expects a char 10 and have the
procedure see or change only the 1 char?  Is that correct?
That would not be easy to implement.

I suppose what we really need is some improvement to
operational descriptors, but I haven't seen any hint that
Rochester is doing anything to help.

Or if you're on V4R2, you could try the character varying
data type.

Cheers!  Hans

Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com 

                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                                                                                
                       
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the RPG/400 Discussion Mailing List!  To submit a new         *
* message, send your mail to "RPG400-L@midrange.com".  To unsubscribe   *
* from this list send email to MAJORDOMO@midrange.com and specify       *
* 'unsubscribe RPG400-L' in the body of your message.  Questions should *
* be directed to the list owner / operator: david@midrange.com          *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *