18年新建19年会计年度报错

547135302

新建19年会计年度时报错，我使用之前备份过的账套可以新建， 原本想复制一下 这个存储过程，可备份账套 下也找不到这个存储过程。  求大神协助！！

sztlbb

上面那个要改成下面这个就可以执行了
create PROC [dbo].[BG_CalcBgYear] @year INTEGER
AS
BEGIN
DECLARE @cacc_id NVARCHAR(5);
DECLARE @BudgetAccountName varchar(20);
DECLARE @iFirstPeriod varchar(20);
DECLARE @mysql nvarchar(1000);
DECLARE @ParmDefinition NVARCHAR(200);

EXEC BG_GetBudgetAccountName
        @BudgetAccountName = @BudgetAccountName OUTPUT;
IF @BudgetAccountName is not null and exists(select   1   from   master..sysdatabases   where name=@BudgetAccountName)
        BEGIN
                DECLARE @existSql1 nvarchar(200);
                DECLARE @existSql2 nvarchar(200);
                DECLARE @exist1 varchar(100);
                DECLARE @exist2 varchar(100);
                SET @existSql1 = 'SELECT  @exist1 = ''true'' FROM '+@BudgetAccountName+'.[dbo].[sysobjects] WHERE   NAME = ''BG_BgYearPeriod'' and [type] = ''U''';
                SET @existSql2 = 'SELECT  @exist2 = ''true'' FROM '+@BudgetAccountName+'.[dbo].[sysobjects] WHERE   NAME = ''BG_BgYearVoucherDate'' and [type] = ''U''';

                exec sp_executesql @existSql1,N'@exist1 varchar(100) out ',@exist1 out
                exec sp_executesql @existSql2,N'@exist2 varchar(100) out ',@exist2 out
                IF  @exist1 = 'true' and @exist2 = 'true'
                BEGIN
                        SET @cacc_id = SUBSTRING(@BudgetAccountName, 8, 3);

                        SET @mysql = N'select @iFirstPeriod = iFirstPeriodOfCtrlAccount from (SELECT top 1 iFirstPeriodOfCtrlAccount FROM '+@BudgetAccountName+'..BG_BudgetYear WHERE iMakeYear = (SELECT top 1 iMakeYear FROM '+@BudgetAccountName+'..BG_LoginToMakeYear WHERE iLoginYear=@year)) a';
                        SET @ParmDefinition = N'@iFirstPeriod VARCHAR(20) OUT,@year INT'
                        EXECUTE sp_executesql @mysql, @ParmDefinition, @iFirstPeriod OUT,@year
                        PRINT @iFirstPeriod;
                        -----如果 @iFirstPeriod 为空，说明预算模块的iMakeYear还未初始化，或者期间有问题，此时应进入预算系统保存控制选项，不应用错误数据继续处理
                        IF(@iFirstPeriod IS NULL)
                        BEGIN
                                RETURN;
                        END
                        SET @mysql = N'DELETE  FROM '+@BudgetAccountName+'..BG_BgYearPeriod';
                        EXEC (@mysql);
                        SET @mysql = N'INSERT  INTO '+@BudgetAccountName+'..BG_BgYearPeriod
                                        ( iYear ,
                                          iId ,
                                          dBegin ,
                                          dEnd ,
                                          iBgYear ,
                                          iBgPeriod
                                        )
                                        SELECT  iYear ,
                                                        iId ,
                                                        dBegin ,
                                                        dEnd ,
                                                        YEAR(DATEADD(MONTH, -(' + @iFirstPeriod + ' - 1 ),
                                                                                 CAST(iYear AS NVARCHAR(4))+ ''-''
                                                                                 + CAST(iId AS NVARCHAR(4))+ ''-'' + ''1'')) AS iBgYear ,
                                                        MONTH(DATEADD(MONTH, -(' + @iFirstPeriod + ' - 1 ),
                                                                                  CAST(iYear AS NVARCHAR(4)) + ''-''
                                                                                  + CAST(iId AS NVARCHAR(4)) + ''-'' + ''1'')) AS iBgPeriod
                                        FROM    UFSystem..UA_Period
                                        WHERE   cAcc_Id = ' + @cacc_id;
                        EXEC (@mysql);
                        SET @mysql = N'DELETE  FROM '+@BudgetAccountName+'..BG_BgYearVoucherDate';
                        EXEC (@mysql);
                        SET @mysql = N'INSERT  INTO '+@BudgetAccountName+'..BG_BgYearVoucherDate
                                        ( iBgYear ,
                                          dBegin ,
                                          dEnd
                                        )
                                        SELECT  iBgYear ,
                                                        MIN(dBegin) ,
                                                        MAX(dEnd)
                                        FROM    '+@BudgetAccountName+'..BG_BgYearPeriod
                                        GROUP BY iBgYear';
                        EXEC (@mysql);
                END;
        END;
END;

sztlbb

SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROC [dbo].[BG_CalcBgYear] @year INTEGER
AS
BEGIN
DECLARE @cacc_id NVARCHAR(5);
DECLARE @BudgetAccountName varchar(20);
DECLARE @iFirstPeriod varchar(20);
DECLARE @mysql nvarchar(1000);
DECLARE @ParmDefinition NVARCHAR(200);

EXEC BG_GetBudgetAccountName
        @BudgetAccountName = @BudgetAccountName OUTPUT;
IF @BudgetAccountName is not null and exists(select   1   from   master..sysdatabases   where name=@BudgetAccountName)
        BEGIN
                DECLARE @existSql1 nvarchar(200);
                DECLARE @existSql2 nvarchar(200);
                DECLARE @exist1 varchar(100);
                DECLARE @exist2 varchar(100);
                SET @existSql1 = 'SELECT  @exist1 = ''true'' FROM '+@BudgetAccountName+'.[dbo].[sysobjects] WHERE   NAME = ''BG_BgYearPeriod'' and [type] = ''U''';
                SET @existSql2 = 'SELECT  @exist2 = ''true'' FROM '+@BudgetAccountName+'.[dbo].[sysobjects] WHERE   NAME = ''BG_BgYearVoucherDate'' and [type] = ''U''';

                exec sp_executesql @existSql1,N'@exist1 varchar(100) out ',@exist1 out
                exec sp_executesql @existSql2,N'@exist2 varchar(100) out ',@exist2 out
                IF  @exist1 = 'true' and @exist2 = 'true'
                BEGIN
                        SET @cacc_id = SUBSTRING(@BudgetAccountName, 8, 3);

                        SET @mysql = N'select @iFirstPeriod = iFirstPeriodOfCtrlAccount from (SELECT top 1 iFirstPeriodOfCtrlAccount FROM '+@BudgetAccountName+'..BG_BudgetYear WHERE iMakeYear = (SELECT top 1 iMakeYear FROM '+@BudgetAccountName+'..BG_LoginToMakeYear WHERE iLoginYear=@year)) a';
                        SET @ParmDefinition = N'@iFirstPeriod VARCHAR(20) OUT,@year INT'
                        EXECUTE sp_executesql @mysql, @ParmDefinition, @iFirstPeriod OUT,@year
                        PRINT @iFirstPeriod;
                        -----如果 @iFirstPeriod 为空，说明预算模块的iMakeYear还未初始化，或者期间有问题，此时应进入预算系统保存控制选项，不应用错误数据继续处理
                        IF(@iFirstPeriod IS NULL)
                        BEGIN
                                RETURN;
                        END
                        SET @mysql = N'DELETE  FROM '+@BudgetAccountName+'..BG_BgYearPeriod';
                        EXEC (@mysql);
                        SET @mysql = N'INSERT  INTO '+@BudgetAccountName+'..BG_BgYearPeriod
                                        ( iYear ,
                                          iId ,
                                          dBegin ,
                                          dEnd ,
                                          iBgYear ,
                                          iBgPeriod
                                        )
                                        SELECT  iYear ,
                                                        iId ,
                                                        dBegin ,
                                                        dEnd ,
                                                        YEAR(DATEADD(MONTH, -(' + @iFirstPeriod + ' - 1 ),
                                                                                 CAST(iYear AS NVARCHAR(4))+ ''-''
                                                                                 + CAST(iId AS NVARCHAR(4))+ ''-'' + ''1'')) AS iBgYear ,
                                                        MONTH(DATEADD(MONTH, -(' + @iFirstPeriod + ' - 1 ),
                                                                                  CAST(iYear AS NVARCHAR(4)) + ''-''
                                                                                  + CAST(iId AS NVARCHAR(4)) + ''-'' + ''1'')) AS iBgPeriod
                                        FROM    UFSystem..UA_Period
                                        WHERE   cAcc_Id = ' + @cacc_id;
                        EXEC (@mysql);
                        SET @mysql = N'DELETE  FROM '+@BudgetAccountName+'..BG_BgYearVoucherDate';
                        EXEC (@mysql);
                        SET @mysql = N'INSERT  INTO '+@BudgetAccountName+'..BG_BgYearVoucherDate
                                        ( iBgYear ,
                                          dBegin ,
                                          dEnd
                                        )
                                        SELECT  iBgYear ,
                                                        MIN(dBegin) ,
                                                        MAX(dEnd)
                                        FROM    '+@BudgetAccountName+'..BG_BgYearPeriod
                                        GROUP BY iBgYear';
                        EXEC (@mysql);
                END;
        END;
END;

sztlbb

create PROC [dbo].[BG_GetBudgetAccountName] @BudgetAccountName VARCHAR(20) OUTPUT
AS
    BEGIN
        DECLARE @cConnString VARCHAR(200);
        DECLARE @iIndex_b INTEGER;

        SET @cConnString = ( SELECT cConnString
                             FROM   BG_BudgetAccount
                           );
        SET @iIndex_b = CHARINDEX('database', @cConnString);
        SET @cConnString = STUFF(@cConnString, 1, @iIndex_b - 1, '');
        SET @cConnString = STUFF(@cConnString, CHARINDEX(';', @cConnString),
                                 LEN(@cConnString), '');
        SET @BudgetAccountName = STUFF(@cConnString, 1,
                                       CHARINDEX('=', @cConnString), '');
    END;

547135302

sztlbb 发表于 2019-1-2 12:14
上面那个要改成下面这个就可以执行了
create PROC [dbo]. @year INTEGER
AS

模块 'BG_CalcBgYear' 取决于缺少的对象 'BG_GetBudgetAccountName'。仍将创建此模块；但是，只有在该对象存在之后它才能成功运行。



我在查询器里执行后是这个结果  

547135302

sztlbb 发表于 2019-1-2 12:14
上面那个要改成下面这个就可以执行了
create PROC [dbo]. @year INTEGER
AS

这个地方的查的存储过程 ，没问题吧？ 可就是没有上面的说的那些对象。

yaoxiaoxiang

缺少存储过程，提示了。如果不清楚，可以私聊

sztlbb

在查询分析器中执行就可以了，

sztlbb

备份帐套下找不到是不可能的，肯定有

yangbolive

上一年中找到这个存储过程，建立到18年就可以解决

547135302

yangbolive 发表于 2019-1-2 16:10
上一年中找到这个存储过程，建立到18年就可以解决

我怎么找都找不到这些存储过程， 如果你能找到 截个图给我看看在哪

vinbill

谢谢，赚一下金币，帮你顶！

sztlbb

547135302 发表于 2019-1-2 15:40
模块 'BG_CalcBgYear' 取决于缺少的对象 'BG_GetBudgetAccountName'。仍将创建此模块；但是，只有在该对 ...

那是因为你缺少这个存储过程

sztlbb

547135302 发表于 2019-1-2 16:04
这个地方的查的存储过程 ，没问题吧？ 可就是没有上面的说的那些对象。

对，存储过程就是在这里查。

hayixia

新年开帐套后，在填制凭证中出现很多以往年度红字单边凭证，是怎么回事？怎么解决？请大神赐教