I am receiving the error:

Exception Other: ORA-06502: PL/SQL: numeric or value error

My CGI script in part looks like :

    $dbh=MyConnect($instance,$database);
    my $security='69';
    my $sth=$dbh->prepare(
        'BEGIN
        My_LOGON(:Security_Level);
        END;')
        or dienice ('Failed at:' . __LINE__ . ' w/error:' . $dbh->errstr);
    $sth->bind_param_inout(":Security_Level", \$security, 256)
;
    $sth->execute()
        or dienice ('Failed at:' . __LINE__ . ' w/error:' . $dbh->errstr); #
<=== Line 46 

... $securty contains the error message above...

My Oracle procedure looks like :

PROCEDURE              My_LOGON
        (Security_Level IN OUT VARCHAR2)
IS      

   -- security variables
   message_str                    varchar2(500) default NULL;
   regis_user_id_str              varchar2(10) := www_security.get_user_id;
   int_security_level_str         number(2) := 0;
BEGIN
-- ************************* --
-- SECURITY HANDLER          --
-- ************************* --

   message_str := check_session(96, 5);
   Security_Level:=substr(message_str,1, 25);
/*
   IF message_str = 'denied'
   THEN
   Security_Level := '0';
   END IF;
*/   
/*   
-- ************************* --
-- INTERNAL SECURITY ACCESS  --
-- ************************* --
   int_security_level_str := f_sec_level(regis_user_id_str);
   Security_Level := int_security_level_str;
*/
--    Security_Level:='99';   
EXCEPTION
   WHEN OTHERS THEN
   Security_Level := 'Exception Other: ' || SQLERRM;
END; -- Function LOGON


Any help or suggestions will be greatly appreciated...

John W Moon

State Technology Office
1255 S Main St.
Georgetown, Tx 78626

email: [EMAIL PROTECTED]
phone: (512) 868-8874

Reply via email to