consume an external web service from navision

its simple

OBJECT Codeunit 50100 ConsumeWebService
{
OBJECT-PROPERTIES
{
OnRun=BEGIN
CallExternalAPI();
END;
}
PROPERTIES
{
SingleInstance=Yes;
}
LOCAL PROCEDURE CallExternalAPI@1();
VAR
HttpWebRequest@1000 : DotNet "System.Net.HttpWebRequest";
HttpWebResponse@1001 : DotNet "System.Net.HttpWebResponse";
StreamReader@1002 : DotNet "System.IO.StreamReader";
RequestStream@1003 : DotNet "System.IO.Stream";
StreamWriter@1004 : DotNet "System.IO.StreamWriter";
Encoding@1005 : DotNet "System.Text.Encoding";
Uri@1006 : DotNet "System.Uri";
JsonText@1007 : Text[1024];
ResponseText@1008 : Text;
ResponseStream@1009 : DotNet "System.IO.Stream";
BEGIN
JsonText := '{ "exampleKey": "exampleValue" }'; // Replace with your JSON payload

Uri := Uri.Uri('https://your-api-url.com/endpoint'); // Replace with your URL
HttpWebRequest := HttpWebRequest.Create(Uri);
HttpWebRequest.Method := 'POST';
HttpWebRequest.ContentType := 'application/json';

Encoding := Encoding.UTF8;
RequestStream := HttpWebRequest.GetRequestStream();
StreamWriter := StreamWriter.StreamWriter(RequestStream, Encoding);
StreamWriter.Write(JsonText);
StreamWriter.Close();

HttpWebResponse := HttpWebRequest.GetResponse();
ResponseStream := HttpWebResponse.GetResponseStream();
StreamReader := StreamReader.StreamReader(ResponseStream);
ResponseText := StreamReader.ReadToEnd();

MESSAGE('Response: %1', ResponseText);
END;
}