Microsoft Dynamics NAV'ın İspanyolca sürümünde Make 347 Declaration raporunu çalıştırdığınızda özel karakterler normal karakterlere dönüştürülmez

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

Hızlı Yayımlanan makaleler, doğrudan Microsoft destek kuruluşunun içinden bilgi sağlar. Burada yer alan bilgiler, ortaya çıkan veya benzersiz konulara yanıt olarak oluşturulmuştur veya diğer Bilgi Bankası bilgilerini tamamlamayı amaçlamaktadır.
 Microsoft Business Solutions-Navision 4.0 ve Microsoft Navision 4.0 artık Microsoft Dynamics NAV 4.0'ın bir parçasıdır. Microsoft Business Solutions-Navision'a veya Microsoft Navision 4.0'a yapılan tüm başvurular Microsoft Dynamics NAV ile ilgilidir.

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ünde 347 Bildirimi Yap raporunu çalıştırdığınızda, özel karakterler normal karakterlere dönüştürülmez.

Not: Tüm özel karakterler normal karakterlere dönüştürülür. á, é, í, ó, ú, ä, ë, ï, ö, ø ve ü karakterleri a, e, i, o ve u karakterlerine dönüştürülmelidir. ', ", &, $, ( ve ) gibi diğer karakterler boşluğa dönüştürülmelidir. ñ karakteri ASCII 209'a ve Ç karakteri ASCII 199'a dönüştürülmelidir. Bir karakterden a'ya ve A'dan Z'ye farklı olan diğer tüm karakterler boşluğa dönüştürülmelidir. Ayrıca, eksi işareti (-) boşluğa dönüştürülmelidir.

Bu sorun aşağıdaki ürünlerde oluşur:

  • Microsoft Dynamics NAV 2009'un İspanyolca sürümü
  • Microsoft Dynamics NAV 5.0 Service Pack 1'in İspanyolca sürümü
  • Microsoft Dynamics NAV 4.0 Service Pack 3'ün İspanyolca 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 düzeltmeyi uygulamak için şu adımları izleyin:

  1. Make 347 Bildirimi raporundaki (10707) Veri Öğesi Numarası 2 nesnesindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
                                 GLEntry3@1100000 : Record 17;
                               BEGIN
                                 VATRegNo347 := PADSTR(COPYSTR(DELCHR("VAT Registration No.",'=','.-/'),1,9),9,' ');
    
                                 // Delete the following lines.
                                 Name347 := PADSTR(Name,40,' ');
                                 Name347 := CONVERTSTR(UPPERCASE(Name347),'µ•ÔÖÞàãé륚()"&ï',Text1100003);
                                 // End of the lines.
    
                                 PostCode347 := PADSTR(StatementNo("Post Code"),5,' ');
                                 CountryCity := COPYSTR(PostCode347,1,2)+ '   ';
                                 IF Customer."Country Code" <> '' THEN BEGIN
    ...
    
    

    Değişim kodu

    ...
                                 GLEntry3@1100000 : Record 17;
                               BEGIN
                                 VATRegNo347 := PADSTR(COPYSTR(DELCHR("VAT Registration No.",'=','.-/'),1,9),9,' ');
    
                                 // Add the following line.
                                 Name347 := PADSTR(FormatTextName(Name),40,' '); 
                                 // End of the line.
    
                                 PostCode347 := PADSTR(StatementNo("Post Code"),5,' ');
                                 CountryCity := COPYSTR(PostCode347,1,2)+ '   ';
                                 IF Customer."Country Code" <> '' THEN BEGIN
    ...
    
    
  2. Make 347 Bildirimi raporundaki (10707) Veri Öğesi Numarası 2 Bölümler nesnesindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
                                      ELSE
                                        CashAmtText := PADSTR('',15,'0');
                                      OutText :=
    
                                       // Delete the following line.
                                        '2347' + FiscalYear + VATRegNo + VATRegNo347 + PADSTR('',9,' ') +UPPERCASE(Name347) + Text1100002 +
                                        // End of the line.
    .
                                        COPYSTR(PostCode347,1,2) + PADSTR('',3,' ') + Text1100008 + CONVERTSTR(AmountText,' ','0') + PADSTR('',2,' ') +
                                        CashAmtText + PADSTR('',15,'0') + PADSTR('', 371, ' ');
    ...
    
    

    Değişim kodu

    ...
                                      ELSE
                                        CashAmtText := PADSTR('',15,'0');
                                      OutText :=
    
                                        // Add the following line.
                                        '2347' + FiscalYear + UPPERCASE(VATRegNo) + UPPERCASE(VATRegNo347) + PADSTR('',9,' ') +UPPERCASE(Name347) + Text1100002 + 
                                        // End of the line.
    
                                        COPYSTR(PostCode347,1,2) + PADSTR('',3,' ') + Text1100008 + CONVERTSTR(AmountText,' ','0') + PADSTR('',2,' ') +
                                        CashAmtText + PADSTR('',15,'0') + PADSTR('', 371, ' ');
    ...
    
    
  3. Make 347 Bildirimi raporundaki (10707) Veri Öğesi Numarası 5 nesnesindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
              OnAfterGetRecord=BEGIN
                                 VATRegNo347 := PADSTR(COPYSTR(DELCHR("VAT Registration No.",'=','.-/'),1,9),9,' ');
    
                                 // Delete the following lines.
                                 Name347 := PADSTR(Name,40,' ');
                                 Name347 := CONVERTSTR(UPPERCASE(Name347),'µ•ÔÖÞàãé륚()"&ï',Text1100003);
                                 // End of the lines.
    
                                 PostCode347 := PADSTR(StatementNo("Post Code"),5,' ');
                                 CountryCity := COPYSTR(PostCode347,1,2)+ '   ';
                                 IF Vendor."Country Code"<>'' THEN BEGIN
    ...
    
    

    Değişim kodu

    ...
              OnAfterGetRecord=BEGIN
                                 VATRegNo347 := PADSTR(COPYSTR(DELCHR("VAT Registration No.",'=','.-/'),1,9),9,' ');
    
                                 // Add the following line.
                                 Name347 := PADSTR(FormatTextName(Name),40,' '); 
                                 // End of the line.
    
                                 PostCode347 := PADSTR(StatementNo("Post Code"),5,' ');
                                 CountryCity := COPYSTR(PostCode347,1,2)+ '   ';
                                 IF Vendor."Country Code"<>'' THEN BEGIN
    ...
    
    
  4. Make 347 Bildirimi raporundaki (10707) Veri Öğesi Numarası 5 Bölümler nesnesindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
                                      CLEAR(OutText);
                                      AmountText := AmtEuro(PurchasesAmt);
                                      OutText :=
    
                                        // Delete the following line.
                                        '2347' + FiscalYear + VATRegNo + VATRegNo347 + PADSTR('',9,' ') +UPPERCASE(Name347) + Text1100002 +
                                        // End of the line.
    
                                        COPYSTR(PostCode347,1,2) + PADSTR('',3,' ')  + Text1100011 + CONVERTSTR(AmountText,' ','0') + PADSTR('',2,' ') +
                                        PADSTR('',15,'0') + PADSTR('',15,'0') + PADSTR('', 371, ' ');
    ...
    
    

    Değişim kodu

    ...
                                      CLEAR(OutText);
                                      AmountText := AmtEuro(PurchasesAmt);
                                      OutText :=
    
                                        // Add the following line.
                                        '2347' + FiscalYear + UPPERCASE(VATRegNo) + UPPERCASE(VATRegNo347) + PADSTR('',9,' ') +UPPERCASE(Name347) + Text1100002 + 
                                        // End of the line.
    
                                        COPYSTR(PostCode347,1,2) + PADSTR('',3,' ')  + Text1100011 + CONVERTSTR(AmountText,' ','0') + PADSTR('',2,' ') +
                                        PADSTR('',15,'0') + PADSTR('',15,'0') + PADSTR('', 371, ' ');
    ...
    
    
  5. Make 347 Bildirimi raporundaki (10707) global değişkenlerin kodunu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
        CODE
        {
          VAR
    
            // Delete the following lines.
            Text1100001@1100058 : TextConst 'ENU="AAEEIIOOUUÑU    ";ESP="AAEEIIOOUUÑU    "';
            Text1100002@1100059 : TextConst 'ENU=D;ESP=D';
            Text1100003@1100060 : TextConst 'ENU="AAEEIIOOUUÑU     ";ESP="AAEEIIOOUUÑU     "';
            Text1100004@1100061 : TextConst 'ENU=<Integer>;ESP=<Integer>';
            Text1100005@1100062 : TextConst 'ENU="AAEEIIOOUU¥U     ";ESP="AAEEIIOOUU¥U     "';
            // End of the lines.
    
            Text1100006@1100063 : TextConst 'ENU=Postal Code is missing in customer''s card %1;ESP=Falta el c¢digo postal en la ficha del cliente %1';
            Text1100008@1100065 : TextConst 'ENU=B;ESP=B';
            Text1100009@1100066 : TextConst 'ENU=Postal Code is missing in vendor''s card %1;ESP=Falta el c¢digo postal en la ficha del proveedor %1';
    ...
    
    

    Değişim kodu

    ...
        CODE
        {
          VAR
    
            // Add the following lines.
            Text1100002@1100059 : TextConst 'ENU=D;ESP=D';
            Text1100004@1100061 : TextConst 'ENU=<Integer>;ESP=<Integer>';
            // End of the lines.
    
            Text1100006@1100063 : TextConst 'ENU=Postal Code is missing in customer''s card %1;ESP=Falta el c¢digo postal en la ficha del cliente %1';
            Text1100008@1100065 : TextConst 'ENU=B;ESP=B';
            Text1100009@1100066 : TextConst 'ENU=Postal Code is missing in vendor''s card %1;ESP=Falta el c¢digo postal en la ficha del proveedor %1';
    ...
    
    
  6. Make 347 Bildirim raporundaki (10707) CreateFileHeader işlevindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
            CLEAR(OutText);
    
            OutText :=
    
              // Delete the following lines.
              '1347' + FiscalYear + VATRegNo +
               PADSTR(CONVERTSTR(UPPERCASE(CompanyInfo.Name),'µ•ÔÖÞàãé륚€()"&ï','AAEEIIOOUUÑUÇ     '),40,' ');
              // End of the lines.
    
            IF DeclarationMediaType = DeclarationMediaType :: Telematic THEN
              DeclrationMT := 'T'
    ...
    
    

    Değişim kodu

    ...
            CLEAR(OutText);
    
            OutText :=
    
              // Add the following lines.
              '1347' + FiscalYear + UPPERCASE(VATRegNo) +
               PADSTR(FormatTextName(CompanyInfo.Name),40,' ');
              // End of the lines.
    
            IF DeclarationMediaType = DeclarationMediaType :: Telematic THEN
              DeclrationMT := 'T'
    ...
    
    
  7. Make 347 Bildirim raporundaki (10707) CreateFileHeader işlevindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
            OutText := OutText + DeclrationMT;
            OutText := OutText + ContactTelephone;
    
            // Delete the following line.
            OutText := OutText + PADSTR(CONVERTSTR(UPPERCASE(ContactName),'µ•ÔÖÞàãé륚€()"&ï','AAEEIIOOUUÑUÇ     '),40,' ');
            // End of the line.
    ...
    
    

    Değişim kodu

    ...
            OutText := OutText + DeclrationMT;
            OutText := OutText + ContactTelephone;
    
            // Add the following line.
            OutText := OutText + PADSTR(FormatTextName(ContactName),40,' '); 
            // End of the line.
    ...
    
    
  8. Make 347 Bildirimi raporundaki (10707) Documentation nesnesindeki kodu aşağıdaki gibi değiştirin:
    Mevcut kod

    ...
            NoOfAcc := j - 1;
          END;
    
          BEGIN
          END.
        }
      }
    ...
    
    

    Değişim kodu

    ...
            NoOfAcc := j - 1;
          END;
    
          // Add the following lines.
          PROCEDURE FormatTextName@1100006(NameString@1100000 : Text[50]) Result@1100001 : Text[50];
          VAR
            TempString@1100002 : Text[50];
            TempString1@1100003 : Text[1];
          BEGIN
            CLEAR(Result);
    
            TempString := CONVERTSTR(UPPERCASE(NameString),'•µ¶ÇŽÔÒÓÞÖרãàâå™ëéêší¥€§¦','AAAAAEEEEIIIIOOOOOUUUUYOÑÇ  ');
            IF (STRLEN(TempString) > 0) THEN
              REPEAT
                TempString1 := COPYSTR(TempString,1,1);
                IF TempString1 IN ['A'..'Z','0'..'9','Ñ','Ç'] THEN
                  Result := Result + TempString1
                ELSE
                  Result := Result + ' ';
                TempString := DELSTR(TempString,1,1);
              UNTIL STRLEN(TempString) = 0;
    
            EXIT(Result);
          END;
          // End of the lines.
    
          BEGIN
          END.
        }
      }
    ...
    
    

Önkoşullar

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

  • Microsoft Dynamics NAV 2009'un İspanyolca sürümü
  • Microsoft Dynamics NAV 5.0 Service Pack 1'in İspanyolca sürümü
  • Microsoft Dynamics NAV 4.0 Service Pack 3'ün İspanyolca 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.

MICROSOFT VE/VEYA TEDARİKÇİLERİ, BU WEB SİTESİNDE YAYINLANAN BELGELERDE VE İLGİLİ GRAFİKLERDEKİ BİLGİLERİN ("MALZEMELER") HERHANGİ BİR AMACA UYGUNLUĞU, GÜVENİLİRLİĞİ VEYA DOĞRULUĞU İLE İLGİLİ HİÇBİR BEYANDA BULUNMAZ VEYA GARANTİ VERMEZ.

MATERYALLER TEKNİK YANLIŞLIKLAR VEYA YAZIM HATALARI İÇEREBİLİR VE HERHANGİ BİR ZAMANDA BİLDİRİMDE BULUNULMAKSIZIN REVİZE EDİLEBİLİR. İLGİLİ YASALARIN İZİN VERDİĞİ AZAMİ ÖLÇÜDE, MICROSOFT VE/VEYA TEDARİKÇİLERİ, MALZEMELERLE İLGİLİ OLARAK MÜLKİYET, İHLAL ETMEME, TATMİN EDİCİ KOŞUL VEYA KALİTE, SATILABİLİRLİK VE BELİRLİ BİR AMACA UYGUNLUK DA DAHİL ANCAK BUNLARLA SINIRLI OLMAMAK KAYDIYLA AÇIK, ZIMNİ VEYA YASAL TÜM TEMSİL, GARANTİ VE KOŞULLARI REDDEDER VE HARİÇ TUTAR.