Duomenų lentelėje dokumentų dimensijų archyvas yra ne atnaujinta, kai naujinate iš Microsoft Dynamics NAV 2009 į Microsoft Dynamics 2013

Karštųjų pataisų informacija

Palaikomą naujausią pataisą dabar yra Microsoft. Tačiau jos skirtos tik šiame straipsnyje aprašytai problemai spręsti. Taikyti ją tik sistemoms, kuriose kyla ši konkreti problema. Šios karštosios pataisos gali būti papildomai išbandoma. Todėl, jei jums nelabai trukdo Ši problema, rekomenduojame palaukti kito "Microsoft Dynamics NAV 2009" pakeitimų paketo arba kitą versiją Microsoft Dynamics NAV, kuriame bus šios karštosios pataisos.

Pastaba. Konkrečiais atvejais už palaikymo skambučius gali būti atšaukti, jei techninės pagalbos specialistas Microsoft Dynamics ir susijusių produktų taikomi įprasti mokesčiai nustato, kad jūsų problemą galima išspręsti naudojant konkretų naujinimą. Į įprastos kainos už palaikymą taikomos papildomos palaikymo klausimams ir problemoms, kurių negalima išspręsti naudojant minėtą naujinimą.

Pastaba.

Pastaba. Visada bandymas kodas nustato kontroliuojamoje aplinkoje prieš taikydami nustato savo gamybos kompiuteriams.

Norėdami išspręsti šią problemą, atlikite šiuos veiksmus:

1. Pakeisti GetTableKeyFieldArray funkcija atnaujinti dimensijos įrašo - SQL Kodinys (104049):
   Esamas kodas

   ...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;
   ...
   

   Pastaba.

   ...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. Pakeisti GetDocDimArchiveTableKeyFieldArray funkcija atnaujinti dimensijos įrašo - SQL Kodinys (104049):
   Esamas kodas

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

   Pastaba.

   ...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;
   ...