SELECT
(
	SELECT
		AssemblyName AS [@assembly],
		TypeName + '.' + MethodName AS [@method]
	FROM FaultLocationAlgorithm
	FOR XML PATH('faultLocation'), TYPE
) AS [analytics],
(
	SELECT
		Meter.AssetKey AS [@id],
		Meter.Name AS [attributes/name],
		Meter.Make AS [attributes/make],
		Meter.Model AS [attributes/model],
		MeterLocation.AssetKey AS [attributes/stationID],
		MeterLocation.Name AS [attributes/stationName],
		CAST(MeterLocation.Latitude AS VARCHAR(10)) AS [attributes/stationLatitude],
		CAST(MeterLocation.Longitude AS VARCHAR(10)) AS [attributes/stationLongitude],
		(
			SELECT
				Line.AssetKey AS [@id],
				COALESCE(MeterLine.LineName, Line.AssetKey) AS name,
				CAST(Line.VoltageKV AS VARCHAR(10)) AS voltage,
				CAST(Line.ThermalRating AS VARCHAR(10)) AS rating50F,
				CAST(Line.Length AS VARCHAR(10)) AS length,
				RemoteMeterLocation.AssetKey AS endStationID,
				RemoteMeterLocation.Name AS endStationName,
				CAST(LineImpedance.R1 AS VARCHAR(10)) AS [impedances/R1],
				CAST(LineImpedance.X1 AS VARCHAR(10)) AS [impedances/X1],
				CAST(LineImpedance.R0 AS VARCHAR(10)) AS [impedances/R0],
				CAST(LineImpedance.X0 AS VARCHAR(10)) AS [impedances/X0],
				(
					SELECT CAST('<' + CASE WHEN (MeasurementType.Name = 'Voltage') THEN 'V' ELSE 'I' END + LEFT(Phase.Name, 1) +'>' + Series.SourceIndexes + '</' + CASE WHEN (MeasurementType.Name = 'Voltage') THEN 'V' ELSE 'I' END + LEFT(Phase.Name, 1) + '>' AS XML)
					FROM
						Channel JOIN
						Series ON Series.ChannelID = Channel.ID JOIN 
						Phase ON Channel.PhaseID = Phase.ID JOIN
						MeasurementType ON Channel.MeasurementTypeID = MeasurementType.ID
					WHERE
						Channel.MeterID = Meter.ID AND
						Channel.LineID = Line.ID AND
						Phase.Name IN ('AN', 'BN', 'CN') AND
						MeasurementType.Name IN ('Current', 'Voltage')
					FOR XML PATH(''), TYPE
				) AS channels
			FROM
				Line JOIN
				LineImpedance ON LineImpedance.LineID = Line.ID LEFT OUTER JOIN
				MeterLocationLine ON
					MeterLocationLine.LineID = Line.ID AND
					MeterLocationLine.MeterLocationID = MeterLocation.ID LEFT OUTER JOIN
				MeterLine ON
					MeterLine.LineID = Line.ID AND
					MeterLine.MeterID = Meter.ID LEFT OUTER JOIN
				MeterLocationLine RemoteMeterLocationLine ON
					RemoteMeterLocationLine.LineID = Line.ID AND
					RemoteMeterLocationLine.MeterLocationID <> MeterLocation.ID LEFT OUTER JOIN
				MeterLine RemoteMeterLine ON
					RemoteMeterLine.LineID = Line.ID AND
					RemoteMeterLine.MeterID <> Meter.ID LEFT OUTER JOIN
				Meter RemoteMeter ON RemoteMeterLine.MeterID = Meter.ID LEFT OUTER JOIN
				MeterLocation RemoteMeterLocation ON
					RemoteMeterLocationLine.MeterLocationID = RemoteMeterLocation.ID OR
					RemoteMeter.MeterLocationID = RemoteMeterLocation.ID
			WHERE
				MeterLocationLine.ID IS NOT NULL OR
				MeterLine.ID IS NOT NULL
			FOR XML PATH('line'), TYPE
		) AS lines
	FROM
		Meter JOIN
		MeterLocation ON Meter.MeterLocationID = MeterLocation.ID
	WHERE Meter.ID IN	(SELECT Distinct m.ID
						FROM Meter m JOIN
							Event e On m.ID = e.MeterID JOIN
							EventType t ON e.EventTypeID = t.ID
						WHERE t.Name = 'Fault')
	FOR XML PATH('device'), TYPE
)
FOR XML PATH('openFLE')