บทความนี้นำไปใช้กับ Microsoft Dynamics NAV สำหรับระบบภาษาโปรตุเกส (pt)
อาการ
รายงานงบ VAT (PT) (13398) ไม่ถูกพิมพ์อย่างถูกต้องรหัสประเทศและหมายเลขการลงทะเบียน VAT สำหรับที่เก็บข้อมูล 24 ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:
-
Microsoft Dynamics NAV 2009 R2 รุ่นโปรตุเกส
-
Microsoft Dynamics NAV 2009 Service Pack 1 รุ่นโปรตุเกส
การแก้ปัญหา
ข้อมูลโปรแกรมแก้ไขด่วน
โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก Microsoft อย่างไรก็ตาม มีเป้าหมายเพียงเพื่อการแก้ไขปัญหาที่อธิบายไว้ในบทความนี้ นำวิธีนี้ไปใช้กับระบบที่ประสบกับปัญหาที่เฉพาะเจาะจงเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณจะไม่รุนแรงได้รับผลกระทบจากปัญหานี้ เราขอแนะนำให้ คุณรอ service pack ถัดไปของ Microsoft Dynamics NAV 2009 หรือเวอร์ชันถัดไป Microsoft Dynamics NAV ที่ประกอบด้วยโปรแกรมแก้ไขด่วนนี้
หมายเหตุ ในกรณีพิเศษ ค่าธรรมเนียมค่าใช้จ่ายสำหรับการสนับสนุนโทรศัพท์อาจถูกยกเลิกถ้า Technical Support Professional สำหรับ Microsoft Dynamics และผลิตภัณฑ์ที่เกี่ยวข้องตรวจพบว่าการปรับปรุงเฉพาะจะแก้ปัญหาของคุณ ค่าใช้จ่ายในการสนับสนุนตามปกติจะใช้กับคำถามและปัญหาในการสนับสนุนเพิ่มเติมซึ่งไม่สอดคล้องตามเกณฑ์สำหรับโปรแกรมปรับปรุงเฉพาะที่เกี่ยวข้อง
ข้อมูลการติดตั้ง
Microsoft ให้ตัวอย่างการเขียนโปรแกรมไว้สำหรับประกอบการอธิบายเท่านั้นโดยไม่มีการรับประกันไม่ว่าจะโดยชัดแจ้งหรือโดยนัย กรณีนี้รวมถึงแต่มิได้จำกัดเพียงแค่การการรับประกันโดยนัยเกี่ยวกับการจำหน่ายเป็นสินค้าหรือความเหมาะสำหรับวัตถุประสงค์เฉพาะ บทความนี้ตั้งสมมติฐานว่าคุณมีความคุ้นเคยกับภาษาการเขียนโปรแกรมที่กำลังแสดงและคุ้นเคยกับเครื่องมือที่ใช้ใน การสร้างและแก้จุดบกพร่องของขั้นตอนการดำเนินการ วิศวกรฝ่ายสนับสนุนของ Microsoft สามารถช่วยอธิบายเกี่ยวกับหน้าที่การใช้งานของกระบวนการเฉพาะ อย่างไรก็ตาม จะไม่แก้ไขตัวอย่างเหล่านี้เพื่อเพิ่มฟังก์ชัน หรือสร้างขั้นตอนเพื่อตอบสนองความต้องการเฉพาะของคุณ
หมายเหตุ ก่อนที่คุณติดตั้งโปรแกรมแก้ไขด่วนนี้ โปรดตรวจสอบว่า ผู้ใช้ไคลเอนต์ของ Microsoft Navision ทั้งหมดเข้าสู่ระบบออกจากระบบ ข้อมูลนี้รวมถึงผู้ใช้ไคลเอ็นต์บริการแอพลิเคชัน Navision Microsoft (NAS) คุณควรไคลเอ็นต์เฉพาะผู้ใช้ที่เข้าสู่ระบบเมื่อคุณใช้โปรแกรมแก้ไขด่วนนี้
เมื่อต้องการใช้โปรแกรมแก้ไขด่วนนี้ คุณต้องมีสิทธิ์การใช้งานสำหรับนักพัฒนา
เราขอแนะนำว่า บัญชีผู้ใช้ ในหน้าต่างล็อกอินของ Windows หรือ ในหน้าต่างล็อกอินฐานข้อมูลสามารถกำหนดรหัสการเข้าถึงข้อมูล "ขั้นสูง" ถ้าบัญชีผู้ใช้ไม่สามารถกำหนดรหัสการบทบาท "SUPER" คุณต้องตรวจสอบว่า บัญชีผู้ใช้มีสิทธิ์ต่อไปนี้:
-
สิทธิ์การปรับเปลี่ยนสำหรับออปเจ็กต์ที่คุณจะสามารถเปลี่ยน
-
สิทธิ์ Execute สำหรับออบเจ็กต์5210 รหัสวัตถุของระบบและ สำหรับออบเจ็กต์ระบบ 9015 ID ของวัตถุ
หมายเหตุ คุณไม่จำเป็นต้องมีสิทธิ์ไปยังร้านค้าข้อมูลยกเว้นว่าคุณจำเป็นต้องซ่อมแซมข้อมูล
การเปลี่ยนแปลงรหัส
หมายเหตุ เสมอทดสอบรหัสแก้ไขในสภาพแวดล้อมการควบคุมก่อนที่คุณนำไปใช้แก้ไขปัญหากับคอมพิวเตอร์ของคุณผลิต
เมื่อต้องการแก้ไขปัญหานี้ ให้ทำตามขั้นตอนเหล่านี้:
-
เปลี่ยนแปลงรหัสนี้ในฟังก์ชันCalcVendorsRelationในรายงานงบ VAT (PT) (13398) เป็นดังนี้:
รหัสที่มีอยู่... VendEntries.FINDFIRST
ELSE
VendEntries.NEXT;
IF VendEntries.Base <> 0 THEN BEGIN
// Delete the following lines.
IF STRPOS(CountryUE,VendEntries."Country/Region Code") = 0 THEN
VATRepBuffer.InsertVATPerDeclAnnexVEDetail(VRDeclType,VRDeclYear,VRDeclMonth,VRDeclQuarter,
VendorsRelation.Number,'','',VendEntries."VAT Registration No.",
VendEntries."Document Date",VendEntries.Base,VendEntries.Amount)
ELSE BEGIN
IF VendEntries."VAT Calculation Type" = VendEntries."VAT Calculation Type"::"Reverse Charge VAT" THEN
IF VendEntries."Country/Region Code" = CompanyInfo."Country/Region Code" THEN
VendEntries."Country/Region Code" := 'RC';
// End of the lines.
VATRepBuffer.InsertVATPerDeclAnnexVEDetail(VRDeclType,VRDeclYear,VRDeclMonth,VRDeclQuarter,
VendorsRelation.Number,VendEntries."Country/Region Code",VendEntries."VAT Registration No.",'',
VendEntries."Document Date",VendEntries.Base,VendEntries.Amount);
END;
VRRegistersNumber := VRRegistersNumber + 1;
...รหัสแทน
... VendEntries.FINDFIRST
ELSE
VendEntries.NEXT;
IF VendEntries.Base <> 0 THEN BEGIN
// Add the following lines.
IF STRPOS(CountryUE,VendEntries."Country/Region Code") = 0 THEN BEGIN
IF VendEntries."VAT Calculation Type" = VendEntries."VAT Calculation Type"::"Reverse Charge VAT" THEN
VendEntries."Country/Region Code" := 'RC';
VATRepBuffer.InsertVATPerDeclAnnexVEDetail(VRDeclType,VRDeclYear,VRDeclMonth,VRDeclQuarter,
VendorsRelation.Number,'','',VendEntries."VAT Registration No.",
VendEntries."Document Date",VendEntries.Base,VendEntries.Amount)
END ELSE BEGIN
IF VendEntries."VAT Calculation Type" = VendEntries."VAT Calculation Type"::"Reverse Charge VAT" THEN
IF VendEntries."Country/Region Code" = CompanyInfo."Country/Region Code" THEN
VendEntries."Country/Region Code" := 'RC';
// End of the lines.
VATRepBuffer.InsertVATPerDeclAnnexVEDetail(VRDeclType,VRDeclYear,VRDeclMonth,VRDeclQuarter,
VendorsRelation.Number,VendEntries."Country/Region Code",VendEntries."VAT Registration No.",'',
VendEntries."Document Date",VendEntries.Base,VendEntries.Amount);
END;
VRRegistersNumber := VRRegistersNumber + 1;
... -
เปลี่ยนแปลงรหัสนี้ในฟังก์ชันInsertCertificateNoในรายงานงบ VAT (PT) (13398) เป็นดังนี้:
รหัสที่มีอยู่... IF VATEntry.Type = VATEntry.Type::Sale THEN
IF SalesInvHeader.GET(VATEntry."Document No.") THEN
VATEntry."VAT Registration No." := SalesInvHeader."Certificate Export No.";
IF VATEntry.Type = VATEntry.Type::Purchase THEN BEGIN
// Delete the following lines.
IF STRPOS(CountryUE,VATEntry."Country/Region Code") = 0 THEN
IF PurchInvHeader.GET(VATEntry."Document No.") THEN
VATEntry."VAT Registration No." := PurchInvHeader."Certificate Import No.";
IF VATEntry."VAT Calculation Type" = VATEntry."VAT Calculation Type"::"Reverse Charge VAT" THEN
IF VATEntry."Country/Region Code" = CompanyInfo."Country/Region Code" THEN
VATEntry."VAT Registration No." := CompanyInfo."VAT Registration No.";
// End of the lines.
END;
VATEntry.MODIFY;
UNTIL VATEntry.NEXT = 0;
END;
END;
...รหัสแทน
... REPEAT
IF VATEntry.Type = VATEntry.Type::Sale THEN
IF SalesInvHeader.GET(VATEntry."Document No.") THEN
VATEntry."VAT Registration No." := SalesInvHeader."Certificate Export No.";
IF VATEntry.Type = VATEntry.Type::Purchase THEN BEGIN
// Add the following lines.
IF STRPOS(CountryUE,VATEntry."Country/Region Code") = 0 THEN BEGIN
IF PurchInvHeader.GET(VATEntry."Document No.") THEN
VATEntry."VAT Registration No." := PurchInvHeader."Certificate Import No.";
IF VATEntry."VAT Calculation Type" = VATEntry."VAT Calculation Type"::"Reverse Charge VAT" THEN
VATEntry."VAT Registration No." := CompanyInfo."VAT Registration No.";
END ELSE
IF VATEntry."VAT Calculation Type" = VATEntry."VAT Calculation Type"::"Reverse Charge VAT" THEN
IF VATEntry."Country/Region Code" = CompanyInfo."Country/Region Code" THEN
VATEntry."VAT Registration No." := CompanyInfo."VAT Registration No.";
// End of the lines.
END;
VATEntry.MODIFY;
UNTIL VATEntry.NEXT = 0;
END;
END;
...
ข้อกำหนดเบื้องต้น
คุณต้องมีหนึ่งผลิตภัณฑ์ต่อไปนี้ติดตั้งอยู่เพื่อใช้โปรแกรมแก้ไขด่วนนี้:
-
Microsoft Dynamics NAV 2009 R2 รุ่นโปรตุเกส
-
Microsoft Dynamics NAV 2009 Service Pack 1 รุ่นโปรตุเกส
ข้อมูลการเอาออก
คุณไม่สามารถเอาโปรแกรมแก้ไขด่วนนี้
สถานะ
Microsoft ยืนยันว่านี่เป็นปัญหาในผลิตภัณฑ์ของ Microsoft ซึ่งแสดงไว้ในส่วน "นำไปใช้กับ"
หมายเหตุ นี่คือบทความ "เผยแพร่เร็ว" ที่สร้างขึ้นโดยตรงจากภายใน Microsoft สนับสนุนองค์กร ข้อมูลในที่นี้ให้ไว้ตามสภาพ เพื่อตอบสนองกับปัญหาที่เกิดขึ้นใหม่ เป็นผลมาจากความเร็วในการทำให้พร้อมใช้งาน วัสดุอาจรวมถึงข้อผิดพลาดการพิมพ์ผิด และอาจแก้ไขได้ตลอดเวลาโดยไม่ต้องแจ้งให้ทราบ ดูข้อตกลงการใช้สำหรับข้อควรพิจารณาอื่น ๆ