Du kan bogføre en styklistekladde eller en salgsordre forkert, når dimensionsværdikoden for pakkekomponenten adskiller sig fra koden for den overordnede pakkevare i Microsoft Dynamics NAV 2009 SP1

Gælder for
Dynamics NAV 2009 Service Pack 1

Artikler, der udgives hurtigt, indeholder oplysninger direkte fra Microsoft-supportorganisationen. De oplysninger, der er indeholdt heri, oprettes som svar på nye eller unikke emner eller er beregnet til at supplere andre oplysninger i Knowledge Base.

Denne artikel gælder for Microsoft Dynamics NAV 2009 for alle lande og landestandarder.

Symptomer

Antag, at dimensionsværdikoden for pakkekomponentvaren adskiller sig fra koden for den overordnede pakkevare i Microsoft Dynamics NAV 2009 SP1. Når du bogfører en styklistekladde eller en salgsordre, giver Microsoft Dynamics NAV 2009 SP1 dig fejlagtigt mulighed for at bogføre styklistekladden eller en salgsordre uden en fejlmeddelelse. Dette problem opstår, selvom dimensionsværdiposteringskoden er defineret som den "samme kode" for både pakkekomponenten og den overordnede pakkevare.

Du forventer, at "en dimension, der bruges i varekladdelinjen, standard 10000, har forårsaget en fejl. Valgte dimensionsværdikode [Dimensionsværdi code_Number] for dimensionskoden [Dimension code_Number] for vare [Item_Number]", der skal vises, når du bogfører styklistekladden eller salgsordren i denne situation.

Dette problem opstår i de produkter, der har kittingfunktionen inkluderet i følgende lande:

  • Australien
  • Østrig
  • Frankrig
  • Indonesien
  • Malaysia
  • New Zealand
  • North America
  • Filippinerne
  • Singapore
  • Thailand

Løsning

Oplysninger om hotfix

Et understøttet hotfix er nu tilgængeligt fra Microsoft. Det er dog kun beregnet til at løse det problem, der er beskrevet i denne artikel. Anvend den kun på systemer, der oplever dette specifikke problem. Dette hotfix kan blive testet yderligere. Hvis du ikke er alvorligt berørt af dette problem, anbefaler vi derfor, at du venter på den næste Service Pack til Microsoft Dynamics NAV 2009 eller den næste Microsoft Dynamics NAV-version, der indeholder dette hotfix.

Bemærk! I særlige tilfælde kan gebyrer, der normalt påløber for supportopkald, blive annulleret, hvis en teknisk supportmedarbejder til Microsoft Dynamics og relaterede produkter afgør, at en bestemt opdatering løser dit problem. De sædvanlige supportomkostninger gælder for yderligere supportspørgsmål og -problemer, der ikke er kvalificeret til den pågældende opdatering.

            
          

Installationsoplysninger

Microsoft leverer kun programmeringseksempler til illustration uden garanti, hverken udtrykt eller underforstået. Dette omfatter, men er ikke begrænset til, underforståede garantier for salgbarhed eller egnethed til et bestemt formål. I denne artikel antages det, at du kender det programmeringssprog, der demonstreres, og med de værktøjer, der bruges til at oprette og foretage fejlfinding af procedurer. Microsofts supportteknikere kan hjælpe med at forklare funktionaliteten af en bestemt procedure, men de vil ikke ændre disse eksempler for at give ekstra funktionalitet eller konstruere procedurer, der opfylder dine specifikke krav.

Bemærk! Før du installerer dette hotfix, skal du kontrollere, at alle microsoft Navision-klientbrugere er logget af systemet. Dette omfatter klientbrugere af Microsoft Navision Application Services (NAS). Du bør være den eneste klientbruger, der er logget på, når du implementerer dette hotfix.

Hvis du vil implementere dette hotfix, skal du have en udviklerlicens.

Vi anbefaler, at brugerkontoen i vinduet Windows-logon eller i vinduet Databaselogon tildeles rolle-id'et "SUPER". Hvis brugerkontoen ikke kan tildeles rolle-id'et "SUPER", skal du kontrollere, at brugerkontoen har følgende tilladelser:

  • Tilladelsen Rediger for det objekt, du vil ændre.
  • Tilladelsen Execute for System Object ID 5210-objektet og for System Object ID 9015-objektet.

                
Bemærk! Du behøver ikke at have rettigheder til datalagrene, medmindre du skal udføre datareparation.

Kodeændringer

Bemærk! Test altid koderettelser i et kontrolleret miljø, før du anvender rettelserne på dine produktionscomputere.
Du kan løse dette problem ved at ændre koden i funktionen Kode i codeunit(32) på følgende måde:

Eksisterende kode

...
          ELSE
            BuildTotalDisassemblyCost(BOMJnlLine,ItemJnlLine.Amount - "Total Cost");

          TransferDimToItemJnlLine(ItemJnlLine,TempJnlLineDim2,FALSE);

          ReserveBOMJnlLine.TransferBOMJnlToItemJnlLine(BOMJnlLine,ItemJnlLine,"Quantity (Base)");
...

Erstatningskode

...
          ELSE
            BuildTotalDisassemblyCost(BOMJnlLine,ItemJnlLine.Amount - "Total Cost");

// Add the following line.
          TransferDimToItemJnlLine(ItemJnlLine,TempJnlLineDim2);
// End of the added line.

          ReserveBOMJnlLine.TransferBOMJnlToItemJnlLine(BOMJnlLine,ItemJnlLine,"Quantity (Base)");
...

skal du ændre koden i funktionen PostTempJnlLines i codeunit(32) for stykliste-jnl.-postlinjer på følgende måde:

Eksisterende kode

...
             IF TempItemJnlLine.FIND('-') THEN
          REPEAT
            TempItemJnlLine2 := TempItemJnlLine;
            TransferDimToItemJnlLine(TempItemJnlLine,TempJnlLineDim2,TRUE);
            ItemJnlPostLine.RunWithCheck(TempItemJnlLine,TempJnlLineDim2);
            WITH TempItemJnlLine DO BEGIN
              Quantity := TempItemJnlLine2.Quantity;
...

Erstatningskode

...
            IF TempItemJnlLine.FIND('-') THEN
          REPEAT
            TempItemJnlLine2 := TempItemJnlLine;

// Add the following line.
            TransferDimToItemJnlLine(TempItemJnlLine,TempJnlLineDim2);
// End of the added line.

            ItemJnlPostLine.RunWithCheck(TempItemJnlLine,TempJnlLineDim2);
            WITH TempItemJnlLine DO BEGIN
              Quantity := TempItemJnlLine2.Quantity;  
...

                
ændre koden i funktionen TransferDimToItemJnlLine i codeunit(32) FOR STYKLISTE.-postlinje på følgende måde:

Eksisterende kode

...
            TempJnlLineDim2."Journal Line No." := ItemJnlLine2."Line No.";
            TempJnlLineDim2."Allocation Line No." := 0;
            TempJnlLineDim2."Dimension Code" := TempJnlLineDim."Dimension Code";
            IF Consumption THEN
              IF DefDim.GET(DATABASE::Item,ItemJnlLine2."Item No.",TempJnlLineDim."Dimension Code") THEN BEGIN
                TempJnlLineDim2."Dimension Value Code" := DefDim."Dimension Value Code";
                CASE DefDim."Dimension Code" OF
                  GLSetup."Global Dimension 1 Code":
                    ItemJnlLine2."Shortcut Dimension 1 Code" := DefDim."Dimension Value Code";
                  GLSetup."Global Dimension 2 Code":
                    ItemJnlLine2."Shortcut Dimension 2 Code" := DefDim."Dimension Value Code";
                END;
              END ELSE
                TempJnlLineDim2."Dimension Value Code" := TempJnlLineDim."Dimension Value Code"
            ELSE
              TempJnlLineDim2."Dimension Value Code" := TempJnlLineDim."Dimension Value Code";
            TempJnlLineDim2.INSERT;
          UNTIL TempJnlLineDim.NEXT = 0;
        END;
...

Erstatningskode

...
            TempJnlLineDim2."Journal Line No." := ItemJnlLine2."Line No.";
            TempJnlLineDim2."Allocation Line No." := 0;
            TempJnlLineDim2."Dimension Code" := TempJnlLineDim."Dimension Code";

// Add the following line.
            TempJnlLineDim2."Dimension Value Code" := TempJnlLineDim."Dimension Value Code";
// End of the added line.
            TempJnlLineDim2.INSERT;
          UNTIL TempJnlLineDim.NEXT = 0;
        END;    
...

ændre koden i funktionen PostResourceCost i codeunit(32) for stykliste-jnl.-postlinje på følgende måde:

Eksisterende kode

...          
           ItemJnlLine.Kitting := TRUE;
          TotalCost := "Total Cost";
          UnitCost := "Unit Cost";
          TransferDimToItemJnlLine(ItemJnlLine,TempJnlLineDim2,TRUE);
         IF OutputItemLedgEntryNo <> 0 THEN BEGIN
         ItemJnlLine."Item Shpt. Entry No." := OutputItemLedgEntryNo;
...

Erstatningskode

...
          ItemJnlLine.Kitting := TRUE;
          TotalCost := "Total Cost";
          UnitCost := "Unit Cost";

// Add the following line.
          TransferDimToItemJnlLine(ItemJnlLine,TempJnlLineDim2);
// End of the added line.

         IF OutputItemLedgEntryNo <> 0 THEN BEGIN
         ItemJnlLine."Item Shpt. Entry No." := OutputItemLedgEntryNo;
...

Forudsætninger

Du skal have Microsoft Dynamics NAV 2009 SP1 installeret for at anvende dette hotfix.

Oplysninger om fjernelse

Du kan ikke fjerne dette hotfix.

Status

Microsoft har bekræftet, at dette er et problem i de Microsoft-produkter, der er angivet i afsnittet "Gælder for".

MICROSOFT OG/ELLER MICROSOFTS LEVERANDØRER GØR INGEN REPRÆSENTATIONER ELLER GARANTIER FOR EGNETHEDEN, PÅLIDELIGHEDEN ELLER NØJAGTIGHEDEN AF DE OPLYSNINGER, DER ER INDEHOLDT I DOKUMENTERNE OG DEN RELATEREDE GRAFIK, DER UDGIVES PÅ DETTE WEBSTED ("MATERIALERNE") TIL NOGET FORMÅL.

MATERIALERNE KAN INDEHOLDE TEKNISKE UNØJAGTIGHEDER ELLER TYPOGRAFISKE FEJL OG KAN TIL ENHVER TID REVIDERES UDEN VARSEL. I DET OMFANG DET ER TILLADT I HENHOLD TIL GÆLDENDE LOVGIVNING, FRASKRIVER MICROSOFT OG/ELLER MICROSOFTS LEVERANDØRER SIG OG UDELUKKER ALLE REPRÆSENTATIONER, GARANTIER OG BETINGELSER, UANSET OM DE ER UDTRYKKELIGE, UNDERFORSTÅEDE ELLER LOVFÆSTEDE, HERUNDER, MEN IKKE BEGRÆNSET TIL REPRÆSENTATIONER, GARANTIER ELLER BETINGELSER FOR TITEL, IKKE-KRÆNKELSE, TILFREDSSTILLENDE TILSTAND ELLER KVALITET, SALGBARHED OG EGNETHED TIL ET BESTEMT FORMÅL, MED HENSYN TIL MATERIALERNE.