aboutsummaryrefslogtreecommitdiffstats
path: root/yql/essentials/tests/sql/suites/expr/replace_member.sql
diff options
context:
space:
mode:
authorMaxim Yurchuk <maxim-yurchuk@ydb.tech>2024-11-20 17:37:57 +0000
committerGitHub <noreply@github.com>2024-11-20 17:37:57 +0000
commitf76323e9b295c15751e51e3443aa47a36bee8023 (patch)
tree4113c8cad473a33e0f746966e0cf087252fa1d7a /yql/essentials/tests/sql/suites/expr/replace_member.sql
parent753ecb8d410a4cb459c26f3a0082fb2d1724fe63 (diff)
parenta7b9a6afea2a9d7a7bfac4c5eb4c1a8e60adb9e6 (diff)
downloadydb-f76323e9b295c15751e51e3443aa47a36bee8023.tar.gz
Merge pull request #11788 from ydb-platform/mergelibs-241120-1113
Library import 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.sql27
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)
+