Microsoft Dynamics NAV'ın İsviçre sürümünde Para Birimi Ayarlaması raporunu çalıştırdığınızda beklenmedik bir şekilde ek KDV girişi oluşturulur

Uygulandığı Öğe
Dynamics NAV 2009 Dynamics NAV 2009 Service Pack 1 Microsoft Dynamics NAV 5.0 Microsoft Dynamics NAV 5.0 Service Pack 1

Bu makale, aşağıdaki ülkelerde ve dil yerel ayarlarında Microsoft Dynamics NAV için geçerlidir.

  • Fransızca (İsviçre) (fr-ch)
  • Almanca (İsviçre) (gr-ch)
  • İtalyanca (İsviçre) (it-ch)

Belirtiler

Microsoft Dynamics NAV'ın İsviçre sürümünde, döviz kuru farkları için katma değer vergisi (KDV) girişlerini ayarlayabilirsiniz. Öte yandan, TAM KDV hesaplama türü kullanılırsa, KDV para birimi düzenlemesi ek bir KDV girişi oluşturur. Para Birimi Ayarlama raporunu çalıştırdığınızda, ek KDV girişi oluşturulur.
Bu sorun aşağıdaki ürünlerde oluşur:

  • Microsoft Dynamics NAV 2009 Service Pack 1'in İsviçre sürümü
  • Microsoft Dynamics NAV 2009'un İsviçre sürümü
  • Microsoft Dynamics NAV 5.0 Service Pack 1'in İsviçre sürümü
  • Microsoft Dynamics NAV 5.0'ın İsviçre sürümü

Çözüm

Düzeltme bilgileri

Artık Microsoft, desteklenen bir düzeltme sunmaktadır. Ancak, yalnızca bu makalede açıklanan sorunu düzeltmeye yöneliktir. Bunu yalnızca bu özel sorunun yaşandığı sistemlere uygulayın. Bu düzeltme için ek sınamalar gerekebilir. Bu nedenle, bu sorundan ciddi bir şekilde etkilenmiyorsanız, bir sonraki Microsoft Dynamics NAV hizmet paketini veya bu düzeltmeyi içeren bir sonraki Microsoft Dynamics NAV sürümünü beklemenizi öneririz.

Not Özel durumlarda, Microsoft Dynamics ve ilgili ürünler için bir Teknik Destek Uzmanı belirli bir güncelleştirmenin sorunu çözeceğini belirlerse, normalde destek aramaları için yapılan ücretler iptal edilebilir. Ek destek soruları ve söz konusu güncelleştirme için uygun olmayan sorunlara normal destek ücretleri uygulanır.

            
          

Yükleme bilgileri

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; açık veya zımni hiçbir garanti vermez. Bu, satılabilirlik veya belirli bir amaca uygunluk ile ilgili zımni garantileri içerir, ancak bunlarla sınırlı değildir. Bu makale, gösterilen programlama diline ve prosedürler oluşturmak ve prosedürlerde hata ayıklamak için kullanılan araçlara aşina olduğunuzu varsaymaktadır. Microsoft destek mühendisleri, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler.

Not Bu düzeltmeyi yüklemeden önce, tüm Microsoft Navision istemcisi kullanıcılarının sistem oturumunu kapattığını doğrulayın. Bu, Microsoft Navision Application Services (NAS) istemci kullanıcılarını içerir. Bu düzeltmeyi uyguladığınızda oturum açan tek istemci kullanıcı siz olmalısınız.

Bu düzeltmeyi uygulamak için bir geliştirici lisansınız olmalıdır.

Windows Oturum Açma veya Veritabanı Oturum Açma penceresindeki kullanıcı hesabına "SUPER" rol kimliğinin atanmasını öneririz. Kullanıcı hesabına "SUPER" rol kimliği atanamıyorsa, kullanıcı hesabının aşağıdaki izinlere sahip olduğunu doğrulamanız gerekir:

  • Değiştireceğiniz nesnenin Değiştirme izni.
  • Sistem Nesne Kimliği 5210 nesnesi ve Sistem Nesne Kimliği 9015 nesnesi için Yürütme izni.

                
Not: Veri onarımı gerçekleştirmeniz gerekmediği sürece, veri depoları üzerinde haklarınız olması gerekmez.

Kod değişiklikleri

Not: Kod düzeltmelerini üretim bilgisayarlarınıza uygulamadan önce her zaman denetimli bir ortamda sınayın.
Bu sorunu gidermek için aşağıdaki adımları izleyin:

  1. Gen'deki InsertVAT işlevine yerel bir değişken ekleyin. Jnl.-Post Line kod birimi (12) ve ardından değişkeni aşağıdaki gibi belirtin:

    • Ad:SourceCodeSetup
    • DataType:Record
    • Alt tür:Kaynak kodu kurulumu
  2. Gen'deki InsertVAT işlevindeki kodu değiştirin. Jnl.-Posta Hattı kod birimi (12) aşağıdaki gibidir:
    Mevcut kod

    ...
          IF (VATEntry."Currency Code" <> '') THEN
            VATEntry."Unadjusted Exchange Rate" := TRUE;
        END;
        VATEntry.INSERT;
        GLEntryVatEntrylink.InsertLink(GLEntryTmp,VATEntry);     // this line exists in NAV 2009 only
        NextVATEntryNo := NextVATEntryNo + 1;
      END;
      // VAT for G/L entry/entries
      IF (GLEntryVATAmount <> 0) OR
         ((SrcCurrGLEntryVATAmt <> 0) AND (SrcCurrCode = GLSetup."Additional Reporting Currency"))
    ...
    
    

    Değişim kodu

    ...
          IF (VATEntry."Currency Code" <> '') THEN
            VATEntry."Unadjusted Exchange Rate" := TRUE;
        END;
        SourceCodeSetup.GET; 
        IF "Source Code" <> SourceCodeSetup."Exchange Rate Adjmt." THEN BEGIN 
          VATEntry.INSERT;
          GLEntryVatEntrylink.InsertLink(GLEntryTmp,VATEntry);     // this line exists in NAV 2009 only
          NextVATEntryNo := NextVATEntryNo + 1;
        END;
      END;
      // VAT for G/L entry/entries
      IF (GLEntryVATAmount <> 0) OR
         ((SrcCurrGLEntryVATAmt <> 0) AND (SrcCurrCode = GLSetup."Additional Reporting Currency"))
    ...
    
    
  3. Döviz Kurlarını Ayarla raporundaki KDV Girişi - OnPostDataItem tetikleyicisindeki (595) kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
    IF PostSettlement THEN BEGIN
      GenJnlPostLine.GetGLReg(GLReg);
      IF GLReg."No." <> 0 THEN BEGIN
        GLReg."To VAT Entry No." := NewVATEntry."Entry No.";
       GLReg.MODIFY;
      END ELSE BEGIN
    ...
    
    

    Değişim kodu

    ...
    IF PostSettlement THEN BEGIN
      GenJnlPostLine.GetGLReg(GLReg);
      IF GLReg."No." <> 0 THEN BEGIN
    
    // Add the following lines.
        IF NewVATEntry."Entry No." >= FirstVATEntry THEN 
          GLReg."From VAT Entry No." := FirstVATEntry; 
    // End of the lins.
    
        GLReg."To VAT Entry No." := NewVATEntry."Entry No.";
        GLReg.MODIFY;
      END ELSE BEGIN
    ...
    
    

Önkoşullar

Bu düzeltmeyi uygulamak için aşağıdaki ürünlerden birini yüklemiş olmanız gerekir:

  • Microsoft Dynamics NAV 2009 Service Pack 1'in İsviçre sürümü
  • Microsoft Dynamics NAV 2009'un İsviçre sürümü
  • Microsoft Dynamics NAV 5.0 Service Pack 1'in İsviçre sürümü
  • Microsoft Dynamics NAV 5.0'ın İsviçre sürümü

Kaldırma bilgileri

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

Durum

Microsoft bunun, "Şunlar için geçerlidir" bölümünde listelenen Microsoft ürünlerinde sorun olduğunu doğrulamıştır.

Not: Bu, doğrudan Microsoft destek kuruluşu tarafından hazırlanmış bir "HIZLI YAYIMLAMA" makalesidir. Burada yer alan bilgiler acil sorunlar karşısında bu şekliyle verilir. Kullanıma sunma hızının bir sonucu olarak, materyaller yazım hataları içerebilir ve herhangi bir zamanda önceden haber verilmeksizin revize edilebilir. Göz önünde bulundurulması gereken diğer hususlar için Kullanım Koşulları'na bakın.