× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.



I'm not sure why it would matter for finding it, but I would note that I
would usually use ACTGRP(*CALLER) over ACTGRP(*NEW) to improve performance
by not having to create a new activation group all the time.
 

----- Original message -----
From: Steve Richter <stephenrichter@xxxxxxxxx>
Sent by: "MIDRANGE-L" <midrange-l-bounces@xxxxxxxxxxxxxxxxxx>
To: Midrange Systems Technical Discussion
<midrange-l@xxxxxxxxxxxxxxxxxx>
Cc:
Subject: sql function - routine not found when ACTGRP(*NEW)
Date: Tue, Mar 12, 2019 9:36 AM
 
does the activation group of a program matter when creating an SQL
function?

I am getting a "routine not found with specified parameters" error when
using an SQL function, where the program was created with ACTGRP(*NEW).
When I CRTPGM  pgmname  ACTGRP(QILE), the sql function works.

CRTPGM PGM(utl0033MC) ACTGRP(*new)

select   utl_currentUser( ) user
from     sysibm/sysdummy1
Routine UTL0033MC in QGPL not found with specified parameters.

do this and the sql function works:
CRTPGM PGM(utl0033MC) ACTGRP(QILE)

CREATE OR REPLACE FUNCTION utl_currentUser  ( )
RETURNS     char(10)
language cl
external name  qgpl/utl0033mc
parameter style SQL

 PGM        (&curUser &rtnNull &SqlState +
             &function &specific &errmsg)

 dcl        &curUser *char 10
 dcl        &rtnNull *int 2
 dcl        &sqlstate *char 5
 dcl        &function *char 517
 dcl        &specific *char 130
 dcl        &errmsg *char 72

 RTVJOBA    CURUSER(&CURUSER)

 endpgm
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: [1]https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at [2]https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxx for any subscription related
questions.

Help support midrange.com by shopping at amazon.com with our affiliate
link: [3]https://amazon.midrange.com
 

 

References

Visible links
1. https://lists.midrange.com/mailman/listinfo/midrange-l
2. https://archive.midrange.com/midrange-l
3. https://amazon.midrange.com/

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.