LoadString

Description

Loads a JSON string to the JSONParser and JSONPackage objects.

Applies to

JSONParser and JSONPackage objects

Required JSON format

  • For JSONParser object: The string that can be loaded by the JSONParser object must be JSON-formatted.

  • For JSONPackage object: The file content that can be loaded by the JSONPackage object must be an object which contains a set of key/value pairs where key is the name of a JSONObjectItem-type object (corresponding to the data being added into the package, such as "d_department" and "d_employee_syntax") and the value for the key can be a string, object, or array in the following formats: plain JSON, or DataWindow JSON.

    Here is the structure of this JSON format:

    { "KEY1":VALUE1, "KEY2":VALUE2, "KEY3":VALUE3… }

    Here is an example of this JSON format:

    {
    "d_department": {"department_id":1, "name":"developer"},
    "d_employee": [{"empoyee_id":1, "name":"my name1"}, {"empoyee_id":2, "name":"my name2"}],
    "d_employee_syntax": "release 17;\r\n datawindow(units=0 timer_interval=0 color=1073741824..."
    }
    

Syntax

objectname.LoadString ( JsonData )

Argument

Description

objectname

The name of the JSONParser or JSONPackage object to which the JSON string will be loaded.

JsonData

(For JSONParser object) A JSON-formatted string.

(For JSONPackage object) The JSON data of JsonObjectItem type.


Return value

String.

Returns the empty string ("") if it succeeds and the error message if an error occurs. If any argument's value is null, the method returns null.

Examples

This example loads a JSON string into the JSONParser object:

String ls_Error
JsonParser lnv_JsonParser 
lnv_JsonParser = Create JsonParser

String ls_Json = '{"id":1, "name":"evan1", "birthday":2340323884}'
ls_Error = lnv_JsonParser.LoadString(ls_Json)
if Len(ls_Error) > 0 then
 MessageBox("Error", ls_Error)
end if

This example gets the data from the server and then loads the "d_employee" data to the DataWindow:

int li_rc
string ls_JsonPackage, ls_Error, ls_EmployeeJson
HttpClient lnv_HttpClient
JsonPackage lnv_package

lnv_HttpClient = create HttpClient
lnv_package = create JsonPackage

// Request the JSON data package from server
li_rc = lnv_HttpClient.SendRequest("GET", "http://demo.appeon.com/PB/webapi_client/getjsonpackage/employee/102")

// Get the data
if li_rc = 1 and lnv_HttpClient.GetResponseStatusCode() = 200 then
	lnv_HttpClient.GetResponseBody(ls_JsonPackage)
	// Extract the JSON data package
	ls_Error = lnv_package.LoadString(ls_JsonPackage)
	if Len(ls_Error) = 0 then
		ls_EmployeeJson = lnv_package.GetValue("d_employee")
		dw_1.ImportJson(ls_EmployeeJson)
	else
		Messagebox("Error", ls_Error)
	end if
end if

See also

LoadFile