Query to get multiple rows into string

DECLARE @String VARCHAR(100)

SET @String =( SELECT CONVERT(nvarchar(10),PC.HierarchyId)+'|'+HierarchyName+'~'

FROM PortalHierarchyCustomers PC INNER JOIN PortalEntitiyHierarchies PH

on PC.HierarchyId = PH.HierarchyId

INNER JOIN PortalEntityTypes PE on PE.EntityTypeId = PH.EntityTypeId

WHERE (InternalId = 1) and PE.EntityTypeName='Area'  for xml path(''))

SELECT LEFT(@String, LEN(@String) - 1)