TSQL - Concatenate many rows into a single text string

SELECT [MAIN].CASEID, LEFT([MAIN].INTCLASS, LEN([MAIN].INTCLASS)-1) AS INTCLASS
FROM (
    SELECT CASEID, ( SELECT RIGHT('0'+Y.INTCLASS,2) + ',' AS [text()]
                    FROM DBO.HL_WRIGLEY_SPEC Y
                    WHERE X.CASEID = Y.CASEID
                    ORDER BY RIGHT('0'+Y.INTCLASS,2)
                    For XML PATH ('') ) AS INTCLASS
    FROM DBO.HL_WRIGLEY_SPEC X
    ) [MAIN]