CREATE PROCEDURE dbo.cal_list_resources
  @Xml nvarchar( 4000 )
AS
SET NOCOUNT ON

declare @hdocument int
declare @Resources table (ID INT IDENTITY( 1 , 1 ) PRIMARY KEY, ResourceID uniqueidentifier)

EXECUTE sp_xml_preparedocument @hdocument OUTPUT, @Xml

INSERT @Resources
SELECT CAST(id AS uniqueidentifier)
  FROM OPENXML(@hdocument, '/root/resource',  1 ) WITH (id varchar( 36 ))
 WHERE dbo.IsGUID(id) =  1 

EXECUTE sp_xml_removedocument @hdocument

SELECT  1  AS Tag, NULL AS Parent,
       resource.ResourceID AS [resource! 1 !id], 
       ResourceDescription AS [resource! 1 !name], 
       [resource! 1 !color] = CASE ID %  5 
	WHEN  1  THEN 'FF9900' 
	WHEN  2  THEN '6699FF' 
	WHEN  3  THEN '009933' 
	WHEN  4  THEN 'FF3300' 
	WHEN  0  THEN 'CC66FF' 
	END
  FROM Resources resource
 INNER JOIN  @Resources r2
    ON resource.ResourceID = r2.ResourceID
   FOR XML EXPLICIT

RETURN

...
SELECT  1  AS Tag, NULL AS Parent,
       resource.ResourceID AS [resource! 1 !id], 
       ResourceDescription AS [resource! 1 !name], 
       resource! 1 !color = CASE ID %  5 
	WHEN  1  THEN 'FF9900' 
...