当前位置:首页 > 技术心得 > 正文内容

金蝶K3:直接SQL报表中进行核算项目数据授权控制的方法

xjtudll4年前 (2022-05-16)技术心得4260

--【第一步】:
--根据核算项目类别ID,查询到对应核算项目的数据授权表及查看、修改、删除的权限字段名和权限掩码
--例如查出客户的数据授权表为Access_t_Organization
--几乎所有的核算项目的查看、修改、删除的权限字段名和权限掩码都是以下这样:
--FDataAccessView:1 FDataAccessEdit:4194304 FDataAccessDelete:65536
--此SQL脚本示例以检查核算项目的查看权限(FDataAccessView)为例
select FAccessTable,* from t_AccessRowData where fclassid=1

--【第二步】:
--根据用户ID获取二进制位权限信息(FAccessUUID)
Select top 1 t1.FUserID,t1.FAccessUUID from t_User t1 where t1.FUserID=16501
and t1.FAccessUUID>0
Union
Select t2.FUserID,t2.FAccessUUID from t_Group t1 left join t_User t2 on
t1.FGroupID=t2.FUserID where t1.FGroupID<>0 and t1.FUserID=16501
and t2.FAccessUUID>0
--【第三步】
--根据上两步查出来的数据权限表(Access_t_Organization)和权限字段名(FDataAccessView)
--以及用户的二进制权限位(FAccessUUID值为:108)
--按照固定的算法,拼接出数据权限关键过滤条件Substring...
DECLARE @ByteNum AS INT
DECLARE @Comp AS INT
DECLARE @AccessUUID AS INT
SET @AccessUUID=108 --此变量值为第二步查出来用户的二进制权限位(FAccessUUID)
SET @ByteNum = floor(@AccessUUID / 8) + 1
SET @Comp = power(2,(7 - ((@AccessUUID + 7) Mod 8)))
Substring(Access_t_Organization.FDataAccessView,@ByteNum,1) & @Comp & <>0
--如果@AccessUUID=108,则计算出来的过滤条件结果为:
Substring(Access_t_Organization.FDataAccessView,14,1) & 16 & <>0
--【第四步】:
--将核算项目物理表(t_Organization)左连接上核算项目数据权限表(Access_t_Organization),
--再拼接上第三步计算出来的关键过滤条件(Substring(Access_t_Organization.FDataAccessView,14,1) & 16 & <>0)
--由于表连接时用了表别名,注意替换过滤条件中的表名(Access_t_Organization)为SQL中使用的表别名(Access_t_Organization1)
--最终形成的数据权限过滤的SQL如下,此SQL查询出的结果即为用户16501具有查看权限的核算项目数据记录:
SELECT t1.FItemID FROM t_Item t1 with(index (uk_Item2))
LEFT JOIN t_Organization x2 ON t1.FItemID = x2.FItemID
Left join Access_t_Organization as Access_t_Organization1 on Access_t_Organization1.FItemID=t1.FItemID
WHERE FItemClassID = 1 --核算项目类别ID
AND t1.FDeleteD=0 --排除掉禁用的核算项目
and ((Substring(Access_t_Organization1.FDataAccessView,14,1) & 16<>0)--过滤出用户16501具有查看权限的记录
or (isnull(t1.FItemID,0)=0)) --没有关联上数据权限表的核算项目默认拥有权限
ORDER BY t1.FNumber

--以上示例为怎么查询出用户16501具有核算项目“客户”查看权限的数据
--而实际编写直接SQL报表时,可把以上语句中的用户16501,直接替换成当前登录用户的关键字:#GetInnerVariable(UserID)#
--另外不同的核算项目,类别ID、核算项目物理表、核算项目数据权限表,需要做相应替换。

扫描二维码推送至手机访问。

版权声明:本文由鸟的天空发布,如需转载请注明出处。

本文链接:http://xjtudll.cn/Exp/645/

标签: 金蝶
分享给朋友:

“金蝶K3:直接SQL报表中进行核算项目数据授权控制的方法” 的相关文章

IOS Autolayout ScrollView无法滚动的解决办法

参考资料: http://www.cocoachina.com/bbs/read.php?tid=175749 问题: 设定autolayout之后,发现scrollview无法滚动了,导致无法查看所有的内容。在viewDidLoad里重新设定scrollview的contentSize,还是不行。...

Source Insight删除半个汉字问题

Source Insight删除半个汉字问题

Source Insight(汉化版)下载地址: http://www.onlinedown.net/soft/32292.htm 解压后,文件夹“搞定SourceInsight的半个汉字的问题”,我们需要的是文件SuperBackspace.em。 软件(宏)自带的使用说明...

魅族Flyme7不显示logcat

魅族Flyme7不显示logcat

设置 -> 辅助功能 -> 开发者选项 -> Flyme扩展功能 -> 性能优化 -> 高级日志输出 -> 全部允许 没有开发者选项的先去系统设置里将开发者选项给点出来...

BOM各层级计算真实用量

BOM各层级计算真实用量

SELECT * FROM ( select 级别='1',A='A1',B='B1',用量='1',B真实用量='' UNION ALL select 级别='2',A='B1',B='C1',用量='2',B真实用量='' UNION ALL select 级别='3',A='C1...

SQL Server 2012 自动增长列,值跳跃问题(自增增加1000)【转载】

SQL Server 2012 自动增长列,值跳跃问题(自增增加1000)【转载】

介绍从 SQL Server 2012 版本开始, 当SQL Server 实例重启之后,表格的自动增长列的值会发生跳跃,而具体的跳跃值的大小是根据增长列的数据类型而定的。如果数据类型是 整型(int),那么跳跃值为 1000;如果数据类型为 长整型(bigint),那么跳跃值为 10000。从我们...

浅析电波表——发射和接收原理

浅析电波表——发射和接收原理

一、发射的基本原理 授时信号的发射部分由原子钟、时间信号处理器、调制器、载波振荡器、激励级、强放级和发射天线组成。其工作原理是:原子钟作为时钟源,产生相对准确和稳定的时频标准,这个频率标准通过系统分频器得到实时的标准时间信息。如:年、月、日、时、分、秒、毫秒、微妙等时间信息,这些时间信息通过时间信息...

发表评论

访客

◎欢迎参与讨论,请在这里发表您的看法和观点。