@flowselections/pick-schermen-kwekers 1.0.89 → 1.0.93

package/schema/pickschermen.sql

@@ -6012,3 +6012,433 @@ BEGIN
 END $function$;
 REVOKE ALL ON FUNCTION public.pickstation_shipping_note_status(text, uuid, uuid, text) FROM PUBLIC;
 GRANT EXECUTE ON FUNCTION public.pickstation_shipping_note_status(text, uuid, uuid, text) TO anon, authenticated, service_role;
+
+-- 1.0.90 productiebonnen (gelijk aan migratie 20261109093814)
+-- Pickschermen 1.0.89: productiebonnen op een eigen pickstation.
+CREATE TABLE IF NOT EXISTS public.pick_productiebon_jobs (
+  id uuid PRIMARY KEY DEFAULT gen_random_uuid(),
+  productie_order_id uuid NOT NULL,
+  station_id uuid NOT NULL,
+  device_id uuid,
+  job_id uuid,
+  idempotency_key text NOT NULL,
+  soort text NOT NULL DEFAULT 'print',
+  created_at timestamptz NOT NULL DEFAULT now()
+);
+CREATE INDEX IF NOT EXISTS idx_pick_productiebon_jobs_po ON public.pick_productiebon_jobs(productie_order_id, created_at DESC);
+CREATE UNIQUE INDEX IF NOT EXISTS uq_pick_productiebon_jobs_key ON public.pick_productiebon_jobs(idempotency_key);
+GRANT ALL ON public.pick_productiebon_jobs TO service_role;
+ALTER TABLE public.pick_productiebon_jobs ENABLE ROW LEVEL SECURITY;
+
+CREATE OR REPLACE FUNCTION public._pick_try_uuid(p text)
+ RETURNS uuid LANGUAGE plpgsql IMMUTABLE SET search_path TO 'public'
+AS $function$ BEGIN RETURN p::uuid; EXCEPTION WHEN others THEN RETURN NULL; END $function$;
+
+CREATE OR REPLACE FUNCTION public._pick_productie_bron(p_device_key text, p_slug text)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_station uuid; v_dev_station uuid; v_device uuid;
+BEGIN
+  SELECT s.id INTO v_station FROM public.pick_stations s
+   WHERE s.slug = nullif(btrim(coalesce(p_slug, '')), '') AND s.active IS TRUE LIMIT 1;
+  IF v_station IS NULL THEN
+    RAISE EXCEPTION 'Dit pickstation is onbekend of niet actief.' USING ERRCODE = '42501';
+  END IF;
+  IF p_device_key IS NULL OR length(p_device_key) < 32 THEN
+    RAISE EXCEPTION 'Dit apparaat is niet gekoppeld aan een pickstation.' USING ERRCODE = '42501';
+  END IF;
+  PERFORM public.pick_device_check(p_device_key, v_station, NULL, NULL, p_slug, NULL);
+  SELECT d.id, d.station_id INTO v_device, v_dev_station FROM public.pick_station_devices d
+   WHERE d.key_hash = public.pick_key_hash(p_device_key) AND d.ingetrokken_op IS NULL LIMIT 1;
+  IF v_device IS NULL OR v_dev_station IS DISTINCT FROM v_station THEN
+    RAISE EXCEPTION 'Dit apparaat is niet gekoppeld aan dit pickstation.' USING ERRCODE = '42501';
+  END IF;
+  RETURN jsonb_build_object('stationId', v_station, 'stationSlug', p_slug, 'deviceId', v_device);
+END $function$;
+REVOKE ALL ON FUNCTION public._pick_productie_bron(text, text) FROM PUBLIC, anon, authenticated;
+
+CREATE OR REPLACE FUNCTION public.pickstation_productiebonnen(p_device_key text, p_slug text, p_geprint boolean DEFAULT false, p_offset integer DEFAULT 0, p_limit integer DEFAULT 25)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_station uuid; v_items jsonb := '[]'::jsonb; v_total bigint; r record; v_po jsonb; v_lijst jsonb;
+  v_vandaag date := (now() AT TIME ZONE 'Europe/Amsterdam')::date; v_plek uuid; v_job record;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_station := (v_bron->>'stationId')::uuid;
+  SELECT print_plek_id INTO v_plek FROM public.pick_station_print_plek(_station_id => v_station);
+  SELECT count(*) INTO v_total FROM public.pick_queue q
+   WHERE q.station_id = v_station AND q.payload ? 'productie_order_id' AND q.cancelled_at IS NULL
+     AND CASE WHEN coalesce(p_geprint, false)
+              THEN q.completed_at IS NOT NULL AND (q.completed_at AT TIME ZONE 'Europe/Amsterdam')::date = v_vandaag
+              ELSE q.completed_at IS NULL END;
+  FOR r IN SELECT q.* FROM public.pick_queue q
+   WHERE q.station_id = v_station AND q.payload ? 'productie_order_id' AND q.cancelled_at IS NULL
+     AND CASE WHEN coalesce(p_geprint, false)
+              THEN q.completed_at IS NOT NULL AND (q.completed_at AT TIME ZONE 'Europe/Amsterdam')::date = v_vandaag
+              ELSE q.completed_at IS NULL END
+   ORDER BY q.created_at ASC, q.id
+   LIMIT least(greatest(coalesce(p_limit, 25), 1), 100) OFFSET greatest(coalesce(p_offset, 0), 0)
+  LOOP
+    v_po := NULL;
+    IF nullif(r.document_number, '') IS NOT NULL THEN
+      v_lijst := public.productie_orders_lijst(NULL, NULL, NULL, r.document_number, 5, 0);
+      SELECT e INTO v_po FROM jsonb_array_elements(coalesce(v_lijst->'rijen', '[]'::jsonb)) e
+       WHERE e->>'id' = r.payload->>'productie_order_id' LIMIT 1;
+    END IF;
+    SELECT j.job_id, j.idempotency_key, j.soort INTO v_job FROM public.pick_productiebon_jobs j
+     WHERE j.productie_order_id = public._pick_try_uuid(r.payload->>'productie_order_id')
+     ORDER BY j.created_at DESC LIMIT 1;
+    v_items := v_items || jsonb_build_object(
+      'queue_id', r.id, 'status_id', r.status_id, 'document_number', r.document_number,
+      'created_at', r.created_at, 'completed_at', r.completed_at, 'payload', r.payload,
+      'productie_order', v_po,
+      'foto', (SELECT p.image_url FROM public.products p WHERE p.id = public._pick_try_uuid(coalesce(r.payload->>'productId', v_po->>'product_id'))),
+      'laatste_job', CASE WHEN v_job.job_id IS NULL THEN NULL ELSE jsonb_build_object('job_id', v_job.job_id, 'idempotency_key', v_job.idempotency_key, 'soort', v_job.soort) END);
+  END LOOP;
+  RETURN jsonb_build_object('items', v_items, 'totaal', v_total, 'print_plek_id', v_plek, 'station_id', v_station);
+END $function$;
+
+CREATE OR REPLACE FUNCTION public.pickstation_productiebon_printen(p_device_key text, p_slug text, p_productie_order_id uuid, p_idempotency_key text, p_herprint boolean DEFAULT false)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_station uuid; v_q record; v_plek uuid; v_res jsonb; v_job uuid;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_station := (v_bron->>'stationId')::uuid;
+  SELECT q.id, q.payload INTO v_q FROM public.pick_queue q
+   WHERE q.station_id = v_station AND q.payload->>'productie_order_id' = p_productie_order_id::text AND q.cancelled_at IS NULL
+   ORDER BY q.created_at DESC LIMIT 1;
+  IF v_q.id IS NULL THEN
+    RETURN jsonb_build_object('ok', false, 'foutcode', 'NIET_OP_STATION', 'reden', 'Deze productiebon staat niet op dit station.');
+  END IF;
+  IF coalesce((v_q.payload->>'requiresApproval')::boolean, false) AND v_q.payload->>'approvedAt' IS NULL THEN
+    RETURN jsonb_build_object('ok', false, 'foutcode', 'WACHT_OP_GOEDKEURING', 'reden', 'Deze productiebon wacht op goedkeuring.');
+  END IF;
+  SELECT print_plek_id INTO v_plek FROM public.pick_station_print_plek(_station_id => v_station);
+  IF v_plek IS NULL THEN
+    RETURN jsonb_build_object('ok', false, 'foutcode', 'GEEN_PRINTPLEK', 'reden', 'Dit station heeft geen printplek.');
+  END IF;
+  v_res := public.layouts_productiebon_printen(p_productie_order_id, v_plek, p_idempotency_key, 'pickstation');
+  v_job := public._pick_try_uuid(v_res->>'job_id');
+  IF v_job IS NOT NULL AND coalesce((v_res->>'ok')::boolean, false) THEN
+    INSERT INTO public.pick_productiebon_jobs(productie_order_id, station_id, device_id, job_id, idempotency_key, soort)
+    VALUES (p_productie_order_id, v_station, (v_bron->>'deviceId')::uuid, v_job, btrim(p_idempotency_key),
+            CASE WHEN coalesce(p_herprint, false) THEN 'herprint' ELSE 'print' END)
+    ON CONFLICT (idempotency_key) DO NOTHING;
+  END IF;
+  INSERT INTO public.pick_station_logs(station_id, queue_item_id, action, detail)
+  VALUES (v_station, v_q.id, CASE WHEN coalesce(p_herprint, false) THEN 'productiebon_herprint' ELSE 'productiebon_print' END,
+          v_bron || jsonb_build_object('productieOrderId', p_productie_order_id, 'resultaat', v_res));
+  RETURN v_res;
+END $function$;
+
+CREATE OR REPLACE FUNCTION public.pickstation_printjob_status(p_device_key text, p_slug text, p_job_id uuid)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  IF NOT EXISTS (SELECT 1 FROM public.pick_productiebon_jobs j WHERE j.job_id = p_job_id AND j.station_id = (v_bron->>'stationId')::uuid) THEN
+    RETURN jsonb_build_object('job_id', p_job_id, 'status', 'mislukt', 'foutcode', 'NIET_VAN_STATION', 'reden', 'Deze printopdracht hoort niet bij dit station.');
+  END IF;
+  RETURN public.layouts_printjob_status(p_job_id);
+END $function$;
+
+CREATE OR REPLACE FUNCTION public.pickstation_productie_verwerken(p_device_key text, p_slug text, p_productie_order_id uuid)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_station uuid; v_q uuid; v_job uuid; v_st jsonb; v_res jsonb;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_station := (v_bron->>'stationId')::uuid;
+  SELECT q.id INTO v_q FROM public.pick_queue q
+   WHERE q.station_id = v_station AND q.payload->>'productie_order_id' = p_productie_order_id::text AND q.cancelled_at IS NULL
+   ORDER BY q.created_at DESC LIMIT 1;
+  IF v_q IS NULL THEN
+    RAISE EXCEPTION 'Deze productiebon staat niet op dit station.' USING ERRCODE = '42501';
+  END IF;
+  SELECT j.job_id INTO v_job FROM public.pick_productiebon_jobs j
+   WHERE j.productie_order_id = p_productie_order_id AND j.station_id = v_station AND j.soort = 'print'
+   ORDER BY j.created_at DESC LIMIT 1;
+  IF v_job IS NULL THEN
+    RAISE EXCEPTION 'Er is nog geen bon geprint voor deze productieorder.' USING ERRCODE = 'P0001';
+  END IF;
+  v_st := public.layouts_printjob_status(v_job);
+  IF v_st->>'status' IS DISTINCT FROM 'geprint' THEN
+    RAISE EXCEPTION 'De bon is nog niet geprint.' USING ERRCODE = 'P0001';
+  END IF;
+  v_res := public.productie_order_verwerken(p_productie_order_id);
+  INSERT INTO public.pick_station_logs(station_id, queue_item_id, action, detail)
+  VALUES (v_station, v_q, 'productie_verwerken', v_bron || jsonb_build_object('productieOrderId', p_productie_order_id, 'jobId', v_job, 'resultaat', v_res));
+  RETURN v_res;
+END $function$;
+
+CREATE OR REPLACE FUNCTION public.pickstation_productiebon_goedkeuren(p_device_key text, p_slug text, p_queue_id uuid)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_res jsonb;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_res := public.logistics_productiebon_goedkeuren_v2(p_queue_id, v_bron);
+  INSERT INTO public.pick_station_logs(station_id, queue_item_id, action, detail)
+  VALUES ((v_bron->>'stationId')::uuid, p_queue_id, 'productiebon_goedkeuren', v_bron || jsonb_build_object('resultaat', v_res));
+  RETURN v_res;
+END $function$;
+
+REVOKE ALL ON FUNCTION public.pickstation_productiebonnen(text, text, boolean, integer, integer) FROM PUBLIC;
+REVOKE ALL ON FUNCTION public.pickstation_productiebon_printen(text, text, uuid, text, boolean) FROM PUBLIC;
+REVOKE ALL ON FUNCTION public.pickstation_printjob_status(text, text, uuid) FROM PUBLIC;
+REVOKE ALL ON FUNCTION public.pickstation_productie_verwerken(text, text, uuid) FROM PUBLIC;
+REVOKE ALL ON FUNCTION public.pickstation_productiebon_goedkeuren(text, text, uuid) FROM PUBLIC;
+GRANT EXECUTE ON FUNCTION public.pickstation_productiebonnen(text, text, boolean, integer, integer) TO anon, authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.pickstation_productiebon_printen(text, text, uuid, text, boolean) TO anon, authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.pickstation_printjob_status(text, text, uuid) TO anon, authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.pickstation_productie_verwerken(text, text, uuid) TO anon, authenticated, service_role;
+GRANT EXECUTE ON FUNCTION public.pickstation_productiebon_goedkeuren(text, text, uuid) TO anon, authenticated, service_role;
+
+-- ===== 1.0.91 productiestation, Voorraad-stationverwerking, standaardstations =====
+-- Pickschermen 1.0.91: productiestation via Engine, verwerken via Voorraad-stationfunctie, standaardstations.
+ALTER TABLE public.pick_stations ADD COLUMN IF NOT EXISTS system_code text;
+CREATE UNIQUE INDEX IF NOT EXISTS uq_pick_stations_system_code ON public.pick_stations(system_code) WHERE system_code IS NOT NULL;
+
+-- system_code is vast: alleen de eigen standaardgegevens-functie mag hem zetten, daarna nooit wijzigen.
+CREATE OR REPLACE FUNCTION public.pick_stations_system_code_guard()
+ RETURNS trigger LANGUAGE plpgsql SET search_path TO 'public'
+AS $function$
+BEGIN
+  IF TG_OP = 'INSERT' THEN
+    IF NEW.system_code IS NOT NULL AND coalesce(current_setting('pick.defaults_apply', true), '') <> 'on' THEN
+      RAISE EXCEPTION 'Een standaardstation kun je niet zelf aanmaken.' USING ERRCODE = '42501';
+    END IF;
+  ELSIF NEW.system_code IS DISTINCT FROM OLD.system_code THEN
+    RAISE EXCEPTION 'De vaste code van een station kun je niet wijzigen.' USING ERRCODE = '42501';
+  END IF;
+  RETURN NEW;
+END $function$;
+DROP TRIGGER IF EXISTS pick_stations_system_code_guard ON public.pick_stations;
+CREATE TRIGGER pick_stations_system_code_guard BEFORE INSERT OR UPDATE ON public.pick_stations
+  FOR EACH ROW EXECUTE FUNCTION public.pick_stations_system_code_guard();
+
+-- Gebruik van een station: Engine-keuzes (als die functies bestaan) + open regels in de eigen wachtrij.
+-- Faalt nooit door de Engine: ontbrekend of fout → alleen de eigen controle.
+CREATE OR REPLACE FUNCTION public._pick_station_gebruik(p_station_id uuid)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_docs text[] := ARRAY[]::text[]; v_open bigint; v_r jsonb; e jsonb; v_t text; v_bron text := 'eigen';
+BEGIN
+  IF to_regprocedure('public.logistics_station_in_gebruik(uuid)') IS NOT NULL THEN
+    BEGIN
+      EXECUTE 'SELECT public.logistics_station_in_gebruik($1)' INTO v_r USING p_station_id;
+      v_bron := 'logistics_station_in_gebruik';
+      FOR e IN SELECT x FROM jsonb_array_elements(CASE WHEN jsonb_typeof(v_r) = 'array' THEN v_r
+                 WHEN jsonb_typeof(v_r->'documenten') = 'array' THEN v_r->'documenten' ELSE '[]'::jsonb END) x LOOP
+        v_t := CASE WHEN jsonb_typeof(e) = 'string' THEN e #>> '{}' ELSE coalesce(e->>'document', e->>'naam', e->>'name') END;
+        IF nullif(btrim(v_t), '') IS NOT NULL AND NOT (v_t = ANY(v_docs)) THEN v_docs := v_docs || btrim(v_t); END IF;
+      END LOOP;
+    EXCEPTION WHEN OTHERS THEN
+      RAISE WARNING 'pickschermen: logistics_station_in_gebruik mislukt (%): %', SQLSTATE, SQLERRM;
+      v_bron := 'eigen';
+    END;
+  END IF;
+  IF v_bron = 'eigen' AND to_regprocedure('public.logistics_productiebon_station()') IS NOT NULL THEN
+    BEGIN
+      EXECUTE 'SELECT public.logistics_productiebon_station()' INTO v_r;
+      IF v_r->>'station_id' = p_station_id::text THEN v_docs := v_docs || 'productiebonnen'::text; END IF;
+      v_bron := 'logistics_productiebon_station';
+    EXCEPTION WHEN OTHERS THEN
+      RAISE WARNING 'pickschermen: logistics_productiebon_station mislukt (%): %', SQLSTATE, SQLERRM;
+    END;
+  END IF;
+  SELECT count(*) INTO v_open FROM public.pick_queue q
+   WHERE q.station_id = p_station_id AND q.completed_at IS NULL AND q.cancelled_at IS NULL;
+  RETURN jsonb_build_object('documenten', to_jsonb(v_docs), 'open', v_open, 'bron', v_bron);
+END $function$;
+REVOKE ALL ON FUNCTION public._pick_station_gebruik(uuid) FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public._pick_station_gebruik(uuid) TO service_role;
+
+-- Beheerpagina (ingelogd): gebruik per station lezen.
+CREATE OR REPLACE FUNCTION public.pick_station_gebruik(p_station_ids uuid[])
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v jsonb := '{}'::jsonb; i uuid;
+BEGIN
+  IF auth.uid() IS NULL AND coalesce(auth.role(), '') <> 'service_role' THEN
+    RAISE EXCEPTION 'Geen toegang: log in om stationgebruik te lezen.' USING ERRCODE = '42501';
+  END IF;
+  FOREACH i IN ARRAY coalesce(p_station_ids[1:200], ARRAY[]::uuid[]) LOOP
+    v := v || jsonb_build_object(i::text, public._pick_station_gebruik(i));
+  END LOOP;
+  RETURN v;
+END $function$;
+REVOKE ALL ON FUNCTION public.pick_station_gebruik(uuid[]) FROM PUBLIC, anon;
+GRANT EXECUTE ON FUNCTION public.pick_station_gebruik(uuid[]) TO authenticated, service_role;
+
+-- Verwijderregel: standaardstation nooit; eigen station niet zolang gekozen of open regels.
+CREATE OR REPLACE FUNCTION public.pick_stations_delete_guard()
+ RETURNS trigger LANGUAGE plpgsql SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE g jsonb; v_docs text; v_open bigint; v_delen text[] := ARRAY[]::text[];
+BEGIN
+  IF OLD.system_code IS NOT NULL THEN
+    RAISE EXCEPTION 'Dit is een standaardstation; je kunt het hernoemen of uitzetten.' USING ERRCODE = '42501';
+  END IF;
+  g := public._pick_station_gebruik(OLD.id);
+  SELECT string_agg(x, ', ') INTO v_docs FROM jsonb_array_elements_text(coalesce(g->'documenten', '[]'::jsonb)) x;
+  v_open := coalesce((g->>'open')::bigint, 0);
+  IF v_docs IS NOT NULL THEN v_delen := v_delen || ('gekozen voor ' || v_docs); END IF;
+  IF v_open > 0 THEN v_delen := v_delen || (v_open || CASE WHEN v_open = 1 THEN ' open bon' ELSE ' open bonnen' END); END IF;
+  IF array_length(v_delen, 1) > 0 THEN
+    RAISE EXCEPTION 'Dit station is nog in gebruik (%). Kies eerst een ander station of zet het uit.', array_to_string(v_delen, ' / ')
+      USING ERRCODE = '42501';
+  END IF;
+  RETURN OLD;
+END $function$;
+REVOKE ALL ON FUNCTION public.pick_stations_delete_guard() FROM PUBLIC, anon, authenticated;
+DROP TRIGGER IF EXISTS pick_stations_delete_guard ON public.pick_stations;
+CREATE TRIGGER pick_stations_delete_guard BEFORE DELETE ON public.pick_stations
+  FOR EACH ROW EXECUTE FUNCTION public.pick_stations_delete_guard();
+
+-- Pickscherm: is dit (gekoppelde) station het productiestation van de Engine?
+CREATE OR REPLACE FUNCTION public.pickstation_productie_station(p_device_key text, p_slug text)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_r jsonb;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_r := public.logistics_productiebon_station();
+  RETURN jsonb_build_object(
+    'ingesteld', nullif(v_r->>'station_id', '') IS NOT NULL,
+    'productiestation', coalesce(v_r->>'station_id' = v_bron->>'stationId', false));
+END $function$;
+REVOKE ALL ON FUNCTION public.pickstation_productie_station(text, text) FROM PUBLIC;
+GRANT EXECUTE ON FUNCTION public.pickstation_productie_station(text, text) TO anon, authenticated, service_role;
+
+-- Verwerken via de Voorraad-stationfunctie; antwoord ongewijzigd doorgeven.
+CREATE OR REPLACE FUNCTION public.pickstation_productie_verwerken(p_device_key text, p_slug text, p_productie_order_id uuid)
+ RETURNS jsonb LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v_bron jsonb; v_station uuid; v_q uuid; v_job uuid; v_st jsonb; v_res jsonb;
+BEGIN
+  v_bron := public._pick_productie_bron(p_device_key, p_slug);
+  v_station := (v_bron->>'stationId')::uuid;
+  SELECT q.id INTO v_q FROM public.pick_queue q
+   WHERE q.station_id = v_station AND q.payload->>'productie_order_id' = p_productie_order_id::text AND q.cancelled_at IS NULL
+   ORDER BY q.created_at DESC LIMIT 1;
+  IF v_q IS NULL THEN
+    RAISE EXCEPTION 'Deze productiebon staat niet op dit station.' USING ERRCODE = '42501';
+  END IF;
+  SELECT j.job_id INTO v_job FROM public.pick_productiebon_jobs j
+   WHERE j.productie_order_id = p_productie_order_id AND j.station_id = v_station AND j.soort = 'print'
+   ORDER BY j.created_at DESC LIMIT 1;
+  IF v_job IS NULL THEN
+    RAISE EXCEPTION 'Er is nog geen bon geprint voor deze productieorder.' USING ERRCODE = 'P0001';
+  END IF;
+  v_st := public.layouts_printjob_status(v_job);
+  IF v_st->>'status' IS DISTINCT FROM 'geprint' THEN
+    RAISE EXCEPTION 'De bon is nog niet geprint.' USING ERRCODE = 'P0001';
+  END IF;
+  v_res := public.productie_order_verwerken_station(p_productie_order_id,
+    jsonb_build_object('stationId', v_bron->>'stationId', 'stationSlug', v_bron->>'stationSlug', 'deviceId', v_bron->>'deviceId'));
+  INSERT INTO public.pick_station_logs(station_id, queue_item_id, action, detail)
+  VALUES (v_station, v_q, 'productie_verwerken', v_bron || jsonb_build_object('productieOrderId', p_productie_order_id, 'jobId', v_job, 'resultaat', v_res));
+  RETURN v_res;
+END $function$;
+REVOKE ALL ON FUNCTION public.pickstation_productie_verwerken(text, text, uuid) FROM PUBLIC;
+GRANT EXECUTE ON FUNCTION public.pickstation_productie_verwerken(text, text, uuid) TO anon, authenticated, service_role;
+
+-- Standaardgegevens versie 2: bestaande functie uitlezen en alleen de stationsstappen toevoegen
+-- (beveiliging, search_path en rechten blijven exact zoals ze waren).
+DO $mig$
+DECLARE d text;
+BEGIN
+  d := pg_get_functiondef('public.pick_ensure_defaults_intern()'::regprocedure);
+  IF position('c_stations' IN d) > 0 THEN RETURN; END IF;
+  IF position('c_versie constant integer := 1;' IN d) = 0
+     OR position('= jsonb_array_length(c_koppelingen)' || chr(10) || '  THEN' IN d) = 0
+     OR position('  INSERT INTO public.pick_settings (id, device_key_required)' IN d) = 0 THEN
+    RAISE EXCEPTION 'pick_ensure_defaults_intern heeft een onverwachte vorm; niet aangepast.';
+  END IF;
+  d := replace(d, 'c_versie constant integer := 1;', 'c_versie constant integer := 2;' || chr(10) ||
+    '  c_stations constant jsonb := ''[{"system_code":"orders","name":"Orders","type":"orders","sort_order":10},{"system_code":"productie","name":"Productie","type":"production","sort_order":20}]'';');
+  d := replace(d, '= jsonb_array_length(c_koppelingen)' || chr(10) || '  THEN',
+    '= jsonb_array_length(c_koppelingen)' || chr(10) ||
+    '     AND (SELECT count(*) FROM public.pick_stations WHERE system_code IN (SELECT e->>''system_code'' FROM jsonb_array_elements(c_stations) e)) = jsonb_array_length(c_stations)' || chr(10) || '  THEN');
+  d := replace(d, '  INSERT INTO public.pick_settings (id, device_key_required)',
+    '  -- Standaardstations: alleen aanmaken als er nog geen station met die system_code is; bestaande nooit aanpassen.' || chr(10) ||
+    '  INSERT INTO public.pick_stations (name, system_code, type_id, sort_order, active)' || chr(10) ||
+    '  SELECT e->>''name'', e->>''system_code'', (SELECT st.id FROM public.pick_station_types st WHERE st.code = e->>''type'' LIMIT 1), (e->>''sort_order'')::int, true' || chr(10) ||
+    '    FROM jsonb_array_elements(c_stations) e' || chr(10) ||
+    '   WHERE NOT EXISTS (SELECT 1 FROM public.pick_stations p WHERE p.system_code = e->>''system_code'')' || chr(10) ||
+    '  ON CONFLICT DO NOTHING;' || chr(10) ||
+    '  GET DIAGNOSTICS n = ROW_COUNT;' || chr(10) ||
+    '  v_res := v_res || jsonb_build_object(''stations_aangemaakt'', n);' || chr(10) || chr(10) ||
+    '  INSERT INTO public.pick_settings (id, device_key_required)');
+  EXECUTE d;
+END $mig$;
+REVOKE ALL ON FUNCTION public.pick_ensure_defaults_intern() FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public.pick_ensure_defaults_intern() TO service_role;
+
+-- ===== 1.0.92 productiebon niet claimen buiten productiestation, standaardstations alleen in lege shell =====
+-- Pickschermen 1.0.92
+CREATE OR REPLACE FUNCTION public._pick_is_productiestation(p_station_id uuid)
+ RETURNS boolean LANGUAGE plpgsql VOLATILE SECURITY DEFINER SET search_path TO 'public'
+AS $function$
+DECLARE v jsonb;
+BEGIN
+  IF p_station_id IS NULL OR to_regprocedure('public.logistics_productiebon_station()') IS NULL THEN RETURN false; END IF;
+  BEGIN
+    EXECUTE 'SELECT public.logistics_productiebon_station()' INTO v;
+  EXCEPTION WHEN OTHERS THEN
+    RAISE WARNING 'pickschermen: logistics_productiebon_station mislukt (%): %', SQLSTATE, SQLERRM;
+    RETURN false;
+  END;
+  RETURN coalesce(v->>'station_id' = p_station_id::text, false);
+END $function$;
+REVOKE ALL ON FUNCTION public._pick_is_productiestation(uuid) FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public._pick_is_productiestation(uuid) TO service_role;
+
+DO $mig$
+DECLARE d text;
+  c_old constant text := 'COALESCE(q.payload->>''printbaar'', ''true'') <> ''false''';
+  c_new constant text := 'COALESCE(q.payload->>''printbaar'', ''true'') <> ''false'' AND NOT (q.payload ? ''productie_order_id'' AND NOT public._pick_is_productiestation(_station_id))';
+BEGIN
+  -- Volgende document
+  d := pg_get_functiondef('public.pick_claim_next_document(uuid,uuid,text,text,integer,date)'::regprocedure);
+  IF position('_pick_is_productiestation' IN d) = 0 THEN
+    IF position(c_old IN d) = 0 THEN RAISE EXCEPTION 'pick_claim_next_document onverwachte vorm'; END IF;
+    EXECUTE replace(d, c_old, c_new);
+  END IF;
+  -- Order vastzetten (Print volgende order)
+  d := pg_get_functiondef('public._pick_claim_order_core(uuid,text,text[],text,date,integer)'::regprocedure);
+  IF position('_pick_is_productiestation' IN d) = 0 THEN
+    IF position(c_old IN d) = 0 THEN RAISE EXCEPTION '_pick_claim_order_core onverwachte vorm'; END IF;
+    EXECUTE replace(d, c_old, c_new);
+  END IF;
+  -- Eén document vastzetten
+  d := pg_get_functiondef('public.pick_claim_document(uuid,uuid,uuid,text,integer)'::regprocedure);
+  IF position('_pick_is_productiestation' IN d) = 0 THEN
+    IF position('  PERFORM public.pick_assert_printable(item);' IN d) = 0 THEN RAISE EXCEPTION 'pick_claim_document onverwachte vorm'; END IF;
+    EXECUTE replace(d, '  PERFORM public.pick_assert_printable(item);',
+      '  PERFORM public.pick_assert_printable(item);' || chr(10) ||
+      '  IF item.payload ? ''productie_order_id'' AND NOT public._pick_is_productiestation(COALESCE(_station_id, item.station_id)) THEN' || chr(10) ||
+      '    RAISE EXCEPTION ''Deze productiebon hoort op het productiestation.'' USING ERRCODE = ''P0001'';' || chr(10) ||
+      '  END IF;');
+  END IF;
+  -- Standaardstations alleen in een lege shell
+  d := pg_get_functiondef('public.pick_ensure_defaults_intern()'::regprocedure);
+  IF position('c_versie constant integer := 2;' IN d) > 0 THEN
+    IF position('     AND (SELECT count(*) FROM public.pick_stations WHERE system_code IN (SELECT e->>''system_code'' FROM jsonb_array_elements(c_stations) e)) = jsonb_array_length(c_stations)' IN d) = 0
+       OR position('   WHERE NOT EXISTS (SELECT 1 FROM public.pick_stations p WHERE p.system_code = e->>''system_code'')' IN d) = 0 THEN
+      RAISE EXCEPTION 'pick_ensure_defaults_intern onverwachte vorm';
+    END IF;
+    d := replace(d, 'c_versie constant integer := 2;', 'c_versie constant integer := 3;');
+    d := replace(d, '     AND (SELECT count(*) FROM public.pick_stations WHERE system_code IN (SELECT e->>''system_code'' FROM jsonb_array_elements(c_stations) e)) = jsonb_array_length(c_stations)',
+                    '     AND EXISTS (SELECT 1 FROM public.pick_stations)');
+    d := replace(d, '   WHERE NOT EXISTS (SELECT 1 FROM public.pick_stations p WHERE p.system_code = e->>''system_code'')',
+                    '   WHERE NOT EXISTS (SELECT 1 FROM public.pick_stations p WHERE p.system_code = e->>''system_code'')' || chr(10) ||
+                    '     AND NOT EXISTS (SELECT 1 FROM public.pick_stations p2 WHERE p2.system_code IS DISTINCT FROM e->>''system_code'' AND (p2.system_code IS NULL OR p2.system_code NOT IN (SELECT x->>''system_code'' FROM jsonb_array_elements(c_stations) x)))');
+    EXECUTE d;
+  END IF;
+END $mig$;
+REVOKE ALL ON FUNCTION public.pick_ensure_defaults_intern() FROM PUBLIC, anon, authenticated;
+GRANT EXECUTE ON FUNCTION public.pick_ensure_defaults_intern() TO service_role;