[app-cidblocking]
*79,1,DBput(CIDBLOCK/${CALLERIDNUM}=1)
; prompt