(RADIATOR) writing my postauthhook

[Frank Danielson]

I believe that SessionTimeout should be an integer value. 4502.5 will need
to be rounded off to an integer like 4503 or 4502.

Frank Danielson
Infrastructure Architect

ClearSky Mobile Media
56 E. Pine St.
Orlando, FL 32801
USA

fdanielson at csky.com

-----Original Message-----
From: Rosario Pingaro [mailto:rpingar at nesec.it]
Sent: Friday, June 24, 2005 9:21 AM
To: radiator at open.com.au
Subject: (RADIATOR) writing my postauthhook


I am writing my postauthhook to handle a prepaid service.

But I get an error when try to set the Session-Timeout value.
This is the error:
Fri Jun 24 15:06:08 2005: ERR: There is no value named 4502.5 for attribute
Session-Timeout. Using 0.


This is my pl file:
sub
{
my $p = ${$_[0]};
my $rp = ${$_[1]};
my $result = ${$_[2]};

my $credit;
my $sessiont;
my $user;
my $route;


$credit = $rp -> get_attr('cisco-h323-credit-amount');
$user = $p-> get_attr('Calling-Station-Id');
$route= $p-> get_attr('Called-Station-Id');

     if ($p->code eq 'Access-Request') {
        &main::log($main::LOG_DEBUG, "CREDITO  = $credit");
        &main::log($main::LOG_DEBUG, "UTENTE  = $user");
        &main::log($main::LOG_DEBUG, "CHIAMATO  = $route");
        $rp -> delete_attr('cisco-h323-credit-amount');


        #trasformazione di prova
        $sessiont=$credit*5;

        $rp-> change_attr('Session-Timeout', $sessiont);

    }
    return;
}


what is the problem?

thanks
Rosario

--
Archive at http://www.open.com.au/archives/radiator/
Announcements on radiator-announce at open.com.au
To unsubscribe, email 'majordomo at open.com.au' with
'unsubscribe radiator' in the body of the message.