更新:
PostgreSQL 9.5中，内置了一些
jsonb操作功能（但是没有针对
json的功能；需要转换类型才能操作
json值）。
合并2个（或多个）JSON对象（或连接数组）：
SELECT jsonb '{"a":1}' || jsonb '{"b":2}', -- will yield jsonb '{"a":1,"b":2}'
jsonb '["a",1]' || jsonb '["b",2]' -- will yield jsonb '["a",1,"b",2]'
因此，使用以下方式可以设置简单的键：
设置简单键：
SELECT jsonb '{"a":1}' || jsonb_build_object('<key>', '<value>')
<key>应为字符串，<value>可以是任何类型，可由to_jsonb()接受。
要在JSON层次结构中深度设置值，可以使用jsonb_set()函数：
SELECT jsonb_set('{"a":[null,{"b":[]}]}', '{a,1,b,0}', jsonb '{"c":3}')
jsonb_set() 的完整参数列表如下：
jsonb_set(target jsonb,
path text[],
new_value jsonb,
create_missing boolean default true)
path可以包含JSON数组索引，而在其中出现的负整数则从JSON数组末尾开始计数。但是，一个不存在但是正整数的JSON数组索引将把元素附加到数组末尾：
SELECT jsonb_set('{"a":[null,{"b":[1,2]}]}', '{a,1,b,1000}', jsonb '3', true)
要将值插入JSON数组（同时保留所有原始值），可以使用jsonb_insert()函数（在9.6+版本中，仅限此部分使用该函数）：
SELECT jsonb_insert('{"a":[null,{"b":[1]}]}', '{a,1,b,0}', jsonb '2')
SELECT jsonb_insert('{"a":[null,{"b":[1]}]}', '{a,1,b,0}', jsonb '2', true)
< p >
jsonb_insert()的完整参数列表：
jsonb_insert(target jsonb,
path text[],
new_value jsonb,
insert_after boolean default false)
再次提醒，出现在path中的负整数是从JSON数组的末尾开始计数的。
因此，例如向JSON数组末尾添加内容可以通过以下方式完成：
SELECT jsonb_insert('{"a":[null,{"b":[1,2]}]}', '{a,1,b,-1}', jsonb '3', true)
然而，当target中的path是JSON对象的键时，此函数与jsonb_set()有些不同。在这种情况下，仅当该键未被使用时，它才会为JSON对象添加新的键值对。如果已经使用，则会引发错误：
SELECT jsonb_insert('{"a":[null,{"b":[1]}]}', '{a,1,c}', jsonb '[2]')
SELECT jsonb_insert('{"a":[null,{"b":[1]}]}', '{a,1,b}', jsonb '[2]')
从JSON对象（或数组）中删除键（或索引）可以使用
-运算符完成：
SELECT jsonb '{"a":1,"b":2}' - 'a', -- will yield jsonb '{"b":2}'
jsonb '["a",1,"b",2]' - 1 -- will yield jsonb '["a","b",2]'
从 JSON 层次结构中深度删除可以使用 #- 运算符进行操作：
SELECT '{"a":[null,{"b":[3.14]}]}' #- '{a,1,b,0}'
针对9.4版本，您可以使用修改后的原始答案（如下），但不需要聚合JSON字符串，而是可以直接使用json_object_agg()聚合为JSON对象。
原始答案：在纯SQL中也可以实现（无需plpython或plv8），但需要9.3+版本，无法在9.2版本上运行。
CREATE OR REPLACE FUNCTION "json_object_set_key"(
"json" json,
"key_to_set" TEXT,
"value_to_set" anyelement
)
RETURNS json
LANGUAGE sql
IMMUTABLE
STRICT
AS $function$
SELECT concat('{', string_agg(to_json("key") || ':' || "value", ','), '}')::json
FROM (SELECT *
FROM json_each("json")
WHERE "key" <> "key_to_set"
UNION ALL
SELECT "key_to_set", to_json("value_to_set")) AS "fields"
$function$;
SQLFiddle
编辑:
一个可以设置多个键和值的版本:
CREATE OR REPLACE FUNCTION "json_object_set_keys"(
"json" json,
"keys_to_set" TEXT[],
"values_to_set" anyarray
)
RETURNS json
LANGUAGE sql
IMMUTABLE
STRICT
AS $function$
SELECT concat('{', string_agg(to_json("key") || ':' || "value", ','), '}')::json
FROM (SELECT *
FROM json_each("json")
WHERE "key" <> ALL ("keys_to_set")
UNION ALL
SELECT DISTINCT ON ("keys_to_set"["index"])
"keys_to_set"["index"],
CASE
WHEN "values_to_set"["index"] IS NULL THEN 'null'::json
ELSE to_json("values_to_set"["index"])
END
FROM generate_subscripts("keys_to_set", 1) AS "keys"("index")
JOIN generate_subscripts("values_to_set", 1) AS "values"("index")
USING ("index")) AS "fields"
$function$;
编辑2：正如@ErwinBrandstetter 所指出的，上述这些函数就像所谓的UPSERT（如果字段存在，则更新该字段，如果不存在则插入）。这里有一个变种，只进行UPDATE：
CREATE OR REPLACE FUNCTION "json_object_update_key"(
"json" json,
"key_to_set" TEXT,
"value_to_set" anyelement
)
RETURNS json
LANGUAGE sql
IMMUTABLE
STRICT
AS $function$
SELECT CASE
WHEN ("json" -> "key_to_set") IS NULL THEN "json"
ELSE (SELECT concat('{', string_agg(to_json("key") || ':' || "value", ','), '}')
FROM (SELECT *
FROM json_each("json")
WHERE "key" <> "key_to_set"
UNION ALL
SELECT "key_to_set", to_json("value_to_set")) AS "fields")::json
END
$function$;
编辑3: 这里是递归版本，可以在键路径上设置（UPSERT）叶子值（并使用此答案中的第一个函数），其中键只能引用内部对象，不支持内部数组:
CREATE OR REPLACE FUNCTION "json_object_set_path"(
"json" json,
"key_path" TEXT[],
"value_to_set" anyelement
)
RETURNS json
LANGUAGE sql
IMMUTABLE
STRICT
AS $function$
SELECT CASE COALESCE(array_length("key_path", 1), 0)
WHEN 0 THEN to_json("value_to_set")
WHEN 1 THEN "json_object_set_key"("json", "key_path"[l], "value_to_set")
ELSE "json_object_set_key"(
"json",
"key_path"[l],
"json_object_set_path"(
COALESCE(NULLIF(("json" -> "key_path"[l])::text, 'null'), '{}')::json,
"key_path"[l+1:u],
"value_to_set"
)
)
END
FROM array_lower("key_path", 1) l,
array_upper("key_path", 1) u
$function$;
更新：新增了替换现有json字段键为另一个给定键的功能。在迁移或其他数据结构修改的场景中，可以派上用场。
CREATE OR REPLACE FUNCTION json_object_replace_key(
json_value json,
existing_key text,
desired_key text)
RETURNS json AS
$BODY$
SELECT COALESCE(
(
SELECT ('{' || string_agg(to_json(key) || ':' || value, ',') || '}')
FROM (
SELECT *
FROM json_each(json_value)
WHERE key <> existing_key
UNION ALL
SELECT desired_key, json_value -> existing_key
) AS "fields"
),
'{}'
)::json
$BODY$
LANGUAGE sql IMMUTABLE STRICT
COST 100;
更新：现在函数已经被压缩。
select json_object_set_key((select data from test where data->>'b' = '2'), 'b', 'two');时，出现了错误。 错误信息是“ERROR: could not determine polymorphic type because input has type "unknown"（无法确定多态类型，因为输入具有未知类型）”。 - user9645UPSERT**的操作，而不是UPDATE。如果json字段中的键尚不存在，则将其添加。请参考以下相关问题以获取实际的UPDATE：https://dev59.com/Imsz5IYBdhLWcg3wsaPN（这是针对复合类型，但原则类似于json）。 - Erwin Brandstetter$2::text。 - pozs