आप PUT . का उपयोग कर सकते हैं JSON_OBJECT_T . की विधि एकल मान जोड़ने/सेट करने के लिए।
यह मानते हुए कि आप एक पंक्ति को अपडेट करते हैं (where . के साथ खंड), आप इस ब्लॉक का उपयोग कर सकते हैं। यदि कई पंक्तियाँ हैं, तो लूप या कर्सर का उपयोग करें।
DECLARE
v_pertags dmo_person.per_tags%TYPE;
v_json_obj JSON_OBJECT_T;
v_new_pertags dmo_person.per_tags%TYPE;
BEGIN
SELECT per_tags
INTO v_pertags
FROM dmo_person; --where clause
v_json_obj := TREAT(json_element_t.PARSE(v_pertags) AS json_object_t);
v_json_obj.PUT('perm_bigboss' , 1);
v_json_obj.PUT('perm_admin', 0);
v_new_pertags := v_json_obj.to_string;
UPDATE dmo_person
SET per_tags = v_new_pertags; --where clause
END;
/
