use pubs
go
if exists (SELECT * FROM sysobjects where name='HIDETEXT' and type='P')
drop proc HIDETEXT,CLEARTEXT
go
CREATE PROCEDURE CLEARTEXT
as
SELECT * FROM authors
go
CREATE PROCEDURE HIDETEXT WITH ENCRYPTION
as
SELECT * FROM authors
go
SELECT sysobjects.name, sysobjects.id,
number, colid, texttype, language, text
FROM syscomments, sysobjects
WHERE sysobjects.id=syscomments.id AND
(
sysobjects.id=OBJECT_ID('hidetext') OR
sysobjects.id=OBJECT_ID('cleartext')
)
-- Find the names and types of objects that have encrypted text:
select name,type from syscomments,sysobjects
where sysobjects.id=syscomments.id
and texttype & 4 > 0