hello!!!
What I am doing wrong here??? Any help would be appreciated!!!

----SAMPLE CONFIG FILE----
Trace 4
AuthPort 1812
AcctPort 1813
LogDir c:\Radiator3.6\dump
DictionaryFile ./dictionary
UsernameCharset [EMAIL PROTECTED]
LogFile %L/%Y-%m-2logfile.log

DefineFormattedGlobalVar dbSourceODBC tas_sys
DefineFormattedGlobalVar dbSourceOracle tas
DefineFormattedGlobalVar dbUsername xxx
DefineFormattedGlobalVar dbAuth xxx

<Client localhost>
Secret mysecret
DupInterval 300
</Client>

<SessionDatabase SQL>
DBSource dbi:Oracle:tas3
DBUsername xxx
DBAuth xxx
AddQuery        insert into RADONLINE (username,code) values ('%n','000')
</SessionDatabase>

<Handler>
<AuthBy PLSQL>
        NoDefault
        DBSource dbi:Oracle:tas
        DBUsername %{GlobalVar:dbUsername}
        DBAuth %{GlobalVar:dbAuth}
        AuthBlock  begin \
               tasradius.sp_Auth2('%n',:sReturnValue); \
               end;
        AuthParamDef :sReturnValue,User-Password,Check
</AuthBy>
</Handler>

----END OF SAMPLE CONFIG FILE ---

-----STORED PROCEDURE ---------
CREATE OR REPLACE package tasradius
is
type Cursors is ref cursor return radreturn%rowtype;
procedure sp_Auth2(sUsername in varchar2,sReturn out tasradius.Cursors);
end tasradius;

procedure sp_Auth2(sUsername in varchar2,sReturn out tasradius.Cursors)
is
begin
open sReturn for select password from authenticationtable_000 where username='test';
exception
    when others then
                 null;
end sp_Auth2;
end tasradius;
----- END OF STORED PROCEDURE ---------

Regards
Hakim
===
Archive at http://www.open.com.au/archives/radiator/
Announcements on [EMAIL PROTECTED]
To unsubscribe, email '[EMAIL PROTECTED]' with
'unsubscribe radiator' in the body of the message.

Reply via email to