@flowselections/logistiek-engine 1.0.203 → 1.0.209

package/db/schema/logistiek-engine.sql

@@ -35256,3 +35256,1336 @@ 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;
+-- ============================================================================
+-- 1.0.207 productoordeel belading zonder tijdelijke tabel (0A000-herstel)
+-- ============================================================================
+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; gj jsonb; gmap jsonb := '{}'::jsonb; c record; v_code text; v_eigen text; ids uuid[]; uit jsonb := '[]'::jsonb;
+  ls int; fh numeric; ph numeric; cpl numeric; lpc numeric; ppc numeric; laag numeric; naam text; v_prod text;
+  blok text[]; waar text[]; mist text[]; hmist text[]; v_pid uuid; v_oordeel text; v_tekst text; v_heeft_kol boolean;
+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(btrim(x->>'product_id'), '') ~* '^[0-9a-f-]{36}$';
+  IF ids IS NOT NULL THEN
+    SELECT coalesce(jsonb_object_agg(g.product_id::text, to_jsonb(g)), '{}'::jsonb) INTO gmap
+      FROM public.logistics_data_gereedheid(ids) g;
+  END IF;
+  -- Eigen ladingdrager van het product, alleen als die kolom in deze Shell bestaat; geen standaard.
+  SELECT EXISTS (SELECT 1 FROM pg_attribute WHERE attrelid = to_regclass('public.products') AND attname = 'load_carrier_type' AND NOT attisdropped) INTO v_heeft_kol;
+
+  FOR e IN SELECT x FROM jsonb_array_elements(p_regels) x LOOP
+    blok := '{}'; waar := '{}'; mist := '{}'; hmist := '{}'; c := NULL; v_eigen := NULL;
+    v_pid := CASE WHEN nullif(btrim(e->>'product_id'), '') ~* '^[0-9a-f-]{36}$' THEN (e->>'product_id')::uuid END;
+    gj := CASE WHEN v_pid IS NULL THEN NULL ELSE gmap->(v_pid::text) END;
+    IF gj IS NULL THEN
+      uit := uit || jsonb_build_array(jsonb_build_object('product_id', v_pid, 'oordeel', 'mist_gegevens', 'tekst', 'product onbekend',
+        'regels', jsonb_build_array('Product onbekend.')));
+      CONTINUE;
+    END IF;
+    v_prod := coalesce(gj->>'product', 'Product');
+    v_code := nullif(btrim(e->>'carrier_code'), '');
+    IF v_code IS NULL AND v_heeft_kol THEN
+      EXECUTE 'SELECT nullif(btrim(load_carrier_type::text), '''') FROM public.products WHERE id = $1' INTO v_eigen USING v_pid;
+      v_code := v_eigen;
+    END IF;
+    IF v_code IS NOT NULL THEN
+      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 LIMIT 1;
+    END IF;
+    naam := coalesce(c.name, c.code, v_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 NULL THEN
+      mist := mist || 'ladingdrager'::text;
+    ELSIF c.code IS NULL THEN
+      blok := blok || format('ladingdrager %s staat niet in Beheer', v_code);
+    ELSE
+      fh := nullif(gj->'velden'->'fust_height_mm'->>'waarde', '')::numeric / 10.0;
+      ph := nullif(gj->'velden'->'plant_height_cm'->>'waarde', '')::numeric;
+      ls := public.logistics_max_fusten_per_laag(c.layer_length_cm, c.layer_width_cm,
+              nullif(gj->'velden'->'fust_length_mm'->>'waarde', '')::numeric / 10.0, nullif(gj->'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;
+    END IF;
+    IF coalesce(gj->'ontbrekend', '[]'::jsonb) ? 'weight' THEN waar := waar || 'gewicht per fust ontbreekt'::text; END IF;
+    IF cardinality(blok) > 0 THEN
+      v_oordeel := 'onmogelijk'; v_tekst := format('%s past niet op %s.', v_prod, naam);
+    ELSIF cardinality(mist) > 0 THEN
+      v_oordeel := 'mist_gegevens'; v_tekst := format('%s: %s ontbreekt.', v_prod, array_to_string(mist, ', '));
+    ELSIF cardinality(waar) > 0 THEN
+      v_oordeel := 'waarschuwing'; v_tekst := format('%s: belading mogelijk, met waarschuwing.', v_prod);
+    ELSE
+      v_oordeel := 'compleet'; v_tekst := format('%s: belading past.', v_prod);
+    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_product_oordeel_belading(jsonb) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_207()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v_ok boolean := true; v_fout text := 'aanroep zonder fout'; v_cnt int;
+BEGIN
+  SELECT count(*) INTO v_cnt FROM pg_proc p JOIN pg_namespace n ON n.oid = p.pronamespace
+   WHERE n.nspname = 'public' AND p.proname LIKE 'logistics%' AND p.provolatile <> 'v' AND p.prosrc ~* 'create\s+temp';
+  punt := 'geen tijdelijke tabel in niet-volatiele functie'; ok := v_cnt = 0; uitleg := format('%s functie(s) met CREATE TEMP', v_cnt); RETURN NEXT;
+  BEGIN
+    PERFORM public.logistics_product_oordeel_belading('[{"product_id":""}]'::jsonb);
+  EXCEPTION WHEN SQLSTATE '0A000' THEN v_ok := false; v_fout := SQLERRM;
+            WHEN OTHERS THEN v_fout := 'aanroep geweigerd door toegangscontrole of andere fout: ' || SQLERRM;
+  END;
+  punt := 'productoordeel belading aanroepbaar'; ok := v_ok; uitleg := v_fout; RETURN NEXT;
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_207() TO authenticated, service_role;
+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; gj jsonb; gmap jsonb := '{}'::jsonb; c record; v_code text; v_eigen text; ids uuid[]; uit jsonb := '[]'::jsonb;
+  ls int; fh numeric; ph numeric; cpl numeric; lpc numeric; ppc numeric; laag numeric; naam text; v_prod text;
+  blok text[]; waar text[]; mist text[]; hmist text[]; v_pid uuid; v_oordeel text; v_tekst text; v_heeft_kol boolean;
+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(btrim(x->>'product_id'), '') ~* '^[0-9a-f-]{36}$';
+  IF ids IS NOT NULL THEN
+    SELECT coalesce(jsonb_object_agg(g.product_id::text, to_jsonb(g)), '{}'::jsonb) INTO gmap
+      FROM public.logistics_data_gereedheid(ids) g;
+  END IF;
+  SELECT EXISTS (SELECT 1 FROM pg_attribute WHERE attrelid = to_regclass('public.products') AND attname = 'load_carrier_type' AND NOT attisdropped) INTO v_heeft_kol;
+
+  FOR e IN SELECT x FROM jsonb_array_elements(p_regels) x LOOP
+    blok := '{}'; waar := '{}'; mist := '{}'; hmist := '{}'; v_eigen := NULL;
+    v_pid := CASE WHEN nullif(btrim(e->>'product_id'), '') ~* '^[0-9a-f-]{36}$' THEN (e->>'product_id')::uuid END;
+    gj := CASE WHEN v_pid IS NULL THEN NULL ELSE gmap->(v_pid::text) END;
+    IF gj IS NULL THEN
+      uit := uit || jsonb_build_array(jsonb_build_object('product_id', v_pid, 'oordeel', 'mist_gegevens', 'tekst', 'product onbekend',
+        'regels', jsonb_build_array('Product onbekend.')));
+      CONTINUE;
+    END IF;
+    v_prod := coalesce(gj->>'product', 'Product');
+    v_code := nullif(btrim(e->>'carrier_code'), '');
+    IF v_code IS NULL AND v_heeft_kol THEN
+      EXECUTE 'SELECT nullif(btrim(load_carrier_type::text), '''') FROM public.products WHERE id = $1' INTO v_eigen USING v_pid;
+      v_code := v_eigen;
+    END IF;
+    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 LIMIT 1;
+    naam := coalesce(c.name, c.code, v_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 NULL THEN
+      mist := mist || 'ladingdrager'::text;
+    ELSIF c.code IS NULL THEN
+      blok := blok || format('ladingdrager %s staat niet in Beheer', v_code);
+    ELSE
+      fh := nullif(gj->'velden'->'fust_height_mm'->>'waarde', '')::numeric / 10.0;
+      ph := nullif(gj->'velden'->'plant_height_cm'->>'waarde', '')::numeric;
+      ls := public.logistics_max_fusten_per_laag(c.layer_length_cm, c.layer_width_cm,
+              nullif(gj->'velden'->'fust_length_mm'->>'waarde', '')::numeric / 10.0, nullif(gj->'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;
+    END IF;
+    IF coalesce(gj->'ontbrekend', '[]'::jsonb) ? 'weight' THEN waar := waar || 'gewicht per fust ontbreekt'::text; END IF;
+    IF cardinality(blok) > 0 THEN
+      v_oordeel := 'onmogelijk'; v_tekst := format('%s past niet op %s.', v_prod, naam);
+    ELSIF cardinality(mist) > 0 THEN
+      v_oordeel := 'mist_gegevens'; v_tekst := format('%s: %s ontbreekt.', v_prod, array_to_string(mist, ', '));
+    ELSIF cardinality(waar) > 0 THEN
+      v_oordeel := 'waarschuwing'; v_tekst := format('%s: belading mogelijk, met waarschuwing.', v_prod);
+    ELSE
+      v_oordeel := 'compleet'; v_tekst := format('%s: belading past.', v_prod);
+    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_product_oordeel_belading(jsonb) TO authenticated, service_role;
+CREATE OR REPLACE FUNCTION public.logistics_install_check_207()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v_ok boolean := true; v_fout text := 'aanroep zonder fout'; v_cnt int; v_namen text;
+BEGIN
+  SELECT count(*), string_agg(p.proname, ', ') INTO v_cnt, v_namen FROM pg_proc p JOIN pg_namespace n ON n.oid = p.pronamespace
+   WHERE n.nspname = 'public' AND p.proname LIKE 'logistics%' AND p.proname NOT LIKE 'logistics_install_check%'
+     AND p.provolatile <> 'v' AND p.prosrc ~* 'create\s+temp';
+  punt := 'geen tijdelijke tabel in niet-volatiele functie'; ok := v_cnt = 0;
+  uitleg := CASE WHEN v_cnt = 0 THEN 'geen' ELSE v_namen END; RETURN NEXT;
+  BEGIN
+    PERFORM public.logistics_product_oordeel_belading('[{"product_id":""}]'::jsonb);
+  EXCEPTION WHEN SQLSTATE '0A000' THEN v_ok := false; v_fout := SQLERRM;
+            WHEN OTHERS THEN v_fout := 'aanroep geweigerd door toegangscontrole of andere fout: ' || SQLERRM;
+  END;
+  punt := 'productoordeel belading aanroepbaar'; ok := v_ok; uitleg := v_fout; RETURN NEXT;
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_207() TO authenticated, service_role;
+
+-- =====================================================================
+-- 1.0.208 — Floriday-vulgraad per kar, karTekst, ladingdrager uit hoofdverpakking,
+-- oordeel fysiek vóór mist_gegevens, snellere pickwachtrij, verouderde karren (quarantaine).
+-- Additief en idempotent; geen REVOKE/DROP.
+-- =====================================================================
+
+DO $do$
+BEGIN
+  IF to_regclass('public.logistics_floriday_carrier_map') IS NULL THEN RETURN; END IF;
+  IF NOT EXISTS (
+    SELECT 1 FROM pg_index i JOIN pg_attribute a ON a.attrelid = i.indrelid AND a.attnum = ANY(i.indkey)
+     WHERE i.indrelid = 'public.logistics_floriday_carrier_map'::regclass AND i.indisunique
+       AND i.indnatts = 1 AND a.attname = 'floriday_code') THEN
+    BEGIN
+      CREATE UNIQUE INDEX IF NOT EXISTS logistics_floriday_carrier_map_code_uq ON public.logistics_floriday_carrier_map (floriday_code);
+    EXCEPTION WHEN unique_violation THEN
+      RAISE NOTICE 'logistiek-engine: dubbele Floriday-codes in de vertaaltabel; install_check meldt welke.';
+    END;
+  END IF;
+END $do$;
+
+DO $do$
+BEGIN
+  IF to_regclass('public.logistics_floriday_carrier_map') IS NULL THEN RETURN; END IF;
+  INSERT INTO public.logistics_floriday_carrier_map (floriday_code, carrier_code)
+  SELECT v.f, v.c FROM (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')) v(f, c)
+  WHERE NOT EXISTS (SELECT 1 FROM public.logistics_floriday_carrier_map m WHERE upper(m.floriday_code) = v.f);
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_ladingdrager_resolve(p_code text)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v text := nullif(btrim(p_code), ''); n int; m text;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_ladingdrager_resolve');
+  IF v IS NULL OR upper(v) = 'NONE' THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', NULL, 'fout', 'ladingdrager ontbreekt');
+  END IF;
+  IF EXISTS (SELECT 1 FROM public.load_carrier_types t WHERE t.is_active AND t.code = v) THEN
+    RETURN jsonb_build_object('code', v, 'invoer', v, 'bron', 'beheer', 'fout', NULL);
+  END IF;
+  IF to_regclass('public.logistics_floriday_carrier_map') IS NULL THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', NULL, 'fout', format('ladingdrager %s onbekend in Beheer', v));
+  END IF;
+  SELECT count(DISTINCT c.carrier_code), min(c.carrier_code) INTO n, m
+    FROM public.logistics_floriday_carrier_map c WHERE upper(c.floriday_code) = upper(v);
+  IF coalesce(n, 0) = 0 THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', NULL, 'fout', format('ladingdrager %s onbekend in Beheer', v));
+  ELSIF n > 1 THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', 'floriday', 'fout', format('ladingdrager niet eenduidig (%s)', v));
+  ELSIF m = 'loose' THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', 'floriday', 'fout', 'ladingdrager ontbreekt');
+  ELSIF NOT EXISTS (SELECT 1 FROM public.load_carrier_types t WHERE t.is_active AND t.code = m) THEN
+    RETURN jsonb_build_object('code', NULL, 'invoer', v, 'bron', 'floriday', 'fout', format('ladingdrager %s onbekend in Beheer', v));
+  END IF;
+  RETURN jsonb_build_object('code', m, 'invoer', v, 'bron', 'floriday', 'fout', NULL);
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_ladingdrager_resolve(text) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_product_hoofdverpakking(p_product_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+DECLARE v_lc text; v_found boolean := false; v_heeft_lc boolean;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_product_hoofdverpakking');
+  IF to_regclass('public.product_packings') IS NULL THEN RETURN NULL; END IF;
+  SELECT EXISTS (SELECT 1 FROM pg_attribute WHERE attrelid = 'public.product_packings'::regclass AND attname = 'load_carrier' AND NOT attisdropped) INTO v_heeft_lc;
+  IF v_heeft_lc THEN
+    EXECUTE 'SELECT true, nullif(btrim(load_carrier::text), '''') FROM public.product_packings WHERE product_id = $1 AND is_primary
+              ORDER BY sort_order NULLS LAST, created_at LIMIT 1' INTO v_found, v_lc USING p_product_id;
+  ELSE
+    EXECUTE 'SELECT true FROM public.product_packings WHERE product_id = $1 AND is_primary LIMIT 1' INTO v_found USING p_product_id;
+  END IF;
+  RETURN jsonb_build_object('aanwezig', coalesce(v_found, false), 'ladingdrager', v_lc);
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_product_hoofdverpakking(uuid) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_max_fusten_per_laag_alle(p_fust_l numeric, p_fust_b numeric)
+RETURNS integer LANGUAGE sql STABLE SET search_path TO 'public' AS $$
+  SELECT max(public.logistics_max_fusten_per_laag(t.layer_length_cm, t.layer_width_cm, p_fust_l, p_fust_b))
+    FROM public.load_carrier_types t
+   WHERE t.is_active AND coalesce(t.layer_length_cm, 0) > 0 AND coalesce(t.layer_width_cm, 0) > 0
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_max_fusten_per_laag_alle(numeric, numeric) TO authenticated, service_role;
+
+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; gj jsonb; gmap jsonb := '{}'::jsonb; c record; rc jsonb; hv jsonb; v_code text; v_eigen text; ids uuid[]; uit jsonb := '[]'::jsonb;
+  ls int; fh numeric; ph numeric; cpl numeric; lpc numeric; ppc numeric; laag numeric; naam text; v_prod text; fl numeric; fb numeric;
+  blok text[]; waar text[]; mist text[]; hmist text[]; v_pid uuid; v_oordeel text; v_tekst text; v_heeft_kol boolean; v_cfout 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(btrim(x->>'product_id'), '') ~* '^[0-9a-f-]{36}$';
+  IF ids IS NOT NULL THEN
+    SELECT coalesce(jsonb_object_agg(g.product_id::text, to_jsonb(g)), '{}'::jsonb) INTO gmap
+      FROM public.logistics_data_gereedheid(ids) g;
+  END IF;
+  SELECT EXISTS (SELECT 1 FROM pg_attribute WHERE attrelid = to_regclass('public.products') AND attname = 'load_carrier_type' AND NOT attisdropped) INTO v_heeft_kol;
+
+  FOR e IN SELECT x FROM jsonb_array_elements(p_regels) x LOOP
+    blok := '{}'; waar := '{}'; mist := '{}'; hmist := '{}'; v_eigen := NULL; c := NULL; v_cfout := NULL;
+    v_pid := CASE WHEN nullif(btrim(e->>'product_id'), '') ~* '^[0-9a-f-]{36}$' THEN (e->>'product_id')::uuid END;
+    gj := CASE WHEN v_pid IS NULL THEN NULL ELSE gmap->(v_pid::text) END;
+    IF gj IS NULL THEN
+      uit := uit || jsonb_build_array(jsonb_build_object('product_id', v_pid, 'oordeel', 'mist_gegevens', 'tekst', 'product onbekend',
+        'regels', jsonb_build_array('Product onbekend.')));
+      CONTINUE;
+    END IF;
+    v_prod := coalesce(gj->>'product', 'Product');
+    hv := public.logistics_product_hoofdverpakking(v_pid);
+    v_code := nullif(btrim(e->>'carrier_code'), '');
+    IF v_code IS NULL THEN v_code := nullif(hv->>'ladingdrager', ''); END IF;
+    IF v_code IS NULL AND v_heeft_kol THEN
+      EXECUTE 'SELECT nullif(btrim(load_carrier_type::text), '''') FROM public.products WHERE id = $1' INTO v_eigen USING v_pid;
+      v_code := v_eigen;
+    END IF;
+    rc := public.logistics_ladingdrager_resolve(v_code);
+    v_cfout := rc->>'fout';
+    IF rc->>'code' IS NOT NULL THEN
+      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 = rc->>'code' LIMIT 1;
+    END IF;
+    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;
+    fh := nullif(gj->'velden'->'fust_height_mm'->>'waarde', '')::numeric / 10.0;
+    ph := nullif(gj->'velden'->'plant_height_cm'->>'waarde', '')::numeric;
+    fl := nullif(gj->'velden'->'fust_length_mm'->>'waarde', '')::numeric / 10.0;
+    fb := nullif(gj->'velden'->'fust_width_mm'->>'waarde', '')::numeric / 10.0;
+    IF hv IS NOT NULL AND NOT coalesce((hv->>'aanwezig')::boolean, false) THEN mist := mist || 'belading niet ingesteld'::text; END IF;
+    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 c.code IS NULL THEN
+      mist := mist || coalesce(v_cfout, 'ladingdrager ontbreekt');
+      ls := public.logistics_max_fusten_per_laag_alle(fl, fb);
+      IF ls IS NOT NULL AND coalesce(cpl,0) > ls THEN
+        blok := blok || format('%s fust per laag, maar op geen enkele ladingdrager in Beheer passen er meer dan %s', cpl, ls);
+      END IF;
+    ELSE
+      ls := public.logistics_max_fusten_per_laag(c.layer_length_cm, c.layer_width_cm, fl, fb);
+      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;
+    END IF;
+    IF coalesce(gj->'ontbrekend', '[]'::jsonb) ? 'weight' THEN waar := waar || 'gewicht per fust ontbreekt'::text; END IF;
+    IF cardinality(blok) > 0 THEN
+      v_oordeel := 'onmogelijk'; v_tekst := format('%s past niet op %s.', v_prod, CASE WHEN c.code IS NULL THEN 'een ladingdrager' ELSE naam END);
+    ELSIF cardinality(mist) > 0 THEN
+      v_oordeel := 'mist_gegevens'; v_tekst := format('%s: %s.', v_prod, array_to_string(mist, ', '));
+    ELSIF cardinality(waar) > 0 THEN
+      v_oordeel := 'waarschuwing'; v_tekst := format('%s: belading mogelijk, met waarschuwing.', v_prod);
+    ELSE
+      v_oordeel := 'compleet'; v_tekst := format('%s: belading past.', v_prod);
+    END IF;
+    uit := uit || jsonb_build_array(jsonb_build_object('product_id', v_pid, 'oordeel', v_oordeel, 'tekst', v_tekst,
+      'ladingdrager', rc->>'code', 'ladingdragerInvoer', rc->>'invoer', 'ladingdragerBron', rc->>'bron',
+      '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_product_oordeel_belading(jsonb) TO authenticated, service_role;
+
+DO $do$
+DECLARE d text; n text;
+BEGIN
+  IF to_regprocedure('public.logistics_product_oordeel_many(uuid[])') IS NULL THEN RETURN; END IF;
+  d := pg_get_functiondef('public.logistics_product_oordeel_many(uuid[])'::regprocedure);
+  IF position('belading niet ingesteld' IN d) > 0 THEN RETURN; END IF;
+  n := replace(d,
+    $a$    mist := array_remove(coalesce(r.ontbrekend, '{}'), 'weight');$a$,
+    $a$    mist := array_remove(coalesce(r.ontbrekend, '{}'), 'weight');
+    IF public.logistics_product_hoofdverpakking(r.product_id) IS NOT NULL
+       AND NOT coalesce((public.logistics_product_hoofdverpakking(r.product_id)->>'aanwezig')::boolean, false) THEN
+      mist := mist || 'belading niet ingesteld'::text;
+    END IF;$a$);
+  n := replace(n,
+    $a$      oordeel := 'mist_gegevens'; tekst := r.uitleg;$a$,
+    $a$      oordeel := 'mist_gegevens';
+      tekst := CASE WHEN 'belading niet ingesteld' = ANY(mist) THEN format('%s: belading niet ingesteld.', r.product) ELSE r.uitleg END;$a$);
+  IF n = d THEN RAISE NOTICE 'logistiek-engine: patroon oordeel_many niet gevonden'; RETURN; END IF;
+  EXECUTE n;
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_vulgraad_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; v_tot numeric; v_ontbreekt boolean; v_groepen int;
+BEGIN
+  SELECT bool_or(coalesce(ci.crates_per_layer, 0) <= 0 OR coalesce(ci.layers_per_cart, 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) / ci.layers_per_cart) 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 v_tot;
+  END IF;
+  v_n := nullif(m->>'klantenPerLaag', '')::int;
+  v_m := nullif(m->>'beladingenPerLaag', '')::int;
+  WITH r AS (
+    SELECT ci.crates::numeric / ci.crates_per_layer f, ci.layers_per_cart::numeric lpc,
+           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),
+  g AS (
+    SELECT r.*, CASE
+        WHEN v_n IS NULL AND v_m IS NULL THEN '1'
+        WHEN v_m IS NOT NULL THEN r.klant || ':' || ((row_number() OVER (PARTITION BY r.klant ORDER BY r.regel) - 1) / v_m)
+        ELSE ((dense_rank() OVER (ORDER BY r.klant) - 1) / v_n)::text END grp
+      FROM r),
+  u AS (SELECT grp, sum(f) lagen, sum(f / lpc) vul, min(lpc) minl FROM g GROUP BY grp)
+  SELECT count(*), CASE WHEN count(*) <= 1 THEN sum(vul) ELSE sum(ceil(lagen - 1e-9) / minl) END INTO v_groepen, v_tot FROM u;
+  RETURN v_tot;
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_cart_vulgraad_core(uuid) TO authenticated, service_role;
+
+CREATE OR REPLACE FUNCTION public.logistics_kar_blokkade_vul(p_kar text, p_vul numeric)
+RETURNS jsonb LANGUAGE sql IMMUTABLE SET search_path TO 'public' AS $$
+  SELECT CASE WHEN p_vul IS NOT NULL AND p_vul > 1.001
+    THEN jsonb_build_object('teHoog', true, 'blokkade', jsonb_build_object('code', 'kar_te_hoog',
+      'tekst', format('Kar %s is voor %s %% gevuld, meer dan 100 %%. Deel de order opnieuw in of pas de belading aan.',
+        coalesce(nullif(btrim(p_kar), ''), '?'), round(100 * p_vul)::int)))
+    ELSE jsonb_build_object('teHoog', false, 'blokkade', NULL) END
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_kar_blokkade_vul(text, numeric) TO authenticated, service_role;
+
+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,
+               public.logistics_cart_vulgraad_core(p_cart_id) vul,
+               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(),
+           'vulgraad', round(v.vul, 4),
+           'vulgraadPct', coalesce(round(100 * v.vul), CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END),
+           'layerUtilizationPct', coalesce(round(100 * v.vul), CASE WHEN coalesce(v.cap, 0) > 0 AND v.lagen IS NOT NULL THEN round(100 * v.lagen / v.cap) END))
+         || CASE WHEN v.vul IS NOT NULL THEN public.logistics_kar_blokkade_vul(v.cart_number::text, v.vul)
+                 ELSE public.logistics_kar_blokkade(v.cart_number::text, v.lagen, v.cap) END
+    FROM v
+$$;
+
+CREATE OR REPLACE FUNCTION public.logistics_kar_tekst(p_carrier_code text, p_lagen numeric, p_pct numeric)
+RETURNS text LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT CASE WHEN p_lagen IS NULL THEN NULL ELSE
+    replace(trim_scale(round(p_lagen, 1))::text, '.', ',') || ' lagen · '
+    || coalesce((SELECT nullif(btrim(t.name), '') FROM public.load_carrier_types t WHERE t.code = p_carrier_code ORDER BY t.is_active DESC LIMIT 1), 'Ladingdrager')
+    || CASE WHEN coalesce(public.logistics_extra_platen(p_lagen), 0) = 0 THEN ''
+            WHEN public.logistics_extra_platen(p_lagen) = 1 THEN ' + 1 plaat'
+            ELSE ' + ' || public.logistics_extra_platen(p_lagen) || ' platen' END
+    || CASE WHEN p_pct IS NULL THEN '' ELSE ' · ' || round(p_pct)::int || ' %' END END
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_kar_tekst(text, numeric, numeric) TO authenticated, service_role;
+
+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; v_pct 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;
+  v_pct := coalesce(nullif(c->>'vulgraadPct', '')::numeric, nullif(c->>'layerUtilizationPct', '')::numeric, nullif(c->>'occupancyPct', '')::numeric);
+  RETURN c || jsonb_build_object(
+    'additionalLayers', public.logistics_extra_platen(v_l),
+    'ladingdragerTekst', public.logistics_ladingdrager_tekst(c->>'carrierType', v_l, v_pct),
+    'karTekst', public.logistics_kar_tekst(c->>'carrierType', v_l, v_pct))
+    || CASE WHEN k IS NOT NULL THEN jsonb_build_object('teHoog', coalesce(k->'teHoog', 'false'::jsonb), 'blokkade', k->'blokkade')
+            ELSE public.logistics_kar_blokkade(coalesce(c->>'cartNumber', c->>'cart_number', c->>'seq'), v_l, nullif(c->>'maxLayers', '')::numeric) END;
+END $$;
+
+DO $do$
+DECLARE d text; n text;
+BEGIN
+  d := pg_get_functiondef('public.logistics_product_oordeel_belading(jsonb)'::regprocedure);
+  IF position('c := NULL;' IN d) = 0 THEN RETURN; END IF;
+  n := replace(d, 'v_eigen := NULL; c := NULL; v_cfout := NULL;',
+    'v_eigen := NULL; v_cfout := NULL;
+    SELECT NULL::text AS code, NULL::text AS name, NULL::numeric AS layer_length_cm, NULL::numeric AS layer_width_cm,
+           NULL::numeric AS max_height_cm, NULL::integer AS max_crates_per_layer, NULL::integer AS layers_per_carrier INTO c;');
+  EXECUTE n;
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_pick_cart_breakdown_fast(_order_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SECURITY DEFINER SET search_path TO 'public' AS $function$
+DECLARE
+  v_orders uuid[]; v_ref text; v_status jsonb;
+  v_ready boolean := false; v_released boolean := false;
+  v_total integer := 0; v_full integer := 0; v_partial integer := 0;
+  v_shared integer := 0; v_crates integer := 0;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_pick_cart_breakdown_fast');
+  v_orders := public.pick_buffer_order_ids(_order_id);
+  IF v_orders IS NULL OR cardinality(v_orders) = 0 THEN v_orders := ARRAY[_order_id]; END IF;
+  SELECT o.order_number INTO v_ref FROM public.orders o WHERE o.id = _order_id;
+  -- 1.0.208: alleen de kern; planState (logistics_plan_state_for) wordt hier niet gebruikt.
+  v_status := public.logistics_cart_plan_status_core(v_ref);
+  v_ready := COALESCE((v_status->>'ready')::boolean, false);
+  v_released := COALESCE((v_status->>'released')::boolean, false);
+  IF v_ready THEN
+    v_total := COALESCE((v_status->>'cartTotal')::integer, (v_status->>'totalCarts')::integer, 0);
+    SELECT
+      count(*) FILTER (WHERE COALESCE((c->>'isFullCart')::boolean, false)),
+      count(*) FILTER (WHERE NOT COALESCE((c->>'isFullCart')::boolean, false)),
+      count(*) FILTER (WHERE COALESCE((c->>'isShared')::boolean, false))
+      INTO v_full, v_partial, v_shared
+      FROM jsonb_array_elements(COALESCE(v_status->'carts', '[]'::jsonb)) c;
+    IF v_total = 0 THEN v_total := v_full + v_partial; END IF;
+    IF v_total > 0 AND v_full + v_partial <> v_total THEN
+      v_partial := GREATEST(v_total - v_full, 0);
+    END IF;
+  END IF;
+  SELECT COALESCE(sum(ci.crates), 0)::integer INTO v_crates
+    FROM public.order_cart_items ci
+    JOIN logistics_active.order_items oi ON oi.id = ci.order_item_id
+   WHERE oi.order_id = ANY(v_orders);
+  RETURN jsonb_build_object(
+    'totalCarts', COALESCE(v_total, 0), 'fullCarts', COALESCE(v_full, 0), 'partialCarts', COALESCE(v_partial, 0),
+    'sharedCarts', COALESCE(v_shared, 0), 'crates', COALESCE(v_crates, 0),
+    'cartPlanReady', v_ready, 'cartPlanReleased', v_released, 'cartPlanReason', v_status->>'reason'
+  ) || public.logistics_pick_mode();
+END; $function$;
+GRANT EXECUTE ON FUNCTION public.logistics_pick_cart_breakdown_fast(uuid) TO authenticated, service_role;
+
+DO $do$
+DECLARE d text; n text;
+BEGIN
+  -- Kern
+  d := pg_get_functiondef('public.logistics_sync_pick_queue_core()'::regprocedure);
+  IF position('v_kand uuid[]' IN d) = 0 THEN
+    n := replace(d, 'v_wait timestamptz; v_reason text; v_ok boolean;',
+                    'v_wait timestamptz; v_reason text; v_ok boolean; v_kand uuid[]; v_rel uuid[];');
+    n := replace(n, E'  SELECT min(d) INTO v_pickday FROM (',
+      E'  -- 1.0.208: controles per order één keer voor alle orders samen.\n'
+      || E'  SELECT coalesce(array_agg(ord.id), ''{}'') INTO v_kand FROM public.orders ord\n'
+      || E'   WHERE ord.order_number IS NOT NULL\n'
+      || E'     AND EXISTS (SELECT 1 FROM public.logistics_tasks lt WHERE lt.order_ref = ord.order_number AND lt.task_type = ''pick.execute''\n'
+      || E'                  AND lt.status NOT IN (''done'',''cancelled'',''superseded'',''skipped''))\n'
+      || E'     AND public.logistics_order_is_topick(ord.id, ord.order_number)\n'
+      || E'     AND NOT public.logistics_order_handled(ord.id);\n'
+      || E'  SELECT coalesce(array_agg(ord.id), ''{}'') INTO v_rel FROM public.orders ord\n'
+      || E'   WHERE ord.id = ANY(v_kand) AND public.logistics_order_released(ord.order_number);\n'
+      || E'  SELECT min(d) INTO v_pickday FROM (');
+    n := regexp_replace(n, 'public\.logistics_order_is_topick\(ord\.id, ord\.order_number\)\s+AND NOT public\.logistics_order_handled\(ord\.id\)\s+AND public\.logistics_order_released\(ord\.order_number\)',
+                        'ord.id = ANY(v_rel)', 'g');
+    n := regexp_replace(n, 'public\.logistics_order_is_topick\(ord\.id, ord\.order_number\)\s+AND NOT public\.logistics_order_handled\(ord\.id\)\s+AND \(v_forced IS NOT NULL OR public\.logistics_order_released\(ord\.order_number\)\)',
+                        'ord.id = ANY(v_kand) AND (v_forced IS NOT NULL OR ord.id = ANY(v_rel))', 'g');
+    -- de eerste vervanging hierboven mag de nieuwe v_kand-berekening niet raken: die heeft geen released-regel erachter.
+    n := replace(n, 'v_breakdown := public.pick_cart_breakdown(r_unit.lead_id);', 'v_breakdown := public.logistics_pick_cart_breakdown_fast(r_unit.lead_id);');
+    EXECUTE n;
+  END IF;
+
+  -- Achterstand
+  d := pg_get_functiondef('public.logistics_sync_pick_queue_backlog()'::regprocedure);
+  IF position('v_bl uuid[]' IN d) = 0 THEN
+    n := replace(d, 'v_ins integer := 0; v_upd integer := 0; v_orders integer := 0;',
+                    'v_ins integer := 0; v_upd integer := 0; v_orders integer := 0; v_bl uuid[];');
+    n := replace(n, E'  FOR r_unit IN\n    WITH k AS (',
+      E'  -- 1.0.208: achterstand in één keer voor alle orders (zelfde regel als logistics_order_is_backlog).\n'
+      || E'  SELECT coalesce(array_agg(b.order_id), ''{}'') INTO v_bl\n'
+      || E'    FROM public.logistics_order_backlog_info_many(ARRAY(SELECT o.id FROM public.orders o WHERE o.order_number IS NOT NULL)) b\n'
+      || E'    JOIN public.orders o ON o.id = b.order_id\n'
+      || E'   WHERE b.info IS NOT NULL AND (b.info->>''dagen'')::int <= v_max AND public.logistics_order_released(o.order_number);\n'
+      || E'  FOR r_unit IN\n    WITH k AS (');
+    n := replace(n, 'public.logistics_order_is_backlog(o.id)', 'o.id = ANY(v_bl)');
+    n := replace(n, 'v_breakdown := public.pick_cart_breakdown(r_unit.lead_id);', 'v_breakdown := public.logistics_pick_cart_breakdown_fast(r_unit.lead_id);');
+    EXECUTE n;
+  END IF;
+END $do$;
+
+DO $do$
+DECLARE d text; n text;
+BEGIN
+  d := pg_get_functiondef('public.logistics_cart_plan_status_core_v152(text)'::regprocedure);
+  n := replace(d, 'public.logistics_cart_plan_status_core_v152(', 'public.logistics_cart_plan_status_slim(');
+  n := replace(n, '''logistics_cart_plan_status_core_v152''', '''logistics_cart_plan_status_slim''');
+  n := replace(n, 'public.logistics_cart_json_fixed(c)',
+    'c || coalesce(public.logistics_cart_fixed_numbering(nullif(c->>''cartId'', '''')::uuid), ''{}''::jsonb)');
+  IF position('logistics_cart_json_fixed' IN n) > 0 THEN RAISE EXCEPTION 'vervanging json_fixed mislukt'; END IF;
+  EXECUTE n;
+
+  d := pg_get_functiondef('public.logistics_pick_cart_breakdown_fast(uuid)'::regprocedure);
+  IF position('logistics_cart_plan_status_slim' IN d) = 0 THEN
+    EXECUTE replace(d, 'v_status := public.logistics_cart_plan_status_core(v_ref);', 'v_status := public.logistics_cart_plan_status_slim(v_ref);');
+  END IF;
+END $do$;
+GRANT EXECUTE ON FUNCTION public.logistics_cart_plan_status_slim(text) TO service_role;
+
+DO $do$
+DECLARE d text; n text; v_extra text := ' || jsonb_build_object(''cartCount'', 1, ''perCart'', true, ''pickMode'', ''cart'', ''cartPlanReady'', true)';
+BEGIN
+  d := pg_get_functiondef('public.logistics_sync_pick_queue_backlog()'::regprocedure);
+  IF position('''cartPlanReady'', true)' IN d) = 0 THEN
+    n := replace(d, E'COALESCE(q.payload, ''{}''::jsonb) || v_payload);', E'COALESCE(q.payload, ''{}''::jsonb) || v_payload' || v_extra || ');');
+    IF n = d THEN RAISE EXCEPTION 'patroon achterstand niet gevonden'; END IF;
+    EXECUTE n;
+  END IF;
+  d := pg_get_functiondef('public.logistics_sync_pick_queue_core()'::regprocedure);
+  IF position('''cartPlanReady'', true)' IN d) = 0 THEN
+    n := replace(d, E'COALESCE(v_wait, v_due, q.due_at), COALESCE(q.payload, ''{}''::jsonb) || v_cart_payload);',
+                    E'COALESCE(v_wait, v_due, q.due_at), COALESCE(q.payload, ''{}''::jsonb) || v_cart_payload' || v_extra || ');');
+    IF n = d THEN RAISE EXCEPTION 'patroon kern niet gevonden'; END IF;
+    EXECUTE n;
+  END IF;
+END $do$;
+
+CREATE OR REPLACE FUNCTION public.logistics_cart_verouderd_core(p_cart_id uuid)
+RETURNS jsonb LANGUAGE plpgsql STABLE SET search_path TO 'public' AS $$
+DECLARE v_nr text; v_n int;
+BEGIN
+  IF p_cart_id IS NULL THEN RETURN NULL; END IF;
+  IF NOT EXISTS (SELECT 1 FROM information_schema.columns WHERE table_schema = 'public' AND table_name = 'order_items' AND column_name = 'quarantined_at') THEN
+    RETURN NULL;
+  END IF;
+  SELECT count(*) INTO v_n FROM public.order_cart_items ci JOIN public.order_items oi ON oi.id = ci.order_item_id
+   WHERE ci.cart_id = p_cart_id AND oi.quarantined_at IS NOT NULL;
+  IF coalesce(v_n, 0) = 0 THEN RETURN NULL; END IF;
+  SELECT cart_number::text INTO v_nr FROM public.order_carts WHERE id = p_cart_id;
+  RETURN jsonb_build_object('verouderd', true, 'regelsInQuarantaine', v_n,
+    'blokkade', jsonb_build_object('code', 'kar_verouderd',
+      'tekst', format('Kar %s heeft %s regel(s) die Verkoop in quarantaine heeft gezet. Deel de niet-geprinte karren opnieuw in.', coalesce(v_nr, '?'), v_n)));
+END $$;
+GRANT EXECUTE ON FUNCTION public.logistics_cart_verouderd_core(uuid) TO service_role;
+
+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; v jsonb;
+BEGIN
+  PERFORM public.logistics_acc_guard('ingelogd', 'logistics_cart_te_hoog');
+  k := public.logistics_cart_capaciteit_core(p_cart_id);
+  IF k IS NOT NULL AND coalesce((k->>'teHoog')::boolean, false) THEN
+    RETURN jsonb_build_object('teHoog', true, 'blokkade', k->'blokkade');
+  END IF;
+  -- 1.0.208: verouderde kar (regels in quarantaine) krijgt ook geen stickers/verzendbrief/pakbon.
+  v := public.logistics_cart_verouderd_core(p_cart_id);
+  IF v IS NOT NULL THEN
+    RETURN jsonb_build_object('teHoog', false, 'indelingVerouderd', true, 'blokkade', v->'blokkade');
+  END IF;
+  RETURN jsonb_build_object('teHoog', false, 'blokkade', NULL);
+END $$;
+
+DO $do$
+DECLARE d text; n text;
+BEGIN
+  d := pg_get_functiondef('public.logistics_cart_platen_verrijk(jsonb)'::regprocedure);
+  IF position('logistics_cart_verouderd_core' IN d) = 0 THEN
+    n := replace(d,
+      $a$    || CASE WHEN k IS NOT NULL THEN jsonb_build_object('teHoog', coalesce(k->'teHoog', 'false'::jsonb), 'blokkade', k->'blokkade')$a$,
+      $a$    || CASE WHEN v_id IS NOT NULL AND public.logistics_cart_verouderd_core(v_id) IS NOT NULL
+                 AND NOT coalesce((k->>'teHoog')::boolean, false)
+            THEN jsonb_build_object('teHoog', false, 'indelingVerouderd', true, 'blokkade', public.logistics_cart_verouderd_core(v_id)->'blokkade')
+            WHEN k IS NOT NULL THEN jsonb_build_object('teHoog', coalesce(k->'teHoog', 'false'::jsonb), 'blokkade', k->'blokkade')$a$);
+    IF n = d THEN RAISE EXCEPTION 'patroon platen_verrijk niet gevonden'; END IF;
+    EXECUTE n;
+  END IF;
+END $do$;
+
+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 AND oi.quarantined_at IS NULL),
+  q AS (
+    SELECT DISTINCT ci.cart_id, coalesce(oi.product_name, 'regel') naam
+      FROM public.order_items oi
+      JOIN public.order_cart_items ci ON ci.order_item_id = oi.id
+      JOIN logistics_active.order_carts c ON c.id = ci.cart_id
+     WHERE oi.order_id = p_order_id AND oi.quarantined_at IS NOT NULL)
+  SELECT CASE
+    WHEN EXISTS (SELECT 1 FROM q) THEN jsonb_build_object(
+           'verouderd', true, 'blokkeert', true, 'reden', 'quarantaine',
+           'producten', (SELECT to_jsonb(array_agg(DISTINCT naam)) FROM q),
+           'karren', (SELECT to_jsonb(array_agg(DISTINCT cart_id)) FROM q),
+           'vastliggendeKarren', (SELECT count(DISTINCT q2.cart_id) FROM q q2 WHERE public.logistics_cart_vast_core(q2.cart_id)),
+           'tekst', 'Er staan regels op de karren die Verkoop in quarantaine heeft gezet. Deel de niet-geprinte karren opnieuw in.')
+    WHEN (SELECT bool_or(afwijkend) FROM a) THEN jsonb_build_object(
+           'verouderd', true, 'blokkeert', false, 'reden', 'belading',
+           'producten', (SELECT to_jsonb(array_agg(DISTINCT naam) FILTER (WHERE afwijkend)) FROM a),
+           '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
+$$;
+
+CREATE OR REPLACE FUNCTION public.logistics_install_check_208()
+RETURNS TABLE(punt text, ok boolean, uitleg text) LANGUAGE sql STABLE SECURITY DEFINER SET search_path TO 'public' AS $$
+  SELECT 'vulgraad per kar', to_regprocedure('public.logistics_cart_vulgraad_core(uuid)') IS NOT NULL, 'Vulgraad = som per regel van lagen ÷ lagen per kar (Floriday)'
+  UNION ALL SELECT 'karTekst', to_regprocedure('public.logistics_kar_tekst(text,numeric,numeric)') IS NOT NULL, 'Tekst per kar: lagen · ladingdrager + platen · %'
+  UNION ALL SELECT 'ladingdrager-vertaling', to_regprocedure('public.logistics_ladingdrager_resolve(text)') IS NOT NULL, 'Floriday- en Beheer-codes'
+  UNION ALL SELECT 'vertaling eenduidig', NOT EXISTS (SELECT 1 FROM public.logistics_floriday_carrier_map GROUP BY floriday_code HAVING count(*) > 1), 'Elke Floriday-code naar precies één Beheer-type'
+  UNION ALL SELECT 'hoofdverpakking', to_regprocedure('public.logistics_product_hoofdverpakking(uuid)') IS NOT NULL, 'Ladingdrager uit hoofdverpakking'
+  UNION ALL SELECT 'pickwachtrij set-based', position('v_kand' IN pg_get_functiondef('public.logistics_sync_pick_queue_core()'::regprocedure)) > 0
+             AND position('v_bl' IN pg_get_functiondef('public.logistics_sync_pick_queue_backlog()'::regprocedure)) > 0, 'Controles één keer voor alle orders'
+  UNION ALL SELECT 'verouderde kar', to_regprocedure('public.logistics_cart_verouderd_core(uuid)') IS NOT NULL
+             AND position('logistics_cart_verouderd_core' IN pg_get_functiondef('public.logistics_cart_te_hoog(uuid)'::regprocedure)) > 0, 'Kar met quarantaineregels krijgt geen documenten'
+  UNION ALL SELECT 'guards 1.0.208', position('logistics_acc_guard' IN pg_get_functiondef('public.logistics_ladingdrager_resolve(text)'::regprocedure)) > 0
+             AND position('logistics_acc_guard' IN pg_get_functiondef('public.logistics_product_hoofdverpakking(uuid)'::regprocedure)) > 0, 'Nieuwe functies controleren de aanroeper'
+$$;
+GRANT EXECUTE ON FUNCTION public.logistics_install_check_208() TO authenticated, service_role;