Re: SQL UDF From RPG Program

As someone indicated, use a varchar instead of Char for all character fields
and code your program to receive varying parameters.

Look at www.think400.dk/downloads.htm under iDate. It is a complete example
using UDF's with multiple type of parameters, varchar, integer, decimal,
etc.

On Tue, Jun 30, 2009 at 8:47 AM, <MattLavinder@xxxxxxxxxxxxxxxxxxx> wrote:

What error are you getting and when are you getting it?

The message was "GETZIPDIST in DMIPGMS type *N not found". I finally
managed to get when the function working via a service program call. My
problem was the literal value I was passing in my call to the function.

The following code doesn't work:

SELECT ZIPCODE FROM ZIPCENTER WHERE GETZIPDIST(ZIPCOD, '12345') <= 25

But this code DOES work:

SELECT ZIPCODE FROM ZIPCENTER WHERE GETZIPDIST(ZIPCOD, CHAR('12345')) <= 25

I haven't had much experience with SQL UDF's on IBM i, so maybe the
external UDFs won't play well with literal values. Using the CHAR function
isn't a big deal, but out of curiosity, is there a way to define the UDF so
the literal would be accepted without casting it?



______________________________________________________________________
This email has been scanned by the MessageLabs Email Security System.
______________________________________________________________________
--
This is the RPG programming on the IBM i / System i (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.