Daten in der Tabelle Dimension Dokumentarchiv werden nicht aktualisiert, wenn Aktualisierung von Microsoft Dynamics NAV 2009 auf Microsoft Dynamics 2013

Hotfix-Informationen

Ein unterstützter Hotfix ist inzwischen von Microsoft erhältlich. Allerdings ist es lediglich zur Behebung dieses Problems. Wenden Sie es nur auf Systeme an, bei denen dieses spezielle Problem auftritt. Dieser Hotfix wird möglicherweise noch getestet. Wenn Ihr System durch dieses Problem nicht schwerwiegend beeinträchtigt ist, empfehlen wir, dass Sie warten auf das nächste Servicepack für Microsoft Dynamics NAV 2009 oder die nächste Microsoft Dynamics NAV-Version, die diesen Hotfix enthält.

Hinweis In besonderen Fällen bestimmt Gebühren fallen normalerweise Support aufrufen Wenn Experte Support für Microsoft Dynamics und zugehörige Produkte storniert werden können, dass ein bestimmtes Update Ihr Problem behebt. Die normalen Supportkosten gilt für zusätzliche Supportfragen und Probleme, die nicht für das betreffende Update qualifizieren.

Ändern von Code

Hinweis Testen Sie Programmcodeverbesserungen generell erst in einem Testsytem, bevor Sie sie im Produktionssystem verwenden.

Gehen Sie folgendermaßen vor, um dieses Problem zu beheben:

1. Ändern Sie den Code in der Funktion GetTableKeyFieldArray Upgrade Dimensionseingabe - SQL Codeunit (104049) wie folgt:
   Vorhandener code

   ...KeyRef := RecRef.KEYINDEX(1);
           IF KeyRef.FIELDCOUNT >= ARRAYLEN(KeyArr) THEN  // reserve the last index as 'stop code'
             ERROR(Text013,SQLMgt.GetTableNameSQL(TableID));
   
   // Delete the following lines.
          FOR i := 1 TO KeyRef.FIELDCOUNT DO BEGIN
            FieldRef := KeyRef.FIELDINDEX(i);
            KeyArr[i,1] := SQLMgt.StringConvert(FieldRef.NAME);
            KeyArr[i,2] := FORMAT(FieldRef.TYPE);
          END;
   // End of the deleted lines.
   
           RecRef.CLOSE;
         END;
   ...
   

   Neuer code

   ...KeyRef := RecRef.KEYINDEX(1);
           IF KeyRef.FIELDCOUNT >= ARRAYLEN(KeyArr) THEN  // reserve the last index as 'stop code'
             ERROR(Text013,SQLMgt.GetTableNameSQL(TableID));
   
   // Add the following lines.
          IF TableID = DATABASE::"Document Dimension Archive" THEN
            GetDocDimArchiveTableKeyFieldArray(KeyRef,FieldRef,KeyArr)
          ELSE
            FOR i := 1 TO KeyRef.FIELDCOUNT DO BEGIN
              FieldRef := KeyRef.FIELDINDEX(i);
              KeyArr[i,1] := SQLMgt.StringConvert(FieldRef.NAME);
              KeyArr[i,2] := FORMAT(FieldRef.TYPE);
            END;
   // End of the added lines.
   
           RecRef.CLOSE;
         END;
   ...
   

2. Ändern Sie den Code in der Funktion GetDocDimArchiveTableKeyFieldArray Upgrade Dimensionseingabe - SQL Codeunit (104049) wie folgt:
   Vorhandener code

   ...RecRef.CLOSE;
         END;
   
         LOCAL PROCEDURE AreDimKeyAndParentKeyCompatible@1(OffSet@1000 : Integer) : Boolean;
         VAR
           i@1002 : Integer;
   ...
   

   Neuer code

   ...RecRef.CLOSE;
         END;
   
   // Add the following lines.
        LOCAL PROCEDURE GetDocDimArchiveTableKeyFieldArray@19(VAR KeyRef@1001 : KeyRef;VAR FieldRef@1000 : FieldRef;VAR KeyArr@1002 : ARRAY [16,2] OF Text[80]);
        VAR
          i@1004 : Integer;
          j@1003 : Integer;
        BEGIN
          FOR i := 1 TO KeyRef.FIELDCOUNT DO BEGIN
            FieldRef := KeyRef.FIELDINDEX(i);
            CASE TRUE OF
              i = 4: j := 6;
              i = 5: j := 4;
              i = 6: j := 5;
              ELSE
                j := i;
            END;
            KeyArr[j,1] := SQLMgt.StringConvert(FieldRef.NAME);
            KeyArr[j,2] := FORMAT(FieldRef.TYPE);
          END
        END;
   // End of the added lines.
   
         LOCAL PROCEDURE AreDimKeyAndParentKeyCompatible@1(OffSet@1000 : Integer) : Boolean;
         VAR
           i@1002 : Integer;
   ...