VAT がない正しく転記未実現 VAT および Microsoft Dynamics NAV 2009 年のイタリア語版で負の値の行を含む売上請求書を適用すると、

修正プログラムの情報

サポートされている修正プログラムはマイクロソフトから現在入手可能です。ただし、この資料に記載されている問題を解決するためのものはのみ。この特定の問題が発生したシステムにのみ適用してください。この修正プログラムは、今後さらにテストを行うことがあります。この問題で深刻な影響を受けていない場合は、次の Microsoft Dynamics NAV 2009 サービス パックまたは修正プログラムを含む次の Microsoft Dynamics NAV バージョン待つことを勧めします。

注: かかる料金が免除されるテクニカル サポート担当者 Microsoft Dynamics および関連製品のことは、通常は特別な場合は、特定の更新プログラムは、問題を解決するにを決定します。追加の質問および問題の特定のアップデートの対象にはなりませんが、通常のサポート料金が適用されます。

インストール情報

マイクロソフトでは解説することのみを目的としてプログラミング例を提供しています。暗示あるいは明示していることに対しての保証はしておりません。ここで言う保証とは、特定の目的に対する商品性や適合性の暗示的保証を含んでいますが、それに限定されるわけではありません。この資料では、例示されているプログラミング言語およびプロシージャの作成やデバッグに使用するツールにお客様が精通していることを前提としています。マイクロソフトのサポート エンジニアは、特定のプロシージャの機能について説明することができます。ただし、お客様固有の要件を満たすために、追加機能の提供またはプロシージャの作成のために、これらの例に変更を加えたりはしません。

注: この修正プログラムをインストールする前に、Microsoft Dynamics NAV のすべてのクライアント ユーザーがシステムの電源を記録することを確認します。これには、Microsoft Dynamics NAV アプリケーション サーバー (NAS) のサービスが含まれます。この修正プログラムを実装すると、ログオンしている唯一のクライアント ユーザーが必要です。

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

ユーザー アカウントまたはデータベース ログイン ウィンドウに Windows のログイン ウィンドウにある「スーパー」ロール id を割り当てられていることをお勧めします。ユーザー アカウントには、「スーパー」ロール ID を割り当てることができません、する場合は、ユーザー アカウントが次のアクセス許可を持っているを確認する必要があります。

• 変更するオブジェクトの変更のアクセス許可。

• 実行のアクセス許可、システム オブジェクトの ID 5210オブジェクトおよびシステム オブジェクトの ID 9015
  
  オブジェクトです。

注: データの修復を実行する必要があるない限り、データ ストアへの権限を持っている必要はありません。

コードの変更

注: 常にテスト コードを修正、管理された環境で適用する前に、運用コンピューターに修正プログラムします。

この問題を解決するには、次の手順を実行します。

1. VAT エントリ テーブル (254) では、キー内のコードを次のように変更します。
   既存のコード

   ...KeyGroups=SalesTax }
         {    ;Type,Country/Region Code,VAT Registration No.,VAT Bus. Posting Group,VAT Prod. Posting Group,Posting Date;
                                                        SumIndexFields=Base,Additional-Currency Base;
                                                        KeyGroups=VIES_EC }
   
   // Delete the following line.
        {    ;Document No.,Posting Date                }
   // End of the deleted line.
   
         {    ;Transaction No.                          }
         {    ;Tax Jurisdiction Code,Tax Group Used,Tax Type,Use Tax,Posting Date;
                                                        KeyGroups=SalesTax }
         {    ;Type,Closed,VAT Bus. Posting Group,VAT Prod. Posting Group,Tax Jurisdiction Code,Use Tax,Tax Liable,VAT Period,Operation Occurred Date,Activity Code,Blacklisted,Document Type,Bill-to/Pay-to No.,EU Service,Reverse Sales VAT,Document Date;
   ...
   

   置換用コード

   ...KeyGroups=SalesTax }
         {    ;Type,Country/Region Code,VAT Registration No.,VAT Bus. Posting Group,VAT Prod. Posting Group,Posting Date;
                                                        SumIndexFields=Base,Additional-Currency Base;
                                                        KeyGroups=VIES_EC }
   
   // Add the following line.
        {    ;Document No.,Posting Date               ;SumIndexFields=Remaining Unrealized Amount,Remaining Unrealized Base }
   // End of the added line.
   
         {    ;Transaction No.                          }
         {    ;Tax Jurisdiction Code,Tax Group Used,Tax Type,Use Tax,Posting Date;
                                                        KeyGroups=SalesTax }
         {    ;Type,Closed,VAT Bus. Posting Group,VAT Prod. Posting Group,Tax Jurisdiction Code,Use Tax,Tax Liable,VAT Period,Operation Occurred Date,Activity Code,Blacklisted,Document Type,Bill-to/Pay-to No.,EU Service,Reverse Sales VAT,Document Date;
   ...
   

2. VAT エントリ テーブル (254) 内のGetUnRealizedVATPart関数内のコードを次のように変更します。
   既存のコード

   ...(("Remaining Unrealized Amount" = 0) AND
                 ("Remaining Unrealized Base" = 0))
             THEN
               EXIT(0);
   
   // Delete the following lines.
           //IF ABS(Paid) = ABS(Full) THEN
           //   EXIT(1);
   // End of the deleted lines.
   
             CASE UnrealizedVatType OF
               UnrealizedVatType::Percentage:
                 BEGIN
   ...
   

   置換用コード

   ...(("Remaining Unrealized Amount" = 0) AND
                 ("Remaining Unrealized Base" = 0))
             THEN
               EXIT(0);
   
   // Add the following lines.
            IF ABS(Paid) = ABS(GetRemainingUnrealizedAmount("Document No.","Posting Date")) THEN
              EXIT(1);
   // End of the added lines.
   
             CASE UnrealizedVatType OF
               UnrealizedVatType::Percentage:
                 BEGIN
   ...
   

3. VAT エントリ テーブル (254) 内のGetRemainingUnrealizedAmount関数内のコードを次のように変更します。
   既存のコード

   ...CALCSUMS("Remaining Unrealized Base");
           EXIT("Remaining Unrealized Base");
         END;
   
         PROCEDURE GetBlacklistAmount@1130012() : Decimal;
         BEGIN
           IF CalculateSum THEN
             CALCSUMS("Blacklist Amount");
   ...
   

   置換用コード

   ...CALCSUMS("Remaining Unrealized Base");
           EXIT("Remaining Unrealized Base");
         END;
   
   // Add the following lines.
        LOCAL PROCEDURE GetRemainingUnrealizedAmount@1170000000(DocumentNo@1170000001 : Code[20];PostingDate@1170000002 : Date) : Decimal;
        VAR
          VATEntry@1170000000 : Record 254;
        BEGIN
          VATEntry.SETCURRENTKEY("Document No.","Posting Date");
          VATEntry.SETRANGE("Document No.",DocumentNo);
          VATEntry.SETRANGE("Posting Date",PostingDate);
          VATEntry.CALCSUMS("Remaining Unrealized Base","Remaining Unrealized Amount");
          EXIT(VATEntry."Remaining Unrealized Base" + VATEntry."Remaining Unrealized Amount");
        END;
   // End of the added lines.
   
         PROCEDURE GetBlacklistAmount@1130012() : Decimal;
         BEGIN
           IF CalculateSum THEN
             CALCSUMS("Blacklist Amount");
   ...
   

必要条件

この修正プログラムを適用するのにはインストールされている製品は次のいずれかが必要です。

• イタリア語版の Microsoft Dynamics NAV 2009 サービス パック 1

• Microsoft Dynamics NAV 2009 の R2 のイタリア語版

アンインストール情報

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