delphi开发中的菜单及权限

一添加权限

--材料收支信息添加权限

  insert into tModuleFunc(MKDM,GNMC)

  values('0508','基础收支信息')

  insert into tModuleFunc(MKDM,GNMC)

  values('0508','主材软装收支信息')

   go

   二操作员权限
--生成有材料收支信息模块权限的操作员权限

   insert into tCZYGNQX(CZYBH,MKDM,GNMC)

   select distinct CZYBH,MKDM,'基础收支信息' from tCZYQX

   where MKDM='0508'

   insert into tCZYGNQX(CZYBH,MKDM,GNMC)

   select distinct CZYBH,MKDM,'主材软装收支信息' from tCZYQX

   where MKDM='0508'

   GO

   三索引创建

CREATE INDEX index_name  ON table_name (column_name) 

DROP INDEX tReturnPay.iReturnPay_DocumentNo

go

CREATE INDEX iReturnPay_LastUpdate ON tReturnPay

(

       LastUpdate                     ASC

)

go

四with   encryption --加密

先加密:

create proc P_jiami

with   encryption --加密

as 

begin

select * from cc

end

--exec    sp_decrypt    'P_jiami'   --解密