Small and medium business | Business Central, N...

Adding Notes to reports in Business Central

(3) Share

Report

Posted on by AK-13051749-0

314

Hello, I am using the GetNote procedure below to add Notes to a report in Business Central.

The notes are getting printed on the report, but it is adding a special character at the beginning.

The actual Note does not contain any special character at the beginning. Can someone please suggest how to remove this special character on the report?

Any help will be greatly appreciated. Thank you!

    procedure GetNote(RecRef: RecordRef): Text[250]
    var
        RecordLink: Record "Record Link";
        NoteText: BigText;
        InStr: InStream;
    begin
        Clear(Notes);
        RecordLink.SetRange("Record ID", RecRef.RecordId);
        RecordLink.SetRange(Type, RecordLink.Type::Note);
        if RecordLink.FindSet then
            repeat
                RecordLink.CalcFields(Note);
                if RecordLink.Note.HasValue() then begin
                    Clear(NoteText);
                    RecordLink.Note.CreateInStream(InStr);
                    NoteText.Read(InStr);
                    NoteText.GetSubText(NoteText, 2)
                end;
            until RecordLink.Next() = 0;
        Notes := CopyStr(Format(NoteText), 1, 250);
    end;

Categories:

Dynamics 365 Business Central

I have the same question (0)

All responses (5)

Answers (0)

Sort by

Suggested answer

YUN ZHU 102,422 Super User 2026 Season 1 on at

Like
a
(0)

Report
Copy link

Link copied!

This is a bit strange; it looks like a font issue.
Try exporting it using the method below and check if the data contains that character. If it doesn't, then it's a layout or font problem; if it does, you'll need to find a way to remove it—for instance, by deleting the first character.

PS: Dynamics 365 Business Central: Save report dataset to Excel from the request page (Report Inspector)

https://yzhums.com/14497/

Hope this can give you some hints.

Thanks

ZHU

Was this reply helpful? Yes No
Suggested answer

OussamaSabbouh 18,309 Super User 2026 Season 1 on at

Like
a
(1)

Report
Copy link

Link copied!

Hello,

The special character is most likely the first control character being read from the Record Link.Note BLOB. The main issue in your code is that you are using NoteText as both the source and destination in GetSubText. Use a separate Text variable and start from position 2:

var
NoteText: BigText;
NoteAsText: Text;
InStr: InStream;

RecordLink.Note.CreateInStream(InStr);
NoteText.Read(InStr);
NoteText.GetSubText(NoteAsText, 2, 250);

Notes := CopyStr(NoteAsText, 1, 250);

This should remove the unwanted leading character. Also note that your current loop only returns the last note found; if you want to print all notes, you should concatenate them separately.

Regards,
Oussama Sabbouh

Was this reply helpful? Yes No
AK-13051749-0 314 on at

Like
a
(0)

Report
Copy link

Link copied!

Thank you for the suggestions, Yun and Oussama.

I am still having the same issue after testing the suggested changes.

When I export to Excel, the special character shows up as "?". However, this only happens for some records but not all, which is strange. I checked the actual Note stored in the customer card and none of them start with a space or any special character.

Do you have any suggestions for how to remove this unwanted character on the Excel report that only appears for some records?

Any help would be greatly appreciated. Thank you.

Was this reply helpful? Yes No
AK-13051749-0 314 on at

Like
a
(0)

Report
Copy link

Link copied!

@YUN ZHU @OussamaSabbouh

I haven't been able to resolve this issue yet so just wanted to check in with you to see if you had any other advice about getting rid of the special character at the beginning of some of the notes.

Any help would be greatly appreciated. Thank you.

Was this reply helpful? Yes No
Suggested answer

AK-13051749-0 314 on at

Like
a
(0)

Report
Copy link

Link copied!

I was able to remove the unwanted character that was appearing at the beginning of some notes by adding a char variable (SOHChar), assigning it to 1, and then using Notes := Notes.Replace(SOHChar, '').

procedure GetNote(RecRef: RecordRef): Text[250]

var

RecordLink: Record "Record Link";

NoteText: BigText;

InStr: InStream;

NoteAsText: Text;

SOHChar: Char;

begin

Clear(Notes);

RecordLink.SetRange("Record ID", RecRef.RecordId);

RecordLink.SetRange(Type, RecordLink.Type::Note);

if RecordLink.FindSet then

repeat

RecordLink.CalcFields(Note);

if RecordLink.Note.HasValue() then begin

Clear(NoteText);

RecordLink.Note.CreateInStream(InStr);

NoteText.Read(InStr);

NoteText.GetSubText(NoteText, 2);

end;

until RecordLink.Next() = 0;

SOHChar := 1;

Notes := CopyStr(Format(NoteText), 1, 250);

Notes := Notes.Replace(SOHChar, '');

end;

Was this reply helpful? Yes No