|
If you're going to pick nits - I'd drop the eval Rob Berendt -- "They that can give up essential liberty to obtain a little temporary safety deserve neither liberty nor safety." Benjamin Franklin "James W. Kilgore" To: rpg400-l@midrange.com <qappdsn@attgloba cc: l.net> Fax to: Sent by: Subject: Re: RPG /free rpg400-l-admin@mi drange.com 03/14/2002 12:32 PM Please respond to rpg400-l Aaron, I kind of like to read: (hope the email automatic wrapping doesn't screw this up <g>) But then again, this all just a matter of taste. No right or wrong. > For instance: > > If a = b > dow *in90 > if java = 'slow' > select > when slow = 'reallyslow' > eval Variable = %trim(%char(Custno) + ':' + %trim(CustFName) + %trim(CustLName) > endsl > endif > enddo > EndIf > _______________________________________________ This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list To post a message email: RPG400-L@midrange.com To subscribe, unsubscribe, or change list options, visit: http://lists.midrange.com/cgi-bin/listinfo/rpg400-l or email: RPG400-L-request@midrange.com 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.