Re: Where to post ideas for RPG

On 16-Aug-2016 06:11 -0700, Mark Murphy/STAR BASE Consulting Inc. wrote:

I have added two new RFE's for your consideration:

[http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=93114]
[http://www.ibm.com/developerworks/rfe/execute?use_case=viewRfe&CR_ID=93115]

These are to add new BIF's to RPG:
93114 is for %min(fld1: fld2: ...) and %max(fld1: fld2: ...)
93115 is for %right(str: int) and %left(str: int)

Yes I could write my own procedures for %max and %min, but I could
not write one max or min procedure to handle all cases, and the BIF
equivalent of %right using %subst is a bit convoluted. %min, %max,
%right, and %left are more readable, thus more maintainable, and
generic enough that they should be part of the language.

Seems easy enough, to just code those using SQL [shown without any error checking]:

exec SQL
set :min_Val = min( :fld1, …, exp_n, …)
;
exec SQL
set :max_Val = max( :fld1, …, exp_n, …)
;
exec SQL
set :str_Suffix = right( :str , :int_exp )
;
exec SQL
set :str_Prefix = left ( :str , :int_exp )
;