Dit artikel is van toepassing op Microsoft Dynamics NAV voor alle landen en taalinstellingen.
Symptomen
Als de eerste regel in het logboek een lege regel in Microsoft Dynamics NAV is, wordt het documentnummer niet verhoogd in het logboek. Dit probleem treedt op in de volgende logboeken:
- Itemlogboeken
- Stuklijstlogboeken
- Taaklogboeken
- Logboeken voor vaste activa
- Verzekeringstijdschriften
- Whse. Tijdschriften
- Resourcelogboeken
Dit probleem treedt op in de volgende producten:
- Microsoft Dynamics NAV 2009 Service Pack 1
- Microsoft Dynamics NAV 2009
- Microsoft Dynamics NAV 5.0 Service Pack 1
Oorzaak
Dit probleem treedt op omdat de variabele LastDocNo2 onjuist is geïnitialiseerd wanneer een lege regel wordt gemaakt in de logboekregel.
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 aan te wachten op het volgende Microsoft Dynamics NAV 2009-servicepack of de volgende Microsoft Dynamics NAV-versie 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:
Wijzig de code in de functie Code in de codeeenheid Item Jnl.-Post Batch (23) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(ItemJnlBatch."No. Series","Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No."; // End of the line. MakeRecurringTexts(ItemJnlLine); IF "Posting No. Series" = '' THEN ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(ItemJnlBatch."No. Series","Posting Date",FALSE)); // Add the following lines. IF NOT EmptyLine THEN LastDocNo2 := "Document No."; // End of the lines. MakeRecurringTexts(ItemJnlLine); IF "Posting No. Series" = '' THEN ...Wijzig de code in de functie Code in de stuklijst Jnl.-Post Batch codeunit (33) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(BOMJnlBatch."No. Series","Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No."; // End of the line. MakeRecurringTexts(BOMJnlLine); IF "Posting No. Series" = '' THEN ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(BOMJnlBatch."No. Series","Posting Date",FALSE)); // Add the following lines. IF NOT EmptyLine THEN LastDocNo2 := "Document No."; // End of the lines. MakeRecurringTexts(BOMJnlLine); IF "Posting No. Series" = '' THEN ...Wijzig de code in de functie Code in de codeeenheid Res. Jnl.-Post Batch (213) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(ResJnlBatch."No. Series","Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No."; // End of the line. MakeRecurringTexts(ResJnlLine); IF "Posting No. Series" = '' THEN ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(ResJnlBatch."No. Series","Posting Date",FALSE)); // Add the following lines. IF NOT EmptyLine THEN LastDocNo2 := "Document No."; // End of the lines. MakeRecurringTexts(ResJnlLine); IF "Posting No. Series" = '' THEN ...Wijzig de code in de functie Code in de codeeenheid Job Jnl.-Post Batch (1013) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(JobJnlBatch."No. Series","Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No."; // End of the line. MakeRecurringTexts(JobJnlLine); IF "Posting No. Series" = '' THEN BEGIN ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(JobJnlBatch."No. Series","Posting Date",FALSE)); // Add the following lines. IF NOT EmptyLine THEN LastDocNo2 := "Document No."; // End of the lines. MakeRecurringTexts(JobJnlLine); IF "Posting No. Series" = '' THEN BEGIN ...Wijzig de code in de functie Code in de FA Jnl.-Post Batch codeunit (5633) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(FAJnlBatch."No. Series","FA Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No.";; // End of the line. MakeRecurringTexts(FAJnlLine); IF "Posting No. Series" = '' THEN ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(FAJnlBatch."No. Series","FA Posting Date",FALSE)); // Add the following lines. IF NOT ("FA No." = '') THEN LastDocNo2 := "Document No.";; // End of the lines. MakeRecurringTexts(FAJnlLine); IF "Posting No. Series" = '' THEN ...Wijzig de code in de functie Code in de codeeenheid Insurance Jnl.-Post Batch (5653) als volgt:
Bestaande code... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(InsuranceJnlBatch."No. Series","Posting Date",FALSE)); // Delete the following line. LastDocNo2 := "Document No."; // End of the line. IF "Posting No. Series" = '' THEN "Posting No. Series" := InsuranceJnlBatch."No. Series" ...Vervangende code
... THEN TESTFIELD("Document No.",NoSeriesMgt.GetNextNo(InsuranceJnlBatch."No. Series","Posting Date",FALSE)); // Add the following lines. IF NOT ("Insurance No." = '') THEN LastDocNo2 := "Document No."; // End of the lines. IF "Posting No. Series" = '' THEN "Posting No. Series" := InsuranceJnlBatch."No. Series" ...Wijzig de code in de functie Code in de Whse. Jnl.-Registreer Batch codeunit (7304) als volgt:
Bestaande code... TESTFIELD("Whse. Document No.", NoSeriesMgt.GetNextNo(WhseJnlBatch."No. Series","Registering Date",FALSE)); // Delete the following line. LastDocNo2 := "Whse. Document No."; // End of the line. IF "Registering No. Series" = '' THEN "Registering No. Series" := WhseJnlBatch."No. Series" ...Vervangende code
... TESTFIELD("Whse. Document No.", NoSeriesMgt.GetNextNo(WhseJnlBatch."No. Series","Registering Date",FALSE)); // Add the following lines. IF NOT EmptyLine THEN LastDocNo2 := "Whse. Document No."; // End of the lines. IF "Registering No. Series" = '' THEN "Registering No. Series" := WhseJnlBatch."No. Series" ...
Vereisten
U moet een van de volgende producten hebben geïnstalleerd om deze hotfix toe te passen:
- Microsoft Dynamics NAV 2009 Service Pack 1
- Microsoft Dynamics NAV 2009
- Microsoft Dynamics NAV 5.0 Service Pack 1
Verwijderingsgegevens
U kunt deze hotfix niet verwijderen.
Status
Microsoft heeft bevestigd dat dit een probleem is bij de Microsoft-producten die worden vermeld in het gedeelte 'Van toepassing op'.
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.