Recent content by cjkoontz

Don't know what is causing the fantom decimal points, but it appears they can be gotten rid of by explicitly using \#0 after the mergefield name.

Hi. I've got a mail merge doc where almost all the merged numeric fields show decimal points after I perform a mail merge (i.e., "3."). I am using Word 2002, SP3. I am using an Access file to do the mail merge. The numeric fields have zero decimal places. I have other mail merge docs that do...

Might check the DSN, if one is associated. In Access, I linked an as/400 file, using a iSeries Access DSN. On the Server tab, I changed the naming convention to -- SQL naming convention (*SQL) And I got rid of that error.

With the SQL commands: DROP FUNCTION CREATE FUNCTION DROP VIEW CREATE VIEW And the option to specify EXTERNAL objects -- Is there a way to specify a library for each (i.e., CREATE FUNCTION MYLIB/MYFUNC), without having to do it on the CREATE, etc. statements? I see where that you can create...

I know. I value your opinions. Just pointing out what I did. wrkobj pgmrutool/bbrlststs shows -- Object Type Library Attribute BBRLSTSTS *SRVPGM PGMRUTOOL RPGLE BBRLSTSTS *MODULE PGMRUTOOL RPGLE Which I created with CRTSQLRPGI (for the *module) and CRTSRVPGM...

Thanks for the reply. I think my WRKOBJ logic was right. I created a few other SQL functions that were SQL-based and the objects that were created were service programs based on the name used on the CREATE FUNCTION command. I'm pretty sure the entry point is correct. I mean, would the...

This is weird. I created the following function in STRSQL: CREATE FUNCTION PGMRUTOOL/BBFLSTSTS (APPYER DECIMAL(2,0), APPNBR DECIMAL(8,0)) RETURNS CHAR(60) LANGUAGE RPGLE NOT...

I think you're right, Mercury2. I walked through this stuff with IBM, just a bit ago, and I changed the prototype parameters to packed fields, and the SELECT for F1 worked. (Through debug I could see the values being passed.)

Thanks. But under debug -- Fl( DEC(x.bppyer), DEC(x.bppcnb) ) - and - Fl( DEC(x.bppyer,2,0), DEC(x.bppcnb,8,0) ) Still pass along garbage data to P1.

Thanks for the replies. Unfortunately, I get the following message: NUMERIC in *LIBL type *N not found.

Thanks. I did do that. I debugged P1 running under the service job for the SQL function. I see what's going on -- the parameters coming into the procedure are being filled with garbage. (Does that somehow have to do with the return value on the procedure interface?)

Rats, you're right. The SQL select statement should read: select x.bppyer, x.bppcnb, Fl(x.bppyer, x.bppcnb) from bplib/bp300ap x where x.bppyer = 05 and x.bppcnb = 71 I don't see an SQL msgid, but rather a message at the bottom of finished statement in STRSQL that reads as...

Sorry for the bother. I have an SQLRPGLE based service program that "works" when called from an RPGLE based program, but when the same service program is wrapped in an SQL function, then used within STRSQL it fails with a data decimal error. I don't know how much info would be sufficient...

Thank you so much for your timely reply. The usage of the char function (i.e., Select bbfappsts(CHAR('XX')) ) works! I will keep your other pointers in mind.

Racking my brains on this (would be most greatful for the help): Created an AS/400 SQL function that I created from an RPGLE service program, but when I go to run the function through a select, I get the following error -- BBFAPPSTS in *LIBL type *N not found The function was created from the...