setting random callerid

Easy Hard Way
[rand-cid]
exten=>_x.,1,Noop(Let's change  cid ${CALLERID(num)})
same=>n,Set(cid=${RAND(1000,9999)})
same=>n,Set(area=${EXTEN:1:6})
same=>n,Noop(new cid is ${area}${cid} )
same=>n,Set(CALLERID(num)=${area}${cid})
same=>n,Return(${CALLERID(num)})


[outbound]
exten=>_008.,1,Gosub(rand-cid,${EXTEN:3},1)
same=>n,Dial(SIP/rapidvox/${EXTEN:3})
same=>n,Hangup()

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
easy way

[random-cid]

exten=>_1nxxnxxxxxx,1,Noop(catching the caller id ${CALLERID(num)})

same=>n,Set(cid=${RAND(1000,9999)})
same=>n,Set(area=${EXTEN:1:6})

same=>n,Noop(new cid is ${area}${cid} )

same=>n,Set(CALLERID(num)=${area}${cid})

same=>n,Dial(SIP/rapidvox/${EXTEN})