[somewhere]
exten => foo,1,Gosub(pin,s,1)

[pin]
exten => s,1,Background(getpin)
exten => s,2,WaitExten

exten => _XXXX,1,Set(pin=${EXTEN})
exten => _XXXX,n,Return