บทความนี้ใช้กับ Microsoft Dynamics NAV สําหรับภาษาเยอรมัน (de) ภาษาท้องถิ่น
อาการ
เมื่อคุณสร้างไฟล์การชําระเงินที่มีอักขระภาษาเยอรมันพิเศษ เช่น Umlaute อักขระพิเศษจะถูกแปลงไม่สอดคล้องกัน ตัวอย่างเช่น" Ö "เป็นอักขระพิเศษ มันถูกแปลงเป็น "\" ในครั้งเดียวและเปลี่ยนเป็น "TM" ในครั้งเดียว
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:
- Microsoft Dynamics NAV 2009 Service Pack 1 เวอร์ชันภาษาเยอรมัน
- Microsoft Dynamics NAV 5.0 Service Pack 1 เวอร์ชันภาษาเยอรมัน
การแก้ปัญหา
ข้อมูลโปรแกรมแก้ไขด่วน
โปรแกรมแก้ไขด่วนที่ได้รับการสนับสนุนจาก Microsoft พร้อมใช้งานแล้ว อย่างไรก็ตาม มีไว้เพื่อแก้ไขปัญหาที่อธิบายไว้ในบทความนี้เท่านั้น นําไปใช้กับระบบที่พบปัญหานี้โดยเฉพาะเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณไม่ได้รับผลกระทบอย่างร้ายแรงจากปัญหานี้ เราขอแนะนําให้คุณรอ Service Pack 2009 สําหรับ Microsoft Dynamics NAV 2009 ถัดไป หรือ Microsoft Dynamics NAV เวอร์ชันถัดไปที่ประกอบด้วยโปรแกรมแก้ไขด่วนนี้
หมายเหตุ ในกรณีพิเศษ ค่าธรรมเนียมสําหรับการโทรติดต่อฝ่ายสนับสนุนตามปกติอาจถูกยกเลิกถ้าผู้เชี่ยวชาญฝ่ายสนับสนุนทางเทคนิคสําหรับ Microsoft Dynamics และผลิตภัณฑ์ที่เกี่ยวข้องระบุว่าการอัปเดตเฉพาะจะแก้ไขปัญหาของคุณได้ ค่าใช้จ่ายในการสนับสนุนปกติจะใช้กับคําถามและปัญหาการสนับสนุนเพิ่มเติมที่ไม่มีคุณสมบัติสําหรับการอัปเดตเฉพาะที่สงสัย
ข้อมูลการติดตั้ง
Microsoft แสดงตัวอย่างการเขียนโปรแกรมสําหรับภาพประกอบเท่านั้น โดยไม่มีการรับประกันทั้งโดยชัดแจ้งหรือโดยนัย ซึ่งรวมถึงแต่ไม่จํากัดเพียงการรับประกันโดยนัยถึงความสามารถในเชิงพาณิชย์หรือความเหมาะสมสําหรับวัตถุประสงค์เฉพาะ บทความนี้จะถือว่าคุณคุ้นเคยกับภาษาการเขียนโปรแกรมที่กําลังแสดงอยู่ และมีเครื่องมือที่ใช้สําหรับสร้างและแก้ไขจุดบกพร่องของกระบวนการ วิศวกรฝ่ายสนับสนุนของ Microsoft สามารถช่วยอธิบายฟังก์ชันการทํางานของกระบวนการเฉพาะได้ แต่จะไม่ปรับเปลี่ยนตัวอย่างเหล่านี้เพื่อให้มีฟังก์ชันการทํางานที่เพิ่มขึ้นหรือสร้างขั้นตอนต่างๆ เพื่อตอบสนองความต้องการเฉพาะของคุณ
หมายเหตุ ก่อนที่คุณจะติดตั้งโปรแกรมแก้ไขด่วนนี้ ตรวจสอบว่าผู้ใช้ไคลเอนต์ Microsoft Navision ทั้งหมดออกจากระบบ ซึ่งรวมถึงผู้ใช้ไคลเอนต์ Microsoft Navision Application Services (NAS) คุณควรเป็นผู้ใช้ไคลเอนต์เท่านั้นที่เข้าสู่ระบบเมื่อคุณใช้โปรแกรมแก้ไขด่วนนี้
เมื่อต้องการใช้โปรแกรมแก้ไขด่วนนี้
เราขอแนะนําให้ใช้บัญชีผู้ใช้ในหน้าต่าง ล็อกอินของ Windows หรือในหน้าต่าง ล็อกอินของฐานข้อมูล ถูกกําหนด ID บทบาท "SUPER" หากบัญชีผู้ใช้ไม่สามารถกําหนดรหัสบทบาท "SUPER" ได้ คุณต้องตรวจสอบว่าบัญชีผู้ใช้มีสิทธิ์ต่อไปนี้:
- สิทธิ์ในการปรับเปลี่ยนสําหรับวัตถุที่คุณจะเปลี่ยนแปลง
- สิทธิ์ Execute สําหรับวัตถุ System Object ID 5210 และสําหรับวัตถุ System Object ID 9015
หมายเหตุ คุณไม่มีสิทธิ์ในที่เก็บข้อมูล เว้นแต่คุณจะต้องดําเนินการซ่อมแซมข้อมูล
การเปลี่ยนแปลงโค้ด
หมายเหตุ ทดสอบการแก้ไขรหัสเสมอในสภาพแวดล้อมที่ควบคุมก่อนที่คุณจะนําการแก้ไขไปใช้กับคอมพิวเตอร์การผลิตของคุณ
เมื่อต้องการแก้ไขปัญหานี้ ให้ทําตามขั้นตอนต่อไปนี้:
เปลี่ยนตัวแปรร่วมต่อไปนี้ในฟังก์ชัน Clearing, codeunit (5001901):
ตัวแปรที่มีอยู่- ชื่อ: Dtaus
- ชนิดข้อมูล: โค้ด
- ความยาว: 150
ตัวแปรการแทนที่
- ชื่อ: Dtaus
- ชนิดข้อมูล: โค้ด
- ความยาว: 1024
ลบตัวแปรร่วมต่อไปนี้ในฟังก์ชัน Clearing, codeunit (5001901):
- ชื่อ:Aumlaut
- ชื่อ:OUmlaut
- ชื่อ:อุมเลาต์
- ชื่อ: Eszet
เพิ่มค่าคงที่ข้อความต่อไปนี้ลงในฟังก์ชัน Clearing, codeunit (5001901):
ชื่อ: 1105400400 ข้อความ
ค่าคงที่:
- DEU=0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]~.,&-+*%/$
- ENU=0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]~.,&-+*%/$'
เปลี่ยนรหัสต่อไปนี้ในกระบวนงาน Open Exportfile:
รหัสที่มีอยู่
... PaymentSetup.TESTFIELD("Textcode Credit Note"); TextCode := PaymentSetup."Textcode Credit Note"; END; END; AUmlaut := '['; OUmlaut := '\'; UUmlaut := ']'; EsZet := '~'; ...รหัสทดแทน
... PaymentSetup.TESTFIELD("Textcode Credit Note"); TextCode := PaymentSetup."Textcode Credit Note"; END; END; ...เปลี่ยนรหัสต่อไปนี้ในกระบวนงาน CustomerOutput:
รหัสที่มีอยู่
... WITH PaymLine2 DO BEGIN IF "Account No." = PaymLine3."Account No." THEN BEGIN PaymLine3 := PaymLine2; IF "Sum Entries"<>0 THEN BEGIN Counter := Counter + 1; SumDM := TotalEntries; AmountDM[Counter] := TotalEntries; END ELSE BEGIN Counter := Counter + 1; ...รหัสทดแทน
... WITH PaymLine2 DO BEGIN IF "Account No." = PaymLine3."Account No." THEN BEGIN PaymLine3 := PaymLine2; IF "Sum Entries"<>0 THEN BEGIN Counter := Counter + 1; SumDM := TotalEntries; AmountDM[Counter] := TotalEntries; // Add the following line. PDate [Counter] := "Posting Date"; // End of the added line. END ELSE BEGIN Counter := Counter + 1; ...เปลี่ยนรหัสต่อไปนี้ในขั้นตอน PaymentfileRecord:
รหัสที่มีอยู่
... // Record C (DataExchange), 1. Constant Part, 2. Section // // field length contents // ------------------------------------------------------------------------------------------------------------------------------- FORMAT(UPPERCASE(CompanyInfo.Name),27) + // 15 27 Name COPYSTR(Text1105400035 + PADSTR('',7,' '),1,7) + // Cust.No / KD.NR. ...รหัสทดแทน
... // Record C (DataExchange), 1. Constant Part, 2. Section // // field length contents // ------------------------------------------------------------------------------------------------------------------------------- FORMAT(UPPERCASE(CompName),27) + // 15 27 Name COPYSTR(Text1105400035 + PADSTR('',7,' '),1,7) + // Cust.No / KD.NR. ...เพิ่มตัวแปรภายในเครื่องต่อไปนี้ในกระบวนงาน CheckFormat:
ชื่อ:Aumlaut
- ชนิดข้อมูล: ข้อความ
- ความยาว: 1
ชื่อ:OUmlaut
- ชนิดข้อมูล: ข้อความ
- ความยาว: 1
ชื่อ:อุมเลาต์
- ชนิดข้อมูล: ข้อความ
- ความยาว: 1
ชื่อ: Eszet
- ชนิดข้อมูล: ข้อความ
- ความยาว: 1
เปลี่ยนโค้ดต่อไปนี้ในกระบวนงาน CheckFormat:
รหัสที่มีอยู่
... WHILE STRPOS(FieldContent,'ß') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'ß')-1) + EsZet + COPYSTR(FieldContent,STRPOS(FieldContent,'ß')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ä') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ä')-1) + AUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ä')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ö') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ö')-1) + OUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ö')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ü') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ü')-1) + UUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ü')+1,MAXSTRLEN(FieldContent)); CheckRec := DELCHR(FieldContent,'=',Text1105400043); IF CheckRec <>'' THEN BEGIN CheckRec := CONVERTSTR(FieldContent,Text1105400044, ' '); String := STRLEN(DELCHR(CheckRec)); FieldContent := CONVERTSTR(FieldContent,DELCHR(CheckRec),PADSTR('',String,' ')); END; EXIT (FieldContent); ...รหัสทดแทน
... AUmlaut := '['; OUmlaut := '\'; UUmlaut := ']'; EsZet := '~'; WHILE STRPOS(FieldContent,'ß') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'ß')-1) + EsZet + COPYSTR(FieldContent,STRPOS(FieldContent,'ß')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ä') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ä')-1) + AUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ä')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ö') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ö')-1) + OUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ö')+1,MAXSTRLEN(FieldContent)); WHILE STRPOS(FieldContent,'Ü') > 0 DO FieldContent := COPYSTR(FieldContent,1,STRPOS(FieldContent,'Ü')-1) + UUmlaut + COPYSTR(FieldContent,STRPOS(FieldContent,'Ü')+1,MAXSTRLEN(FieldContent)); CheckRec := DELCHR(FieldContent,'=',Text1105400043); IF CheckRec <>'' THEN BEGIN CheckRec := CONVERTSTR(FieldContent,Text1105400400, ' '); String := STRLEN(DELCHR(CheckRec)); FieldContent := CONVERTSTR(FieldContent,DELCHR(CheckRec),PADSTR('',String,' ')); END; EXIT (FieldContent); ...เปลี่ยนความยาวของพารามิเตอร์ "ไดรฟ์" ในกระบวนงาน CheckPaymfile:
- ค่าที่มีอยู่ของความยาว: 150
- ค่าทดแทนของความยาว: 260
เปลี่ยนความยาวของพารามิเตอร์ "ErrorMessage" ในกระบวนงาน CheckBeforePaym:
- ค่าที่มีอยู่ของความยาว: 150
- ค่าทดแทนของความยาว: 1024
เปลี่ยนรหัสต่อไปนี้ในขั้นตอน WritePaymBankInfoLine:
รหัสที่มีอยู่... "Bank Branch No." := CustBankAcc."Bank Branch No."; "Bank Account No." := CustBankAcc."Bank Account No."; "Bank Name 2" := CustBankAcc."Name 2"; "Bank Address" := CustBankAcc.Address; ...รหัสทดแทน
... "Bank Branch No." := CustBankAcc."Bank Branch No."; "Bank Account No." := CustBankAcc."Bank Account No."; "SWIFT Code" := CustBankAcc."SWIFT Code"; IBAN := CustBankAcc.IBAN; "Bank Name 2" := CustBankAcc."Name 2"; "Bank Address" := CustBankAcc.Address; ...
ข้อกำหนดเบื้องต้น
คุณต้องติดตั้งผลิตภัณฑ์ใดผลิตภัณฑ์หนึ่งต่อไปนี้เพื่อใช้โปรแกรมแก้ไขด่วนนี้:
- Microsoft Dynamics NAV 2009 Service Pack 1 เวอร์ชันภาษาเยอรมัน
- Microsoft Dynamics NAV 5.0 Service Pack 1 เวอร์ชันภาษาเยอรมัน
ลบข้อมูลออก
คุณไม่สามารถลบโปรแกรมแก้ไขด่วนนี้ได้
สถานะ
Microsoft ได้ยืนยันว่านี่เป็นปัญหาที่เกิดขึ้นกับผลิตภัณฑ์ของ Microsoft ที่แสดงไว้ในส่วน "นำไปใช้กับ"
หมายเหตุ นี่คือบทความ "เผยแพร่อย่างรวดเร็ว" ที่สร้างขึ้นโดยตรงจากภายในองค์กรสนับสนุนของ Microsoft ข้อมูลที่อยู่ในที่นี้มีให้เพื่อตอบสนองต่อปัญหาที่เกิดขึ้นใหม่ เนื่องจากความเร็วในการทําให้พร้อมใช้งานวัสดุอาจรวมถึงข้อผิดพลาดในการพิมพ์และอาจได้รับการแก้ไขได้ตลอดเวลาโดยไม่ต้องแจ้งให้ทราบ ดู ข้อตกลงการใช้งาน สําหรับข้อควรพิจารณาอื่นๆ