@flowselections/logistiek-engine 1.0.203 → 1.0.206

package/db/schema/logistiek-engine.sql

@@ -35256,3 +35256,572 @@ RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE sql STABLE SECURITY D
   UNION ALL SELECT 'productoordeel', to_regprocedure('public.logistics_product_oordeel_many(uuid[])') IS NOT NULL, 'Oordeel per product voor het orderformulier'
 $$;
 GRANT EXECUTE ON FUNCTION public.logistics_install_check_201b() TO authenticated, service_role;
+
+-- ============================================================================
+-- 1.0.204: capaciteit gemengde kar, vastzetten na vastliggen, geenIndeling.regels, productoordeel met gekozen belading
+-- ============================================================================
+-- 1.0.204: capaciteit gemengde kar, vastzetten na vastliggen, geenIndeling.regels, productoordeel met gekozen belading.
+
+-- Kern (geen guard, SECURITY INVOKER): capaciteit en lagen van één kar.
+CREATE OR REPLACE FUNCTION public.logistics_cart_capaciteit_core(p_cart_id uuid)
+RETURNS jsonb LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  WITH c AS (SELECT oc.cart_number, oc.total_layers_used, oc.max_layers FROM logistics_active.order_carts oc WHERE oc.id = p_cart_id),
+  i AS (SELECT count(*) n, count(*) FILTER (WHERE coalesce(ci.crates_per_layer, 0) > 0) ncpl,
+               sum(ci.crates::numeric / nullif(ci.crates_per_layer, 0)) lagen, max(nullif(ci.layers_per_cart, 0)) lpc
+          FROM logistics_active.order_cart_items ci WHERE ci.cart_id = p_cart_id),
+  v AS (SELECT c.cart_number,
+               CASE WHEN i.n > 0 AND i.n = i.ncpl THEN round(i.lagen, 2) ELSE c.total_layers_used::numeric END lagen,
+               coalesce(i.lpc::numeric, nullif(c.max_layers, 0)::numeric) cap,
+               CASE WHEN i.lpc IS NOT NULL THEN 'product' WHEN coalesce(c.max_layers, 0) > 0 THEN 'ladingdrager' END bron
+          FROM c, i)
+  SELECT jsonb_build_object('layersUsed', v.lagen, 'maxLayers', v.cap, 'capaciteitBron', v.bron,
+           'vulgraadPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END,
+           'layerUtilizationPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END)
+         || public.logistics_kar_blokkade(v.cart_number::text, v.lagen, v.cap)
+    FROM v
+$$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_platen_verrijk(p_cart jsonb)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v_id uuid; k jsonb; c jsonb := p_cart; v_l numeric;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_cart_platen_verrijk');
+  BEGIN v_id := nullif(coalesce(p_cart->>'cartId', p_cart->>'cart_id'), '')::uuid; EXCEPTION WHEN invalid_text_representation THEN v_id := NULL; END;
+  IF v_id IS NOT NULL THEN k := public.logistics_cart_capaciteit_core(v_id); END IF;
+  IF k IS NOT NULL THEN
+    c := c || jsonb_build_object('layersUsed', k->'layersUsed', 'maxLayers', k->'maxLayers', 'capaciteitBron', k->'capaciteitBron',
+                                 'vulgraadPct', k->'vulgraadPct', 'layerUtilizationPct', k->'layerUtilizationPct');
+  END IF;
+  v_l := nullif(c->>'layersUsed', '')::numeric;
+  RETURN c || jsonb_build_object(
+    'additionalLayers', public.logistics_extra_platen(v_l),
+    'ladingdragerTekst', public.logistics_ladingdrager_tekst(c->>'carrierType', v_l,
+        coalesce(nullif(c->>'vulgraadPct', '')::numeric, nullif(c->>'layerUtilizationPct', '')::numeric, nullif(c->>'occupancyPct', '')::numeric)))
+    || public.logistics_kar_blokkade(coalesce(c->>'cartNumber', c->>'cart_number', c->>'seq'), v_l, nullif(c->>'maxLayers', '')::numeric);
+END $$;
+
+-- Te hoge karren: alleen karren met eigen regels van de order.
+CREATE OR REPLACE FUNCTION public.logistics_order_te_hoge_karren(p_order_ids uuid[])
+RETURNS TABLE(order_id uuid, cart_id uuid, cart_number integer, lagen numeric, max_lagen numeric, blokkade jsonb)
+LANGUAGE plpgsql STABLE SET search_path TO 'public' AS $$
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_order_te_hoge_karren');
+  RETURN QUERY
+  SELECT x.order_id, x.cart_id, x.nr, (x.k->>'layersUsed')::numeric, (x.k->>'maxLayers')::numeric,
+         public.logistics_kar_blokkade(x.nr::text, (x.k->>'layersUsed')::numeric, (x.k->>'maxLayers')::numeric)->'blokkade'
+    FROM (SELECT u.order_id, u.cart_id, coalesce(u.display_seq, u.cart_number) nr, public.logistics_cart_capaciteit_core(u.cart_id) k
+            FROM public.logistics_order_unit_carts_core(p_order_ids) u
+           WHERE EXISTS (SELECT 1 FROM logistics_active.order_cart_items ci JOIN public.order_items oi ON oi.id = ci.order_item_id
+                          WHERE ci.cart_id = u.cart_id AND oi.order_id = u.order_id)) x
+   WHERE coalesce((x.k->>'teHoog')::boolean, false);
+END $$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_te_hoog(p_cart_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE k jsonb;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_cart_te_hoog');
+  k := public.logistics_cart_capaciteit_core(p_cart_id);
+  IF k IS NULL THEN RETURN jsonb_build_object('teHoog', false, 'blokkade', NULL); END IF;
+  RETURN jsonb_build_object('teHoog', k->'teHoog', 'blokkade', k->'blokkade');
+END $$;
+
+-- Korte zinnen uit een redentekst.
+CREATE OR REPLACE FUNCTION public.logistics_tekst_regels(p_tekst text)
+RETURNS jsonb LANGUAGE sql IMMUTABLE SET search_path TO 'public' AS $$
+  SELECT coalesce(jsonb_agg(z ORDER BY o), '[]'::jsonb)
+    FROM (SELECT btrim(regexp_replace(s, '[;\s]+$', '')) z, o
+            FROM regexp_split_to_table(coalesce(p_tekst, ''), '(?<=[.;])\s+') WITH ORDINALITY t(s, o)) q
+   WHERE z <> ''
+$$;
+
+-- Vastliggend (geprint/gescand/in pick), zonder guard: alleen voor gebruik in bewaakte functies.
+CREATE OR REPLACE FUNCTION public.logistics_cart_vast_core(p_cart_id uuid)
+RETURNS boolean LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  SELECT p_cart_id IS NOT NULL AND (
+    EXISTS (SELECT 1 FROM public.print_jobs pj
+             WHERE pj.payload->>'cart_id' = p_cart_id::text AND pj.documenttype = 'pakbon'
+               AND coalesce(pj.is_herprint, false) = false AND pj.status IN ('wachtend', 'bezig', 'voltooid')
+               AND coalesce(pj.foutcode, '') NOT IN ('verlopen', 'expired')
+               AND coalesce(pj.verwerkingsfase, '') NOT IN ('verlopen', 'expired'))
+    OR EXISTS (SELECT 1 FROM public.cart_control_items ci WHERE ci.cart_number_id = p_cart_id)
+    OR EXISTS (SELECT 1 FROM public.pick_queue q WHERE q.cancelled_at IS NULL
+                AND jsonb_typeof(q.printed_cart_ids) = 'array' AND q.printed_cart_ids ? p_cart_id::text))
+$$;
+
+-- Karindeling verouderd: vastgezette belading wijkt af van wat op de karren staat.
+CREATE OR REPLACE FUNCTION public.logistics_order_indeling_verouderd_core(p_order_id uuid)
+RETURNS jsonb LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  WITH a AS (
+    SELECT oi.id, coalesce(oi.product_name, 'regel') naam, ci.cart_id,
+           (oi.plants_per_crate IS DISTINCT FROM ci.plants_per_crate
+            OR oi.crates_per_layer IS DISTINCT FROM ci.crates_per_layer
+            OR oi.layers_per_cart IS DISTINCT FROM ci.layers_per_cart) afwijkend
+      FROM public.order_items oi
+      JOIN logistics_active.order_cart_items ci ON ci.order_item_id = oi.id
+     WHERE oi.order_id = p_order_id AND oi.packing_locked_at IS NOT NULL)
+  SELECT CASE WHEN bool_or(afwijkend) THEN jsonb_build_object(
+           'verouderd', true,
+           'producten', to_jsonb(array_agg(DISTINCT naam) FILTER (WHERE afwijkend)),
+           'vastliggendeKarren', (SELECT count(DISTINCT a2.cart_id) FROM a a2 WHERE public.logistics_cart_vast_core(a2.cart_id)),
+           'tekst', 'De belading is gewijzigd, maar de karindeling is nog oud. Deel de niet-geprinte karren opnieuw in.')
+         ELSE NULL END
+    FROM a
+$$;
+
+-- geenIndeling met korte zinnen.
+CREATE OR REPLACE FUNCTION public.logistics_order_geen_indeling_core(p_order_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE o record; q record; d record; t record; v_code text; v_tekst text; v_soort text; v_actie text;
+  c_beheer constant text := '/logistiek-engine/beheer';
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_order_geen_indeling_core');
+  SELECT id, order_number, buffer_id INTO o FROM public.orders WHERE id = p_order_id;
+  IF NOT FOUND THEN RETURN NULL; END IF;
+  SELECT * INTO t FROM public.logistics_order_te_hoge_karren(ARRAY[p_order_id]) ORDER BY cart_number LIMIT 1;
+  IF FOUND THEN
+    v_code := 'kar_te_hoog'; v_tekst := t.blokkade->>'tekst'; v_actie := 'belading_aanpassen';
+  ELSE
+    SELECT status, reason, reason_code INTO q FROM public.logistics_plan_queue
+     WHERE order_id = p_order_id ORDER BY updated_at DESC NULLS LAST LIMIT 1;
+    IF FOUND AND q.status = 'geblokkeerd' THEN
+      v_code := coalesce(q.reason_code, 'geblokkeerd'); v_tekst := q.reason;
+    ELSE
+      SELECT dd.result, dd.explanation, dd.input_snapshot INTO d
+        FROM public.logistics_decisions dd
+       WHERE dd.slot = 'beladingindeling'
+         AND ((dd.subject_type = 'order' AND dd.subject_id = o.id::text)
+              OR (dd.subject_type = 'buffer' AND o.buffer_id IS NOT NULL AND dd.subject_id = o.buffer_id::text)
+              OR (o.order_number IS NOT NULL AND coalesce(dd.input_snapshot->'members', '[]'::jsonb) ? o.order_number))
+       ORDER BY dd.created_at DESC LIMIT 1;
+      IF FOUND AND coalesce((d.result->>'blocked')::boolean, false) THEN
+        v_code := coalesce(d.result->>'reason_code', 'geblokkeerd'); v_tekst := d.explanation;
+        v_soort := d.input_snapshot->>'soort';
+      ELSIF q.status IN ('pending', 'running') THEN
+        v_code := 'wacht_op_indeling'; v_tekst := 'De karindeling wordt gemaakt; dit duurt meestal enkele seconden.';
+      ELSE
+        v_code := 'onbekend';
+        v_tekst := 'Er is nog geen karindeling en er is geen blokkade vastgelegd. De minuutronde probeert het opnieuw; blijft dit staan, meld het aan beheer.';
+      END IF;
+    END IF;
+    IF v_code LIKE 'belading%' OR v_code = 'ladingdrager_niet_in_beheer' THEN v_actie := 'belading_aanpassen'; END IF;
+  END IF;
+  v_tekst := coalesce(nullif(btrim(v_tekst), ''), 'Geen indeling; de reden is niet bekend.');
+  RETURN jsonb_build_object('code', v_code, 'soort', v_soort, 'tekst', v_tekst,
+    'regels', public.logistics_tekst_regels(v_tekst),
+    'actie', coalesce(v_actie, 'beheer'),
+    'actieLabel', CASE WHEN v_actie IS NOT NULL THEN 'Belading aanpassen' ELSE 'Naar Engine-beheer' END,
+    'actieUrl', CASE WHEN v_actie IS NOT NULL THEN c_beheer || '#gegevens-voor-karindeling' ELSE c_beheer END);
+END $$;
+
+-- Coverage: per kar capaciteit uit de producten, één vulgraad; indelingVerouderd op orderniveau.
+CREATE OR REPLACE FUNCTION public.logistics_order_plan_coverage(p_order_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE b jsonb; x jsonb; v_hoog boolean;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_order_plan_coverage');
+  b := public.logistics_order_plan_coverage_v165(p_order_id);
+  x := public.logistics_order_external_state(p_order_id);
+  IF jsonb_typeof(b->'carts') = 'array' THEN
+    b := b || jsonb_build_object('carts', (
+      SELECT coalesce(jsonb_agg(
+        CASE WHEN c.id IS NULL THEN t.e || jsonb_build_object('additionalLayers', NULL, 'layersUsed', NULL, 'teHoog', false, 'blokkade', NULL,
+                                                              'capaciteitBron', NULL, 'vulgraadPct', NULL)
+             ELSE public.logistics_cart_platen_verrijk(t.e || jsonb_build_object('occupancyPct', c.occupancy_pct)) END
+        ORDER BY t.o), '[]'::jsonb)
+        FROM jsonb_array_elements(b->'carts') WITH ORDINALITY t(e, o)
+        LEFT JOIN logistics_active.order_carts c ON c.id::text = t.e->>'cartId'));
+  END IF;
+  IF x IS NOT NULL AND (x->>'full')::boolean THEN
+    b := b || jsonb_build_object('state', 'afgehandeld_extern', 'label', 'Afgehandeld in Floriday',
+                                 'reason', 'De order is in Floriday afgehandeld; de Engine plant en print er niets meer voor.');
+  END IF;
+  v_hoog := EXISTS (SELECT 1 FROM public.logistics_order_te_hoge_karren(ARRAY[p_order_id]));
+  IF v_hoog AND b->>'state' IS DISTINCT FROM 'afgehandeld_extern' THEN
+    b := b || jsonb_build_object('label', 'Ingedeeld — kar te hoog');
+  END IF;
+  b := b || jsonb_build_object('geenIndeling',
+         CASE WHEN b->>'state' IN ('geen_indeling', 'deels') OR (v_hoog AND b->>'state' IS DISTINCT FROM 'afgehandeld_extern')
+              THEN public.logistics_order_geen_indeling_core(p_order_id) END,
+         'indelingVerouderd', public.logistics_order_indeling_verouderd_core(p_order_id));
+  RETURN b || jsonb_build_object('externalFulfilled', x);
+END $$;
+
+-- Vastzet-voorvertoning: meldt vastliggende karren en de mogelijke actie.
+DO $do$ BEGIN
+  IF to_regprocedure('public.logistics_belading_vastzet_preview_v201(uuid,jsonb)') IS NULL THEN
+    EXECUTE replace(pg_get_functiondef('public.logistics_belading_vastzet_preview(uuid,jsonb)'::regprocedure),
+                    'public.logistics_belading_vastzet_preview(', 'public.logistics_belading_vastzet_preview_v201(');
+  END IF;
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_belading_vastzet_preview(p_order_item_id uuid, p_wijziging jsonb)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE pv jsonb; v_order uuid; v_vast int; v_totaal int; v_tekst text;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_belading_vastzet_preview');
+  pv := public.logistics_belading_vastzet_preview_v201(p_order_item_id, p_wijziging);
+  SELECT order_id INTO v_order FROM public.order_items WHERE id = p_order_item_id;
+  SELECT count(DISTINCT u.cart_id), count(DISTINCT u.cart_id) FILTER (WHERE public.logistics_cart_vast_core(u.cart_id))
+    INTO v_totaal, v_vast FROM public.logistics_order_unit_carts_core(ARRAY[v_order]) u;
+  IF coalesce(v_vast, 0) > 0 THEN
+    v_tekst := format('%s van %s kar(ren) zijn al geprint of in pick; de nieuwe belading geldt pas na herindelen. Herindelen verandert alleen de niet-geprinte karren.',
+                      v_vast, v_totaal);
+    pv := pv || jsonb_build_object('tekst', (pv->>'tekst') || ' ' || v_tekst, 'bevestigingNodig', true);
+  END IF;
+  RETURN pv || jsonb_build_object('vastliggendeKarren', coalesce(v_vast, 0), 'karrenTotaal', coalesce(v_totaal, 0),
+    'vastliggendTekst', v_tekst,
+    'acties', CASE WHEN coalesce(v_vast, 0) > 0
+                   THEN jsonb_build_array(jsonb_build_object('actie', 'herindelen_niet_geprint', 'label', 'Niet-geprinte karren opnieuw indelen',
+                                                             'rpc', 'logistics_order_herindelen'))
+                   ELSE '[]'::jsonb END);
+END $$;
+
+-- Herindelen van de niet-geprinte karren (vastliggende karren blijven staan).
+CREATE OR REPLACE FUNCTION public.logistics_order_herindelen(p_order_id uuid)
+RETURNS jsonb LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v_vast int;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_order_herindelen');
+  IF auth.uid() IS NULL AND NOT public._scan_is_server() THEN RAISE EXCEPTION 'niet ingelogd'; END IF;
+  IF NOT EXISTS (SELECT 1 FROM public.orders WHERE id = p_order_id) THEN RAISE EXCEPTION 'Order niet gevonden.'; END IF;
+  SELECT count(DISTINCT u.cart_id) FILTER (WHERE public.logistics_cart_vast_core(u.cart_id)) INTO v_vast
+    FROM public.logistics_order_unit_carts_core(ARRAY[p_order_id]) u;
+  PERFORM public.logistics_plan_enqueue(p_order_id, 'belading gewijzigd: niet-geprinte karren opnieuw indelen');
+  RETURN jsonb_build_object('ok', true, 'vastliggendeKarren', coalesce(v_vast, 0),
+    'tekst', CASE WHEN coalesce(v_vast, 0) > 0 THEN format('Herindeling gestart; %s vastliggende kar(ren) blijven staan.', v_vast)
+                  ELSE 'Herindeling gestart.' END);
+END $$;
+
+-- Productoordeel met de gekozen belading per regel (zelfde fysieke regel als Beheer).
+CREATE OR REPLACE FUNCTION public.logistics_product_oordeel_belading(p_regels jsonb)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE e jsonb; g record; c record; v_def text; v_code text; ids uuid[]; uit jsonb := '[]'::jsonb;
+  ls int; fh numeric; ph numeric; cpl numeric; lpc numeric; ppc numeric; laag numeric; naam text;
+  blok text[]; waar text[]; mist text[]; hmist text[]; v_pid uuid; v_oordeel text; v_tekst text;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_product_oordeel_belading');
+  IF p_regels IS NULL OR jsonb_typeof(p_regels) <> 'array' THEN RAISE EXCEPTION 'p_regels moet een lijst zijn.' USING ERRCODE = '22023'; END IF;
+  IF jsonb_array_length(p_regels) > 1000 THEN
+    RAISE EXCEPTION 'Maximaal 1000 regels per aanroep (ontvangen: %).', jsonb_array_length(p_regels) USING ERRCODE = '22023';
+  END IF;
+  SELECT array_agg(DISTINCT (x->>'product_id')::uuid) INTO ids FROM jsonb_array_elements(p_regels) x WHERE nullif(x->>'product_id', '') IS NOT NULL;
+  CREATE TEMP TABLE IF NOT EXISTS _oordeel_g ON COMMIT DROP AS SELECT * FROM public.logistics_data_gereedheid(ARRAY[]::uuid[]) LIMIT 0;
+  DELETE FROM _oordeel_g WHERE true;
+  IF ids IS NOT NULL THEN INSERT INTO _oordeel_g SELECT * FROM public.logistics_data_gereedheid(ids); END IF;
+  SELECT nullif(btrim(coalesce(s.settings->'karrenindeling'->'fields'->>'default_carrier_type', s.settings->'karrenindeling'->>'default_carrier_type')), '')
+    INTO v_def FROM public.logistics_rule_configs s WHERE s.is_active ORDER BY s.updated_at DESC LIMIT 1;
+
+  FOR e IN SELECT x FROM jsonb_array_elements(p_regels) x LOOP
+    blok := '{}'; waar := '{}'; mist := '{}'; hmist := '{}';
+    v_pid := nullif(e->>'product_id', '')::uuid;
+    SELECT * INTO g FROM _oordeel_g WHERE product_id = v_pid;
+    v_code := coalesce(nullif(btrim(e->>'carrier_code'), ''), v_def);
+    SELECT t.code, t.name, t.layer_length_cm, t.layer_width_cm, t.max_height_cm, t.max_crates_per_layer, t.layers_per_carrier INTO c
+      FROM public.load_carrier_types t
+     WHERE t.is_active AND (t.code = v_code OR (v_code IS NULL AND t.is_default))
+     ORDER BY (t.code = v_code) DESC NULLS LAST LIMIT 1;
+    naam := coalesce(c.name, c.code, 'de ladingdrager');
+    ppc := nullif(e->>'plants_per_crate', '')::numeric;
+    cpl := nullif(e->>'crates_per_layer', '')::numeric;
+    lpc := nullif(e->>'layers_per_cart', '')::numeric;
+    IF coalesce(ppc, 0) <= 0 THEN mist := mist || 'planten per fust'::text; END IF;
+    IF coalesce(cpl, 0) <= 0 THEN mist := mist || 'fusten per laag'::text; END IF;
+    IF coalesce(lpc, 0) <= 0 THEN mist := mist || 'lagen per kar'::text; END IF;
+    IF v_code IS NOT NULL AND c.code IS NULL THEN blok := blok || format('ladingdrager %s staat niet in Beheer', v_code); END IF;
+    IF g.product_id IS NULL THEN
+      mist := mist || 'product onbekend'::text;
+    ELSE
+      fh := nullif(g.velden->'fust_height_mm'->>'waarde', '')::numeric / 10.0;
+      ph := nullif(g.velden->'plant_height_cm'->>'waarde', '')::numeric;
+      ls := public.logistics_max_fusten_per_laag(c.layer_length_cm, c.layer_width_cm,
+              nullif(g.velden->'fust_length_mm'->>'waarde', '')::numeric / 10.0, nullif(g.velden->'fust_width_mm'->>'waarde', '')::numeric / 10.0);
+      IF coalesce(lpc,0) > 0 AND coalesce(fh,0) > 0 AND coalesce(ph,0) > 0 AND coalesce(c.max_height_cm,0) > 0 THEN
+        laag := greatest(fh, ph);
+        IF lpc * laag > c.max_height_cm + 1e-9 THEN
+          blok := blok || format('%s lagen × %s cm = %s cm, terwijl %s %s cm hoog is; er passen maximaal %s lagen',
+            lpc, trim_scale(round(laag,1)), trim_scale(round(lpc*laag,1)), naam, trim_scale(round(c.max_height_cm::numeric,1)), floor(c.max_height_cm / laag));
+        END IF;
+      ELSE
+        IF coalesce(fh,0) <= 0 THEN hmist := hmist || 'fusthoogte'::text; END IF;
+        IF coalesce(ph,0) <= 0 THEN hmist := hmist || 'planthoogte'::text; END IF;
+        IF coalesce(c.max_height_cm,0) <= 0 THEN hmist := hmist || ('hoogte van ' || naam); END IF;
+      END IF;
+      IF ls IS NOT NULL AND coalesce(cpl,0) > ls THEN
+        blok := blok || format('%s fust per laag, maar op een laag van %s passen er maximaal %s', cpl, naam, ls);
+      END IF;
+      IF coalesce(c.max_crates_per_layer,0) > 0 AND coalesce(cpl,0) > c.max_crates_per_layer THEN
+        blok := blok || format('%s fust per laag, maar %s staat maximaal %s fust per laag toe', cpl, naam, c.max_crates_per_layer);
+      END IF;
+      IF cardinality(blok) = 0 AND cardinality(hmist) > 0 AND coalesce(c.layers_per_carrier,0) > 0 AND coalesce(lpc,0) > c.layers_per_carrier THEN
+        waar := waar || format('%s lagen opgegeven, standaard %s; niet te controleren omdat de %s ontbreekt', lpc, c.layers_per_carrier, array_to_string(hmist, ', '));
+      END IF;
+      IF 'weight' = ANY(coalesce(g.ontbrekend, '{}')) THEN waar := waar || 'gewicht per fust ontbreekt'::text; END IF;
+    END IF;
+    IF cardinality(blok) > 0 THEN
+      v_oordeel := 'onmogelijk'; v_tekst := format('%s past niet op %s.', coalesce(g.product, 'Product'), naam);
+    ELSIF cardinality(mist) > 0 THEN
+      v_oordeel := 'mist_gegevens'; v_tekst := format('%s: %s ontbreekt.', coalesce(g.product, 'Product'), array_to_string(mist, ', '));
+    ELSIF cardinality(waar) > 0 THEN
+      v_oordeel := 'waarschuwing'; v_tekst := format('%s: belading mogelijk, met waarschuwing.', g.product);
+    ELSE
+      v_oordeel := 'compleet'; v_tekst := format('%s: belading past.', g.product);
+    END IF;
+    uit := uit || jsonb_build_array(jsonb_build_object('product_id', v_pid, 'oordeel', v_oordeel, 'tekst', v_tekst,
+      'regels', to_jsonb(ARRAY(SELECT upper(left(z,1)) || substr(z,2) || '.' FROM unnest(blok || mist || waar) z))));
+  END LOOP;
+  RETURN uit;
+END $$;
+
+GRANT EXECUTE ON FUNCTION public.logistics_cart_capaciteit_core(uuid) TO authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_cart_vast_core(uuid) TO service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_order_indeling_verouderd_core(uuid) TO service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_tekst_regels(text) TO authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_order_herindelen(uuid) TO authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_product_oordeel_belading(jsonb) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_204()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT 'capaciteit gemengde kar', to_regprocedure('public.logistics_cart_capaciteit_core(uuid)') IS NOT NULL, 'Capaciteit = hoogste lagen per kar van de producten'
+  UNION ALL SELECT 'te hoog per kar', position('oi.order_id = u.order_id' IN pg_get_functiondef('public.logistics_order_te_hoge_karren(uuid[])'::regprocedure)) > 0, 'Alleen karren met eigen regels'
+  UNION ALL SELECT 'indeling verouderd', position('indelingVerouderd' IN pg_get_functiondef('public.logistics_order_plan_coverage(uuid)'::regprocedure)) > 0, 'Coverage meldt verouderde indeling'
+  UNION ALL SELECT 'vastzet vastliggend', position('vastliggendeKarren' IN pg_get_functiondef('public.logistics_belading_vastzet_preview(uuid,jsonb)'::regprocedure)) > 0, 'Voorvertoning meldt vastliggende karren'
+  UNION ALL SELECT 'geenIndeling.regels', position('logistics_tekst_regels' IN pg_get_functiondef('public.logistics_order_geen_indeling_core(uuid)'::regprocedure)) > 0, 'Reden in korte zinnen'
+  UNION ALL SELECT 'productoordeel belading', to_regprocedure('public.logistics_product_oordeel_belading(jsonb)') IS NOT NULL, 'Oordeel met gekozen belading (Verkoop)'
+  UNION ALL SELECT 'guards 1.0.204', position('logistics_acc_guard' IN pg_get_functiondef('public.logistics_order_herindelen(uuid)'::regprocedure)) > 0
+             AND position('logistics_acc_guard' IN pg_get_functiondef('public.logistics_product_oordeel_belading(jsonb)'::regprocedure)) > 0, 'Nieuwe functies controleren de aanroeper'
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_204() TO authenticated, service_role;
+-- 1.0.204: tekst_regels zonder lookbehind
+CREATE OR REPLACE FUNCTION public.logistics_tekst_regels(p_tekst text)
+RETURNS jsonb LANGUAGE sql IMMUTABLE SET search_path TO 'public' AS $$
+  SELECT coalesce(jsonb_agg(z || CASE WHEN z ~ '[.!?]$' THEN '' ELSE '.' END ORDER BY o), '[]'::jsonb)
+    FROM (SELECT btrim(s) z, o FROM regexp_split_to_table(coalesce(p_tekst, ''), '[.;]\s+') WITH ORDINALITY t(s, o)) q
+   WHERE z <> ''
+$$;
+
+-- ===== 1.0.204 vervolg: menging per laag, printer verzendbrief =====
+-- 1.0.204 vervolg: menging per laag in de capaciteitsberekening; printer van de volgende verzendbrief.
+
+CREATE OR REPLACE FUNCTION public.logistics_laag_menging_core()
+RETURNS jsonb LANGUAGE plpgsql STABLE SET search_path TO 'public' AS $$
+DECLARE k jsonb; v_opt boolean; v_kpl int; v_bel int; v_een boolean := false;
+BEGIN
+  SELECT coalesce(s.settings->'karrenindeling'->'fields', s.settings->'karrenindeling') INTO k
+    FROM public.logistics_rule_configs s WHERE s.is_active ORDER BY s.updated_at DESC LIMIT 1;
+  v_opt := coalesce((k->>'optimal_fill')::boolean, true);
+  v_kpl := nullif(k->>'max_customers_per_layer', '')::numeric::int;
+  IF to_regclass('public.cart_planning_settings') IS NOT NULL THEN
+    EXECUTE 'SELECT max_beladingen_per_layer, coalesce(max_one_customer_per_layer, false) FROM public.cart_planning_settings LIMIT 1'
+      INTO v_bel, v_een;
+  END IF;
+  v_bel := CASE WHEN NOT v_opt THEN 1 ELSE coalesce(v_bel, 2) END;
+  IF NOT v_opt THEN RETURN jsonb_build_object('menging', 'per_regel', 'reden', 'optimale vulling staat uit'); END IF;
+  IF v_bel > 0 AND v_bel < 999 THEN RETURN jsonb_build_object('menging', 'per_regel', 'reden', format('maximaal %s beladingen per laag', v_bel)); END IF;
+  IF coalesce(v_een, false) THEN RETURN jsonb_build_object('menging', 'per_regel', 'reden', 'één klant per laag'); END IF;
+  IF coalesce(v_kpl, 0) > 0 THEN RETURN jsonb_build_object('menging', 'per_regel', 'reden', format('maximaal %s klant(en) per laag', v_kpl)); END IF;
+  RETURN jsonb_build_object('menging', 'vrij', 'reden', 'mengen per laag toegestaan');
+END $$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_capaciteit_core(p_cart_id uuid)
+RETURNS jsonb LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  WITH m AS (SELECT public.logistics_laag_menging_core()->>'menging' = 'per_regel' hele),
+  c AS (SELECT oc.cart_number, oc.total_layers_used, oc.max_layers FROM logistics_active.order_carts oc WHERE oc.id = p_cart_id),
+  i AS (SELECT count(*) n, count(*) FILTER (WHERE coalesce(ci.crates_per_layer, 0) > 0) ncpl,
+               sum(CASE WHEN m.hele THEN ceil(ci.crates::numeric / nullif(ci.crates_per_layer, 0) - 1e-9)
+                        ELSE ci.crates::numeric / nullif(ci.crates_per_layer, 0) END) lagen,
+               max(nullif(ci.layers_per_cart, 0)) lpc
+          FROM logistics_active.order_cart_items ci, m WHERE ci.cart_id = p_cart_id),
+  v AS (SELECT c.cart_number,
+               CASE WHEN i.n > 0 AND i.n = i.ncpl THEN round(i.lagen, 2) ELSE c.total_layers_used::numeric END lagen,
+               coalesce(i.lpc::numeric, nullif(c.max_layers, 0)::numeric) cap,
+               CASE WHEN i.lpc IS NOT NULL THEN 'product' WHEN coalesce(c.max_layers, 0) > 0 THEN 'ladingdrager' END bron
+          FROM c, i)
+  SELECT jsonb_build_object('layersUsed', v.lagen, 'maxLayers', v.cap, 'capaciteitBron', v.bron,
+           'laagMenging', (SELECT CASE WHEN hele THEN 'per_regel' ELSE 'vrij' END FROM m),
+           'vulgraadPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END,
+           'layerUtilizationPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END)
+         || public.logistics_kar_blokkade(v.cart_number::text, v.lagen, v.cap)
+    FROM v
+$$;
+
+-- Welke printer krijgt de volgende verzendbrief (route "verzendbrief bij pakbon")?
+CREATE OR REPLACE FUNCTION public.logistics_shipping_note_printer(p_order_id uuid DEFAULT NULL)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE slip record; v_plek uuid; v_wp text; r jsonb; v_naam text; v_pid uuid;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_shipping_note_printer');
+  IF to_regprocedure('public.printer_routering(text,uuid,text,uuid,text,uuid)') IS NULL THEN
+    RETURN jsonb_build_object('printerId', NULL, 'printerNaam', NULL, 'regel', NULL,
+      'reden', 'De printerregels van Layouts zijn niet geïnstalleerd; de printer is niet te bepalen.');
+  END IF;
+  SELECT pj.id, pj.payload INTO slip FROM public.print_jobs pj
+   WHERE pj.documenttype::text = 'pakbon'
+     AND (p_order_id IS NULL OR pj.payload->>'order_id' = p_order_id::text)
+   ORDER BY pj.created_at DESC LIMIT 1;
+  IF slip.id IS NOT NULL THEN
+    BEGIN v_plek := nullif(coalesce(slip.payload->>'print_plek_id', slip.payload->>'printPlekId'), '')::uuid;
+    EXCEPTION WHEN invalid_text_representation THEN v_plek := NULL; END;
+    v_wp := nullif(btrim(coalesce(slip.payload->>'werkplek', slip.payload->>'computer_naam', '')), '');
+  END IF;
+  r := public.printer_routering('afleverbrief', v_plek, v_wp, NULL, NULL, NULL);
+  v_pid := nullif(r->>'printer_id', '')::uuid;
+  IF v_pid IS NOT NULL THEN
+    SELECT coalesce(nullif(p.weergavenaam, ''), p.naam) INTO v_naam FROM public.printers p WHERE p.id = v_pid;
+  END IF;
+  RETURN jsonb_build_object(
+    'printerId', v_pid, 'printerNaam', v_naam,
+    'regel', CASE WHEN v_pid IS NULL THEN NULL ELSE jsonb_build_object('bron', r->>'bron', 'regelId', r->>'regel_id',
+               'printPlekId', v_plek, 'werkplek', v_wp, 'pakbonJobId', slip.id) END,
+    'reden', CASE WHEN v_pid IS NOT NULL THEN NULL
+                  WHEN slip.id IS NULL THEN 'Er is nog geen pakbon geprint; zonder printplek is de printer van de verzendbrief niet te bepalen.'
+                  ELSE 'Er is geen printerregel voor de verzendbrief op deze printplek. Stel die in bij Layouts → printers.' END,
+    'overgeslagen', r->'overgeslagen');
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_shipping_note_printer(uuid) TO authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.logistics_laag_menging_core() TO service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_204b()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT 'menging per laag', position('logistics_laag_menging_core' IN pg_get_functiondef('public.logistics_cart_capaciteit_core(uuid)'::regprocedure)) > 0, 'Capaciteit telt begonnen lagen per regel als menging beperkt is'
+  UNION ALL SELECT 'printer verzendbrief', to_regprocedure('public.logistics_shipping_note_printer(uuid)') IS NOT NULL
+     AND position('logistics_acc_guard' IN pg_get_functiondef('public.logistics_shipping_note_printer(uuid)'::regprocedure)) > 0, 'Leesfunctie met eigen toegangscontrole'
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_204b() TO authenticated, service_role;
+
+-- ===== 1.0.205: mengregel per laag via groepen, quarantaine overslaan =====
+-- 1.0.205: mengregel per laag via groepen; regels in quarantaine overal overslaan.
+
+CREATE OR REPLACE FUNCTION public.logistics_laag_menging_core()
+RETURNS jsonb LANGUAGE plpgsql STABLE SET search_path TO 'public' AS $$
+DECLARE k jsonb; v_opt boolean; v_kpl int; v_bel int; v_een boolean := false; v_kl int; v_b int; v_reden text[] := '{}';
+BEGIN
+  SELECT coalesce(s.settings->'karrenindeling'->'fields', s.settings->'karrenindeling') INTO k
+    FROM public.logistics_rule_configs s WHERE s.is_active ORDER BY s.updated_at DESC LIMIT 1;
+  v_opt := coalesce((k->>'optimal_fill')::boolean, true);
+  v_kpl := nullif(k->>'max_customers_per_layer', '')::numeric::int;
+  IF to_regclass('public.cart_planning_settings') IS NOT NULL THEN
+    EXECUTE 'SELECT max_beladingen_per_layer, coalesce(max_one_customer_per_layer, false) FROM public.cart_planning_settings LIMIT 1'
+      INTO v_bel, v_een;
+  END IF;
+  IF NOT v_opt THEN
+    RETURN jsonb_build_object('menging', 'per_regel', 'klantenPerLaag', NULL, 'beladingenPerLaag', NULL, 'reden', 'optimale vulling staat uit');
+  END IF;
+  v_b := CASE WHEN coalesce(v_bel, 2) > 0 AND coalesce(v_bel, 2) < 999 THEN coalesce(v_bel, 2) END;
+  v_kl := CASE WHEN coalesce(v_een, false) THEN 1 WHEN coalesce(v_kpl, 0) > 0 THEN v_kpl END;
+  IF v_kl IS NOT NULL THEN v_reden := v_reden || format('maximaal %s klant(en) per laag', v_kl); END IF;
+  IF v_b IS NOT NULL THEN v_reden := v_reden || format('maximaal %s beladingen per laag binnen een klant', v_b); END IF;
+  RETURN jsonb_build_object('menging', 'vrij', 'klantenPerLaag', v_kl, 'beladingenPerLaag', v_b,
+    'reden', CASE WHEN cardinality(v_reden) = 0 THEN 'mengen per laag toegestaan' ELSE array_to_string(v_reden, '; ') END);
+END $$;
+
+-- Lagen van een kar volgens de mengregels (zelfde als karLagen() in de planner).
+CREATE OR REPLACE FUNCTION public.logistics_cart_lagen_core(p_cart_id uuid)
+RETURNS numeric LANGUAGE plpgsql STABLE SET search_path TO 'public' AS $$
+DECLARE m jsonb := public.logistics_laag_menging_core(); v_n int; v_m int; units numeric[] := '{}'; r record; v_tot numeric := 0;
+  v_ontbreekt boolean;
+BEGIN
+  SELECT bool_or(coalesce(ci.crates_per_layer, 0) <= 0) INTO v_ontbreekt
+    FROM logistics_active.order_cart_items ci LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+   WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL;
+  IF v_ontbreekt IS NULL OR v_ontbreekt THEN RETURN NULL; END IF;
+  IF m->>'menging' = 'per_regel' THEN
+    SELECT sum(ceil(ci.crates::numeric / ci.crates_per_layer - 1e-9)) INTO v_tot
+      FROM logistics_active.order_cart_items ci LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+     WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL;
+    RETURN round(v_tot, 2);
+  END IF;
+  v_n := nullif(m->>'klantenPerLaag', '')::int;
+  v_m := nullif(m->>'beladingenPerLaag', '')::int;
+  IF v_n IS NULL AND v_m IS NULL THEN
+    SELECT sum(ci.crates::numeric / ci.crates_per_layer) INTO v_tot
+      FROM logistics_active.order_cart_items ci LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+     WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL;
+    RETURN round(v_tot, 2);
+  END IF;
+  IF v_m IS NOT NULL THEN
+    FOR r IN
+      SELECT sum(f) u FROM (
+        SELECT x.f, x.klant, (row_number() OVER (PARTITION BY x.klant ORDER BY x.regel) - 1) / v_m grp FROM (
+          SELECT ci.crates::numeric / ci.crates_per_layer f, coalesce(o.customer_id::text, oi.order_id::text, 'regel:' || ci.order_item_id::text) klant,
+                 ci.order_item_id::text regel
+            FROM logistics_active.order_cart_items ci
+            LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+            LEFT JOIN public.orders o ON o.id = oi.order_id
+           WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL) x) y
+      GROUP BY klant, grp
+    LOOP units := units || r.u; END LOOP;
+  ELSE
+    FOR r IN
+      SELECT sum(f) u FROM (
+        SELECT z.f, (dense_rank() OVER (ORDER BY z.klant) - 1) / v_n grp FROM (
+          SELECT ci.crates::numeric / ci.crates_per_layer f, coalesce(o.customer_id::text, oi.order_id::text, 'regel:' || ci.order_item_id::text) klant
+            FROM logistics_active.order_cart_items ci
+            LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+            LEFT JOIN public.orders o ON o.id = oi.order_id
+           WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL) z) y
+      GROUP BY grp
+    LOOP units := units || r.u; END LOOP;
+  END IF;
+  IF cardinality(units) <= 1 THEN
+    SELECT coalesce(sum(u), 0) INTO v_tot FROM unnest(units) u;
+  ELSE
+    SELECT sum(ceil(u - 1e-9)) INTO v_tot FROM unnest(units) u;
+  END IF;
+  RETURN round(v_tot, 2);
+END $$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_capaciteit_core(p_cart_id uuid)
+RETURNS jsonb LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  WITH c AS (SELECT oc.cart_number, oc.total_layers_used, oc.max_layers FROM logistics_active.order_carts oc WHERE oc.id = p_cart_id),
+  i AS (SELECT max(nullif(ci.layers_per_cart, 0)) lpc
+          FROM logistics_active.order_cart_items ci LEFT JOIN public.order_items oi ON oi.id = ci.order_item_id
+         WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NULL),
+  v AS (SELECT c.cart_number,
+               coalesce(public.logistics_cart_lagen_core(p_cart_id), c.total_layers_used::numeric) lagen,
+               coalesce(i.lpc::numeric, nullif(c.max_layers, 0)::numeric) cap,
+               CASE WHEN i.lpc IS NOT NULL THEN 'product' WHEN coalesce(c.max_layers, 0) > 0 THEN 'ladingdrager' END bron
+          FROM c, i)
+  SELECT jsonb_build_object('layersUsed', v.lagen, 'maxLayers', v.cap, 'capaciteitBron', v.bron,
+           'laagMenging', public.logistics_laag_menging_core(),
+           'vulgraadPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END,
+           'layerUtilizationPct', CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END)
+         || public.logistics_kar_blokkade(v.cart_number::text, v.lagen, v.cap)
+    FROM v
+$$;
+
+-- Quarantaine: bestaande functies additief bijwerken (alleen als de kolom bestaat; idempotent).
+DO $do$
+DECLARE f record; d text; n text;
+BEGIN
+  IF NOT EXISTS (SELECT 1 FROM information_schema.columns WHERE table_schema = 'public' AND table_name = 'order_items' AND column_name = 'quarantined_at') THEN
+    RAISE NOTICE 'order_items.quarantined_at bestaat niet; quarantainefilter overgeslagen.';
+    RETURN;
+  END IF;
+  FOR f IN SELECT * FROM (VALUES
+    ('public.logistics_order_plan_coverage_v165(uuid)', 'JOIN public.order_items oi ON oi.id = oci.order_item_id', 'JOIN public.order_items oi ON oi.id = oci.order_item_id AND oi.quarantined_at IS NULL'),
+    ('public.logistics_order_unit_carts_core(uuid[])', 'JOIN public.order_items oi ON oi.id = ci.order_item_id', 'JOIN public.order_items oi ON oi.id = ci.order_item_id AND oi.quarantined_at IS NULL'),
+    ('public.logistics_order_te_hoge_karren(uuid[])', 'JOIN public.order_items oi ON oi.id = ci.order_item_id', 'JOIN public.order_items oi ON oi.id = ci.order_item_id AND oi.quarantined_at IS NULL'),
+    ('public.logistics_order_indeling_verouderd_core(uuid)', 'WHERE oi.order_id = p_order_id AND oi.packing_locked_at IS NOT NULL', 'WHERE oi.order_id = p_order_id AND oi.packing_locked_at IS NOT NULL AND oi.quarantined_at IS NULL'),
+    ('public.logistics_cart_slip_plan_v200(uuid)', 'WHERE ci.cart_id = d.id', 'WHERE ci.cart_id = d.id AND NOT EXISTS (SELECT 1 FROM public.order_items qi WHERE qi.id = ci.order_item_id AND qi.quarantined_at IS NOT NULL)')
+  ) t(fn, oud, nieuw) LOOP
+    IF to_regprocedure(f.fn) IS NULL THEN RAISE NOTICE '% ontbreekt', f.fn; CONTINUE; END IF;
+    d := pg_get_functiondef(f.fn::regprocedure);
+    IF position(f.nieuw IN d) > 0 THEN CONTINUE; END IF;
+    IF position(f.oud IN d) = 0 THEN RAISE NOTICE 'patroon niet gevonden in %', f.fn; CONTINUE; END IF;
+    n := replace(d, f.oud, f.nieuw);
+    EXECUTE n;
+  END LOOP;
+END $do$;
+
+GRANT EXECUTE ON FUNCTION public.logistics_cart_lagen_core(uuid) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_205()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT 'mengregel groepen', position('logistics_cart_lagen_core' IN pg_get_functiondef('public.logistics_cart_capaciteit_core(uuid)'::regprocedure)) > 0, 'Ceil alleen tussen groepen die geen laag mogen delen'
+  UNION ALL SELECT 'quarantaine dekking', position('quarantined_at IS NULL' IN pg_get_functiondef('public.logistics_order_plan_coverage_v165(uuid)'::regprocedure)) > 0, 'Dekking slaat regels in quarantaine over'
+  UNION ALL SELECT 'quarantaine pakbonplan', position('quarantined_at IS NOT NULL' IN pg_get_functiondef('public.logistics_cart_slip_plan_v200(uuid)'::regprocedure)) > 0, 'Pakbonplan toont geen regels in quarantaine'
+  UNION ALL SELECT 'quarantaine kar-nummering', position('quarantined_at IS NULL' IN pg_get_functiondef('public.logistics_order_unit_carts_core(uuid[])'::regprocedure)) > 0, 'Karren van een order via actieve regels'
+  UNION ALL SELECT 'quarantaine te hoog', position('quarantined_at IS NULL' IN pg_get_functiondef('public.logistics_order_te_hoge_karren(uuid[])'::regprocedure)) > 0, 'Te hoog alleen op actieve regels'
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_205() TO authenticated, service_role;

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

@@ -1 +1 @@
-{"version":3,"file":"BeladingIndelingCard.d.ts","sourceRoot":"","sources":["../../src/components/BeladingIndelingCard.tsx"],"names":[],"mappings":"AAsCA,wBAAgB,oBAAoB,gCA0JnC"}
+{"version":3,"file":"BeladingIndelingCard.d.ts","sourceRoot":"","sources":["../../src/components/BeladingIndelingCard.tsx"],"names":[],"mappings":"AAsCA,wBAAgB,oBAAoB,gCAwKnC"}

package/dist-lib/components/BeladingIndelingCard.js

@@ -12,7 +12,7 @@ import { Boxes, Search } from "lucide-react";
 import { previewLoadCarrierPlan, replanOrderLoadCarriers } from "../lib/loadCarrierPlanning.functions.js";
 import { ladingdragerNaam } from "../lib/loadCarrierTypes.js";
 import { useFloricodeLadingdragers } from "../hooks/useFloricodeLadingdragers.js";
-import { layerUtilizationPct } from "../lib/layerUtilization.js";
+import { karCapaciteit, karVulgraad } from "../lib/loadCarrierPlanner.js";
 import { karBlokkade, ladingdragerPlatenTekst } from "../lib/extraPlaten.js";
 const db = () => supabase;
 export function BeladingIndelingCard() {
@@ -79,5 +79,17 @@ export function BeladingIndelingCard() {
         }
     };
     const safeCarts = Array.isArray(carts) ? carts : [];
-    return (_jsxs(Card, { children: [_jsxs(CardHeader, { children: [_jsxs(CardTitle, { className: "flex items-center gap-2", children: [_jsx(Boxes, { className: "h-5 w-5 text-primary" }), "Beladingindeling"] }), _jsx(CardDescription, { children: "De Engine deelt de orderregels van de hele buffer in over ladingdragers. Bekijk eerst het resultaat en leg het daarna vast." }), _jsxs("div", { className: "flex flex-wrap items-end gap-2 pt-2", children: [_jsxs("div", { className: "space-y-1.5", children: [_jsx(Label, { htmlFor: "indeling-order", children: "Ordernummer" }), _jsx(Input, { id: "indeling-order", value: orderNummer, onChange: (e) => setOrderNummer(e.target.value), placeholder: "SO-12345", className: "w-56" })] }), _jsxs(Button, { onClick: () => void bereken(), disabled: bezig || !orderNummer.trim(), children: [_jsx(Search, { className: "mr-2 h-4 w-4" }), "Berekenen"] }), _jsx(Button, { variant: "outline", onClick: () => void vastleggen(), disabled: bezig || !orderId, children: "Vastleggen" })] })] }), _jsxs(CardContent, { className: "space-y-4", children: [warnings.length > 0 && (_jsx("ul", { className: "space-y-1 rounded-lg border border-dashed p-3 text-sm text-muted-foreground", children: warnings.map((w, i) => (_jsx("li", { children: w }, i))) })), safeCarts.length === 0 ? (_jsx("p", { className: "text-sm text-muted-foreground", children: "Nog geen indeling berekend." })) : (safeCarts.map((cart) => (_jsxs("div", { className: "space-y-2 rounded-lg border p-3", children: [_jsxs("div", { className: "flex flex-wrap items-center gap-2", children: [_jsxs("span", { className: "font-medium", children: ["Ladingdrager ", cart.cart_number] }), _jsx(Badge, { variant: "secondary", children: ladingdragerNaam(cart.carrier_type, floricodeNamen) }), _jsxs(Badge, { variant: cart.is_complete ? "default" : "outline", children: [cart.occupancy_pct, "% vol"] }), _jsxs("span", { className: "text-xs text-muted-foreground", children: [ladingdragerPlatenTekst(ladingdragerNaam(cart.carrier_type, floricodeNamen), cart.total_layers_used, cart.occupancy_pct ?? layerUtilizationPct(cart.total_layers_used, cart.max_layers)), cart.weight_kg ? ` · ${cart.weight_kg} kg` : ""] })] }), karBlokkade(cart.cart_number, cart.total_layers_used, cart.max_layers).blokkade && (_jsx("p", { className: "rounded-md border border-destructive/40 bg-destructive/10 p-2 text-sm text-destructive", children: karBlokkade(cart.cart_number, cart.total_layers_used, cart.max_layers).blokkade.tekst })), _jsxs(Table, { children: [_jsx(TableHeader, { children: _jsxs(TableRow, { children: [_jsx(TableHead, { children: "Partij" }), _jsx(TableHead, { className: "text-right", children: "Fusten" }), _jsx(TableHead, { className: "text-right", children: "Planten" }), _jsx(TableHead, { className: "text-right", children: "Aandeel" })] }) }), _jsx(TableBody, { children: (Array.isArray(cart.items) ? cart.items : []).map((item, idx) => (_jsxs(TableRow, { children: [_jsx(TableCell, { className: "font-medium", children: item.product_name }), _jsx(TableCell, { className: "text-right", children: item.crates }), _jsx(TableCell, { className: "text-right", children: item.plants }), _jsxs(TableCell, { className: "text-right", children: [Math.round(item.layer_share_pct * 10) / 10, "%"] })] }, `${item.order_item_id}-${idx}`))) })] })] }, cart.cart_number))))] })] }));
+    return (_jsxs(Card, { children: [_jsxs(CardHeader, { children: [_jsxs(CardTitle, { className: "flex items-center gap-2", children: [_jsx(Boxes, { className: "h-5 w-5 text-primary" }), "Beladingindeling"] }), _jsx(CardDescription, { children: "De Engine deelt de orderregels van de hele buffer in over ladingdragers. Bekijk eerst het resultaat en leg het daarna vast." }), _jsxs("div", { className: "flex flex-wrap items-end gap-2 pt-2", children: [_jsxs("div", { className: "space-y-1.5", children: [_jsx(Label, { htmlFor: "indeling-order", children: "Ordernummer" }), _jsx(Input, { id: "indeling-order", value: orderNummer, onChange: (e) => setOrderNummer(e.target.value), placeholder: "SO-12345", className: "w-56" })] }), _jsxs(Button, { onClick: () => void bereken(), disabled: bezig || !orderNummer.trim(), children: [_jsx(Search, { className: "mr-2 h-4 w-4" }), "Berekenen"] }), _jsx(Button, { variant: "outline", onClick: () => void vastleggen(), disabled: bezig || !orderId, children: "Vastleggen" })] })] }), _jsxs(CardContent, { className: "space-y-4", children: [warnings.length > 0 && (_jsx("ul", { className: "space-y-1 rounded-lg border border-dashed p-3 text-sm text-muted-foreground", children: warnings.map((w, i) => (_jsx("li", { children: w }, i))) })), safeCarts.length === 0 ? (_jsx("p", { className: "text-sm text-muted-foreground", children: "Nog geen indeling berekend." })) : (safeCarts.map((cart) => {
+                        // 1.0.204: capaciteit = hoogste lagen per kar van de producten op de kar; lagen = Σ fust ÷ fusten per laag.
+                        const regels = Array.isArray(cart.items) ? cart.items : [];
+                        const alleCpl = regels.length > 0 && regels.every((i) => Number(i.crates_per_layer) > 0);
+                        const lagen = alleCpl
+                            ? Math.round(regels.reduce((s, i) => s + Number(i.crates) / Number(i.crates_per_layer), 0) * 100) / 100
+                            : cart.total_layers_used;
+                        const cap = karCapaciteit(regels.map((i) => i.layers_per_cart), cart.max_layers);
+                        const vulgraad = karVulgraad(Number(lagen), cap.capaciteit);
+                        const blok = karBlokkade(cart.cart_number, lagen, cap.capaciteit).blokkade;
+                        const naam = ladingdragerNaam(cart.carrier_type, floricodeNamen);
+                        return (_jsxs("div", { className: "space-y-2 rounded-lg border p-3", children: [_jsxs("div", { className: "flex flex-wrap items-center gap-2", children: [_jsxs("span", { className: "font-medium", children: ["Ladingdrager ", cart.cart_number] }), _jsx(Badge, { variant: "secondary", children: naam }), vulgraad != null && (_jsxs(Badge, { variant: cart.is_complete ? "default" : "outline", title: `Vulgraad: ${String(lagen).replace(".", ",")} lagen van ${cap.capaciteit} (${cap.bron === "product" ? "hoogste lagen per kar van de producten op deze kar" : "standaard van de ladingdrager"})`, children: [vulgraad, "% vol"] })), _jsxs("span", { className: "text-xs text-muted-foreground", children: [ladingdragerPlatenTekst(naam, lagen), cap.capaciteit != null ? ` · ${String(lagen).replace(".", ",")} van ${cap.capaciteit} lagen` : "", cart.weight_kg ? ` · ${cart.weight_kg} kg` : ""] })] }), blok && (_jsx("p", { className: "rounded-md border border-destructive/40 bg-destructive/10 p-2 text-sm text-destructive", children: blok.tekst })), _jsxs(Table, { children: [_jsx(TableHeader, { children: _jsxs(TableRow, { children: [_jsx(TableHead, { children: "Partij" }), _jsx(TableHead, { className: "text-right", children: "Fusten" }), _jsx(TableHead, { className: "text-right", children: "Planten" }), _jsx(TableHead, { className: "text-right", children: "Aandeel" })] }) }), _jsx(TableBody, { children: (Array.isArray(cart.items) ? cart.items : []).map((item, idx) => (_jsxs(TableRow, { children: [_jsx(TableCell, { className: "font-medium", children: item.product_name }), _jsx(TableCell, { className: "text-right", children: item.crates }), _jsx(TableCell, { className: "text-right", children: item.plants }), _jsxs(TableCell, { className: "text-right", children: [Math.round(item.layer_share_pct * 10) / 10, "%"] })] }, `${item.order_item_id}-${idx}`))) })] })] }, cart.cart_number));
+                    }))] })] }));
 }

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

@@ -1 +1 @@
-{"version":3,"file":"LadingdragersPage.d.ts","sourceRoot":"","sources":["../../src/components/LadingdragersPage.tsx"],"names":[],"mappings":"AAkIA,wBAAgB,iBAAiB,gCA2UhC"}
+{"version":3,"file":"LadingdragersPage.d.ts","sourceRoot":"","sources":["../../src/components/LadingdragersPage.tsx"],"names":[],"mappings":"AAkIA,wBAAgB,iBAAiB,gCA4UhC"}