在 Business Central 报表扩展中读取 Blob 到文本

Question

我正在为 Business Central 创建一份报告，即采购订单报告。采购订单页面经过扩展，添加了 Blob 数据类型的工作描述。我已将 Blob 字段添加到我的报表扩展中，现在我将 Blob 转换为文本，就像在我的页面中看到的那样。示例：“这是测试工作描述”。我相信我必须使用 InStream，然后使用 Read。有人可以提供示例代码来帮助我将其作为文本添加到我的报告中吗？

Answer 1

您可以在 Microsoft 文档中找到很好的示例： Write、WriteText、Read 和 ReadText Method Behaviour for Line Endings and Zero Terminators

但我认为这就是你所需要的：

procedure GetWorkDescription (PurchHeader: Record "Purchase Header")WorkDescription: Text
var
    MyInStream: InStream;

begin
    Clear(WorkDescription);
    PurchHeader.Calcfields("Work Description");
    If PurchHeader."Work Description".HasValue() then begin
        PurchHeader."Work Description".CreateInStream(MyInStream);
        MyInStream.Read(WorkDescription);
    end;
end;