feat: migration to phoenix 1.8 - merge old live views into new live views

lib/mv_web/live/member_live/form.ex

@@ -7,39 +7,49 @@ defmodule MvWeb.MemberLive.Form do
     <Layouts.app flash={@flash}>
       <.header>
         {@page_title}
-        <:subtitle>Use this form to manage member records in your database.</:subtitle>
+        <:subtitle>
+          {gettext("Use this form to manage member records and their properties.")}
+        </:subtitle>
       </.header>
 
       <.form for={@form} id="member-form" phx-change="validate" phx-submit="save">
-        <.input field={@form[:properties]} type="select" multiple label="Properties" options={[]} />
-        <.input field={@form[:first_name]} type="text" label="First name" /><.input
-          field={@form[:last_name]}
-          type="text"
-          label="Last name"
-        /><.input field={@form[:email]} type="text" label="Email" /><.input
-          field={@form[:birth_date]}
-          type="date"
-          label="Birth date"
-        /><.input field={@form[:paid]} type="checkbox" label="Paid" /><.input
-          field={@form[:phone_number]}
-          type="text"
-          label="Phone number"
-        /><.input field={@form[:join_date]} type="date" label="Join date" /><.input
-          field={@form[:exit_date]}
-          type="date"
-          label="Exit date"
-        /><.input field={@form[:notes]} type="text" label="Notes" /><.input
-          field={@form[:city]}
-          type="text"
-          label="City"
-        /><.input field={@form[:street]} type="text" label="Street" /><.input
-          field={@form[:house_number]}
-          type="text"
-          label="House number"
-        /><.input field={@form[:postal_code]} type="text" label="Postal code" />
+        <.input field={@form[:first_name]} label={gettext("First Name")} required />
+        <.input field={@form[:last_name]} label={gettext("Last Name")} required />
+        <.input field={@form[:email]} label={gettext("Email")} required type="email" />
+        <.input field={@form[:birth_date]} label={gettext("Birth Date")} type="date" />
+        <.input field={@form[:paid]} label={gettext("Paid")} type="checkbox" />
+        <.input field={@form[:phone_number]} label={gettext("Phone Number")} />
+        <.input field={@form[:join_date]} label={gettext("Join Date")} type="date" />
+        <.input field={@form[:exit_date]} label={gettext("Exit Date")} type="date" />
+        <.input field={@form[:notes]} label={gettext("Notes")} />
+        <.input field={@form[:city]} label={gettext("City")} />
+        <.input field={@form[:street]} label={gettext("Street")} />
+        <.input field={@form[:house_number]} label={gettext("House Number")} />
+        <.input field={@form[:postal_code]} label={gettext("Postal Code")} />
 
-        <.button phx-disable-with="Saving..." variant="primary">Save Member</.button>
-        <.button navigate={return_path(@return_to, @member)}>Cancel</.button>
+        <h3 class="mt-8 mb-2 text-lg font-semibold">{gettext("Custom Properties")}</h3>
+        <.inputs_for :let={f_property} field={@form[:properties]}>
+          <% type = Enum.find(@property_types, &(&1.id == f_property[:property_type_id].value)) %>
+          <.inputs_for :let={value_form} field={f_property[:value]}>
+            <% input_type =
+              cond do
+                type && type.value_type == :boolean -> "checkbox"
+                type && type.value_type == :date -> :date
+                true -> :text
+              end %>
+            <.input field={value_form[:value]} label={type && type.name} type={input_type} />
+          </.inputs_for>
+          <input
+            type="hidden"
+            name={f_property[:property_type_id].name}
+            value={f_property[:property_type_id].value}
+          />
+        </.inputs_for>
+
+        <.button phx-disable-with={gettext("Saving...")} variant="primary">
+          {gettext("Save Member")}
+        </.button>
+        <.button navigate={return_path(@return_to, @member)}>{gettext("Cancel")}</.button>
       </.form>
     </Layouts.app>
     """
@@ -47,6 +57,20 @@ defmodule MvWeb.MemberLive.Form do
 
   @impl true
   def mount(params, _session, socket) do
+    {:ok, property_types} = Mv.Membership.list_property_types()
+
+    initial_properties =
+      Enum.map(property_types, fn pt ->
+        %{
+          "property_type_id" => pt.id,
+          "value" => %{
+            "type" => pt.value_type,
+            "value" => nil,
+            "_union_type" => Atom.to_string(pt.value_type)
+          }
+        }
+      end)
+
     member =
       case params["id"] do
         nil -> nil
@@ -59,6 +83,8 @@ defmodule MvWeb.MemberLive.Form do
     {:ok,
      socket
      |> assign(:return_to, return_to(params["return_to"]))
+     |> assign(:property_types, property_types)
+     |> assign(:initial_properties, initial_properties)
      |> assign(member: member)
      |> assign(:page_title, page_title)
      |> assign_form()}
@@ -77,9 +103,16 @@ defmodule MvWeb.MemberLive.Form do
       {:ok, member} ->
         notify_parent({:saved, member})
 
+        action =
+          case socket.assigns.form.source.type do
+            :create -> gettext("create")
+            :update -> gettext("update")
+            other -> to_string(other)
+          end
+
         socket =
           socket
-          |> put_flash(:info, "Member #{socket.assigns.form.source.type}d successfully")
+          |> put_flash(:info, gettext("Member %{action} successfully", action: action))
           |> push_navigate(to: return_path(socket.assigns.return_to, member))
 
         {:noreply, socket}
@@ -94,9 +127,56 @@ defmodule MvWeb.MemberLive.Form do
   defp assign_form(%{assigns: %{member: member}} = socket) do
     form =
       if member do
-        AshPhoenix.Form.for_update(member, :update_member, as: "member")
+        {:ok, member} = Ash.load(member, properties: [:property_type])
+
+        existing_properties =
+          member.properties
+          |> Enum.map(& &1.property_type_id)
+
+        is_missing_property = fn i ->
+          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]
+          )
+
+        missing_properties = Enum.filter(socket.assigns[:initial_properties], is_missing_property)
+
+        Enum.reduce(
+          missing_properties,
+          form,
+          &AshPhoenix.Form.add_form(&2, [:properties], params: &1)
+        )
       else
-        AshPhoenix.Form.for_create(Mv.Membership.Member, :create_member, as: "member")
+        AshPhoenix.Form.for_create(
+          Mv.Membership.Member,
+          :create_member,
+          api: Mv.Membership,
+          as: "member",
+          params: %{"properties" => socket.assigns[:initial_properties]},
+          forms: [auto?: true]
+        )
       end
 
     assign(socket, form: to_form(form))