//Функция Проверяет наличие каталога на диске и предлагает создать, если каталога не существует. // // Параметры //...
8.x
// Запись в регистр сведений (Установить курс и кратность валюты) // Параметры: // Валюта - ссылка на...
//Удаление по индексу СписокТиповЦен.Удалить(1); //Выборочное удаление по индексу Индекс = СписокВидов.Количество() - 1; Пока Индекс >= 0...
// Пример форматной строки для вывода числа прописью на русском // языке, с выводом целой и дробной...
Ниже приведено несколько способов получения списка баз 1С 7.7 из реестра: Код получения списка баз 1С 7.7...
При разработке отчетов или обработок рано или поздно приходится сталкиваться с необходимостью определения имени локального диска, сменного...
//Вых - ЭлементыФормы.РезультатТабличныйДокумент, //ТЗЗ - Результат выполнения запроса Процедура ПечатьРезвТаб(Вых,ТЗЗ) Экспорт КоличествоКолонок = ТЗЗ.Колонки.Количество(); Выборка = ТЗЗ.Выбрать(ОбходРезультатаЗапроса.Прямой);...
//Переберая перечисления, добавим кнопки с именем значение перечисления, и возможностью установки пометки для каждого метпер из Метаданные.Перечисления.СостоянияРаботникаОрганизации.ЗначенияПеречисления...
// ПутьКФайлу - Строка - путь к файлу или каталогу, существование которого // нужно проверить. // //...
Внимание!!! Непосредственное удаление справочника ведет к нарушению целостности данных. Например если удалить Контрагента по которому были сделаны...
В Модуль приложения, в самый конец процедуры ПередНачаломРаботыСистемы() добавить: //Установить значение ГлавныйСтиль можно только // в Модуле...
Дерево = Новый ДеревоЗначений; Запрос = Новый Запрос; Запрос.Текст="ВЫБРАТЬ |Ном.Ссылка как ссылка |ИЗ | Справочник.Номенклатура КАК Ном...
Ячейка = Лист.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"; ТекстовыйФайл.Прочитать(ПутьКФайлу); КС = ТекстовыйФайл.КоличествоСтрок(); Для...
В Зарплата и управление персоналом 8 почему при расчете среднего заработка для начисления очередного отпуска не исчисляются...
ФайлОстатков = Новый XBase; ФайлОстатков.Кодировка = КодировкаXBase.OEM; ФайлОстатков.ОткрытьФайл(ПутьКТаблицеОстатков); ФайлОстатков.Первая(); Пока Не ФайлОстатков.ВКонце() Цикл КодКонтрагента = СокрЛП(ФайлОстатков.ПолучитьЗначениеПоля("ZKPO")); Если...
// Возвращаемое значение: // Ложь ,если не все реквизиты заполнены // Истина, если все отмеченные реквизиты заполнены...
Как скопировать или выгрузить данные из одной таблицы значений в другую таблицу значений? 1. Добавление, копирование строк...
В основе работы с XML-файлами лежит технология доступа SAX, которая осуществляет считывание по одному тегу. Для этого...