Blocking Calls using TCL scripting

[cdnadmin]

This document was generated from CDN thread

Created by: ADRIAN PRIDDIN on 13-07-2010 02:45:50 PM
I am looking for a way to block incoming calls on a PRI before handing allowed calls to CUCM processing.
I need to be able to
1. All incoming calls on the PRI that have a 5 digit calling number are passed normally.
2. Incoming calls on the same PRI that have any 7 digit calling number will only be allowed to specific called numers. Calls to non allowed numbers are dropped.
 
I currently acheive this using translation-rules but I am limited to only 15 entries and need more...SO a an easy way of adding more would also be useful...

Subject: RE: Blocking Calls using TCL scripting
Replied by: Yaw-Ming Chen on 13-07-2010 04:56:11 PM
Hi,
 
yes, it looks like you can use Tcl IVR API to do this.
 
1. Have a dial-peer that take 5 and 7 digits for applying Tcl application (your script)
2. get calling number -> set ani [infotag get leg_ani], find out the length of calling number
   (for called number use infotag get leg_dnis)
3. for 5  digits calling numbef just do call setup
4. for 7 digits check aganist "allow list", if called number is in the list then dp call setup else disconnect the call (may play a message before drop the call)
 
Thanks !

Subject: RE: Blocking Calls using TCL scripting
Replied by: ADRIAN PRIDDIN on 16-07-2010 01:15:00 PM
Just wondering if you (or anyone else ) have any code that will do the job
 

Hi,
 
yes, it looks like you can use Tcl IVR API to do this.
 
1. Have a dial-peer that take 5 and 7 digits for applying Tcl application (your script)
2. get calling number -> set ani [infotag get leg_ani], find out the length of calling number
   (for called number use infotag get leg_dnis)
3. for 5  digits calling numbef just do call setup
4. for 7 digits check aganist "allow list", if called number is in the list then dp call setup else disconnect the call (may play a message before drop the call)
 
Thanks !

Subject: RE: Blocking Calls using TCL scripting
Replied by: Yaw-Ming Chen on 16-07-2010 02:49:14 PM
Sorry, I don't have any and I haven't seen any which matchs your scenario.
 
Thanks,
 
Yawming

Subject: RE: Blocking Calls using TCL scripting
Replied by: paolo bevilacqua on 18-07-2010 12:11:17 PM

Just wondering if you (or anyone else ) have any code that will do the job

 
I wrote code to do that. You can contact me at the address present in my profile to acquire it.