pgkiln 0.70.0 → 0.71.0

package/src/builder/i18n/de.ts

@@ -285,6 +285,7 @@ export const de: BuilderMessages = {
   'app.tab.api': 'REST-API',
   'app.tab.settings': 'Einstellungen',
   'app.tab.advisor': 'Advisor',
+  'app.tab.utilities': 'Dienstprogramme',
   'app.lock_refused': 'Änderungen werden abgelehnt, bis die Sperre aufgehoben ist.',
   'app.search_pages': 'Seiten durchsuchen',
   'app.search_placeholder': 'Seitenname oder -nummer',
@@ -318,6 +319,9 @@ export const de: BuilderMessages = {
   'app.table_or_view': 'Tabelle oder View (Mastertabelle für Master-Detail)',
   'app.no_access': '{table} (kein Zugriff für {role})',
   'app.ai_pages': 'Seiten mit KI erstellen',
+  'app.all_page_types': "Alle Seitentypen, Funktionen und Kopien",
+  'app.task.add_feature': "Funktionsseite hinzufügen",
+  'app.task.copy_page': "Seite als Kopie erstellen",
   'app.ai_pages_note': '(beschreiben Sie sie mit eigenen Worten)',
   'app.blank': 'Leere Seite erstellen',
   'app.page_number': 'Seitennummer',

package/src/builder/i18n/en.ts

@@ -288,6 +288,7 @@ export const en = {
   'app.tab.api': 'REST API',
   'app.tab.settings': 'Settings',
   'app.tab.advisor': 'Advisor',
+  'app.tab.utilities': 'Utilities',
   'app.lock_refused': 'Changes are refused until it is unlocked.',
   'app.search_pages': 'Search pages',
   'app.search_placeholder': 'Page name or number',
@@ -321,6 +322,9 @@ export const en = {
   'app.table_or_view': 'Table or view (master table for master detail)',
   'app.no_access': '{table} (no access for {role})',
   'app.ai_pages': 'Create pages with AI',
+  'app.all_page_types': "All page types, features and copies",
+  'app.task.add_feature': "Add feature page",
+  'app.task.copy_page': "Create page as copy",
   'app.ai_pages_note': '(describe them in your own words)',
   'app.blank': 'Create blank page',
   'app.page_number': 'Page number',

package/src/builder/i18n/es.ts

@@ -285,6 +285,7 @@ export const es: BuilderMessages = {
   'app.tab.api': 'API REST',
   'app.tab.settings': 'Configuración',
   'app.tab.advisor': 'Asesor',
+  'app.tab.utilities': 'Utilidades',
   'app.lock_refused': 'Los cambios se rechazan hasta que se desbloquee.',
   'app.search_pages': 'Buscar páginas',
   'app.search_placeholder': 'Nombre o número de página',
@@ -318,6 +319,9 @@ export const es: BuilderMessages = {
   'app.table_or_view': 'Tabla o vista (tabla maestra para maestro-detalle)',
   'app.no_access': '{table} (sin acceso para {role})',
   'app.ai_pages': 'Crear páginas con IA',
+  'app.all_page_types': "Todos los tipos de página, funciones y copias",
+  'app.task.add_feature': "Agregar página de función",
+  'app.task.copy_page': "Crear página como copia",
   'app.ai_pages_note': '(descríbalas con sus propias palabras)',
   'app.blank': 'Crear página en blanco',
   'app.page_number': 'Número de página',

package/src/builder/i18n/fr.ts

@@ -285,6 +285,7 @@ export const fr: BuilderMessages = {
   'app.tab.api': 'API REST',
   'app.tab.settings': 'Paramètres',
   'app.tab.advisor': 'Conseiller',
+  'app.tab.utilities': 'Utilitaires',
   'app.lock_refused': "Les modifications sont refusées jusqu'à son déverrouillage.",
   'app.search_pages': 'Rechercher des pages',
   'app.search_placeholder': 'Nom ou numéro de page',
@@ -318,6 +319,9 @@ export const fr: BuilderMessages = {
   'app.table_or_view': 'Table ou vue (table maître pour maître-détail)',
   'app.no_access': '{table} (aucun accès pour {role})',
   'app.ai_pages': "Créer des pages avec l'IA",
+  'app.all_page_types': "Tous les types de page, fonctionnalités et copies",
+  'app.task.add_feature': "Ajouter une page de fonctionnalité",
+  'app.task.copy_page': "Créer une page par copie",
   'app.ai_pages_note': '(décrivez-les avec vos propres mots)',
   'app.blank': 'Créer une page vierge',
   'app.page_number': 'Numéro de page',

package/src/builder/i18n/it.ts

@@ -285,6 +285,7 @@ export const it: BuilderMessages = {
   'app.tab.api': 'API REST',
   'app.tab.settings': 'Impostazioni',
   'app.tab.advisor': 'Advisor',
+  'app.tab.utilities': 'Utilità',
   'app.lock_refused': 'Le modifiche vengono rifiutate finché non viene sbloccata.',
   'app.search_pages': 'Cerca pagine',
   'app.search_placeholder': 'Nome o numero della pagina',
@@ -318,6 +319,9 @@ export const it: BuilderMessages = {
   'app.table_or_view': 'Tabella o vista (tabella master per master-dettaglio)',
   'app.no_access': '{table} (nessun accesso per {role})',
   'app.ai_pages': 'Crea pagine con l’AI',
+  'app.all_page_types': "Tutti i tipi di pagina, funzionalità e copie",
+  'app.task.add_feature': "Aggiungi pagina di funzionalità",
+  'app.task.copy_page': "Crea pagina come copia",
   'app.ai_pages_note': '(descriverle con parole proprie)',
   'app.blank': 'Crea pagina vuota',
   'app.page_number': 'Numero di pagina',

package/src/builder/i18n/ja.ts

@@ -285,6 +285,7 @@ export const ja: BuilderMessages = {
   'app.tab.api': 'REST API',
   'app.tab.settings': '設定',
   'app.tab.advisor': 'アドバイザ',
+  'app.tab.utilities': 'ユーティリティ',
   'app.lock_refused': 'ロックが解除されるまで、変更は拒否されます。',
   'app.search_pages': 'ページの検索',
   'app.search_placeholder': 'ページ名または番号',
@@ -318,6 +319,9 @@ export const ja: BuilderMessages = {
   'app.table_or_view': '表またはビュー（マスター詳細の場合はマスター表）',
   'app.no_access': '{table}（{role} にはアクセス権なし）',
   'app.ai_pages': 'AI でページを作成',
+  'app.all_page_types': "すべてのページタイプ、機能、コピー",
+  'app.task.add_feature': "機能ページを追加",
+  'app.task.copy_page': "コピーとしてページを作成",
   'app.ai_pages_note': '（自分の言葉で説明してください）',
   'app.blank': '空白ページの作成',
   'app.page_number': 'ページ番号',

package/src/builder/i18n/ko.ts

@@ -285,6 +285,7 @@ export const ko: BuilderMessages = {
   'app.tab.api': 'REST API',
   'app.tab.settings': '설정',
   'app.tab.advisor': '어드바이저',
+  'app.tab.utilities': '유틸리티',
   'app.lock_refused': '잠금이 해제될 때까지 변경이 거부됩니다.',
   'app.search_pages': '페이지 검색',
   'app.search_placeholder': '페이지 이름 또는 번호',
@@ -318,6 +319,9 @@ export const ko: BuilderMessages = {
   'app.table_or_view': '테이블 또는 뷰(마스터 세부의 경우 마스터 테이블)',
   'app.no_access': '{table}({role}에 대한 액세스 권한 없음)',
   'app.ai_pages': 'AI로 페이지 생성',
+  'app.all_page_types': "모든 페이지 유형, 기능 및 복사",
+  'app.task.add_feature': "기능 페이지 추가",
+  'app.task.copy_page': "복사하여 페이지 생성",
   'app.ai_pages_note': '(원하는 내용을 직접 설명하세요)',
   'app.blank': '빈 페이지 생성',
   'app.page_number': '페이지 번호',

package/src/builder/i18n/nl.ts

@@ -285,6 +285,7 @@ export const nl: BuilderMessages = {
   'app.tab.api': 'REST-API',
   'app.tab.settings': 'Instellingen',
   'app.tab.advisor': 'Adviseur',
+  'app.tab.utilities': 'Hulpmiddelen',
   'app.lock_refused': 'Wijzigingen worden geweigerd tot de vergrendeling is opgeheven.',
   'app.search_pages': "Pagina's zoeken",
   'app.search_placeholder': 'Paginanaam of -nummer',
@@ -318,6 +319,9 @@ export const nl: BuilderMessages = {
   'app.table_or_view': 'Tabel of view (mastertabel voor master-detail)',
   'app.no_access': '{table} (geen toegang voor {role})',
   'app.ai_pages': "Pagina's maken met AI",
+  'app.all_page_types': "Alle paginatypen, functies en kopieën",
+  'app.task.add_feature': "Functiepagina toevoegen",
+  'app.task.copy_page': "Pagina als kopie maken",
   'app.ai_pages_note': '(beschrijf ze in je eigen woorden)',
   'app.blank': 'Lege pagina maken',
   'app.page_number': 'Paginanummer',

package/src/builder/i18n/pt.ts

@@ -285,6 +285,7 @@ export const pt: BuilderMessages = {
   'app.tab.api': 'API REST',
   'app.tab.settings': 'Configurações',
   'app.tab.advisor': 'Consultor',
+  'app.tab.utilities': 'Utilitários',
   'app.lock_refused': 'As alterações são recusadas até que seja desbloqueado.',
   'app.search_pages': 'Pesquisar páginas',
   'app.search_placeholder': 'Nome ou número da página',
@@ -318,6 +319,9 @@ export const pt: BuilderMessages = {
   'app.table_or_view': 'Tabela ou view (tabela mestre para mestre-detalhe)',
   'app.no_access': '{table} (sem acesso para {role})',
   'app.ai_pages': 'Criar páginas com IA',
+  'app.all_page_types': "Todos os tipos de página, recursos e cópias",
+  'app.task.add_feature': "Adicionar página de recurso",
+  'app.task.copy_page': "Criar página como cópia",
   'app.ai_pages_note': '(descreva-as com suas próprias palavras)',
   'app.blank': 'Criar página em branco',
   'app.page_number': 'Número da página',

package/src/builder/i18n/zh-cn.ts

@@ -285,6 +285,7 @@ export const zhCN: BuilderMessages = {
   'app.tab.api': 'REST API',
   'app.tab.settings': '设置',
   'app.tab.advisor': '顾问',
+  'app.tab.utilities': '实用工具',
   'app.lock_refused': '解锁前将拒绝所有更改。',
   'app.search_pages': '搜索页面',
   'app.search_placeholder': '页面名称或编号',
@@ -318,6 +319,9 @@ export const zhCN: BuilderMessages = {
   'app.table_or_view': '表或视图（主从页面的主表）',
   'app.no_access': '{table}（{role} 无访问权限）',
   'app.ai_pages': '使用 AI 创建页面',
+  'app.all_page_types': "所有页面类型、功能和副本",
+  'app.task.add_feature': "添加功能页",
+  'app.task.copy_page': "以副本方式创建页面",
   'app.ai_pages_note': '（用您自己的话描述它们）',
   'app.blank': '创建空白页面',
   'app.page_number': '页码',

package/src/builder/i18n/zh-tw.ts

@@ -285,6 +285,7 @@ export const zhTW: BuilderMessages = {
   'app.tab.api': 'REST API',
   'app.tab.settings': '設定',
   'app.tab.advisor': '顧問',
+  'app.tab.utilities': '公用程式',
   'app.lock_refused': '在解除鎖定前，所有變更都會被拒絕。',
   'app.search_pages': '搜尋頁面',
   'app.search_placeholder': '頁面名稱或編號',
@@ -318,6 +319,9 @@ export const zhTW: BuilderMessages = {
   'app.table_or_view': '表格或檢視（主從式的主表格）',
   'app.no_access': '{table}（{role} 無存取權）',
   'app.ai_pages': '以 AI 建立頁面',
+  'app.all_page_types': "所有頁面類型、功能與副本",
+  'app.task.add_feature': "新增功能頁",
+  'app.task.copy_page': "以副本建立頁面",
   'app.ai_pages_note': '（用您自己的話描述）',
   'app.blank': '建立空白頁面',
   'app.page_number': '頁面編號',

package/src/builder/login-page.ts

@@ -1,5 +1,5 @@
 import type { FastifyInstance } from 'fastify';
-import { owner } from '../db.ts';
+import { owner, type Client } from '../db.ts';
 import { APP_MFA, EMAIL_CODE_MINUTES, EMAIL_CODES_PER_HOUR, type AppMfa } from '../account-mfa.ts';
 import { html, raw } from '../html.ts';
 import { secretKeyConfigured } from '../secrets.ts';
@@ -78,6 +78,21 @@ export async function saveLoginSettings(appId: string, b: Record<string, string
     [appId, page, b.password_reset === 'true', mfa, roles, b.mfa_email === 'true']);
 }
 
+/** Page 9999 (or the next free number), public, minimal, with a login region, made the login page. (137) Also Add feature → Login page. */
+export async function createLoginPage(c: Client, a: { id: number; name: string }) {
+  const n = (await c.query<{ n: number }>(
+    `select case when not exists (select 1 from meta.page where app_id = $1 and page_no = 9999) then 9999
+                 else (select max(page_no) + 1 from meta.page where app_id = $1) end as n`, [a.id],
+  )).rows[0].n;
+  const id = (await c.query<{ id: number }>(
+    `insert into meta.page (app_id, page_no, name, title, requires_auth, page_template) values ($1, $2, 'Login', $3, false, 'minimal') returning id`,
+    [a.id, n, a.name],
+  )).rows[0].id;
+  await c.query(`insert into meta.region (page_id, seq, title, type, template) values ($1, 10, $2, 'login', 'standard')`, [id, a.name]);
+  await c.query('update meta.app set login_page = $2, updated_at = now() where id = $1', [a.id, n]);
+  return { page: id, no: n };
+}
+
 export async function loginPageRoutes(app: FastifyInstance) {
   // Create a login page: page 9999 (or the next free number), public, minimal, with a login region
   app.post(`${BASE}/apps/:id/login-page`, async (req: Req, reply) => {
@@ -86,19 +101,7 @@ export async function loginPageRoutes(app: FastifyInstance) {
     const a = await owner.one<{ id: number; name: string }>('select id, name from meta.app where id = $1', [req.params.id]);
     if (!a) return reply.code(404).send('Not found');
     try {
-      const { page, no } = await owner.tx(async (c) => {
-        const n = (await c.query<{ n: number }>(
-          `select case when not exists (select 1 from meta.page where app_id = $1 and page_no = 9999) then 9999
-                       else (select max(page_no) + 1 from meta.page where app_id = $1) end as n`, [a.id],
-        )).rows[0].n;
-        const id = (await c.query<{ id: number }>(
-          `insert into meta.page (app_id, page_no, name, title, requires_auth, page_template) values ($1, $2, 'Login', $3, false, 'minimal') returning id`,
-          [a.id, n, a.name],
-        )).rows[0].id;
-        await c.query(`insert into meta.region (page_id, seq, title, type, template) values ($1, 10, $2, 'login', 'standard')`, [id, a.name]);
-        await c.query('update meta.app set login_page = $2, updated_at = now() where id = $1', [a.id, n]);
-        return { page: id, no: n };
-      });
+      const { page, no } = await owner.tx((c) => createLoginPage(c, a));
       flash(s, `Page ${no} "Login" created and made the login page. Add regions around the sign-in form in the Page Designer.`);
       return back(reply, s, `${BASE}/pages/${page}`);
     } catch (e) {

package/src/builder/newapp.ts

@@ -71,34 +71,52 @@ export const featuresFrom = (b: Record<string, unknown>, posted: boolean): Featu
 /** (sprint 73) The Activity page of a generated application. */
 export const ACTIVITY_PAGE = 9010;
 
-async function applyFeatures(c: Client, appId: number, f: Partial<Features>, notes: string[]) {
-  if (f.access) {
-    await c.query(
-      `insert into meta.authz_scheme (app_id, name, type, value, error_message) values
-         ($1, 'CONTRIBUTOR', 'sql', 'meta.has_role(''admin'') or meta.has_role(''contributor'')', 'Only contributors can do this.'),
-         ($1, 'READER', 'sql', 'meta.has_role(''admin'') or meta.has_role(''contributor'') or meta.has_role(''reader'')', 'Only readers can open this page.')
-       on conflict do nothing`,
-      [appId],
-    );
-  }
-  if (f.activity && !(await c.query('select 1 from meta.page where app_id = $1 and page_no = $2', [appId, ACTIVITY_PAGE])).rowCount) {
-    const home = (await c.query('select home_page from meta.app where id = $1', [appId])).rows[0].home_page;
-    const page = (await c.query(`insert into meta.page (app_id, page_no, name, title, parent_page, authz) values ($1, $2, 'Activity', 'Activity', $3, 'ADMIN') returning id`, [appId, ACTIVITY_PAGE, home])).rows[0].id;
-    await c.query(
-      `insert into meta.region (page_id, seq, title, type, source, config) values
-         ($1, 10, 'Page views per day', 'chart', $2, '{"kind": "column"}'),
-         ($1, 20, 'Latest activity', 'report', $3, '{"headings": {"at": "Time", "username": "User", "event": "Event", "page_no": "Page", "elapsed_ms": "Time taken (ms)"}}')`,
-      [page,
-       `select to_char(date_trunc('day', at), 'YYYY-MM-DD') as "Day", count(*) as "Page views"
+/** (sprint 73; exported in 137 for Add feature) The authorization schemes CONTRIBUTOR and READER (and ADMIN when missing). */
+export async function addAccessSchemes(c: Client, appId: number) {
+  await ensureAdminScheme(c, appId);
+  await c.query(
+    `insert into meta.authz_scheme (app_id, name, type, value, error_message) values
+       ($1, 'CONTRIBUTOR', 'sql', 'meta.has_role(''admin'') or meta.has_role(''contributor'')', 'Only contributors can do this.'),
+       ($1, 'READER', 'sql', 'meta.has_role(''admin'') or meta.has_role(''contributor'') or meta.has_role(''reader'')', 'Only readers can open this page.')
+     on conflict do nothing`,
+    [appId],
+  );
+}
+
+/** (137) The authorization scheme ADMIN (role admin) that administrators' pages use, unless the application has one. */
+export async function ensureAdminScheme(c: Client, appId: number) {
+  await c.query(
+    `insert into meta.authz_scheme (app_id, name, type, value, error_message) values ($1, 'ADMIN', 'role', 'admin', 'Only administrators can access this page.')
+     on conflict do nothing`,
+    [appId],
+  );
+}
+
+/** (sprint 73; exported in 137 for Add feature) The Activity page for administrators and its navigation entry; nothing when the page number is taken. */
+export async function addActivityPage(c: Client, appId: number) {
+  if ((await c.query('select 1 from meta.page where app_id = $1 and page_no = $2', [appId, ACTIVITY_PAGE])).rowCount) return;
+  await ensureAdminScheme(c, appId);
+  const home = (await c.query('select home_page from meta.app where id = $1', [appId])).rows[0].home_page;
+  const page = (await c.query(`insert into meta.page (app_id, page_no, name, title, parent_page, authz) values ($1, $2, 'Activity', 'Activity', $3, 'ADMIN') returning id`, [appId, ACTIVITY_PAGE, home])).rows[0].id;
+  await c.query(
+    `insert into meta.region (page_id, seq, title, type, source, config) values
+       ($1, 10, 'Page views per day', 'chart', $2, '{"kind": "column"}'),
+       ($1, 20, 'Latest activity', 'report', $3, '{"headings": {"at": "Time", "username": "User", "event": "Event", "page_no": "Page", "elapsed_ms": "Time taken (ms)"}}')`,
+    [page,
+     `select to_char(date_trunc('day', at), 'YYYY-MM-DD') as "Day", count(*) as "Page views"
   from meta.app_activity(30)
  where event = 'page_view'
  group by 1
  order by 1`,
-       `select at, username, event, page_no, elapsed_ms
+     `select at, username, event, page_no, elapsed_ms
   from meta.app_activity(30)`],
-    );
-    await c.query(`insert into meta.nav_entry (app_id, seq, label, icon, target_page, authz) values ($1, 9010, 'Activity', 'activity', $2, 'ADMIN')`, [appId, ACTIVITY_PAGE]);
-  }
+  );
+  await c.query(`insert into meta.nav_entry (app_id, seq, label, icon, target_page, authz) values ($1, 9010, 'Activity', 'activity', $2, 'ADMIN')`, [appId, ACTIVITY_PAGE]);
+}
+
+async function applyFeatures(c: Client, appId: number, f: Partial<Features>, notes: string[]) {
+  if (f.access) await addAccessSchemes(c, appId);
+  if (f.activity) await addActivityPage(c, appId);
   if (f.feedback) await c.query('update meta.app set feedback = true where id = $1', [appId]);
   if (f.theme === false) await c.query(`update meta.app set theme = theme || '{"user_choice": false}' where id = $1`, [appId]);
   if (f.pwa || f.push) await c.query('update meta.app set pwa = true where id = $1', [appId]);

package/src/builder/routes.ts

@@ -1,4 +1,5 @@
 import { advise } from './advisor.ts';
+import { appChecksum } from '../history.ts';
 import { appLocks, isAdmin, lockPanel, lockText } from './locks.ts';
 import { parseRoleList, validRoleName } from '../dbauth.ts';
 import { DEFAULT_HEADER, headerProxiesConfigured } from '../headerauth.ts';
@@ -23,6 +24,8 @@ import { securityRoutes } from './security.ts';
 import { instanceRoutes } from './instance.ts';
 import { saveTimeZoneSettings, timeZoneSettings } from './globalization.ts';
 import { WIZARD_KINDS, wizardRoutes, wizardTables } from './wizards.ts';
+import { createPageRoutes } from './create-page.ts';
+import { featureRoutes } from './features.ts';
 import { appFromFileRoutes } from './appfromfile.ts';
 import { clearDevbar } from '../runtime/devbar.ts';
 import { EMAIL } from './find-workspace.ts';
@@ -564,6 +567,9 @@ export async function builderRoutes(app: FastifyInstance) {
   await securityRoutes(app);
   await builderSsoRoutes(app);
   await wizardRoutes(app);
+  // (137) Create page: the grid of page types, features and copy (create-page.ts, features.ts)
+  await createPageRoutes(app);
+  await featureRoutes(app);
   await appFromFileRoutes(app);
 
   // (sprint 73) POST /apps, creating an application, is in appwizard.ts
@@ -653,7 +659,7 @@ export async function builderRoutes(app: FastifyInstance) {
           <button class="btn">${icon('search')}<span class="sr-only">${tx('common.search')}</span></button></form>
         <div class="seg view-toggle" role="group" aria-label="${tx('ab.view')}">
           <a href="${keep({})}"${icons ? '' : raw(' aria-current="true"')}>${icon('list')} ${tx('ab.view_report')}</a><a href="${keep({ view: 'icons' })}"${icons ? raw(' aria-current="true"') : ''}>${icon('grid')} ${tx('app.view_icons')}</a></div>
-        <a class="btn btn-hot" href="#create-page">${icon('plus')} ${tx('app.create_page')}</a>
+        <a class="btn btn-hot" href="${BASE}/apps/${a.id}/create-page">${icon('plus')} ${tx('app.create_page')}</a>
       </div>
       ${region(tx('app.tab.pages'), html`${grouped
           ? html`<form method="get" class="search u-mwnone u-mb1"><div class="field"><label class="label" for="f_group">${tx('app.page_group')}</label>
@@ -681,6 +687,7 @@ export async function builderRoutes(app: FastifyInstance) {
             </div>
             <div class="buttons"><button class="btn btn-hot">${tx('common.next')}</button></div>
           </form>
+          <p><a href="${BASE}/apps/${a.id}/create-page">${tx('app.all_page_types')} ▸</a></p>
           <p><a href="${BASE}/apps/${a.id}/ai-pages">${tx('app.ai_pages')} ▸</a> <span class="muted">${tx('app.ai_pages_note')}</span></p>`)}
         ${region(tx('app.blank'), html`
           <form method="post" action="${BASE}/apps/${a.id}/pages">${csrf(s)}
@@ -697,7 +704,9 @@ export async function builderRoutes(app: FastifyInstance) {
       <aside class="app-tasks region region-standard" aria-labelledby="app-tasks-h"><header class="region-header"><h2 id="app-tasks-h">${tx('common.tasks')}</h2></header>
         <ul class="sc-links">
           <li><a href="/a/${a.alias}" target="_blank" rel="noopener">${icon('play')} ${tx('app.task.run')}</a></li>
-          <li><a href="#create-page">${icon('plus')} ${tx('app.create_page')}</a></li>
+          <li><a href="${BASE}/apps/${a.id}/create-page">${icon('plus')} ${tx('app.create_page')}</a></li>
+          <li><a href="${BASE}/apps/${a.id}/create-page?tab=feature">${icon('puzzle')} ${tx('app.task.add_feature')}</a></li>
+          <li><a href="${BASE}/apps/${a.id}/create-page?tab=copy">${icon('copy')} ${tx('app.task.copy_page')}</a></li>
           <li><a href="${BASE}/apps/${a.id}/ai-pages">${icon('lightbulb')} ${tx('app.ai_pages')}</a></li>
           <li><a href="${BASE}/apps/${a.id}/shared">${icon('layers')} ${tx('app.tab.shared')}</a></li>
           <li><a href="${BASE}/apps/${a.id}/shared?type=page_group">${icon('folder')} ${tx('app.task.page_groups')}</a></li>
@@ -743,6 +752,8 @@ export async function builderRoutes(app: FastifyInstance) {
     const a = await appOr404(req.params.id);
     if (!a) return reply.code(404).send('Not found');
     const r = await owner.one('select meta.export_app($1) as doc', [a.alias]);
+    // (sprint 138) the application checksum (src/history.ts), as on Utilities
+    reply.header('x-pgkiln-checksum', appChecksum(r.doc));
     // (sprint 106) the change log marks the change sets made before an application's latest export
     await logActivity({ appId: a.id, username: s.username, event: 'app_export', ip: clientIp(req), detail: String(req.query?.format ?? 'json') });
     // ?format=dir|text: one file per component, as `pgkiln export --format dir|text` writes it (docs/guide/18-cli.md)

package/src/builder/ui-defaults.ts

@@ -0,0 +1,161 @@
+import type { FastifyInstance } from 'fastify';
+import { owner } from '../db.ts';
+import { html, raw } from '../html.ts';
+import { icon } from '../icons.ts';
+import { back, BASE, csrf, developer, flash, region, send, shell, type Body, type Req } from './ui.ts';
+import { usableSchemas, workshopDb } from './workspaces.ts';
+
+// (sprint 138, AP-5) UI defaults (APEX: Attribute Dictionary / Table UI
+// Defaults): per table column a label, format mask, help text, alignment and
+// list of values, in meta.ui_default (migration 138). The page wizards and the
+// Create Application wizard take the label from meta.wizard_column_label (a UI
+// default wins); a form item a wizard makes also gets the mask, help and list
+// of values (the meta.item trigger of migration 138). "Seed from comments" fills
+// the columns without a UI default from their COMMENT ON: a short comment (60
+// characters at most) as the label, a longer one as the help text.
+//
+// The tables are those the workspace's SQL Workshop connection can see
+// (workshopDb: an isolated workspace's own schemas); a table or column name
+// from a request is only used after it was found in that catalog.
+
+export const ALIGNMENTS = ['', 'start', 'center', 'end'] as const;
+/** Format masks: numbers (999G990D00, FML…) and dates (DD.MM.YYYY HH24:MI); the database checks the same. */
+export const MASK = /^[A-Za-z0-9GDLSCFM.,:/ -]{1,60}$/;
+const MAX_COLUMNS = 400;
+
+interface Column {
+  name: string;
+  type: string;
+  comment: string | null;
+  wizard: string;
+  d: { label: string | null; format_mask: string | null; help: string | null; alignment: string | null; lov: string | null; updated_by: string | null; updated_at: string | null } | null;
+}
+
+/** A table the session's catalog can see: [schema, table], or null. */
+async function findTable(s: Parameters<typeof workshopDb>[0], schema: unknown, table: unknown) {
+  if (typeof schema !== 'string' || typeof table !== 'string' || !schema || !table) return null;
+  const db = await workshopDb(s);
+  if (!(await usableSchemas(db)).includes(schema)) return null;
+  const r = await db.one<{ oid: number }>(
+    `select c.oid::int as oid from pg_class c join pg_namespace n on n.oid = c.relnamespace
+      where n.nspname = $1 and c.relname = $2 and c.relkind in ('r', 'p', 'v', 'm', 'f')`, [schema, table]);
+  return r ? { schema, table, oid: r.oid } : null;
+}
+
+async function columnsOf(oid: number, schema: string, table: string): Promise<Column[]> {
+  const cols = (await owner.query(
+    `select a.attname as name, format_type(a.atttypid, a.atttypmod) as type, col_description(a.attrelid, a.attnum) as comment,
+            meta.wizard_column_label(a.attrelid::regclass, a.attname) as wizard
+       from pg_attribute a where a.attrelid = $1 and a.attnum > 0 and not a.attisdropped order by a.attnum limit ${MAX_COLUMNS}`, [oid])).rows;
+  const defaults = new Map((await owner.query(
+    `select column_name, label, format_mask, help, alignment, lov, updated_by, updated_at::text from meta.ui_default where schema_name = $1 and table_name = $2`,
+    [schema, table])).rows.map((r) => [r.column_name, r]));
+  return cols.map((c) => ({ ...c, d: defaults.get(c.name) ?? null }));
+}
+
+const trim = (v: unknown, max: number) => (typeof v === 'string' && v.trim() ? v.trim().slice(0, max) : null);
+
+export async function uiDefaultRoutes(app: FastifyInstance) {
+  app.get(`${BASE}/ui-defaults`, async (req: Req, reply) => {
+    const s = await developer(req, reply);
+    if (!s) return;
+    const db = await workshopDb(s);
+    const schemas = await usableSchemas(db);
+    const q = req.query ?? {};
+    const schema = typeof q.schema === 'string' && schemas.includes(q.schema) ? q.schema : '';
+    const tables = schema
+      ? (await db.query<{ name: string; n: number }>(
+          `select c.relname as name, (select count(*) from meta.ui_default d where d.schema_name = $1 and d.table_name = c.relname)::int as n
+             from pg_class c join pg_namespace n on n.oid = c.relnamespace where n.nspname = $1 and c.relkind in ('r', 'p', 'v', 'm', 'f') and not c.relispartition order by 1`,
+          [schema])).rows
+      : [];
+    const t = schema ? await findTable(s, schema, q.table) : null;
+    const counts = (await owner.query<{ schema_name: string; n: number }>('select schema_name, count(*)::int as n from meta.ui_default group by 1')).rows;
+    const pick = html`<form method="get" class="util-filters">
+        <div class="field"><label class="label" for="f_schema">Schema</label><select id="f_schema" name="schema"><option value="">Choose a schema</option>
+          ${schemas.map((n) => html`<option value="${n}"${n === schema ? raw(' selected') : ''}>${n}${counts.find((c) => c.schema_name === n) ? ` (${counts.find((c) => c.schema_name === n)!.n})` : ''}</option>`)}</select></div>
+        ${schema ? html`<div class="field"><label class="label" for="f_table">Table or view</label><select id="f_table" name="table"><option value="">Choose a table</option>
+          ${tables.map((x) => html`<option value="${x.name}"${x.name === t?.table ? raw(' selected') : ''}>${x.name}${x.n ? ` (${x.n})` : ''}</option>`)}</select></div>` : ''}
+        <div class="buttons"><button class="btn btn-sm">${icon('table')} Show</button></div></form>`;
+    let body = html`${pick}`;
+    if (t) {
+      const cols = await columnsOf(t.oid, t.schema, t.table);
+      body = html`${pick}
+        <form method="post" action="${BASE}/ui-defaults">${csrf(s)}<input type="hidden" name="schema" value="${t.schema}"><input type="hidden" name="table" value="${t.table}">
+          <div class="table-wrap"><table class="table ui-defaults report-reflow"><thead><tr><th scope="col">Column</th><th scope="col">Label</th><th scope="col">Format mask</th><th scope="col">Alignment</th><th scope="col">Help</th><th scope="col">List of values</th></tr></thead><tbody>
+          ${cols.map((c, i) => html`<tr>
+            <td data-label="Column"><code>${c.name}</code><br><span class="muted small">${c.type}</span><input type="hidden" name="c.${i}.name" value="${c.name}"></td>
+            <td data-label="Label"><input id="f_l${i}" aria-label="Label of ${c.name}" name="c.${i}.label" value="${c.d?.label ?? ''}" maxlength="200" placeholder="${c.wizard}"></td>
+            <td data-label="Format mask"><input id="f_m${i}" aria-label="Format mask of ${c.name}" name="c.${i}.format_mask" value="${c.d?.format_mask ?? ''}" maxlength="60" placeholder="${/numeric|integer|bigint|smallint|real|double/.test(c.type) ? '999G990D00' : /date|time/.test(c.type) ? 'DD.MM.YYYY' : ''}"></td>
+            <td data-label="Alignment"><select id="f_a${i}" aria-label="Alignment of ${c.name}" name="c.${i}.alignment">${ALIGNMENTS.map((x) => html`<option value="${x}"${(c.d?.alignment ?? '') === x ? raw(' selected') : ''}>${x || '–'}</option>`)}</select></td>
+            <td data-label="Help"><textarea id="f_h${i}" aria-label="Help of ${c.name}" name="c.${i}.help" rows="1" maxlength="4000">${c.d?.help ?? ''}</textarea></td>
+            <td data-label="List of values"><input id="f_v${i}" aria-label="List of values of ${c.name}" name="c.${i}.lov" value="${c.d?.lov ?? ''}" maxlength="4000" placeholder="LOV:NAME"></td>
+          </tr>`)}</tbody></table></div>
+          <div class="buttons"><button class="btn btn-hot" name="mode" value="save">${icon('save')} Save</button>
+            <button class="btn" name="mode" value="seed">${icon('edit')} Seed from comments</button></div>
+          <p class="muted small">An empty row has no UI default. The placeholder of a label shows what the wizards use without one. Lists of values: <code>LOV:NAME</code> (a shared list of values of the application), <code>STATIC:Yes;Y,No;N</code> or a query (<code>select name d, id r from sales.status</code>).</p>
+        </form>`;
+    }
+    const main = html`<h1 class="u-mb1">UI defaults</h1>
+      ${region('UI defaults per column', html`<p class="muted u-mt0">Label, format mask, help text, alignment and list of values per table column (APEX: Attribute Dictionary). The page wizards and the Create Application wizard use the label for every generated report heading and form item, and a generated form item also gets the format mask, help and list of values. They apply to pages generated after the change, in every application.</p>${body}`)}`;
+    return send(reply, s, shell(s, 'UI defaults', [['App Builder', BASE], ['Workspace utilities', `${BASE}/utilities`], ['UI defaults']], main));
+  });
+
+  app.post(`${BASE}/ui-defaults`, async (req: Req, reply) => {
+    const s = await developer(req, reply);
+    if (!s) return;
+    const b: Body = req.body ?? {};
+    const t = await findTable(s, b.schema, b.table);
+    if (!t) return reply.code(404).send('Not found');
+    const to = `${BASE}/ui-defaults?${new URLSearchParams({ schema: t.schema, table: t.table })}`;
+    const cols = await columnsOf(t.oid, t.schema, t.table);
+    const known = new Map(cols.map((c) => [c.name, c]));
+    try {
+      if (b.mode === 'seed') {
+        // columns without a UI default: a short comment is the label, a longer one the help text
+        let n = 0;
+        for (const c of cols) {
+          if (c.d || !c.comment?.trim()) continue;
+          const text = c.comment.trim();
+          const short = text.length <= 60 && !text.includes('\n');
+          await owner.query(
+            `insert into meta.ui_default (schema_name, table_name, column_name, label, help, updated_by) values ($1, $2, $3, $4, $5, $6) on conflict do nothing`,
+            [t.schema, t.table, c.name, short ? text : null, short ? null : text.slice(0, 4000), s.username]);
+          n++;
+        }
+        flash(s, n ? `UI defaults of ${n} column${n === 1 ? '' : 's'} made from their comments.` : 'No column without a UI default has a comment.');
+        return back(reply, s, to);
+      }
+      const rows: { name: string; label: string | null; mask: string | null; help: string | null; align: string | null; lov: string | null }[] = [];
+      for (let i = 0; i < MAX_COLUMNS; i++) {
+        const name = b[`c.${i}.name`];
+        if (typeof name !== 'string' || !known.has(name)) continue;
+        const mask = trim(b[`c.${i}.format_mask`], 60);
+        if (mask && !MASK.test(mask)) throw new Error(`Format mask of ${name}: letters, digits and . , : / - only (e.g. 999G990D00 or DD.MM.YYYY).`);
+        const align = trim(b[`c.${i}.alignment`], 10);
+        if (align && !(ALIGNMENTS as readonly string[]).includes(align)) throw new Error(`Alignment of ${name}: start, center or end.`);
+        rows.push({ name, label: trim(b[`c.${i}.label`], 200), mask, help: trim(b[`c.${i}.help`], 4000), align, lov: trim(b[`c.${i}.lov`], 4000) });
+      }
+      await owner.tx(async (c) => {
+        for (const r of rows) {
+          const before = known.get(r.name)!.d;
+          if (!r.label && !r.mask && !r.help && !r.align && !r.lov) {
+            if (before) await c.query('delete from meta.ui_default where schema_name = $1 and table_name = $2 and column_name = $3', [t.schema, t.table, r.name]);
+            continue;
+          }
+          if (before && before.label === r.label && before.format_mask === r.mask && before.help === r.help && before.alignment === r.align && before.lov === r.lov) continue;
+          await c.query(
+            `insert into meta.ui_default (schema_name, table_name, column_name, label, format_mask, help, alignment, lov, updated_by)
+             values ($1, $2, $3, $4, $5, $6, $7, $8, $9)
+             on conflict (schema_name, table_name, column_name) do update set label = excluded.label, format_mask = excluded.format_mask, help = excluded.help,
+               alignment = excluded.alignment, lov = excluded.lov, updated_by = excluded.updated_by, updated_at = now()`,
+            [t.schema, t.table, r.name, r.label, r.mask, r.help, r.align, r.lov, s.username]);
+        }
+      });
+      flash(s, `UI defaults of ${t.schema}.${t.table} saved.`);
+    } catch (e) {
+      flash(s, (e as Error).message, 'error');
+    }
+    return back(reply, s, to);
+  });
+}

package/src/builder/ui.ts

@@ -243,7 +243,7 @@ export const region = (title: string, body: Raw | Raw[], extra: Raw | '' = '', i
   html`<section class="region region-standard"${id ? raw(` id="${id.replace(/[^a-z0-9-]/g, '')}"`) : ''}><header class="region-header"><h2>${title}</h2>${extra}</header><div class="region-body">${body}</div></section>`;
 
 /** Title and tabs of an application's builder pages (Pages, Shared Components, …), in the session's builder language. */
-export const appHeader = (a: any, active: 'pages' | 'shared' | 'settings' | 'activity' | 'api' | 'search' | 'advisor', s?: Pick<Session, 'state'>) => {
+export const appHeader = (a: any, active: 'pages' | 'shared' | 'settings' | 'activity' | 'api' | 'search' | 'advisor' | 'utilities', s?: Pick<Session, 'state'>) => {
   const tx = tr(s);
   const tab = (key: typeof active, href: string, ic: string, label: string) =>
     html`<a class="ide-tab" href="${href}"${active === key ? raw(' aria-current="page"') : ''}>${bicon(ic)}<span>${label}</span></a>`;
@@ -266,6 +266,7 @@ export const appHeader = (a: any, active: 'pages' | 'shared' | 'settings' | 'act
         ${tab('settings', `${BASE}/apps/${a.id}/settings`, 'settings', tx('app.tab.settings'))}
         ${tab('search', `${BASE}/apps/${a.id}/search`, 'search', tx('common.search'))}
         ${tab('advisor', `${BASE}/apps/${a.id}/advisor`, 'check', tx('app.tab.advisor'))}
+        ${tab('utilities', `${BASE}/apps/${a.id}/utilities`, 'wrench', tx('app.tab.utilities'))}
       </nav>
     </div>`;
 };