Для контроля версий обрабатываемых конфигураций можно получить номер релиза из внешней обработки путем анализа файла 1sconst.dbf:
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 |
ДБФ = СоздатьОбъект("XBase"); ДБФ.КодоваяСтраница(0); ИмяФайла = СокрП(ПутьККаталогуСБазой)+"1sconst.dbf"; Попытка ДБФ.ОткрытьФайл(ИмяФайла,,1); Если ДБФ.Открыта() = 1 Тогда ДБФ.Первая(); Пока ДБФ.ВКонце() = 0 Цикл Если Найти(ДБФ.Value,"7.70.") > 0 Тогда НомерРелиза = СокрП(ДБФ.Value); ДБФ.ЗакрытьФайл(); Прервать; КонецЕсли; ДБФ.Следующая(); КонецЦикла; ДБФ.ЗакрытьФайл(); Исключение Сообщить("ОШИБКА: " + ОписаниеОшибки()); КонецПопытки; |
About the Author
