CREATE VIEW V_SYS_PROCS_SQL AS

SELECT A.Id,B.ColId,A.Name AS NOMBRE,
CASE
    WHEN A.xtype = 'P' THEN 'PROC'
    WHEN A.xtype = 'V' THEN 'VISTA'
END AS TIPO,
A.crdate AS FECHA_CREACION,
B.Text AS SQL
--, uncompress([ctext]) AS CTEXT
FROM sysobjects A,syscomments B
WHERE
A.Id = B.ID AND A.xtype IN('P','V')
--AND A.base_schema_ver <> 16
AND A.Category = 0
--ORDER BY A.xtype,name