Teknik kesinlik ve netlik yazma bize eşit derecede önemlidir.

Bu KB makalesi ile memnun değilseniz, lütfen her türlü ek Görüş Gönder

mailto:kbfdbk@microsoft.comLütfen ilgili KB makalesinin numarası ve karşılaşabileceğiniz özel açıklamaları içerir.

Sürekli KB içerik kalitesini artırmak için içerik takım yöneticileri etkin olarak bu görüş izleyebilir ve geliştirme alanları tanımlamak için kullanın.

Önceden Görüşleriniz için teşekkür ederiz.

Şablon: CPR - Navision kod düzeltme şablonu

# Hata: 141745 (İçerik Bakımı)

Bu makale Microsoft Dynamics NAV'a Hint (dil yerel gelen) için geçerlidir.

Belirtiler

Hint Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) sürümünde görüntülenen "vergi %" değeri bir satış siparişi satırı ve deftere nakledilen satış faturası satırının doğru değil. Vergi ayrıntıları kurulumunda vergi aşağıda Minimum değeri ile tutarlı olacak şekilde "Vergi %" değer beklediğiniz. Aynı sorunu da satınalma belgeleri için oluşur.

Çözüm

Düzeltme bilgileri

Artık Microsoft tarafından desteklenen bir düzeltme sağlanmaktadır. Ancak bunun yalnızca bu makalede anlatılan sorunu düzeltmesi amaçlanmıştır. Yalnızca bu özel sorunla karşılaşmış olan sistemlere uygulayın. Bu düzeltme ek sınama uygulanabilir. Bu nedenle, bu sorundan ciddi bir şekilde etkilenmiyorsanız, Microsoft Dynamics NAV 2009 sonraki hizmet paketini veya, bu düzeltmeyi içeren bir sonraki Microsoft Dynamics NAV sürümü için beklemek öneririz.

Not: Özel durumlarda, destek aramaları teknik destek uzmanı Microsoft Dynamics ve ilgili ürünlere yönelik iptal edilebilir çözeceğini giderleri belirleyen belirli bir güncelleştirmenin sorununuzu. Ek destek sorularına ve söz konusu güncelleştirme için geçerli olmayan sorunlara normal destek ücretleri uygulanır.

Bu düzeltme genel karşıdan yükleme (Bu makalede bu düzeltme için genel bir URL sağlanmayan anlamına gelir) için nakledilmemişse, dağıtım için teknik lider, yükseltme ekibi üyesi veya yönetici onayı gerekir ve aşağıdaki bilgiler geçerlidir:

  • Düzeltmeyi almak için müşterilerin "Belirtiler" bölümünde sözü edilen hata ile karşılaşmaları gerekir.

  • Bunu gönderdiğiniz ve bir sonraki hizmet paketini (bir hizmet paketi yayımlanırsa) kullanılabilir duruma geldiğinde bunları tedarik müşterileri izlemeniz gerekir.

Bu düzeltmeyi Microsoft Dynamics NAV 2009 bir hizmet paketine eklenmesi planlanmamıştır.



Yükleme bilgileri

Microsoft, programlama örneklerini yalnızca gösterim amacıyla zımni veya açık garanti olmadan sağlar. Bu, satılabilirlik veya belirli bir amaca uygunluk açısından zımni garantileri içerir ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama dilini, yordamları oluşturmak ve yordamlardan hata ayıklamak için kullanılan araçları bildiğinizi varsayar. Microsoft destek mühendisleri belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilirler, ancak ilave işlevsellik sağlamak için bu örnekleri değiştirmezler veya belirli gereksinimlerinizi karşılayacak şekilde yordamları yapılandırmazlar.

Not: Bu düzeltmeyi yüklemeden önce tüm Microsoft Navision istemcisi kullanıcılar sistem oturum doğrulayın. Bu, Microsoft Navision uygulama Hizmetleri (NAS) istemci kullanıcıları içerir. Bu düzeltmeyi uyguladığınızda yalnızca istemci kullanıcının oturum açmış olması gerekir.

Bu düzeltmeyi uygulamak için bir geliştirici lisansı olması gerekir.

Kullanıcı hesabının Windows oturumu açma penceresini veya veritabanı oturumu açma penceresi "Süper" rol kimliği atanması öneririz Kullanıcı hesabı "Süper" rol Kimliği atanamaz, kullanıcı hesabı aşağıdaki izinlere sahip olduğunu doğrulamanız gerekir:

  • Nesnenin, değiştirme değişiklik yapma izni.

  • Execute izni Sistem nesne kimliği 5210 nesnenin ve nesne kimliği 9015 sistem nesnesi için.



Not: Veri onarım gerçekleştirmek zorunda sürece veri depoları haklarına sahip olmanız gerekmez.

Kod değişiklikleri

Not: Her zaman, uygulamadan önce test kodu denetimli bir ortamda üretim bilgisayarlarınıza düzeltmeler giderir.
Bu sorunu gidermek için şu adımları izleyin:

  1. (37) Satış satırı tablosundaki KDV dahil tutar OnValidate tetikleyici kodu aşağıdaki gibi değiştirin:
    Varolan kodu

    ...                                                                      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;
    ...

    Kod değiştirme

    ...                                                                     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;
    ...
  2. UpdateTaxAmounts işlevi Satış satırı tablosundaki (37) kodu aşağıdaki gibi değiştirin:
    Varolan kodu 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;
    ...

    Değiştirme kodu 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;
    ...

    Varolan kodu 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)
    ...

    Değiştirme kodu 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)
    ...
  3. (39) Satınalma satırı tablosundaki KDV dahil tutar OnValidate tetikleyici kodu aşağıdaki gibi değiştirin:
    Varolan kodu

    ...       "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;
    ...

    Kod değiştirme

    ...       "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;
    ...
  4. Satınalma satırı tablosundaki (39) UpdateTaxAmounts işlev kodu aşağıdaki gibi değiştirin:
    Varolan kodu 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;
    ...

    Değiştirme kodu 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;
    ...

    Varolan kodu 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;
    ...

    Değiştirme kodu 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;
    ...
  5. UpdateTaxAmount KDV açılış günlük tablosu (16569) işlevinde kodu aşağıdaki gibi değiştirin:
    Varolan kodu

    ...  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;
    ...

    Kod değiştirme

    ...  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;
    ...
  6. Hint Vergi hesaplama kod (13704) kodu aşağıdaki gibi değiştirin:
    Varolan kodu

    ...        Taxamount := TaxBaseAmount * TaxDetail."Tax Below Maximum" / 100;

    IF (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::VAT) OR
    (TaxJurisdiction."Tax Type" = TaxJurisdiction."Tax Type"::CST)
    ...

    Kod değiştirme

    ...         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


Önkoşullar

Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) Hint sürümü bu düzeltmeyi uygulamak için yüklü olması gerekir.

Kaldırma bilgileri

Bu düzeltmeyi kaldıramazsınız.

Durum

Microsoft bu sorunun "Aşağıdakilere Uygulanır" bölümünde listelenen Microsoft ürünlerinde bulunduğunu onaylamıştır.

Başvurular

SE VSTF DynamicsNAV: 252133

Not: Bu, doğrudan Microsoft destek kuruluşu bünyesinde oluşturulan bir "HIZLI YAYIN" makalesidir. Burada yer alan bilgiler, oluşan sorunlara yanıt olarak olduğu gibi sağlanmıştır. Makale hızla kullanıma sunulduğu için materyallerde yazım hataları olabilir ve materyaller bildirilmeksizin herhangi bir zamanda revize edilebilir. Diğer konular için bkz. Kullanım koşulları.

Yazar: pallabm
Yazan: v-tinw
Teknik İnceleme: pallabm
Düzenleyen:

Daha fazla yardıma mı ihtiyacınız var?

Yeteneklerinizi geliştirin
Eğitimleri keşfedin
Yeni özellikleri ilk olarak siz edinin
Microsoft Insider 'a katılın

Bu bilgi yardımcı oldu mu?

Çeviri kalitesinden ne kadar memnunsunuz?
Deneyiminizi ne etkiledi?

Geri bildiriminiz için teşekkür ederiz!

×