Bu makale, Rusça (ru) dil yerel ayarı için Microsoft Dynamics NAV için geçerlidir.
Belirtiler
Önizleme özelliğini, Yerel Özellik Paketi 1 yüklü Microsoft Dynamics NAV 2009 R2'nin Rusça sürümünde etkinleştirdiğinizi varsayalım. Satın Almalar & Alacaklar Kurulumu iletişim kutusunda veya Satış & Alacaklar Kurulumu iletişim kutusunda Hesap Ters İndirimi alanını Evet olarak ayarlarsınız. Bu durumda, bir satınalma belgesi veya satış belgesi için deftere nakil işlemini çalıştırdığınızda, aşağıdaki hata iletisini alırsınız:
Not
Belge No'yu belirtmelisiniz. Öğe Günlüğü Satır Günlüğü Şablon Adı='',Günlük Toplu İş Adı='',Satır No.='0'.
Çö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 2009 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:
Sales-Post kod birimindeki (80) kodu aşağıdaki gibi değiştirin:
Mevcut kod... IF Invoice AND ("Posting No." = '') THEN BEGIN IF ("No. Series" <> '') OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN TESTFIELD("Posting No. Series"); IF ("No. Series" <> "Posting No. Series") OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN BEGIN IF ISNULLGUID(InstanceGUID) THEN BEGIN IF ("Shipping No. Series" = "Posting No. Series") AND ("Shipping No." <> '') THEN "Posting No." := "Shipping No." ELSE IF ("Return Receipt No. Series" = "Posting No. Series") AND ("Return Receipt No." <> '') THEN "Posting No." := "Return Receipt No." ELSE "Posting No." := NoSeriesMgt.GetNextNo("Posting No. Series","Posting Date",TRUE); // Delete the following line. ModifyHeader := TRUE; END ELSE "Posting No." := '***'; END; END; ...Değişim kodu
... IF Invoice AND ("Posting No." = '') THEN BEGIN IF ("No. Series" <> '') OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN TESTFIELD("Posting No. Series"); IF ("No. Series" <> "Posting No. Series") OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN BEGIN IF ISNULLGUID(InstanceGUID) THEN BEGIN IF ("Shipping No. Series" = "Posting No. Series") AND ("Shipping No." <> '') THEN "Posting No." := "Shipping No." ELSE IF ("Return Receipt No. Series" = "Posting No. Series") AND ("Return Receipt No." <> '') THEN "Posting No." := "Return Receipt No." ELSE "Posting No." := NoSeriesMgt.GetNextNo("Posting No. Series","Posting Date",TRUE); END ELSE "Posting No." := '***'; // Add the following line. ModifyHeader := TRUE; END; END; ...Purch.-Post kod birimindeki (90) kodu aşağıdaki gibi değiştirin:
Mevcut kod... IF Invoice AND ("Posting No." = '') THEN BEGIN IF ("No. Series" <> '') OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN TESTFIELD("Posting No. Series"); IF ("No. Series" <> "Posting No. Series") OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN BEGIN IF ISNULLGUID(InstanceGUID) THEN BEGIN IF ("Receiving No. Series" = "Posting No. Series") AND ("Receiving No." <> '') THEN "Posting No." := " Receiving No." ELSE IF ("Return Shipment No. Series" = "Posting No. Series") AND ("Return Shipment No." <> '') THEN "Posting No." := "Return Shipment No." ELSE "Posting No." := NoSeriesMgt.GetNextNo("Posting No. Series","Posting Date",TRUE); // Delete the following line. ModifyHeader := TRUE; END ELSE "Posting No." := '***'; END; END; ...Değişim kodu
... IF Invoice AND ("Posting No." = '') THEN BEGIN IF ("No. Series" <> '') OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN TESTFIELD("Posting No. Series"); IF ("No. Series" <> "Posting No. Series") OR ("Document Type" IN ["Document Type"::Order,"Document Type"::"Return Order"]) THEN BEGIN IF ISNULLGUID(InstanceGUID) THEN BEGIN IF ("Receiving No. Series" = "Posting No. Series") AND ("Receiving No." <> '') THEN "Posting No." := " Receiving No." ELSE IF ("Return Shipment No. Series" = "Posting No. Series") AND ("Return Shipment No." <> '') THEN "Posting No." := "Return Shipment No." ELSE "Posting No." := NoSeriesMgt.GetNextNo("Posting No. Series","Posting Date",TRUE); END ELSE "Posting No." := '***'; // Add the following line. ModifyHeader := TRUE; END; END; ...
Önkoşullar
Bu düzeltmeyi uygulamak için Microsoft Dynamics NAV 2009 R2'nin Rusça sürümü Yerel Özellik Paketi 1 yüklü olmalıdır.
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.