"Gümrük Tarife No" Avusturya sürümünde Microsoft Dynamics NAV 2009 boşluk içeriyorsa, Intrastat - Auth Disk AT (11106) rapor beklendiği gibi çalışmaz. Boşluk silinir ve bir süre sekiz karakterle denetler çünkü bu sorun oluşur. Bu sorun aşağıdaki ürünlerde oluşur:
-
Microsoft Dynamics NAV 2009 R2 Avusturya sürümü
-
Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) sürümünü Avusturya
Çö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.
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ı olabilir. Ancak, işlevsellik sağlamak veya yordamlar, belirli gereksinimlerinizi karşılayacak şekilde geliştirmek amacıyla bu örnekleri değiştirmezler.
Not: Bu düzeltmeyi yüklemeden önce tüm Microsoft Dynamics NAV istemci kullanıcıların sistem kaydedildiğini doğrulayın. Bu, Microsoft Dynamics NAV uygulama sunucusu (NAS) hizmetleri 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.
-
Sistem nesne kimliği 9015 ve Sistem nesnesi kimliği 5210 nesne için Execute izni
nesne.
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:
-
Veri madde numarası 2 - Disk vergi kimlik doğrulama sırasında (11106) raporu Intrastat kodu aşağıdaki gibi değiştirin:
Varolan kodu 1...DateOfToday := FORMAT(TODAY,6,Text000);
Today4 := FORMAT(TODAY,8,Text001);
TimeOfNow := FORMAT(TIME,4,Text002);
// UID Check
CompanyInfo."VAT Registration No." := RemoveSpecChar(CompanyInfo."VAT Registration No.");
...Değiştirme kodu 1
...DateOfToday := FORMAT(TODAY,6,Text000);
Today4 := FORMAT(TODAY,8,Text001);
TimeOfNow := FORMAT(TIME,4,Text002);
// Add the following line.
IntrastatJnlLineBuf.DELETEALL;
// UID Check
CompanyInfo."VAT Registration No." := RemoveSpecChar(CompanyInfo."VAT Registration No.");
...Varolan kodu 2
...THEN
CurrReport.SKIP;
// Check Period
LinePeriod := FORMAT(Date,4,Text005);
IF LinePeriod <> Period THEN
...Değiştirme kodu 2
...THEN
CurrReport.SKIP;
// Add the following line.
IntrastatJnlLineBuf := "Intrastat Jnl. Line";
// Check Period
LinePeriod := FORMAT(Date,4,Text005);
IF LinePeriod <> Period THEN
...Varolan kodu 3
...Date,"Line No.",Period);
// Check Tariff
// Delete the following lines.
"Tariff No." := DELCHR("Tariff No.");
TESTFIELD("Tariff No.");
IF STRLEN("Tariff No.") <> 8 THEN
ERROR(Text008,"Intrastat Jnl. Line"."Line No.");
// End of the deleted lines.
TESTFIELD("Country/Region Code");
TESTFIELD("Transaction Type");
...Değiştirme kodu 3
...Date,"Line No.",Period);
// Check Tariff
// Add the following lines.
IntrastatJnlLineBuf."Tariff No." := DELCHR("Tariff No.");
IntrastatJnlLineBuf.TESTFIELD("Tariff No.");
IF STRLEN(IntrastatJnlLineBuf."Tariff No.") <> 8 THEN
ERROR(Text008,IntrastatJnlLineBuf."Line No.");
// End of the added lines.
TESTFIELD("Country/Region Code");
TESTFIELD("Transaction Type");
...Varolan kodu 4
...ERROR(Text011,FIELDCAPTION("Transaction Specification"),"Transaction Specification");
IF (Type = Type::Receipt) AND ("Country/Region of Origin Code" = '') THEN
// Delete the following line.
"Country/Region of Origin Code" := "Country/Region Code";
IF "Supplementary Units" THEN
TESTFIELD(Quantity);
...Değiştirme kodu 4
...ERROR(Text011,FIELDCAPTION("Transaction Specification"),"Transaction Specification");
IF (Type = Type::Receipt) AND ("Country/Region of Origin Code" = '') THEN
// Add the following line.
IntrastatJnlLineBuf."Country/Region of Origin Code" := "Country/Region Code";
IF "Supplementary Units" THEN
TESTFIELD(Quantity);
...Varolan kodu 5
...IntraRefNo := INCSTR(IntraRefNo);
END;
// Delete the following lines.
"Internal Ref. No." := IntraRefNo;
MODIFY;
END;
// End of the deleted lines.
DataItemLink=Journal Template Name=FIELD(Journal Template Name),
Journal Batch Name=FIELD(Name);
...Değiştirme kodu 5
...IntraRefNo := INCSTR(IntraRefNo);
END;
// Add the following lines.
IntrastatJnlLineBuf."Internal Ref. No." := IntraRefNo;
IntrastatJnlLineBuf.INSERT;
END;
OnPostDataItem=BEGIN
IF IntrastatJnlLineBuf.FINDSET THEN BEGIN
IntraJnlLineTest.RESET;
REPEAT
IntraJnlLineTest.GET(
IntrastatJnlLineBuf."Journal Template Name",
IntrastatJnlLineBuf."Journal Batch Name",
IntrastatJnlLineBuf."Line No.");
IntraJnlLineTest."Tariff No." := IntrastatJnlLineBuf."Tariff No.";
IntraJnlLineTest."Country/Region of Origin Code" := IntrastatJnlLineBuf."Country/Region of Origin Code";
IntraJnlLineTest."Internal Ref. No." := IntrastatJnlLineBuf."Internal Ref. No.";
IntraJnlLineTest.MODIFY;
UNTIL IntrastatJnlLineBuf.NEXT = 0;
END;
END;
// End of the added lines.
DataItemLink=Journal Template Name=FIELD(Journal Template Name),
Journal Batch Name=FIELD(Name);
... -
Global değişkenler Intrastat - Disk vergi kimlik doğrulama sırasında (11106) rapor kodu aşağıdaki gibi değiştirin:
Varolan kodu...FilenameForReceipts@1160099 : Text[250];
CurrentType@1160103 : 'Receipt,Shipment';
IntrastatJnlLine@1160104 : Record 263;
PROCEDURE DecimalZeroFormat@1(DecimalNumber@1160000 : Decimal;Lenght@1160001 : Integer) : Text[250];
BEGIN
...Kod değiştirme
...FilenameForReceipts@1160099 : Text[250];
CurrentType@1160103 : 'Receipt,Shipment';
IntrastatJnlLine@1160104 : Record 263;
// Add the following line.
IntrastatJnlLineBuf@1160067 : TEMPORARY Record 263;
PROCEDURE DecimalZeroFormat@1(DecimalNumber@1160000 : Decimal;Lenght@1160001 : Integer) : Text[250];
BEGIN
...
Önkoşullar
Bu düzeltmeyi uygulamak için aşağıdaki ürünlerden birine sahip olmalıdır:
-
Microsoft Dynamics NAV 2009 R2 Avusturya sürümü
-
Microsoft Dynamics NAV 2009 SP1 sürümü Avusturya
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.
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. Kullanım koşullarıdiğer konular için bkz.
