新增文章

文章标题分类内容

------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--【存储过程】 删除

if exists ( select * from sys.objects where object_id = OBJECT_ID(N'dbo.a_insFunc') AND type in (N'P', N'PC') )
               drop     procedure                                      dbo.a_insFunc
   go
   
   
------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--【存储过程】 a_insFunc  添加：子功能,明细横线

create procedure dbo.a_insFunc
   
       @FuncName    varchar(30) 
      ,@Index       int = 0 
      ,@FSubFuncID  int = 0
      ,@Name        varchar(30) = '--------------------------'
   as 
------------------------------------------------------------------------------------------------------------------------------------------------------------------------

declare @FuncID int = 0 ; set @FuncID = @FSubFuncID * 100 + @Index ; 
   
  ------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  --【添加】 子功能
   
   if @FuncName = 'Sub' begin
   
      --select @FuncID = MAX(FSubFuncID) +1 from t_DataFlowSubFunc where  FSubSysID = @FSubFuncID ;
      
      --if ISNULL(@FuncID,0) = 0 begin
      --   set @FuncID = @FSubFuncID * 100 + @Index
      --end
      
      insert t_DataFlowSubFunc (
         FSubFuncID,FSubSysID,FIndex,FFuncName,FFuncName_CHT,FFuncName_EN,FClassName,FClassParam,FVisible,FAcctType,FFuncType,FRefresh,FSetEnable,FSubID,FIsEdit,FShowSysType,FUrl,FUrlType
      )
      values (
         @FuncID,@FSubFuncID,@Index,@Name,@Name,@Name,'','',1,'',0,0,0,'',1,1,'',''
      )
   end
   
   
  ------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  --【添加】 明细功能
  
   if @FuncName = 'Detail' begin
   
      --select @FuncID = MAX(FDetailFuncID) +1 from t_DataFlowDetailFunc where  FSubFuncID = @FSubFuncID ;
      
      --if ISNULL(@FuncID,0) = 0 begin
      --   set @FuncID = @FSubFuncID * 100 + 1
      --end
      
      insert 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,FFuncType_Ex,FAccessModeID
      )
      values (
         @FuncID,@Name,@Name,@Name,@FSubFuncID,@Index,'','',1,'',1,'',0,1,'','','',1,1,'','','',8
      )
   end
   
   
  ------------------------------------------------------------------------------------------------------------------------------------------------------------------------
  --【更新】 主控台
  
   update t_DataFlowTimeStamp set FName = FName

/*
------------------------------------------------------------------------------------------------------------------------------------------------------------------------

exec a_insFunc 'Sub'    ,1 ,12   ,'销售'
   exec a_insFunc 'Detail' ,4 ,1200
   
   
   exec a_Select 't_DataFlowSubFunc' ,@where = 'FSubSysID = 12 '   -- 12	进销存
                                     ,@Order = 'FSubSysID,FIndex '
                                      
   exec a_Select 't_DataFlowDetailFunc' ,@where = 'FSubFuncID like ''12__''  '  -- 明细功能
                                        ,@Order = 'FSubFuncID,FIndex '

------------------------------------------------------------------------------------------------------------------------------------------------------------------------
*/
go