Foutbericht 'De memoregel financiële kosten bestaat al' of 'De herinneringsregel bestaat al' wanneer u een herinnering of een memo met financiële kosten voor een klant maakt in Microsoft Dynamics NAV 2009 SP1

Van toepassing op
Dynamics NAV 2009 Service Pack 1

Dit artikel is van toepassing op Microsoft Dynamics NAV voor alle landinstellingen.

Symptomen

U maakt een herinnering of een memo over financiële kosten voor een klant in Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). Vervolgens wordt een afrondende factuurvermelding gemaakt. Wanneer u echter de tweede herinnering of de memo voor financiële kosten voor de klant probeert te maken, ontvangt u een van de volgende foutberichten:

Opmerking

De memoregel Financiële kosten bestaat al

Opmerking

De herinneringsregel bestaat al

Oplossing

Hotfix-informatie

Er is nu een ondersteunde hotfix beschikbaar bij Microsoft. Het is echter alleen bedoeld om het probleem op te lossen dat in dit artikel wordt beschreven. Pas deze alleen toe op systemen die dit specifieke probleem ondervinden. Deze hotfix kan aanvullende tests ontvangen. Als u niet ernstig last hebt van dit probleem, raden we u daarom aan te wachten op het volgende Microsoft Dynamics NAV 5.0-servicepack of de volgende Versie van Microsoft Dynamics NAV die deze hotfix bevat.

Opmerking In speciale gevallen kunnen kosten die gewoonlijk worden gemaakt voor ondersteuningsoproepen worden geannuleerd als een technische ondersteuningsmedewerker voor Microsoft Dynamics en gerelateerde producten vaststelt dat een specifieke update uw probleem oplost. De gebruikelijke ondersteuningskosten zijn van toepassing op aanvullende ondersteuningsvragen en problemen die niet in aanmerking komen voor de specifieke update in kwestie.

            
          

Installatie-informatie

Microsoft biedt programmeervoorbeelden uitsluitend ter illustratie, zonder uitdrukkelijke of impliciete garantie. Dit omvat, maar is niet beperkt tot, de impliciete garanties van verkoopbaarheid of geschiktheid voor een bepaald doel. In dit artikel wordt ervan uitgegaan dat u bekend bent met de programmeertaal die wordt gedemonstreerd en met de hulpprogramma's die worden gebruikt om procedures te maken en fouten op te sporen. Microsoft-ondersteuningstechnici kunnen helpen bij het uitleggen van de functionaliteit van een bepaalde procedure, maar ze zullen deze voorbeelden niet wijzigen om extra functionaliteit te bieden of procedures te maken die voldoen aan uw specifieke vereisten.

Opmerking Voordat u deze hotfix installeert, controleert u of alle Microsoft Navision-clientgebruikers zijn afgemeld bij het systeem. Dit geldt ook voor gebruikers van Microsoft Navision Application Services (NAS). U moet de enige clientgebruiker zijn die is aangemeld wanneer u deze hotfix implementeert.

Als u deze hotfix wilt implementeren, moet u een ontwikkelaarslicentie hebben.

We raden u aan om aan het gebruikersaccount in het venster Windows-aanmeldingen of in het venster Databaseaanmeldingen de rol-id 'SUPER' toe te wijzen. Als de rol-id 'SUPER' niet kan worden toegewezen aan het gebruikersaccount, moet u controleren of het gebruikersaccount de volgende machtigingen heeft:

  • De machtiging Wijzigen voor het object dat u gaat wijzigen.
  • De machtiging Uitvoeren voor het object Systeemobject-id 5210 en voor het object Systeemobject-id 9015.

                
Opmerking U hoeft geen rechten te hebben voor de gegevensarchieven, tenzij u gegevensherstel moet uitvoeren.

Codewijzigingen

Opmerking Test altijd codecorrecties in een beheerde omgeving voordat u de correcties toepast op uw productiecomputers.
Voer de volgende stappen uit om dit probleem op te lossen:

  1. Wijzig de code in de functie InsertLines in de tabel Herinneringsheader (295) als volgt:
    Bestaande code

    ...
  ReminderLevel."Reminder Terms Code",ReminderLevel."No.","Currency Code")
ELSE
CurrencyForReminderLevelFound := FALSE;

// Delete the following lines.
 IF (NOT CurrencyForReminderLevelFound AND (ReminderLevel."Additional Fee (LCY)" <> 0)) OR
 (CurrencyForReminderLevelFound AND (CurrencyForReminderLevel."Additional Fee" <> 0))
 THEN BEGIN
 ReminderLine.RESET;
 ReminderLine.SETRANGE("Reminder No.","No.");
 ReminderLine.SETRANGE("Line Type",ReminderLine."Line Type"::ReminderLine);
 ReminderLine."Reminder No." := "No.";
 IF ReminderLine.FIND('+') THEN
 NextLineNo := ReminderLine."Line No."
 ELSE
 NextLineNo := 0;
 ReminderLine.SETRANGE("Line Type");
 ReminderLine2 := ReminderLine;
 ReminderLine2.COPYFILTERS(ReminderLine);
 IF ReminderLine2.NEXT <> 0 THEN BEGIN
 LineSpacing := (ReminderLine2."Line No." - ReminderLine."Line No.") DIV 3;
 END ELSE
 LineSpacing := 10000;
InsertBlankLine(ReminderLine."Line Type"::"Additional Fee");
// End of the deleted lines.

NextLineNo := NextLineNo + LineSpacing;
ReminderLine.INIT;
ReminderLine."Line No." := NextLineNo;  
...

    Vervangende code

    ...
 ReminderLevel."Reminder Terms Code",ReminderLevel."No.","Currency Code")
ELSE
CurrencyForReminderLevelFound := FALSE;

// Add the following lines.
 IF (NOT CurrencyForReminderLevelFound) OR
 (CurrencyForReminderLevelFound AND (CurrencyForReminderLevel."Additional Fee" <>0))
 THEN BEGIN
 ReminderLine.RESET;
 ReminderLine.SETRANGE("Reminder No.","No.");
 ReminderLine.SETRANGE("Line Type",ReminderLine."Line Type"::ReminderLine);
 ReminderLine."Reminder No." := "No.";
 IF ReminderLine.FIND('+') THEN
 NextLineNo := ReminderLine."Line No."
 ELSE
 NextLineNo := 0;
 ReminderLine.SETRANGE("Line Type");
 ReminderLine2 := ReminderLine;
 ReminderLine2.COPYFILTERS(ReminderLine);
 IF ReminderLine2.NEXT <> 0 THEN BEGIN
 LineSpacing := (ReminderLine2."Line No." - ReminderLine."Line No.") DIV 3;
 END ELSE
 LineSpacing := 10000;
 InsertBlankLine(ReminderLine."Line Type"::"Additional Fee");
 END;
 IF (NOT CurrencyForReminderLevelFound AND (ReminderLevel."Additional Fee (LCY)" <>0)) OR
 (CurrencyForReminderLevelFound AND (CurrencyForReminderLevel."Additional Fee" <> 0))
 THEN BEGIN
// End of the added lines.

NextLineNo := NextLineNo + LineSpacing;
ReminderLine.INIT;
ReminderLine."Line No." := NextLineNo;  
...

  2. Wijzig de code in de functie InsertLines in de Headertable Finance Charge Memo (302) als volgt:
    Bestaande code

    ...
BEGIN
TESTFIELD("Fin. Charge Terms Code");
FinChrgTerms.GET("Fin. Charge Terms Code");

// Delete the following lines.
 IF FinChrgTerms."Additional Fee (LCY)" <> 0 THEN BEGIN
 FinChrgMemoLine.RESET;
 FinChrgMemoLine.SETRANGE("Finance Charge Memo No.","No.");
 FinChrgMemoLine."Finance Charge Memo No." := "No.";
 IF FinChrgMemoLine.FIND('+') THEN
 NextLineNo := FinChrgMemoLine."Line No."
 ELSE
 NextLineNo := 0;
 IF (FinChrgMemoLine.Type <>FinChrgMemoLine.Type::" ") OR
 (FinChrgMemoLine.Description <> '')
 THEN BEGIN
 LineSpacing := 10000;
 InsertBlankLine(FinChrgMemoLine."Line Type"::"Finance Charge Memo Line");
 END;
// End of the deleted lines.

NextLineNo := NextLineNo + 10000;
FinChrgMemoLine.INIT;
FinChrgMemoLine."Line No." := NextLineNo;  
...

    Vervangende code

    ...
 BEGIN
TESTFIELD("Fin. Charge Terms Code");
FinChrgTerms.GET("Fin. Charge Terms Code");

// Add the following lines.
 FinChrgMemoLine.RESET;
 FinChrgMemoLine.SETRANGE("Finance Charge Memo No.","No.");
 FinChrgMemoLine."Finance Charge Memo No." := "No.";
 IF FinChrgMemoLine.FIND('+') THEN
 NextLineNo := FinChrgMemoLine."Line No."
 ELSE
 NextLineNo := 0;
 IF (FinChrgMemoLine.Type <> FinChrgMemoLine.Type::" ") OR
 (FinChrgMemoLine.Description <>'')
 THEN BEGIN
 LineSpacing := 10000;
 InsertBlankLine(FinChrgMemoLine."Line Type"::"Finance Charge Memo Line");
 END;
 IF FinChrgTerms."Additional Fee (LCY)" <> 0 THEN BEGIN
// End of the added lines.

NextLineNo := NextLineNo + 10000;
FinChrgMemoLine.INIT;
FinChrgMemoLine."Line No." := NextLineNo;
...

          

Vereisten

U moet Microsoft Dynamics NAV 2009 SP1 hebben geïnstalleerd om deze hotfix toe te passen.

Verwijderingsgegevens

U kunt deze hotfix niet verwijderen.

Status

Microsoft heeft bevestigd dat dit een probleem is bij de Microsoft-producten die worden vermeld in de sectie Van toepassing op.

Meer informatie

VSTF DynamicsNAV SE: 212317

Opmerking Dit is een artikel 'FAST PUBLISH' dat rechtstreeks vanuit de microsoft-ondersteuningsorganisatie is gemaakt. De hierin opgenomen informatie wordt als zodanig verstrekt als reactie op nieuwe problemen. Als gevolg van de snelheid waarmee het beschikbaar wordt gesteld, kunnen de materialen typografische fouten bevatten en te allen tijde zonder voorafgaande kennisgeving worden herzien. Zie Gebruiksvoorwaarden voor andere overwegingen.