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

บทความนี้นำไปใช้กับ Microsoft Dynamics NAV สำหรับตำแหน่งที่ตั้งภาษาทั้งหมด

อาการ

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

ไม่มีอัตราแลกเปลี่ยนสกุลเงินภายในตัวกรองได้

นอกจากนี้ คุณไม่สามารถพิมพ์รายงานการยืนยันใบสั่ง (205)
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

Microsoft Dynamics NAV 2009 Service Pack ที่ 1 (SP1)
Microsoft Dynamics NAV 2009 R2

การแก้ปัญหา

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

โปรแกรมแก้ไขด่วนจะพร้อมใช้งานได้ในขณะนี้จาก 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 ของวัตถุ

หมายเหตุ คุณไม่จำเป็นต้องมีสิทธิ์ไปยังร้านค้าข้อมูลยกเว้นว่าคุณจำเป็นต้องซ่อมแซมข้อมูล

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

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

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันSalesHeaderExchDateในโค้ดยูนิตจัดการการคำนวณราคาขาย(7000) เป็นดังนี้:
รหัสที่มีอยู่

...WITH SalesHeader DO BEGIN

// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     ("Posting Date" = 0D)
  THEN
    EXIT(WORKDATE);
  EXIT("Posting Date");
// End of the deleted lines.

END;
...

รหัสแทน

...WITH SalesHeader DO BEGIN

// Add the following lines.
  IF "Posting Date" <>0D THEN
    EXIT("Posting Date");
  EXIT(WORKDATE);
// End of the added lines.

END;
...

เปลี่ยนรหัสในฟังก์ชันPurchHeaderExchDateในการซื้อ จัดการการคำนวณราคา โค้ดยูนิตที่ (7010) ดัง:
รหัสที่มีอยู่

...WITH PurchHeader DO BEGIN
// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     ("Posting Date" = 0D)
  THEN
    EXIT(WORKDATE);
  EXIT("Posting Date");
// End of the deleted lines.
END;
...

รหัสแทน

...WITH PurchHeader DO BEGIN

// Add the following lines.
  IF "Posting Date" <> 0D THEN
    EXIT("Posting Date");
  EXIT(WORKDATE);
// End of the added lines.

END;
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(111) ในแบบฟอร์มใบสั่งขาย(42) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(107) ในแบบฟอร์มใบแจ้งหนี้การขาย(43) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);
// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.
IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);
// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.
IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(91) ในแบบฟอร์มใบลดหนี้การขาย(44) ดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(119) ในแบบฟอร์มใบสั่งซื้อ(50) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(104) ในแบบฟอร์มใบแจ้งหนี้การซื้อ(51) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(91) ในแบบฟอร์มใบลดหนี้การซื้อ(52) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(91) ในแบบฟอร์มใบสั่งส่งคืนสินค้าขาย(6630) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนรหัสในทริกเกอร์OnAssistEditในฟิลด์รหัสสกุลเงิน(91) ในแบบฟอร์มใบสั่งส่งคืนสินค้าซื้อ(6640) เป็นดังนี้:
รหัสที่มีอยู่

...CLEAR(ChangeExchangeRate);

// Delete the following line.
ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date");
// End of the deleted line.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

รหัสแทน

...CLEAR(ChangeExchangeRate);

// Add the following lines.
IF "Posting Date" <> 0D THEN
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor","Posting Date")
ELSE
  ChangeExchangeRate.SetParameter("Currency Code","Currency Factor",WORKDATE);
// End of the added lines.

IF ChangeExchangeRate.RUNMODAL = ACTION::OK THEN BEGIN
  VALIDATE("Currency Factor",ChangeExchangeRate.GetParameter);
  CurrForm.UPDATE;
END;
CLEAR(ChangeExchangeRate);
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdateCurrencyFactorในตารางหัวข้อการขาย(36) เป็นดังนี้:
รหัสที่มีอยู่

...IF "Currency Code" <>'' THEN BEGIN

// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::Quote,"Document Type"::"Blanket Order"]) AND
     ("Posting Date" = 0D)
  THEN
    CurrencyDate := WORKDATE
  ELSE
    CurrencyDate := "Posting Date";
// End of the deleted lines.

  "Currency Factor" := CurrExchRate.ExchangeRate(CurrencyDate,"Currency Code");
END ELSE
  "Currency Factor" := 0;
...

รหัสแทน

...IF "Currency Code" <> '' THEN BEGIN

// Add the following lines.
  IF "Posting Date" <> 0D THEN
    CurrencyDate := "Posting Date"
  ELSE
    CurrencyDate := WORKDATE;
// End of the added lines.

  "Currency Factor" := CurrExchRate.ExchangeRate(CurrencyDate,"Currency Code");
END ELSE
  "Currency Factor" := 0;
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันGetDateในตารางบรรทัดการขาย (37) เป็นดังนี้:
รหัสที่มีอยู่

...// Delete the following lines.
IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
   (SalesHeader."Posting Date" = 0D)
THEN
  EXIT(WORKDATE);
EXIT(SalesHeader."Posting Date");
// End of the deleted lines.
...

รหัสแทน

...// Add the following lines.
IF SalesHeader."Posting Date" <> 0D THEN
  EXIT(SalesHeader."Posting Date");
EXIT(WORKDATE);
// End of the added lines.
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdateCurrencyFactorในตารางหัวข้อการซื้อ(38) เป็นดังนี้:
รหัสที่มีอยู่

...IF "Currency Code" <> '' THEN BEGIN
// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::Quote,"Document Type"::"Blanket Order"]) AND
     ("Posting Date" = 0D)
  THEN
    CurrencyDate := WORKDATE
  ELSE
    CurrencyDate := "Posting Date";
// End of the deleted lines.

  "Currency Factor" := CurrExchRate.ExchangeRate(CurrencyDate,"Currency Code");
END ELSE
  "Currency Factor" := 0;
...

รหัสแทน

...IF "Currency Code"<>'' THEN BEGIN
// Add the following lines.
  IF "Posting Date" <> 0D THEN
    CurrencyDate := "Posting Date"
  ELSE
    CurrencyDate := WORKDATE;
// End of the added lines.

  "Currency Factor" := CurrExchRate.ExchangeRate(CurrencyDate,"Currency Code");
END ELSE
  "Currency Factor" := 0;
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันGetDateในตารางบรรทัดการซื้อ (39) เป็นดังนี้:
รหัสที่มีอยู่

...// Delete the following lines.
IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
   (PurchHeader."Posting Date" = 0D)
THEN
  EXIT(WORKDATE);
EXIT(PurchHeader."Posting Date")
// End of the deleted lines.
...

รหัสแทน

...// Add the following lines.
IF PurchHeader."Posting Date"<>0D THEN
  EXIT(PurchHeader."Posting Date");
EXIT(WORKDATE);
// End of the added lines.
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันRoundAmountในโค้ดยูนิตลงรายการบัญชีการขาย(80) เป็นดังนี้:
รหัสที่มีอยู่

...IF SalesHeader."Currency Code" <>'' THEN BEGIN
// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     (SalesHeader."Posting Date" = 0D)
  THEN
// End of the deleted lines.
    UseDate := WORKDATE
  ELSE
    UseDate := SalesHeader."Posting Date";       
...

รหัสแทน

...IF SalesHeader."Currency Code" <>'' THEN BEGIN
// Add the following line.
  IF (SalesHeader."Posting Date" = 0D) THEN
// End of the added line.

    UseDate := WORKDATE
  ELSE
    UseDate := SalesHeader."Posting Date";
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันRoundAmountในการซื้อ-ไปรษณีย์โค้ดยูนิต (90) ดัง:
รหัสที่มีอยู่

...IF PurchHeader."Currency Code" <>'' THEN BEGIN
// Delete the following lines.
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     (PurchHeader."Posting Date" = 0D)
  THEN
// End of the deleted lines.
    Usedate := WORKDATE
  ELSE
    Usedate := PurchHeader."Posting Date";
...

รหัสแทน

...IF PurchHeader."Currency Code"<> '' THEN BEGIN
// Add the following line.
  IF (PurchHeader."Posting Date" = 0D) THEN
// End of the added line.
    Usedate := WORKDATE
  ELSE
    Usedate := PurchHeader."Posting Date";
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdateHeaderInfoในแบบฟอร์มสถิติใบสั่งขาย(402) เป็นดังนี้:
รหัสที่มีอยู่

...IF "Prices Including VAT" THEN
  TotalSalesLineLCY[IndexNo].Amount := TotalAmount2[IndexNo]
ELSE
  TotalSalesLineLCY[IndexNo].Amount := TotalAmount1[IndexNo];
IF "Currency Code" <> '' THEN

// Delete the following lines.     
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     ("Posting Date" = 0D)
  THEN
// End of the deleted lines.

    UseDate := WORKDATE
  ELSE
    UseDate := "Posting Date";         
...

รหัสแทน

...IF "Prices Including VAT" THEN
  TotalSalesLineLCY[IndexNo].Amount := TotalAmount2[IndexNo]
ELSE
  TotalSalesLineLCY[IndexNo].Amount := TotalAmount1[IndexNo];
IF "Currency Code" <>'' THEN
// Add the following line.    
  IF "Posting Date" = 0D THEN
// End of the added line.
    UseDate := WORKDATE
  ELSE
    UseDate := "Posting Date";
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันUpdateHeaderInfoในแบบฟอร์มสถิติใบสั่งซื้อ(403) เป็นดังนี้:
รหัสที่มีอยู่

...IF "Prices Including VAT" THEN
  TotalPurchLineLCY[IndexNo].Amount := TotalAmount2[IndexNo]
ELSE
  TotalPurchLineLCY[IndexNo].Amount := TotalAmount1[IndexNo];
IF "Currency Code" <> '' THEN BEGIN
// Delete the following lines.      
  IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
     ("Posting Date" = 0D)
  THEN
// End of the deleted lines.
    UseDate := WORKDATE
  ELSE
    UseDate := "Posting Date";
...

รหัสแทน

...IF "Prices Including VAT" THEN
  TotalPurchLineLCY[IndexNo].Amount := TotalAmount2[IndexNo]
ELSE
  TotalPurchLineLCY[IndexNo].Amount := TotalAmount1[IndexNo];
IF "Currency Code" <> '' THEN BEGIN
// Add the following line.      
  IF "Posting Date" = 0D THEN
// End of the added line.
    UseDate := WORKDATE
  ELSE
    UseDate := "Posting Date";
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันCalculateInvoiceDiscountในโค้ดยูนิตการขายการคำนวณส่วนลด(60) เป็นดังนี้:
รหัสที่มีอยู่

...// Delete the following lines.  
IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
   (SalesHeader."Posting Date" = 0D)
THEN
// End of the deleted lines.
  CurrencyDate := WORKDATE
ELSE
  CurrencyDate := SalesHeader."Posting Date";
...

รหัสแทน

...// Add the following line.    
IF SalesHeader."Posting Date" = 0D THEN
// End of the added line.
  CurrencyDate := WORKDATE
ELSE
  CurrencyDate := SalesHeader."Posting Date";
...

เปลี่ยนแปลงรหัสนี้ในฟังก์ชันCalculateInvoiceDiscountในการซื้อ-Calc.Discountโค้ดยูนิต (70) ดัง:
รหัสที่มีอยู่

...// Delete the following lines.  
IF ("Document Type" IN ["Document Type"::"Blanket Order","Document Type"::Quote]) AND
   (PurchHeader."Posting Date" = 0D)
THEN
// End of the deleted lines.
  CurrencyDate := WORKDATE
ELSE
  CurrencyDate := PurchHeader."Posting Date";
...

รหัสแทน

...// Add the following line.   
IF PurchHeader."Posting Date" = 0D THEN
// End of the added line.
  CurrencyDate := WORKDATE
ELSE
  CurrencyDate := PurchHeader."Posting Date";
...

ข้อกำหนดเบื้องต้น

คุณต้องมีหนึ่งผลิตภัณฑ์ต่อไปนี้ติดตั้งอยู่เพื่อใช้โปรแกรมแก้ไขด่วนนี้:

Microsoft Dynamics NAV 2009 Service Pack ที่ 1 (SP1)
Microsoft Dynamics NAV 2009 R2

ข้อมูลการเอาออก

คุณไม่สามารถเอาโปรแกรมแก้ไขด่วนนี้

สถานะ

Microsoft ยืนยันว่านี่เป็นปัญหาในผลิตภัณฑ์ของ Microsoft ซึ่งแสดงไว้ในส่วน "นำไปใช้กับ"

ข้อมูลอ้างอิง

VSTF DynamicsNAV SE: 237796, 245981, 254036

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

อาการ

การแก้ปัญหา

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

ข้อมูลการติดตั้ง

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

ข้อกำหนดเบื้องต้น

ข้อมูลการเอาออก

สถานะ

ข้อมูลอ้างอิง

ต้องการความช่วยเหลือเพิ่มเติมหรือไม่

ต้องการตัวเลือกเพิ่มเติมหรือไม่

ข้อมูลนี้เป็นประโยชน์หรือไม่

ขอบคุณสำหรับคำติชมของคุณ!