349 宣言のスペイン語版の 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
  
  オブジェクトです。

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

コードの変更

注常にテスト コードの修正プログラムの制御された環境で、運用コンピューターに修正プログラムを適用する前にします。変更を適用するには、前に SEPA のすべての更新プログラムをインポートしてください。

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

1. 作成の 349 申告レポート (10710) では、データ項目数 5 のコードを次のように変更します。
   既存のコード
   

   ...// es0033.end
                                    VATInvSales.SETRANGE("EU 3-Party Trade",FALSE);
                                    VATInvSales.SETFILTER("Gen. Prod. Posting Group",FilterString);
                                    IF VATInvSales.FIND('-') THEN BEGIN
                                      REPEAT
   
   // Delete the following lines.
   //VSTF326796.begin
   IF (VATInvSales."Document No." <> LastDocNo) OR (VATInvSales."VAT Prod. Posting Group" <> LastVATPostGroup) THEN
   //VSTF326796.end
   IF IncludeIn349(VATInvSales,AmountToIncludein349,LocationDiffCountryCode) THEN BEGIN
   IF (VATInvSales."Country/Region Code" <> CountryCode) OR
   ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
   IF "VAT Registration No." <> '' THEN BEGIN
   SummarizeBaseAmount(VATInvSales,AmountToIncludein349,Amount);
   END ELSE
   EmptyVATRegNo := TRUE;
   END;
   END;
   //VSTF326796.begin
   LastDocNo := VATInvSales."Document No.";
   LastVATPostGroup := VATInvSales."VAT Prod. Posting Group";
   //VSTF326796.end
   // End of the deleted lines.
   
                                      UNTIL VATInvSales.NEXT = 0;
                                    END;
   
                                    VATInvSales.RESET;
                                    VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
   ... 
   

   置換用コード
   

   ...  // es0033.end
                                    VATInvSales.SETRANGE("EU 3-Party Trade",FALSE);
                                    VATInvSales.SETFILTER("Gen. Prod. Posting Group",FilterString);
                                    IF VATInvSales.FIND('-') THEN BEGIN
                                      REPEAT
   
   // Add the following lines.
   IF IncludeIn349(VATInvSales,AmountToIncludein349,LocationDiffCountryCode) THEN BEGIN
   IF (VATInvSales."Country/Region Code" <> CountryCode) OR
   ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
   IF "VAT Registration No." <> '' THEN BEGIN
   SummarizeBaseAmount(VATInvSales,AmountToIncludein349,Amount);
   END ELSE
   EmptyVATRegNo := TRUE;
   END;
   END;
   // End of the added lines.
   
                                      UNTIL VATInvSales.NEXT = 0;
                                    END;
   
                                    VATInvSales.RESET;
                                    VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);
   ... 
   

2. 次のように、データ項目の 6 番の 349 申告レポート (10710) 内のコードを変更します。
   既存のコード 1
   

   ...//es0029.begin
                                        // es0033.begin
                                        //IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
                                        // es0033.end
                                        //es0029.end
   
   // Delete the following lines.
   //VSTF326796.begin
   IF (VATInvPurch."Document No." <> LastDocNo) OR (VATInvPurch."VAT Prod. Posting Group" <> LastVATPostGroup) THEN
   //VSTF326796.end
   IF IncludeIn349(VATInvPurch,AmountToIncludein349,LocationDiffCountryCode) THEN BEGIN
   IF (VATInvPurch."Country/Region Code" <> CountryCode) OR
   ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
   IF "VAT Registration No." <> '' THEN BEGIN
   IF (AmountToIncludein349 <> 0) AND ("Currency Code" = '') THEN // ES0030
   NormalAmount := NormalAmount + AmountToIncludein349
   ELSE
   NormalAmount := NormalAmount + VATInvPurch.Base;
   END ELSE
   EmptyVATRegNo := TRUE;
   END;
   END;
   // End of the deleted lines.
   
                                        //es0029.begin
                                        // es0033.begin
                                        //LastTransactionNo := VATInvPurch."Transaction No.";
                                        // es0033.end
                                        //es0029.end
   ... 
   

   置換用コード 1
   

   ... //es0029.begin
                                        // es0033.begin
                                        //IF VATInvPurch."Transaction No." <> LastTransactionNo THEN
                                        // es0033.end
                                        //es0029.end
   
   // Add the following lines.
   IF IncludeIn349(VATInvPurch,AmountToIncludein349,LocationDiffCountryCode) THEN BEGIN
   IF (VATInvPurch."Country/Region Code" <> CountryCode) OR
   ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN
   IF "VAT Registration No." <> '' THEN BEGIN
   IF (AmountToIncludein349 <> 0) AND ("Currency Code" = '') THEN // ES0030
   NormalAmount := NormalAmount + AmountToIncludein349
   ELSE
   NormalAmount := NormalAmount + VATInvPurch.Base;
   END ELSE
   EmptyVATRegNo := TRUE;
   END;
   END;
   // End of the added lines.
   
                                        //es0029.begin
                                        // es0033.begin
                                        //LastTransactionNo := VATInvPurch."Transaction No.";
                                        // es0033.end
                                        //es0029.end
   ...
   

   既存のコード 2
   

   ...//es0029.begin
                                        // es0033.begin
                                        //LastTransactionNo := VATInvPurch."Transaction No.";
                                        // es0033.end
                                        //es0029.end
   
   // Delete the following lines.
   //VSTF326796.Begin
   LastDocNo := VATInvPurch."Document No.";
   LastVATPostGroup := VATInvPurch."VAT Prod. Posting Group";
   //VSTF326796.End
   // End of the deleted lines.
   
                                      UNTIL VATInvPurch.NEXT = 0;
                                    END;
   
                                    // es0033.begin
                                    //LastTransactionNo := 0;
   ...
   

   置換用コード 2
   

   ... //es0029.begin
                                        // es0033.begin
                                        //LastTransactionNo := VATInvPurch."Transaction No.";
                                        // es0033.end
                                        //es0029.end
                                      UNTIL VATInvPurch.NEXT = 0;
                                    END;
   
                                    // es0033.begin
                                    //LastTransactionNo := 0;
   ...
   

3. 次のように、加える 349 申告レポート (10710) のグローバル変数内のコードを変更します。
   既存のコード
   

   ...EUServiceAlreadyExported@1100077 : Boolean;
           ThirdPartyAlreadyExported@1100078 : Boolean;
           FileNameControlVisible@19024830 : Boolean INDATASET;
           PeriodFrequencyChangeEnable@19073723 : Boolean INDATASET;
           Idx@1100080 : ',E,M,H';
   
   // Delete the following lines.
   LastDocNo@1100082 : Code[20];
   LastVATPostGroup@1100083 : Code[20];
   // End of the deleted lines.
   
   
         PROCEDURE FormatTextAmt@1100101(Amount@1100100 : Decimal) : Text[15];
         VAR
           TextAmt@1100101 : Text[15];
         BEGIN
   ...
   

   置換用コード
   

   ...EUServiceAlreadyExported@1100077 : Boolean;
           ThirdPartyAlreadyExported@1100078 : Boolean;
           FileNameControlVisible@19024830 : Boolean INDATASET;
           PeriodFrequencyChangeEnable@19073723 : Boolean INDATASET;
           Idx@1100080 : ',E,M,H';
   
         PROCEDURE FormatTextAmt@1100101(Amount@1100100 : Decimal) : Text[15];
         VAR
           TextAmt@1100101 : Text[15];
         BEGIN
   ...
   
   

必要条件

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

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

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

アンインストール情報

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