ข้อความแสดงข้อผิดพลาด "ทศนิยมต้องไม่ใช่ [หมายเลข]" เมื่อคุณนำเข้า หรือส่งออกการรวมบัญชี โดยใช้หมายเลขบัญชีการรวมบัญชีที่ประกอบด้วยอักขระ 17 หรือเพิ่มเติมใน Microsoft Dynamics NAV 2009

ข้อมูลโปรแกรมแก้ไขด่วน

โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก Microsoft อย่างไรก็ตาม มีเป้าหมายเพียงเพื่อการแก้ไขปัญหาที่อธิบายไว้ในบทความนี้ นำวิธีนี้ไปใช้กับระบบที่ประสบกับปัญหาที่เฉพาะเจาะจงเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณจะไม่รุนแรงได้รับผลกระทบจากปัญหานี้ เราขอแนะนำให้ คุณรอ service pack ถัดไปของ Microsoft Dynamics NAV 2009 หรือเวอร์ชันถัดไป Microsoft Dynamics NAV ที่ประกอบด้วยโปรแกรมแก้ไขด่วนนี้

หมายเหตุ ในกรณีพิเศษ ค่าธรรมเนียมค่าใช้จ่ายสำหรับการสนับสนุนโทรศัพท์อาจถูกยกเลิกถ้า Technical Support Professional สำหรับ Microsoft Dynamics และผลิตภัณฑ์ที่เกี่ยวข้องตรวจพบว่าการปรับปรุงเฉพาะจะแก้ปัญหาของคุณ ค่าใช้จ่ายในการสนับสนุนตามปกติจะใช้กับคำถามและปัญหาในการสนับสนุนเพิ่มเติมซึ่งไม่สอดคล้องตามเกณฑ์สำหรับโปรแกรมปรับปรุงเฉพาะที่เกี่ยวข้อง

การเปลี่ยนแปลงรหัส

หมายเหตุ เสมอทดสอบรหัสแก้ไขในสภาพแวดล้อมการควบคุมก่อนที่คุณนำไปใช้แก้ไขปัญหากับคอมพิวเตอร์ของคุณผลิต
เมื่อต้องการแก้ไขปัญหานี้ ให้ทำตามขั้นตอนเหล่านี้:

1. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันCalcCheckSumในโค้ดยูนิตรวม (432) เป็นดังนี้:
   รหัสที่มีอยู่

   ...DateToDecimal(StartingDate) + DateToDecimal(EndingDate) +
             TextToDecimal(FormatVersion) + TextToDecimal(ProductVersion);
           SubsidGLAcc.RESET;
           IF SubsidGLAcc.FIND('-') THEN
             REPEAT
   
   // Delete the following lines.
             CheckSum := CheckSum +
                TextToDecimal(SubsidGLAcc."No.") + TextToDecimal(SubsidGLAcc."Consol. Debit Acc.") +
                TextToDecimal(SubsidGLAcc."Consol. Credit Acc.");
   // End of the deleted lines.
   
             UNTIL SubsidGLAcc.NEXT = 0;
           SubsidGLEntry.RESET;
           IF SubsidGLEntry.FIND('-') THEN
             REPEAT
               CheckSum := CheckSum +
   ...
   

   รหัสแทน

   ...DateToDecimal(StartingDate) + DateToDecimal(EndingDate) +
             TextToDecimal(FormatVersion) + TextToDecimal(ProductVersion);
           SubsidGLAcc.RESET;
           IF SubsidGLAcc.FIND('-') THEN
             REPEAT
   
   // Add the following lines.
              CheckSum :=
                CheckSum +
                TextToDecimal(COPYSTR(SubsidGLAcc."No.",1,10)) + TextToDecimal(COPYSTR(SubsidGLAcc."No.",11,10)) +
                TextToDecimal(COPYSTR(SubsidGLAcc."Consol. Debit Acc.",1,10)) +
                TextToDecimal(COPYSTR(SubsidGLAcc."Consol. Debit Acc.",11,10)) +
                TextToDecimal(COPYSTR(SubsidGLAcc."Consol. Credit Acc.",1,10)) +
                TextToDecimal(COPYSTR(SubsidGLAcc."Consol. Credit Acc.",11,10)) ;
   // End of the added lines.
   
             UNTIL SubsidGLAcc.NEXT = 0;
           SubsidGLEntry.RESET;
           IF SubsidGLEntry.FIND('-') THEN
             REPEAT
               CheckSum := CheckSum +
   ...
   

2. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันTextToDecimalในโค้ดยูนิตรวม (432) เป็นดังนี้:
   รหัสที่มีอยู่

   ...IF Txt[Idx] IN ['0','1','2','3','4','5','6','7','8','9'] THEN
               DecOnlyTxt := DecOnlyTxt + COPYSTR(Txt,Idx,1);
           IF DecOnlyTxt = '' THEN
             Result := 0
           ELSE
   
   // Delete the following line.
            EVALUATE(Result,DecOnlyTxt);   
   // End of the deleted line.
   
         END;
   
         LOCAL PROCEDURE DateToDecimal@25(Dt@1000 : Date) Result : Decimal;
         VAR
           Mon@1001 : Decimal;
   ...
   

   รหัสแทน

   ...IF Txt[Idx] IN ['0','1','2','3','4','5','6','7','8','9'] THEN
               DecOnlyTxt := DecOnlyTxt + COPYSTR(Txt,Idx,1);
           IF DecOnlyTxt = '' THEN
             Result := 0
           ELSE
   
   // Add the following line.
            EVALUATE(Result,DecOnlyTxt);
   // End of the added line.
   
         END;
   
         LOCAL PROCEDURE DateToDecimal@25(Dt@1000 : Date) Result : Decimal;
         VAR
           Mon@1001 : Decimal;
   ...