|
While testing this; I found that it would be nice in STRDBG if you could F11 on %scan, %len , %siz to see result values of the bifs without moving them out of %replace. Just a thought. :) Thanks Bill Hopkins "M. Lazarus" <mlazarus@xxxxxxxx> Sent by: rpg400-l-bounces@xxxxxxxxxxxx 08/25/2003 03:48 PM Please respond to RPG programming on the AS400 / iSeries To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> cc: Subject: Re: %Len vs. %Size in %Replace Hans, This is targeted to 5.1. It is for a fixed length variable and the only change I made to the code was to switch from %Size() to %Len(). Any other ideas? -mark At 8/25/03 09:15 AM, you wrote: >In this case, when dealing with %LEN(STR) and %SIZE(STR) where STR is a >fixed length character variable, the BIF's should return the same value. >One difference may be that %SIZE() provides a value known at compile time, >which can be used during the relational diagnostics phase. > >On a V5R2 machine, the first code fragment does indeed compile for me. >Looking at the compiler code, I see there were some code changes in V4R4. >So perhaps Mark is targetting a release prior to then? > >Cheers! Hans > > >DeLong, Eric wrote: > >>Mark, the size of the field indicates its defined size (in bytes), but it >>doesn't necessarily mean that the field holds that much data. Varying >>length character fields and double-byte-character-sets really depend on >>interpreting the length of the character string, not the actual number of >>bytes that was reserved by the compiler. >>Eric DeLong >>Sally Beauty Company >>MIS-Project Manager (BSG) >>940-898-7863 or ext. 1863 >> >>-----Original Message----- >>From: M. Lazarus [mailto:mlazarus@xxxxxxxx] >>Sent: Sunday, August 24, 2003 12:58 PM >>To: RPG400-L@xxxxxxxxxxxx >>Subject: %Len vs. %Size in %Replace >> >> Why doesn't %Replace() accept the %Size BIF in the 4th parm? >> This won't compile - it receives "RNF0384 The fourth parameter for >> %REPLACE is not valid." >>ObjectName 10A >>String 80A >>C EVAL String = %Replace( ObjectName : >> String : >> %Scan( 'qqqqqqqqqq': String ) : >> %Size( ObjectName ) ) >> This does compile: >>C EVAL String = %Replace( ObjectName : >> String : >> %Scan( 'qqqqqqqqqq': String ) : >> %Len( ObjectName ) ) >> -mark _______________________________________________ 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.
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.