aboutsummaryrefslogtreecommitdiffstats
path: root/yql/essentials/tests/sql/suites/expr/replace_member.sql
diff options
context:
space:
mode:
authorudovichenko-r <udovichenko-r@yandex-team.com>2024-11-19 14:58:38 +0300
committerudovichenko-r <udovichenko-r@yandex-team.com>2024-11-19 15:16:27 +0300
commit24521403b1c44303e043ba540c09b1fe991c7474 (patch)
tree341d1e7206bc7c143d04d2d96f05b6dc0655606d /yql/essentials/tests/sql/suites/expr/replace_member.sql
parent72b3cd51dc3fb9d16975d353ea82fd85701393cc (diff)
downloadydb-24521403b1c44303e043ba540c09b1fe991c7474.tar.gz
YQL-19206 Move contrib/ydb/library/yql/tests/sql/suites -> yql/essentials/tests/sql/suites
commit_hash:d0ef1f92b09c94db7c2408f946d2a4c62b603f00
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)
+