จะไม่มีการตรวจสอบความถูกต้องฟิลด์ IBAN ในรายงาน "PO - ส่งออก N34.1" (7000060) เมื่อคุณพิมพ์รายงานสําหรับใบสั่งการชําระเงินที่ใช้ชนิดการโอนย้ายระหว่างประเทศใน Microsoft Dynamics NAV 2009 เวอร์ชันภาษาสเปน

นำไปใช้กับ
Microsoft Dynamics NAV 2009 R2 Dynamics NAV 2009 Service Pack 1

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

อาการ

เมื่อคุณพิมพ์รายงาน "PO - ส่งออก N34.1" (7000060) สําหรับใบสั่งการชําระเงินที่ใช้ชนิดการโอนย้ายระหว่างประเทศใน Microsoft Dynamics NAV 2009 เวอร์ชันภาษาสเปน จะไม่มีการตรวจสอบความถูกต้องของฟิลด์ IBAN ระบบจะส่งออกไฟล์การถ่ายโอนและแทนที่ฟิลด์ IBAN โดยใช้ศูนย์ แม้ว่าฟิลด์ IBAN จะว่างเปล่า
ปัญหานี้เกิดขึ้นในผลิตภัณฑ์ต่อไปนี้:

  • Microsoft Dynamics NAV 2009 R2 เวอร์ชันภาษาสเปน
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาสเปน

      

การแก้ปัญหา

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

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

    ...
    FIELDERROR(Amount,STRSUBSTNO(Text1100002,FIELDCAPTION("Bank Payment Type"),FORMAT("Bank Payment Type")));
    
    ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,
    
    // Delete the following line.
    VendCCCAccNo,PayeeAddress,PayeeCCC,IBAN,SwiftCode);
    
    Vendor.GET("Account No.");
    CalcAmountPaid("Gen. Journal Line");
    ...
    

    รหัสทดแทน

    ...
    FIELDERROR(Amount,STRSUBSTNO(Text1100002,FIELDCAPTION("Bank Payment Type"),FORMAT("Bank Payment Type")));
    
    ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,
    
    // Add the following line.
    VendCCCAccNo,PayeeAddress,PayeeCCC,IBAN,SwiftCode,"Transfer Type");
    
    Vendor.GET("Account No.");
    CalcAmountPaid("Gen. Journal Line");
    ...
    
  2. เปลี่ยนรหัสในเอกสาร Cartera - ทริกเกอร์ OnAfterGetRecord ในรายงาน PO - ส่งออก N34.1 (7000060) ดังนี้:
    รหัสที่มีอยู่

    ...
    DocType := DocMisc.DocType2("Payment Method Code");
    
    ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,VendCCCAccNo,
    
    // Delete the following line.
    PayeeAddress,PayeeCCC,IBAN,SwiftCode);
    
    GetExportedAmount("Payment Order"."No.","Account No.");
    ...
    

    รหัสทดแทน

    ...
    DocType := DocMisc.DocType2("Payment Method Code");
    
    ElectPmtMgmt.GetPayeeInfo("Account No.",VendorCCCBankNo,VendCCCBankBranchNo,VendCCCControlDigits,VendCCCAccNo,
    
    // Add the following line. 
    PayeeAddress,PayeeCCC,IBAN,SwiftCode,"Transfer Type");
    
    GetExportedAmount("Payment Order"."No.","Account No.");
    ...
    
  3. เพิ่มพารามิเตอร์ท้องถิ่นใหม่ในฟังก์ชัน GetPayeeInfo ใน Elect Pmts Management codeunit (10701) แล้วระบุพารามิเตอร์ดังนี้:

    • ชื่อ: TransferType
    • ชนิดข้อมูล: ตัวเลือก
    • Optionstring: =, ชาติ, ระหว่างประเทศ, พิเศษ
  4. เปลี่ยนโค้ดในฟังก์ชัน GetPayeeInfo ใน Elect Pmts Management codeunit (10701) ดังนี้:
    รหัสที่มีอยู่

    ...
    VendorBankAccount.TABLECAPTION,VendorBankAccount.FIELDCAPTION("Use For Electronic Payments"),
    Vendor.TABLECAPTION,Vendor."No.");
    VendorBankAccount.FIND('-');
    
    // Delete the following lines.
    VendorBankAccount.TESTFIELD("CCC Bank No.");
    VendorBankAccount.TESTFIELD("CCC Bank Branch No.");
    VendorBankAccount.TESTFIELD("CCC Bank Account No.");
    VendorBankAccount.TESTFIELD("CCC Control Digits");
    
    PayeeCCCAccNo := VendorBankAccount."CCC Bank Account No.";
    PayeeCCCControlDigits := VendorBankAccount."CCC Control Digits";
    PayeeCCCBankNo := VendorBankAccount."CCC Bank No.";
    PayeeCCCBankBranchNo := VendorBankAccount."CCC Bank Branch No.";
    IF (PayeeCCCBankNo = '') OR (PayeeCCCBankBranchNo = '') OR
    (PayeeCCCControlDigits = '') OR (PayeeCCCAccNo = '')
    THEN
    ERROR(Text1100002,VendorBankAccount."Vendor No.");
    
    PayeeCCCAccNo := PADSTR('',MAXSTRLEN(PayeeCCCAccNo) - STRLEN(PayeeCCCAccNo),'0') + PayeeCCCAccNo;
    PayeeCCCControlDigits := PADSTR('',MAXSTRLEN(PayeeCCCControlDigits) - STRLEN(PayeeCCCControlDigits),'0')
    + PayeeCCCControlDigits;
    
    PayeeCCC := CONVERTSTR(PADSTR(PayeeCCCBankNo,4,' '),' ','0') + CONVERTSTR(PADSTR(PayeeCCCBankBranchNo,4,' '),' ','0') +
    PADSTR(PayeeCCCControlDigits,2,' ') + CONVERTSTR(PADSTR(PayeeCCCAccNo,10,' '),' ','0');
    
    IBAN := CONVERTSTR(PADSTR(VendorBankAccount.IBAN,34,' '),' ','0');
    SwiftCode := CONVERTSTR(PADSTR(VendorBankAccount."SWIFT Code",11,' '),' ','0');
    // End of the lines.
    ...
    

    รหัสทดแทน

    ...
    VendorBankAccount.TABLECAPTION,VendorBankAccount.FIELDCAPTION("Use For Electronic Payments"),
    Vendor.TABLECAPTION,Vendor."No.");
    VendorBankAccount.FIND('-');
    
    // Add the following lines. 
    IF TransferType = TransferType::National THEN BEGIN
    VendorBankAccount.TESTFIELD("CCC Bank No.");
    VendorBankAccount.TESTFIELD("CCC Bank Branch No.");
    VendorBankAccount.TESTFIELD("CCC Bank Account No.");
    VendorBankAccount.TESTFIELD("CCC Control Digits");
    
    PayeeCCCAccNo := VendorBankAccount."CCC Bank Account No.";
    PayeeCCCControlDigits := VendorBankAccount."CCC Control Digits";
    PayeeCCCBankNo := VendorBankAccount."CCC Bank No.";
    PayeeCCCBankBranchNo := VendorBankAccount."CCC Bank Branch No.";
    IF (PayeeCCCBankNo = '') OR (PayeeCCCBankBranchNo = '') OR
    (PayeeCCCControlDigits = '') OR (PayeeCCCAccNo = '')
    THEN
    ERROR(Text1100002,VendorBankAccount."Vendor No.");
    
    PayeeCCCAccNo := PADSTR('',MAXSTRLEN(PayeeCCCAccNo) - STRLEN(PayeeCCCAccNo),'0') + PayeeCCCAccNo;
    PayeeCCCControlDigits := PADSTR('',MAXSTRLEN(PayeeCCCControlDigits) - STRLEN(PayeeCCCControlDigits),'0')
    + PayeeCCCControlDigits;
    
    PayeeCCC := CONVERTSTR(PADSTR(PayeeCCCBankNo,4,' '),' ','0') + CONVERTSTR(PADSTR(PayeeCCCBankBranchNo,4,' '),' ','0') +
    PADSTR(PayeeCCCControlDigits,2,' ') + CONVERTSTR(PADSTR(PayeeCCCAccNo,10,' '),' ','0');
    END ELSE BEGIN
    VendorBankAccount.TESTFIELD(IBAN);
    IBAN := CONVERTSTR(PADSTR(VendorBankAccount.IBAN,34,' '),' ','0');
    SwiftCode := CONVERTSTR(PADSTR(VendorBankAccount."SWIFT Code",11,' '),' ','0');
    END;
    // End of the lines. 
    ...
    

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

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

  • Microsoft Dynamics NAV 2009 R2 เวอร์ชันภาษาสเปน
  • Microsoft Dynamics NAV 2009 Service Pack 1 (SP1) เวอร์ชันภาษาสเปน

ลบข้อมูลออก

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

สถานะ

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

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