property value as Union type

lib/membership/property.ex

@@ -16,8 +16,16 @@ defmodule Mv.Membership.Property do
   attributes do
     uuid_primary_key :id
 
-    attribute :value, :string,
-      description: "Speichert den Wert, Typ-Interpretation per property_type.typ"
+    attribute :value, :union,
+      constraints: [
+        storage: :type_and_value,
+        types: [
+          boolean: [type: :boolean],
+          date: [type: :date],
+          integer: [type: :integer],
+          string: [type: :string]
+        ]
+      ]
   end
 
   relationships do
@@ -25,4 +33,8 @@ defmodule Mv.Membership.Property do
 
     belongs_to :property_type, Mv.Membership.PropertyType
   end
+
+  calculations do
+    calculate :value_to_string, :string, expr(value[:value] <> "")
+  end
 end

lib/membership/property_type.ex

@@ -10,7 +10,7 @@ defmodule Mv.Membership.PropertyType do
 
   actions do
     defaults [:create, :read, :update, :destroy]
-    default_accept [:name, :type, :description, :immutable, :required]
+    default_accept [:name, :value_type, :description, :immutable, :required]
   end
 
   attributes do
@@ -18,7 +18,8 @@ defmodule Mv.Membership.PropertyType do
 
     attribute :name, :string, allow_nil?: false, public?: true
 
-    attribute :type, :string,
+    attribute :value_type, :atom,
+      constraints: [one_of: [:string, :integer, :boolean, :date]],
       allow_nil?: false,
       description: "Definies the datatype `Property.value` is interpreted as"
 

lib/mv_web/member_live/form_component.ex

@@ -9,7 +9,11 @@ defmodule MvWeb.MemberLive.FormComponent do
       Enum.map(property_types, fn pt ->
         %{
           "property_type_id" => pt.id,
-          "value" => nil
+          "value" => %{
+            "type" => pt.value_type,
+            "value" => nil,
+            "_union_type" => Atom.to_string(pt.value_type)
+          }
         }
       end)
 
@@ -34,7 +38,9 @@ defmodule MvWeb.MemberLive.FormComponent do
       >
         <.inputs_for :let={f_property} field={@form[:properties]}>
           <% type = Enum.find(@property_types, &(&1.id == f_property[:property_type_id].value)) %>
-          <.input field={f_property[:value]} label={type && type.name} />
+          <.inputs_for :let={value_form} field={f_property[:value]}>
+            <.input field={value_form[:value]} label={type && type.name} />
+          </.inputs_for>
           <input
             type="hidden"
             name={f_property[:property_type_id].name}
@@ -95,12 +101,27 @@ defmodule MvWeb.MemberLive.FormComponent do
           not Enum.member?(existing_properties, Map.get(i, "property_type_id"))
         end
 
+        params = %{
+          "properties" =>
+            Enum.map(member.properties, fn prop ->
+              %{
+                "property_type_id" => prop.property_type_id,
+                "value" => %{
+                  "_union_type" => Atom.to_string(prop.value.type),
+                  "type" => prop.value.type,
+                  "value" => prop.value.value
+                }
+              }
+            end)
+        }
+
         form =
           AshPhoenix.Form.for_update(
             member,
             :update_member,
             api: Mv.Membership,
             as: "member",
+            params: params,
             forms: [auto?: true]
           )