25.08.2025

8.x

Внимание!!! Непосредственное удаление справочника ведет к нарушению целостности данных. Например если удалить Контрагента по которому были сделаны...
В Модуль приложения, в самый конец процедуры ПередНачаломРаботыСистемы() добавить: //Установить значение ГлавныйСтиль можно только // в Модуле...
Дерево = Новый ДеревоЗначений; Запрос = Новый Запрос; Запрос.Текст="ВЫБРАТЬ |Ном.Ссылка как ссылка |ИЗ | Справочник.Номенклатура КАК Ном...
Ячейка = Лист.Cells(1,8); Ячейка.Formula="=SUM(R11C:R[-1]C)"; Процедура Сформировать() Перем Кат,Шаб; Ехсел=СоздатьОбъект("Excel.Application"); Книга=Ехсел.Workbooks; Если ФС.ВыбратьФайл(0,Кат,Шаб,"Выбери файл Еxcel",,"*.xls",)=1 Тогда Книга.Open(Шаб+Кат); Ехсел.Range("C1").FormulaR1C1...
Функция ПодключитьCOMОбъект(Путь) Экспорт Отказ = Ложь; COMСоединение = Новый COMОбъект("ADODB.Connection"); COMСоединение.ConnectionString = "....."; COMСоединение.ConnectionTimeOut = 1200; COMСоединение.CursorLocation...
Процедура КнопкаВыполнитьНажатие(Элемент) ТекстовыйФайл = Новый ТекстовыйДокумент(); ПутьКФайлу = "C:\Documents and Settings\Adm\Application Data\1C\1Cv8\v8ib.lst"; ТекстовыйФайл.Прочитать(ПутьКФайлу); КС = ТекстовыйФайл.КоличествоСтрок(); Для...
ФайлОстатков = Новый XBase; ФайлОстатков.Кодировка = КодировкаXBase.OEM; ФайлОстатков.ОткрытьФайл(ПутьКТаблицеОстатков); ФайлОстатков.Первая(); Пока Не ФайлОстатков.ВКонце() Цикл КодКонтрагента = СокрЛП(ФайлОстатков.ПолучитьЗначениеПоля("ZKPO")); Если...
Нужно получить из html страницы текст: //the_pal, через HTTPСоединение: СерверИсточник = HTTPserver; Адрес = "/price.asp"; ИмяВходящегоФайла =...
спрНомен = Метаданные.Справочники.Номенклатура; Сообщить("Имя справочника """ + спрНомен.Имя + """"); Сообщить("Комментарий " + спрНомен.Комментарий); Сообщить("ВидИерархии " +...
Функция Представление() Функция представление предназначена для получения текстового представления любого значения, которое может быть получено при помощи...
В процедуру ПриОткрытии или в конец модуля добавить: ЭлементыФормы.РегистрСведенийСписок.НастройкаПорядка.НомерСоглашения.Доступность=Истина; Где НомерСоглашения — Колонка в списке регистра сведений...
Для Каждого ОчереднаяКонстанта Из Константы Цикл ИмяКонст = ОчереднаяКонстанта.СоздатьМенеджерЗначения().Метаданные().Имя; ЗначениеКонст = ОчереднаяКонстанта.Получить(); Сообщить("Константа " + ИмяКонст +...