查询报表或凭证时，会计年度不显示2021年度的解决方法

红枫

                               
登录/注册后可看大图

执行以下脚本即可，脚本中是增加了10年的，也可以打最新的IA补丁解决，属于U8 的bug

if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2021' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2021,N'zh-cn',2021,21,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2022' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2022,N'zh-cn',2022,22,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2023' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2023,N'zh-cn',2023,23,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2024' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2024,N'zh-cn',2024,24,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2025' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2025,N'zh-cn',2025,25,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2026' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2026,N'zh-cn',2026,26,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2027' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2027,N'zh-cn',2027,27,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2028' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2028,N'zh-cn',2028,28,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2029' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2029,N'zh-cn',2029,29,N'U870')     if not exists(select EnumType from aa_enum where EnumType=N'IA.iYear' and  enumcode=N'2030' and LocaleId=N'zh-cn')     insert into aa_enum  (EnumType,EnumCode,LocaleId,EnumName,EnumIndex,cProjectNO)values(N'IA.iYear',2030,N'zh-cn',2030,30,N'U870')

dlfsystem

值得收藏！

luckgem

不明白开发总喜欢留个后门或者bug，给自己找存在感吗？感谢楼主的语句，值得收藏

yuwen007cn

开发手写的年度，也是够辛苦的了

小呆瓜

先收藏了，感谢楼主的无私奉献

wa911126

-----------------------选择需要执行脚本的账套库-----------------------
----------------------一次性增加会计年度到2099年---------------
------------------------制作者:猥琐的紫夜-----------------------------

declare @i int
set @i=20
while @i<=99
begin
        declare @enumcode varchar(4)
        set @enumcode='20'+ cast(@i as varchar)

        ---------删除已经存在的会计年度---------
        delete from dbo.AA_Enum where EnumType=N'IA.iYear' and enumcode = @enumcode

        ---------增加新的会计年度--------
        INSERT INTO [dbo].[AA_Enum]([EnumType],[EnumCode],[LocaleId],[EnumName],[EnumIndex],[cProjectNO])
        VALUES('IA.iYear',@enumcode,'zh-cn',@enumcode,@i,'U870')
        INSERT INTO [dbo].[AA_Enum]([EnumType],[EnumCode],[LocaleId],[EnumName],[EnumIndex],[cProjectNO])
        VALUES('IA.iYear',@enumcode,'en-Us',@enumcode,@i,'U870')
        INSERT INTO [dbo].[AA_Enum]([EnumType],[EnumCode],[LocaleId],[EnumName],[EnumIndex],[cProjectNO])
        VALUES('IA.iYear',@enumcode,'zh-tw',@enumcode,@i,'U870')

        set @i=@i+1
end

wxllv

wa911126 发表于 2021-7-2 12:17
-----------------------选择需要执行脚本的账套库-----------------------
----------------------一次性 ...

多谢多谢