मेरे पास Integers उदाहरण का JsonArray है - [१०००, १००१, १००२, ....., ११००]।

मुझे इस JsonArray को पार करने की आवश्यकता है ताकि मैं अपने फ़ंक्शन को एक-एक करके कॉल कर सकूं।

मैंने कोशिश की

function Amen returns JsonObject (input code as JsonArray, input lang as char):

def var Amenities as JsonObject.
    Amenities = new JsonObject().
    Amenities:Add("Code", code).
    for first inditaal where string(inditaal.indi-nr) = string(code) and inditaal.taal-code = lang no-lock.
    end.
        Amenities:Add("Description", inditaal.inditaal-oms).

return Amenities.

end function.

define variable code as JsonArray no-undo init [10400, 10239, 10205].

def var result as JsonArray.
result = new JsonArray().

def var lineObj as JsonArray.

do i = 1 to code :length:
    lineObj = new JsonArray().
    lineObj = code :GetJsonArray(i).
    result:Add(Amen(lineObj)).
end.

मैं JsonArray कोड से पूर्णांक प्राप्त करने में असमर्थ हूँ। क्या इसे करने का कोई और तरीका है?

चूंकि मैं इस भाषा में नया हूं, इसलिए मैं ऐसा करने में असमर्थ हूं और मुझे दस्तावेज़ीकरण में कुछ भी नहीं मिल रहा है। कृपया सहायता कीजिए!

1
Mr Voice 14 फरवरी 2021, 23:18

1 उत्तर

सबसे बढ़िया उत्तर

JsonArray में एक पूर्णांक सीमा (ABL Array) जोड़ने के लिए, Add विधि का उपयोग करें।

JsonArray के माध्यम से लूप करने के लिए, JsonArray की लंबाई को पुनरावृत्त करें और एक मान प्राप्त करने के लिए GetInteger(i) का उपयोग करें।

USING Progress.Json.ObjectModel.* FROM PROPATH . 

define variable code as INTEGER EXTENT no-undo init [10400, 10239, 10205].

DEFINE VARIABLE oJsonArray AS JsonArray NO-UNDO . 
DEFINE VARIABLE i AS INTEGER     NO-UNDO.

oJsonArray = NEW JsonArray () . 

oJsonArray:ADD (code) . 

do i = 1 to oJsonArray:length:
    message oJsonArray:GetInteger (i) .
end.
1
Mike Fechner 14 फरवरी 2021, 23:52