correct way to encode the (forward slash /) in Dynamics BC AL - dynamics-365

Question

I am calling external API from HTTP client
Source Code:
usercontrol(html; HTML)
{
ApplicationArea = all;
trigger ControlReady()
Var
JSONManagement: Codeunit "JSON Management";
"HttpClient": HttpClient;
HttpContent: HttpContent;
HttpMessage: HttpRequestMessage;
HttpRespnse: HttpResponseMessage;
JsonText: Text;
ResponseMessage: Text;
cnew: text;
TypeHelper: Codeunit "Type Helper";
begin
NR := 'SEDC470R/3841D';
IF NR = '' THEN begin
end
ELSE begin
HttpMessage.SetRequestUri('https://.........r.avd.dk/api/97d267826-2dc0/items/' + TypeHelper.UrlEncode(NR) + '/listDummyall?pc=Ja');
HttpClient.Send(HttpMessage, HttpRespnse);
HttpContent := HttpRespnse.Content();
HttpContent.ReadAs(ResponseMessage);
CurrPage.html.Render(ResponseMessage);
end;
end;
}
but it returns a 404 Not Found HTML page. It looks like it's not encoding the forward slash. Is there some other step that I am missing?

Answer 1

I am not exactly sure what you are trying to accomplish.
But the TypeHelper.Encode works for me, so I guess that part is not your problem.
If you just want to display a webpage in BC, did you try the WebPageViewer addin?
pageextension 50100 CustomerListExt extends "Customer Card"
{
layout
{
addlast(content)
{
group(webpage)
{
usercontrol(webViewer; "Microsoft.Dynamics.Nav.Client.WebPageViewer")
{
ApplicationArea = all;
trigger ControlAddInReady(callbackUrl: Text)
begin
CurrPage.webViewer.Navigate('https://stefanmaron.com/');
end;
}
}
}
}
}