Šis straipsnis taikomas Microsoft Dynamics NAV Indijos (kalbos lokalės,).
Požymiai
Indijos versijoje Microsoft Dynamics NAV 2009 1 pakeitimų paketas (SP1), rodomą "mokesčių %" yra neteisinga pardavimo užsakymo eilutė ir užregistruotą pardavimo SF eilutės. Tikitės, kad "Mokesčių %" vertė atitinka mokesčių nei mažiausia reikšmė mokesčių informacijos nustatymo. Su ta pačia problema taip pat kyla pirkimo dokumentų.
Sprendimas
Karštųjų pataisų informacija
Palaikomą naujausią pataisą dabar yra Microsoft. Tačiau jos skirtos tik šiame straipsnyje aprašytai problemai spręsti. Taikyti ją tik sistemoms, kuriose kyla ši konkreti problema. Šios karštosios pataisos gali būti papildomai išbandoma. Todėl, jei jums nelabai trukdo Ši problema, rekomenduojame palaukti kito "Microsoft Dynamics NAV 2009" pakeitimų paketo arba kitą versiją Microsoft Dynamics NAV, kuriame bus šios karštosios pataisos.
Pastaba. Konkrečiais atvejais už palaikymo skambučius gali būti atšaukti, jei techninės pagalbos specialistas Microsoft Dynamics ir susijusių produktų taikomi įprasti mokesčiai nustato, kad jūsų problemą galima išspręsti naudojant konkretų naujinimą. Į įprastos kainos už palaikymą taikomos papildomos palaikymo klausimams ir problemoms, kurių negalima išspręsti naudojant minėtą naujinimą.
Diegimo informacija
"Microsoft" pateikia programavimo pavyzdžius tik, tačiau nesuteikia jokių aiškių arba numanomų garantijų. Tai apima, bet neapsiribojant, numanomas garantijas dėl perkamumo ir tinkamumo konkrečiam tikslui. Šis straipsnis parašytas galvojant, kad esate susipažinę su pateikta programavimo kalba ir įrankiais, kurie yra naudojami procedūroms kurti ir derinti. "Microsoft" palaikymo inžinieriai gali padėti paaiškindami tam tikros procedūros funkcinę galimybę, tačiau jie nekeis šių pavyzdžių, kad numatytų papildomą funkcinę galimybę arba sukurtų konkrečius jūsų reikalavimus atitinkančias procedūras.
Pastaba. Prieš diegdami šias karštąsias pataisas, patikrinkite, kad visi Microsoft Navision klientas vartotojai išsiregistravę sistema. Tai reiškia, kad Microsoft Navision programos paslaugos (NAS) kliento naudotojai. Jums turėtų būti tik kliento vartotojo, kuris yra prisijungęs, kai atliekate šias karštąsias pataisas.
Norint pritaikyti šią karštąją pataisą, turite programų kūrėjo licencijos.
Rekomenduojame, kad vartotojo abonemento Windows registravimosi lange arba duomenų bazės prisijungimų langas būti priskirta "SUPER" vaidmenį ID. Jei vartotojo abonementas negali būti priskirta "SUPER" ID., turi patikrinti, kad vartotojo abonementas turi šias teises:
-
Keisti teisės objektas, kuris bus pakeisti.
-
Teisės vykdyti sistemos objekto ID 5210 objekto ir sistemos objekto ID 9015 objekto.
Pastaba. Jūs neturite turėti teisių į duomenų saugyklų, nebent jūs turite atlikti duomenų atkūrimo.
Pastaba.
Pastaba. Visada bandymas kodas nustato kontroliuojamoje aplinkoje prieš taikydami nustato savo gamybos kompiuteriams.
Norėdami išspręsti šią problemą, atlikite šiuos veiksmus:
-
Pakeisti OnValidate sukelti Suma įskaitant mokesčių (37) Pardavimo eilučių lentelės kodą taip:
Esamas kodas... ELSE
"Amount To Customer" :=
ROUND("Line Amount" - "Inv. Discount Amount" + "Excise Amount" + "Charges To Customer" -
"Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" +"Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision");
END;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
InitOutstandingAmount;
END;
...Pastaba.
... ELSE
"Amount To Customer" :=
ROUND("Line Amount" - "Inv. Discount Amount" + "Excise Amount" + "Charges To Customer" -
"Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" +"Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision");
END;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
InitOutstandingAmount;
END;
... -
Pakeisti UpdateTaxAmounts funkcija – Pardavimo eilučių lentelės (37):
Esamas kodas 1... "Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code","Tax Liable",SalesHeader."Posting Date",
// "Tax Base Amount",Quantity,SalesHeader."Currency Factor","Form Code");
// End of the deleted lines.
TotalTaxAmount := 0;
TotalStdDeductionAmt := 0;
...Atsarginis kodas 1
... "Bal. TDS/TCS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code","Tax Liable",SalesHeader."Posting Date",
"Tax Base Amount",Quantity,SalesHeader."Currency Factor","Form Code","Tax %");
// End of the added lines.
TotalTaxAmount := 0;
TotalStdDeductionAmt := 0;
...Esamas kodas 2
... END ELSE
IndianSalesTaxCalculate.GetStandardDeductionAmt(Rec,StandardDeductionAmount,LineTaxAmount);
END
END;
"Amount Including Tax" := ROUND("Tax Base Amount" + LineTaxAmount,Currency."Amount Rounding Precision");
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" :=
// ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
IF "Standard Deduction %" <>0 THEN
"Standard Deduction Amount" := ("Tax Base Amount" * "Standard Deduction %" / 100)
...Atsarginis kodas 2
... END ELSE
IndianSalesTaxCalculate.GetStandardDeductionAmt(Rec,StandardDeductionAmount,LineTaxAmount);
END
END;
"Amount Including Tax" := ROUND("Tax Base Amount" + LineTaxAmount,Currency."Amount Rounding Precision");
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
IF "Standard Deduction %" <>0 THEN
"Standard Deduction Amount" := ("Tax Base Amount" * "Standard Deduction %" / 100)
... -
Pakeisti OnValidate sukelti Suma įskaitant mokesčių Pirkimo eilutės lentelės (39) kodą taip:
Esamas kodas... "Amount To Vendor" := ROUND("Line Amount" -"Inv. Discount Amount" + "Excise Amount" + "Tax Amount" -
"Bal. TDS Including SHE CESS" + "Charges To Vendor" + "Service Tax Amount" +
"Service Tax eCess Amount" + "Service Tax SHE Cess Amount");
END;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",
// Currency."Amount Rounding Precision")
//ELSE // Delete
// "Tax %" := 0;
// End of the deleted lines.
InitOutstandingAmount;
...Pastaba.
... "Amount To Vendor" := ROUND("Line Amount" -"Inv. Discount Amount" + "Excise Amount" + "Tax Amount" -
"Bal. TDS Including SHE CESS" + "Charges To Vendor" + "Service Tax Amount" +
"Service Tax eCess Amount" + "Service Tax SHE Cess Amount");
END;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN // Add
// End of the added lines.
InitOutstandingAmount;
... -
Pakeisti UpdateTaxAmounts funkcija Pirkimo eilutės lentelės (39):
Esamas kodas 1... "Bal. TDS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Delete the following lines.
//LineTaxAmount := ROUND(IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code","Tax Liable",PurchHeader."Posting Date",
// "Tax Base Amount",Quantity,PurchHeader."Currency Factor","Form Code"),Currency."Amount Rounding Precision");
// End of the deleted lines.
AmountonInventory := 0;
InputTaxCreditAmount := 0;
...Atsarginis kodas 1
... "Bal. TDS Including SHECESS" + "Service Tax Amount" + "Service Tax eCess Amount" +
"Service Tax SHE Cess Amount",Currency."Amount Rounding Precision")
END;
IndianSalesTaxCalculate.SetCurrency("Currency Code" <>'');
// Add the following lines.
LineTaxAmount := ROUND(IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code","Tax Liable",PurchHeader."Posting Date",
"Tax Base Amount",Quantity,PurchHeader."Currency Factor","Form Code","Tax %"),Currency."Amount Rounding Precision");
// End of the added lines.
AmountonInventory := 0;
InputTaxCreditAmount := 0;
...Esamas kodas 2
... "Tax Amount" := ROUND(TaxAmount,Currency."Amount Rounding Precision");
"Amount Including Tax" := ("Tax Base Amount" + "Tax Amount");
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := ROUND(100 * ("Amount Including Tax" - "Tax Base Amount") / "Tax Base Amount",
// Currency."Amount Rounding Precision")
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
ServiceTaxSetup.RESET;
...Atsarginis kodas 2
... "Tax Amount" := ROUND(TaxAmount,Currency."Amount Rounding Precision");
"Amount Including Tax" := ("Tax Base Amount" + "Tax Amount");
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
ServiceTaxSetup.RESET;
... -
Keisti funkcija UpdateTaxAmount PVM darbo žurnalo lentelės (16569) taip:
Esamas kodas... IF "Transaction Type" = "Transaction Type"::Purchase THEN BEGIN
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code",TRUE,"Posting Date",
// "Tax Base Amount",Quantity,0,'');
// End of the deleted lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningInputTaxCredit(Rec,"Amount Loaded on Item",
"Input Credit/Output Tax Amount",TRUE,TaxAmount);
"Tax Amount" := TaxAmount;
IF GLSetup."VAT Rounding Precision" <> 0 THEN
"Tax Amount" := ROUND("Tax Amount",GLSetup."VAT Rounding Precision",Direction);
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := 100 * (("Tax Base Amount" + "Tax Amount") - "Tax Base Amount") / "Tax Base Amount"
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
END ELSE IF "Transaction Type" = "Transaction Type"::Sale THEN BEGIN
IF ("Export or Deemed Export") THEN
EXIT;
// Delete the following lines.
//LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
// "Tax Area Code","Tax Group Code",TRUE,"Posting Date",
// "Tax Base Amount",Quantity,0,'');
// End of the deleted lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningSTD(Rec,StandardDeductionAmount,TaxAmount);
"Tax Amount" := TaxAmount - StandardDeductionAmount;
// Delete the following lines.
//IF "Tax Base Amount" <> 0 THEN
// "Tax %" := 100 * (("Tax Base Amount" + "Tax Amount") - "Tax Base Amount") / "Tax Base Amount"
//ELSE
// "Tax %" := 0;
// End of the deleted lines.
"Input Credit/Output Tax Amount" := "Tax Amount";
"Amount Loaded on Item" := 0;
END;
...Pastaba.
... IF "Transaction Type" = "Transaction Type"::Purchase THEN BEGIN
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code",TRUE,"Posting Date",
"Tax Base Amount",Quantity,0,'',"Tax %");
// End of the added lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningInputTaxCredit(Rec,"Amount Loaded on Item",
"Input Credit/Output Tax Amount",TRUE,TaxAmount);
"Tax Amount" := TaxAmount;
IF GLSetup."VAT Rounding Precision" <> 0 THEN
"Tax Amount" := ROUND("Tax Amount",GLSetup."VAT Rounding Precision",Direction);
// Add the following lines.
IF "Tax Base Amount" = 0 THEN
"Tax %" := 0;
// End of the added lines.
END ELSE IF "Transaction Type" = "Transaction Type"::Sale THEN BEGIN
IF ("Export or Deemed Export") THEN
EXIT;
// Add the following lines.
LineTaxAmount := IndianSalesTaxCalculate.CalculateTax(
"Tax Area Code","Tax Group Code",TRUE,"Posting Date",
"Tax Base Amount",Quantity,0,'',"Tax %");
// End of the added lines.
IF LineTaxAmount <> 0 THEN
IndianSalesTaxCalculate.GetVATOpeningSTD(Rec,StandardDeductionAmount,TaxAmount);
"Tax Amount" := TaxAmount - StandardDeductionAmount;
// Add the following lines.
IF "Tax Base Amount" = 0 THEN // Add
"Tax %" := 0; // Add
// End of the added lines.
"Input Credit/Output Tax Amount" := "Tax Amount";
"Amount Loaded on Item" := 0;
END;
... -
Indijos PVM apskaičiuoti Kodinys (13704) kodą pakeisti taip:
Esamas kodas... Taxamount := TaxBaseAmount * TaxDetail."Tax Below Maximum" / 100;
IF (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::VAT) OR
(TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::CST)
...Pastaba.
... Taxamount := TaxBaseAmount * TaxDetail."Tax Below Maximum" / 100;
// Add the following line.
TaxPercent := TaxDetail."Tax Below Maximum";
// End of the added line.
IF (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::VAT) OR
(TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::CST)
...
7. Codeunit 13704 Indian Sales Tax Calculate
Function CalculateTax
Add the below Parameter
VAR TaxPercent Type Decimal
Būtinosios sąlygos
Turite Indijos versiją Microsoft Dynamics NAV 2009 1 pakeitimų paketas (SP1) Norint taikyti šias karštąsias pataisas.
Pašalinimo informacija
Jūs negalite pašalinti šias karštąsias pataisas.
Būsena
„Microsoft“ patvirtino, kad tai yra „Microsoft“ produktų, išvardytų skyriuje „Taikoma“, problema.
Nuorodos
VSTF DynamicsNAV SE: 252133
Pastaba. Tai yra "GREITAI PUBLIKUOJAMAS" straipsnis, sukurtas tiesiogiai Microsoft palaikymo tarnybos. Čia pateikta informacija yra atsakas į kylančius klausimus. Dėl greito publikavimo medžiagoje gali būti spausdinimo klaidų ir ji gali būti peržiūrima bet kuriuo metu be įspėjimo. Naudojimo ieškokite kitų priežasčių.
