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

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

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

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

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

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

1. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันAdjustPrepmtAmountLCYใน Codeuint การลงรายการบัญชีการขาย (80) เป็นดังนี้:
   รหัสที่อยู่ 1

   ...TotalPrepmtAmount@1002 : ARRAY [2] OF Decimal;
         BEGIN
   ...
   

   รหัสแทนที่ 1

   ...TotalPrepmtAmount@1002 : ARRAY [2] OF Decimal;
   
   // Add the following line.
          PricesInclVATRoundingAmount@1170000000 : ARRAY [2] OF Decimal;
   // End of the added line.
   
         BEGIN
   ...
   

   รหัสที่มีอยู่ 2

   ...TotalPrepmtAmount[1] += "Prepmt. Amount Inv. (LCY)";
   ...
   

   รหัสแทนที่ 2

   ...
   // Add the following lines.IF SalesHeader."Prices Including VAT" THEN
                    IF (("Prepayment %" <> 100) OR IsFinalInvoice) AND (DeductionFactor = 1) THEN BEGIN
                      PricesInclVATRoundingAmount[1] := TotalRoundingAmount[1];
                      PricesInclVATRoundingAmount[2] := TotalRoundingAmount[2];
                    END;
   // End of the added lines.
   
                   TotalPrepmtAmount[1] += "Prepmt. Amount Inv. (LCY)";
   ...
   

   รหัสที่มีอยู่ 3

   ...UpdatePrepmtSalesLineWithRound(
   
   // Delete the following line.
              PrepmtSalesLine,TotalRoundingAmount,TotalPrepmtAmount,TempPrepmtDeductLCYSalesLine.IsFinalInvoice);
   // End of the deleted line.
   
           END;
   ...
   

   รหัสแทนที่ 3

   ...UpdatePrepmtSalesLineWithRound(
   
   // Add the following lines.
              PrepmtSalesLine,TotalRoundingAmount,TotalPrepmtAmount,
              TempPrepmtDeductLCYSalesLine.IsFinalInvoice,PricesInclVATRoundingAmount);
   // End of the added lines.
   
           END;
   ...
   

2. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdatePrepmtSalesLineWithRoundใน Codeuint การลงรายการบัญชีการขาย (80) เป็นดังนี้:
   รหัสที่อยู่ 1

   ...
   // Delete the following line.
   LOCAL PROCEDURE UpdatePrepmtSalesLineWithRound@89(VAR PrepmtSalesLine@1002 : Record 37;TotalRoundingAmount@1001 : ARRAY [2] OF Decimal;TotalPrepmtAmount@1000 : ARRAY [2] OF Decimal;FinalInvoice@1170000000 : Boolean);
   // End of the deleted line.
   
         VAR
   ...
   

   รหัสแทนที่ 1

   ...
   // Add the following line.
   LOCAL PROCEDURE UpdatePrepmtSalesLineWithRound@89(VAR PrepmtSalesLine@1002 : Record 37;TotalRoundingAmount@1001 : ARRAY [2] OF Decimal;TotalPrepmtAmount@1000 : ARRAY [2] OF Decimal;FinalInvoice@1170000000 : Boolean;PricesInclVATRoundingAmount@1170000001 : ARRAY [2] OF Decimal);
   // End of the added line.
   
         VAR
   ...
   

   รหัสที่มีอยู่ 2

   ...
   // Delete the following line.IF (ABS(TotalRoundingAmount[2]) <= GLSetup."Amount Rounding Precision") OR FinalInvoice THEN BEGIN
   // End of the deleted line.
   
               IF ("Prepayment %" = 100) AND ("Prepmt. Amount Inv. (LCY)" = 0) THEN
   ...
   

   รหัสแทนที่ 2

   ...
   // Add the following lines.
   IF (PricesInclVATRoundingAmount[1] <> 0) AND (TotalRoundingAmount[1] = 0) THEN BEGIN
              Prepmt100PctVATRoundingAmt := 0;
              PricesInclVATRoundingAmount[1] := 0;
            END;
   
            IF (ABS(TotalRoundingAmount[2]) <= GLSetup."Amount Rounding Precision") OR
               (FinalInvoice AND (TotalRoundingAmount[1] = 0))
            THEN BEGIN
   // End of the added lines.
   
               IF ("Prepayment %" = 100) AND ("Prepmt. Amount Inv. (LCY)" = 0) THEN
   ...
   

   รหัสที่มีอยู่ 3

   ...END;
   
   // Delete the following lines.
            "Prepmt. VAT Amount Inv. (LCY)" := TotalRoundingAmount[2] + Prepmt100PctVATRoundingAmt;
            NewAmountIncludingVAT := Amount + TotalPrepmtAmount[2] + TotalRoundingAmount[2];
            Increment(TotalSalesLineLCY."Amount Including VAT","Amount Including VAT" - NewAmountIncludingVAT - Prepmt100PctVATRoundingAmt);
   // End of the deleted lines.
   
             IF "Currency Code" = '' THEN
   ...
   

   รหัสแทนที่ 3

   ...END;
   
   // Add the following lines. 
            IF (PricesInclVATRoundingAmount[2] <> 0) AND (TotalRoundingAmount[2] = 0) THEN BEGIN
              Prepmt100PctVATRoundingAmt := 0;
              PricesInclVATRoundingAmount[2] := 0;
            END;
   
            "Prepmt. VAT Amount Inv. (LCY)" := TotalRoundingAmount[2] + Prepmt100PctVATRoundingAmt;
            NewAmountIncludingVAT := Amount + TotalPrepmtAmount[2] + TotalRoundingAmount[2];
            IF (PricesInclVATRoundingAmount[1] = 0) AND (PricesInclVATRoundingAmount[2] = 0) THEN
              Increment(TotalSalesLineLCY."Amount Including VAT","Amount Including VAT" - NewAmountIncludingVAT - Prepmt100PctVATRoundingAmt
          );
   // End of the added lines.
   
             IF "Currency Code" = '' THEN
   ...
   

3. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันAdjustPrepmtAmountLCYในการซื้อ-ลงรายการบัญชีโค้ดยูนิต (90) ดัง:
   รหัสที่อยู่ 1

   ...TotalPrepmtAmount@1003 : ARRAY [2] OF Decimal;
         BEGIN
   ...
   

   รหัสแทนที่ 1

   ...TotalPrepmtAmount@1003 : ARRAY [2] OF Decimal;
   
   // Add the following line.
          PricesInclVATRoundingAmount@1170000000 : ARRAY [2] OF Decimal;
   // End of the added line.
   
         BEGIN
   ...
   

   รหัสที่มีอยู่ 2

   ...TotalPrepmtAmount[1] += "Prepmt. Amount Inv. (LCY)";
   ...
   

   รหัสแทนที่ 2

   ...
   // Add the following lines.
                  IF PurchHeader."Prices Including VAT" THEN
                    IF (("Prepayment %" <> 100) OR IsFinalInvoice) AND (DeductionFactor = 1) THEN BEGIN
                      PricesInclVATRoundingAmount[1] := TotalRoundingAmount[1];
                      PricesInclVATRoundingAmount[2] := TotalRoundingAmount[2];
                    END;
   // End of the added lines.
   
                   TotalPrepmtAmount[1] += "Prepmt. Amount Inv. (LCY)";
   ...
   

   รหัสที่มีอยู่ 3

   ...
   // Delete the following line.
   UpdatePrepmtPurchLineWithRound(PrepmtPurchLine,TotalRoundingAmount,TotalPrepmtAmount);
   // End of the deleted line.
   
           END;
   ...
   

   รหัสแทนที่ 3

   ...
   // Add the following lines.
   UpdatePrepmtPurchLineWithRound(
              PrepmtPurchLine,TotalRoundingAmount,TotalPrepmtAmount,
              TempPrepmtDeductLCYPurchLine.IsFinalInvoice,PricesInclVATRoundingAmount);
   // End of the added lines.
   
           END;
   ...
   

4. เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdatePrepmtPurchLineWithRoundในการซื้อ-ลงรายการบัญชีโค้ดยูนิต (90) ดัง:
   รหัสที่อยู่ 1

   ...
   // Delete the following line.LOCAL PROCEDURE UpdatePrepmtPurchLineWithRound@89(VAR PrepmtPurchLine@1002 : Record 39;TotalRoundingAmount@1001 : ARRAY [2] OF Decimal;TotalPrepmtAmount@1000 : ARRAY [2] OF Decimal);
   // End of the deleted line.
   
         VAR
   ...
   

   รหัสแทนที่ 1

   ...
   // Add the following line.
   LOCAL PROCEDURE UpdatePrepmtPurchLineWithRound@89(VAR PrepmtPurchLine@1002 : Record 39;TotalRoundingAmount@1001 : ARRAY [2] OF Decimal;TotalPrepmtAmount@1000 : ARRAY [2] OF Decimal;FinalInvoice@1170000001 : Boolean;PricesInclVATRoundingAmount@1170000000 : ARRAY [2] OF Decimal);
   // End of the added line.
   
         VAR
   ...
   

   รหัสที่มีอยู่ 2

   ...
   // Delete the following line.
   IF ABS(TotalRoundingAmount[2]) <= GLSetup."Amount Rounding Precision" THEN BEGIN
   // End of the deleted line.
   
               IF ("Prepayment %" = 100) AND ("Prepmt. Amount Inv. (LCY)" = 0) THEN
   ...
   

   รหัสแทนที่ 2

   ...
   // Add the following lines.
            IF (PricesInclVATRoundingAmount[1] <> 0) AND (TotalRoundingAmount[1] = 0) THEN BEGIN
              Prepmt100PctVATRoundingAmt := 0;
              PricesInclVATRoundingAmount[1] := 0;
            END;
   
            IF (ABS(TotalRoundingAmount[2]) <= GLSetup."Amount Rounding Precision") OR
               (FinalInvoice AND (TotalRoundingAmount[1] = 0))
            THEN BEGIN
   // End of the added lines.
   
               IF ("Prepayment %" = 100) AND ("Prepmt. Amount Inv. (LCY)" = 0) THEN
   ...
   

   รหัสที่มีอยู่ 3

   ...END;
   
   // Delete the following lines.
            "Prepmt. VAT Amount Inv. (LCY)" := -(TotalRoundingAmount[2] + Prepmt100PctVATRoundingAmt);
            NewAmountIncludingVAT := Amount - (TotalPrepmtAmount[2] + TotalRoundingAmount[2]);
            Increment(
              TotalPurchLineLCY."Amount Including VAT",-("Amount Including VAT" - NewAmountIncludingVAT + Prepmt100PctVATRoundingAmt));
   // End of the deleted lines.
   
             IF "Currency Code" = '' THEN
   ...
   

   รหัสแทนที่ 3

   ...END;
   
   // Add the following lines.
            IF (PricesInclVATRoundingAmount[2] <> 0) AND (TotalRoundingAmount[2] = 0) THEN BEGIN
              Prepmt100PctVATRoundingAmt := 0;
              PricesInclVATRoundingAmount[2] := 0;
            END;
   
            "Prepmt. VAT Amount Inv. (LCY)" := -(TotalRoundingAmount[2] + Prepmt100PctVATRoundingAmt);
            NewAmountIncludingVAT := Amount - (TotalPrepmtAmount[2] + TotalRoundingAmount[2]);
            IF (PricesInclVATRoundingAmount[1] = 0) AND (PricesInclVATRoundingAmount[2] = 0) THEN
              Increment(
                TotalPurchLineLCY."Amount Including VAT",-("Amount Including VAT" - NewAmountIncludingVAT + Prepmt100PctVATRoundingAmt));
   // End of the added lnies.
   
             IF "Currency Code" = '' THEN
   ...