RE: New Stuff W/Biggest Impact

["Bartell, Aaron L. (TC)" <ALBartell@xxxxxxxxxxxxxx>]

Great question!
The things that I love the most are the BIF's. My favorite:
%editc(NumericVariable:'editcode')
For example.  I do a lot of programming where I need to output a string of
data but I don't want to have to MOVE numeric variables to a character field
before I append it in a character string.  Now it is a ton easier! Look . .
.

D CharStr       S        50
D TotRecs       S         5  0

C              EVAL      CharStr = CharStr + 'Total Records processed: ' +
%editc(TotRecs:'Z')

I also use %trim a lot.
D CtyStZip      S        50
D Cty           S        20   inz('Mankato             ')        
D St            S         2   inz('MN')
D Zip           S        10 0 inz(56001     )

C              EVAL       CtyStZip = %trim(Cty) + ' ' + St + ' ' +
%editc(Zip:'Z')   

I am not exactly sure when these BIF's became available but I doubt they
were in V3R2 so I hope this is helpful.  I want to start utilizing the %eof
and %found but since some of our companies aren't up to date on versions
that is not possible. 

Aaron Bartell(no warranty on the above code.  It was off the top of my
head.)

-----Original Message-----
From: Jeff Crosby [mailto:jlcrosby@fwi.com]
Sent: Friday, January 05, 2001 6:50 AM
To: RPG400-L@midrange.com
Subject: New Stuff W/Biggest Impact


I'm doing a CISC (V3R2) to RISC (V4R5) upgrade this weekend.

I know in RPG there are what seem to be a bazillion new things.  There
is no way for me to absorb them all at once.  There are new BIFs,
integer variables, and who knows what else (I do use procedures, BTW, as
they were in V3R2).  For those of you already at V4R4 or V4R5, what RPG
improvements made the biggest impact for you?  I just want some
suggestions on what to learn first.  And second.  And third.  Thanks.

-- 
-Jeff
The opinions expressed are my own and not necessarily 
the opinion of my company.  Unless I say so.
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---