分析コードは引き続き仕訳帳明細行の残高勘定では、Microsoft Dynamics NAV を検証した後、分析コードが削除された場合でも

修正プログラムの情報

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

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

コードの変更

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

1. (81)、Gen. 仕訳帳明細行のテーブル内のCreateDim関数で新しいローカル変数を追加し、次のように変数を指定します。

   • 名: GenJnlLine2

   • データ型:レコード

   • サブタイプ: Gen. 仕訳帳明細行 (テーブル 81)

2. Gen. 仕訳帳明細行のテーブル (81) のCreateDim関数内のコードを次のように変更します。
   既存のコード

   ...IF "Line No." <> 0 THEN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Gen. Journal Line","Journal Template Name",
       "Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
   ...
   
   

   置換用コード

   ...IF "Line No." <> 0 THEN BEGIN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Gen. Journal Line","Journal Template Name",
       "Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
     IF GenJnlLine2.GET("Journal Template Name","Journal Batch Name","Line No.") THEN
       IF ("Shortcut Dimension 1 Code" <> GenJnlLine2."Shortcut Dimension 1 Code") OR 
          ("Shortcut Dimension 2 Code" <> GenJnlLine2."Shortcut Dimension 2 Code")
       THEN BEGIN
         GenJnlLine2."Shortcut Dimension 1 Code" := "Shortcut Dimension 1 Code";
         GenJnlLine2."Shortcut Dimension 2 Code" := "Shortcut Dimension 2 Code";
         GenJnlLine2.MODIFY;
         GET("Journal Template Name","Journal Batch Name","Line No.");
     END;
   END; 
   ...
   
   

3. (83)、品目の仕訳帳明細行のテーブル内のCreateDim関数で新しいローカル変数を追加し、次のように変数を指定します。

   • 名: ItemJnlLine2

   • データ型:レコード

   • サブタイプ:仕訳帳明細行の項目 (テーブル 83)

4. 品目仕訳帳明細行のテーブル (83) のCreateDim関数内のコードを次のように変更します。
   既存のコード

   ...IF "Line No." <> 0 THEN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Item Journal Line",
       "Journal Template Name","Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
   ...
   
   

   置換用コード

   ...IF "Line No." <> 0 THEN BEGIN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Item Journal Line",
       "Journal Template Name","Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
     IF ItemJnlLine2.GET("Journal Template Name","Journal Batch Name","Line No.") THEN
       IF ("Shortcut Dimension 1 Code" <> ItemJnlLine2."Shortcut Dimension 1 Code") OR 
          ("Shortcut Dimension 2 Code" <> ItemJnlLine2."Shortcut Dimension 2 Code")
       THEN BEGIN
         ItemJnlLine2."Shortcut Dimension 1 Code" := "Shortcut Dimension 1 Code";
         ItemJnlLine2."Shortcut Dimension 2 Code" := "Shortcut Dimension 2 Code";
         ItemJnlLine2.MODIFY;
         GET("Journal Template Name","Journal Batch Name","Line No.");
       END;
   END;
   ...
   
   

5. (83)、品目の仕訳帳明細行のテーブル内のCreateProdDim関数で新しいローカル変数を追加し、次のように変数を指定します。

   • 名: ItemJnlLine2

   • データ型:レコード

   • サブタイプ:仕訳帳明細行の項目 (テーブル 83)

6. 品目仕訳帳明細行のテーブル (83) のCreateProdDim関数内のコードを次のように変更します。
   既存のコード

   ...IF "Line No." <> 0 THEN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Item Journal Line",
       "Journal Template Name","Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
   ...
   
   

   置換用コード

   ...IF "Line No." <> 0 THEN BEGIN
     DimMgt.UpdateJnlLineDefaultDim(
       DATABASE::"Item Journal Line",
       "Journal Template Name","Journal Batch Name","Line No.",0,
       "Shortcut Dimension 1 Code","Shortcut Dimension 2 Code");
     IF ItemJnlLine2.GET("Journal Template Name","Journal Batch Name","Line No.") THEN
       IF ("Shortcut Dimension 1 Code" <> ItemJnlLine2."Shortcut Dimension 1 Code") OR 
          ("Shortcut Dimension 2 Code" <> ItemJnlLine2."Shortcut Dimension 2 Code")
       THEN BEGIN
         ItemJnlLine2."Shortcut Dimension 1 Code" := "Shortcut Dimension 1 Code";
         ItemJnlLine2."Shortcut Dimension 2 Code" := "Shortcut Dimension 2 Code";
         ItemJnlLine2.MODIFY;
         GET("Journal Template Name","Journal Batch Name","Line No.");
       END;
   ...