Generic selectors
Exact matches only
Search in title
Search in content

Tcl IVR Help

Viewing 1 post (of 1 total)
  • Author
    Posts
  • #31485 Reply
    Mehdi
    Guest

    Hi’ everyone
    I wrote a Tcl script for our company and it works good. I have a AS5350 that athenticate with Radius server. my script works like debitcard. when user press Pound(#) key for 1 second it disconnect the call and propmt user to press new destination number. but i want it to first say the remaining Credit and then prompt for destination.
    —-
    some parts of my script is:
    proc act_LongPound { } {

    if {[infotag get evt_digit] != “#”} {
    fsm setstate same_state;
    return;
    }

    set duration [infotag get evt_digit_duration];

    if {$duration < 300} { fsm setstate same_state; return; } connection destroy con_all; return; } proc act_ConnDestroyed { } { global pound; global account; global pass; leg disconnect leg_outgoing; set pound 1; init_perCallVars; act_GetDestination; fsm setstate DESTSELECTION; # aaa authorize $account $pass "" "" leg_incoming; # fsm setstate AUTHORIZE; return; } ----------- when I replace the commented lines with their above line the radius didnot authenticate. I'll glad if someony can help me. Mehdi Es.

Viewing 1 post (of 1 total)
Reply To: Tcl IVR Help
Your information:




<a href="" title="" rel="" target=""> <blockquote cite=""> <code> <pre class=""> <em> <strong> <del datetime="" cite=""> <ins datetime="" cite=""> <ul> <ol start=""> <li> <img src="" border="" alt="" height="" width="">