Nontaxable の VAT は、Microsoft Dynamics NAV 2009 年のスペイン語版で 349 の宣言を行うレポートのエクスポートが含まれている国内の請求書

修正プログラムの情報

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

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

インストール情報

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

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

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

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

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

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

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

コードの変更

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

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

1. 349 の宣言を行うレポート (10710) のデータ項目数 5 のコードを次のように変更します。
   既存のコード

   ...SalesInvLine.SETRANGE("Posting Date",FromDate,ToDate);
   SalesInvLine.SETRANGE("VAT Calculation Type",SalesInvLine."VAT Calculation Type"::"No Taxable VAT");
   SalesInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
   IF SalesInvLine.FINDSET THEN
   REPEAT
   
   // Delete the following lines.
   IF VATPostingSetup.GET(SalesInvLine."VAT Bus. Posting Group",SalesInvLine."VAT Prod. Posting Group") THEN
   IF VATPostingSetup."EU Service" THEN
   NoTaxableAmountEUService := NoTaxableAmountEUService + SalesInvLine."Line Amount"
   ELSE
   IF SalesInvHeader.GET(SalesInvLine."Document No.") THEN
   // End of the deleted lines.
   
   IF SalesInvHeader."EU 3-Party Trade" THEN
   NoTaxableAmountOpTri := NoTaxableAmountOpTri + SalesInvLine."Line Amount"
   ELSE
   NoTaxableNormalAmount := NoTaxableNormalAmount + SalesInvLine."Line Amount"
   UNTIL SalesInvLine.NEXT = 0;
   ...
   

   置換用コード

   ...SalesInvLine.SETRANGE("Posting Date",FromDate,ToDate);
   SalesInvLine.SETRANGE("VAT Calculation Type",SalesInvLine."VAT Calculation Type"::"No Taxable VAT");
   SalesInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
   IF SalesInvLine.FINDSET THEN
   REPEAT
   
   // Add the following lines.
   SalesInvHeader.GET(SalesInvLine."Document No.");
   IF SalesInvHeader."Bill-to Country/Region Code" <> CompanyInfo."Country/Region Code" THEN
   IF VATPostingSetup.GET(SalesInvLine."VAT Bus. Posting Group",SalesInvLine."VAT Prod. Posting Group") THEN
   IF VATPostingSetup."EU Service" THEN
   NoTaxableAmountEUService := NoTaxableAmountEUService + SalesInvLine."Line Amount"
   ELSE
   // End of the added lines.
   
   IF SalesInvHeader."EU 3-Party Trade" THEN
   NoTaxableAmountOpTri := NoTaxableAmountOpTri + SalesInvLine."Line Amount"
   ELSE
   NoTaxableNormalAmount := NoTaxableNormalAmount + SalesInvLine."Line Amount"
   UNTIL SalesInvLine.NEXT = 0;
   ...
   

2. とおり 349 の宣言を行うレポート (10710) のデータ項目の 6 番のコードを変更します。
   既存のコード 1

   ...END;
   
   OnAfterGetRecord=VAR
   PurchInvLine@1030003 : Record 123;
   BEGIN
   WHILE (Vendor."VAT Registration No." = PreVATRegNo) OR (Vendor."VAT Registration No." = '') DO // ES0032
   IF Vendor.NEXT = 0 THEN
   EXIT;
   ...
   

   置換用コード 1

   ...OnAfterGetRecord=VAR
   PurchInvLine@1030003 : Record 123;
   
   // Add the following line.
   PurchInvHeader@1100000 : Record 122;
   // End of the added line.
   
   BEGIN
   WHILE (Vendor."VAT Registration No." = PreVATRegNo) OR (Vendor."VAT Registration No." = '') DO // ES0032
   IF Vendor.NEXT = 0 THEN
   EXIT;
   ...
   

   既存のコード 2

   ...PurchInvLine.SETRANGE("Posting Date",FromDate,ToDate);
   PurchInvLine.SETRANGE("VAT Calculation Type",PurchInvLine."VAT Calculation Type"::"No Taxable VAT");
   PurchInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
   IF PurchInvLine.FINDSET THEN
   REPEAT
   
   // Delete the following lines.
   IF VATPostingSetup.GET(PurchInvLine."VAT Bus. Posting Group",PurchInvLine."VAT Prod. Posting Group") THEN
   IF VATPostingSetup."EU Service" THEN
   NoTaxableAmountEUService := NoTaxableAmountEUService + PurchInvLine."Line Amount"
   ELSE
   NoTaxableNormalAmount := NoTaxableNormalAmount + PurchInvLine."Line Amount"
   // End of the deleted lines.
   
   UNTIL PurchInvLine.NEXT = 0;
   UNTIL Vendor2.NEXT = 0;
   
   IF "VAT Registration No." <> '' THEN BEGIN
   ...
   

   置換用コード 2

   ...PurchInvLine.SETRANGE("Posting Date",FromDate,ToDate);
   PurchInvLine.SETRANGE("VAT Calculation Type",PurchInvLine."VAT Calculation Type"::"No Taxable VAT");
   PurchInvLine.SETFILTER("Gen. Prod. Posting Group",FilterString);
   IF PurchInvLine.FINDSET THEN
   REPEAT
   
   // Add the following lines.
   PurchInvHeader.GET(PurchInvLine."Document No.");
   IF PurchInvHeader."Pay-to Country/Region Code" <> CompanyInfo."Country/Region Code" THEN
   IF VATPostingSetup.GET(PurchInvLine."VAT Bus. Posting Group",PurchInvLine."VAT Prod. Posting Group") THEN
   IF VATPostingSetup."EU Service" THEN
   NoTaxableAmountEUService := NoTaxableAmountEUService + PurchInvLine."Line Amount"
   ELSE
   NoTaxableNormalAmount := NoTaxableNormalAmount + PurchInvLine."Line Amount"
   // End of the added lines.
   
   UNTIL PurchInvLine.NEXT = 0;
   UNTIL Vendor2.NEXT = 0;
   
   IF "VAT Registration No." <> '' THEN BEGIN
   ...
   

必要条件

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

• Microsoft Dynamics NAV 2009 の R2 のスペイン語版

• スペイン語版の Microsoft Dynamics NAV 2009 サービス パック 1

アンインストール情報

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