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

Bu makale, İspanyolca (es) dil yerel ayar için Microsoft Dynamics NAV için geçerlidir.

Belirtiler

Microsoft Dynamics NAV'ın İspanyolca sürümündeki KDV Gönderme Kurulumu iletişim kutusunda AB Hizmeti onay kutusunun seçili olduğunu varsayalım. 349 bildirim dosyasını oluşturana kadar, dışarı aktaran dosyanın miktarı yanlış olur.Bu sorun aşağıdaki ürünlerde ortaya çıkar:

  • Microsoft Dynamics NAV 2009 Service Pack 1'in (SP1) İspanyolca sürümü

  • Microsoft Dynamics NAV 5.0 Service Pack 1'in (SP1) İspanyolca sürümü

Çözüm

Düzeltme bilgileri

Desteklenen bir düzeltme artık Microsoft tarafından kullanılabilir. Bununla birlikte, yalnızca bu makalede açıklanan sorunu düzeltmeniz amaçlanmıştır. Yalnızca bu sorunla karşılaşan sistemlere uygulayabilirsiniz. Bu düzeltme ek testlerden yararlanabilir. Bu nedenle, bu sorundan ciddi bir etkileniyorsanız, bu düzeltmeyi içeren bir sonraki Microsoft Dynamics NAV 2009 hizmet paketini veya sonraki Microsoft Dynamics NAV sürümünü beklemenizi öneririz. Not Özel durumlarda, Microsoft Dynamics için Teknik Destek Uzmanı ve ilgili ürünler belirli bir güncelleştirmenin sorununuzu çözecek olduğunu belirlerse, normalde destek aramaları için ortaya konulan ücretler iptal edilir. Her zamanki destek maliyetleri, söz konusu güncelleştirme için uygun olan ek destek soruları ve sorunları için geçerlidir.

Yükleme bilgileri

Microsoft, açık veya zımni garanti olmaksızın yalnızca çizim için programlama örnekleri sağlar. Bu, satıcılık veya belirli bir amaca uygunluk ile ilgili zımni garantileri içerir, ancak bunlarla sınırlı değildir. Bu makalede, burada gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak için kullanılan araçlara aşina olduğunuz varsayıldı. Microsoft destek mühendisleri belirli bir yordamın işlevselliğini açıklamaya yardımcı olabilir, ancak bu örneklerde değişiklik olmaz ve sizin özel gereksinimlerinizi karşılayacak ek işlevler sağlamak veya yordamlar oluşturmak için bu örnekleri değiştirmezler.Not Bu düzeltmeyi yüklemeden önce, tüm Microsoft Navision istemci kullanıcılarının sistemde oturumu kapatmış olduğunu doğrulayın. Bu, Microsoft Navision Application Services (NAS) istemci kullanıcılarını içerir. Bu düzeltmeyi uyguladıktan sonra oturum açan tek istemci kullanıcısı siz olmalıdır.Bu düzeltmeyi uygulamak için bir geliştirici lisansınız olmalıdır.Windows Oturum Açma penceresinde veya Veritabanı Oturum Açma penceresindeki kullanıcı hesabına "SUPER" rol kimliği atanmalarını öneririz. Kullanıcı hesabına "SUPER" rol kimliği atanamazsa, kullanıcı hesabına aşağıdaki izinlerin olduğunu doğrulamanız gerekir:

  • Değiştirecek nesne üzerinde Değiştirme izni.

  • System Object ID 5210 nesnesi ve System Object ID 9015 nesnesi için Yürütme izni.

Not Veri onarımı yapmak zorunda olmadığınız sürece veri depoları üzerinde haklara sahip olmak zorunda değildir.

Kod değişiklikleri

Not Düzeltmeleri üretim bilgisayarlarına uygulamadan önce her zaman denetimli ortamdaki kod düzeltmelerini test edersiniz. Bu sorunu gidermek için aşağıdaki adımları izleyin:

  1. 349 Bildirim Raporunun (88) Veri Öğesi Numarası 5 Bölümlerindeki kodu şu şekilde değiştirin: Var olan kod 1

                                  BEGIN                                REPEAT                                  //Delete the following line.                                  VATInvSales.RESET;                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Değişim kodu 1

                                  BEGIN                                REPEAT                                  //Add the follwing lines.                                  LastTransactionNo := 0;                                  VATInvSales.RESET;                                  VATInvSales.SETCURRENTKEY("Transaction No.");                                   //End of the lines.                                                                 VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Var olan kod 2

                                              IF "VAT Registration No." <> '' THEN BEGIN                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              //Delete the following lines.                                              OpTriang := 'X';                                              AmountOpTri := AmountOpTri + AmountToIncludein349                                              //End of the lines.                                                                                       END ELSE BEGIN                                              OpTriang := 'X';

    Değişim kodu 2

                                              IF "VAT Registration No." <> '' THEN BEGIN                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              //Add the following lines.                                              IF VATInvSales."Transaction No." <> LastTransactionNo THEN BEGIN                                                OpTriang := 'X';                                                AmountOpTri := AmountOpTri + AmountToIncludein349;                                              END;                                              //End of the lines.                                                                                       END ELSE BEGIN                                              OpTriang := 'X';

    Var olan kod 3

                                          // OpTriang := 'X';                                      // AmountOpTri := AmountOpTri + VATInvSales.Base;                                    UNTIL VATInvSales.NEXT = 0;                                  END;

    Değişim kodu 3

                                          // OpTriang := 'X';                                      // AmountOpTri := AmountOpTri + VATInvSales.Base;                                      //Add the following line.                                      LastTransactionNo := VATInvSales."Transaction No.";                                    UNTIL VATInvSales.NEXT = 0;                                  END;

    Var olan kod 4

                                        UNTIL VATInvSales.NEXT = 0;                                  END;                                  //Delete the following line.                                  VATInvSales.RESET;                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Değişim kodu 4

                                        UNTIL VATInvSales.NEXT = 0;                                  END;                                  //Add the following lines.                                  LastTransactionNo := 0;                                  VATInvSales.RESET;                                  VATInvSales.SETCURRENTKEY("Transaction No.");                                   //End of the lines.                                  VATInvSales.SETRANGE(VATInvSales.Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE(VATInvSales."Document Type",VATInvSales."Document Type"::Invoice);

    Var olan kod 5

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                           //Delete the following lines.                                           IF AmountToIncludein349 <> 0 THEN                                             NormalAmount := NormalAmount + AmountToIncludein349                                           ELSE                                           //End of the lines.                                             NormalAmount := NormalAmount + VATInvSales.Base;                                          END ELSE

    Değişim kodu 5

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                           //Add the following lines.                                           IF AmountToIncludein349 <> 0 THEN BEGIN                                             IF VATInvSales."Transaction No." <> LastTransactionNo THEN                                               NormalAmount := NormalAmount + AmountToIncludein349;                                           END ELSE                                           //End of the lines.                                                                                     NormalAmount := NormalAmount + VATInvSales.Base;                                          END ELSE

    Var olan kod 6

                                          END;                                      // NormalAmount := NormalAmount + VATInvSales.Base;                                    UNTIL VATInvSales.NEXT = 0;                                  END;

    Değişim kodu 6

                                          END;                                      // NormalAmount := NormalAmount + VATInvSales.Base;                                      //Add the following line.                                      LastTransactionNo := VATInvSales."Transaction No.";                                    UNTIL VATInvSales.NEXT = 0;                                  END;

    Var olan kod 7

                                      END;                                  //Delete the following line.                                  VATInvSales.RESET;                                  VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

    Değişim kodu 7

                                      END;                                  //Add the following lines.                                  LastTransactionNo := 0;                                   VATInvSales.RESET;                                  VATInvSales.SETCURRENTKEY("Transaction No.");                                   //End of the lines.                                  VATInvSales.SETRANGE(Type,VATInvSales.Type::Sale);                                  VATInvSales.SETRANGE("Document Type",VATInvSales."Document Type"::Invoice);

    Var olan kod 8

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Delete the following lines.                                            IF AmountToIncludein349 <> 0 THEN                                              AmountEUService := AmountEUService + AmountToIncludein349                                            ELSE                                            //End of the lines.                                                                                       AmountEUService := AmountEUService + VATInvSales.Base;                                          END ELSE

    Değişim kodu 8

                                              ((VATInvSales."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Add the following lines.                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              IF VATInvSales."Transaction No." <> LastTransactionNo THEN                                                AmountEUService := AmountEUService + AmountToIncludein349;                                            END ELSE                                            //End of the lines.                                                                                       AmountEUService := AmountEUService + VATInvSales.Base;                                          END ELSE

    Var olan kod 9

                                            END;                                      END;                                    UNTIL VATInvSales.NEXT = 0;

    Değişim kodu 9

                                            END;                                      END;                                      //Add the following line.                                      LastTransactionNo := VATInvSales."Transaction No.";                                    UNTIL VATInvSales.NEXT = 0;
  2. 349 Bildirim Raporunun (88) Veri Öğesi Numarası 6 Bölümlerindeki kodu şu şekilde değiştirin: Var olan kod 1

                                  BEGIN                                REPEAT                                  //Delete the following line.                                  VATInvPurch.RESET;                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Değişim kodu 1

                                  BEGIN                                REPEAT                                  //Add the following lines.                                  LastTransactionNo := 0;                                  VATInvPurch.RESET;                                  VATInvPurch.SETCURRENTKEY("Transaction No.");                                  //End of the lines.                                                            VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Var olan kod 2

                                              IF "VAT Registration No." <> '' THEN BEGIN                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              //Delete the following lines.                                              OpTriang := 'X';                                              AmountOpTri := AmountOpTri + AmountToIncludein349;                                              //End of the lines.                                                                                       END ELSE BEGIN                                              OpTriang := 'X';

    Değişim kodu 2

                                              IF "VAT Registration No." <> '' THEN BEGIN                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              //Add the following lines.                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN BEGIN                                                OpTriang := 'X';                                                AmountOpTri := AmountOpTri + AmountToIncludein349;                                              END;                                              //End of the lines.                                            END ELSE BEGIN                                              OpTriang := 'X';

    Var olan kod 3

                                          // OpTriang := 'X';                                      // AmountOpTri := AmountOpTri + VATInvPurch.Base;                                    UNTIL VATInvPurch.NEXT = 0;                                  END;

    Değişim kodu 3

                                          // OpTriang := 'X';                                      // AmountOpTri := AmountOpTri + VATInvPurch.Base;                                      //Add the following line.                                      LastTransactionNo := VATInvPurch."Transaction No.";                                    UNTIL VATInvPurch.NEXT = 0;                                  END;

    Var olan kod 4

                                        UNTIL VATInvPurch.NEXT = 0;                                  END;                                  //Delete the following line.                                  VATInvPurch.RESET;                                  VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Değişim kodu 4

                                        UNTIL VATInvPurch.NEXT = 0;                                  END;                                  //Add the following lines.                                  LastTransactionNo := 0;                                  VATInvPurch.RESET;                                  VATInvPurch.SETCURRENTKEY("Transaction No.");                                  //End of the lines.                                                                 VATInvPurch.SETRANGE(VATInvPurch.Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE(VATInvPurch."Document Type",VATInvPurch."Document Type"::Invoice);

    Var olan kod 5

                                              ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Delete the following lines.                                            IF AmountToIncludein349 <> 0 THEN                                              NormalAmount := NormalAmount + AmountToIncludein349                                            ELSE                                            //End of the lines.                                              NormalAmount := NormalAmount + VATInvPurch.Base;                                          END ELSE

    Değişim kodu 5

                                              ((VATInvPurch."Country/Region Code" = CountryCode) AND LocationDiffCountryCode) THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Add the following lines.                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN                                                NormalAmount := NormalAmount + AmountToIncludein349;                                            END ELSE                                            //End of the lines.                                              NormalAmount := NormalAmount + VATInvPurch.Base;                                          END ELSE

    Var olan kod 6

                                          END;                                      // NormalAmount := NormalAmount + VATInvPurch.Base;                                    UNTIL VATInvPurch.NEXT = 0;                                  END;

    Değişim kodu 6

                                          END;                                      // NormalAmount := NormalAmount + VATInvPurch.Base;                                      //Add the following line.                                      LastTransactionNo := VATInvPurch."Transaction No.";                                    UNTIL VATInvPurch.NEXT = 0;                                  END;

    Var olan kod 7

                                        UNTIL VATInvPurch.NEXT = 0;                                  END;                                  //Delete the following line.                                  VATInvPurch.RESET;                                  VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

    Değişim kodu 7

                                        UNTIL VATInvPurch.NEXT = 0;                                  END;                                  //Add the following lines.                                  LastTransactionNo := 0;                                  VATInvPurch.RESET;                                  VATInvPurch.SETCURRENTKEY("Transaction No.");                                  //End of the lines.                                                              VATInvPurch.SETRANGE(Type,VATInvPurch.Type::Purchase);                                  VATInvPurch.SETRANGE("Document Type",VATInvPurch."Document Type"::Invoice);

    Var olan kod 8

                                            THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Delete the following lines.                                            IF AmountToIncludein349 <> 0 THEN                                              AmountEUService := AmountEUService + AmountToIncludein349                                            ELSE                                            //End of the lines.                                                                                       AmountEUService := AmountEUService + VATInvPurch.Base;                                          END ELSE

    Değişim kodu 8

                                            THEN BEGIN                                          IF "VAT Registration No." <> '' THEN BEGIN                                            //Add the following lines.                                            IF AmountToIncludein349 <> 0 THEN BEGIN                                              IF VATInvPurch."Transaction No." <> LastTransactionNo THEN                                                AmountEUService := AmountEUService + AmountToIncludein349;                                            END ELSE                                            //End of the lines.                                                                                       AmountEUService := AmountEUService + VATInvPurch.Base;                                          END ELSE

    Var olan kod 9

                                            END;                                      END;                                    UNTIL VATInvPurch.NEXT = 0;

    Değişim kodu 9

                                            END;                                      END;                                      //Add the following line.                                      LastTransactionNo := VATInvPurch."Transaction No.";                                    UNTIL VATInvPurch.NEXT = 0;
  3. Make 349 Bildirim raporuna (88) yeni bir genel değişken ekleyin ve ardından değişkeni aşağıdaki gibi belirtin:

    • Ad: LastTransactionNo@1100072

    • DataType: Tamsayı

Ön koşullar

Bu düzeltmeyi uygulamak için aşağıdaki ürünlerden birinin yüklü olması gerekir:

  • Microsoft Dynamics NAV 2009 Service Pack 1'in (SP1) İspanyolca sürümü

  • Microsoft Dynamics NAV 5.0 Service Pack 1'in (SP1) İspanyolca sürümü

Bu düzeltmeyi uygulamak için İspanyolca 349 raporunun yüklü olması gerekir.Daha fazla bilgi için şu Microsoft web sitesini ziyaret edin: İspanyolca 349 Raporu Ayrıca, bu düzeltmeyi uygulamak için KDV 2010 paketi yüklenmiş olmalıdır.Daha fazla bilgi için aşağıdaki Microsoft web sitesini ziyaret edin: KDV 2010 için Microsoft Dynamics NAV Desteği

Kaldırma bilgileri

Bu düzeltmeyi kaldıramazsanız.

Durum

Microsoft bu sorunun "Uygulandığı öğe" bölümünde listelenen Microsoft ürünlerinde bulunduğunu onaylamıştır.

Not Bu, doğrudan Microsoft destek kuruluşundan oluşturulmuş bir "HIZLI YATIR" makalesidir. Ortaya çıkan sorunlar için burada sağlanan bilgiler olduğu gibi sağlanır. Kullanılabilir hale gelen hızın bir sonucu olarak, malzemeler yazım hataları içerebilir ve herhangi bir zamanda uyarılmadan düzeltilmiş olabilir. Diğer dikkate alınacak noktalar için Kullanım Koşulları'ne bakın.

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

Daha fazla seçenek mi istiyorsunuz?

Abonelik avantajlarını keşfedin, eğitim kurslarına göz atın, cihazınızın güvenliğini nasıl sağlayacağınızı öğrenin ve daha fazlasını yapın.