Bạn không thể đính kèm tài liệu Word được bảo vệ sự tương tác trong Microsoft Dynamics NAV 2009


Bài viết này áp dụng cho Microsoft Dynamics NAV 2009 cho tất cả các nước và tất cả ngôn ngữ.

Triệu chứng


Khi bạn cố gắng để đính kèm tài liệu Word được bảo vệ một tương tác trong Microsoft Dynamics NAV 2009 R2 và Microsoft Dynamics NAV 2009 Service Pack 1 (SP1), bạn nhận được thông báo lỗi cho biết rằng bạn không thể đính kèm tài liệu do tài liệu được bảo vệ. Ví dụ, bạn nhận được thông báo lỗi sau:
Cuộc gọi viên OpenDataSource không thành công. Microsoft Word trả về thông báo sau: The OpenDataSource phương pháp hoặc thuộc tính không khả dụng vì lựa chọn hiện tại bị khoá để chỉnh sửa.

Giải pháp


Thông tin về cập nhật nóng

Microsoft hiện đã cung cấp bản cập nhật nóng được hỗ trợ. Tuy nhiên, nó chỉ được dùng để khắc phục sự cố được mô tả trong bài viết này. Áp dụng cho các hệ thống đang gặp sự cố cụ thể này. Hotfix này có thể được kiểm tra thêm. Do đó, nếu bạn không bị ảnh hưởng bởi vấn đề này, chúng tôi khuyến nghị bạn đợi cho gói dịch vụ tiếp theo của Microsoft Dynamics NAV 2009 hoặc phiên bản Microsoft Dynamics NAV tiếp theo có chứa hotfix này.

Lưu ý Trong trường hợp đặc biệt, chi phí thường phát sinh để hỗ trợ cuộc gọi có thể bị hủy bỏ nếu chuyên viên hỗ trợ kỹ thuật cho Microsoft Dynamics và sản phẩm liên quan xác định rằng một Cập Nhật cụ thể sẽ giải quyết vấn đề của bạn. Chi phí hỗ trợ thông thường sẽ áp dụng cho các vấn đề không phù hợp với bản Cập Nhật cụ thể trong câu hỏi và câu hỏi hỗ trợ bổ sung.


Thông tin cài đặt

Microsoft sẽ cung cấp chương trình mẫu để minh hoạ, không bảo hành hoặc rõ ràng hay ngụ ý. Điều này bao gồm, nhưng không giới hạn bảo đảm cho một mục đích cụ thể hoặc sự. Bài viết này giả định rằng bạn đã quen với ngôn ngữ lập trình đang được giải thích và các công cụ được sử dụng để tạo và quy trình gỡ lỗi. Các kỹ sư hỗ trợ Microsoft có thể giúp giải thích các chức năng của một quy trình cụ thể, nhưng chúng sẽ không sửa đổi những mô hình để cung cấp thêm chức năng hoặc xây dựng quy trình nhằm đáp ứng yêu cầu cụ thể của bạn.

Lưu ý Trước khi cài đặt hotfix này, xác minh rằng tất cả Microsoft Navision khách người dùng đăng xuất hệ thống. Điều này bao gồm Microsoft Navision ứng dụng dịch vụ (NAS) khách người dùng. Bạn nên khách hàng chỉ người được đăng nhập khi bạn áp dụng hotfix này.

Để áp dụng hotfix này, bạn phải có giấy phép nhà phát triển.

Chúng tôi khuyên bạn nên tài khoản người dùng trong cửa sổ thông tin đăng nhập Windows hoặc trong cửa sổ thông tin đăng nhập cơ sở dữ liệu được gán vai trò "Siêu" của bạn. Nếu tài khoản người dùng không thể gán vai trò "SUPER" ID, bạn phải xác minh rằng tài khoản người dùng có các quyền sau đây:
  • Thay đổi quyền cho các đối tượng mà bạn sẽ thay đổi.
  • Quyền thực thi các đối tượng hệ thống đối tượng ID 5210 và các đối tượng hệ thống đối tượng ID 9015 .


Lưu ý Bạn không cần phải có quyền để lưu trữ dữ liệu nếu bạn phải tiến hành sửa chữa dữ liệu.

Thay đổi mã

Lưu ý Luôn kiểm tra mã khắc phục trong một môi trường được kiểm soát trước khi bạn áp dụng bản vá để sản xuất máy tính của bạn.
Để giải quyết vấn đề này, thay đổi mã trong WordManagement Codeunit (5054). Để thực hiện việc này, hãy làm theo các bước sau:
  1. Địa chỉ toàn cầu biến sau:
    Text009@1009 : TextConst 'ENU=Sending individual mails...';
  2. Thay đổi mã trong ExecuteMerge chức năng như sau:
    Mã hiện tại
    ...          FORMAT(TempDeliverySorter."Correspondence Type")));
    IF TempDeliverySorter.FIND('-') THEN
    NoOfRecords := TempDeliverySorter.COUNT;


    Attachment.GET(TempDeliverySorter."Attachment No.");


    WITH TempDeliverySorter DO BEGIN
    SETCURRENTKEY("Attachment No.","Correspondence Type",Subject);
    FIND('-');
    END;
    ...

    Thay thế mã
    ...          FORMAT(TempDeliverySorter."Correspondence Type")));
    IF TempDeliverySorter.FIND('-') THEN
    NoOfRecords := TempDeliverySorter.COUNT;


    Attachment.GET(TempDeliverySorter."Attachment No.");

    // Add the following lines.
    // Handle Word documents without mergefields
    IF NOT DocContainMergefields(Attachment) THEN BEGIN
    MainFileName := ConstDocFilename;
    Attachment.ExportAttachment(MainFileName);
    CASE TempDeliverySorter."Correspondence Type" OF
    TempDeliverySorter."Correspondence Type"::"Hard Copy":
    BEGIN
    wrdDoc := wrdApp.Documents.Open(MainFileName);
    HandleWorddocwithoutmerge(wrdDoc,TempDeliverySorter,MainFileName);
    ParamBln := FALSE;
    wrdDoc.Close(ParamBln);
    END;
    TempDeliverySorter."Correspondence Type"::"E-Mail":
    BEGIN
    // Send attachment to all contacts in buffer
    Window.UPDATE(6,Text009);
    Attachment.TESTFIELD("File Extension");
    HandleWorddocwithoutmerge(wrdDoc,TempDeliverySorter,MainFileName);
    DeleteFile(MainFileName);
    END;
    END;
    EXIT;
    END;
    // End of the lines.

    WITH TempDeliverySorter DO BEGIN
    SETCURRENTKEY("Attachment No.","Correspondence Type",Subject);
    FIND('-');
    END;
    ...

  3. Thay đổi mã trong HandleWorddocwithoutmerge chức năng như sau:
    Mã hiện tại
    ...        IF EvalOK AND (Version >= 12.0) THEN
    EXIT('DOCX');
    EXIT(DefaultStr);
    END;


    BEGIN
    END.
    }
    }
    ...

    Thay thế mã
    ...        IF EvalOK AND (Version >= 12.0) THEN
    EXIT('DOCX');
    EXIT(DefaultStr);
    END;

    // Add the following lines.
    PROCEDURE HandleWorddocwithoutmerge@18(VAR wrdDoc@1021 : Automation "{00020905-0000-0000-C000-000000000046} 8.1:{00020906-0000-0000-C000-000000000046}:Unknown Automation Server.Document";VAR TempDeliverySorter@1022 : Record 5074;MainFileName@1023 : Text[260]);
    VAR
    InteractLogEntry@1001 : Record 5065;
    Contact@1002 : Record 5050;
    Mail@1003 : Codeunit 397;
    BEGIN
    WITH InteractLogEntry DO BEGIN
    REPEAT
    LOCKTABLE;
    GET(TempDeliverySorter."No.");
    IF TempDeliverySorter."Correspondence Type" = TempDeliverySorter."Correspondence Type"::"E-Mail" THEN BEGIN
    Contact.GET(InteractLogEntry."Contact No.");
    Mail.NewMessage(
    AttachmentManagement.InteractionEMail(InteractLogEntry),'',
    TempDeliverySorter.Subject,'',MainFileName,FALSE);
    InteractLogEntry."Mail GUID" := Mail.GetMailGUIDValue;
    END ELSE
    wrdDoc.PrintOut;
    InteractLogEntry."Delivery Status" := InteractLogEntry."Delivery Status"::" ";
    InteractLogEntry.MODIFY;
    COMMIT;
    UNTIL TempDeliverySorter.NEXT = 0;
    END;
    END;

    // End of the lines.

    BEGIN
    END.
    }
    }
    ...

Điều kiện tiên quyết

Bạn phải có một trong các sản phẩm được cài đặt để áp dụng hotfix này:
  • Microsoft Dynamics NAV 2009 R2
  • Microsoft Dynamics NAV 2009 Service Pack 1

Thông tin về việc loại bỏ

Bạn không thể xoá hotfix này.

Trạng thái


Microsoft đã xác nhận rằng đây là sự cố trong sản phẩm của Microsoft được liệt kê trong phần "Áp dụng cho".
Lưu ý Đây là một bài viết "XUẤT BẢN NHANH" được tạo trực tiếp từ trung tâm hỗ trợ của Microsoft. Thông tin này được cung cấp-trả lời cho các vấn đề mới xuất hiện. Vì nhanh chóng có sẵn, các tài liệu có thể bao gồm lỗi và có thể được sửa đổi bất kỳ lúc nào mà không cần thông báo. Xem Điều khoản sử dụng để xem xét khác.