Tanggal PPN pembayaran dikirim berada di luar kisaran PPN diizinkan posting tanggal dalam versi Microsoft Dynamics NAV 2009 R2 Kroasia

Informasi Hotfix

Sekarang tersedia hotfix yang didukung dari Microsoft. Namun, hanya ditujukan untuk memperbaiki masalah yang dijelaskan di artikel ini. Terapkan hanya ke sistem yang mengalami masalah khusus ini. Perbaikan terbaru ini dapat menerima pengujian tambahan. Oleh karena itu, jika Anda tidak terlalu dipengaruhi oleh masalah ini, kami sarankan Anda menunggu paket layanan Microsoft Dynamics NAV 2009 atau versi Microsoft Dynamics NAV berikutnya yang berisi perbaikan terbaru ini.

Catatan Dalam kasus tertentu, biaya yang biasanya diadakan untuk panggilan mungkin dibatalkan apabila profesional dukungan teknis untuk Microsoft Dynamics dan produk-produk terkait dukungan menentukan bahwa pembaruan khusus akan memecahkan masalah Anda. Biaya dukungan biasa akan berlaku untuk pertanyaan dan masalah yang tidak termasuk pada pembaruan tertentu yang dimaksud dukungan tambahan.

Perubahan kode

Catatan Selalu menguji kode perbaikan di lingkungan yang dikontrol sebelum menerapkan perbaikan untuk komputer produksi.
Untuk mengatasi masalah ini, ikuti langkah-langkah berikut:

1. Ubah kode di fungsi RunCheck dalam "Kejadian Jnl.-centang baris" codeunit (11) sebagai berikut:
   Kode yang ada

   ...GLSetup.GET;
   IF GLSetup."Use VAT Date" THEN BEGIN
   
   // Delete the following line. 
   VATDateNeeded := FALSE;
   
   IF "Gen. Posting Type" > 0 THEN
   IF VATPostingSetup.GET("VAT Bus. Posting Group","VAT Prod. Posting Group") THEN
   IF NOT VATPostingSetup."Allow Blank VAT Date" THEN
   VATDateNeeded := TRUE;
   IF "Bal. Gen. Posting Type" > 0 THEN
   IF VATPostingSetup.GET("Bal. VAT Bus. Posting Group","Bal. VAT Prod. Posting Group") THEN
   IF NOT VATPostingSetup."Allow Blank VAT Date" THEN
   VATDateNeeded := TRUE;
   IF VATDateNeeded THEN
   IF "VAT Date" <> 0D THEN BEGIN
   IF VATDateNotAllowed("VAT Date") THEN
   FIELDERROR("VAT Date",Text26500);
   VATPeriodCheck("VAT Date");
   END ELSE
   TESTFIELD("VAT Date");
   END;
   ...
   

   Penggantian kode

   ...GLSetup.GET;
   IF GLSetup."Use VAT Date" THEN BEGIN
   
   // Add the following lines. 
   IF "VAT Date" <> 0D THEN
   VATDateNeeded := TRUE
   ELSE BEGIN
   // End of the added lines. 
   
   IF "Gen. Posting Type" > 0 THEN
   IF VATPostingSetup.GET("VAT Bus. Posting Group","VAT Prod. Posting Group") THEN
   IF NOT VATPostingSetup."Allow Blank VAT Date" THEN
   VATDateNeeded := TRUE;
   IF "Bal. Gen. Posting Type" > 0 THEN
   IF VATPostingSetup.GET("Bal. VAT Bus. Posting Group","Bal. VAT Prod. Posting Group") THEN
   IF NOT VATPostingSetup."Allow Blank VAT Date" THEN
   VATDateNeeded := TRUE;
   
   // Add the following line. 
   END; 
   
   IF VATDateNeeded THEN
   IF "VAT Date" <> 0D THEN BEGIN
   IF VATDateNotAllowed("VAT Date") THEN
   FIELDERROR("VAT Date",Text26500);
   VATPeriodCheck("VAT Date");
   END ELSE
   TESTFIELD("VAT Date");
   END;
   ...
   

2. Ubah kode di fungsi CalcPmtDiscIfAdjVAT dalam "Kejadian Jnl.-posting baris" codeunit (12) sebagai berikut:
   Kode yang ada

   ...TempVatEntry := VATEntry2;
   TempVatEntry."Entry No." := TempVatEntryNo;
   TempVatEntry."Posting Date" := GenJnlLine."Posting Date";
   TempVatEntry."Document No." := GenJnlLine."Document No.";
   TempVatEntry."External Document No." := GenJnlLine."External Document No.";
   TempVatEntry."Document Type" := GenJnlLine."Document Type";
   ...
   

   Penggantian kode

   ...TempVatEntry := VATEntry2;
   TempVatEntry."Entry No." := TempVatEntryNo;
   TempVatEntry."Posting Date" := GenJnlLine."Posting Date";
   
   // Add the following line.
   TempVatEntry."VAT Date" := GenJnlLine."VAT Date"; 
   
   TempVatEntry."Document No." := GenJnlLine."Document No.";
   TempVatEntry."External Document No." := GenJnlLine."External Document No.";
   TempVatEntry."Document Type" := GenJnlLine."Document Type";
   ...