Avis การชําระเงินที่ไม่ถูกต้องจะถูกสร้างขึ้นเมื่อคุณสร้างไฟล์การชําระเงินให้แก่ผู้จัดจําหน่าย SEPA สําหรับคําแนะนําการชําระเงินใน Microsoft Dynamics NAV เวอร์ชันภาษาเยอรมัน

นำไปใช้กับ
Dynamics NAV 2009 Microsoft Dynamics NAV 5.0

บทความนี้ใช้กับ Microsoft Dynamics NAV สําหรับภาษาเยอรมัน (de) ภาษาท้องถิ่น

อาการ

เมื่อคุณสร้างไฟล์การชําระเงินของผู้จัดจําหน่ายในพื้นที่ Payments ยูโรเดียว (SEPA) สําหรับคําแนะนําการชําระเงินใน Microsoft Dynamics NAV เวอร์ชันภาษาเยอรมันที่มี Payments AddOn รวมอยู่ ระบบจะสร้าง Avis การชําระเงินที่ไม่ถูกต้อง ตัวแปร 7 ในส่วนเบี่ยงเบนการชําระเงินจะถูกเติมด้วยวันที่ลงรายการบัญชีของรายการบัญชีแยกประเภทผู้ขายรายการแรก ซึ่งใช้โดยคําแนะนําการชําระเงิน อย่างไรก็ตาม ควรเติมข้อมูลด้วยวันที่ลงรายการบัญชีของรายการบัญชีแยกประเภทการชําระเงิน
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 2009 เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 5.0 เวอร์ชันภาษาเยอรมัน

การแก้ปัญหา

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

โปรแกรมแก้ไขด่วนที่ได้รับการสนับสนุนจาก 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

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

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

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

  1. เพิ่มตัวแปรท้องถิ่นใหม่ในฟังก์ชัน CreateRecords ในโค้ด unit การจัดการ SEPA (5001911) แล้วระบุตัวแปรดังนี้:

    • ชื่อ: PDate
    • ชนิดข้อมูล: วันที่
  2. เปลี่ยนรหัสในฟังก์ชัน CreateRecords ในโค้ด unit การจัดการ SEPA (5001911) ดังนี้:
    รหัสที่มีอยู่ 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    IF "AVIS Letter" THEN BEGINSetuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THENSetuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    END ELSE BEGIN
    ...
    

    รหัสทดแทน 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    
    // Add the following line.
    CLEAR(PDate);
    
    IF "AVIS Letter" THEN BEGINSetuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THENSetuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    
    // Add the following line.
    PDate := PaymLedgEntry."Posting Date";
    
    END ELSE BEGIN
    ...
    

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

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    รหัสทดแทน 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := CustLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

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

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(CustLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

    รหัสทดแทน 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

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

    ...
    VendLedgEntry.GET("Ledg.Entry No.");
    VendLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    รหัสทดแทน 4

    ...
    VendLedgEntry.GET("Ledg.Entry No.");
    VendLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := VendLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

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

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(VendLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(VendLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(VendLedgEntry."Document Type"),1,2));
    ...
    

    รหัสทดแทน 5

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(VendLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(VendLedgEntry."Document Type"),1,2));
    ...
    
  3. เพิ่มตัวแปรท้องถิ่นใหม่ในฟังก์ชัน CreateEinzugRecords ใน Codeunit การจัดการ SEPA (5001911) แล้วระบุตัวแปรดังนี้:

    • ชื่อ: PDate
    • ชนิดข้อมูล: วันที่
  4. เปลี่ยนรหัสในฟังก์ชัน CreateEinzugRecords ในโค้ด unit การจัดการ SEPA (5001911) ดังนี้:
    รหัสที่มีอยู่ 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    PaymentSetup.GET;
    IF "AVIS Letter" THEN BEGIN
    Setuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THEN
    Setuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    END ELSE BEGIN
    ...
    

    รหัสทดแทน 1

    ...
    CountryCodeL := PaymLine.GetCountryCode();
    
    // Add the following line.
    CLEAR(PDate);
    
    PaymentSetup.GET;
    IF "AVIS Letter" THEN BEGIN
    Setuptext := PaymentSetup."Avis Proposal";
    IF CountryCodeL <> '' THEN
    Setuptext := PaymentSetup."AZV Avis Proposal";
    CLEAR(TempRmtInfo);
    
    // Add the following line.
    PDate := PaymLedgEntry."Posting Date";
    
    END ELSE BEGIN
    ...
    

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

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    TempRmtInfo := TempRmtInfo +
    ...
    

    รหัสทดแทน 2

    ...
    CustLedgEntry.GET("Ledg.Entry No.");
    CustLedgEntry.CALCFIELDS("Original Amount");
    
    // Add the following lines.
    IF PDate = 0D THEN
    PDate := CustLedgEntry."Posting Date";
    // End of the lines.
    
    TempRmtInfo := TempRmtInfo +
    ...
    

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

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Delete the following line.
    FORMAT(CustLedgEntry."Posting Date",8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

    รหัสทดแทน 3

    ...
    DELCHR(FORMAT(ABS("Pmt. Discount"),8,'<Sign><Integer><Decimals,3>')),
    DELCHR(FORMAT(ABS(CustLedgEntry."Original Amount"),12,'<Sign><Integer><Decimals,3>')),
    
    // Add the following line.
    FORMAT(PDate,8,'<day,2>.<month,2>.<year,2>'),
    
    DELCHR(FORMAT(CurrCode)),
    COPYSTR(FORMAT(CustLedgEntry."Document Type"),1,2));
    ...
    

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

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

  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 2009 เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 5.0 Service Pack 1 (SP1) เวอร์ชันภาษาเยอรมัน
  • Microsoft Dynamics NAV 5.0 เวอร์ชันภาษาเยอรมัน

ลบข้อมูลออก

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

สถานะ

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

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