ハンガリー語のバージョンの Microsoft Dynamics NAV 2009 の R2 の事前請求書 (納品 %HU レポート 14516 -) を印刷すると、付加価値税 (VAT) 句のセクションでは考慮されません。14516 ローカライズされたレポート「VAT 句」のセクションでは「売り上げ高-請求書 (%HU)」です。ただし、事前の請求書の転記処理をしません。この問題は、次の製品で発生します。
-
Microsoft Dynamics NAV 2009 の R2 のハンガリー語版
解決策
修正プログラムの情報
サポートされている修正プログラムはマイクロソフトから現在入手可能です。ただし、この資料に記載されている問題を解決するためのものはのみ。この特定の問題が発生したシステムにのみ適用してください。この修正プログラムは、今後さらにテストを行うことがあります。この問題で深刻な影響を受けていない場合は、次の Microsoft Dynamics NAV 2009 サービス パックまたは修正プログラムを含む次の Microsoft Dynamics NAV バージョン待つことを勧めします。
注: かかる料金が免除されるテクニカル サポート担当者 Microsoft Dynamics および関連製品のことは、通常は特別な場合は、特定の更新プログラムは、問題を解決するにを決定します。追加の質問および問題の特定のアップデートの対象にはなりませんが、通常のサポート料金が適用されます。
インストール情報
マイクロソフトでは解説することのみを目的としてプログラミング例を提供しています。暗示あるいは明示していることに対しての保証はしておりません。ここで言う保証とは、特定の目的に対する商品性や適合性の暗示的保証を含んでいますが、それに限定されるわけではありません。この資料では、例示されているプログラミング言語およびプロシージャの作成やデバッグに使用するツールにお客様が精通していることを前提としています。マイクロソフトのサポート エンジニアは、特定のプロシージャの機能について説明することができます。ただし、お客様固有の要件を満たすために、追加機能の提供またはプロシージャの作成のために、これらの例に変更を加えたりはしません。
注: この修正プログラムをインストールする前に、Microsoft Dynamics NAV のすべてのクライアント ユーザーがシステムの電源を記録することを確認します。これには、Microsoft Dynamics NAV アプリケーション サーバー (NAS) のサービスが含まれます。この修正プログラムを実装すると、ログオンしている唯一のクライアント ユーザーが必要です。
この修正プログラムを実装するには、開発者用のライセンスが必要です。
ユーザー アカウントまたはデータベース ログイン ウィンドウに Windows のログイン ウィンドウにある「スーパー」ロール id を割り当てられていることをお勧めします。ユーザー アカウントには、「スーパー」ロール ID を割り当てることができません、する場合は、ユーザー アカウントが次のアクセス許可を持っているを確認する必要があります。
-
変更するオブジェクトの変更のアクセス許可。
-
実行のアクセス許可、システム オブジェクトの ID 5210オブジェクトおよびシステム オブジェクトの ID 9015
オブジェクトです。
注: データの修復を実行する必要があるない限り、データ ストアへの権限を持っている必要はありません。
コードの変更
注常にテスト コードの修正プログラムの制御された環境で、運用コンピューターに修正プログラムを適用する前にします。変更を適用するには、前に SEPA のすべての更新プログラムをインポートしてください。
この問題を解決するには、次の手順を実行します。
-
次のように販売ポスト進めます Codeunit (26585) のグローバル変数内のコードを変更します。
既存のコード...Text008@1470035 : TextConst 'ENU=cannot be bigger than %1 %2.;HUN=nem lehet nagyobb, mint %1 %2.';
Text009@1470036 : TextConst 'ENU=Advance Letter: %1;HUN=El‹legbek‚r‹ lev‚l: %1';
Text010@1470039 : TextConst 'ENU=%1Advance Invoice: %2;HUN=%1El‹legsz mla: %2';
Text013@1470040 : TextConst 'ENU=Advance %1, %2 %3.;HUN=El‹leg - %1, %2 %3.';
Text014@1470000 : TextConst 'ENU=Advance Invoice, Order %1.;HUN=El‹legsz mla, rendel‚s: %1.';
PROCEDURE Invoice@1470000(VAR SalesHeader@1470000 : Record 36);
BEGIN
Code(SalesHeader,0);
END;
...置換用コード
...Text008@1470035 : TextConst 'ENU=cannot be bigger than %1 %2.;HUN=nem lehet nagyobb, mint %1 %2.';
Text009@1470036 : TextConst 'ENU=Advance Letter: %1;HUN=El‹legbek‚r‹ lev‚l: %1';
Text010@1470039 : TextConst 'ENU=%1Advance Invoice: %2;HUN=%1El‹legsz mla: %2';
Text013@1470040 : TextConst 'ENU=Advance %1, %2 %3.;HUN=El‹leg - %1, %2 %3.';
Text014@1470000 : TextConst 'ENU=Advance Invoice, Order %1.;HUN=El‹legsz mla, rendel‚s: %1.';
// Add the following line.
VATClauseBuffer@1470085 : TEMPORARY Record 26511;
// End of the added line.
PROCEDURE Invoice@1470000(VAR SalesHeader@1470000 : Record 36);
BEGIN
Code(SalesHeader,0);
END;
... -
販売投稿進めます Codeunit (26585) 内のPostLetter関数内のコードを次のように変更します。
既存のコード...UpdateOrderLine(SalesLine,"Prices Including VAT",TRUE);
SalesLine.MODIFY;
UNTIL SalesLine.NEXT = 0;
END;
LetterHeader2 := LetterHeader;
CLEAR(GenJnlPostLine);
Window.CLOSE;
EXIT(TRUE);
END;
...置換用コード
...UpdateOrderLine(SalesLine,"Prices Including VAT",TRUE);
SalesLine.MODIFY;
UNTIL SalesLine.NEXT = 0;
END;
LetterHeader2 := LetterHeader;
// Add the following lines.
SetVATClause(SalesInvHeader,SalesInvLine);
FinalizeVATClause(SalesInvHeader,SalesInvLine);
// End of the added lines.
CLEAR(GenJnlPostLine);
Window.CLOSE;
EXIT(TRUE);
END;
... -
販売投稿進めます Codeunit (26585) 内のSetVATClause関数内のコードを次のように変更します。
既存のコード...EXIT(FALSE);
UNTIL SalesLine.NEXT = 0;
EXIT(TRUE);
END;
BEGIN
END.
}
}
...置換用コード
...EXIT(FALSE);
UNTIL SalesLine.NEXT = 0;
EXIT(TRUE);
END;
// Add the following lines.
LOCAL PROCEDURE SetVATClause@1470048(SalesInvHeader@1470001 : Record 112;SalesInvLine@1470002 : Record 113);
BEGIN
WITH VATClauseBuffer DO
IF GET(SalesInvLine."VAT Bus. Posting Group",SalesInvLine."VAT Prod. Posting Group") THEN BEGIN
"VAT Base" +=
CurrExchRate.ExchangeAmtFCYToLCY(SalesInvHeader."Posting Date",
SalesInvHeader."Currency Code",
PrepmtInvBuffer.Amount,
SalesInvHeader."Currency Factor");
"VAT Amount" +=
(CurrExchRate.ExchangeAmtFCYToLCY(SalesInvHeader."Posting Date",
SalesInvHeader."Currency Code",
PrepmtInvBuffer."Amount Incl. VAT",
SalesInvHeader."Currency Factor") -
CurrExchRate.ExchangeAmtFCYToLCY(SalesInvHeader."Posting Date",
SalesInvHeader."Currency Code",
SalesInvLine.Amount,
SalesInvHeader."Currency Factor"));
MODIFY;
END ELSE BEGIN
"VAT Bus. Posting Group" := SalesInvLine."VAT Bus. Posting Group";
"VAT Prod. Posting Group" := SalesInvLine."VAT Prod. Posting Group";
"VAT Base" :=
CurrExchRate.ExchangeAmtFCYToLCY(SalesInvHeader."Posting Date",
SalesInvHeader."Currency Code",
PrepmtInvBuffer.Amount,
SalesInvHeader."Currency Factor");
"VAT Amount" :=
CurrExchRate.ExchangeAmtFCYToLCY(SalesInvHeader."Posting Date",
SalesInvHeader."Currency Code",
PrepmtInvBuffer."Amount Incl. VAT",
SalesInvHeader."Currency Factor") -
"VAT Base";
INSERT;
END;
END;
LOCAL PROCEDURE FinalizeVATClause@1470049(SalesInvHeader@1470002 : Record 112;SalesInvLine@1470003 : Record 113);
VAR
TransferExtText@1470000 : Codeunit 378;
VATClauseSetup@1470001 : Record 26512;
BEGIN
IF VATClauseBuffer.FINDSET THEN
REPEAT
VATClauseSetup.SETRANGE("VAT Bus. Posting Group",VATClauseBuffer."VAT Bus. Posting Group");
VATClauseSetup.SETRANGE("VAT Prod. Posting Group",VATClauseBuffer."VAT Prod. Posting Group");
IF VATClauseSetup.FINDSET THEN
REPEAT
VATClauseSetup.TESTFIELD("Standard Text Code");
TransferExtText.VATCheckIfAnyExtText(SalesInvHeader,VATClauseSetup."Standard Text Code");
TransferExtText.InsertVATExtText(SalesInvLine,VATClauseBuffer);
UNTIL VATClauseSetup.NEXT = 0;
UNTIL VATClauseBuffer.NEXT = 0;
END;
// End of the added lines.
BEGIN
END.
}
}
...
必要条件
この修正プログラムを適用するのにはインストールされている製品は次のいずれかが必要です。
-
Microsoft Dynamics NAV 2009 の R2 のハンガリー語版
アンインストール情報
この修正プログラムを削除することはできません。
状況
マイクロソフトは、この問題を「対象製品」セクションに記載されているマイクロソフト製品の問題として認識しています。
注: これは、マイクロソフト サポートの組織内から直接作成した「高速公開」の資料です。ここに含まれる情報は、新たに発生している問題に応じて現状のまま提供されています。速やかに利用できるようにした結果として、内容には誤植が含まれている可能性があり、事前告知なしで改訂する場合があります。その他の考慮事項については、使用条件を参照してください。
