Denne artikel gælder for Microsoft Dynamics NAV for alle lande og landestandarder.
Symptomer
Antag, at du har en vare, der bruger den gennemsnitlige kostmetode. Når du kører værdireguleringen på varen, bliver varens kostpris uventet negativ. Desuden oplever du langsom ydeevne, når du udfører kørslen Juster omkostninger for varen.
Dette problem opstår i følgende produkter:
- Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
- Microsoft Dynamics NAV 2009
- Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) med hotfix 975251 anvendt
Bemærk! Du kan få flere oplysninger om hotfix 975251 ved at klikke på nedenstående artikelnummer for at få vist artiklen i Microsoft Knowledge Base:
975251 Du oplever langsom ydeevne, når du udfører kørslen Juster omkostninger for den gennemsnitlige omkostning i Microsoft Dynamics NAV 5.0
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 følge disse trin:
Skift koden i funktionen AvgValueEntriesToAdjustExist i kodeenheden Lagerregulering (5895) til følgende:
... IF FindNextRange THEN BEGIN AvgCostAdjmtEntryPoint."Valuation Date" := GetNextDate(AvgCostAdjmtEntryPoint."Valuation Date"); AvgValueEntriesToAdjustExist(OutbndValueEntry,ExcludedValueEntry,AvgCostAdjmtEntryPoint); END; // Add the following line. OutbndValueEntry.SETCURRENTKEY("Item Ledger Entry No."); ...Skift koden i funktionen IsExcludeEntryFromAvgCostCalc i kodeenheden Lagerregulering (5895) til følgende:
... IF NOT "Valued By Average Cost" THEN EXIT(FALSE); ItemLedgEntry.GET("Item Ledger Entry No."); IF ItemLedgEntry.Positive THEN EXIT(FALSE); // Delete the following line. EXIT(TRUE); // Add the following line. EXIT("Item Ledger Entry No." > OutbndValueEntry."Item Ledger Entry No."); ... ... // Delete the following lines. LOCAL PROCEDURE GetEntryNoToStartAt@78 BEGIN StartAt := 0; WITH ExcludedValueEntry DO BEGIN RESET; IF FINDFIRST THEN REPEAT IF "Partial Revaluation" AND (OutbndValueEntry."Entry No." > "Entry No.") THEN StartAt := "Entry No."; UNTIL NEXT = 0; END; EXIT(StartAt + 1); END; // End of the lines. ...Skift koden i funktionen AdjustItemAvgCost i kodeenheden Lagerregulering (5895) til følgende:
... WHILE NOT Restart AND AvgValueEntriesToAdjustExist( TempOutbndValueEntry,TempExcludedValueEntry,AvgCostAdjmtEntryPoint) DO BEGIN REPEAT // Delete the following lines. TempExcludedValueEntry.SETFILTER("Entry No.",'>=%1', GetEntryNoToStartAt(TempOutbndValueEntry,TempExcludedValueEntry)); // End of the lines. AdjustOutbndAvgEntry(TempOutbndValueEntry,TempExcludedValueEntry); UpdateConsumpAvgEntry(TempOutbndValueEntry); UNTIL TempOutbndValueEntry.NEXT = 0; ...Skift koden i funktionen IsExcludeEntryFromAvgCostCalc i kodeenheden Lagerregulering (5895) til følgende:
... BEGIN WITH ValueEntry DO BEGIN IF "Partial Revaluation" THEN // Delete the following line. EXIT(TRUE); // Add the following lines. EXIT( ("Entry No." > OutbndValueEntry."Entry No.") OR (("Entry No." < OutbndValueEntry."Entry No.") AND NOT IncludedInCostCalculation(ValueEntry,OutbndValueEntry."Item Ledger Entry No."))); // End of the lines. IF "Item Ledger Entry No." = OutbndValueEntry."Item Ledger Entry No." THEN EXIT(TRUE); ...
Forudsætninger
Du skal have et af følgende produkter installeret for at anvende dette hotfix:
- Microsoft Dynamics NAV 2009 Service Pack 1
- Microsoft Dynamics NAV 2009
- Microsoft Dynamics NAV 5.0 Service Pack 1 med hotfix 975251 anvendt
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".
Bemærk! Dette er en "FAST PUBLISH"-artikel, der er oprettet direkte fra Microsoft-supportorganisationen. Oplysningerne heri leveres, som de er som svar på nye problemer. Som følge af den hastighed, der er ved at stille den til rådighed, kan materialerne indeholde typografiske fejl og kan til enhver tid revideres uden varsel. Se Vilkår for anvendelse for andre overvejelser.