Dit artikel is van toepassing op Microsoft Dynamics NAV voor de landinstellingen van de Noorse taal (geen).
Symptomen
Stel dat u een klantlicentie gebruikt in de Noorse versie van Microsoft Dynamics NAV 2009 Service Pack 1 (SP1). Wanneer u een OCR-betalingsbestand importeert uit een kasbonlogboek, ontvangt u het volgende foutbericht:
Opmerking
U bent niet gemachtigd om de codeunit Payroll Integration Tools te starten.
Dit probleem treedt op in de volgende producten:
- De Noorse versie van Microsoft Dynamics NAV 2009 R2
- De Noorse versie van Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
Oorzaak
Dit probleem treedt op omdat de licentie van de klant niet de machtiging heeft voor de codeunit Payroll Integration Tools (15000200). U hoeft echter niet de codeunit Payroll Integration Tools (15000200) te gebruiken wanneer u het OCR-betalingsbestand importeert.
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-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 eigenschappen in het rapport OCR Payment - BBS (15000064) als volgt:
Bestaande code... RegisterJournal.TESTFIELD(RegisterJournal."No. Series"); // Create work file IF NOT ISSERVICETIER THEN // Delete the following line. WorkFileName := PayrollTools.CreateWorkfile(FileName); TxtFile.TEXTMODE := TRUE; TxtFile.OPEN(WorkFileName); ...Vervangende code
... RegisterJournal.TESTFIELD(RegisterJournal."No. Series"); // Create work file IF NOT ISSERVICETIER THEN // Add the following line. WorkFileName := CreateWorkfile(FileName); TxtFile.TEXTMODE := TRUE; TxtFile.OPEN(WorkFileName); ...Voeg een nieuwe globale variabele toe aan het RAPPORT OCR Payment - BBS (15000064) en geef de variabele als volgt op:
- Naam: Tekst10633
- TextConst: 'ENU=Bestandsnaam ''
Voeg een nieuwe globale variabele toe aan het RAPPORT OCR Payment - BBS (15000064) en geef de variabele als volgt op:
- Naam: Tekst10634
- TextConst:'ENU=""" mag niet eindigen op TMP."'
Wijzig de code in de functie NewFilename in het RAPPORT OCR Payment - BBS (15000064) als volgt:
Bestaande code... PROCEDURE NewFilename@1080009(); BEGIN // Delete the following lines. IF NOT ISSERVICETIER THEN PayrollTools.NewFilename(FileName) ELSE IF FileObject.FileExists(FileName) THEN BEGIN // End of the lines. IF (COPYSTR(FileName, STRLEN(FileName) - 1, 1) = '~') OR (COPYSTR(FileName, STRLEN(FileName) - 2, 1) = '~') THEN ...Vervangende code
PROCEDURE NewFilename@1080009(); BEGIN // Add the following line. IF FileObject.FileExists(FileName) THEN BEGIN IF (COPYSTR(FileName, STRLEN(FileName) - 1, 1) = '~') OR (COPYSTR(FileName, STRLEN(FileName) - 2, 1) = '~') THENWijzig de code in de documentatie in het RAPPORT OCR Payment - BBS (15000064) als volgt:
Bestaande codeEND; END; BEGIN END. }Vervangende code
END; END; // Add the following lines. PROCEDURE CreateWorkfile@1080015(fileName@1080000 : Text[250]) : Text[250]; VAR file@1080001 : Text[250]; dummy@1080002 : Boolean; BEGIN // Creates a workfile. I.e. copies the current file to a new, editable file // Example: File Payment.TXT is renamed to Payment.TMP. // RETURNS: The name of the workfile. file := COPYSTR(fileName, 1, STRLEN(fileName) - 3) + 'tmp'; IF file = fileName THEN // Error: The original file already has a workfile name. ERROR(Text10633 + fileName + Text10634); dummy := ERASE(file); // Delete previous workfile (if any). Ignore the error message. COPY(fileName, file); EXIT(file); END; // End of the lines. BEGIN END. }Wijzig de code in de eigenschappen in het rapport OCR Payment - Data Dialog (15000065) als volgt:
Bestaande code... RegisterJournal.TESTFIELD(RegisterJournal."No. Series"); IF NOT ISSERVICETIER THEN // Delete the following line. WorkFileName := PayrollTools.CreateWorkfile(FileName); TxtFile.TEXTMODE := TRUE; TxtFile.OPEN(WorkFileName); ...Vervangende code
... RegisterJournal.TESTFIELD(RegisterJournal."No. Series"); IF NOT ISSERVICETIER THEN // Add the following line. WorkFileName := CreateWorkfile(FileName); TxtFile.TEXTMODE := TRUE; TxtFile.OPEN(WorkFileName); ...Voeg een nieuwe globale variabele toe aan het rapport OCR Payment - Data Dialog (15000065) en geef de variabele als volgt op:
- Naam: Tekst10632
- TextConst: 'ENU=Bestandsnaam ''
Voeg een nieuwe globale variabele toe aan het rapport OCR Payment - Data Dialog (15000065) en geef de variabele als volgt op:
- Naam: Tekst10633
- TextConst: 'ENU="" mag niet eindigen op TMP."'
Wijzig de code in de functie CreateFilename in het rapport OCR Payment - Data Dialog (15000065) als volgt:
Bestaande code... PROCEDURE CreateFilename@1080021(); BEGIN // Delete the following lines. IF NOT ISSERVICETIER THEN PayrollTools.NewFilename(FileName) ELSE IF FileObject.FileExists(FileName) THEN BEGIN // End of the lines. IF (COPYSTR(FileName, STRLEN(FileName) - 1, 1) = '~') OR (COPYSTR(FileName, STRLEN(FileName) - 2, 1) = '~') THEN ...Vervangende code
... PROCEDURE CreateFilename@1080021(); BEGIN // Add the following line. IF FileObject.FileExists(FileName) THEN BEGIN IF (COPYSTR(FileName, STRLEN(FileName) - 1, 1) = '~') OR (COPYSTR(FileName, STRLEN(FileName) - 2, 1) = '~') THEN ...Wijzig de code in de documentatie in het rapport OCR Payment - Data Dialog (15000065) als volgt:
Bestaande code... END; END; BEGIN END. } ...Vervangende code
... END; END; // Add the following lines. PROCEDURE CreateWorkfile@1080022(fileName@1080000 : Text[250]) : Text[250]; VAR file@1080001 : Text[250]; dummy@1080002 : Boolean; BEGIN // Creates a workfile. I.e. copies the current file to a new, editable file // Example: File Payment.TXT is renamed to Payment.TMP. // RETURNS: The name of the workfile. file := COPYSTR(fileName, 1, STRLEN(fileName) - 3) + 'tmp'; IF file = fileName THEN // Error: The original file already has a workfile name. ERROR(Text10632 + fileName + Text10633); dummy := ERASE(file); // Delete previous workfile (if any). Ignore the error message. COPY(fileName, file); EXIT(file); END; // End of the lines. BEGIN END. } ...
Vereisten
U moet een van de volgende producten hebben geïnstalleerd om deze hotfix toe te passen:
- De Noorse versie van Microsoft Dynamics NAV 2009 R2
- De Noorse versie van Microsoft Dynamics NAV 2009 Service Pack 1 (SP1)
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.