Foutbericht 'Documenten kunnen niet ongedaan worden toegepast omdat servicebelastingtegoed al is gebruikt' wanneer u de functie Niet-toegepaste vermeldingen uitvoert op een geboekte inkoopfactuur voor GTA-leveranciers die zijn opgegeven in de Indiase versie van Microsoft Dynamics NAV 2009

Van toepassing op
Dynamics NAV 2009

Dit artikel is van toepassing op Microsoft Dynamics NAV voor de Landinstellingen van de Indiase (in)-taal.

Symptomen

Wanneer u de functie Niet-toegepaste vermeldingen uitvoert op een geboekte inkoopfactuur met een servicebelasting voor GTA-leveranciers die zijn opgegeven in de Indiase versie van Microsoft Dynamics NAV 2009 R2 en van Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), ontvangt u het volgende foutbericht:

Opmerking

Documenten kunnen niet ongedaan worden gemaakt omdat het belastingtegoed van de service al is gebruikt.

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:

  1. Voeg de volgende globale variabele toe in de gen. Jnl.-Post Line codeunit (12):

    • TempServiceTaxEntry3@1500076 : TIJDELIJK record 16473
  2. Voeg de volgende lokale variabele toe in de functie UnApplyVendSTEntries in de gen. Jnl.-Post Line codeunit (12):

    • STEntryDetail2@1500000 : Record 16474
  3. Wijzig de code in de functie UnApplyVendSTEntries in de gen. Jnl.-Post Line codeunit (12) als volgt:
    Bestaande code 1

    ...
            STaxApplBuffer[1].DELETEALL;
            WITH DtldVendLedgEntry2 DO BEGIN
    ...
    
    

    Vervangende code 1

    ...
            STaxApplBuffer[1].DELETEALL;
    
    // Add the following line.
             TempServiceTaxEntry3.DELETEALL; 
    // End of the line.
    
            WITH DtldVendLedgEntry2 DO BEGIN
    ...
    
    

    Bestaande code 2

    ...
                  ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);
    
    // Delete the following line.
                 Sign := -1;
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
                 Sign := 1; 
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
                 ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No."); 
                  IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN 
    // End of the line.
    ...
    
    

    Vervangende code 2

    ...
                  ServiceTaxMgt.UnApplyVendPmtEntries(STEntryDetail,NextTransactionNo);
    
    // Add the following lines.
                 ServiceTaxEntry.GET(STEntryDetail."Service Tax Entry No."); 
                 ServiceTaxSetup.RESET; 
                 ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code"); 
                 ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date"); 
                 TempServiceTaxEntry3.TRANSFERFIELDS(ServiceTaxEntry); 
                 IF NOT STEntryDetail.GTA THEN BEGIN 
                   TempServiceTaxEntry3.INSERT; 
                   Sign := -1; 
                 END ELSE BEGIN 
                   TempServiceTaxEntry3."G/L Account" := STEntryDetail."GL Account"; 
                   TempServiceTaxEntry3.INSERT; 
                   Sign := 1; 
                 END; 
    
                 FillSvcTaxApplication4(STEntryDetail,Sign); 
    
                 STEntryDetail2 := STEntryDetail; 
                 IF NOT STEntryDetail.GTA THEN 
                   Sign := 1 
                 ELSE BEGIN 
                   IF ServiceTaxSetup.FINDLAST THEN 
                     STEntryDetail2."GL Account" := ServiceTaxSetup."Payables Account (Interim)"; 
                   Sign := -1; 
                 END; 
    
                 FillSvcTaxApplication4(STEntryDetail2,Sign);
                  IF ServiceTaxEntry."Serv. Tax on Advance Payment" THEN BEGIN 
    // End of the lines.
    ...
    
    

    Bestaande code 3

    ...
                      ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";
    
    // Delete the following lines.
                     ServiceTaxSetup.RESET; 
                     ServiceTaxSetup.SETRANGE(Code,STEntryDetail."Service Tax Group Code"); 
                     ServiceTaxSetup.SETRANGE("From Date",0D,STEntryDetail."Posting Date");
    // End of the lines.
    
                      IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...
    
    

    Vervangende code 3

    ...
                      ServiceTaxEntry."From Excise" := STEntryDetail."From Excise";
                      IF ServiceTaxSetup.FINDLAST THEN BEGIN
    ...
    
    
  4. Verwijder de volgende lokale variabele in de functie FillSvcTaxApplication4 in de gen. Jnl.-Post Line codeunit (12):

    • VAR ServiceTaxEntry@1002 : Record 16473
  5. Wijzig de code in de functie FillSvcTaxApplication4 in de Gen. Jnl.-Post Line codeunit (12) als volgt:
    Bestaande code

    ...
              IF Sign < 0 THEN
    
    // Delete the following lines.
               STaxApplBuffer[1]."G/L Account" := "GL Account" 
             ELSE BEGIN 
               ServiceTaxEntry.GET("Service Tax Entry No."); 
               STaxApplBuffer[1]."G/L Account" := ServiceTaxEntry."G/L Account"; 
             END;
    // End of the lines.
    
              STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...
    
    

    Vervangende code

    ...
    IF Sign < 0 THEN
    
             // Add the following lines.
               STaxApplBuffer[1]."G/L Account" := "GL Account" 
             ELSE 
               STaxApplBuffer[1]."G/L Account" := TempServiceTaxEntry3."G/L Account"; 
             // End of the lines.
    
              STaxApplBuffer[1]."Amount to Apply (LCY)" := Sign * ("Service Tax Amount" + "Service Tax eCess Amount" +
    ...
    
    
  6. Wijzig de code in de functie UnApplyVendPmtEntries in de codeunit Service Tax Management (16471) als volgt:
    Bestaande code 1

    ...
            WITH STEntryDetail DO BEGIN
    
    // Delete the following lines.
             IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR 
               ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)") 
             THEN 
               ERROR(Text16535,"Document No."); 
    // End of the lines.
    
              STEntryDetail2.RESET;
    ...
    
    

    Vervangende code 1

    ...
            WITH STEntryDetail DO BEGIN
    
             // Add the following lines.
             IF GTA THEN BEGIN 
               IF ("Service Tax Amount" <> "GTA Remaining Credit") OR ("Service Tax eCess Amount" <> "GTA Remaining Credit (eCess)") OR 
                 ("Service Tax SHE Cess Amount" <> "GTA Remaining Credit (SHECess)") 
               THEN 
                 ERROR(Text16535,"Document No."); 
             END ELSE BEGIN 
               IF ("Service Tax Amount" <> "Remaining Credit") OR ("Service Tax eCess Amount" <> "Remaining Credit (eCess)") OR 
                 ("Service Tax SHE Cess Amount" <> "Remaining Credit (SHECess)") 
               THEN 
                 ERROR(Text16535,"Document No."); 
             END; 
             // End of the lines.
    
              STEntryDetail2.RESET;
    ...
    
    

    Bestaande code 2

    ...
              STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";
              STEntryDetail2.INSERT;
    ...
    
    

    Vervangende code 2

    ...
              STEntryDetail2."Remaining S.T. Base Amount" := - STEntryDetail2."Remaining S.T. Base Amount";
    
             // Add the following lines.
             STEntryDetail2."GTA Remaining Credit" := - STEntryDetail2."GTA Remaining Credit"; 
             STEntryDetail2."GTA Remaining Credit (eCess)" := - STEntryDetail2."GTA Remaining Credit (eCess)"; 
             STEntryDetail2."GTA Remaining Credit (SHECess)" := - STEntryDetail2."GTA Remaining Credit (SHECess)"; 
             // End of the lines.
    
              STEntryDetail2.INSERT;
    ...
    
    

Vereisten

U moet een van de volgende producten hebben geïnstalleerd om deze hotfix toe te passen:

  • De Indiase versie van Microsoft Dynamics NAV 2009 R2
  • De Indiase versie van Microsoft Dynamics NAV 2009 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.