新增文章

文章标题分类内容

------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--【视图】 删除

if exists ( select * from sys.views where object_id = OBJECT_ID(N'dbo.a_ICTemplateTxt') )
               drop     view                                         dbo.a_ICTemplateTxt
   go

-------------------------------------------------------------------------------------------------------------------------------------------------------------------------
--【视图】 a_ICTemplateTxt  金蝶老单 表头布局：更改位置,大小,输入顺序,显示

create view dbo.a_ICTemplateTxt
   as 
   select 
   
       FID
      ,FBillName
      ,FCtlIndex,FTabIndex
      ,FFullName
      ,FLeft,FTop,FWidth,FHeight
      ,FVisForBillType
      ,FEnable
   
      -----------------------------------------------------------------------------------------------------------------------
      ,'   update ICTemplate set FTop = '    + space(4-len(FTop   )) + cast(FTop    as nvarchar(10))
                             +' ,FHeight = ' + space(4-len(FHeight)) + cast(FHeight as nvarchar(10)) 
                              
                             +' ,FLeft = '   + space(5-len(FLeft  )) + cast(FLeft   as nvarchar(10)) 
                             +' ,FWidth = '  + space(5-len(FWidth )) + cast(FWidth  as nvarchar(10)) 
                               
                              +' where FID = '''     + cast(FID as nvarchar(10)) +''''
                              +' and FFieldName = '''+ FFieldName  +''''
                              
                              + space( (case when len(FFieldName) > 16 then len(FFieldName) else 16 end) -len(FFieldName)) 
                              
                              +'  --'+ FFullName  
                              as FTopLeft
   
      -----------------------------------------------------------------------------------------------------------------------
      ,'   update ICTemplate set FTabIndex = ' + space(3-len(FTabIndex)) + cast(FTabIndex as nvarchar(10)) 
         
                              +' where FID = '''     + cast(FID as nvarchar(10)) +''''
                              +' and FFieldName = '''+ FFieldName  +''''
                              
                              + space( (case when len(FFieldName) > 16 then len(FFieldName) else 16 end) -len(FFieldName)) 
                              
                              +'  --'+ FFullName  
                              as FTabIndexTxt
      
      -----------------------------------------------------------------------------------------------------------------------
      ,'   update ICTemplate set FVisForBillType = ' + space(3-len(FVisForBillType)) + cast(FVisForBillType as nvarchar(10)) 
                             +' ,FEnable = '         + space(4-len(FEnable        )) + cast(FEnable         as nvarchar(10)) 
         
                              +' where FID = '''     + cast(FID as nvarchar(10)) +''''
                              +' and FFieldName = '''+ FFieldName  +''''
                              
                              + space( (case when len(FFieldName) > 16 then len(FFieldName) else 16 end) -len(FFieldName)) 
                              
                              +'  --'+ FFullName  
                              as FFVisForBillTypeTxt
      
   from aICTemplate
   
/*
------------------------------------------------------------------------------------------------------------------------------------------------------------------------

select * from aICTemplate
   
   select * from a_ICTemplateTxt  where FTabIndex < 100 and FID = 'B01'  order BY FTabIndex    -- 金蝶老单 表头布局：输入顺序
   select * from a_ICTemplateTxt  where FTabIndex < 100 and FID = 'B01'  order BY FTop,FLeft   -- 金蝶老单 表头布局：更改位置
   
------------------------------------------------------------------------------------------------------------------------------------------------------------------------
*/
go