KIS旗舰版新增4级菜单

/*================================
描述：物料缺货分析表
作者：WDZ
日期：2013-12-29
==================================*/

--四级菜单
Delete FROM t_DataFlowDetailFunc  where FFuncName = '物料缺货分析表'
DELETE FROM ICReport WHERE FRptName ='物料缺货分析表'

--四级菜单-物料缺货分析表
INSERT INTO t_DataFlowDetailFunc (FDetailFuncID, FFuncName, FFuncName_CHT, FFuncName_EN, FSubFuncID, FIndex, FClassName, FClassParam, FIsNormal,
 FHelpCode, FVisible, FAcctType, FFuncType, FEnable, FShowName, FShowName_CHT, FShowName_EN, FIsEdit, FShowSysType, FUrl, FUrlType,FFuncGroup)
values(15055,'物料缺货分析表','物料缺货分析表','物料缺货分析表',2520,'101','K3ShopFloor.Application','Rpt6000005','0',27020,
1,',1,2,3,9,10,11,12,13,',-1,1,
    '','','',0,0,'','',0)

GO
insert into ICReport
values('物料缺货分析表','物料缺货分析表','物料缺货分析表','K3RptDemo.Rpt6000005','6000005',
'FUnitName','FSumSort',5,104,1,1,1008,40,'','','',1,6000005,0,2,0,0,0,'','')
GO

update t_DataFlowTimeStamp set FName=FName
GO

--=====物料缺货分析表=====
--=====物料缺货分析表建立关联t_GroupAccessType t_ObjectAccess 查询权FGroupID=67005 管理权FGroupID=67006
IF NOT EXISTS(SELECT 1 FROM t_ObjectAccess WHERE FGroupID = '67005' And FObjectType = '1008' And FObjectID = '40' And FIndex = '1')
INSERT INTO t_ObjectAccess(Fgroupid, FObjectType, FObjectID, FIndex) VALUES (67005, 1008, 40, 1)
GO
IF NOT EXISTS(SELECT 1 FROM t_ObjectAccess WHERE FGroupID = '67006' And FObjectType = '1008' And FObjectID = '40' And FIndex = '2')
INSERT INTO t_ObjectAccess(Fgroupid, FObjectType, FObjectID, FIndex) VALUES (67006, 1008, 40, 2)
GO
IF NOT EXISTS(SELECT 1 FROM t_ObjectAccess WHERE FGroupID = '67006' And FObjectType = '1008' And FObjectID = '40' And FIndex = '3')
INSERT INTO t_ObjectAccess(Fgroupid, FObjectType, FObjectID, FIndex) VALUES (67006, 1008, 40, 3)
GO

IF NOT EXISTS(SELECT * FROM t_ObjectType WHERE FObjectType = '1008' And FObjectID = '40')
INSERT INTO t_ObjectType (FObjectType,FObjectID,FName,FDescription,FName_cht,Fname_en,FDescription_cht,FDescription_en)
VALUES(1008,40,'物料缺货分析表','Summary table ','物料缺货分析表','Summary table ',NULL,NULL)
GO
 
--增加权限对象功能操作 T_ObjectAccessType
if not exists (Select 1 from t_ObjectAccessType Where FObjectType=1008 AND FObjectID=40 and FIndex=1 )
INSERT INTO T_ObjectAccessType (FObjectType,FObjectID,FIndex,FAccessMask,FAccessUse,
FName,FDescription,Fname_cht,Fname_en,FDescription_cht,FDescription_en)
VALUES(1008,40,1,1048576,0,'查看','可查看物料缺货分析表','查看','View','可查看物料缺货分析表','View Payroll Standard Settings')
GO
if not exists (Select 1 from t_ObjectAccessType Where FObjectType=1008 AND FObjectID=40 and FIndex=2 )
INSERT INTO T_ObjectAccessType (FObjectType,FObjectID,FIndex,FAccessMask,FAccessUse,
FName,FDescription,Fname_cht,Fname_en,FDescription_cht,FDescription_en)
VALUES(1008,40,2,8192,1048576,'打印','可打印物料缺货分析表','打印','Print','可打印物料缺货分析表','View Payroll Standard Settings')
GO
if not exists (Select * from t_ObjectAccessType Where FObjectType=1008 AND FObjectID=40 and FIndex=3 )
INSERT INTO T_ObjectAccessType (FObjectType,FObjectID,FIndex,FAccessMask,FAccessUse,
FName,FDescription,Fname_cht,Fname_en,FDescription_cht,FDescription_en)
VALUES(1008,40,3,16384,1048576,'引出','可引出物料缺货分析表','引出','Export','可引出物料缺货分析表','Export Payroll Standard Settings')
GO