diff options
author | Alexander Smirnov <alex@ydb.tech> | 2024-11-20 11:14:58 +0000 |
---|---|---|
committer | Alexander Smirnov <alex@ydb.tech> | 2024-11-20 11:14:58 +0000 |
commit | 31773f157bf8164364649b5f470f52dece0a4317 (patch) | |
tree | 33d0f7eef45303ab68cf08ab381ce5e5e36c5240 /yql/essentials/tests/sql/suites/expr/replace_member.sql | |
parent | 2c7938962d8689e175574fc1e817c05049f27905 (diff) | |
parent | eff600952d5dfe17942f38f510a8ac2b203bb3a5 (diff) | |
download | ydb-31773f157bf8164364649b5f470f52dece0a4317.tar.gz |
Merge branch 'rightlib' into mergelibs-241120-1113
Diffstat (limited to 'yql/essentials/tests/sql/suites/expr/replace_member.sql')
-rw-r--r-- | yql/essentials/tests/sql/suites/expr/replace_member.sql | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/yql/essentials/tests/sql/suites/expr/replace_member.sql b/yql/essentials/tests/sql/suites/expr/replace_member.sql new file mode 100644 index 0000000000..1e2e47ed7a --- /dev/null +++ b/yql/essentials/tests/sql/suites/expr/replace_member.sql @@ -0,0 +1,27 @@ +/* postgres can not */ +/* syntax version 1 */ +$data = <|x: [<|y: 2|>], z: 5|>; + +-- set field function +$F = ($field, $function) -> ( + ($struct) -> ( + ReplaceMember($struct, $field, $function($struct.$field)) + ) +); + +-- set list element function +$E = ($index, $function) -> ( + ($list) -> ( + ListMap(ListEnumerate($list), ($pair) -> ( + IF ($pair.0 = $index, $function($pair.1), $pair.1) + )) + ) +); + +-- set value function +$V = ($value) -> ( + ($_item) -> ($value) +); + +SELECT $F("x", $E(0, $F("y", $V(3))))($data) + |