Something

;###############################
;#   LLAMADOS ENTRE INTERNOS   #
;###############################

[internos-pbx001]
exten => 200,1,Macro(pbx001,SIP/A${EXTEN})
exten => 201,1,Macro(pbx001,SIP/A${EXTEN})

exten => t,1,Hangup



;#############
;#   MACROS  #
;#############

[macro-pbx001]

; Standard extension macro:
;   ${ARG1} - Extension a Sonar
;   ${ARG2} - flag del cmd Dial si es vacio: tr. Se pone '-' Para sacar flags.
;   ${ARG3} - Casilla de voicemail. Si esta vacio usa la extencion
exten => s,1,Set(VMBOX=${MACRO_EXTEN})
exten => s,2,GotoIf($[${LEN(${ARG3})} > 0]?4)
exten => s,3,Set(VMBOX=${ARG3})
exten => s,4,Set(FLAGS=tr)
exten => s,5,GotoIf($[ "x${ARG2}" : x ]:7)
exten => s,6,Set(FLAGS=${ARG2})
exten => s,7,Dial(${ARG1},60,${ARG2})
exten => s,8,Goto(s-${DIALSTATUS},1)
exten => s-NOANSWER,1,Hangup
exten => s-BUSY,1,Playtones(congestion)
;exten => s-NOANSWER,1,Voicemail(u${VMBOX})
;exten => s-BUSY,1,Voicemail(b${VMBOX})