Microsoft Dynamics NAV R2 および Microsoft Dynamics NAV 2009 SP1 の東ヨーロッパバージョンで転記された VAT エントリでは、"VAT ベース (非控除可能) " フィールドと "VAT 金額 (非控除)" フィールドの値が正しくありません

適用先
Dynamics NAV 2009 Service Pack 1

この記事は、東ヨーロッパ (EE) リージョンの Microsoft Dynamics NAV に適用されます。

現象

東ヨーロッパバージョンの Microsoft Dynamics NAV 2009 R2 および Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) では、転記された VAT エントリの VAT ベース (非控除) フィールドと VAT 金額 (非控除) フィールドの値が正しくありません。 この問題は、以下の条件に該当する場合に発生します。

  • [未実現 VAT] フィールドは、[総勘定元帳の設定] で [はい] に設定されます。 VAT 転記設定の 未実現 VAT の種類 はパーセンテージです。
  • 非控除 VAT が使用されます。
  • 請求書は 2 つの支払いによって支払われます。

解決策

修正プログラムの情報

サポートされている修正プログラムが Microsoft から入手できるようになりました。 ただし、この記事で説明されている問題を修正することのみを目的としています。 この特定の問題が発生しているシステムにのみ適用します。 この修正プログラムは、追加のテストを受け取る場合があります。 したがって、この問題の影響を大きく受けない場合は、次の Microsoft Dynamics NAV 2009 Service Pack またはこの修正プログラムを含む次の Microsoft Dynamics NAV バージョンを待つことをおすすめします。

注 特別なケースでは、Microsoft Dynamics および関連製品のテクニカル サポート プロフェッショナルが特定の更新プログラムによって問題が解決されると判断した場合、通常はサポート呼び出しに対して発生する料金が取り消されることがあります。 ただし、特定の更新プログラムの対象とならない追加の質問および問題については、通常のサポート料金が適用されます。

            
          

インストール情報

Microsoft は、明示または黙示の保証なしで、説明のみを目的としてプログラミング例を提供しています。 これには、商品性または特定の目的への適合性に関する暗黙の保証が含まれますが、これらに限定されません。 この記事では、デモンストレーションされているプログラミング言語と、プロシージャの作成とデバッグに使用されるツールについてよく理解していることを前提としています。 マイクロソフト サポート窓口では、特定のプロシージャの機能説明に関するご質問に対して支援いたしますが、本例を特定の目的を満たすために機能を追加したり、プロシージャを構築することは行いません。

注 この修正プログラムをインストールする前に、すべての Microsoft Navision クライアント ユーザーがシステムからログオフされていることを確認します。 これには、Microsoft Navision Application Services (NAS) クライアント ユーザーが含まれます。 この修正プログラムを実装するときにログオンする唯一のクライアント ユーザーである必要があります。

この修正プログラムを実装するには、開発者ライセンスが必要です。

[Windows ログイン] ウィンドウまたは [データベース ログイン] ウィンドウのユーザー アカウントに "SUPER" ロール ID を割り当てることをお勧めします。 ユーザー アカウントに "SUPER" ロール ID を割り当てることができない場合は、ユーザー アカウントに次のアクセス許可があることを確認する必要があります。

  • 変更するオブジェクトの [変更] アクセス許可。
  • システム オブジェクト ID 5210 オブジェクトとシステム オブジェクト ID 9015 オブジェクトの Execute アクセス許可。

                
メモ データ修復を実行する必要がない限り、データ ストアに対する権限は必要ありません。

コードの変更

メモ 運用環境のコンピューターに修正プログラムを適用する前に、制御された環境でコード修正を常にテストします。
この問題を解決するには、次の手順を実行します。

  1. Gen の VendUnrealizedVAT 関数のコードを変更します。 Jnl.-Post Line codeunit (12) を次に示します。
    既存のコード

    ...
               VATEntry."Unrealized VAT Entry No." := VATEntry2."Entry No.";
                VATEntry."SAD No." := GenJnlLine."SAD No.";
                VATEntry."Customs Procedure Code" := GenJnlLine."Customs Procedure Code";
                VATEntry.INSERT;
                NextVATEntryNo := NextVATEntryNo + 1;
...

    置換コード

    ...
               VATEntry."Unrealized VAT Entry No." := VATEntry2."Entry No.";
                VATEntry."SAD No." := GenJnlLine."SAD No.";
                VATEntry."Customs Procedure Code" := GenJnlLine."Customs Procedure Code";

// Add the following lines.
                CalcNonDedVAT(
                  VATEntry2,VATEntry."VAT Amount (Non Deductible)",VATEntry."VAT Base (Non Deductible)",VATPart);
// End of the added lines.

                VATEntry.INSERT;
                NextVATEntryNo := NextVATEntryNo + 1;
...

  2. Gen のドキュメントのコードを変更します。 Jnl.-Post Line codeunit (12) を次に示します。
    既存のコード

    ...
       END;
      END;

      BEGIN
      END.
    }
  }
...

    置換コード

    ...
        END;
      END;

// Add the following lines.
      LOCAL PROCEDURE CalcNonDedVAT@1470009(VATEntry@1470000 : Record 254;VAR VATNDAmount@1470001 : Decimal;VAR VATNDBase@1470002 : Decimal;VATPart@1470003 : Decimal);
      VAR
        VATEntry2@1470004 : Record 254;
      BEGIN
        VATNDAmount := VATEntry."VAT Amount (Non Deductible)";
        VATNDBase := VATEntry."VAT Base (Non Deductible)";
        VATEntry2.SETRANGE("Unrealized VAT Entry No.",VATEntry."Entry No.");
        IF VATEntry2.FINDSET THEN
          REPEAT
            VATNDAmount := VATNDAmount - VATEntry2."VAT Amount (Non Deductible)";
            VATNDBase := VATNDBase - VATEntry2."VAT Base (Non Deductible)";
          UNTIL VATEntry2.NEXT = 0;

        IF VATPart <> 1 THEN BEGIN
          VATNDAmount := ROUND(VATNDAmount * VATPart);
          VATNDBase := ROUND(VATNDBase * VATPart);
        END;
      END;
// End of the added lines.

      BEGIN
      END.
    }
  }
...

          

前提条件

この修正プログラムを適用するには、東ヨーロッパバージョンの Microsoft Dynamics NAV 2009 R2 または東ヨーロッパバージョンの Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) がインストールされている必要があります。

アンインストール情報

この修正プログラムを削除することはできません。

状態

Microsoft は、これが "適用対象" セクションに記載されている Microsoft 製品の問題であることを確認しました。

参考資料

VSTF DynamicsNAV SE: 261081

注: この資料は、"迅速な公開" を目的としてマイクロソフト サポート組織により直接作成されたものです。 ここに含まれる情報は、新しい問題に対応するため、そのままの状態で提供されます。 情報を迅速に公開するため、この資料には誤植などが含まれる可能性があり、また、予告なく改訂される場合があります。 その他の注意事項については、使用条件を参照してください。