Feltet Forskuddsbetaling amt ekskl. mva. beregnes feil etter at du har endret verdien for forskuddsbetaling %i en ordre, selv om du bruker hurtigreparasjon 2558516 i Microsoft Dynamics NAV 2009

Denne artikkelen gjelder for Microsoft Dynamics NAV for alle land og alle språkinnstillinger.

Symptomer

Vurder følgende scenario i Microsoft Dynamics NAV 2009:

• Du bruker hurtigreparasjon 2558516.
    Hvis du vil ha mer informasjon, klikker du følgende artikkelnummer for å vise artikkelen i Microsoft Knowledge Base:
  2558516 feltet Forskuddsbetaling amt ekskl. mva. beregnes feil etter at du har endret verdien for forskuddsbetaling i %i en ordre i Microsoft Dynamics NAV 2009
• Du legger inn en forskuddsbetalingsfaktura for en ordre som har feltet Forskuddsbetaling i % angitt.
• Du leverer og fakturerer delvis noen enheter for bestillingen.
• Du åpner ordren på nytt.
• Du endrer verdien for forskuddsbetaling i % i ordren.

I dette scenarioet beregnes feltet Forskuddsbetaling amt ekskl. mva . feil.
Dette problemet oppstår i følgende produkter:

• Microsoft Dynamics NAV 2009 R2
• Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

      

Oppløsning

Hurtigreparasjonsinformasjon

En støttet hurtigreparasjon er nå tilgjengelig fra Microsoft. Det er imidlertid bare ment å rette opp problemet som er beskrevet i denne artikkelen. Bruk den bare på systemer som opplever dette spesifikke problemet. Denne hurtigreparasjonen kan få ytterligere testing. Hvis du ikke er alvorlig påvirket av dette problemet, anbefaler vi derfor at du venter på den neste Microsoft Dynamics NAV-oppdateringspakken eller den neste Microsoft Dynamics NAV-versjonen som inneholder denne hurtigreparasjonen.

Obs! I spesielle tilfeller kan kostnader som vanligvis påløper for støtteanrop, bli avbrutt hvis en technical support professional for Microsoft Dynamics og relaterte produkter bestemmer at en bestemt oppdatering vil løse problemet. De vanlige støttekostnadene gjelder for ytterligere støttespørsmål og problemer som ikke kvalifiserer for den aktuelle oppdateringen.

            
          

Installasjonsinformasjon

Microsoft tilbyr programmeringseksempler bare for illustrasjon, uten garanti enten uttrykt eller underforstått. Dette omfatter, men er ikke begrenset til, de underforståtte garantiene om salgbarhet eller egnethet for et bestemt formål. Denne artikkelen antar at du er kjent med programmeringsspråket som demonstreres, og med verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsoft kundestøtteteknikere kan bidra til å forklare funksjonaliteten til en bestemt prosedyre, men de vil ikke endre disse eksemplene for å gi ekstra funksjonalitet eller konstruere prosedyrer for å oppfylle dine spesifikke krav.

Obs! Før du installerer denne hurtigreparasjonen, må du kontrollere at alle Microsoft Navision-klientbrukere er logget av systemet. Dette inkluderer microsoft Navision Application Services (NAS)-klientbrukere. Du bør være den eneste klientbrukeren som er logget på når du implementerer denne hurtigreparasjonen.

Hvis du vil implementere denne hurtigreparasjonen, må du ha en utviklerlisens.

Vi anbefaler at brukerkontoen i Windows-påloggingsvinduet eller i vinduet Pålogginger for database tilordnes rolle-ID-en SUPER. Hvis brukerkontoen ikke kan tilordnes rolle-IDen SUPER, må du kontrollere at brukerkontoen har følgende tillatelser:

• Endre-tillatelsen for objektet du skal endre.
• Execute-tillatelsen for Objektet System Object ID 5210 og systemobjekt-ID 9015-objektet.

                
Vær oppmerksom på at du ikke trenger å ha rettigheter til datalagrene med mindre du må utføre datareparasjon.

Kodeendringer

Obs! Test alltid kodeløsninger i et kontrollert miljø før du bruker løsningene på produksjonsdatamaskinene.
Følg disse trinnene for å løse dette problemet:

1. Endre koden i UpdateAmounts-funksjonen i Salgslinje-tabellen (37) på følgende måte:
   Eksisterende kode

   ...
   FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
   END;
   IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
   "Prepayment VAT Difference" := 0;
   
   // Delete the following lines.
   IF "Quantity Invoiced" = 0 THEN BEGIN
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
   END ELSE BEGIN
   IF "Prepayment %" <> 0 THEN
   "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
   ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
   Currency."Amount Rounding Precision")
   ELSE
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" > "Line Amount" THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Line Amount"));
   END;
   // End of the lines.
   
   END;
   InitOutstandingAmount;
   IF (CurrFieldNo <> 0) AND
   NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
   ...
   

   Erstatningskode

   ...
   FIELDERROR("Unit Price",STRSUBSTNO(Text047,FIELDCAPTION("Prepayment %")));
   END;
   IF SalesHeader."Document Type" <> SalesHeader."Document Type"::Invoice THEN BEGIN
   "Prepayment VAT Difference" := 0;
   
   // Add the following lines.
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text049,"Prepmt. Amt. Inv."));
   // End of the lines.
   
   END;
   InitOutstandingAmount;
   IF (CurrFieldNo <> 0) AND
   NOT ((Type = Type::Item) AND (CurrFieldNo = FIELDNO("No.")) AND (Quantity <> 0) AND
   ...
   

2. Endre koden i UpdateAmounts-funksjonen i kjøpslinjetabellen (39) på følgende måte:
   Eksisterende kode

   ...
   FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
   END;
   IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
   "Prepayment VAT Difference" := 0;
   
   // Delete the following lines.
   IF "Quantity Invoiced" = 0 THEN BEGIN
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
   END ELSE BEGIN
   IF "Prepayment %" <> 0 THEN
   "Prepmt. Line Amount" := "Prepmt. Amt. Inv." +
   ROUND("Line Amount" * (Quantity - "Quantity Invoiced") / Quantity * "Prepayment %" / 100,
   Currency."Amount Rounding Precision")
   ELSE
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" > "Line Amount" THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Line Amount"));
   END;
   // End of the lines.
   
   END;
   IF PurchHeader.Status = PurchHeader.Status::Released THEN
   UpdateVATAmounts;
   ...
   

   Erstatningskode

   ...
   FIELDERROR("Direct Unit Cost",STRSUBSTNO(Text043,FIELDCAPTION("Prepayment %")));
   END;
   IF PurchHeader."Document Type" <> PurchHeader."Document Type"::Invoice THEN BEGIN
   "Prepayment VAT Difference" := 0;
   
   // Add the following lines.
   "Prepmt. Line Amount" := ROUND("Line Amount" * "Prepayment %" / 100,Currency."Amount Rounding Precision");
   IF "Prepmt. Line Amount" < "Prepmt. Amt. Inv." THEN
   FIELDERROR("Prepmt. Line Amount",STRSUBSTNO(Text037,"Prepmt. Amt. Inv."));
   // End of the lines.
   
   END;
   IF PurchHeader.Status = PurchHeader.Status::Released THEN
   UpdateVATAmounts;
   ...
   

3. Endre koden i kodefunksjonen i Sales-Post forskuddsbetalingskodeenhet (442) på følgende måte:
   Eksisterende kode

   ...
   REPEAT
   IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
   SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
   SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
   
   // Delete the following line.
   SalesLine.CalcPrepaymentToDeduct;
   
   SalesLine."Prepmt VAT Diff. to Deduct" :=
   SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
   SalesLine."Prepayment VAT Difference" := 0;
   SalesLine.MODIFY;
   ...
   

   Erstatningskode

   ...
   REPEAT
   IF SalesLine."Prepmt. Line Amount" <> SalesLine."Prepmt. Amt. Inv." THEN BEGIN
   SalesLine."Prepmt. Amt. Inv." := SalesLine."Prepmt. Line Amount";
   SalesLine."Prepmt. Amount Inv. Incl. VAT" := SalesLine."Prepmt. Amt. Incl. VAT";
   
   // Add the following line.
   SalesLine."Prepmt Amt to Deduct" := SalesLine."Prepmt. Amt. Inv." - SalesLine."Prepmt Amt Deducted";
   
   SalesLine."Prepmt VAT Diff. to Deduct" :=
   SalesLine."Prepmt VAT Diff. to Deduct" + SalesLine."Prepayment VAT Difference";
   SalesLine."Prepayment VAT Difference" := 0;
   SalesLine.MODIFY;
   ...
   

4. Endre koden i kodefunksjonen i kodeenheten for Purchase-Post forskuddsbetalinger (444) på følgende måte:
   Eksisterende kode

   ...
   REPEAT
   IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
   PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
   PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
   
   // Delete the following line.
   PurchLine.CalcPrepaymentToDeduct;
   
   PurchLine."Prepmt VAT Diff. to Deduct" :=
   PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
   PurchLine."Prepayment VAT Difference" := 0;
   PurchLine.MODIFY;
   ...
   

   Erstatningskode

   ...
   REPEAT
   IF PurchLine."Prepmt. Line Amount" <> PurchLine."Prepmt. Amt. Inv." THEN BEGIN
   PurchLine."Prepmt. Amt. Inv." := PurchLine."Prepmt. Line Amount";
   PurchLine."Prepmt. Amount Inv. Incl. VAT" := PurchLine."Prepmt. Amt. Incl. VAT";
   
   // Add the following line.
   PurchLine."Prepmt Amt to Deduct" := PurchLine."Prepmt. Amt. Inv." - PurchLine."Prepmt Amt Deducted";
   
   PurchLine."Prepmt VAT Diff. to Deduct" :=
   PurchLine."Prepmt VAT Diff. to Deduct" + PurchLine."Prepayment VAT Difference";
   PurchLine."Prepayment VAT Difference" := 0;
   PurchLine.MODIFY;
   ...
   

Forutsetninger

Du må ha ett av følgende produkter installert for å bruke denne hurtigreparasjonen:

• Microsoft Dynamics NAV 2009 R2
• Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)

Informasjon om fjerning

Du kan ikke fjerne denne hurtigreparasjonen.

Status

Microsoft har bekreftet at dette er et problem i Microsoft-produktene som er oppført i delen «Gjelder for».

Obs! Dette er en «FAST PUBLISH»-artikkel som er opprettet direkte fra Microsofts støtteorganisasjon. Informasjonen i dette er angitt som svar på nye problemer. Som et resultat av hastigheten på å gjøre det tilgjengelig, kan materialene inkludere typografiske feil og kan bli revidert når som helst uten varsel. Se vilkår for bruk for andre hensyn.