Re: passing IN parameter to stored procedure

Oops - my bad - I copied the cursor declaration wrong. I corrected it and it compiled but I do not get any results: 15:26:01 Box:[NT000137]Database:[SKAALE3]User:<SYS>create or replace function web_security.TestGetWebSecRoles(APP_NAME IN VARCHAR2,
15:54:09 2
USER_GRPS IN VARCHAR2)

15:54:09   3    return VARCHAR2 is
15:54:09   4    SEC_ROLES  VARCHAR2(20);
15:54:09   5    v_roleid VARCHAR2(30);
15:54:09   6
15:54:09   7    CURSOR c1 IS
15:54:09   8      SELECT roleid
15:54:09   9        FROM WEBSEC_USERS_VW
15:54:09  10       WHERE WEBSEC_USERS_VW.APPNAME = APP_NAME AND
15:54:09  11             WEBSEC_USERS_VW.USERNAME IN (USER_GRPS)
15:54:09  12       ORDER BY ROLEID;
15:54:09  13
15:54:09  14  begin
15:54:09  15
15:54:09  16    OPEN c1;
15:54:09  17    LOOP
15:54:09  18      FETCH c1
15:54:09  19        INTO v_ROLEID;
15:54:09  20      EXIT WHEN c1%NotFound;
15:54:09  21      SEC_ROLES := SEC_ROLES || v_roleid || ',';
15:54:09  22    END LOOP;
15:54:09  23    CLOSE c1;
15:54:09  24    SEC_ROLES := SEC_ROLES || '99';
15:54:09  25    return(SEC_ROLES);
15:54:09  26  end TestGetWebSecRoles;
15:54:09  27  /

Function created.

15:55:31 Box:[NT000137]Database:[SKAALE3]User:<SYS>select web_security.testGetWebSecRoles('SYSSUPPORT','OAK\i48071,OAK\ 87552') from dual;

WEB_SECURITY.TESTGETWEBSECROLES('SYSSUPPORT','OAK\I48071,OAK\I87552')

99 Received on Wed Aug 10 2005 - 14:59:07 CDT