fix(cfe): 6 fixes from E2E test — Manager types, borrowed form structure, ConfigPath, guard checks

1. meta-compile + cfe-borrow: add Manager GeneratedType for Report/DataProcessor
2. cfe-borrow: rewrite Form.xml generation — extract only visual elements
   (AutoCommandBar + ChildItems), replace CommandName→0, strip Attributes/Events/Parameters
3. cfe-init: add -ConfigPath to auto-resolve Language UUID and CompatibilityMode
4. form-add: guard against overwriting existing Form.xml and Module.bsl
5. docs: update GeneratedType table for Report/DataProcessor
6. docs: rewrite section 5.4.2 with accurate borrowed form structure

Co-Authored-By: Claude Opus 4.6 <noreply@anthropic.com>
This commit is contained in:
Nick Shirokov
2026-02-21 16:39:27 +03:00
co-authored by Claude Opus 4.6
parent 28b967f591
commit 3565e1c97f
7 changed files with 201 additions and 58 deletions
@@ -249,10 +249,12 @@ $script:generatedTypes = @{
@{ prefix = "DocumentJournalManager"; category = "Manager" } @{ prefix = "DocumentJournalManager"; category = "Manager" }
) )
"Report" = @( "Report" = @(
@{ prefix = "ReportObject"; category = "Object" } @{ prefix = "ReportObject"; category = "Object" }
@{ prefix = "ReportManager"; category = "Manager" }
) )
"DataProcessor" = @( "DataProcessor" = @(
@{ prefix = "DataProcessorObject"; category = "Object" } @{ prefix = "DataProcessorObject"; category = "Object" }
@{ prefix = "DataProcessorManager"; category = "Manager" }
) )
} }
@@ -464,35 +466,96 @@ function Borrow-Form {
[System.IO.File]::WriteAllText($formMetaFile, $formMetaSb.ToString(), $enc) [System.IO.File]::WriteAllText($formMetaFile, $formMetaSb.ToString(), $enc)
Info " Created: $formMetaFile" Info " Created: $formMetaFile"
# 5. Generate Form.xml with BaseForm # 5. Generate Form.xml with BaseForm (visual elements only)
# Extract inner content from source (everything between <Form ...> and </Form>) # Parse source Form.xml as XmlDocument
$innerContent = "" $srcFormDoc = New-Object System.Xml.XmlDocument
$formVersion = "2.17" $srcFormDoc.PreserveWhitespace = $true
if ($srcFormContent -match '(?s)<Form[^>]*version="([^"]*)"[^>]*>(.*)</Form>') { $srcFormDoc.Load($srcFormXmlPath)
$formVersion = $Matches[1] $srcFormEl = $srcFormDoc.DocumentElement
$innerContent = $Matches[2]
} elseif ($srcFormContent -match '(?s)<Form[^>]*>(.*)</Form>') { $formVersion = $srcFormEl.GetAttribute("version")
$innerContent = $Matches[1] if (-not $formVersion) { $formVersion = "2.17" }
# Find direct children: AutoCommandBar, ChildItems (visual elements only)
$srcAutoCmd = $null
$srcChildItems = $null
foreach ($fc in $srcFormEl.ChildNodes) {
if ($fc.NodeType -ne 'Element') { continue }
if ($fc.LocalName -eq 'AutoCommandBar' -and -not $srcAutoCmd) { $srcAutoCmd = $fc }
elseif ($fc.LocalName -eq 'ChildItems' -and -not $srcChildItems) { $srcChildItems = $fc }
} }
# Build the extension Form.xml: resultant form + <BaseForm> # Get OuterXml and strip redundant namespace redeclarations (they're on root <Form>)
$formXmlSb = New-Object System.Text.StringBuilder $nsStripPattern = '\s+xmlns(?::\w+)?="[^"]*"'
# Copy the original XML declaration and <Form> opening tag
if ($srcFormContent -match '(?s)^(.*?<Form[^>]*>)') { $autoCmdXml = ""
$formXmlSb.Append($Matches[1]) | Out-Null if ($srcAutoCmd) {
$autoCmdXml = $srcAutoCmd.OuterXml
$autoCmdXml = [regex]::Replace($autoCmdXml, $nsStripPattern, '')
# Replace all CommandName values with 0 (base form buttons lose command refs)
$autoCmdXml = [regex]::Replace($autoCmdXml, '<CommandName>[^<]*</CommandName>', '<CommandName>0</CommandName>')
# Replace Autofill true → false
$autoCmdXml = $autoCmdXml -replace '<Autofill>true</Autofill>', '<Autofill>false</Autofill>'
} }
# Resultant form content (same as source initially)
$formXmlSb.Append($innerContent) | Out-Null $childItemsXml = ""
# BaseForm section if ($srcChildItems) {
$formXmlSb.AppendLine("`t<BaseForm version=`"${formVersion}`">") | Out-Null $childItemsXml = $srcChildItems.OuterXml
# Inner content for BaseForm (trim leading newline) $childItemsXml = [regex]::Replace($childItemsXml, $nsStripPattern, '')
$baseInner = $innerContent.TrimStart("`r", "`n") # Replace all CommandName values with 0 in ChildItems too
$formXmlSb.Append("`t") | Out-Null $childItemsXml = [regex]::Replace($childItemsXml, '<CommandName>[^<]*</CommandName>', '<CommandName>0</CommandName>')
$formXmlSb.Append($baseInner) | Out-Null } else {
# Close BaseForm — ensure it's on its own line $childItemsXml = "<ChildItems/>"
$lastChar = $formXmlSb.ToString()[-1] }
if ($lastChar -ne "`n") { $formXmlSb.AppendLine() | Out-Null }
$formXmlSb.AppendLine("`t</BaseForm>") | Out-Null # Extract the <Form ...> opening tag from source text (preserves namespace declarations)
$xmlDecl = '<?xml version="1.0" encoding="UTF-8"?>'
$formTag = "<Form version=`"${formVersion}`">"
if ($srcFormContent -match '(?s)^(<\?xml[^?]*\?>)') { $xmlDecl = $Matches[1] }
if ($srcFormContent -match '(<Form[^>]*>)') { $formTag = $Matches[1] }
# Build output Form.xml
$formXmlSb = New-Object System.Text.StringBuilder
$formXmlSb.Append($xmlDecl) | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
$formXmlSb.Append($formTag) | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
# Part 1: visual elements (add leading tab to first line of each block)
if ($autoCmdXml) {
$formXmlSb.Append("`t$autoCmdXml") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
}
$formXmlSb.Append("`t$childItemsXml") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
$formXmlSb.Append("`t<Attributes/>") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
# BaseForm: same visual elements, indented one more level
$formXmlSb.Append("`t<BaseForm version=`"${formVersion}`">") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
if ($autoCmdXml) {
# Reindent for BaseForm: first line gets 2 tabs, other lines get +1 tab
$acLines = $autoCmdXml -split "`r`n"
for ($li = 0; $li -lt $acLines.Count; $li++) {
if ($li -eq 0) { $formXmlSb.Append("`t`t$($acLines[$li])") | Out-Null }
else { $formXmlSb.Append("`t$($acLines[$li])") | Out-Null }
$formXmlSb.Append("`r`n") | Out-Null
}
}
$ciLines = $childItemsXml -split "`r`n"
for ($li = 0; $li -lt $ciLines.Count; $li++) {
if ($li -eq 0) { $formXmlSb.Append("`t`t$($ciLines[$li])") | Out-Null }
else { $formXmlSb.Append("`t$($ciLines[$li])") | Out-Null }
$formXmlSb.Append("`r`n") | Out-Null
}
$formXmlSb.Append("`t`t<Attributes/>") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
$formXmlSb.Append("`t</BaseForm>") | Out-Null
$formXmlSb.Append("`r`n") | Out-Null
$formXmlSb.Append("</Form>") | Out-Null $formXmlSb.Append("</Form>") | Out-Null
# Write Form.xml # Write Form.xml
+9 -5
View File
@@ -1,7 +1,7 @@
--- ---
name: cfe-init name: cfe-init
description: Создать расширение конфигурации 1С (CFE) — scaffold XML-исходников. Используй когда нужно создать новое расширение для исправления, доработки или дополнения конфигурации description: Создать расширение конфигурации 1С (CFE) — scaffold XML-исходников. Используй когда нужно создать новое расширение для исправления, доработки или дополнения конфигурации
argument-hint: <Name> [-Purpose Patch|Customization|AddOn] [-CompatibilityMode Version8_3_24] argument-hint: <Name> [-ConfigPath <path>] [-Purpose Patch|Customization|AddOn] [-CompatibilityMode Version8_3_24]
allowed-tools: allowed-tools:
- Bash - Bash
- Read - Read
@@ -14,14 +14,14 @@ allowed-tools:
## Подготовка ## Подготовка
Перед созданием расширения рекомендуется получить версию и режим совместимости базовой конфигурации: Если есть выгрузка базовой конфигурации, передай `-ConfigPath` — скрипт автоматически определит `CompatibilityMode` и UUID языка из базовой конфигурации.
Если `-ConfigPath` не задан, рекомендуется предварительно получить режим совместимости:
``` ```
/cf-info <ConfigPath> -Mode brief /cf-info <ConfigPath> -Mode brief
``` ```
Это даст `CompatibilityMode` (передать в `-CompatibilityMode`) и версию конфигурации (для `-Version`, например `<ВерсияКонфигурации>.1`).
## Параметры ## Параметры
| Параметр | Описание | По умолчанию | | Параметр | Описание | По умолчанию |
@@ -34,6 +34,7 @@ allowed-tools:
| `Version` | Версия расширения | — | | `Version` | Версия расширения | — |
| `Vendor` | Поставщик | — | | `Vendor` | Поставщик | — |
| `CompatibilityMode` | Режим совместимости | `Version8_3_24` | | `CompatibilityMode` | Режим совместимости | `Version8_3_24` |
| `ConfigPath` | Путь к выгрузке базовой конфигурации (авто-определяет CompatibilityMode и Language UUID) | — |
| `NoRole` | Без основной роли | false | | `NoRole` | Без основной роли | false |
## Команда ## Команда
@@ -56,7 +57,10 @@ powershell.exe -NoProfile -File .claude/skills/cfe-init/scripts/cfe-init.ps1 -Na
## Примеры ## Примеры
```powershell ```powershell
# Расширение-исправление для ERP # Расширение для ERP с авто-определением совместимости из базовой конфигурации
... -Name Расш1 -ConfigPath C:\WS\tasks\cfsrc\erp_8.3.24 -OutputDir src
# Расширение-исправление с явным режимом совместимости
... -Name Расш1 -Purpose Patch -CompatibilityMode Version8_3_17 -OutputDir src ... -Name Расш1 -Purpose Patch -CompatibilityMode Version8_3_17 -OutputDir src
# Расширение-доработка с версией # Расширение-доработка с версией
+54 -1
View File
@@ -11,6 +11,7 @@ param(
[string]$Version, [string]$Version,
[string]$Vendor, [string]$Vendor,
[string]$CompatibilityMode = "Version8_3_24", [string]$CompatibilityMode = "Version8_3_24",
[string]$ConfigPath,
[switch]$NoRole [switch]$NoRole
) )
@@ -34,6 +35,57 @@ if (Test-Path $cfgFile) {
exit 1 exit 1
} }
# --- Resolve ConfigPath ---
$baseLangUuid = "00000000-0000-0000-0000-000000000000"
if ($ConfigPath) {
if (-not [System.IO.Path]::IsPathRooted($ConfigPath)) {
$ConfigPath = Join-Path (Get-Location).Path $ConfigPath
}
if (Test-Path $ConfigPath -PathType Container) {
$candidate = Join-Path $ConfigPath "Configuration.xml"
if (Test-Path $candidate) { $ConfigPath = $candidate }
else { Write-Error "No Configuration.xml in config directory: $ConfigPath"; exit 1 }
}
if (-not (Test-Path $ConfigPath)) { Write-Error "Config file not found: $ConfigPath"; exit 1 }
$cfgDir = Split-Path (Resolve-Path $ConfigPath).Path -Parent
# 3a. Read Language UUID from base config
$baseLangFile = Join-Path (Join-Path $cfgDir "Languages") "Русский.xml"
if (Test-Path $baseLangFile) {
$baseLangDoc = New-Object System.Xml.XmlDocument
$baseLangDoc.PreserveWhitespace = $false
$baseLangDoc.Load($baseLangFile)
$langEl = $null
foreach ($c in $baseLangDoc.DocumentElement.ChildNodes) {
if ($c.NodeType -eq 'Element' -and $c.LocalName -eq 'Language') { $langEl = $c; break }
}
if ($langEl) {
$baseLangUuid = $langEl.GetAttribute("uuid")
Write-Host "[INFO] Base config Language UUID: $baseLangUuid"
} else {
Write-Host "[WARN] No <Language> element in $baseLangFile"
}
} else {
Write-Host "[WARN] Base config language not found: $baseLangFile"
}
# 3b. Read CompatibilityMode from base config
$baseCfgDoc = New-Object System.Xml.XmlDocument
$baseCfgDoc.PreserveWhitespace = $false
$baseCfgDoc.Load((Resolve-Path $ConfigPath).Path)
$baseCfgNs = New-Object System.Xml.XmlNamespaceManager($baseCfgDoc.NameTable)
$baseCfgNs.AddNamespace("md", "http://v8.1c.ru/8.3/MDClasses")
$compatNode = $baseCfgDoc.SelectSingleNode("//md:Configuration/md:Properties/md:CompatibilityMode", $baseCfgNs)
if ($compatNode -and $compatNode.InnerText) {
$CompatibilityMode = $compatNode.InnerText.Trim()
Write-Host "[INFO] Base config CompatibilityMode: $CompatibilityMode"
} else {
Write-Host "[WARN] CompatibilityMode not found in base config, using default: $CompatibilityMode"
}
} else {
Write-Host "[WARN] Language ExtendedConfigurationObject set to zeros. Use -ConfigPath to auto-resolve from base config, or fix manually before loading."
}
# --- Generate UUIDs --- # --- Generate UUIDs ---
$uuidCfg = [guid]::NewGuid().ToString() $uuidCfg = [guid]::NewGuid().ToString()
$uuidLang = [guid]::NewGuid().ToString() $uuidLang = [guid]::NewGuid().ToString()
@@ -149,7 +201,7 @@ $langXml = @"
<ObjectBelonging>Adopted</ObjectBelonging> <ObjectBelonging>Adopted</ObjectBelonging>
<Name>Русский</Name> <Name>Русский</Name>
<Comment/> <Comment/>
<ExtendedConfigurationObject>00000000-0000-0000-0000-000000000000</ExtendedConfigurationObject> <ExtendedConfigurationObject>$baseLangUuid</ExtendedConfigurationObject>
<LanguageCode>ru</LanguageCode> <LanguageCode>ru</LanguageCode>
</Properties> </Properties>
</Language> </Language>
@@ -201,6 +253,7 @@ Write-Host "[OK] Создано расширение: $Name"
Write-Host " Каталог: $OutputDir" Write-Host " Каталог: $OutputDir"
Write-Host " Назначение: $Purpose" Write-Host " Назначение: $Purpose"
Write-Host " Префикс: $NamePrefix" Write-Host " Префикс: $NamePrefix"
Write-Host " Совместимость: $CompatibilityMode"
Write-Host " Configuration.xml: $cfgFile" Write-Host " Configuration.xml: $cfgFile"
Write-Host " Languages: $langFile" Write-Host " Languages: $langFile"
if (-not $NoRole) { if (-not $NoRole) {
+10 -2
View File
@@ -271,7 +271,11 @@ if ($Purpose -eq "List" -or $Purpose -eq "Choice") {
"@ "@
} }
[System.IO.File]::WriteAllText($formXmlPath, $formXml, $encBom) if (Test-Path $formXmlPath) {
Write-Host "[SKIP] Form.xml already exists: $formXmlPath — not overwriting"
} else {
[System.IO.File]::WriteAllText($formXmlPath, $formXml, $encBom)
}
# --- 3c. Module.bsl --- # --- 3c. Module.bsl ---
@@ -304,7 +308,11 @@ $moduleBsl = @"
#КонецОбласти #КонецОбласти
"@ "@
[System.IO.File]::WriteAllText($modulePath, $moduleBsl, $encBom) if (Test-Path $modulePath) {
Write-Host "[SKIP] Module.bsl already exists: $modulePath — not overwriting"
} else {
[System.IO.File]::WriteAllText($modulePath, $moduleBsl, $encBom)
}
# --- Фаза 4: Регистрация в родительском объекте --- # --- Фаза 4: Регистрация в родительском объекте ---
@@ -478,10 +478,12 @@ $script:generatedTypes = @{
@{ prefix = "DocumentJournalManager"; category = "Manager" } @{ prefix = "DocumentJournalManager"; category = "Manager" }
) )
"Report" = @( "Report" = @(
@{ prefix = "ReportObject"; category = "Object" } @{ prefix = "ReportObject"; category = "Object" }
@{ prefix = "ReportManager"; category = "Manager" }
) )
"DataProcessor" = @( "DataProcessor" = @(
@{ prefix = "DataProcessorObject"; category = "Object" } @{ prefix = "DataProcessorObject"; category = "Object" }
@{ prefix = "DataProcessorManager"; category = "Manager" }
) )
} }
+2 -2
View File
@@ -257,8 +257,8 @@ Ext/ # Расширение конфигураци
| Task | Object, Ref, Selection, List, Manager | | Task | Object, Ref, Selection, List, Manager |
| ExchangePlan | Object, Ref, Selection, List, Manager | | ExchangePlan | Object, Ref, Selection, List, Manager |
| DocumentJournal | Selection, List, Manager | | DocumentJournal | Selection, List, Manager |
| Report | Object | | Report | Object, Manager |
| DataProcessor | Object | | DataProcessor | Object, Manager |
Формат имени: `{ТипОбъектаEng}.{ИмяОбъекта}` (напр. `CatalogObject.Номенклатура`, `DocumentRef.АвансовыйОтчет`). Формат имени: `{ТипОбъектаEng}.{ИмяОбъекта}` (напр. `CatalogObject.Номенклатура`, `DocumentRef.АвансовыйОтчет`).
+31 -18
View File
@@ -356,7 +356,7 @@ Enums/ # Перечисления
#### 5.4.2. Структура Form.xml заимствованной формы #### 5.4.2. Структура Form.xml заимствованной формы
Form.xml заимствованной формы — **двухчастный файл**: Form.xml заимствованной формы — **двухчастный файл**: Part 1 (результирующая форма) и BaseForm (исходная форма). Обе части содержат **только визуальные элементы** — атрибуты, события, параметры и команды базовой конфигурации **НЕ включаются**.
```xml ```xml
<Form xmlns="http://v8.1c.ru/8.3/xcf/logform" ... version="2.17"> <Form xmlns="http://v8.1c.ru/8.3/xcf/logform" ... version="2.17">
@@ -364,38 +364,49 @@ Form.xml заимствованной формы — **двухчастный ф
<!-- ═══ ЧАСТЬ 1: Результирующая форма (база + изменения расширения) ═══ --> <!-- ═══ ЧАСТЬ 1: Результирующая форма (база + изменения расширения) ═══ -->
<AutoCommandBar name="ФормаКоманднаяПанель" id="-1"> <AutoCommandBar name="ФормаКоманднаяПанель" id="-1">
<ChildItems> <ChildItems>
<!-- Элементы базовой формы --> <!-- Базовые кнопки: CommandName заменён на 0 -->
<Popup name="ГруппаПараметры" id="154">...</Popup> <Button name="ФормаОбработкаЗагрузитьИзФайла" id="51">
<!-- Элементы, добавленные расширением --> <CommandName>0</CommandName>
...
</Button>
<!-- Кнопки, добавленные расширением: CommandName указывает на команду -->
<Button name="ФормаНоваяКоманда" id="159"> <Button name="ФормаНоваяКоманда" id="159">
<CommandName>Form.Command.НоваяКоманда</CommandName> <CommandName>Form.Command.НоваяКоманда</CommandName>
... ...
</Button> </Button>
</ChildItems> </ChildItems>
</AutoCommandBar> </AutoCommandBar>
<ChildItems>
<!-- Все визуальные элементы: базовые + добавленные расширением -->
</ChildItems>
<Attributes/> <!-- пустой, ИЛИ только реквизиты расширения (id ≥ 1000000) -->
<!-- Events — только обработчики расширения с callType (если есть) -->
<Events> <Events>
<Event name="OnCreateAtServer" callType="After">Расш1_ПриСозданииПосле</Event> <Event name="OnCreateAtServer" callType="After">Расш1_ПриСозданииПосле</Event>
</Events> </Events>
<ChildItems> <!-- Commands — только команды расширения (id ≥ 1000000, если есть) -->
<!-- Все элементы: базовые + добавленные расширением -->
</ChildItems>
<Attributes>
<Attribute name="РеквизитФормы" id="1000001">...</Attribute>
</Attributes>
<Commands> <Commands>
<Command name="НоваяКоманда" id="1000000"> <Command name="НоваяКоманда" id="1000000">
<Action callType="Override">Расш1_НоваяКомандаВместо</Action> <Action callType="Override">Расш1_НоваяКомандаВместо</Action>
</Command> </Command>
</Commands> </Commands>
<!-- ═══ ЧАСТЬ 2: Оригинальная форма из базовой конфигурации ═══ --> <!-- ═══ ЧАСТЬ 2: Исходная форма из базовой конфигурации ═══ -->
<BaseForm version="2.17"> <BaseForm version="2.17">
<AutoCommandBar name="ФормаКоманднаяПанель" id="-1">...</AutoCommandBar> <AutoCommandBar name="ФормаКоманднаяПанель" id="-1">
<ChildItems>
<!-- Только базовые кнопки, все CommandName = 0 -->
<Button name="ФормаОбработкаЗагрузитьИзФайла" id="51">
<CommandName>0</CommandName>
...
</Button>
</ChildItems>
</AutoCommandBar>
<ChildItems> <ChildItems>
<!-- Только оригинальные элементы базовой конфигурации --> <!-- Только визуальные элементы базовой конфигурации -->
</ChildItems> </ChildItems>
<Attributes/> <Attributes/> <!-- всегда пустой -->
<Commands>...</Commands> <!-- НЕТ Events, Commands, Parameters -->
</BaseForm> </BaseForm>
</Form> </Form>
@@ -403,11 +414,13 @@ Form.xml заимствованной формы — **двухчастный ф
**Ключевые правила:** **Ключевые правила:**
1. **Часть 1** (до `<BaseForm>`) — **результирующая форма**, содержит ВСЕ элементы: и базовые, и добавленные расширением. Именно эта часть определяет итоговую форму при запуске. 1. **Часть 1** (до `<BaseForm>`) — **результирующая форма**. Содержит визуальные элементы (AutoCommandBar + ChildItems) из базовой конфигурации плюс элементы расширения. Атрибуты базовой конфигурации (DynamicList, QueryText и др.) **не включаются** — только реквизиты расширения (id ≥ 1000000) или пустой `<Attributes/>`. Events и Commands — только добавленные расширением (с `callType`).
2. **Часть 2** (`<BaseForm>`) — **полная копия оригинальной формы** из базовой конфигурации. Используется платформой для контроля совместимости при обновлении конфигурации платформа сравнивает `<BaseForm>` с текущей формой конфигурации и предупреждает о расхождениях. 2. **Часть 2** (`<BaseForm>`) — **визуальный снимок исходной формы**. Содержит только AutoCommandBar + ChildItems + пустой `<Attributes/>`. НЕ содержит Events, Commands, Parameters. Все `<CommandName>` в кнопках заменены на `0`. Платформа использует BaseForm для контроля совместимости при обновлении конфигурации.
3. Элемент `<BaseForm>` всегда идёт **последним** в `<Form>` и имеет атрибут `version`. 3. **Правило `<CommandName>0</CommandName>`**: во всех кнопках базовой формы (как в Part 1, так и в BaseForm) значение `<CommandName>` заменяется на `0`. Ссылки на команды конфигурации не сохраняются. Только кнопки, добавленные расширением, сохраняют ссылку на команду (напр. `Form.Command.XXX`).
4. Элемент `<BaseForm>` всегда идёт **последним** в `<Form>` и имеет атрибут `version`.
#### 5.4.3. Нумерация ID элементов #### 5.4.3. Нумерация ID элементов