@fayz-ai/db 0.20.1 → 0.22.0

package/migrations/166_o_pacote_diz_quanto_vale_cada_servico_dentro_dele.sql

@@ -0,0 +1,336 @@
+-- ---------------------------------------------------------------------------
+-- 166 — o pacote diz quanto vale cada serviço DENTRO dele.
+--
+-- A 155 abriu a porta do pacote; o porte trouxe as duas tabelas com preço,
+-- sessões e validade, e parou aí. O que ficou de fora é justamente o que faz um
+-- pacote ser um pacote: cada linha dele tem DOIS preços.
+--
+--   `unit_price`    — o valor de tabela do serviço. É a base da COMISSÃO do
+--                     profissional, e é o lado esquerdo da conta da economia.
+--   `package_price` — quanto aquele serviço vale DENTRO deste pacote. É o que
+--                     o cliente paga por ele, e é o que a nota registra.
+--
+-- Sem os dois, o preço do pacote era um número solto: a tela de venda tinha de
+-- repartir o total entre os serviços por regra de três sobre o preço de tabela
+-- — um palpite razoável, e um palpite. Com eles, a casa decide qual serviço
+-- absorve o desconto, e a comissão sai do valor certo.
+--
+-- ── O PREÇO DO PACOTE PASSA A SER A SOMA, e não um campo digitado ──────────
+--
+-- É o que o V1 faz (`total_price = Σ package_price × quantity`, ver
+-- ServicePackageForm) e é a única forma de os dois nunca divergirem. Aqui os
+-- itens gravam por fora do formulário do pacote — cada linha é uma linha de
+-- outra tabela —, então quem mantém a soma é o BANCO, não a tela.
+--
+-- O pacote SEM itens continua com o preço digitado: ele é um bloco solto de
+-- sessões («10 sessões, escolhe na hora»), e zerá-lo seria apagar o que a casa
+-- cadastrou.
+--
+-- ── A validade em meses, com os dias atrás dela ────────────────────────────
+--
+-- O V1 pergunta MESES e grava os dois (`validity_days = months × 30`). Os dias
+-- já existem aqui e são o que o vencimento vai ler; os meses são a pergunta.
+-- Um trigger mantém o espelho, pela mesma razão da soma: dois campos para a
+-- mesma coisa só sobrevivem se ninguém puder escrever um sem o outro.
+-- ---------------------------------------------------------------------------
+
+-- ── As linhas ──────────────────────────────────────────────────────────────
+ALTER TABLE public.service_package_items
+  -- Serviço ou produto. `products` guarda os dois desde a 191, e é o `kind`
+  -- dela que diz qual — mas a LINHA do pacote precisa dizer o que foi escolhido
+  -- para que a tela ofereça o catálogo certo em cada linha.
+  ADD COLUMN IF NOT EXISTS item_type text NOT NULL DEFAULT 'service',
+  ADD COLUMN IF NOT EXISTS unit_price numeric(14,2) NOT NULL DEFAULT 0,
+  ADD COLUMN IF NOT EXISTS package_price numeric(14,2) NOT NULL DEFAULT 0,
+  -- O valor que sai na NOTA quando a sessão é consumida. Vazio = usa o do
+  -- pacote; só a casa que emite nota por consumo precisa separá-los.
+  ADD COLUMN IF NOT EXISTS fiscal_unit_price numeric(14,2);
+
+DO $$
+BEGIN
+  ALTER TABLE public.service_package_items
+    ADD CONSTRAINT service_package_items_item_type_check
+    CHECK (item_type IN ('service', 'product'));
+EXCEPTION WHEN duplicate_object THEN NULL;
+END $$;
+
+DO $$
+BEGIN
+  ALTER TABLE public.service_package_items
+    ADD CONSTRAINT service_package_items_prices_check
+    CHECK (unit_price >= 0 AND package_price >= 0
+           AND (fiscal_unit_price IS NULL OR fiscal_unit_price >= 0));
+EXCEPTION WHEN duplicate_object THEN NULL;
+END $$;
+
+COMMENT ON COLUMN public.service_package_items.unit_price IS
+  'O valor de tabela do serviço — base da comissão do profissional, e o lado esquerdo da economia. Item com 0 não gera comissão (RN do V1).';
+COMMENT ON COLUMN public.service_package_items.package_price IS
+  'Quanto este serviço vale DENTRO do pacote. A soma destes × quantity é o preço do pacote.';
+COMMENT ON COLUMN public.service_package_items.fiscal_unit_price IS
+  'O valor da nota na hora do consumo. NULL = o mesmo do pacote.';
+
+-- ── O que já existia ──────────────────────────────────────────────────────
+--
+-- As linhas antigas nasceram sem preço nenhum, e o preço do pacote delas é um
+-- número real que alguém digitou — em conta de cliente de verdade. Copiar o
+-- catálogo nos dois lados zeraria o desconto e, com o trigger abaixo, REESCREVERIA
+-- o preço do pacote para a soma da tabela: um pacote de R$ 400 viraria R$ 500 na
+-- primeira vez que alguém tocasse numa linha dele.
+--
+-- Então: `unit_price` recebe o catálogo (é o que ele é), e `package_price` recebe
+-- o preço do pacote REPARTIDO entre as linhas, proporcional ao peso de cada uma
+-- na tabela. O total continua sendo exatamente o que era, e o desconto aparece
+-- sozinho — ele sempre esteve lá, só não tinha onde ser escrito.
+WITH alvo AS (
+  SELECT i.id,
+         i.quantity,
+         COALESCE(p.price, 0) AS catalogo,
+         sp.price             AS preco_pacote,
+         sum(COALESCE(p.price, 0) * i.quantity) OVER (PARTITION BY i.package_id, i.tenant_id) AS tabela,
+         sum(i.quantity)                        OVER (PARTITION BY i.package_id, i.tenant_id) AS qtd_total
+    FROM public.service_package_items i
+    JOIN public.service_packages sp
+      ON sp.id = i.package_id AND sp.tenant_id = i.tenant_id
+    LEFT JOIN public.products p ON p.id = i.product_id
+   WHERE i.unit_price = 0
+     AND i.package_price = 0
+)
+UPDATE public.service_package_items i
+   SET unit_price    = a.catalogo,
+       -- Catálogo todo zerado (ou ausente) divide por quantidade: é a única
+       -- outra resposta possível, e é melhor que jogar tudo na primeira linha.
+       package_price = round(
+         (a.preco_pacote * CASE
+            WHEN a.tabela > 0 THEN (a.catalogo * a.quantity) / a.tabela
+            WHEN a.qtd_total > 0 THEN a.quantity::numeric / a.qtd_total
+            ELSE 0
+          END) / NULLIF(a.quantity, 0), 2)
+  FROM alvo a
+ WHERE i.id = a.id;
+
+-- ── O cabeçalho ────────────────────────────────────────────────────────────
+ALTER TABLE public.service_packages
+  -- A validade é uma ESCOLHA, não um campo vazio: «sem validade» e «ainda não
+  -- preenchi» são respostas diferentes, e só o interruptor as separa.
+  ADD COLUMN IF NOT EXISTS validity_enabled boolean NOT NULL DEFAULT false,
+  ADD COLUMN IF NOT EXISTS validity_months integer,
+  ADD COLUMN IF NOT EXISTS commission_percent numeric(5,2) NOT NULL DEFAULT 0,
+  -- Vendedor pode mexer no preço na hora da venda. Sem isto, o balcão não tem
+  -- como fechar um pacote com o desconto que o dono autorizou de boca.
+  ADD COLUMN IF NOT EXISTS allow_price_edit_on_sale boolean NOT NULL DEFAULT false,
+  -- O recibo sai sem o valor: pacote de cortesia, ou cliente que não quer o
+  -- preço impresso no papel que leva para casa.
+  ADD COLUMN IF NOT EXISTS hide_value_on_receipt boolean NOT NULL DEFAULT false,
+  -- DERIVADO, e guardado assim mesmo: é o que o V1 faz, e é o número que a
+  -- lista de pacotes mostra sem abrir cada um para somar as linhas dele.
+  ADD COLUMN IF NOT EXISTS discount_percentage numeric(5,2);
+
+DO $$
+BEGIN
+  ALTER TABLE public.service_packages
+    ADD CONSTRAINT service_packages_validity_months_check
+    CHECK (validity_months IS NULL OR validity_months > 0);
+EXCEPTION WHEN duplicate_object THEN NULL;
+END $$;
+
+DO $$
+BEGIN
+  ALTER TABLE public.service_packages
+    ADD CONSTRAINT service_packages_commission_percent_check
+    CHECK (commission_percent >= 0 AND commission_percent <= 100);
+EXCEPTION WHEN duplicate_object THEN NULL;
+END $$;
+
+-- O que já tinha dias vira meses, e nasce com a validade ligada: ela estava
+-- preenchida, então alguém a quis.
+UPDATE public.service_packages
+   SET validity_enabled = true,
+       validity_months  = GREATEST(1, round(validity_days / 30.0)::integer)
+ WHERE validity_days IS NOT NULL
+   AND validity_months IS NULL;
+
+-- ---------------------------------------------------------------------------
+-- Os dois espelhos, mantidos pelo banco.
+-- ---------------------------------------------------------------------------
+
+-- `search_path` explícito e qualificado: função sem isso compila no DDL e
+-- estoura na primeira chamada quando o chamador tem outro caminho.
+CREATE OR REPLACE FUNCTION public.service_packages_sync_validity()
+RETURNS trigger
+LANGUAGE plpgsql
+SECURITY INVOKER
+SET search_path = ''
+AS $$
+BEGIN
+  IF NEW.validity_enabled AND NEW.validity_months IS NOT NULL THEN
+    NEW.validity_days := NEW.validity_months * 30;
+  ELSIF NOT NEW.validity_enabled THEN
+    NEW.validity_days := NULL;
+    NEW.validity_months := NULL;
+  END IF;
+  RETURN NEW;
+END $$;
+
+DROP TRIGGER IF EXISTS service_packages_sync_validity ON public.service_packages;
+CREATE TRIGGER service_packages_sync_validity
+  BEFORE INSERT OR UPDATE OF validity_enabled, validity_months
+  ON public.service_packages
+  FOR EACH ROW EXECUTE FUNCTION public.service_packages_sync_validity();
+
+/*
+ * A LINHA NOVA NASCE COM O PREÇO DE TABELA nos dois lados.
+ *
+ * Quem monta um pacote escolhe o serviço e só então decide o desconto: começar
+ * com os dois campos em zero obriga a digitar o preço que o catálogo já sabe, e
+ * uma linha esquecida em zero não cobra nada e não paga comissão nenhuma.
+ *
+ * No banco, e não na tela, porque são três superfícies inserindo aqui — a grade
+ * do pacote, o importador e o porte — e um padrão que vale só numa delas não é
+ * padrão.
+ */
+CREATE OR REPLACE FUNCTION public.service_package_items_default_prices()
+RETURNS trigger
+LANGUAGE plpgsql
+SECURITY INVOKER
+SET search_path = ''
+AS $$
+DECLARE
+  v_catalogo numeric;
+BEGIN
+  IF NEW.unit_price > 0 OR NEW.package_price > 0 THEN
+    RETURN NEW;
+  END IF;
+  SELECT p.price INTO v_catalogo
+    FROM public.products p
+   WHERE p.id = NEW.product_id AND p.tenant_id = NEW.tenant_id;
+  IF v_catalogo IS NULL OR v_catalogo <= 0 THEN
+    RETURN NEW;
+  END IF;
+  NEW.unit_price := v_catalogo;
+  NEW.package_price := v_catalogo;
+  RETURN NEW;
+END $$;
+
+DROP TRIGGER IF EXISTS service_package_items_default_prices ON public.service_package_items;
+CREATE TRIGGER service_package_items_default_prices
+  BEFORE INSERT ON public.service_package_items
+  FOR EACH ROW EXECUTE FUNCTION public.service_package_items_default_prices();
+
+/*
+ * O preço do pacote é a soma das linhas dele.
+ *
+ * SECURITY DEFINER porque ele escreve no PAI a partir de um trigger no FILHO:
+ * quem tem permissão de mexer no item nem sempre tem a de editar o pacote, e
+ * uma atualização recusada pela RLS deixaria o preço mentindo. O recorte é o
+ * tenant da própria linha — não há parâmetro vindo de fora.
+ */
+CREATE OR REPLACE FUNCTION public.service_packages_resum()
+RETURNS trigger
+LANGUAGE plpgsql
+SECURITY DEFINER
+SET search_path = ''
+AS $$
+DECLARE
+  v_package uuid := COALESCE(NEW.package_id, OLD.package_id);
+  v_tenant  uuid := COALESCE(NEW.tenant_id, OLD.tenant_id);
+  v_pacote  numeric;
+  v_tabela  numeric;
+  v_linhas  integer;
+BEGIN
+  SELECT COALESCE(sum(i.package_price * i.quantity), 0),
+         COALESCE(sum(i.unit_price * i.quantity), 0),
+         count(*)
+    INTO v_pacote, v_tabela, v_linhas
+    FROM public.service_package_items i
+   WHERE i.package_id = v_package
+     AND i.tenant_id = v_tenant;
+
+  -- Pacote sem linha nenhuma mantém o preço digitado: ele é um bloco solto de
+  -- sessões, e zerá-lo apagaria o que a casa cadastrou.
+  IF v_linhas = 0 THEN
+    RETURN NULL;
+  END IF;
+
+  UPDATE public.service_packages
+     SET price = v_pacote,
+         discount_percentage = CASE
+           WHEN v_tabela > 0 AND v_tabela > v_pacote
+             THEN round(((v_tabela - v_pacote) / v_tabela) * 100, 2)
+           ELSE NULL
+         END,
+         updated_at = now()
+   WHERE id = v_package
+     AND tenant_id = v_tenant;
+
+  RETURN NULL;
+END $$;
+
+REVOKE ALL ON FUNCTION public.service_packages_resum() FROM PUBLIC, anon, authenticated;
+
+DROP TRIGGER IF EXISTS service_package_items_resum ON public.service_package_items;
+CREATE TRIGGER service_package_items_resum
+  AFTER INSERT OR DELETE OR UPDATE OF package_price, unit_price, quantity
+  ON public.service_package_items
+  FOR EACH ROW EXECUTE FUNCTION public.service_packages_resum();
+
+/*
+ * O PREÇO DIGITADO NÃO GANHA DA SOMA.
+ *
+ * O formulário do pacote tem um campo de preço e, abaixo dele, a grade das
+ * linhas — que grava por fora. Editar uma linha mudava o preço no banco e o
+ * campo na tela continuava com o número velho; salvar o formulário então
+ * regravava o velho por cima, e a soma que o cliente vai pagar perdia para um
+ * campo que ninguém tocou.
+ *
+ * Aqui, e não na tela, porque o mesmo vale para o importador, para a API e para
+ * qualquer outra porta: com linhas, o preço É a soma delas.
+ */
+CREATE OR REPLACE FUNCTION public.service_packages_price_from_items()
+RETURNS trigger
+LANGUAGE plpgsql
+SECURITY INVOKER
+SET search_path = ''
+AS $$
+DECLARE
+  v_pacote numeric;
+  v_linhas integer;
+BEGIN
+  SELECT COALESCE(sum(i.package_price * i.quantity), 0), count(*)
+    INTO v_pacote, v_linhas
+    FROM public.service_package_items i
+   WHERE i.package_id = NEW.id AND i.tenant_id = NEW.tenant_id;
+
+  -- Sem linhas o preço é dele: o pacote é um bloco solto de sessões.
+  IF v_linhas > 0 THEN
+    NEW.price := v_pacote;
+  END IF;
+  RETURN NEW;
+END $$;
+
+DROP TRIGGER IF EXISTS service_packages_price_from_items ON public.service_packages;
+CREATE TRIGGER service_packages_price_from_items
+  BEFORE UPDATE OF price ON public.service_packages
+  FOR EACH ROW EXECUTE FUNCTION public.service_packages_price_from_items();
+
+-- O DESCONTO dos pacotes que já existiam, sem mexer no preço deles.
+--
+-- Recalcular o preço aqui seria trocar um número que alguém digitou pela soma
+-- de um rateio arredondado — um centavo de diferença numa conta de cliente. A
+-- soma passa a valer a partir da próxima vez que alguém editar uma linha, que é
+-- quando ela deixa de ser um palpite.
+UPDATE public.service_packages sp
+   SET discount_percentage = CASE
+         WHEN t.tabela > 0 AND t.tabela > t.pacote
+           THEN round(((t.tabela - t.pacote) / t.tabela) * 100, 2)
+         ELSE NULL
+       END
+  FROM (
+    SELECT i.package_id, i.tenant_id,
+           sum(i.package_price * i.quantity) AS pacote,
+           sum(i.unit_price * i.quantity)    AS tabela
+      FROM public.service_package_items i
+     GROUP BY i.package_id, i.tenant_id
+  ) t
+ WHERE t.package_id = sp.id
+   AND t.tenant_id = sp.tenant_id;