<#
.SYNOPSIS
    Добавляет числовой формат к указанным полям XML 1С
.DESCRIPTION
    Скрипт добавляет числовой формат к полям по заданному шаблону.
    Все настройки задаются в начале скрипта.

НАСТРОЙКИ:
    $inputFile      - Путь к исходному XML файлу
    $outputFile     - Путь для сохранения результата
    $fieldPattern   - Шаблон поиска полей (подробности ниже)
    $numberFormat   - Настройки числового формата
    $decimalFormat  - Настройки десятичного формата
    $language       - Язык для формата

ПАРАМЕТРЫ ФИЛЬТРАЦИИ (fieldPattern):
    *           - Любые символы (0 или более)
    ?           - Ровно один любой символ
    Ц           - Буква "Ц" (регистрозависимо)
    [A-Z]       - Диапазон символов
    |           - Разделитель нескольких шаблонов
    \*, \?      - Экранирование спецсимволов

ПРИМЕРЫ ШАБЛОНОВ:
    ГПЦ3        - Только поле "ГПЦ3"
    ГПЦ*        - Все поля, начинающиеся с "ГПЦ"
    *Ц*         - Любые поля, содержащие "Ц"
    *Ц?         - Поля где "Ц" - предпоследний символ
    БПЦ*|ОТЦ*   - Поля начинающиеся на "БПЦ" или "ОТЦ"
#>

# ===== НАСТРОЙКИ =====
$inputFile = "C:\XMLProcessing\input.xml"
$outputFile = "C:\XMLProcessing\output.xml"
$fieldPattern = "*Ц*"  # Шаблон поиска полей

# Настройки формата
$numberFormat = @{
    WholeDigits = 10    # ЧЦ - всего цифр
    Decimals = 2        # ЧДЦ - десятичных знаков
    Language = "ru"     # Язык
    FormatString = "ЧЦ={0}; ЧДЦ={1}"  # Шаблон строки формата
}
# ====================

# Функция преобразования wildcard-шаблона в regex
function ConvertTo-RegexPattern {
    param([string]$pattern)
    $pattern = $pattern -replace '\\\*', '___ESC_STAR___' `
                       -replace '\\\?', '___ESC_QM___' `
                       -replace '\.', '\.' `
                       -replace '\*', '.*' `
                       -replace '\?', '.' `
                       -replace '___ESC_STAR___', '\*' `
                       -replace '___ESC_QM___', '\?'
    "^$pattern$"
}

try {
    # Проверка файла
    if (-not (Test-Path $inputFile)) {
        throw "Файл $inputFile не найден"
    }

    # Загрузка XML
    $xml = New-Object System.Xml.XmlDocument
    $xml.PreserveWhitespace = $true
    $xml.Load($inputFile)

    # Настройка пространств имен
    $nsManager = New-Object System.Xml.XmlNamespaceManager($xml.NameTable)
    $nsManager.AddNamespace("dcs", "http://v8.1c.ru/8.1/data-composition-system/schema")
    $nsManager.AddNamespace("dcscor", "http://v8.1c.ru/8.1/data-composition-system/core")
    $nsManager.AddNamespace("v8", "http://v8.1c.ru/8.1/data/core")
    $nsManager.AddNamespace("xsi", "http://www.w3.org/2001/XMLSchema-instance")

    # Получаем все поля (если шаблон не "*Ц*", ищем во всех полях)
    $allFields = if ($fieldPattern -eq "*Ц*") {
        $xml.SelectNodes("//dcs:field[contains(dcs:dataPath, 'Ц')]", $nsManager)
    } else {
        $xml.SelectNodes("//dcs:field", $nsManager)
    }

    if ($allFields.Count -eq 0) {
        Write-Host "Поля не найдены."
        return
    }

    # Подготовка regex-шаблонов
    $regexPatterns = $fieldPattern -split '\|' | ForEach-Object {
        ConvertTo-RegexPattern $_
    }

    # Фильтрация полей по шаблону
    $fields = $allFields | Where-Object {
        $fieldName = $_.dataPath
        $regexPatterns | Where-Object { $fieldName -match $_ }
    }

    if ($fields.Count -eq 0) {
        Write-Host "Поля по шаблону '$fieldPattern' не найдены."
    }
    else {
        Write-Host "Найдено полей по шаблону: $($fields.Count)"
        Write-Host "Используемый формат: $($numberFormat.FormatString -f $numberFormat.WholeDigits, $numberFormat.Decimals)"
        
        foreach ($field in $fields) {
            $dataPath = $field.dataPath
            Write-Host "Проверка поля: $dataPath"

            # Проверяем наличие параметра "Формат"
            $hasFormat = $false
            $appearance = $field.SelectSingleNode("dcs:appearance", $nsManager)
            
            if ($appearance) {
                $formatParam = $appearance.SelectSingleNode("dcscor:item[dcscor:parameter='Формат']", $nsManager) -or
                            $appearance.SelectSingleNode("item[parameter='Формат']", $nsManager) -or
                            $appearance.SelectSingleNode("*/parameter[.='Формат']", $nsManager)
                
                if ($formatParam) {
                    Write-Host "  Параметр 'Формат' уже существует, пропускаем"
                    $hasFormat = $true
                }
            }

            if (-not $hasFormat) {
                Write-Host "  Добавляем параметр 'Формат'"
                
                # Создаем appearance если его нет
                if (-not $appearance) {
                    $appearance = $xml.CreateElement("appearance", $nsManager.LookupNamespace("dcs"))
                    $field.AppendChild($appearance) | Out-Null
                }

                # Создаем структуру формата
                $item = $xml.CreateElement("item", $nsManager.LookupNamespace("dcscor"))
                $item.SetAttribute("type", $nsManager.LookupNamespace("xsi"), "dcsset:SettingsParameterValue")

                $parameter = $xml.CreateElement("parameter", $nsManager.LookupNamespace("dcscor"))
                $parameter.InnerText = "Формат"
                $item.AppendChild($parameter) | Out-Null

                $value = $xml.CreateElement("value", $nsManager.LookupNamespace("dcscor"))
                $value.SetAttribute("type", $nsManager.LookupNamespace("xsi"), "v8:LocalStringType")

                $valueItem = $xml.CreateElement("item", $nsManager.LookupNamespace("v8"))
                $value.AppendChild($valueItem) | Out-Null

                $lang = $xml.CreateElement("lang", $nsManager.LookupNamespace("v8"))
                $lang.InnerText = $numberFormat.Language
                $valueItem.AppendChild($lang) | Out-Null

                $content = $xml.CreateElement("content", $nsManager.LookupNamespace("v8"))
                $formatContent = $numberFormat.FormatString -f $numberFormat.WholeDigits, $numberFormat.Decimals
                $content.InnerText = $formatContent
                $valueItem.AppendChild($content) | Out-Null

                $item.AppendChild($value) | Out-Null
                $appearance.AppendChild($item) | Out-Null
            }
        }
    }

    # Сохранение
    $writerSettings = New-Object System.Xml.XmlWriterSettings
    $writerSettings.Indent = $true
    $writerSettings.Encoding = [System.Text.Encoding]::UTF8
    $writerSettings.OmitXmlDeclaration = $false

    $writer = [System.Xml.XmlWriter]::Create($outputFile, $writerSettings)
    $xml.Save($writer)
    $writer.Close()

    Write-Host "Файл успешно сохранен: $outputFile" -ForegroundColor Green
}
catch {
    Write-Error "Ошибка: $_"
    exit 1
}