Dynamics Community Forum Thread Details

I have a problem that I hope you can help me solve (Read Json File in AL)

Hi,,

I have a problem that I hope you can help me solve Read Json File in AL

Error in Postman:

Token PASS :

Web Services:

AL Code :

-----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

codeunit 50137 "ReadJSONCode"

{
    [ServiceEnabled]
    [Scope('Cloud')]
    procedure ReadJsonTest(JsonObjectText: Text)
    var
        Customer: Record Customer;
        JSONManagement: Codeunit "JSON Management";
        ObjectJSONManagement: Codeunit "JSON Management";
        CodeText: Text;
        CustomerJsonObject: Text;
    begin
        JSONManagement.InitializeObject(JsonObjectText);
        if JSONManagement.GetArrayPropertyValueAsStringByName('Customer', CustomerJsonObject) then begin
            ObjectJSONManagement.InitializeObject(CustomerJsonObject);
            Customer.Init();
            ObjectJSONManagement.GetStringPropertyValueByName('No', CodeText);
            Customer.Validate("No.", CopyStr(CodeText.ToUpper(), 1, MaxStrLen(Customer."No.")));
            ObjectJSONManagement.GetStringPropertyValueByName('Name', CodeText);
            Customer.Validate("Name", CopyStr(CodeText, 1, MaxStrLen(Customer."Name")));
            ObjectJSONManagement.GetStringPropertyValueByName('Address', CodeText);
            Customer.Validate("Address", CopyStr(CodeText, 1, MaxStrLen(Customer."Address")));
            ObjectJSONManagement.GetStringPropertyValueByName('Address_2', CodeText);
            Customer.Validate("Address 2", CopyStr(CodeText, 1, MaxStrLen(Customer."Address 2")));
            ObjectJSONManagement.GetStringPropertyValueByName('City', CodeText);
            Customer.Validate("City", CopyStr(CodeText, 1, MaxStrLen(Customer.City)));
            ObjectJSONManagement.GetStringPropertyValueByName('County', CodeText);
            Customer.Validate("County", CopyStr(CodeText, 1, MaxStrLen(Customer.County)));
            ObjectJSONManagement.GetStringPropertyValueByName('Country_Region', CodeText);
            Customer.Validate("Country/Region Code", CopyStr(CodeText, 1, MaxStrLen(Customer."Country/Region Code")));
            ObjectJSONManagement.GetStringPropertyValueByName('Post_Code', CodeText);
            Customer.Validate("Post Code", CopyStr(CodeText, 1, MaxStrLen(Customer."Post Code")));
            Customer.Insert();
        end;
    end;
}