Neighbor Status (swql)

I didn't see a widget for Neighbor Status - so here's one in swql:

SELECT

TOUPPER(SUBSTRING(n.caption,1,case when charindex('.',n.caption,1) <=4

then length(n.caption) else (charindex('.',n.caption,1)-1) end)) as [Node]

,n.DetailsUrl AS [_LinkFor_Node]

,'/Orion/images/StatusIcons/Small-' + n.StatusIcon AS [_IconFor_Node]

,case when nn.Caption is not NULL then nn.Caption else rn.NeighborIP end as [Neighbor]

,case when nn.Caption is not NULL then nn.DetailsUrl end as [_LinkFor_Neighbor]

,case when nn.Caption is not NULL then concat('/Orion/images/StatusIcons/Small-',nn.StatusIcon) end as [_IconFor_Neighbor]

,rn.ProtocolName as [Protocol]

,case when rn.ProtocolStatusLED=1 then '/Orion/images/StatusIcons/Small-Up.gif'

      when rn.ProtocolStatusLED=2 then '/Orion/images/StatusIcons/Small-Down.gif' end as [_iconfor_Protocol]

,rn.AutonomousSystem as [Remote AS]

,case when rn.ProtocolStatusDescription is NULL then 'N/A' else rn.ProtocolStatusDescription end as [Status]

,rn.LastChange

FROM Orion.Routing.Neighbors rn

join Orion.nodes n on n.nodeid=rn.nodeid

left join Orion.NodeIPAddresses nip on nip.IPaddress=rn.NeighborIP

left join Orion.Nodes nn on nn.nodeid=nip.nodeid

where rn.IsDeleted='False'

Order by rn.ProtocolStatusLED desc

Thank you,

Amit