"Darbību nevar pabeigt, jo tas rada neatbilstības tabulā V/G ieraksts" kļūdas ziņojums, kad izliekat Ziemeļamerikas versijā, Microsoft Dynamics NAV 2009 pirkšanas rēķins

Veidne: CPR — Navision kodu labojumu veidne

188277 (satura uzturēšana) kļūdas numurs:

Šis raksts attiecas uz Microsoft šajās valstīs un valodu lokalizācijas.

  • Angļu (Kanāda) (en-ca)

  • Angļu (ASV) (en-us)

  • Spāņu (Meksika) (es-mx)

  • Franču (Kanāda) (fr-ca)

Pazīmes

Pieņemsim, ka iestatīt CAD kā papildu pārskata valūtas vērtība Virsgrāmatas uzstādījumi dialoglodziņā Microsoft Dynamics NAV 2009 Ziemeļamerikas versiju. Kad publicējat pirkšanas rēķins, kurā iekļauts PVN, tiek parādīts šāds kļūdas ziņojums:

Darbību nevar pabeigt, jo tas rada neatbilstības tabulā V/G ieraksts. Pārbaudiet, kur un kā konsekventi funkcija tiek izmantota darbībā atrast kļūdas iemeslu.

Šī problēma rodas ar šādiem produktiem:

  • Microsoft Dynamics NAV 2009 R2 Ziemeļamerikas versija

  • Microsoft Dynamics NAV 2009. gada 1. servisa pakotnes versiju Ziemeļamerikas


Izšķirtspēja

Informācija par labojumfailu

Pašlaik korporācija Microsoft piedāvā atbalstītu labojumfailu. Tomēr tas ir paredzēts tikai šajā rakstā aprakstītās problēmas novēršanai. Izmantojiet to tikai tām sistēmām, kurām ir radusies tieši šī problēma. Iespējams, tiks veikta šī labojumfaila papildu testēšana. Tādēļ, ja jums ir šī problēma nerada nopietnus traucējumus, ieteicams pagaidīt, Microsoft Dynamics NAV 2009 nākamā servisa pakotne vai nākamajā Microsoft Dynamics NAV versiju, kas ir iekļauts šis labojumfails.

Piezīme. Īpašos gadījumos standarta izmaksas par atbalsta zvaniem nav jāsedz, ja tehniskā atbalsta speciālists Microsoft Dynamics un saistītiem produktiem nosaka, ka šo problēmu novērsīs noteikts atjauninājums. Parasti atbalsta izmaksas tiek piemērotas jautājumiem par papildu atbalstu un problēmām, kas neskar specifisko atjauninājumu apspriešanu.

Ja šis labojumfails nav izlikts publiskai lejupielādei (t.i., šajā rakstā nav sniegts publiski pieejams šī labojumfaila vietrādis URL), izplatīšanai ir nepieciešama tehniskā vadītāja, eskalācijas grupas locekļa vai vadītāja atļauja un stājas spēkā šādi nosacījumi:

  • Labojumfailu var saņemt klienti ir radusies sadaļā "Simptomi" minēto kļūdas.

  • Jums ir jāreģistrē klienti, kuriem tiek nosūtīts šis labojumfails, un viņiem jānodrošina nākamā servisa pakotne, tiklīdz tā ir pieejama (ja tiek izlaista servisa pakotne).

Šo labojumfailu nav paredzēts iekļaut servisa pakotnē Microsoft Dynamics NAV.



Informācija par instalēšanu

Microsoft piedāvā programmēšanas piemērus tikai uzskatāmībai, nesniedzot nekādas tiešas vai netiešas garantijas. Tas ietver, bet neaprobežojas ar netiešām garantijām par piemērotību pārdošanai vai atbilstību noteiktam mērķim. Šajā rakstā tiek pieņemts, ka pārzināt programmēšanas valodu, kas tiek aprakstīta, un rīkus, kas tiek izmantoti, lai izveidotu un atkļūdotu procedūras. Microsoft atbalsta inženieri var palīdzēt izskaidrot kādas noteiktas procedūras funkcionalitāti, taču viņi nemainīs šos piemērus, lai sniegtu skaidrāku funkcionalitāti, un neveidos jaunas procedūras, kas atbilstu īpašām prasībām.

Piezīme. Pirms šī labojumfaila instalēšanas pārliecinieties, vai ka visi Microsoft Navision klients lietotāji ir atteikušies sistēmu. Tas ietver Microsoft Navision lietojumprogrammu pakalpojumu (NAS) klients lietotājiem. Jums ir jābūt tikai klienta lietotājam, kurš ir pieteicies datorā, kad izmantojat šo labojumfailu.

Lai ieviestu šo labojumfailu, datorā jābūt instalētai izstrādātāja licenci.

Ieteicams, ka lietotāja konts tiek atvērts logs Windows lietotājvārdi vai logā datu bāzes lietotājvārdi piešķirt "SUPER" lomas ID. Ja lietotāja kontam nevar piešķirt "SUPER" lomas ID, ir jāpārbauda lietotāja konts ir šādas atļaujas:

  • Objektu, kad tiks mainīts modificēt atļaujas.

  • Izpildes atļauja objekta sistēmas objekta ID 5210 un sistēmas objekta ID 9015 objektu.



Piezīme. Jums nav tiesības datu krātuvju vien veikt datu labošana.

Koda izmaiņas

Piezīme. Vienmēr pārbaudes kods novērš kontrolētā vidē pirms lietojat datoru ražošanas labojumus.

Lai novērstu šo problēmu, rīkojieties šādi:

  1. Nomainiet šo kodu laukos PVN summas rinda tabulā (10011) šādi:
    Kods

    ...ESM=Es Informe jurisdicci¢n;
    FRC=Est une juridiction fiscale;
    ENC=Is Report-to Jurisdiction];
    Editable=No }
    }
    KEYS
    {
    { ;Tax Area Code for Key,Tax Jurisdiction Code,Tax %,Tax Group Code,Expense/Capitalize,Tax Type,Use Tax;
    ...

    Aizstāšanas kodu

    ...
    ESM=Es Informe jurisdicci¢n;
    FRC=Est une juridiction fiscale;
    ENC=Is Report-to Jurisdiction];
    Editable=No }

    // Add the following line.
    { 10044; ;Tax Base Amount FCY ;Decimal }
    // End of the added line.

    }
    KEYS
    {
    { ;Tax Area Code for Key,Tax Jurisdiction Code,Tax %,Tax Group Code,Expense/Capitalize,Tax Type,Use Tax;
    ...
  2. Nomainiet šo kodu pārdošanas ziņu koda (80) PostSalesTaxToGL funkciju šādi:
    Kods

    ...END;
    GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
    IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +

    // Delete the following lines.
    CurrExchRate.ExchangeAmtLCYToFCY(
    UseDate,SalesHeader."Currency Code",TempSalesTaxAmtLine."Tax Amount",SalesHeader."Currency Factor");
    // End of the deleted lines.

    GenJnlLine."Source Curr. VAT Amount" :=
    SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
    RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
    ...

    Aizstāšanas kodu

    ...END;
    GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
    IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +

    // Add the following lines.
    TempSalesTaxAmtLine."Tax Base Amount FCY" * TempSalesTaxAmtLine."Tax %" / 100;
    // End of the added lines.

    GenJnlLine."Source Curr. VAT Amount" :=
    SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
    RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
    ...
  3. Nomainiet šo kodu funkciju PostSalesTaxToGL pirkšanas.-ziņu koda (90) šādi:
    Kods

    ...END;
    GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
    IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +

    // Delete the following lines.
    CurrExchRate.ExchangeAmtLCYToFCY(
    Usedate,PurchHeader."Currency Code",TempSalesTaxAmtLine."Tax Amount",PurchHeader."Currency Factor");
    // End of the deleted lines.

    GenJnlLine."Source Curr. VAT Amount" :=
    SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
    RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
    ...

    Aizstāšanas kodu

    ...END;
    GenJnlLine."Tax Jurisdiction Code" := TempSalesTaxAmtLine."Tax Jurisdiction Code";
    IF TempSalesTaxAmtLine."Tax Amount" <> 0 THEN BEGIN
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt +

    // Add the following line.
    TempSalesTaxAmtLine."Tax Base Amount FCY" * TempSalesTaxAmtLine."Tax %" / 100;
    // End of the added line.

    GenJnlLine."Source Curr. VAT Amount" :=
    SalesTaxCalculate.ArithmeticRound(RemSalesTaxSrcAmt,Currency."Amount Rounding Precision");
    RemSalesTaxSrcAmt := RemSalesTaxSrcAmt - GenJnlLine."Source Curr. VAT Amount";
    RemSalesTaxAmt := RemSalesTaxAmt + TempSalesTaxAmtLine."Tax Amount";
    ...
  4. Nomainiet šo kodu funkciju PostProvincialSalesTaxToGL pirkšanas.-ziņu koda (90) šādi:
    Kods

    ...TaxJurisdiction.TESTFIELD("Tax Account (Purchases)");
    GenJnlLine."Account No." := TaxJurisdiction."Tax Account (Purchases)";
    END;
    GenJnlLine.Amount := GenJnlLine."VAT Amount";

    // Delete the following lines.
    GenJnlLine."Source Curr. VAT Base Amount" := 0;
    GenJnlLine."VAT Base Amount (LCY)" := 0;
    GenJnlLine."VAT Base Amount" := 0;
    GenJnlLine."Source Curr. VAT Amount" := 0;
    // End of the deleted lines.

    GenJnlLine."VAT Amount (LCY)" := 0;
    GenJnlLine."VAT Amount" := 0;
    GenJnlLine.Quantity := 0;
    GenJnlLine."VAT Difference" := 0;
    ...

    Aizstāšanas kodu

    ...TaxJurisdiction.TESTFIELD("Tax Account (Purchases)");
    GenJnlLine."Account No." := TaxJurisdiction."Tax Account (Purchases)";
    END;
    GenJnlLine.Amount := GenJnlLine."VAT Amount";

    // Add the following lines.
    GenJnlLine."Source Currency Amount" := GenJnlLine."Source Curr. VAT Amount";
    GenJnlLine."Source Curr. VAT Base Amount" := 0;
    GenJnlLine."VAT Base Amount (LCY)" := 0;
    GenJnlLine."VAT Base Amount" := 0;
    // End of the added lines.

    GenJnlLine."VAT Amount (LCY)" := 0;
    GenJnlLine."VAT Amount" := 0;
    GenJnlLine.Quantity := 0;
    GenJnlLine."VAT Difference" := 0;
    ...
  5. Nomainiet šo kodu PVN aprēķināt koda (398) AddSalesLine funkciju šādi:
    Kods 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Delete the following line.
    "Tax Base Amount" := (SalesLine."Line Amount" - SalesLine."Inv. Discount Amount") / ExchangeFactor;
    // End of the deleted line.

    "Line Amount" := SalesLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := SalesLine."Tax Liable";
    Quantity := SalesLine."Quantity (Base)";
    "Invoice Discount Amount" := SalesLine."Inv. Discount Amount";
    ...

    Aizstāšanas kods = 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesLine."Line Amount" - SalesLine."Inv. Discount Amount",ExchangeFactor,FALSE);
    // End of the added line.

    "Line Amount" := SalesLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := SalesLine."Tax Liable";
    Quantity := SalesLine."Quantity (Base)";
    "Invoice Discount Amount" := SalesLine."Inv. Discount Amount";
    ...

    Kods 2

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesLine."Line Amount" / ExchangeFactor);
    IF SalesLine."Tax Liable" THEN
    "Tax Liable" := SalesLine."Tax Liable";

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + ((SalesLine."Line Amount" - SalesLine."Inv. Discount Amount") / ExchangeFactor);
    // End of the deleted line.

    "Tax Amount" := 0;
    Quantity := Quantity + SalesLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + SalesLine."Inv. Discount Amount";
    MODIFY;
    ...

    Aizstāšanas kods 2.

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesLine."Line Amount" / ExchangeFactor);
    IF SalesLine."Tax Liable" THEN
    "Tax Liable" := SalesLine."Tax Liable";

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesLine."Line Amount" - SalesLine."Inv. Discount Amount",ExchangeFactor,TRUE);
    // End of the added line.

    "Tax Amount" := 0;
    Quantity := Quantity + SalesLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + SalesLine."Inv. Discount Amount";
    MODIFY;
    ...
  6. Nomainiet šo kodu PVN aprēķināt koda (398) AddSalesInvoiceLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := SalesInvoiceLine."Line Amount" / ExchangeFactor;

    // Delete the following line.
    "Tax Base Amount" := SalesInvoiceLine."VAT Base Amount" / ExchangeFactor;
    // End of the deleted line.

    Quantity := SalesInvoiceLine.Quantity;
    "Tax Liable" := SalesInvoiceLine."Tax Liable";
    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := SalesInvoiceLine."Line Amount" / ExchangeFactor;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesInvoiceLine."VAT Base Amount",ExchangeFactor,FALSE);
    // End of the added line.

    Quantity := SalesInvoiceLine.Quantity;
    "Tax Liable" := SalesInvoiceLine."Tax Liable";
    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesInvoiceLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (SalesInvoiceLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + SalesInvoiceLine.Quantity;
    IF SalesInvoiceLine."Tax Liable" THEN
    "Tax Liable" := SalesInvoiceLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesInvoiceLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesInvoiceLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + SalesInvoiceLine.Quantity;
    IF SalesInvoiceLine."Tax Liable" THEN
    "Tax Liable" := SalesInvoiceLine."Tax Liable";
    InsertRec := FALSE;
    ...
  7. Nomainiet šo kodu PVN aprēķināt koda (398) AddSalesCrMemoLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := SalesCrMemoLine."Line Amount" / ExchangeFactor;

    // Delete the following line.
    "Tax Base Amount" := SalesCrMemoLine."VAT Base Amount" / ExchangeFactor;
    // End of the deleted line.

    Quantity := SalesCrMemoLine.Quantity;
    "Tax Liable" := SalesCrMemoLine."Tax Liable";
    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := SalesCrMemoLine."Line Amount" / ExchangeFactor;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
    // End of the added line.

    Quantity := SalesCrMemoLine.Quantity;
    "Tax Liable" := SalesCrMemoLine."Tax Liable";
    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesCrMemoLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (SalesCrMemoLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + SalesCrMemoLine.Quantity;
    IF SalesCrMemoLine."Tax Liable" THEN
    "Tax Liable" := SalesCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (SalesCrMemoLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,SalesCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + SalesCrMemoLine.Quantity;
    IF SalesCrMemoLine."Tax Liable" THEN
    "Tax Liable" := SalesCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...
  8. Nomainiet šo kodu PVN aprēķināt koda (398) AddPurchLine funkciju šādi:
    Kods 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Delete the following line.
    "Tax Base Amount" := (PurchLine."Line Amount" - PurchLine."Inv. Discount Amount") / ExchangeFactor;
    // End of the deleted line.

    "Line Amount" := PurchLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := PurchLine."Tax Liable";
    "Use Tax" := PurchLine."Use Tax";
    ...

    Aizstāšanas kods = 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchLine."Line Amount" - PurchLine."Inv. Discount Amount",ExchangeFactor,FALSE);
    // End of the added line.

    "Line Amount" := PurchLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := PurchLine."Tax Liable";
    "Use Tax" := PurchLine."Use Tax";
    ...

    Kods 2

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchLine."Line Amount" / ExchangeFactor);
    IF PurchLine."Tax Liable" THEN
    "Tax Liable" := PurchLine."Tax Liable";

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + ((PurchLine."Line Amount" - PurchLine."Inv. Discount Amount") / ExchangeFactor);
    // End of the deleted line.

    "Tax Amount" := 0;
    Quantity := Quantity + PurchLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + PurchLine."Inv. Discount Amount";
    MODIFY;
    ...

    Aizstāšanas kods 2.

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchLine."Line Amount" / ExchangeFactor);
    IF PurchLine."Tax Liable" THEN
    "Tax Liable" := PurchLine."Tax Liable";

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchLine."Line Amount" - PurchLine."Inv. Discount Amount",ExchangeFactor,TRUE);
    // End of the added line.

    "Tax Amount" := 0;
    Quantity := Quantity + PurchLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + PurchLine."Inv. Discount Amount";
    MODIFY;
    ...
  9. Nomainiet šo kodu PVN aprēķināt koda (398) AddPurchInvoiceLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := PurchInvLine."Line Amount" / ExchangeFactor;

    // Delete the following line.
    "Tax Base Amount" := PurchInvLine."VAT Base Amount" / ExchangeFactor;
    // End of the deleted line.

    Quantity := PurchInvLine.Quantity;
    "Tax Liable" := PurchInvLine."Tax Liable";
    "Use Tax" := PurchInvLine."Use Tax";
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := PurchInvLine."Line Amount" / ExchangeFactor;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchInvLine."VAT Base Amount",ExchangeFactor,FALSE);
    // End of the added line.

    Quantity := PurchInvLine.Quantity;
    "Tax Liable" := PurchInvLine."Tax Liable";
    "Use Tax" := PurchInvLine."Use Tax";
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchInvLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (PurchInvLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + PurchInvLine.Quantity;
    IF PurchInvLine."Tax Liable" THEN
    "Tax Liable" := PurchInvLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchInvLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchInvLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + PurchInvLine.Quantity;
    IF PurchInvLine."Tax Liable" THEN
    "Tax Liable" := PurchInvLine."Tax Liable";
    InsertRec := FALSE;
    ...
  10. Nomainiet šo kodu PVN aprēķināt koda (398) AddPurchCrMemoLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := PurchCrMemoLine."Line Amount" / ExchangeFactor;

    // Delete the following line.
    "Tax Base Amount" := PurchCrMemoLine."VAT Base Amount" / ExchangeFactor;
    // End of the deleted line.

    Quantity := PurchCrMemoLine.Quantity;
    "Tax Liable" := PurchCrMemoLine."Tax Liable";
    "Use Tax" := PurchCrMemoLine."Use Tax";
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := PurchCrMemoLine."Line Amount" / ExchangeFactor;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
    // End of the added line.

    Quantity := PurchCrMemoLine.Quantity;
    "Tax Liable" := PurchCrMemoLine."Tax Liable";
    "Use Tax" := PurchCrMemoLine."Use Tax";
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchCrMemoLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (PurchCrMemoLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + PurchCrMemoLine.Quantity;
    IF PurchCrMemoLine."Tax Liable" THEN
    "Tax Liable" := PurchCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (PurchCrMemoLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,PurchCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + PurchCrMemoLine.Quantity;
    IF PurchCrMemoLine."Tax Liable" THEN
    "Tax Liable" := PurchCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...
  11. Nomainiet šo kodu PVN aprēķināt koda (398) AddServiceLine funkciju šādi:
    Kods 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Delete the following line.
    "Tax Base Amount" := (ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount") / ExchangeFactor;
    // End of the deleted line.

    "Line Amount" := ServiceLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := ServiceLine."Tax Liable";
    Quantity := ServiceLine."Quantity (Base)";
    "Invoice Discount Amount" := ServiceLine."Inv. Discount Amount";
    ...

    Aizstāšanas kods = 1

    ..."Round Tax" := TaxArea."Round Tax";
    TaxJurisdiction.GET("Tax Jurisdiction Code");
    "Is Report-to Jurisdiction" := ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount",ExchangeFactor,FALSE);
    // End of the added line.

    "Line Amount" := ServiceLine."Line Amount" / ExchangeFactor;
    "Tax Liable" := ServiceLine."Tax Liable";
    Quantity := ServiceLine."Quantity (Base)";
    "Invoice Discount Amount" := ServiceLine."Inv. Discount Amount";
    ...

    Kods 2

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServiceLine."Line Amount" / ExchangeFactor);
    IF ServiceLine."Tax Liable" THEN
    "Tax Liable" := ServiceLine."Tax Liable";

    // Delete the following line.
    "Tax Base Amount" :=
    "Tax Base Amount" + ((ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount") / ExchangeFactor);
    // End of the deleted line.

    "Tax Amount" := 0;
    Quantity := Quantity + ServiceLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + ServiceLine."Inv. Discount Amount";
    MODIFY;
    ...

    Aizstāšanas kods 2.

    ...END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServiceLine."Line Amount" / ExchangeFactor);
    IF ServiceLine."Tax Liable" THEN
    "Tax Liable" := ServiceLine."Tax Liable";

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,ServiceLine."Line Amount" - ServiceLine."Inv. Discount Amount",ExchangeFactor,TRUE);
    // End of the added line.

    "Tax Amount" := 0;
    Quantity := Quantity + ServiceLine."Quantity (Base)";
    "Invoice Discount Amount" := "Invoice Discount Amount" + ServiceLine."Inv. Discount Amount";
    MODIFY;
    ...
  12. Nomainiet šo kodu PVN aprēķināt koda (398) AddServInvoiceLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := ServInvLine."Line Amount" / ExchangeFactor;

    // Delete the following lines.
    "Tax Base Amount" := ServInvLine."VAT Base Amount" / ExchangeFactor;
    Quantity := ServInvLine.Quantity;
    "Tax Liable" := ServInvLine."Tax Liable";

    // End of the deleted line.

    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    INSERT;
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := ServInvLine."Line Amount" / ExchangeFactor;

    // Add the following lines.
    SetTaxBaseAmount(TempSalesTaxLine,ServInvLine."VAT Base Amount",ExchangeFactor,FALSE);
    Quantity := ServInvLine.Quantity;
    "Tax Liable" := ServInvLine."Tax Liable";
    // End of the added lines.

    "Calculation Order" := TaxAreaLine."Calculation Order";
    InsertRec := TRUE;
    INSERT;
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServInvLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (ServInvLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + ServInvLine.Quantity;
    IF ServInvLine."Tax Liable" THEN
    "Tax Liable" := ServInvLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServInvLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,ServInvLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + ServInvLine.Quantity;
    IF ServInvLine."Tax Liable" THEN
    "Tax Liable" := ServInvLine."Tax Liable";
    InsertRec := FALSE;
    ...
  13. Nomainiet šo kodu PVN aprēķināt koda (398) AddServCrMemoLines funkciju šādi:
    Kods 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := ServCrMemoLine."Line Amount" / ExchangeFactor;

    // Delete the following line.
    "Tax Base Amount" := ServCrMemoLine."VAT Base Amount" / ExchangeFactor;
    // End of the deleted line.

    Quantity := ServCrMemoLine.Quantity;
    "Tax Liable" := ServCrMemoLine."Tax Liable";

    "Calculation Order" := TaxAreaLine."Calculation Order";
    ...

    Aizstāšanas kods = 1

    ..."Is Report-to Jurisdiction" :=
    ("Tax Jurisdiction Code" = TaxJurisdiction."Report-to Jurisdiction");
    END;
    "Line Amount" := ServCrMemoLine."Line Amount" / ExchangeFactor;

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,ServCrMemoLine."VAT Base Amount",ExchangeFactor,FALSE);
    // End of the added line.

    Quantity := ServCrMemoLine.Quantity;
    "Tax Liable" := ServCrMemoLine."Tax Liable";

    "Calculation Order" := TaxAreaLine."Calculation Order";
    ...

    Kods 2

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServCrMemoLine."Line Amount" / ExchangeFactor);

    // Delete the following line.
    "Tax Base Amount" := "Tax Base Amount" + (ServCrMemoLine."VAT Base Amount" / ExchangeFactor);
    // End of the deleted line.

    Quantity := Quantity + ServCrMemoLine.Quantity;
    IF ServCrMemoLine."Tax Liable" THEN
    "Tax Liable" := ServCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...

    Aizstāšanas kods 2.

    ...InsertRec := TRUE;
    INSERT;
    END ELSE BEGIN
    "Line Amount" := "Line Amount" + (ServCrMemoLine."Line Amount" / ExchangeFactor);

    // Add the following line.
    SetTaxBaseAmount(TempSalesTaxLine,ServCrMemoLine."VAT Base Amount",ExchangeFactor,TRUE);
    // End of the added line.

    Quantity := Quantity + ServCrMemoLine.Quantity;
    IF ServCrMemoLine."Tax Liable" THEN
    "Tax Liable" := ServCrMemoLine."Tax Liable";
    InsertRec := FALSE;
    ...
  14. Pievienojiet funkcija SetTaxBaseAmount PVN aprēķināt koda (398) šādi:

    LOCAL PROCEDURE SetTaxBaseAmount@1020031(VAR SalesTaxAmountLine@1020001 : Record 10011;Value@1020000 : Decimal;ExchangeFactor@1020002 : Decimal;Increment@1020003 : Boolean);      BEGIN
    WITH SalesTaxAmountLine DO BEGIN
    IF Increment THEN
    "Tax Base Amount FCY" += Value
    ELSE
    "Tax Base Amount FCY" := Value;
    "Tax Base Amount" := "Tax Base Amount FCY" / ExchangeFactor;
    END;
    END;



Priekšnosacījumi

Datorā ir jābūt instalētai kādai no tālāk norādītos produktus, lai lietotu šo labojumfailu:

  • Microsoft Dynamics NAV 2009 R2 Ziemeļamerikas versija

  • Microsoft Dynamics NAV 2009. gada 1. servisa pakotnes versiju Ziemeļamerikas

Informācija par noņemšanu

Nevar noņemt šo labojumfailu.

Atsauces

VSTF DynamicsNAVSE: 346494

Statuss

Korporācija Microsoft ir apstiprinājusi, ka šī problēma pastāv Microsoft produktos, kas ir minēti sadaļā "Attiecas uz".

Piezīme. Šis ir STEIDZAMI PUBLICĒJAMS raksts, kas izveidots tieši Microsoft atbalsta organizācijā. Šajā rakstā ietvertā informācija ir sniegta, reaģējot uz nesen konstatētām problēmām. Tā kā šis raksts ir tapis pieejams neilgā laikā, materiālos var būt pareizrakstības kļūdas un tās var tikt labotas jebkurā laikā bez paziņojuma. Skatīt Lietošanas citi apsvērumi.

Autors: rmille
Writer: v-six
Tehniskais redaktors: btschosi; bwick
Redaktors:

Vai nepieciešama papildu palīdzība?

Paplašiniet savas prasmes
Iepazīties ar apmācību
Esiet pirmais, kas saņem jaunās iespējas
Pievienoties Microsoft Insider

Vai šī informācija bija noderīga?

Paldies par jūsu atsauksmēm!

Paldies par atsauksmēm! Šķiet, ka jums varētu būt noderīgi sazināties ar kādu no mūsu Office atbalsta speciālistiem.

×