K3 主控台创建

/*==================================================
FFFFFF OOOO GGGG EEEEEE RRRR SSSS ######
FF OO OO GG GG EE RR RR S ######
FFFFFF OO OO GG EE RR RR SS ####
FF OO OO GG GGG EEEEEE RRRRR SSSS ##
FF OO OO GG GG EE RR RR S
FF OOOO GGG G EEEEEE RR RR SSSSS ##

Author : Fogers
Modify Time : 2013/8/3 13:23
WorkStation : I7
Description : 创建一个项目到主控台
Test Code :
==================================================*/

SET NOCOUNT ON
DECLARE @FSubFuncID INT ,
@FSubSysID INT ,
@FTopClassID INT
DECLARE @FSubFuncName VARCHAR(30) ,
@FSubSysName VARCHAR(30) ,
@FTopClassName VARCHAR(30) ,
@FFuncName VARCHAR(30) ,
@FClassName VARCHAR(50) ,
@FHelpCode VARCHAR(50),
@FClassParam VARCHAR(150)
SET @FTopClassName = '系统设置'
SET @FSubSysName = '基础资料'
SET @FSubFuncName = '公共资料'
SET @FFuncName = '成本组导入'
SET @FClassName = 'LYWImportExcel.App'
SET @FHelpCode = 'M0001'
SET @FClassParam= ' '

SELECT @FTopClassID = FTopClassID
FROM dbo.t_DataFlowTopClass
WHERE FVisible = 1
AND FTopClassID <> 0
AND FTopClassName = @FTopClassName

SELECT @FSubSysID = FSubSysID
FROM dbo.t_DataFlowSubSystem
WHERE FVisible = 1
AND FTopClassID = @FTopClassID
AND FName = @FSubSysName

SELECT @FSubFuncID = FSubFuncID
FROM dbo.t_DataFlowSubFunc
WHERE FSubSysID = @FSubSysID
AND FFuncName = @FSubFuncName

DELETE [t_DataFlowDetailFunc]
WHERE FSubFuncID = @FSubFuncID
AND [FFuncName] = @FFuncName

DECLARE @FSID INT ,
@FIdx INT

SELECT @FSID = ISNULL(MAX([FDetailFuncID]), 0) + 1
FROM [t_DataFlowDetailFunc]

SELECT @FIdx = ISNULL(MAX([FIndex]), 0) + 1
FROM [t_DataFlowDetailFunc]
WHERE FSubFuncID = @FSubFuncID

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],FAccessModeID
)
VALUES ( @FSID ,
@FFuncName ,
@FFuncName ,
@FFuncName ,
@FSubFuncID ,
@FIdx ,
@FClassName ,
@FClassParam ,
0 ,
@FHelpCode ,
1 ,
',1,2,5,6,7,8,9,10,11,12,13,14,' ,
-1 ,
1 ,
@FFuncName ,
@FFuncName ,
@FFuncName ,
0 ,
0 ,
'' ,
'',8
)
GO