feat(meta-compile): создание внешних источников данных

Вид ExternalDataSource навыки meta-* не поддерживали вовсе: в корпусе выгрузок его нет
ни одного, формат был неизвестен. Разведан на стенде (PostgreSQL в Docker + база 8.3.24)
и по реальной выгрузке рабочего проекта.

meta-compile собирает источник целиком одним JSON: сам источник, его таблицы с полями
и функции. Единственный вид, у которого объект складывается более чем из одного XML —
файл источника плюс по файлу на таблицу в <Источник>/Tables/.

DSL без новых конвенций: tables — dict имя → массив полей ЛИБО объект (как tabularSections),
поле — обычный реквизит плюс три своих ключа (nameInDataSource/readOnly/allowNull),
ссылки на поля короткими именами (как inputByString у справочника), functions — dict
имя → строка ИЛИ объект (как urlTemplates). Параметры функций не объекты метаданных:
они живут в самом выражении как &1, &2.

Инструкция под каскадом: в SKILL.md строка индекса, вся специфика — в
reference/external-data-source.md.

meta-validate принимает ExternalDataSource и Table, знает их наборы GeneratedType,
состав ChildObjects и шестичастную ссылку на форму таблицы. Проверено на выгрузке
платформы и на чужой рабочей выгрузке из другого проекта — обе проходят чисто.

Раундтрип на платформе 8.3.24.1691: наш эмит → загрузка → выгрузка даёт файлы,
идентичные поданным (с точностью до uuid). Два поведения платформы пришлось воспроизвести
явно, оба измерены: ввод по строке выводится из поля представления, а заданное значение
незаполненного родителя платформа при загрузке XML сбрасывает в пустую строку — задать
его можно только интерактивно.

Спека: раздел «Внешние источники данных» в 1c-config-objects-spec.md, формат ссылок,
наборы GeneratedType, строка в индексе спек.

Co-Authored-By: Claude Opus 5 (1M context) <noreply@anthropic.com>
Claude-Session: https://claude.ai/code/session_01NBsZA5cr2WFThtgp7i5WVi
This commit is contained in:
Nick Shirokov
2026-09-05 20:53:37 +03:00
co-authored by Claude Opus 5
parent c1f07f96ad
commit 6dde36a690
20 changed files with 2071 additions and 39 deletions
+1
View File
@@ -98,6 +98,7 @@ powershell.exe -NoProfile -File "${CLAUDE_SKILL_DIR}/scripts/meta-compile.ps1" -
| CommonModule, ScheduledJob, EventSubscription | `reference/code.md` |
| HTTPService, WebService | `reference/web.md` |
| Enum, Constant, DefinedType | `reference/simple.md` |
| ExternalDataSource (внешний источник данных) | `reference/external-data-source.md` |
| FunctionalOption, FilterCriterion, SettingsStorage, CommonForm, CommonPicture, CommonTemplate, служебные | `reference/other-types.md` |
Кросс-типовые детали:
@@ -0,0 +1,137 @@
# ExternalDataSource (внешний источник данных)
Источник описывается **одним JSON целиком**: сам источник, его таблицы с полями и функции.
Компилятор пишет несколько файлов — `ExternalDataSources/<Имя>.xml` и по файлу на таблицу
в `ExternalDataSources/<Имя>/Tables/`.
Параметров соединения в конфигурации нет: строка соединения, пользователь, пароль и тип СУБД
задаются в режиме «Предприятие» и хранятся в базе. В DSL их указывать негде и не нужно.
```json
{
"type": "ExternalDataSource",
"name": "PG",
"tables": {
"prices": ["product_id: Number(10,0)", "period: Date", "price: Number(15,2)"],
"products": {
"nameInDataSource": "eds.public.products",
"tableDataType": "ObjectData",
"keyFields": ["id"],
"presentationField": "name",
"fields": [
"id: Number(10,0)",
"name: String(150)",
"article: String(50) | nullable",
"parent_id: ExternalDataSourceTableRef.PG.products | nullable"
]
}
},
"functions": {
"total": { "expression": "public.f_total(&1, &2)", "returns": "Number(15,2)" }
}
}
```
## Свойства источника
| Ключ | Умолчание | Значения |
|------|-----------|----------|
| `dataLockControlMode` | `Automatic` | `Automatic` / `Managed` / `AutomaticAndManaged` |
| `tables` | `{}` | таблицы (см. ниже) |
| `functions` | `{}` | функции (см. ниже) |
При `AutomaticAndManaged` режим блокировок решает каждая таблица сама; при конкретном значении
одноимённое свойство таблицы игнорируется платформой.
## Таблицы
Ключ — имя таблицы в конфигурации. Значение — **массив полей** либо **объект** со свойствами
и ключом `fields` (та же двойственность, что у `tabularSections` справочника).
| Ключ | Умолчание | Значения |
|------|-----------|----------|
| `nameInDataSource` | = имя таблицы | имя физической таблицы; у платформы это `<база>.<схема>.<таблица>` |
| `tableType` | `Table` | `Table` — таблица или представление; `Expression` — табличная функция |
| `expressionInDataSource` | пусто | выражение для `Expression`, напр. `public.f_by_parent(&1)`; имя базы не указывается |
| `tableDataType` | `NonobjectData` | `ObjectData` (запись определяется одним полем) / `NonobjectData` |
| `keyFields` | `[]` | имена ключевых полей |
| `presentationField` | пусто | имя поля представления (только `ObjectData`) |
| `parentField` | пусто | имя поля родителя; его тип должен быть ссылкой на эту же таблицу |
| `unfilledParentValue` | `null` | значение «нет родителя»; `null` → NULL, число/строка → «Заданное значение» |
| `inputByString` | `[]` | имена полей ввода по строке |
| `dataVersionField` | пусто | имя поля версии данных |
| `dataLockFields` | `[]` | имена полей блокировки |
| `readOnly` | `false` | запрет записи |
| `transactionsIsolationLevel` | `Auto` | `Auto` / `ReadUncommitted` / `ReadCommitted` / `RepeatableRead` / `Serializable` |
| `dataLockControlMode` | `Automatic` | `Automatic` / `Managed` / `AutomaticAndManaged` |
| `basedOn` | `[]` | ввод на основании, ссылки вида `Catalog.Контрагенты` |
| `useStandardCommands` | `true` | bool |
| `quickChoice` | `false` | bool |
| `editType` | `InDialog` | `InDialog` / `InList` |
| `fields` | `[]` | поля (см. ниже); синоним — `columns` |
Ссылки на поля (`keyFields`, `presentationField`, `parentField`, `dataVersionField`,
`inputByString`, `dataLockFields`) задаются **короткими именами** — компилятор разворачивает их
в полный путь `ExternalDataSource.<Источник>.Table.<Таблица>.Field.<Поле>`.
Прочие свойства — представления (`objectPresentation`, `listPresentation`, …), формы по умолчанию
(`defaultObjectForm`, `defaultListForm`, …), `characteristics`, `explanation`,
`includeHelpInContents` — как у справочника.
## Поля
Строковая и объектная форма — те же, что у реквизитов (см. `attributes.md`). Своих ключа три:
| Ключ | Умолчание | Значения |
|------|-----------|----------|
| `nameInDataSource` | = имя поля | имя колонки; в одинарных кавычках уходит в SQL как есть |
| `readOnly` | `false` | поле не записывается (вычисляемые, автоинкрементные) |
| `allowNull` | `false` | допускает `NULL` |
Флаги строковой формы: `readonly`, `nullable`.
```json
"fields": [
"id: Number(10,0) | readonly",
{ "name": "article", "type": "String(50)", "nameInDataSource": "art_code", "allowNull": true }
]
```
Допустимые типы: `Number`, `String`, `Date`, `Boolean`, `UUID`, `BinaryData` и ссылка на таблицу
внешнего источника — `ExternalDataSourceTableRef.<Источник>.<Таблица>`.
**Составной тип запрещён платформой** — она отвергает загрузку с ошибкой «Поле не может иметь
составной тип», поэтому компилятор отказывает сразу.
## Функции
Ключ — имя функции. Значение — строка (интерпретируется как `expression`) либо объект.
| Ключ | Умолчание | Значения |
|------|-----------|----------|
| `expression` | — | выражение в источнике, обязательный |
| `returns` | `String` | тип возвращаемого значения |
| `returnValue` | `true` | `false` — процедура, тип не пишется |
Параметры функции **не являются объектами метаданных**: они записываются прямо в выражении как
`&1`, `&2`. Необязательные — в фигурных скобках `f(&1{, &2})`, переменное число — `&n[]`
(только последним).
```json
"functions": {
"nextKey": "NEXT VALUE FOR dbo.SimpleSequence",
"total": { "expression": "public.f_total(&1, &2)", "returns": "Number(15,2)" }
}
```
## Чего компилятор не делает
- **Кубы OLAP** (`Cube`, `DimensionTable`, `Dimension`, `Resource`) не поддерживаются.
- **Формы и модули** таблиц не создаются — как и у прочих объектов, для форм есть `form-add`
и `form-compile`.
## Пустой ключ таблицы — предупреждение, не ошибка
Конфигуратор интерактивно требует `keyFields`, а загрузка XML принимает таблицу без ключа молча.
Рабочие конфигурации без ключей существуют, поэтому компилятор такую таблицу собирает, а
`meta-validate` предупреждает. Без ключа недоступны форма записи и набор записей.
@@ -1,4 +1,4 @@
# meta-compile v1.104 — Compile 1C metadata object from JSON
# meta-compile v1.105 — Compile 1C metadata object from JSON
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
[CmdletBinding(PositionalBinding=$false)]
param(
@@ -279,6 +279,7 @@ $script:objectTypeSynonyms = @{
"ВебСервис" = "WebService"
"ОпределяемыйТип" = "DefinedType"
"ФункциональнаяОпция" = "FunctionalOption"
"ВнешнийИсточникДанных" = "ExternalDataSource"
}
# Enum property value synonyms — model often gets these slightly wrong
@@ -320,7 +321,9 @@ $script:validEnumValues = @{
"WriteMode" = @("Independent","RecorderSubordinate")
"InformationRegisterPeriodicity" = @("Nonperiodical","Second","Day","Month","Quarter","Year","RecorderPosition")
"DependenceOnCalculationTypes" = @("DontUse","OnActionPeriod")
"DataLockControlMode" = @("Automatic","Managed")
# AutomaticAndManaged — только у внешнего источника данных и его таблиц: там режим может
# решаться на уровне таблицы, у прочих объектов такого значения нет.
"DataLockControlMode" = @("Automatic","Managed","AutomaticAndManaged")
"FullTextSearch" = @("Use","DontUse")
"DataHistory" = @("Use","DontUse")
"DefaultPresentation" = @("AsDescription","AsCode")
@@ -472,7 +475,7 @@ $validTypes = @("Catalog","Document","Enum","Constant","InformationRegister","Ac
"HTTPService","WebService","DefinedType","FunctionalOption",
"Sequence","FilterCriterion","DocumentNumerator","SettingsStorage","CommonForm",
"SessionParameter","CommonCommand","CommandGroup","CommonAttribute","FunctionalOptionsParameter","WSReference",
"CommonPicture","CommonTemplate")
"CommonPicture","CommonTemplate","ExternalDataSource")
# -notin регистронезависим, поэтому "catalog" проходил проверку и дальше шёл в ИМЯ ТЕГА и в
# Configuration.xml как есть — выгрузка получалась с <catalog>, которую платформа не принимает.
# Прощаем регистр, но приводим к канону списка.
@@ -638,6 +641,7 @@ $script:typeSynonyms["планвидовхарактеристикссылка"]
$script:typeSynonyms["планвидоврасчётассылка"] = "ChartOfCalculationTypesRef"
$script:typeSynonyms["планвидоврасчетассылка"] = "ChartOfCalculationTypesRef"
$script:typeSynonyms["планобменассылка"] = "ExchangePlanRef"
$script:typeSynonyms["внешнийисточникданныхтаблицассылка"] = "ExternalDataSourceTableRef"
$script:typeSynonyms["бизнеспроцессссылка"] = "BusinessProcessRef"
$script:typeSynonyms["задачассылка"] = "TaskRef"
$script:typeSynonyms["определяемыйтип"] = "DefinedType"
@@ -856,7 +860,9 @@ function Emit-TypeContent {
# $script:cfgPrefix = $null означает «пишем файл, корень которого cfg НЕ объявляет»
# (Ext/Predefined.xml — его шапка это predef/v8/xr/xs/xsi). Там платформа сама уходит
# на локальную форму: в корпусе `<v8:Type xmlns:d6p1="…current-config">d6p1:CatalogRef.Валюты`.
if ($typeStr -match '^(CatalogRef|DocumentRef|EnumRef|ChartOfAccountsRef|ChartOfCharacteristicTypesRef|ChartOfCalculationTypesRef|ExchangePlanRef|BusinessProcessRef|BusinessProcessRoutePointRef|TaskRef)\.(.+)$') {
# ExternalDataSourceTableRef — единственный ссылочный тип с ДВУМЯ частями после префикса
# (Источник.Таблица), поэтому `(.+)$` здесь существенно.
if ($typeStr -match '^(CatalogRef|DocumentRef|EnumRef|ChartOfAccountsRef|ChartOfCharacteristicTypesRef|ChartOfCalculationTypesRef|ExchangePlanRef|BusinessProcessRef|BusinessProcessRoutePointRef|TaskRef|ExternalDataSourceTableRef)\.(.+)$') {
if ($script:cfgPrefix) {
X "$indent<v8:Type>$($script:cfgPrefix):$typeStr</v8:Type>"
} else {
@@ -1186,6 +1192,10 @@ function Parse-AttributeShorthand {
# Режим приведения типов измерения РС (формат 2.18). Ключ обязан доехать до эмиттера:
# без него не-дефолтное значение (Deny / DeleteData) молча заменялось на TransformValues.
typeReductionMode = $val.typeReductionMode
# Поле внешнего источника данных (контекст eds-field).
nameInDataSource = if ($val.nameInDataSource) { "$($val.nameInDataSource)" } else { "" }
readOnly = if ($val.readOnly -eq $true) { $true } else { $false }
allowNull = if ($val.allowNull -eq $true) { $true } else { $false }
}
}
@@ -2056,7 +2066,7 @@ function Emit-Attribute {
exit 1
}
}
} elseif ($context -notin @("tabular", "processor-tabular") -and
} elseif ($context -notin @("tabular", "processor-tabular", "eds-field") -and
($script:reservedAttrNames.ContainsKey($attrName) -or $script:reservedAttrNames.ContainsValue($attrName))) {
Write-Warning "Attribute '$attrName' conflicts with a standard attribute name. This may cause errors when loading into 1C."
}
@@ -2120,18 +2130,34 @@ function Emit-Attribute {
if ($parsed.fillChecking) { $fillChecking = $parsed.fillChecking }
X "$indent`t`t<FillChecking>$fillChecking</FillChecking>"
X "$indent`t`t<ChoiceFoldersAndItems>$(if ($parsed.choiceFoldersAndItems) { "$($parsed.choiceFoldersAndItems)" } else { 'Items' })</ChoiceFoldersAndItems>"
# Поле внешнего источника (eds-field) не имеет ChoiceFoldersAndItems и LinkByType, а ChoiceForm
# у него стоит ПОСЛЕ ChoiceHistoryOnInput, а не перед — порядок снят с выгрузки платформы.
if ($context -ne "eds-field") {
X "$indent`t`t<ChoiceFoldersAndItems>$(if ($parsed.choiceFoldersAndItems) { "$($parsed.choiceFoldersAndItems)" } else { 'Items' })</ChoiceFoldersAndItems>"
}
Emit-ChoiceParameterLinks "$indent`t`t" $parsed.choiceParameterLinks
Emit-ChoiceParameters "$indent`t`t" $parsed.choiceParameters
$qc = if ($parsed.quickChoice) { $parsed.quickChoice } else { "Auto" }
X "$indent`t`t<QuickChoice>$qc</QuickChoice>"
$coi = if ($parsed.createOnInput) { $parsed.createOnInput } else { "Auto" }
X "$indent`t`t<CreateOnInput>$coi</CreateOnInput>"
if ($parsed.choiceForm) { X "$indent`t`t<ChoiceForm>$(Esc-XmlText "$($parsed.choiceForm)")</ChoiceForm>" } else { X "$indent`t`t<ChoiceForm/>" }
Emit-LinkByType "$indent`t`t" $parsed.linkByType
if ($context -ne "eds-field") {
if ($parsed.choiceForm) { X "$indent`t`t<ChoiceForm>$(Esc-XmlText "$($parsed.choiceForm)")</ChoiceForm>" } else { X "$indent`t`t<ChoiceForm/>" }
Emit-LinkByType "$indent`t`t" $parsed.linkByType
}
$chi = if ($parsed.choiceHistoryOnInput) { $parsed.choiceHistoryOnInput } else { "Auto" }
X "$indent`t`t<ChoiceHistoryOnInput>$chi</ChoiceHistoryOnInput>"
if ($context -eq "eds-field") {
if ($parsed.choiceForm) { X "$indent`t`t<ChoiceForm>$(Esc-XmlText "$($parsed.choiceForm)")</ChoiceForm>" } else { X "$indent`t`t<ChoiceForm/>" }
$nids = if ($parsed.nameInDataSource) { "$($parsed.nameInDataSource)" } else { $parsed.name }
X "$indent`t`t<NameInDataSource>$(Esc-XmlText $nids)</NameInDataSource>"
$ro = if ($parsed.readOnly -eq $true -or $parsed.flags -contains "readonly") { "true" } else { "false" }
X "$indent`t`t<ReadOnly>$ro</ReadOnly>"
$an = if ($parsed.allowNull -eq $true -or $parsed.flags -contains "nullable") { "true" } else { "false" }
X "$indent`t`t<AllowNull>$an</AllowNull>"
}
# Измерение регистра сведений: Master/MainFilter/DenyIncompleteValues (между ChoiceHistoryOnInput и Indexing).
if ($elemTag -eq "Dimension" -and $context -eq "register-info") {
$master = if ($parsed.master -eq $true -or $parsed.flags -contains "master") { "true" } else { "false" }
@@ -2185,7 +2211,8 @@ function Emit-Attribute {
}
# Indexing/FullTextSearch/DataHistory — not for non-stored objects (processor, processor-tabular)
if ($context -notin @("processor", "processor-tabular")) {
# и не для полей внешнего источника: индексами и полнотекстовым поиском чужой таблицы 1С не владеет.
if ($context -notin @("processor", "processor-tabular", "eds-field")) {
# Признаки учёта ПС (account-flag) не имеют <Indexing>/<FullTextSearch>, но имеют <DataHistory>.
if ($context -ne "account-flag") {
# Ресурс регистра накопления/расчёта/бухгалтерии НЕ имеет <Indexing> (только <FullTextSearch>); измерение/реквизит — имеют.
@@ -4321,6 +4348,223 @@ function Emit-AddressingAttribute {
Emit-Attribute $indent $parsed "task-addressing" "AddressingAttribute"
}
# --- 13h. Внешние источники данных ---
# Источник пишется в один файл, каждая его таблица — в свой. Функции живут ВНУТРИ файла источника
# полными узлами, наравне со списком имён таблиц: так их выгружает платформа.
# Таблицы: dict имя → массив полей ЛИБО объект со свойствами и ключом fields/columns.
# Нормализуем в [ordered]@{ имя = @{ props; fields } } — форма зеркальна tabularSections.
function Get-EdsTables {
param($val)
$tables = [ordered]@{}
if (-not $val) { return $tables }
function New-EdsTableEntry { param($v)
if ($v -is [array] -or $v.GetType().Name -eq 'Object[]') {
return @{ props = $null; fields = @($v) }
}
$f = if ($null -ne $v.fields) { @($v.fields) } elseif ($null -ne $v.columns) { @($v.columns) } else { @() }
return @{ props = $v; fields = $f }
}
if ($val -is [array] -or $val.GetType().Name -eq 'Object[]') {
foreach ($t in $val) { $tables["$($t.name)"] = New-EdsTableEntry $t }
} else {
$val.PSObject.Properties | ForEach-Object { $tables[$_.Name] = New-EdsTableEntry $_.Value }
}
return $tables
}
# Ссылка на поле таблицы: в DSL короткое имя, в XML — полный путь.
function Get-EdsFieldRef {
param([string]$srcName, [string]$tableName, [string]$fieldName)
if (-not $fieldName) { return "" }
if ($fieldName -like "ExternalDataSource.*") { return $fieldName }
return "ExternalDataSource.$srcName.Table.$tableName.Field.$fieldName"
}
function Emit-EdsFieldRefList {
param([string]$indent, [string]$tag, $names, [string]$srcName, [string]$tableName)
$list = @($names | Where-Object { $_ })
if ($list.Count -eq 0) { X "$indent<$tag/>"; return }
X "$indent<$tag>"
foreach ($n in $list) {
X "$indent`t<xr:Field>$(Esc-XmlText (Get-EdsFieldRef $srcName $tableName "$n"))</xr:Field>"
}
X "$indent</$tag>"
}
function Emit-EdsFieldRefScalar {
param([string]$indent, [string]$tag, $name, [string]$srcName, [string]$tableName)
if (-not $name) { X "$indent<$tag/>"; return }
X "$indent<$tag>$(Esc-XmlText (Get-EdsFieldRef $srcName $tableName "$name"))</$tag>"
}
function Emit-ExternalDataSourceProperties {
param([string]$indent)
$i = $indent
X "$i<Name>$(Esc-XmlText $objName)</Name>"
Emit-MLText $i "Synonym" $synonym
if ($def.comment) { X "$i<Comment>$(Esc-XmlText $def.comment)</Comment>" } else { X "$i<Comment/>" }
$dlcm = Get-EnumProp "DataLockControlMode" "dataLockControlMode" "Automatic"
X "$i<DataLockControlMode>$dlcm</DataLockControlMode>"
}
# Функция внешнего источника. Параметров как объектов метаданных нет: они записаны прямо
# в выражении как &1, &2 (см. reference/external-data-source.md).
function Emit-EdsFunction {
param([string]$indent, [string]$fnName, $val)
$expr = ""
$returns = ""
$returnValue = $true
$fnSynonym = $null
$fnComment = ""
if ($val -is [string]) {
$expr = "$val"
} else {
$expr = if ($val.expression) { "$($val.expression)" } elseif ($val.expressionInDataSource) { "$($val.expressionInDataSource)" } else { "" }
$returns = if ($val.returns) { "$($val.returns)" } elseif ($val.returnType) { "$($val.returnType)" } else { "" }
if ($null -ne $val.returnValue) { $returnValue = ($val.returnValue -eq $true) }
$fnSynonym = $val.synonym
$fnComment = if ($val.comment) { "$($val.comment)" } else { "" }
}
if (-not $expr) {
Write-Error "Функция '$fnName' внешнего источника данных: не задано выражение (ключ expression)."
exit 1
}
$uuid = New-Guid-String
X "$indent<Function uuid=`"$uuid`">"
X "$indent`t<Properties>"
X "$indent`t`t<Name>$(Esc-XmlText $fnName)</Name>"
Emit-MLText "$indent`t`t" "Synonym" $fnSynonym
if ($fnComment) { X "$indent`t`t<Comment>$(Esc-XmlText $fnComment)</Comment>" } else { X "$indent`t`t<Comment/>" }
X "$indent`t`t<ReturnValue>$(if ($returnValue) { 'true' } else { 'false' })</ReturnValue>"
if ($returnValue) {
Emit-ValueType "$indent`t`t" $(if ($returns) { $returns } else { "String" })
} else {
X "$indent`t`t<Type/>"
}
X "$indent`t`t<ExpressionInDataSource>$(Esc-XmlText $expr)</ExpressionInDataSource>"
X "$indent`t</Properties>"
X "$indent</Function>"
}
# Свойства таблицы: 38 узлов в порядке выгрузки платформы.
function Emit-EdsTableProperties {
param([string]$indent, [string]$srcName, [string]$tableName, $t)
$i = $indent
$tblSynonym = if ($t -and $null -ne $t.synonym) { $t.synonym } else { Split-CamelCase $tableName }
X "$i<Name>$(Esc-XmlText $tableName)</Name>"
Emit-MLText $i "Synonym" $tblSynonym
if ($t -and $t.comment) { X "$i<Comment>$(Esc-XmlText "$($t.comment)")</Comment>" } else { X "$i<Comment/>" }
$tableType = if ($t -and $t.tableType) { "$($t.tableType)" } else { "Table" }
X "$i<TableType>$tableType</TableType>"
# Имя в источнике по умолчанию равно имени объекта — так поступает и платформа.
$nids = if ($t -and $t.nameInDataSource) { "$($t.nameInDataSource)" } elseif ($tableType -eq "Expression") { "" } else { $tableName }
if ($nids) { X "$i<NameInDataSource>$(Esc-XmlText $nids)</NameInDataSource>" } else { X "$i<NameInDataSource/>" }
$expr = if ($t -and $t.expressionInDataSource) { "$($t.expressionInDataSource)" } elseif ($t -and $t.expression) { "$($t.expression)" } else { "" }
if ($expr) { X "$i<ExpressionInDataSource>$(Esc-XmlText $expr)</ExpressionInDataSource>" } else { X "$i<ExpressionInDataSource/>" }
$dataType = if ($t -and $t.tableDataType) { "$($t.tableDataType)" } else { "NonobjectData" }
X "$i<TableDataType>$dataType</TableDataType>"
Emit-EdsFieldRefList $i "KeyFields" $(if ($t) { $t.keyFields } else { $null }) $srcName $tableName
Emit-EdsFieldRefScalar $i "PresentationField" $(if ($t) { $t.presentationField } else { $null }) $srcName $tableName
Emit-EdsFieldRefScalar $i "ParentField" $(if ($t) { $t.parentField } else { $null }) $srcName $tableName
# Признака незаполненного родителя отдельным узлом нет: NULL против «Заданного значения»
# различаются формой самого значения (xsi:nil против типизированного).
# ВАЖНО: платформа при загрузке XML сбрасывает заданное значение в пустую строку — проверено
# на её собственной выгрузке. Задать его можно только интерактивно, поэтому дефолт у таблицы
# с полем родителя — пустая строка (как после загрузки), а без него — nil.
$upv = if ($t) { $t.unfilledParentValue } else { $null }
$hasParent = ($t -and $t.parentField)
if ($null -ne $upv) { Emit-MinMaxValue $i "UnfilledParentValue" $upv }
elseif ($hasParent) { X "$i<UnfilledParentValue xsi:type=`"xs:string`"/>" }
else { X "$i<UnfilledParentValue xsi:nil=`"true`"/>" }
Emit-Characteristics $i $(if ($t) { $t.characteristics } else { $null })
X "$i<UseStandardCommands>$(if ($t -and $t.useStandardCommands -eq $false) { 'false' } else { 'true' })</UseStandardCommands>"
X "$i<QuickChoice>$(if ($t -and $t.quickChoice -eq $true) { 'true' } else { 'false' })</QuickChoice>"
# Ввод по строке: ключа нет → выводим из поля представления (так делает платформа при загрузке).
# Явный список, в том числе пустой, уважаем как есть — отсюда presence-aware проверка.
$ibsGiven = ($t -and $t.PSObject -and $t.PSObject.Properties -and ($t.PSObject.Properties.Name -contains 'inputByString'))
$ibs = if ($ibsGiven) { $t.inputByString } elseif ($t -and $t.presentationField) { @($t.presentationField) } else { $null }
Emit-EdsFieldRefList $i "InputByString" $ibs $srcName $tableName
X "$i<CreateOnInput>$(if ($t -and $t.createOnInput) { "$($t.createOnInput)" } else { 'Auto' })</CreateOnInput>"
X "$i<SearchStringModeOnInputByString>$(if ($t -and $t.searchStringModeOnInputByString) { "$($t.searchStringModeOnInputByString)" } else { 'Begin' })</SearchStringModeOnInputByString>"
X "$i<ChoiceDataGetModeOnInputByString>$(if ($t -and $t.choiceDataGetModeOnInputByString) { "$($t.choiceDataGetModeOnInputByString)" } else { 'Directly' })</ChoiceDataGetModeOnInputByString>"
X "$i<ChoiceHistoryOnInput>$(if ($t -and $t.choiceHistoryOnInput) { "$($t.choiceHistoryOnInput)" } else { 'Auto' })</ChoiceHistoryOnInput>"
foreach ($formTag in @("DefaultObjectForm","DefaultRecordForm","DefaultListForm","DefaultChoiceForm")) {
$key = $formTag.Substring(0,1).ToLower() + $formTag.Substring(1)
Emit-FormRef $i $formTag $(if ($t) { $t.$key } else { $null })
}
foreach ($presTag in @("ObjectPresentation","ExtendedObjectPresentation","RecordPresentation",
"ExtendedRecordPresentation","ListPresentation","ExtendedListPresentation","Explanation")) {
$key = $presTag.Substring(0,1).ToLower() + $presTag.Substring(1)
Emit-MLText $i $presTag $(if ($t) { $t.$key } else { $null })
}
X "$i<IncludeHelpInContents>$(if ($t -and $t.includeHelpInContents -eq $true) { 'true' } else { 'false' })</IncludeHelpInContents>"
X "$i<ReadOnly>$(if ($t -and $t.readOnly -eq $true) { 'true' } else { 'false' })</ReadOnly>"
X "$i<TransactionsIsolationLevel>$(if ($t -and $t.transactionsIsolationLevel) { "$($t.transactionsIsolationLevel)" } else { 'Auto' })</TransactionsIsolationLevel>"
Emit-EdsFieldRefScalar $i "DataVersionField" $(if ($t) { $t.dataVersionField } else { $null }) $srcName $tableName
X "$i<EditType>$(if ($t -and $t.editType) { "$($t.editType)" } else { 'InDialog' })</EditType>"
Emit-MDRefList $i "BasedOn" $(if ($t) { $t.basedOn } else { $null })
Emit-EdsFieldRefList $i "DataLockFields" $(if ($t) { $t.dataLockFields } else { $null }) $srcName $tableName
X "$i<DataLockControlMode>$(if ($t -and $t.dataLockControlMode) { "$($t.dataLockControlMode)" } else { 'Automatic' })</DataLockControlMode>"
}
# Отдельный XML-документ таблицы. Возвращает строку: X пишет в общий StringBuilder,
# поэтому «перехват» — запомнить длину, отдать эмиттерам, вырезать добавленное
# (тот же приём, что у составного типа).
function Build-EdsTableXml {
param([string]$srcName, [string]$tableName, $entry)
$before = $script:xml.Length
$tableUuid = New-Guid-String
X '<?xml version="1.0" encoding="UTF-8"?>'
X "<MetaDataObject $($script:xmlnsDecl) version=`"$($script:formatVersion)`">"
X "`t<Table uuid=`"$tableUuid`">"
# InternalInfo у таблицы эмитится здесь, а не через $script:generatedTypes: имя элемента
# трёхчастное (Префикс.Источник.Таблица), общая карта такой формы не знает.
X "`t`t<InternalInfo>"
foreach ($pair in @(
@("ExternalDataSourceTableManager", "Manager"),
@("ExternalDataSourceTableObject", "Object"),
@("ExternalDataSourceTableRef", "Ref"),
@("ExternalDataSourceTableList", "List"),
@("ExternalDataSourceTableRecord", "Record"),
@("ExternalDataSourceTableRecordSet", "RecordSet"),
@("ExternalDataSourceTableRecordKey", "RecordKey"),
@("ExternalDataSourceTableRecordManager", "RecordManager"))) {
X "`t`t`t<xr:GeneratedType name=`"$($pair[0]).$srcName.$tableName`" category=`"$($pair[1])`">"
X "`t`t`t`t<xr:TypeId>$(New-Guid-String)</xr:TypeId>"
X "`t`t`t`t<xr:ValueId>$(New-Guid-String)</xr:ValueId>"
X "`t`t`t</xr:GeneratedType>"
}
X "`t`t</InternalInfo>"
X "`t`t<Properties>"
Emit-EdsTableProperties "`t`t`t" $srcName $tableName $entry.props
X "`t`t</Properties>"
$fields = @($entry.fields)
if ($fields.Count -gt 0) {
X "`t`t<ChildObjects>"
foreach ($f in $fields) {
$parsed = Parse-AttributeShorthand $f
Emit-Attribute "`t`t`t" $parsed "eds-field" "Field"
}
X "`t`t</ChildObjects>"
} else {
X "`t`t<ChildObjects/>"
}
X "`t</Table>"
X "</MetaDataObject>"
$chunk = $script:xml.ToString($before, $script:xml.Length - $before)
[void]$script:xml.Remove($before, $script:xml.Length - $before)
return $chunk
}
# --- 14. Namespaces ---
$script:xmlnsDecl = 'xmlns="http://v8.1c.ru/8.3/MDClasses" xmlns:app="http://v8.1c.ru/8.2/managed-application/core" xmlns:cfg="http://v8.1c.ru/8.1/data/enterprise/current-config" xmlns:cmi="http://v8.1c.ru/8.2/managed-application/cmi" xmlns:ent="http://v8.1c.ru/8.1/data/enterprise" xmlns:lf="http://v8.1c.ru/8.2/managed-application/logform" xmlns:style="http://v8.1c.ru/8.1/data/ui/style" xmlns:sys="http://v8.1c.ru/8.1/data/ui/fonts/system" xmlns:v8="http://v8.1c.ru/8.1/data/core" xmlns:v8ui="http://v8.1c.ru/8.1/data/ui" xmlns:web="http://v8.1c.ru/8.1/data/ui/colors/web" xmlns:win="http://v8.1c.ru/8.1/data/ui/colors/windows" xmlns:xen="http://v8.1c.ru/8.3/xcf/enums" xmlns:xpr="http://v8.1c.ru/8.3/xcf/predef" xmlns:xr="http://v8.1c.ru/8.3/xcf/readable" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"'
@@ -4464,6 +4708,7 @@ switch ($objType) {
"Task" { Emit-TaskProperties "`t`t`t" }
"HTTPService" { Emit-HTTPServiceProperties "`t`t`t" }
"WebService" { Emit-WebServiceProperties "`t`t`t" }
"ExternalDataSource" { Emit-ExternalDataSourceProperties "`t`t`t" }
}
X "`t`t</Properties>"
@@ -4761,6 +5006,29 @@ if ($objType -eq "WebService") {
}
}
# --- ExternalDataSource: Tables (именами) + Functions (полными узлами) ---
$script:edsTables = [ordered]@{}
if ($objType -eq "ExternalDataSource") {
$script:edsTables = Get-EdsTables $def.tables
$functions = [ordered]@{}
if ($def.functions) {
$def.functions.PSObject.Properties | ForEach-Object { $functions[$_.Name] = $_.Value }
}
if ($script:edsTables.Count -gt 0 -or $functions.Count -gt 0) {
$hasChildren = $true
X "`t`t<ChildObjects>"
foreach ($tblName in $script:edsTables.Keys) {
X "`t`t`t<Table>$(Esc-XmlText $tblName)</Table>"
}
foreach ($fnName in $functions.Keys) {
Emit-EdsFunction "`t`t`t" $fnName $functions[$fnName]
}
X "`t`t</ChildObjects>"
} else {
X "`t`t<ChildObjects/>"
}
}
# --- CommonModule: no ChildObjects ---
X "`t</$objType>"
@@ -4809,6 +5077,7 @@ $script:typePluralMap = @{
"WSReference" = "WSReferences"
"CommonPicture" = "CommonPictures"
"CommonTemplate" = "CommonTemplates"
"ExternalDataSource" = "ExternalDataSources"
}
$typePlural = $script:typePluralMap[$objType]
@@ -5043,6 +5312,20 @@ function Write-XmlFileKeepEol([string]$path, [string]$text, $encoding) {
Write-XmlFileKeepEol $mainXmlPath $metadataXml $enc
# Таблицы внешнего источника — отдельными файлами в <Источник>/Tables/.
# Единственный вид, у которого объект складывается более чем из одного XML.
$edsTablesCreated = @()
if ($objType -eq "ExternalDataSource" -and $script:edsTables.Count -gt 0) {
$tablesDir = Join-Path $objSubDir "Tables"
if (-not (Test-Path $tablesDir)) { New-Item -ItemType Directory -Path $tablesDir -Force | Out-Null }
foreach ($tblName in $script:edsTables.Keys) {
$tableXml = Build-EdsTableXml $objName $tblName $script:edsTables[$tblName]
$tablePath = Join-Path $tablesDir "$tblName.xml"
Write-XmlFileKeepEol $tablePath $tableXml $enc
$edsTablesCreated += $tablePath
}
}
# Module files
$modulesCreated = @()
@@ -1,5 +1,5 @@
#!/usr/bin/env python3
# meta-compile v1.104 — Compile 1C metadata object from JSON
# meta-compile v1.105 — Compile 1C metadata object from JSON
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
import argparse
@@ -497,6 +497,7 @@ object_type_synonyms = {
'ВебСервис': 'WebService',
'ОпределяемыйТип': 'DefinedType',
'ФункциональнаяОпция': 'FunctionalOption',
'ВнешнийИсточникДанных': 'ExternalDataSource',
}
# Enum property value synonyms — model often gets these slightly wrong
@@ -542,7 +543,9 @@ valid_enum_values = {
'WriteMode': ['Independent', 'RecorderSubordinate'],
'InformationRegisterPeriodicity': ['Nonperiodical', 'Second', 'Day', 'Month', 'Quarter', 'Year', 'RecorderPosition'],
'DependenceOnCalculationTypes': ['DontUse', 'OnActionPeriod'],
'DataLockControlMode': ['Automatic', 'Managed'],
# AutomaticAndManaged — только у внешнего источника данных и его таблиц: там режим может
# решаться на уровне таблицы, у прочих объектов такого значения нет.
'DataLockControlMode': ['Automatic', 'Managed', 'AutomaticAndManaged'],
'FullTextSearch': ['Use', 'DontUse'],
'DataHistory': ['Use', 'DontUse'],
'DefaultPresentation': ['AsDescription', 'AsCode'],
@@ -692,7 +695,7 @@ valid_types = [
'Sequence', 'FilterCriterion', 'DocumentNumerator', 'SettingsStorage',
'CommonForm',
'SessionParameter', 'CommonCommand', 'CommandGroup', 'CommonAttribute', 'FunctionalOptionsParameter', 'WSReference',
'CommonPicture', 'CommonTemplate',
'CommonPicture', 'CommonTemplate', 'ExternalDataSource',
]
# Регистр имени вида — как в PS (-contains регистронезависим): приводим к канону списка
obj_type = next((t for t in valid_types if t.lower() == obj_type.lower()), obj_type)
@@ -745,6 +748,7 @@ type_synonyms = {
'планвидоврасчётассылка': 'ChartOfCalculationTypesRef',
'планвидоврасчетассылка': 'ChartOfCalculationTypesRef',
'планобменассылка': 'ExchangePlanRef',
'внешнийисточникданныхтаблицассылка': 'ExternalDataSourceTableRef',
'бизнеспроцессссылка': 'BusinessProcessRef',
'задачассылка': 'TaskRef',
'определяемыйтип': 'DefinedType',
@@ -969,7 +973,9 @@ def emit_type_content(indent, type_str):
# cfg_prefix = None означает «пишем файл, корень которого cfg НЕ объявляет»
# (Ext/Predefined.xml — его шапка это predef/v8/xr/xs/xsi). Там платформа сама уходит
# на локальную форму: в корпусе `<v8:Type xmlns:d6p1="…current-config">d6p1:CatalogRef.Валюты`.
m = re.match(r'^(CatalogRef|DocumentRef|EnumRef|ChartOfAccountsRef|ChartOfCharacteristicTypesRef|ChartOfCalculationTypesRef|ExchangePlanRef|BusinessProcessRef|BusinessProcessRoutePointRef|TaskRef)\.(.+)$', type_str)
# ExternalDataSourceTableRef — единственный ссылочный тип с ДВУМЯ частями после префикса
# (Источник.Таблица), поэтому `(.+)$` здесь существенно.
m = re.match(r'^(CatalogRef|DocumentRef|EnumRef|ChartOfAccountsRef|ChartOfCharacteristicTypesRef|ChartOfCalculationTypesRef|ExchangePlanRef|BusinessProcessRef|BusinessProcessRoutePointRef|TaskRef|ExternalDataSourceTableRef)\.(.+)$', type_str)
if m:
if cfg_prefix:
X(f'{indent}<v8:Type>{cfg_prefix}:{type_str}</v8:Type>')
@@ -1293,6 +1299,10 @@ def parse_attribute_shorthand(val):
# Режим приведения типов измерения РС (формат 2.18). Ключ обязан доехать до эмиттера:
# без него не-дефолтное значение (Deny / DeleteData) молча заменялось на TransformValues.
'typeReductionMode': val.get('typeReductionMode'),
# Поле внешнего источника данных (контекст eds-field).
'nameInDataSource': str(val['nameInDataSource']) if val.get('nameInDataSource') else '',
'readOnly': val.get('readOnly') is True,
'allowNull': val.get('allowNull') is True,
}
def parse_enum_value_shorthand(val):
@@ -2285,15 +2295,28 @@ def emit_attribute(indent, parsed, context, elem_tag='Attribute'):
if parsed.get('fillChecking'):
fill_checking = parsed['fillChecking']
X(f'{indent}\t\t<FillChecking>{fill_checking}</FillChecking>')
X(f'{indent}\t\t<ChoiceFoldersAndItems>{parsed.get("choiceFoldersAndItems") or "Items"}</ChoiceFoldersAndItems>')
# Поле внешнего источника (eds-field) не имеет ChoiceFoldersAndItems и LinkByType, а ChoiceForm
# у него стоит ПОСЛЕ ChoiceHistoryOnInput, а не перед — порядок снят с выгрузки платформы.
if context != 'eds-field':
X(f'{indent}\t\t<ChoiceFoldersAndItems>{parsed.get("choiceFoldersAndItems") or "Items"}</ChoiceFoldersAndItems>')
emit_choice_parameter_links(f'{indent}\t\t', parsed.get('choiceParameterLinks'))
emit_choice_parameters(f'{indent}\t\t', parsed.get('choiceParameters'))
X(f'{indent}\t\t<QuickChoice>{parsed.get("quickChoice") or "Auto"}</QuickChoice>')
X(f'{indent}\t\t<CreateOnInput>{parsed.get("createOnInput") or "Auto"}</CreateOnInput>')
X(f'{indent}\t\t<ChoiceForm>{esc_xml_text(str(parsed["choiceForm"]))}</ChoiceForm>' if parsed.get('choiceForm') else f'{indent}\t\t<ChoiceForm/>')
emit_link_by_type(f'{indent}\t\t', parsed.get('linkByType'))
if context != 'eds-field':
X(f'{indent}\t\t<ChoiceForm>{esc_xml_text(str(parsed["choiceForm"]))}</ChoiceForm>' if parsed.get('choiceForm') else f'{indent}\t\t<ChoiceForm/>')
emit_link_by_type(f'{indent}\t\t', parsed.get('linkByType'))
chi = parsed.get('choiceHistoryOnInput') or 'Auto'
X(f'{indent}\t\t<ChoiceHistoryOnInput>{chi}</ChoiceHistoryOnInput>')
if context == 'eds-field':
X(f'{indent}\t\t<ChoiceForm>{esc_xml_text(str(parsed["choiceForm"]))}</ChoiceForm>' if parsed.get('choiceForm') else f'{indent}\t\t<ChoiceForm/>')
nids = parsed.get('nameInDataSource') or parsed['name']
X(f'{indent}\t\t<NameInDataSource>{esc_xml_text(str(nids))}</NameInDataSource>')
ro = 'true' if (parsed.get('readOnly') is True or 'readonly' in parsed.get('flags', [])) else 'false'
X(f'{indent}\t\t<ReadOnly>{ro}</ReadOnly>')
an = 'true' if (parsed.get('allowNull') is True or 'nullable' in parsed.get('flags', [])) else 'false'
X(f'{indent}\t\t<AllowNull>{an}</AllowNull>')
# Измерение регистра сведений: Master/MainFilter/DenyIncompleteValues (между ChoiceHistoryOnInput и Indexing).
if elem_tag == 'Dimension' and context == 'register-info':
master = 'true' if (parsed.get('master') is True or 'master' in parsed.get('flags', [])) else 'false'
@@ -2341,7 +2364,8 @@ def emit_attribute(indent, parsed, context, elem_tag='Attribute'):
use_value = parsed.get("use") or "ForItem"
if context == 'catalog':
X(f'{indent}\t\t<Use>{use_value}</Use>')
if context not in ('processor', 'processor-tabular'):
# и не для полей внешнего источника: индексами и полнотекстовым поиском чужой таблицы 1С не владеет.
if context not in ('processor', 'processor-tabular', 'eds-field'):
# Признаки учёта ПС (account-flag) не имеют <Indexing>/<FullTextSearch>, но имеют <DataHistory>.
if context != 'account-flag':
# Ресурс регистра накопления НЕ имеет <Indexing> (только <FullTextSearch>); измерение/реквизит — имеют.
@@ -4313,6 +4337,237 @@ def emit_addressing_attribute(indent, addr_def):
parsed = parse_attribute_shorthand(addr_def)
emit_attribute(indent, parsed, 'task-addressing', 'AddressingAttribute')
# ---------------------------------------------------------------------------
# 13h. Внешние источники данных
# ---------------------------------------------------------------------------
# Источник пишется в один файл, каждая его таблица — в свой. Функции живут ВНУТРИ файла источника
# полными узлами, наравне со списком имён таблиц: так их выгружает платформа.
def get_eds_tables(val):
"""Таблицы: dict имя → массив полей ЛИБО объект со свойствами и ключом fields/columns."""
tables = {}
if not val:
return tables
def entry(v):
if isinstance(v, list):
return {'props': None, 'fields': list(v)}
f = v.get('fields') if v.get('fields') is not None else v.get('columns')
return {'props': v, 'fields': list(f) if f else []}
if isinstance(val, list):
for t in val:
tables[str(t.get('name'))] = entry(t)
else:
for k, v in val.items():
tables[k] = entry(v)
return tables
def get_eds_field_ref(src_name, table_name, field_name):
"""Ссылка на поле таблицы: в DSL короткое имя, в XML — полный путь."""
if not field_name:
return ''
if str(field_name).startswith('ExternalDataSource.'):
return str(field_name)
return f'ExternalDataSource.{src_name}.Table.{table_name}.Field.{field_name}'
def emit_eds_field_ref_list(indent, tag, names, src_name, table_name):
items = [n for n in (names or []) if n]
if not items:
X(f'{indent}<{tag}/>')
return
X(f'{indent}<{tag}>')
for n in items:
X(f'{indent}\t<xr:Field>{esc_xml_text(get_eds_field_ref(src_name, table_name, n))}</xr:Field>')
X(f'{indent}</{tag}>')
def emit_eds_field_ref_scalar(indent, tag, name, src_name, table_name):
if not name:
X(f'{indent}<{tag}/>')
return
X(f'{indent}<{tag}>{esc_xml_text(get_eds_field_ref(src_name, table_name, name))}</{tag}>')
def emit_external_data_source_properties(indent):
i = indent
X(f'{i}<Name>{esc_xml_text(obj_name)}</Name>')
emit_mltext(i, 'Synonym', synonym)
if defn.get('comment'):
X(f'{i}<Comment>{esc_xml_text(str(defn["comment"]))}</Comment>')
else:
X(f'{i}<Comment/>')
dlcm = get_enum_prop('DataLockControlMode', 'dataLockControlMode', 'Automatic')
X(f'{i}<DataLockControlMode>{dlcm}</DataLockControlMode>')
def emit_eds_function(indent, fn_name, val):
"""Функция внешнего источника. Параметров как объектов метаданных нет: они записаны прямо
в выражении как &1, &2 (см. reference/external-data-source.md)."""
fn_synonym = None
fn_comment = ''
returns = ''
return_value = True
if isinstance(val, str):
expr = val
else:
expr = str(val.get('expression') or val.get('expressionInDataSource') or '')
returns = str(val.get('returns') or val.get('returnType') or '')
if val.get('returnValue') is not None:
return_value = val.get('returnValue') is True
fn_synonym = val.get('synonym')
fn_comment = str(val['comment']) if val.get('comment') else ''
if not expr:
print(f"ERROR: Функция '{fn_name}' внешнего источника данных: не задано выражение (ключ expression).",
file=sys.stderr)
sys.exit(1)
X(f'{indent}<Function uuid="{new_uuid()}">')
X(f'{indent}\t<Properties>')
X(f'{indent}\t\t<Name>{esc_xml_text(fn_name)}</Name>')
emit_mltext(f'{indent}\t\t', 'Synonym', fn_synonym)
if fn_comment:
X(f'{indent}\t\t<Comment>{esc_xml_text(fn_comment)}</Comment>')
else:
X(f'{indent}\t\t<Comment/>')
X(f'{indent}\t\t<ReturnValue>{"true" if return_value else "false"}</ReturnValue>')
if return_value:
emit_value_type(f'{indent}\t\t', returns or 'String')
else:
X(f'{indent}\t\t<Type/>')
X(f'{indent}\t\t<ExpressionInDataSource>{esc_xml_text(expr)}</ExpressionInDataSource>')
X(f'{indent}\t</Properties>')
X(f'{indent}</Function>')
def emit_eds_table_properties(indent, src_name, table_name, t):
"""Свойства таблицы: 38 узлов в порядке выгрузки платформы."""
i = indent
t = t or {}
tbl_synonym = t['synonym'] if t.get('synonym') is not None else split_camel_case(table_name)
X(f'{i}<Name>{esc_xml_text(table_name)}</Name>')
emit_mltext(i, 'Synonym', tbl_synonym)
if t.get('comment'):
X(f'{i}<Comment>{esc_xml_text(str(t["comment"]))}</Comment>')
else:
X(f'{i}<Comment/>')
table_type = str(t.get('tableType') or 'Table')
X(f'{i}<TableType>{table_type}</TableType>')
# Имя в источнике по умолчанию равно имени объекта — так поступает и платформа.
if t.get('nameInDataSource'):
nids = str(t['nameInDataSource'])
elif table_type == 'Expression':
nids = ''
else:
nids = table_name
X(f'{i}<NameInDataSource>{esc_xml_text(nids)}</NameInDataSource>' if nids else f'{i}<NameInDataSource/>')
expr = str(t.get('expressionInDataSource') or t.get('expression') or '')
X(f'{i}<ExpressionInDataSource>{esc_xml_text(expr)}</ExpressionInDataSource>' if expr else f'{i}<ExpressionInDataSource/>')
X(f'{i}<TableDataType>{t.get("tableDataType") or "NonobjectData"}</TableDataType>')
emit_eds_field_ref_list(i, 'KeyFields', t.get('keyFields'), src_name, table_name)
emit_eds_field_ref_scalar(i, 'PresentationField', t.get('presentationField'), src_name, table_name)
emit_eds_field_ref_scalar(i, 'ParentField', t.get('parentField'), src_name, table_name)
# Признака незаполненного родителя отдельным узлом нет: NULL против «Заданного значения»
# различаются формой самого значения (xsi:nil против типизированного).
# ВАЖНО: платформа при загрузке XML сбрасывает заданное значение в пустую строку — проверено
# на её собственной выгрузке. Задать его можно только интерактивно, поэтому дефолт у таблицы
# с полем родителя — пустая строка (как после загрузки), а без него — nil.
upv = t.get('unfilledParentValue')
if upv is not None:
emit_min_max_value(i, 'UnfilledParentValue', upv)
elif t.get('parentField'):
X(f'{i}<UnfilledParentValue xsi:type="xs:string"/>')
else:
X(f'{i}<UnfilledParentValue xsi:nil="true"/>')
emit_characteristics(i, t.get('characteristics'))
X(f'{i}<UseStandardCommands>{"false" if t.get("useStandardCommands") is False else "true"}</UseStandardCommands>')
X(f'{i}<QuickChoice>{"true" if t.get("quickChoice") is True else "false"}</QuickChoice>')
# Ввод по строке: ключа нет → выводим из поля представления (так делает платформа при загрузке).
# Явный список, в том числе пустой, уважаем как есть — отсюда presence-aware проверка.
if 'inputByString' in t:
ibs = t.get('inputByString')
elif t.get('presentationField'):
ibs = [t['presentationField']]
else:
ibs = None
emit_eds_field_ref_list(i, 'InputByString', ibs, src_name, table_name)
X(f'{i}<CreateOnInput>{t.get("createOnInput") or "Auto"}</CreateOnInput>')
X(f'{i}<SearchStringModeOnInputByString>{t.get("searchStringModeOnInputByString") or "Begin"}</SearchStringModeOnInputByString>')
X(f'{i}<ChoiceDataGetModeOnInputByString>{t.get("choiceDataGetModeOnInputByString") or "Directly"}</ChoiceDataGetModeOnInputByString>')
X(f'{i}<ChoiceHistoryOnInput>{t.get("choiceHistoryOnInput") or "Auto"}</ChoiceHistoryOnInput>')
for form_tag in ('DefaultObjectForm', 'DefaultRecordForm', 'DefaultListForm', 'DefaultChoiceForm'):
key = form_tag[0].lower() + form_tag[1:]
emit_form_ref(i, form_tag, t.get(key))
for pres_tag in ('ObjectPresentation', 'ExtendedObjectPresentation', 'RecordPresentation',
'ExtendedRecordPresentation', 'ListPresentation', 'ExtendedListPresentation', 'Explanation'):
key = pres_tag[0].lower() + pres_tag[1:]
emit_mltext(i, pres_tag, t.get(key))
X(f'{i}<IncludeHelpInContents>{"true" if t.get("includeHelpInContents") is True else "false"}</IncludeHelpInContents>')
X(f'{i}<ReadOnly>{"true" if t.get("readOnly") is True else "false"}</ReadOnly>')
X(f'{i}<TransactionsIsolationLevel>{t.get("transactionsIsolationLevel") or "Auto"}</TransactionsIsolationLevel>')
emit_eds_field_ref_scalar(i, 'DataVersionField', t.get('dataVersionField'), src_name, table_name)
X(f'{i}<EditType>{t.get("editType") or "InDialog"}</EditType>')
emit_md_ref_list(i, 'BasedOn', t.get('basedOn'))
emit_eds_field_ref_list(i, 'DataLockFields', t.get('dataLockFields'), src_name, table_name)
X(f'{i}<DataLockControlMode>{t.get("dataLockControlMode") or "Automatic"}</DataLockControlMode>')
EDS_TABLE_GENERATED_TYPES = (
('ExternalDataSourceTableManager', 'Manager'),
('ExternalDataSourceTableObject', 'Object'),
('ExternalDataSourceTableRef', 'Ref'),
('ExternalDataSourceTableList', 'List'),
('ExternalDataSourceTableRecord', 'Record'),
('ExternalDataSourceTableRecordSet', 'RecordSet'),
('ExternalDataSourceTableRecordKey', 'RecordKey'),
('ExternalDataSourceTableRecordManager', 'RecordManager'),
)
def build_eds_table_xml(src_name, table_name, entry):
"""Отдельный XML-документ таблицы. Возвращает строку: X пишет в общий список строк,
поэтому «перехват» запомнить длину, отдать эмиттерам, срезать добавленное
(в ps1-порте тот же приём выражен через StringBuilder различие рантаймов, не логики)."""
before = len(lines)
X('<?xml version="1.0" encoding="UTF-8"?>')
X(f'<MetaDataObject {xmlns_decl} version="{format_version}">')
X(f'\t<Table uuid="{new_uuid()}">')
# InternalInfo у таблицы эмитится здесь, а не через generated_types: имя элемента
# трёхчастное (Префикс.Источник.Таблица), общая карта такой формы не знает.
X('\t\t<InternalInfo>')
for prefix, category in EDS_TABLE_GENERATED_TYPES:
X(f'\t\t\t<xr:GeneratedType name="{prefix}.{src_name}.{table_name}" category="{category}">')
X(f'\t\t\t\t<xr:TypeId>{new_uuid()}</xr:TypeId>')
X(f'\t\t\t\t<xr:ValueId>{new_uuid()}</xr:ValueId>')
X('\t\t\t</xr:GeneratedType>')
X('\t\t</InternalInfo>')
X('\t\t<Properties>')
emit_eds_table_properties('\t\t\t', src_name, table_name, entry['props'])
X('\t\t</Properties>')
fields = entry['fields']
if fields:
X('\t\t<ChildObjects>')
for f in fields:
emit_attribute('\t\t\t', parse_attribute_shorthand(f), 'eds-field', 'Field')
X('\t\t</ChildObjects>')
else:
X('\t\t<ChildObjects/>')
X('\t</Table>')
X('</MetaDataObject>')
chunk = '\r\n'.join(lines[before:])
del lines[before:]
return chunk
# ---------------------------------------------------------------------------
# 14. Namespaces
# ---------------------------------------------------------------------------
@@ -4453,6 +4708,7 @@ property_emitters = {
'Task': emit_task_properties,
'HTTPService': emit_http_service_properties,
'WebService': emit_web_service_properties,
'ExternalDataSource': emit_external_data_source_properties,
}
property_emitters[obj_type]('\t\t\t')
@@ -4726,6 +4982,25 @@ if obj_type == 'WebService':
else:
X('\t\t<ChildObjects/>')
# --- ExternalDataSource: Tables (именами) + Functions (полными узлами) ---
eds_tables = {}
if obj_type == 'ExternalDataSource':
eds_tables = get_eds_tables(defn.get('tables'))
functions = {}
if defn.get('functions'):
for k, v in defn['functions'].items():
functions[k] = v
if eds_tables or functions:
has_children = True
X('\t\t<ChildObjects>')
for tbl_name in eds_tables:
X(f'\t\t\t<Table>{esc_xml_text(tbl_name)}</Table>')
for fn_name, fn_val in functions.items():
emit_eds_function('\t\t\t', fn_name, fn_val)
X('\t\t</ChildObjects>')
else:
X('\t\t<ChildObjects/>')
# --- CommonModule: no ChildObjects ---
X(f'\t</{obj_type}>')
@@ -4775,6 +5050,7 @@ type_plural_map = {
'WSReference': 'WSReferences',
'CommonPicture': 'CommonPictures',
'CommonTemplate': 'CommonTemplates',
'ExternalDataSource': 'ExternalDataSources',
}
type_plural = type_plural_map[obj_type]
@@ -4795,6 +5071,18 @@ if obj_type not in types_no_sub_dir:
write_xml_file_keep_eol(main_xml_path, metadata_xml)
# Таблицы внешнего источника — отдельными файлами в <Источник>/Tables/.
# Единственный вид, у которого объект складывается более чем из одного XML.
eds_tables_created = []
if obj_type == 'ExternalDataSource' and eds_tables:
tables_dir = os.path.join(obj_sub_dir, 'Tables')
os.makedirs(tables_dir, exist_ok=True)
for tbl_name in eds_tables:
table_xml = build_eds_table_xml(obj_name, tbl_name, eds_tables[tbl_name])
table_path = os.path.join(tables_dir, f'{tbl_name}.xml')
write_xml_file_keep_eol(table_path, table_xml)
eds_tables_created.append(table_path)
# Module files
modules_created = []
@@ -1,4 +1,4 @@
# meta-edit v1.42 — Edit existing 1C metadata object XML
# meta-edit v1.43 — Edit existing 1C metadata object XML
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
[CmdletBinding(PositionalBinding=$false)]
param(
@@ -139,7 +139,8 @@ $script:validEnumValues = @{
"WriteMode" = @("Independent","RecorderSubordinate")
"InformationRegisterPeriodicity" = @("Nonperiodical","Second","Day","Month","Quarter","Year","RecorderPosition")
"DependenceOnCalculationTypes" = @("DontUse","OnActionPeriod")
"DataLockControlMode" = @("Automatic","Managed")
# AutomaticAndManaged — только у внешнего источника данных и его таблиц.
"DataLockControlMode" = @("Automatic","Managed","AutomaticAndManaged")
"FullTextSearch" = @("Use","DontUse")
"DataHistory" = @("Use","DontUse")
"DefaultPresentation" = @("AsDescription","AsCode")
@@ -1,5 +1,5 @@
#!/usr/bin/env python3
# meta-edit v1.42 — Edit existing 1C metadata object XML
# meta-edit v1.43 — Edit existing 1C metadata object XML
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
import argparse
@@ -427,7 +427,8 @@ valid_enum_values = {
'WriteMode': ['Independent', 'RecorderSubordinate'],
'InformationRegisterPeriodicity': ['Nonperiodical', 'Second', 'Day', 'Month', 'Quarter', 'Year', 'RecorderPosition'],
'DependenceOnCalculationTypes': ['DontUse', 'OnActionPeriod'],
'DataLockControlMode': ['Automatic', 'Managed'],
# AutomaticAndManaged — только у внешнего источника данных и его таблиц.
'DataLockControlMode': ['Automatic', 'Managed', 'AutomaticAndManaged'],
'FullTextSearch': ['Use', 'DontUse'],
'DataHistory': ['Use', 'DontUse'],
'DefaultPresentation': ['AsDescription', 'AsCode'],
@@ -1,4 +1,4 @@
# meta-validate v1.25 — Validate 1C metadata object structure
# meta-validate v1.26 — Validate 1C metadata object structure
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
[CmdletBinding(PositionalBinding=$false)]
param(
@@ -179,7 +179,9 @@ $validTypes = @(
"BusinessProcess","Task","ExchangePlan","DocumentJournal",
"Report","DataProcessor",
"CommonModule","ScheduledJob","EventSubscription",
"HTTPService","WebService","DefinedType"
"HTTPService","WebService","DefinedType",
# Внешний источник данных и его таблица (корень файла таблицы — <Table>).
"ExternalDataSource","Table"
)
# Валидные типы метаданных без глубоких правил валидации — раньше падали как "Unrecognized"
@@ -213,6 +215,9 @@ $generatedTypeCategories = @{
"DataProcessor" = @("Object","Manager")
"DefinedType" = @("DefinedType")
"ExternalDataSource" = @("Manager","TablesManager","CubesManager")
# Таблица внешнего источника: имя элемента трёхчастное (Префикс.Источник.Таблица),
# но проверка «имя оканчивается на .ИмяОбъекта» на нём работает как есть.
"Table" = @("Manager","Object","Ref","List","Record","RecordSet","RecordKey","RecordManager")
}
# Types that have NO InternalInfo / GeneratedType
@@ -274,6 +279,9 @@ $childObjectRules = @{
"DocumentJournal" = @("Column","Form","Template","Command")
"HTTPService" = @("URLTemplate")
"WebService" = @("Operation")
# Внешний источник: таблицы перечислены именами, функции лежат полными узлами.
"ExternalDataSource" = @("Table","Function","Cube")
"Table" = @("Field","Form","Template","Command")
"Constant" = @("Form")
"DefinedType" = @()
"CommonModule" = @()
@@ -296,7 +304,8 @@ $validPropertyValues = @{
"RealTimePosting" = @("Allow","Deny")
"RegisterRecordsDeletion" = @("AutoDelete","AutoDeleteOnUnpost","AutoDeleteOff")
"RegisterRecordsWritingOnPost" = @("WriteModified","WriteSelected","WriteAll")
"DataLockControlMode" = @("Automatic","Managed")
# AutomaticAndManaged — только у внешнего источника данных и его таблиц.
"DataLockControlMode" = @("Automatic","Managed","AutomaticAndManaged")
"FullTextSearch" = @("Use","DontUse")
"DefaultPresentation" = @("AsDescription","AsCode")
"HierarchyType" = @("HierarchyFoldersAndItems","HierarchyOfItems")
@@ -1762,6 +1771,13 @@ if (-not $isAdopted) {
continue
}
# Ссылка на форму таблицы внешнего источника — шестичастная:
# ExternalDataSource.<Источник>.Table.<Таблица>.Form.<Форма>. Сводим её к четырём частям
# (вид = Table, объект = имя таблицы), дальше проверка общая.
if ($parts.Count -eq 6 -and $parts[0] -eq "ExternalDataSource" -and $parts[2] -eq "Table" -and $parts[4] -eq "Form") {
$parts = @("Table", $parts[3], "Form", $parts[5])
}
if ($parts.Count -ne 4 -or $parts[2] -ne "Form") {
Report-Warn "20. $tag '$ref' — неожиданный вид ссылки на форму (ожидается 'CommonForm.Имя' или '<Вид>.<Объект>.Form.<Форма>')"
continue
@@ -1,4 +1,4 @@
# meta-validate v1.25 — Validate 1C metadata object structure (Python port)
# meta-validate v1.26 — Validate 1C metadata object structure (Python port)
# Source: https://github.com/Nikolay-Shirokov/cc-1c-skills
import argparse
import os
@@ -226,6 +226,8 @@ valid_types = (
"Report", "DataProcessor",
"CommonModule", "ScheduledJob", "EventSubscription",
"HTTPService", "WebService", "DefinedType",
# Внешний источник данных и его таблица (корень файла таблицы — <Table>).
"ExternalDataSource", "Table",
)
# Валидные типы метаданных без глубоких правил валидации — раньше падали как "Unrecognized"
@@ -259,6 +261,9 @@ generated_type_categories = {
"DataProcessor": ["Object", "Manager"],
"DefinedType": ["DefinedType"],
"ExternalDataSource": ["Manager", "TablesManager", "CubesManager"],
# Таблица внешнего источника: имя элемента трёхчастное (Префикс.Источник.Таблица),
# но проверка «имя оканчивается на .ИмяОбъекта» на нём работает как есть.
"Table": ["Manager", "Object", "Ref", "List", "Record", "RecordSet", "RecordKey", "RecordManager"],
}
# Types that have NO InternalInfo / GeneratedType
@@ -320,6 +325,9 @@ child_object_rules = {
"DocumentJournal": ["Column", "Form", "Template", "Command"],
"HTTPService": ["URLTemplate"],
"WebService": ["Operation"],
# Внешний источник: таблицы перечислены именами, функции лежат полными узлами.
"ExternalDataSource": ["Table", "Function", "Cube"],
"Table": ["Field", "Form", "Template", "Command"],
"Constant": ["Form"],
"DefinedType": [],
"CommonModule": [],
@@ -344,7 +352,8 @@ valid_property_values = {
"RealTimePosting": ["Allow", "Deny"],
"RegisterRecordsDeletion": ["AutoDelete", "AutoDeleteOnUnpost", "AutoDeleteOff"],
"RegisterRecordsWritingOnPost": ["WriteModified", "WriteSelected", "WriteAll"],
"DataLockControlMode": ["Automatic", "Managed"],
# AutomaticAndManaged — только у внешнего источника данных и его таблиц.
"DataLockControlMode": ["Automatic", "Managed", "AutomaticAndManaged"],
"FullTextSearch": ["Use", "DontUse"],
"DefaultPresentation": ["AsDescription", "AsCode"],
"HierarchyType": ["HierarchyFoldersAndItems", "HierarchyOfItems"],
@@ -1707,6 +1716,13 @@ if not is_adopted:
form_ref_bad = True
continue
# Ссылка на форму таблицы внешнего источника — шестичастная:
# ExternalDataSource.<Источник>.Table.<Таблица>.Form.<Форма>. Сводим её к четырём частям
# (вид = Table, объект = имя таблицы), дальше проверка общая.
if (len(parts) == 6 and parts[0] == "ExternalDataSource"
and parts[2] == "Table" and parts[4] == "Form"):
parts = ["Table", parts[3], "Form", parts[5]]
if len(parts) != 4 or parts[2] != "Form":
report_warn(f"20. {tag} '{ref}' — неожиданный вид ссылки на форму "
f"(ожидается 'CommonForm.Имя' или '<Вид>.<Объект>.Form.<Форма>')")