[macro-dial]
exten => s,1,GotoIf($[ "${MACRO_CONTEXT}" = "macro-rg-group" ]?4:2)  
exten => s,2,GotoIf($[${CALLERIDNAME:0:${LEN(${RGPREFIX})}} != ${RGPREFIX}]?4:3)  
exten => s,3,SetCIDName(${CALLERIDNAME:${LEN(${RGPREFIX})}}) 
exten => s,4,AGI,dialparties.agi
exten => s,5,NoOp(Returned from dialparties with no extensions to call)
exten => s,6,SetVar(DIALSTATUS=BUSY)
exten => s,10,Dial(${ds})                               
exten => s,11,GotoIf($[0${CALLERIDNUM} > 100]?s-${DIALSTATUS},1)
exten => s-BUSY,1,Set(COUNT=1)
exten => s-BUSY,2,While($[ ${COUNT} < 5 ])
exten => s-BUSY,3,SET(COUNT=$[${COUNT} + 1])
exten => s-BUSY,4,Goto(s,1)
exten => s-BUSY,5,EndWhile()