feat(form-decompile,form-compile): UseAlways — поля реквизита, всегда читаемые (две формы DSL)

<UseAlways><Field>ИмяРеквизита.Поле</Field>…> у Attribute (5189: дин-список 3575 +
ValueTable ~788 + прочие) — не захватывался. Свойство «поля, всегда читаемые из БД».

DSL — две формы (сливаются компилятором):
  - на реквизите: useAlways: ["Поле1","Поле2"] (короткие имена; forgiving с/без префикса);
  - на колонке ValueTable: useAlways: true (columns[*]).
Компилятор собирает <Field>ИмяРеквизита.X</Field> из обоих источников (dedupe),
порядок схемы: после FillChecking, до FunctionalOptions/Columns/Settings.

Дин-список: колонки в XML не эмитятся, но если заданы в DSL с useAlways — формируют
UseAlways-массив (Columns подавляются при наличии settings).

Декомпилятор по контексту: ValueTable (есть columns) → useAlways:true на совпавшей
колонке; дин-список/прочие → массив useAlways на реквизите. Префикс «Имя.» снимается.

TOTAL diff lines выборки 2.17: 3869 → 3695 (-174), match 14 → 17 (+3 чистых формы).
Attribute>UseAlways residual → 0. Снапшот table (обе формы + merge) сертифицирован
в 1С (8.3.24). Регресс form-compile 33/33 зелёный на ps + python.
decompile v0.36, compile v1.54.

Co-Authored-By: Claude Opus 4.8 <noreply@anthropic.com>
This commit is contained in:
Nick Shirokov
2026-06-07 13:29:39 +03:00
co-authored by Claude Opus 4.8
parent fdbfa3b643
commit 6056a4a5af
6 changed files with 85 additions and 9 deletions
@@ -1,4 +1,4 @@
# form-compile v1.53 — Compile 1C managed form from JSON or object metadata
# form-compile v1.54 — Compile 1C managed form from JSON or object metadata
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
param(
[string]$JsonPath,
@@ -3657,10 +3657,36 @@ function Emit-Attributes {
if ($attr.fillChecking) {
X "$inner<FillChecking>$($attr.fillChecking)</FillChecking>"
}
# UseAlways: поля, всегда читаемые (дин-список/таблица). Две формы DSL сливаются:
# attr.useAlways[] (короткие имена) + columns с useAlways:true → <Field>ИмяРеквизита.Поле</Field>.
$uaFields = New-Object System.Collections.ArrayList
if ($attr.useAlways) {
foreach ($e in @($attr.useAlways)) {
$fld = "$e"
if ($fld -notmatch "^$([regex]::Escape($attrName))\.") { $fld = "$attrName.$fld" }
if (-not $uaFields.Contains($fld)) { [void]$uaFields.Add($fld) }
}
}
if ($attr.columns) {
foreach ($col in $attr.columns) {
if ($col.useAlways -eq $true) {
$fld = "$attrName.$($col.name)"
if (-not $uaFields.Contains($fld)) { [void]$uaFields.Add($fld) }
}
}
}
if ($uaFields.Count -gt 0) {
X "$inner<UseAlways>"
foreach ($f in $uaFields) { X "$inner`t<Field>$f</Field>" }
X "$inner</UseAlways>"
}
Emit-FunctionalOptions -fo $attr.functionalOptions -indent $inner
# Columns (for ValueTable/ValueTree)
if ($attr.columns -and $attr.columns.Count -gt 0) {
# Columns (for ValueTable/ValueTree). Для дин-списка (есть settings) колонки НЕ эмитим —
# они служат лишь для формирования UseAlways (поля выше).
if ($attr.columns -and $attr.columns.Count -gt 0 -and -not $attr.settings) {
X "$inner<Columns>"
foreach ($col in $attr.columns) {
$colId = New-Id