E04 修到零被拒线,harness 补七刀:跨进程租约与广播桥、原子写、引用墙、对话区按序号排

活动侧(E04 2.1.0 → 2.1.9,I01 1.2.2):
- 覆盖闭合成为机检:基座新增 distinct 读数,「计划盖住的客户数 = 候选行数」钉进
  S3 收步 / S4 哨兵 / 放行 L2;人加的候选客户不再被整单无视
- 「关键人待识别」占位句式全链退役:查无联系人先发数据录入卡收人;契约新增 refersTo,
  计划/回执的 contact_code 只许引用真实存在的联系人(安装期核引用目标)
- 台账更新确认摆全落库面:客户档案/联系人档案两张落库预览(touched: 数据源,
  正式现值 + 草稿叠加),可补改、可加行(自增主键由基座续号);姓名升必填
- 更新明细:update_key 位置键 + 「同一处只留一条」L2;依据写人话不带机器键;
  标题旁不摆单号;判据与文案不夹字段名;行标识去掉单标识那一段
- 回执骨架 = 计划行数钉进 S3 收步与 S4 哨兵;重做分支不许删计划凑数
- 阶段刻度对齐文档 7 步;起单样例预填满

基座侧:
- 两个后端连同一个库:task-claim 跨进程租约(迁移 0030)+ Postgres LISTEN/NOTIFY
  广播桥;对话区按任务内记忆序号排,不按墙上时钟;并卡「刚说过话」按记忆序列判紧邻
- 多行 write 整批先验后写(dryRun),被拒 = 一行都没落
- 决策卡意见与本单草稿字面比对,归属以观察进轨迹(note-anchors)
- 括号栈补「补闭括号」两形(少一个 } / 行对象没关直接跟下一行)
- 件上加行:空着的自增主键直进续号,不从别的行借号;未落下的行点名回给前端
- 人答复落库那一刻就把 runtime 翻 running(task.wake),两块同帧变脸
- 试跑单可落真库(land_master,迁移 0031,默认开);数据域按活动分组;
  JSON 列不再是 [object Object];按钮键感 + 在办进度条 + 防抖
- 报价链 A1–A7 从系统卸载(只卸不删源码),种子只装 E04/I01

契约变更(api-report 已刷新):FieldDeclaration.distinct / refersTo,
objectDeclaration.file,landMaster,unkeyed,assetFiles,ledgerByActivityRoute。
1700 测 / typecheck / lint / depcruise / api:check 绿。

Co-Authored-By: Claude Fable 5 <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01EEJX8Z7CHejvwmDQyPQuBX

db/migrations/0030_task_advancing_lease.sql

@@ -0,0 +1,16 @@
+-- 任务推进的**跨进程租约** —— 两个后端连同一个库时,一张单只许一个进程在推。
+--
+-- 起因(2026-08-24,柴浩那一单熔断):本机与局域网另一台机器上跑着两个后端,
+-- 连的是同一个库。两边的推进器各自 2 秒扫一次「running 的单」,同时推同一张 ——
+-- 而互斥锁是**进程内**的(`task-lock.ts` 开头写着「MVP 单进程…多进程部署时再叠一层」)。
+-- 于是两拍并发跑在同一份 `sys.loop_state` 上,**后写的整份覆盖先写的**:
+-- 「给 S2 发过卡」这个事实(worldTouched)被抹掉,S1 被收了两遍。
+-- 随后 finish 那道门说「从没给它发过卡」,重发那道门说「这张卡人已答过」——
+-- 两堵墙对着撞,连拒五拍熔断。
+--
+-- 租约怎么用:推之前 `update … where advancing_until is null or advancing_until < now()`
+-- 抢到才推(RETURNING 有行 = 我抢到了),推完清空。**带过期时间**是为了进程崩了不锁死:
+-- 租约一过,别的进程照样接得上。
+alter table sys.task add column if not exists advancing_until timestamptz;
+-- 推进器每轮扫的就是「running 且没被别人占着」,给它一条能走的索引
+create index if not exists task_advancing_idx on sys.task (runtime, advancing_until);

db/migrations/0031_task_land_master.sql

@@ -0,0 +1,14 @@
+-- 试跑单也**落真库**的开关 —— 一列布尔,默认关。
+--
+-- 起因(2026-08-24 用户):「活动执行后数据并没有真实入到后台数据库里面,数据需要真实入库」。
+-- 查下来是设计使然:`ledger-service` 那道门挡的是**主数据** ——
+-- 试跑往 `customer.profile` 建一位客户,那位客户就永久留在库里,
+-- 「新客户来函」那条样例第二次跑就成了老客户,这条路从此试不出来。单据不挡。
+--
+-- 可这条保护在**演示/联调**时正好拦住了要看的东西:E04 的台账更新明细白纸黑字写着
+-- 「亲密度 3 → 10」,而 `customer.contact` 里还是 3 —— 单据说改了,主数据没改,
+-- 两份事实对不上,谁看谁糊涂。
+--
+-- 所以给试跑一个**明说**的开关:起单时勾了就连主数据一起落,不勾照旧只落单据。
+-- 默认 false —— 保护不变,要破例得有人按一下。
+alter table sys.task add column if not exists land_master boolean not null default false;

db/migrations/meta/_journal.json

@@ -211,6 +211,20 @@
       "when": 1785130120177,
       "tag": "0029_task_asset_file",
       "breakpoints": true
+    },
+    {
+      "idx": 30,
+      "version": "7",
+      "when": 1785130120178,
+      "tag": "0030_task_advancing_lease",
+      "breakpoints": true
+    },
+    {
+      "idx": 31,
+      "version": "7",
+      "when": 1785130120179,
+      "tag": "0031_task_land_master",
+      "breakpoints": true
     }
   ]
 }