RE: RPGV?

Dennis,

That's easy:

D MyInt s 10i 0
D MyZoned s 10s 0
D MyAlpha s 10a Inz( '01234567' )

/Free
MyInt = %Int( MyAlpha ) ;
MyZoned = %Int( MyAlpha ) ;
/End-Free

That might be a simpler function to perform, but there's plenty of precedent.


-mark

At 1/11/10 01:10 PM, you wrote:

> BIF's are not subject to the lack of overloading support in
> RPG. Plus, this would just expand what is allowed as the result of
> the operation. Since this functionality is already part of the fixed
> format opcode, the hard part has already been done!

Really? What makes you say that? Can you show me an example of this? What
%BIF returns different data types depending upon how it is used? 'Cuz I
cannot think of any like that.

> I'm curious as to why the free format version is restricted to a
> numeric variable, instead of allowing an array as the result.

I suspect (and "suspect" is a keyword here) that the difference lies in the
fact that one is a *Function*, falling under the rules and conditions of
function definitions, and the other is an operation code, which might, by
its very nature, have much more "open" rules.


Dennis Lovelady
http://www.linkedin.com/in/dennislovelady
--
"A closed mouth gathers no flies."
-- French Proverb"A closed mouth gathers no feet."
-- American Proverb