[cadeado]

;cadastrar senha cadeado

exten =>_*80xxxx,1,NoCDR()
exten =>_*80xxxx,n,GoToIf(${DB_EXISTS(CADEPASS/${CALLERID(num)})}?no:yes)
exten =>_*80xxxx,n,Hangup
exten =>_*80xxxx,n(yes),Set(DB(CADEPASS/${CALLERID(num)})=${EXTEN:2})
exten =>_*80xxxx,n,Wait(1)
exten =>_*80xxxx,n,Playback(progregistrada)
exten =>_*80xxxx,n(no),Hangup()

;trocar senha cadeado

exten =>_*81xxxxxxxx,1,NoCDR()
exten =>_*81xxxxxxxx,n,GoToIf($["${DB_EXISTS(CADEPASS/${CALLERID(num)})}" = "${EXTEN:2:4}"]?yes:no)
exten =>_*81xxxxxxxx,n(yes),Set(DB(CADEPASS/${CALLERID(num)})=${EXTEN:6})
exten =>_*81xxxxxxxx,n,Wait(1)
exten =>_*81xxxxxxxx,n,Playback(beep)
exten =>_*81xxxxxxxx,n,Playback(beep)
exten =>_*81xxxxxxxx,n,Playback(progregistrada)
exten =>_*81xxxxxxxx,n(no),Hangup()

;colocar cadeado

exten =>_*82xxxx,1,NoCDR()
exten =>_*82xxxx,n,Set(SENHA=${DB(CADEPASS/${CALLERID(num)})})
exten =>_*82xxxx,n,NoOp(${SENHA})
exten =>_*82xxxx,n,GotoIf($["${SENHA}" = "${EXTEN:2}"]?yes:no)
exten =>_*82xxxx,n(yes),Set(DB(CADEADO/${CALLERID(num)})="y")
exten =>_*82xxxx,n,Wait(1)
exten =>_*82xxxx,n,Playback(beep)
exten =>_*82xxxx,n,Playback(progregistrada)
exten =>_*82xxxx,n(no),Hangup()

;retirar cadeado

exten =>_*83xxxx,1,NoCDR()
exten =>_*83xxxx,n,Set(SENHA=${DB(CADEPASS/${CALLERID(num)})})
exten =>_*83xxxx,n,NoOp(${SENHA})
exten =>_*83xxxx,n,GotoIf($["${SENHA}" = "${EXTEN:2}"]?yes:no)
exten =>_*83xxxx,n(yes),Set(${DB_DELETE(CADEADO/${CALLERID(num)})})
exten =>_*83xxxx,n,Wait(1)
exten =>_*83xxxx,n,Playback(beeperr)
exten =>_*83xxxx,n,Playback(progregistrada)
exten =>_*83xxxx,n(no),Hangup()


Obs.: Esse é como estar no meu extension... Funciona perfeitamente.

Dúvidas: marciogreike@yahoo.com.br