Add correspondent organizations in item edit view

2025-07-04 16:48:26 +00:00 · 2020-06-11 22:10:48 +02:00
parent c6accca0ff
commit a4d60c0d92
3 changed files with 43 additions and 1 deletions
--- a/modules/webapp/src/main/elm/Comp/DetailEdit.elm
+++ b/modules/webapp/src/main/elm/Comp/DetailEdit.elm
@ -196,6 +196,20 @@ update flags msg model =
                    else
                        ( model, Cmd.none, Nothing )

+                OM om ->
+                    let
+                        org =
+                            Comp.OrgForm.getOrg om
+                    in
+                    if Comp.OrgForm.isValid om then
+                        ( { model | submitting = True }
+                        , Api.addCorrOrg flags model.itemId org SubmitResp
+                        , Nothing
+                        )
+
+                    else
+                        ( model, Cmd.none, Nothing )
+
                _ ->
                    Debug.todo "implement"