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

บทความนี้ใช้กับ Microsoft Dynamics NAV สําหรับทุกประเทศและทุกภาษา

อาการ

เมื่อคุณลงรายการบัญชีบรรทัดมากกว่าหนึ่งบรรทัดที่มีขนาดที่ระบุในสมุดรายวันการจัดประเภทคลังสินค้าใหม่ใน Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) คุณได้รับข้อความแสดงข้อผิดพลาดที่มีลักษณะดังต่อไปนี้:

      

สาเหตุ

ปัญหานี้เกิดขึ้นเนื่องจากฟังก์ชัน CreateItemJnlLine ใช้หมายเลขบรรทัดจากบรรทัดสมุดรายวันการจัดประเภทคลังสินค้าใหม่หนึ่ง จะไม่มีการอัพเดตหมายเลขบรรทัดจนกว่าจะสิ้นสุดฟังก์ชัน เนื่องจากมิติอ้างอิงถึงหมายเลขบรรทัดเก่า จึงไม่พบมิติในภายหลัง

การแก้ปัญหา

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

โปรแกรมแก้ไขด่วนที่ได้รับการสนับสนุนจาก Microsoft พร้อมใช้งานแล้ว อย่างไรก็ตาม มีไว้เพื่อแก้ไขปัญหาที่อธิบายไว้ในบทความนี้เท่านั้น นําไปใช้กับระบบที่พบปัญหานี้โดยเฉพาะเท่านั้น โปรแกรมแก้ไขด่วนนี้อาจได้รับการทดสอบเพิ่มเติม ดังนั้น ถ้าคุณไม่ได้รับผลกระทบอย่างร้ายแรงจากปัญหานี้ เราขอแนะนําให้คุณรอ Service Pack ถัดไปของ Microsoft Dynamics NAV หรือ 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

                
หมายเหตุ คุณไม่มีสิทธิ์ในที่เก็บข้อมูล เว้นแต่คุณจะต้องดําเนินการซ่อมแซมข้อมูล

การเปลี่ยนแปลงโค้ด

หมายเหตุ ทดสอบการแก้ไขรหัสเสมอในสภาพแวดล้อมที่ควบคุมก่อนที่คุณจะนําการแก้ไขไปใช้กับคอมพิวเตอร์การผลิตของคุณ
เมื่อต้องการแก้ไขปัญหานี้ ให้เปลี่ยนรหัสในฟังก์ชัน CreateItemJnlLine ในคลังสินค้า Jnl.-Register Batch codeunit (7304) ดังนี้:

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

WhseItemTrkgLine.SETCURRENTKEY(
  "Source ID","Source Type","Source Subtype","Source Batch Name",
  "Source Prod. Order Line","Source Ref. No.","Location Code");
WhseItemTrkgLine.SETRANGE("Source Type",DATABASE::"Warehouse Journal Line");
WhseItemTrkgLine.SETRANGE("Source ID",WhseJnlLine2."Journal Batch Name");
WhseItemTrkgLine.SETRANGE("Source Batch Name",WhseJnlLine2."Journal Template Name");
WhseItemTrkgLine.SETRANGE("Source Ref. No.",WhseJnlLine2."Line No.");
WhseItemTrkgLine.SETRANGE("Location Code",WhseJnlLine2."Location Code");
IF WhseItemTrkgLine.FINDSET THEN BEGIN
  ItemJnlLine.INIT;
  ItemJnlLine.VALIDATE("Entry Type",ItemJnlLine."Entry Type"::Transfer);
  WITH WhseJnlLine2 DO BEGIN
    REPEAT
      IF ((WhseItemTrkgLine."New Serial No." <> WhseItemTrkgLine."Serial No.") OR
          (WhseItemTrkgLine."New Lot No." <> WhseItemTrkgLine."Lot No.") OR
          (WhseItemTrkgLine."New Expiration Date" <> WhseItemTrkgLine."Expiration Date")) THEN BEGIN
        CreateReservEntry.CreateReservEntryFor(
          DATABASE::"Item Journal Line",
          ItemJnlLine."Entry Type",
          '',
          '',
          0,
          "Line No.",
          WhseItemTrkgLine."Qty. per Unit of Measure",
          ABS(WhseItemTrkgLine."Qty. to Handle (Base)"),
          WhseItemTrkgLine."Serial No.",
          WhseItemTrkgLine."Lot No.");
        CreateReservEntry.SetNewSerialLotNo(WhseItemTrkgLine."New Serial No.",WhseItemTrkgLine."New Lot No.");
        CreateReservEntry.SetDates(WhseItemTrkgLine."Warranty Date",WhseItemTrkgLine."Expiration Date");
        CreateReservEntry.SetNewExpirationDate(WhseItemTrkgLine."New Expiration Date");
        CreateReservEntry.CreateEntry(
          "Item No.",
          "Variant Code",
          "Location Code",
          Description,
          0D,
          0D,
         0,
         ReservEntry."Reservation Status"::Prospect);
       QtyToHandleBase += ABS(WhseItemTrkgLine."Qty. to Handle (Base)");
      END;
    UNTIL WhseItemTrkgLine.NEXT = 0;
    IF QtyToHandleBase <> 0 THEN BEGIN
      ItemJnlLine."Document No." := "Whse. Document No.";
      ItemJnlLine.VALIDATE("Posting Date", "Registering Date");
      ItemJnlLine.VALIDATE("Item No.", "Item No.");
      ItemJnlLine.VALIDATE("Variant Code","Variant Code");
      ItemJnlLine.VALIDATE("Location Code","Location Code");
      ItemJnlLine.VALIDATE("Unit of Measure Code", "Unit of Measure Code");
      ItemJnlLine.VALIDATE("Quantity (Base)", QtyToHandleBase);
      ItemJnlLine.Description := Description;
      ItemJnlLine."Source Type" := ItemJnlLine."Source Type"::Item;
      ItemJnlLine."Source No." := "Item No.";
      ItemJnlLine."Source Code" := "Source Code";
      ItemJnlLine."Reason Code" := "Reason Code";

//Delete the following line.
      ItemJnlLine."Line No." := "Line No."; 

    END;
  END;
END;

รหัสทดแทน

WhseItemTrkgLine.SETCURRENTKEY(
  "Source ID","Source Type","Source Subtype","Source Batch Name",
  "Source Prod. Order Line","Source Ref. No.","Location Code");
WhseItemTrkgLine.SETRANGE("Source Type",DATABASE::"Warehouse Journal Line");
WhseItemTrkgLine.SETRANGE("Source ID",WhseJnlLine2."Journal Batch Name");
WhseItemTrkgLine.SETRANGE("Source Batch Name",WhseJnlLine2."Journal Template Name");
WhseItemTrkgLine.SETRANGE("Source Ref. No.",WhseJnlLine2."Line No.");
WhseItemTrkgLine.SETRANGE("Location Code",WhseJnlLine2."Location Code");
IF WhseItemTrkgLine.FINDSET THEN BEGIN
  ItemJnlLine.INIT;

//Add the following line.
  ItemJnlLine."Line No." := WhseJnlLine2."Line No.";      

  ItemJnlLine.VALIDATE("Entry Type",ItemJnlLine."Entry Type"::Transfer);
  WITH WhseJnlLine2 DO BEGIN
    REPEAT
      IF ((WhseItemTrkgLine."New Serial No." <> WhseItemTrkgLine."Serial No.") OR
          (WhseItemTrkgLine."New Lot No." <> WhseItemTrkgLine."Lot No.") OR
          (WhseItemTrkgLine."New Expiration Date" <> WhseItemTrkgLine."Expiration Date")) THEN BEGIN
        CreateReservEntry.CreateReservEntryFor(
          DATABASE::"Item Journal Line",
          ItemJnlLine."Entry Type",
          '',
          '',
          0,
          "Line No.",
          WhseItemTrkgLine."Qty. per Unit of Measure",
          ABS(WhseItemTrkgLine."Qty. to Handle (Base)"),
          WhseItemTrkgLine."Serial No.",
          WhseItemTrkgLine."Lot No.");
        CreateReservEntry.SetNewSerialLotNo(WhseItemTrkgLine."New Serial No.",WhseItemTrkgLine."New Lot No.");
        CreateReservEntry.SetDates(WhseItemTrkgLine."Warranty Date",WhseItemTrkgLine."Expiration Date");
        CreateReservEntry.SetNewExpirationDate(WhseItemTrkgLine."New Expiration Date");
        CreateReservEntry.CreateEntry(
          "Item No.",
          "Variant Code",
          "Location Code",
          Description,
          0D,
          0D,
         0,
         ReservEntry."Reservation Status"::Prospect);
       QtyToHandleBase += ABS(WhseItemTrkgLine."Qty. to Handle (Base)");
      END;
    UNTIL WhseItemTrkgLine.NEXT = 0;
    IF QtyToHandleBase <> 0 THEN BEGIN
      ItemJnlLine."Document No." := "Whse. Document No.";
      ItemJnlLine.VALIDATE("Posting Date", "Registering Date");
      ItemJnlLine.VALIDATE("Item No.", "Item No.");
      ItemJnlLine.VALIDATE("Variant Code","Variant Code");
      ItemJnlLine.VALIDATE("Location Code","Location Code");
      ItemJnlLine.VALIDATE("Unit of Measure Code", "Unit of Measure Code");
      ItemJnlLine.VALIDATE("Quantity (Base)", QtyToHandleBase);
      ItemJnlLine.Description := Description;
      ItemJnlLine."Source Type" := ItemJnlLine."Source Type"::Item;
      ItemJnlLine."Source No." := "Item No.";
      ItemJnlLine."Source Code" := "Source Code";
      ItemJnlLine."Reason Code" := "Reason Code";
    END;
  END;
END;

            
          

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

คุณต้องติดตั้ง Microsoft Dynamics NAV 2009 Service Pack 1 เพื่อใช้โปรแกรมแก้ไขด่วนนี้

ลบข้อมูลออก

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

สถานะ

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

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