@flowselections/logistiek-engine 1.0.237 → 1.0.238

package/db/schema/logistiek-engine.sql

@@ -40615,4 +40615,473 @@ BEGIN
   ELSE ok := EXISTS (SELECT 1 FROM pg_attribute WHERE attrelid = 'public.pick_stations'::regclass AND attname = 'system_code' AND NOT attisdropped);
        toelichting := CASE WHEN ok THEN 'aanwezig' ELSE 'ontbreekt: werk Pickschermen bij; tot dan geen standaardstations' END; END IF;
   RETURN NEXT;
-END $function$;
+END $function$;-- Samenvoeggroepen (orderbuffers): geannuleerde/verwijderde orders nooit (meer) in een groep.
+
+CREATE OR REPLACE FUNCTION public.logistics_order_vervallen(p_order_id uuid)
+RETURNS boolean LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v boolean := false;
+BEGIN
+  SELECT (o.deleted_at IS NOT NULL OR o.cancelled_at IS NOT NULL
+          OR lower(btrim(coalesce(o.status, ''))) IN ('geannuleerd', 'cancelled'))
+    INTO v FROM public.orders o WHERE o.id = p_order_id;
+  IF coalesce(v, false) THEN RETURN true; END IF;
+  IF to_regclass('public.voorraad_order_terugdraaiing') IS NOT NULL THEN
+    EXECUTE 'SELECT EXISTS (SELECT 1 FROM public.voorraad_order_terugdraaiing t WHERE t.order_id = $1)'
+      INTO v USING p_order_id;
+  END IF;
+  RETURN coalesce(v, false);
+END $$;
+REVOKE ALL ON FUNCTION public.logistics_order_vervallen(uuid) FROM PUBLIC, anon;
+GRANT EXECUTE ON FUNCTION public.logistics_order_vervallen(uuid) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_order_buffer_excluded(p_order_id uuid)
+ RETURNS boolean
+ LANGUAGE sql
+ STABLE SECURITY DEFINER
+ SET search_path TO 'public'
+AS $function$
+  SELECT public.logistics_acc_guard('server', 'logistics_order_buffer_excluded');
+  SELECT EXISTS (SELECT 1 FROM public.logistics_order_plan_exclusion x WHERE x.order_id = p_order_id)
+      OR public.logistics_order_afgemeld(p_order_id)
+      OR public.logistics_order_vervallen(p_order_id)
+$function$;
+
+CREATE OR REPLACE FUNCTION public._logistics_buffers_vervallen_herstel(p_order_id uuid)
+RETURNS jsonb LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE r record; v_groepen uuid[] := '{}'; v_orders int := 0; v_oud text; v_stand jsonb;
+BEGIN
+  v_oud := current_setting('logistics.buffer_writer', true);
+  FOR r IN
+    SELECT o.id, o.order_number, o.buffer_id,
+           CASE WHEN o.deleted_at IS NOT NULL THEN 'verwijderd' ELSE 'geannuleerd' END AS reden
+      FROM public.orders o
+     WHERE o.buffer_id IS NOT NULL AND (p_order_id IS NULL OR o.id = p_order_id)
+       AND public.logistics_order_vervallen(o.id)
+     ORDER BY o.order_number
+     FOR UPDATE OF o
+  LOOP
+    PERFORM set_config('logistics.buffer_writer', 'engine', true);
+    UPDATE public.orders SET buffer_id = NULL WHERE id = r.id AND buffer_id = r.buffer_id;
+    INSERT INTO public.logistics_correctie_log (correctie, object_id, omschrijving, oud, nieuw)
+    VALUES ('buffers_geannuleerd', r.id, coalesce(r.order_number, r.id::text) || ' (' || r.reden || ') losgemaakt uit samenvoeggroep',
+            jsonb_build_object('buffer_id', r.buffer_id), jsonb_build_object('buffer_id', NULL));
+    v_orders := v_orders + 1;
+    IF NOT r.buffer_id = ANY (v_groepen) THEN v_groepen := v_groepen || r.buffer_id; END IF;
+  END LOOP;
+  PERFORM set_config('logistics.buffer_writer', coalesce(v_oud, ''), true);
+
+  IF cardinality(v_groepen) > 0 THEN
+    FOR r IN SELECT x.id, x.order_number FROM public.orders x
+              WHERE x.buffer_id = ANY (v_groepen) AND x.deleted_at IS NULL AND x.cancelled_at IS NULL LOOP
+      BEGIN
+        PERFORM public.logistics_plan_enqueue(r.id, 'correctie_buffers_geannuleerd');
+      EXCEPTION WHEN others THEN
+        INSERT INTO public.logistics_correctie_log (correctie, object_id, omschrijving)
+        VALUES ('buffers_geannuleerd_fout', r.id, 'Opnieuw plannen van ' || coalesce(r.order_number, r.id::text) || ' mislukt: ' || SQLERRM);
+      END;
+    END LOOP;
+    SELECT value::jsonb INTO v_stand FROM public.logistics_plan_settings WHERE key = 'buffers_geannuleerd_herstel';
+    v_stand := jsonb_build_object(
+      'totaalGroepen', coalesce((v_stand->>'totaalGroepen')::int, 0) + cardinality(v_groepen),
+      'totaalOrders', coalesce((v_stand->>'totaalOrders')::int, 0) + v_orders,
+      'laatsteGroepen', cardinality(v_groepen), 'laatsteOrders', v_orders, 'laatsteOp', now());
+    INSERT INTO public.logistics_plan_settings (key, value) VALUES ('buffers_geannuleerd_herstel', v_stand::text)
+    ON CONFLICT (key) DO UPDATE SET value = EXCLUDED.value, updated_at = now();
+  END IF;
+  RETURN jsonb_build_object('groepen', cardinality(v_groepen), 'orders', v_orders);
+END $$;
+REVOKE ALL ON FUNCTION public._logistics_buffers_vervallen_herstel(uuid) FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public._logistics_buffers_vervallen_herstel(uuid) TO service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_correctie_buffers_geannuleerd(p_uitvoeren boolean DEFAULT false)
+RETURNS TABLE(order_id uuid, order_number text, reden text, buffer_id uuid, actieve_karren integer,
+              andere_open_orders text, uitgevoerd boolean)
+LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public' AS $$
+#variable_conflict use_column
+DECLARE r record;
+BEGIN
+  PERFORM public.logistics_acc_guard('server', 'logistics_correctie_buffers_geannuleerd');
+  FOR r IN
+    SELECT o.id, o.order_number, o.buffer_id,
+           CASE WHEN o.deleted_at IS NOT NULL THEN 'verwijderd' ELSE 'geannuleerd' END AS reden,
+           (SELECT count(*)::int FROM public.order_carts c WHERE c.order_id = o.id AND c.archived_at IS NULL) AS karren,
+           (SELECT string_agg(x.order_number, ' ' ORDER BY x.order_number) FROM public.orders x
+             WHERE x.buffer_id = o.buffer_id AND x.id <> o.id AND x.deleted_at IS NULL AND x.cancelled_at IS NULL) AS anderen
+      FROM public.orders o
+     WHERE o.buffer_id IS NOT NULL AND public.logistics_order_vervallen(o.id)
+     ORDER BY o.order_number
+  LOOP
+    order_id := r.id; order_number := r.order_number; reden := r.reden; buffer_id := r.buffer_id;
+    actieve_karren := r.karren; andere_open_orders := r.anderen; uitgevoerd := p_uitvoeren;
+    RETURN NEXT;
+  END LOOP;
+  IF p_uitvoeren THEN PERFORM public._logistics_buffers_vervallen_herstel(NULL); END IF;
+END $$;
+REVOKE ALL ON FUNCTION public.logistics_correctie_buffers_geannuleerd(boolean) FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public.logistics_correctie_buffers_geannuleerd(boolean) TO service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_orders_vervallen_buffer_trg()
+RETURNS trigger LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public' AS $$
+BEGIN
+  BEGIN
+    PERFORM public._logistics_buffers_vervallen_herstel(NEW.id);
+  EXCEPTION WHEN others THEN
+    BEGIN
+      INSERT INTO public.logistics_correctie_log (correctie, object_id, omschrijving)
+      VALUES ('buffers_geannuleerd_fout', NEW.id, 'Losmaken uit samenvoeggroep mislukt: ' || SQLERRM);
+    EXCEPTION WHEN others THEN RAISE WARNING 'logistics_orders_vervallen_buffer_trg: %', SQLERRM;
+    END;
+  END;
+  RETURN NULL;
+END $$;
+REVOKE ALL ON FUNCTION public.logistics_orders_vervallen_buffer_trg() FROM PUBLIC, anon, authenticated;
+
+DROP TRIGGER IF EXISTS trg_logistics_orders_vervallen_buffer ON public.orders;
+CREATE TRIGGER trg_logistics_orders_vervallen_buffer
+  AFTER UPDATE OF cancelled_at, deleted_at, status, buffer_id ON public.orders
+  FOR EACH ROW
+  WHEN (NEW.buffer_id IS NOT NULL AND (NEW.cancelled_at IS NOT NULL OR NEW.deleted_at IS NOT NULL
+        OR lower(btrim(coalesce(NEW.status, ''))) IN ('geannuleerd', 'cancelled')))
+  EXECUTE FUNCTION public.logistics_orders_vervallen_buffer_trg();
+
+CREATE OR REPLACE FUNCTION public.logistics_terugdraaiing_buffer_trg()
+RETURNS trigger LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public' AS $$
+BEGIN
+  BEGIN
+    PERFORM public._logistics_buffers_vervallen_herstel(NEW.order_id);
+  EXCEPTION WHEN others THEN
+    BEGIN
+      INSERT INTO public.logistics_correctie_log (correctie, object_id, omschrijving)
+      VALUES ('buffers_geannuleerd_fout', NEW.order_id, 'Losmaken uit samenvoeggroep na terugdraaien mislukt: ' || SQLERRM);
+    EXCEPTION WHEN others THEN RAISE WARNING 'logistics_terugdraaiing_buffer_trg: %', SQLERRM;
+    END;
+  END;
+  RETURN NULL;
+END $$;
+REVOKE ALL ON FUNCTION public.logistics_terugdraaiing_buffer_trg() FROM PUBLIC, anon, authenticated;
+
+DO $do$ BEGIN
+  IF to_regclass('public.voorraad_order_terugdraaiing') IS NOT NULL THEN
+    DROP TRIGGER IF EXISTS trg_logistics_terugdraaiing_buffer ON public.voorraad_order_terugdraaiing;
+    CREATE TRIGGER trg_logistics_terugdraaiing_buffer AFTER INSERT ON public.voorraad_order_terugdraaiing
+      FOR EACH ROW EXECUTE FUNCTION public.logistics_terugdraaiing_buffer_trg();
+  END IF;
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_buffers_herstel_status()
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_buffers_herstel_status');
+  RETURN jsonb_build_object(
+    'stand', (SELECT value::jsonb FROM public.logistics_plan_settings WHERE key = 'buffers_geannuleerd_herstel'),
+    'nogInGroep', (SELECT count(*) FROM public.orders o WHERE o.buffer_id IS NOT NULL
+                     AND (o.deleted_at IS NOT NULL OR o.cancelled_at IS NOT NULL)),
+    'fouten', coalesce((SELECT jsonb_agg(jsonb_build_object('op', l.created_at, 'melding', l.omschrijving) ORDER BY l.created_at DESC)
+                          FROM (SELECT * FROM public.logistics_correctie_log WHERE correctie = 'buffers_geannuleerd_fout'
+                                 AND created_at > now() - interval '7 days' ORDER BY created_at DESC LIMIT 5) l), '[]'::jsonb));
+END $$;
+REVOKE ALL ON FUNCTION public.logistics_buffers_herstel_status() FROM PUBLIC, anon;
+GRANT EXECUTE ON FUNCTION public.logistics_buffers_herstel_status() TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_buffers_vervallen()
+RETURNS TABLE(onderdeel text, ok boolean, toelichting text) LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT 'functie ' || f, to_regprocedure('public.' || f) IS NOT NULL,
+         CASE WHEN to_regprocedure('public.' || f) IS NOT NULL THEN 'aanwezig' ELSE 'ontbreekt: werk de Engine bij via Supabase bijwerken' END
+    FROM unnest(ARRAY['logistics_order_vervallen(uuid)', '_logistics_buffers_vervallen_herstel(uuid)',
+                      'logistics_buffers_herstel_status()', 'logistics_orders_vervallen_buffer_trg()']) f
+  UNION ALL
+  SELECT 'trigger trg_logistics_orders_vervallen_buffer',
+         EXISTS (SELECT 1 FROM pg_trigger g WHERE g.tgname = 'trg_logistics_orders_vervallen_buffer' AND g.tgrelid = 'public.orders'::regclass),
+         'Maakt geannuleerde orders los uit hun samenvoeggroep'
+$$;
+REVOKE ALL ON FUNCTION public.logistics_install_check_buffers_vervallen() FROM PUBLIC, anon;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_buffers_vervallen() TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_buffer_frozen(p_buffer uuid)
+ RETURNS boolean
+ LANGUAGE sql
+ STABLE SECURITY DEFINER
+ SET search_path TO 'public'
+AS $function$
+  SELECT public.logistics_acc_guard('server', 'logistics_buffer_frozen');
+  SELECT p_buffer IS NOT NULL AND (
+    EXISTS (SELECT 1 FROM logistics_active.order_carts oc
+             WHERE oc.buffer_id = p_buffer
+               AND (public.logistics_cart_is_frozen(oc.id)
+                    OR EXISTS (SELECT 1 FROM public.logistics_control_scan s WHERE s.cart_id = oc.id AND s.status <> 'geannuleerd')
+                    OR EXISTS (SELECT 1 FROM public.logistics_slip_shipping_note n
+                                WHERE n.cart_id = oc.id AND (n.status IN ('in_printwachtrij','geprint') OR n.fulfillment_order_id IS NOT NULL))))
+    OR EXISTS (SELECT 1 FROM public.orders x
+                WHERE x.buffer_id = p_buffer AND x.deleted_at IS NULL AND x.cancelled_at IS NULL
+                  AND (EXISTS (SELECT 1 FROM public.logistics_control_scan s WHERE s.order_id = x.id AND s.status <> 'geannuleerd')
+                       OR EXISTS (SELECT 1 FROM public.logistics_slip_shipping_note n
+                                   WHERE n.order_id = x.id AND (n.status IN ('in_printwachtrij','geprint') OR n.fulfillment_order_id IS NOT NULL))
+                       OR EXISTS (SELECT 1 FROM public.floriday_status_sync_queue q WHERE q.order_id = x.id AND q.state = 'done')))
+  )
+$function$;
+
+CREATE OR REPLACE FUNCTION public.logistics_buffer_handled(p_buffer uuid)
+ RETURNS boolean
+ LANGUAGE sql
+ STABLE SECURITY DEFINER
+ SET search_path TO 'public'
+AS $function$
+  SELECT public.logistics_acc_guard('ingelogd', 'logistics_buffer_handled');
+  WITH karren AS (
+    SELECT oc.id, oc.cart_number, oc.order_id
+      FROM logistics_active.order_carts oc
+     WHERE oc.buffer_id = p_buffer
+  ), leden AS (
+    SELECT COALESCE(o.order_number, o.id::text) AS ref, o.id
+      FROM public.orders o
+     WHERE o.buffer_id = p_buffer
+       AND o.deleted_at IS NULL AND o.cancelled_at IS NULL
+  ), op_kar AS (
+    SELECT DISTINCT k.id AS cart_id, COALESCE(o.order_number, o.id::text) AS ref
+      FROM karren k
+      JOIN logistics_active.order_cart_items ci ON ci.cart_id = k.id
+      JOIN public.order_items oi ON oi.id = ci.order_item_id
+      JOIN public.orders o ON o.id = oi.order_id AND o.deleted_at IS NULL AND o.cancelled_at IS NULL
+     WHERE k.order_id IS NULL
+  )
+  SELECT EXISTS (SELECT 1 FROM karren)
+     AND NOT EXISTS (
+       SELECT 1 FROM karren k
+        WHERE k.order_id IS NOT NULL
+          AND NOT EXISTS (
+            SELECT 1 FROM leden l
+             WHERE l.id = k.order_id
+               AND public.logistics_cart_handled(l.ref, k.cart_number))
+     )
+     AND NOT EXISTS (
+       SELECT 1 FROM karren k
+        WHERE k.order_id IS NULL
+          AND (
+            NOT EXISTS (SELECT 1 FROM op_kar ok WHERE ok.cart_id = k.id)
+            OR EXISTS (
+              SELECT 1 FROM op_kar ok
+               WHERE ok.cart_id = k.id
+                 AND NOT public.logistics_cart_handled(ok.ref, k.cart_number))
+          )
+     );
+$function$;
+
+CREATE OR REPLACE FUNCTION public.logistics_buffer_open_key(p_base_key text)
+ RETURNS text
+ LANGUAGE plpgsql
+ SECURITY DEFINER
+ SET search_path TO 'public'
+AS $function$
+DECLARE
+  v_try int := 0;
+  v_key text;
+  v_id uuid;
+  v_closed boolean;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_buffer_open_key');
+  IF p_base_key IS NULL OR btrim(p_base_key) = '' THEN
+    RETURN p_base_key;
+  END IF;
+
+  LOOP
+    v_key := CASE WHEN v_try = 0 THEN p_base_key ELSE p_base_key || '#' || v_try END;
+    SELECT id INTO v_id FROM public.order_buffers WHERE buffer_key = v_key;
+    IF v_id IS NULL THEN
+      RETURN v_key;
+    END IF;
+
+    SELECT b.closed_at IS NOT NULL
+           OR (b.close_at IS NOT NULL AND b.close_at <= now())
+           OR public.logistics_buffer_handled(b.id)
+           OR EXISTS (SELECT 1 FROM public.orders x WHERE x.buffer_id = b.id AND x.plan_locked_at IS NOT NULL)
+           OR EXISTS (SELECT 1 FROM public.orders x WHERE x.buffer_id = b.id AND public.logistics_order_vervallen(x.id))
+           OR EXISTS (SELECT 1 FROM logistics_active.order_carts oc
+                       WHERE oc.buffer_id = b.id AND (oc.pickup_locked IS TRUE OR oc.is_complete IS TRUE))
+      INTO v_closed
+      FROM public.order_buffers b WHERE b.id = v_id;
+
+    IF NOT COALESCE(v_closed, false) THEN
+      RETURN v_key;
+    END IF;
+
+    UPDATE public.order_buffers
+       SET closed_at = COALESCE(closed_at, now()), updated_at = now()
+     WHERE id = v_id;
+
+    v_try := v_try + 1;
+    IF v_try > 200 THEN
+      RAISE EXCEPTION 'Geen open orderbuffer beschikbaar voor sleutel %', p_base_key;
+    END IF;
+  END LOOP;
+END;
+$function$;
+
+CREATE OR REPLACE FUNCTION public.logistics_ensure_defaults()
+ RETURNS jsonb
+ LANGUAGE plpgsql
+ SECURITY DEFINER
+ SET search_path TO 'public'
+AS $function$
+DECLARE
+  v_ladingdragers text[] := '{}';
+  v_ladingdrager_velden text[] := '{}';
+  v_vertalingen text[] := '{}';
+  v_instellingen text[] := '{}';
+  v_tijd text := NULL;
+  v_strategie boolean := false;
+  v_meldingen text[] := '{}';
+  v_gewijzigd boolean;
+  v_res jsonb;
+  v_heeft_orders boolean;
+  v_herstel jsonb := NULL;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_ensure_defaults');
+  PERFORM pg_advisory_xact_lock(hashtext('logistics_ensure_defaults'));
+
+  WITH std(code, name, capacity_model, layers, len, wid, max_crates, max_boxes, max_kg, max_cm, mix, sort_order) AS (VALUES
+    ('trolley','Stapelwagen','layered',5,135,56,NULL::int,NULL::int,500::numeric,190,true,10),
+    ('danish_container','Deense container','layered',5,135,56,NULL,NULL,500,190,true,20),
+    ('euro_rolcontainer','Euro-rolcontainer','layered',6,120,80,NULL,NULL,600,200,true,30),
+    ('pallet','Pallet','stacked',4,120,80,NULL,40,800,180,true,40),
+    ('euro_pallet','Euro-pallet','single',1,60,40,1,1,20,40,false,50),
+    ('loose','Geen ladingdrager','none',1,0,0,NULL,NULL,NULL,NULL,false,60)
+  ), ins AS (
+    INSERT INTO public.load_carrier_types (code, name, capacity_model, layers_per_carrier, layer_length_cm, layer_width_cm,
+      max_crates_per_layer, max_boxes, max_weight_kg, max_height_cm, allow_mixing, is_active, is_default, sort_order)
+    SELECT s.code, s.name, s.capacity_model, s.layers, s.len, s.wid, s.max_crates, s.max_boxes, s.max_kg, s.max_cm, s.mix, true,
+           (s.code = 'trolley' AND NOT EXISTS (SELECT 1 FROM public.load_carrier_types d WHERE d.is_default)), s.sort_order
+      FROM std s
+     WHERE NOT EXISTS (SELECT 1 FROM public.load_carrier_types l WHERE l.code = s.code)
+    ON CONFLICT (code) DO NOTHING
+    RETURNING code
+  )
+  SELECT coalesce(array_agg(code ORDER BY code), '{}') INTO v_ladingdragers FROM ins;
+
+  WITH std(code, name, capacity_model, layers, len, wid, max_crates, max_boxes, max_kg, max_cm) AS (VALUES
+    ('trolley','Stapelwagen','layered',5,135,56,NULL::int,NULL::int,500::numeric,190),
+    ('danish_container','Deense container','layered',5,135,56,NULL,NULL,500,190),
+    ('euro_rolcontainer','Euro-rolcontainer','layered',6,120,80,NULL,NULL,600,200),
+    ('pallet','Pallet','stacked',4,120,80,NULL,40,800,180),
+    ('euro_pallet','Euro-pallet','single',1,60,40,1,1,20,40),
+    ('loose','Geen ladingdrager','none',1,0,0,NULL,NULL,NULL,NULL)
+  ), upd AS (
+    UPDATE public.load_carrier_types l SET
+      name = coalesce(nullif(btrim(l.name),''), s.name),
+      capacity_model = coalesce(l.capacity_model, s.capacity_model),
+      layers_per_carrier = coalesce(l.layers_per_carrier, s.layers),
+      layer_length_cm = coalesce(l.layer_length_cm, s.len),
+      layer_width_cm = coalesce(l.layer_width_cm, s.wid),
+      max_crates_per_layer = coalesce(l.max_crates_per_layer, s.max_crates),
+      max_boxes = coalesce(l.max_boxes, s.max_boxes),
+      max_weight_kg = coalesce(l.max_weight_kg, s.max_kg),
+      max_height_cm = coalesce(l.max_height_cm, s.max_cm),
+      updated_at = now()
+      FROM std s
+     WHERE l.code = s.code AND NOT (l.code = ANY(v_ladingdragers))
+       AND ( nullif(btrim(l.name),'') IS NULL
+          OR l.capacity_model IS NULL OR l.layers_per_carrier IS NULL OR l.layer_length_cm IS NULL OR l.layer_width_cm IS NULL
+          OR (l.max_crates_per_layer IS NULL AND s.max_crates IS NOT NULL)
+          OR (l.max_boxes IS NULL AND s.max_boxes IS NOT NULL)
+          OR (l.max_weight_kg IS NULL AND s.max_kg IS NOT NULL)
+          OR (l.max_height_cm IS NULL AND s.max_cm IS NOT NULL))
+    RETURNING l.code
+  )
+  SELECT coalesce(array_agg(code ORDER BY code), '{}') INTO v_ladingdrager_velden FROM upd;
+
+  IF to_regclass('public.logistics_floriday_carrier_map') IS NOT NULL THEN
+    WITH v(f, c) AS (VALUES
+      ('DANISH_TROLLEY','danish_container'), ('DANISH_TROLLEY_NON_CC_RFID','danish_container'),
+      ('DANISH_TROLLEY_WATER_TRAY','danish_container'), ('ONE_THIRD_DANISH_TROLLEY','danish_container'),
+      ('AUCTION_TROLLEY','trolley'),
+      ('EURO_TROLLEY','euro_rolcontainer'), ('WATERING_CONTAINER','euro_rolcontainer'),
+      ('EURO_PALLET','euro_pallet'), ('HT_EURO_PALLET','euro_pallet'),
+      ('PALLET','pallet'), ('BLOCK_PALLET','pallet'), ('IFCO_PALLET','pallet'),
+      ('CHEP_PALLET_BLUE','pallet'), ('CHEP_PALLET_RED','pallet'),
+      ('NONE','loose')
+    ), ins AS (
+      INSERT INTO public.logistics_floriday_carrier_map (floriday_code, carrier_code)
+      SELECT v.f, v.c FROM v
+       WHERE NOT EXISTS (SELECT 1 FROM public.logistics_floriday_carrier_map m WHERE upper(m.floriday_code) = v.f)
+      ON CONFLICT DO NOTHING
+      RETURNING floriday_code
+    )
+    SELECT coalesce(array_agg(floriday_code ORDER BY floriday_code), '{}') INTO v_vertalingen FROM ins;
+  END IF;
+
+  WITH v(k, w) AS (VALUES ('batch_size','10'), ('retention_days','7'), ('kick_debounce_seconds','5')),
+  ins AS (
+    INSERT INTO public.logistics_plan_settings (key, value)
+    SELECT v.k, v.w FROM v WHERE NOT EXISTS (SELECT 1 FROM public.logistics_plan_settings p WHERE p.key = v.k)
+    ON CONFLICT (key) DO NOTHING
+    RETURNING key
+  )
+  SELECT coalesce(array_agg(key ORDER BY key), '{}') INTO v_instellingen FROM ins;
+
+  IF NOT EXISTS (SELECT 1 FROM public.logistics_time_settings) THEN
+    v_heeft_orders := EXISTS (SELECT 1 FROM public.orders);
+    IF v_heeft_orders THEN
+      INSERT INTO public.logistics_time_settings (id, timezone, departure_rule_since, rule_160_since)
+      VALUES (true, 'Europe/Amsterdam', NULL, NULL) ON CONFLICT DO NOTHING;
+      v_tijd := 'aangemaakt zonder ingangsdata (er zijn al orders)';
+    ELSE
+      INSERT INTO public.logistics_time_settings (id, timezone, departure_rule_since, rule_160_since)
+      VALUES (true, 'Europe/Amsterdam', now(), now()) ON CONFLICT DO NOTHING;
+      v_tijd := 'aangemaakt met ingangsdata nu (lege shell)';
+    END IF;
+  END IF;
+
+  IF NOT EXISTS (SELECT 1 FROM public.logistics_strategies) THEN
+    IF auth.uid() IS NULL THEN
+      v_meldingen := array_append(v_meldingen, 'Basisstrategie wordt aangemaakt bij het openen van de Engine door een gebruiker'::text);
+    ELSE
+      WITH s AS (
+        INSERT INTO public.logistics_strategies (name, is_active, user_id)
+        VALUES ('Basisstrategie', true, auth.uid()) RETURNING id
+      )
+      INSERT INTO public.logistics_rule_configs (name, status, is_active, settings, strategy_id, user_id)
+      SELECT 'Werkwijze Basisstrategie', 'actief',
+             NOT EXISTS (SELECT 1 FROM public.logistics_rule_configs r WHERE r.is_active),
+             '{}'::jsonb, s.id, auth.uid() FROM s;
+      v_strategie := true;
+    END IF;
+  END IF;
+  IF NOT EXISTS (SELECT 1 FROM public.logistics_strategies WHERE is_active) THEN
+    v_meldingen := array_append(v_meldingen, 'Geen actieve strategie'::text);
+  END IF;
+
+  IF to_regclass('public.pick_station_types') IS NOT NULL AND NOT EXISTS (SELECT 1 FROM public.pick_station_types) THEN
+    v_meldingen := array_append(v_meldingen, 'Pickstation-soorten leeg (Pickmodule)'::text);
+  END IF;
+  IF to_regclass('public.pick_screen_document_types') IS NOT NULL AND NOT EXISTS (SELECT 1 FROM public.pick_screen_document_types) THEN
+    v_meldingen := array_append(v_meldingen, 'Pickscherm-documentsoorten leeg (Pickmodule)'::text);
+  END IF;
+  IF to_regclass('public.cart_planning_settings') IS NOT NULL AND NOT EXISTS (SELECT 1 FROM public.cart_planning_settings) THEN
+    v_meldingen := array_append(v_meldingen, 'Karplanning-instellingen leeg (Verkoop)'::text);
+  END IF;
+
+  -- Samenvoeggroepen: geannuleerde/verwijderde orders losmaken (herhaalbaar; tweede keer zonder effect).
+  BEGIN
+    v_herstel := public._logistics_buffers_vervallen_herstel(NULL);
+  EXCEPTION WHEN others THEN
+    v_meldingen := array_append(v_meldingen, ('Herstel samenvoeggroepen mislukt: ' || SQLERRM)::text);
+  END;
+
+  v_gewijzigd := cardinality(v_ladingdragers) + cardinality(v_ladingdrager_velden) + cardinality(v_vertalingen)
+                 + cardinality(v_instellingen) > 0 OR v_tijd IS NOT NULL OR v_strategie;
+  v_res := jsonb_build_object(
+    'gewijzigd', v_gewijzigd, 'op', now(),
+    'ladingdragers', to_jsonb(v_ladingdragers),
+    'ladingdrager_velden', to_jsonb(v_ladingdrager_velden),
+    'floriday_vertalingen', to_jsonb(v_vertalingen),
+    'plan_instellingen', to_jsonb(v_instellingen),
+    'tijdinstellingen', v_tijd,
+    'basisstrategie', v_strategie,
+    'meldingen', to_jsonb(v_meldingen),
+    'samenvoeggroepen_hersteld', coalesce((v_herstel->>'groepen')::int, 0));
+
+  IF v_gewijzigd THEN
+    INSERT INTO public.logistics_plan_settings (key, value) VALUES ('defaults_last_result', v_res::text)
+    ON CONFLICT (key) DO UPDATE SET value = EXCLUDED.value, updated_at = now();
+  END IF;
+  RETURN v_res;
+END $function$;

package/dist-lib/components/StandaardgegevensCard.d.ts.map

@@ -1 +1 @@
-{"version":3,"file":"StandaardgegevensCard.d.ts","sourceRoot":"","sources":["../../src/components/StandaardgegevensCard.tsx"],"names":[],"mappings":"AAaA,wBAAgB,qBAAqB,gCA8CpC"}
+{"version":3,"file":"StandaardgegevensCard.d.ts","sourceRoot":"","sources":["../../src/components/StandaardgegevensCard.tsx"],"names":[],"mappings":"AAaA,wBAAgB,qBAAqB,gCA+CpC"}

package/dist-lib/components/StandaardgegevensCard.js

@@ -24,7 +24,7 @@ export function StandaardgegevensCard() {
     const eerder = aangevuldeOnderdelen(laatste);
     const meldingen = Array.isArray(resultaat?.meldingen) ? resultaat.meldingen : [];
     return (_jsxs(Card, { children: [_jsxs(CardHeader, { children: [_jsxs(CardTitle, { className: "flex items-center gap-2 text-base", children: [_jsx(Database, { className: "h-4 w-4" }), " Standaardgegevens", fout ? _jsx(Badge, { variant: "destructive", children: "Controle mislukt" })
-                                : resultaat ? _jsx(Badge, { variant: "secondary", children: nu.length ? "Aangevuld" : "Compleet" }) : null] }), _jsx(CardDescription, { children: "Ladingdragers, Floriday-vertalingen, planinstellingen, tijdinstelling en strategie." })] }), _jsxs(CardContent, { className: "space-y-2 text-sm", children: [fout && _jsxs("p", { className: "text-destructive", children: ["Kon niet controleren: ", fout] }), nu.length > 0 && (_jsxs("div", { children: [_jsx("p", { className: "font-medium", children: "Zojuist aangevuld:" }), _jsx("ul", { className: "list-disc pl-5", children: nu.map((t) => _jsx("li", { children: t }, t)) })] })), nu.length === 0 && eerder.length > 0 && laatste?.op && (_jsxs("div", { children: [_jsxs("p", { className: "text-muted-foreground", children: ["Laatst aangevuld op ", new Date(laatste.op).toLocaleString("nl-NL"), ":"] }), _jsx("ul", { className: "list-disc pl-5 text-muted-foreground", children: eerder.map((t) => _jsx("li", { children: t }, t)) })] })), resultaat && nu.length === 0 && eerder.length === 0 && _jsx("p", { className: "text-muted-foreground", children: "Alle standaardgegevens zijn aanwezig." }), meldingen.map((m) => _jsx("p", { className: "text-destructive", children: m }, m)), _jsx(OnderhoudStatus, {}), _jsx(ProductiebonStatus, {})] })] }));
+                                : resultaat ? _jsx(Badge, { variant: "secondary", children: nu.length ? "Aangevuld" : "Compleet" }) : null] }), _jsx(CardDescription, { children: "Ladingdragers, Floriday-vertalingen, planinstellingen, tijdinstelling en strategie." })] }), _jsxs(CardContent, { className: "space-y-2 text-sm", children: [fout && _jsxs("p", { className: "text-destructive", children: ["Kon niet controleren: ", fout] }), nu.length > 0 && (_jsxs("div", { children: [_jsx("p", { className: "font-medium", children: "Zojuist aangevuld:" }), _jsx("ul", { className: "list-disc pl-5", children: nu.map((t) => _jsx("li", { children: t }, t)) })] })), nu.length === 0 && eerder.length > 0 && laatste?.op && (_jsxs("div", { children: [_jsxs("p", { className: "text-muted-foreground", children: ["Laatst aangevuld op ", new Date(laatste.op).toLocaleString("nl-NL"), ":"] }), _jsx("ul", { className: "list-disc pl-5 text-muted-foreground", children: eerder.map((t) => _jsx("li", { children: t }, t)) })] })), resultaat && nu.length === 0 && eerder.length === 0 && _jsx("p", { className: "text-muted-foreground", children: "Alle standaardgegevens zijn aanwezig." }), meldingen.map((m) => _jsx("p", { className: "text-destructive", children: m }, m)), _jsx(OnderhoudStatus, {}), _jsx(ProductiebonStatus, {}), _jsx(SamenvoeggroepenStatus, {})] })] }));
 }
 // 1.0.228: wachtrij per status, oudste trace-regel en laatste opruimronde.
 function OnderhoudStatus() {
@@ -40,6 +40,30 @@ function OnderhoudStatus() {
     const prune = o.laatsteOpruimronde;
     return (_jsxs("div", { className: "border-t pt-2 text-muted-foreground", children: [_jsx("p", { className: "font-medium text-foreground", children: "Onderhoud" }), _jsxs("p", { children: ["Wachtrij: ", wachtrij.length ? wachtrij.map(([s, n]) => `${s} ${n}`).join(" · ") : "leeg"] }), _jsxs("p", { children: ["Oudste trace-regel: ", o.oudsteTrace ? new Date(o.oudsteTrace).toLocaleString("nl-NL") : "geen"] }), _jsxs("p", { children: ["Laatste opruimronde: ", prune?.op ? `${new Date(prune.op).toLocaleString("nl-NL")} (${prune.verwijderd ?? 0} verwijderd)` : "nog niet"] })] }));
 }
+// Geannuleerde/verwijderde orders die uit een samenvoeggroep zijn gehaald.
+function SamenvoeggroepenStatus() {
+    const [info, setInfo] = useState(null);
+    const [fout, setFout] = useState(null);
+    useEffect(() => {
+        supabase.rpc("logistics_buffers_herstel_status").then(({ data, error }) => {
+            if (error) {
+                console.error("logistics_buffers_herstel_status", error);
+                setFout(error.message);
+                return;
+            }
+            setInfo(data && typeof data === "object" ? data : null);
+        });
+    }, []);
+    if (fout)
+        return _jsx("p", { className: "text-destructive", children: "Samenvoeggroepen: status kon niet worden gelezen." });
+    if (!info)
+        return null;
+    const fouten = Array.isArray(info.fouten) ? info.fouten : [];
+    const groepen = info.stand?.totaalGroepen ?? 0;
+    return (_jsxs("div", { className: "border-t pt-2", children: [_jsx("p", { className: "font-medium", children: "Samenvoeggroepen" }), _jsx("p", { className: "text-muted-foreground", children: groepen > 0
+                    ? `${groepen} groep(en) hersteld: ${info.stand?.totaalOrders ?? 0} geannuleerde of verwijderde order(s) eruit gehaald${info.stand?.laatsteOp ? ` (laatst ${formatDatumTijd(info.stand.laatsteOp)})` : ""}.`
+                    : "Geen groepen met geannuleerde orders gevonden." }), (info.nogInGroep ?? 0) > 0 && (_jsxs("p", { className: "text-destructive", children: ["Nog ", info.nogInGroep, " geannuleerde order(s) in een groep."] })), fouten.map((f, i) => (_jsxs("p", { className: "text-destructive", children: [formatDatumTijd(f.op), ": ", f.melding] }, i)))] }));
+}
 function ProductiebonStatus() {
     const [info, setInfo] = useState(null);
     const [fout, setFout] = useState(null);