SaveToFile
PowerScript function
Description
Saves the JSON data to the local file.
Applies to
Syntax
|
1 |
objectname.SaveToFile ( FileName {, Encoding e} ) |
|
Argument |
Description |
|---|---|
|
objectname |
The name of the JSONGenerator or JSONPackage object whose |
|
FileName |
A string whose value is the file full name. |
|
e (optional) |
Character encoding of the resulting blob. Values are: EncodingANSI!, EncodingUTF8!, EncodingUTF16LE! |
Return value
Integer.
Returns 1 if it succeeds and -1 if an error occurs. If any
argument’s value is null, the method returns null.
Examples
This example generates the following JSON string and saves to
d: est.json:
{ “string”: “string”, “long”: 100, “boolean”: true, “datetime”:
“2017-09-21 12:00:00”, “blob”: “dABoAGkAcwAgAGkAcwAgAGIAbABvAGIA”,
“remark”: null }
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 |
Long ll_RootObject JsonGenerator lnv_JsonGenerator lnv_JsonGenerator = Create JsonGenerator // Create an object root item ll_RootObject = lnv_JsonGenerator.CreateJsonObject() // Add a value child item lnv_JsonGenerator.AddItemString(ll_RootObject, "string", "string") lnv_JsonGenerator.AddItemNumber(ll_RootObject, "long", 100) lnv_JsonGenerator.AddItemBoolean(ll_RootObject, "boolean", true) lnv_JsonGenerator.AddItemDateTime(ll_RootObject, "datetime", datetime("2017-09-21 12:00:00")) lnv_JsonGenerator.AddItemBlob(ll_RootObject, "blob", blob("this is blob")) lnv_JsonGenerator.AddItemNull(ll_RootObject, "remark") // Get the JSON data lnv_JsonGenerator.SaveToFile("d: est.json") |
This example packages the data of the DataWindow, DataStore, and
DataWindowChild control and then saves the data to
D: empjson.txt.
|
1 2 3 4 5 6 7 8 9 10 11 12 |
datastore lds_employee datawindowchild ldwc_active JsonPackage lnv_package lnv_package = create JsonPackage ...//Initialize data for lds_employee, ldwc_active // package the data lnv_package.SetValue("d_department", dw_department, false) lnv_package.SetValue("d_employee", lds_employee) lnv_package.SetValue("dddw_active", ldwc_active, false) lnv_package.SaveToFile("D: empjson.txt") |