Re: Why you shouldn't be afraid to use VARCHAR in RPGLE

[Brian Parkins <goodprophet.bp@xxxxxxxxx>]

Marco, can you provide an example? I can't see how that would work, but 
I may be misunderstanding. Please prove me wrong.

Brian.

On 05/12/2025 23:04, Marco Facchinetti wrote:
> Just define e Ds based on the file prior of the varchar definition.
>
> HTH
> --
> Marco Facchinetti
>
> Mr S.r.l.
>
> Tel. 035 962885
> Cel. 393 9620498
>
> Skype: facchinettimarco
>
>
> Il giorno ven 5 dic 2025 alle ore 23:28 DEnglander--- via RPG400-L <
> rpg400-l@xxxxxxxxxxxxxxxxxx> ha scritto:
>
> > Does anyone know how to do something like this:
> >
> > I would like to define a %TRIMmed disk field that is CHAR(200)
> > [PHADDRESS1] as a VARCHAR and eliminate the %TRIMs.
> >
> > So as not to hardcode the size of the VARCHAR, can I define it as VARCHAR
> > but based on the length of the CHAR(200) field? Something like:
> >
> > dcl-s   w_address1      varchar(%len(phaddress1));
> >
> >
> > Can that be done?
> >
> > Thank you,
> >
> > Doug
> >
> >
> >
> > "CONFIDENTIALITY NOTICE:  This e-mail transmission (and/or the attachments
> > accompanying it) contain confidential information belonging to the sender.
> > The information is intended only for the use of the intended recipient.  If
> > you are not the intended recipient, you are hereby notified that any
> > disclosure, copying, distribution or the taking of any action in reliance
> > on the contents of the information is strictly prohibited.  Any
> > unauthorized interception of this transmission is illegal under the law.
> > If you have received this transmission in error, please promptly notify the
> > sender by reply e-mail, and then destroy all copies of the transmission."
> > --
> > This is the RPG programming on IBM i (RPG400-L) mailing list
> > To post a message email: RPG400-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit: https://lists.midrange.com/mailman/listinfo/rpg400-l
> > or email: RPG400-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > at https://archive.midrange.com/rpg400-l.
> >
> > Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
> > questions.