オランダ語バージョンの Microsoft Dynamics NAV で SEPA ファイルの検証が失敗する

適用先

Dynamics NAV 2009 Microsoft Dynamics NAV 5.0

この記事は、オランダ語 (nl) 言語ロケールの Microsoft Dynamics NAV に適用されます。

現象

オランダ語バージョンの Microsoft Dynamics NAV でサポートされている Pain.001.001.02.xsd スタイルシートに対してオランダの SEPA ファイルの検証を実行すると、検証は失敗します。この問題は、次の製品で発生します。

Microsoft Dynamics NAV 2009 R2 のオランダ語バージョン
Microsoft Dynamics NAV 2009 Service Pack 1 のオランダ語バージョン
オランダ語版 Microsoft Dynamics NAV 5.0 Service Pack 1

解決策

修正プログラムの情報

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

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

インストール情報

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

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

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

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

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

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

コードの変更

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

EXPORT SEPA ISO20022 レポート (11000011) の ExportGroupHeader 関数のコードを次のように変更します。
既存のコード

...
PaymentHistoryLine.RESET;
PaymentHistoryLine.SETCURRENTKEY("Our Bank",Status,"Run No.",Order,Date);
PaymentHistoryLine.SETRANGE("Our Bank","Payment History"."Our Bank");
PaymentHistoryLine.SETRANGE("Run No.","Payment History"."Run No.");

// Delete the following line.
AddElement(XMLNodeCurr,'NbOfTxs',FORMAT(PaymentHistoryLine.COUNT,15,9),'', XMLNewChild);

PaymentHistoryLine.CALCSUMS(Amount);
AddElement(XMLNodeCurr,'CtrlSum',FORMAT(PaymentHistoryLine.Amount,18,9),'', XMLNewChild);
AddElement(XMLNodeCurr,'Grpg','SNGL','', XMLNewChild);
AddElement(XMLNodeCurr,'InitgPty','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
...

置換コード

...
PaymentHistoryLine.RESET;
PaymentHistoryLine.SETCURRENTKEY("Our Bank",Status,"Run No.",Order,Date);
PaymentHistoryLine.SETRANGE("Our Bank","Payment History"."Our Bank");
PaymentHistoryLine.SETRANGE("Run No.","Payment History"."Run No.");

// Add the following line.
AddElement(XMLNodeCurr,'NbOfTxs',DELCHR(FORMAT(PaymentHistoryLine.COUNT,15,9),'=',' '),'', XMLNewChild);

PaymentHistoryLine.CALCSUMS(Amount);
AddElement(XMLNodeCurr,'CtrlSum',FORMAT(PaymentHistoryLine.Amount,18,9),'', XMLNewChild);
AddElement(XMLNodeCurr,'Grpg','SNGL','', XMLNewChild);
AddElement(XMLNodeCurr,'InitgPty','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
...

EXPORT SEPA ISO20022 レポート (11000011) の ExportPaymentInformation 関数のコードを次のように変更します。
既存のコード 1

...
BankAcc.GET(PaymentHistoryLine."Our Bank");
AddElement(XMLNodeCurr,'IBAN',COPYSTR(BankAcc.IBAN,1,34),'', XMLNewChild);
XMLNodeCurr := XMLNodeCurr.parentNode;

AddElement(XMLNodeCurr,'Tp','','', XMLNewChild);

// Delete the following lines.
XMLNodeCurr := XMLNewChild;
AddElement(XMLNodeCurr,'Ccy','EUR','', XMLNewChild);
// End of the lines.

XMLNodeCurr := XMLNodeCurr.parentNode;
XMLNodeCurr := XMLNodeCurr.parentNode;

AddElement(XMLNodeCurr,'DbtrAgt','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
...

置換コード 1

...
BankAcc.GET(PaymentHistoryLine."Our Bank");
AddElement(XMLNodeCurr,'IBAN',COPYSTR(BankAcc.IBAN,1,34),'', XMLNewChild);
XMLNodeCurr := XMLNodeCurr.parentNode;

AddElement(XMLNodeCurr,'Tp','','', XMLNewChild);

// Add the following lines.
XMLNodeCurr := XMLNewChild;
AddElement(XMLNodeCurr,'Cd','CASH','', XMLNewChild);
// End of the lines.

XMLNodeCurr := XMLNodeCurr.parentNode;
XMLNodeCurr := XMLNodeCurr.parentNode;

AddElement(XMLNodeCurr,'DbtrAgt','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
...

既存のコード 2

...
UNTIL BreakRemitInfoLoop OR (DetailLine.NEXT = 0) ;

IF (UnstructuredRemitInfo <> '') THEN BEGIN
AddElement(XMLNodeCurr,'RmtInf','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;

// Delete the following line.
AddElement(XMLNodeCurr,'Unstrd',UnstructuredRemitInfo,'', XMLNewChild);

XMLNodeCurr := XMLNodeCurr.parentNode;
END ELSE IF (PaymentHistoryLine."Description 1" <> '') THEN BEGIN
AddElement(XMLNodeCurr,'RmtInf','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
AddElement(XMLNodeCurr,'Unstrd',COPYSTR(PaymentHistoryLine."Description 1",1,140),'', XMLNewChild);
...

置換コード 2

...
UNTIL BreakRemitInfoLoop OR (DetailLine.NEXT = 0) ;

IF (UnstructuredRemitInfo <> '') THEN BEGIN
AddElement(XMLNodeCurr,'RmtInf','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;

// Add the following line.
AddElement(XMLNodeCurr,'Ustrd',UnstructuredRemitInfo,'', XMLNewChild);

XMLNodeCurr := XMLNodeCurr.parentNode;
END ELSE IF (PaymentHistoryLine."Description 1" <> '') THEN BEGIN
AddElement(XMLNodeCurr,'RmtInf','','', XMLNewChild);
XMLNodeCurr := XMLNewChild;
AddElement(XMLNodeCurr,'Unstrd',COPYSTR(PaymentHistoryLine."Description 1",1,140),'', XMLNewChild);
...

前提条件

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

Microsoft Dynamics NAV 2009 R2 のオランダ語バージョン
Microsoft Dynamics NAV 2009 Service Pack 1 のオランダ語バージョン
オランダ語版 Microsoft Dynamics NAV 5.0 Service Pack 1

アンインストール情報

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

状態

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

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