Contexto definir_org_id para disa. Criar variável DISA para quando ligações for DISA. Disa usa Local/ isso não permite usar CHANNEL(peername)

asterisk/etc_asterisk/extensions_padrao.conf

@@ -278,6 +278,23 @@ exten => s,n,System(${ATUALIZAR} ESCUTA-CLASSIFICACAO ${CALLERID(num)} "${CHANNE
 exten => s,n,Playback(/tmp/${AUDIO})
 exten => s,n,System(/bin/rm -rf /tmp/${AUDIO}.ulaw)
 
+
+; Channel(peername) não existe para ligações DISA. Dessa forma é inserido variável DISA quando é DISA
+; Se for DISA precisa Testar para não procurar channel(peername)
+[definir_org_id]
+exten => s,1,NooP(${DISA})
+exten => s,n,GotoIf($["${ISNULL(${DISA})}" = "0"]?chamada_disa)
+exten => s,n,GotoIf($["${ISNULL(${ORG_ID})}" = "1"]?define_org_id)
+exten => s,n,GotoIf($["${ORG_ID}" = "{DB(ORG_ID/${CHANNEL(peername)})}"]?org_id_diferente)
+exten => s,n,Return()
+
+exten => s,n(define_org_id),Set(__ORG_ID=${DB(ORG_ID/${CHANNEL(peername)})})
+exten => s,n,Return()
+exten => s,n(org_id_diferente),Hangup()
+exten => s,n(fail_org_id),Hangup();
+exten => s,n(chamada_disa),GotoIf($["${ISNULL(${ORG_ID})}" = "1"]?Hangup())
+exten => s,n,Return()
+
 [app-padrao]
 include => ext-ramais
 include => ext-fila
@@ -338,10 +355,12 @@ exten => _X.,n,Hangup()
 ; ARG1 EXTEN
 ; ARG2 DAC
 ; ARG3 CONTEXT
-exten => s,1,Set(__ORG_ID=${DB(ORG_ID/${CHANNEL(peername)})})
+
+exten => s,1,Noop(Ligação disa = ${DISA})
+exten => s,n,NOOP(org_id da empresa - ${ORG_ID})
+exten => s,n,GoSub(definir_org_id,s,1)
 exten => s,n,GotoIf($["${ISNULL(${ORG_ID})}" = "1"]?sem_org_id)
 exten => s,n,Set(CDR(org_id)=${ORG_ID})
-exten => s,n,NOOP(ORG_ID -  ${ORG_ID})
 exten => s,n,Set(EXTENDESTINO=${ARG1})
 exten => s,n,GoSub(macro-callerid,s,1,(INTERNO))
 exten => s,n,GotoIf($["${ARG3}" = "ura"]?discadireto)
@@ -691,6 +710,7 @@ exten => h,1,GoSub(macro-hangup,s,1,(,${CONTEXT},${EXTEN}))
 [disa]
 include => disa_custom
 exten => _X.,1,AGI(pbx_complemento.php,disa)
+exten => _X.,n,SET(_DISA=1)
 exten => _X.,n,Dial(Local/${EXTEN}@padrao/n)
 exten => _X.,n,Hangup()
 
@@ -993,6 +1013,7 @@ exten => s,n,GoSub(macro-gravacao,s,1,(IN,${ARG1}))
 exten => s,n,GoSub(macro-gravacao,s,1,(OUT,${CALLERID(num)}))
 exten => s,n,Set(DB(ULTIMO-RECEBIDO/${ARG1})=${CALLERID(NUM)})
 exten => s,n,GoSub(macro-callerid,s,1,(INTERNO))
+exten => s,n,NooP(nome=${CALLERID(name)} - numero=${CALLERID(num)})
 exten => s,n,GotoIf($["X${ARG2}" = "X"]?ramal)
 exten => s,n,Set(TEMPODERING=${ARG2})
 exten => s,n,Set(OPCOESDIAL=${ARG3})
@@ -1652,7 +1673,8 @@ exten => s,n(binatronco),AGI(bina_tronco.php,${ARG2},${ARG3},${ARG4})
 exten => s,n,Noop(BINA_TRONCO = ${BINA_TRONCO})
 exten => s,n,ExecIf($["X${BINA_TRONCO}" != "X"]?Set(CALLERID(num)=${BINA_TRONCO}))
 exten => s,n,Return()
-exten => s,n(interno),GotoIf($["X${DB(BINA-NOME/${CHANNEL(peername)})}" = "X"]?fim)
+exten => s,n(interno),GotoIf($["${ISNULL(DISA)}" = "0"]?fim)
+exten => s,n,GotoIf($["X${DB(BINA-NOME/${CHANNEL(peername)})}" = "X"]?fim)
 exten => s,n,Set(CALLERID(name)=${DB(BINA-NOME/${CHANNEL(peername)})})
 exten => s,n,Set(CALLERID(num)=${DB(ORG_RAMAL/${CHANNEL(peername)})})
 exten => s,n(fim),Return()