// Документ - ссылка на документ, Реквизит - название реквизита, например "Контрагент" Функция гРеквизитДокумента(Документ,Реквизит) Экспорт Если Метаданные.Документ(Документ).РеквизитШапки(Реквизит).Выбран()=1...
7.x
7.x
Добавление записи в журнал расчетов: Метод Новая может быть вызван где угодно, в глобальном модуле, модуле обработок,...
Для 8.х заменить СоздатьОбъект( на Новый COMОбъект( // Пример от Jaap Vduul // Пример чтения таблицы из...
Копировать из 1С в буфер обмена( без ВК): ЭлементыФормы.Добавить(Тип("ПолеHTMLДокумента"), "Поле_HTML_Документа_acb123", Ложь); Окно = ЭлементыФормы.Поле_HTML_Документа_acb123.Документ.ParentWindow; Окно.ClipboardData.SetData("Text", ТекстПисьма); ЭлементыФормы.Удалить(ЭлементыФормы.Индекс(ЭлементыФормы.Найти("Поле_HTML_Документа_acb123")));...
Замечание: В Excel разделителем дробной части считается символ ",". Поэтому перед сохранением таблицы 1С в формате Excel...
RegExp = CreateObject("VBScript.RegExp"); // здесь под восьмерку переделай RegExp = Новый COMОбъект("VBScript.RegExp"); RegExp.IgnoreCase = Истина; //Игнорировать регистр...
Функция ПолучитьТаблицуКурсов(ДатаКурса) Перем Reader, Url, Точки, HtmlTab, Строк, Р, НомСтроки, НомЯчейки, Док, ТекстВЯчейке, ТабКурсов; Reader = СоздатьОбъект("MSXML2.XMLHTTP");...
Текст = ""; Подсказка = "Введите текст напоминания"; Если ВвестиСтроку(Текст,Подсказка, 0, истина) Тогда // запомнить текст напоминания...
Заполняет Вордовский шаблон из СпискаЗначений Вставляется в виде обрабтки. При открытии передается СЗ первым значением идет WORD,...
Функция ПересечениеОтрезков(А1, А2, Б1, Б2) Если А1<=Б1 Тогда Х = Мин(Б2-Б1,А2-Б1); Х = Макс(Х,0); // если Х<0,...
При выводе на печать кассовых документов не подставляются ответственные лица, генеральный директор и главный бухгалтер хотя они...
// Пример 1 Процедура ПолучитьОстатки(Товар, Склад, ОстатокТовара, Стоимость); Регистр.УчетТовара.Остатки(Товар, Склад); ОстатокТовара = Регистр.УчетТовара.ОстаткиТовара; Стоимость = Регистр.УчетТовара.СтоимостьТовара; КонецПроцедуры...
Рассчитать все регистры с установленным флагом временного расчета на начало события. (на начало даты или на момент...
Форма = Справочники.Номенклатура.ПолучитьФормуСписка(); Форма.Открыть(); Форма = Справочники.ХранилищеДополнительнойИнформации.ПолучитьФорму("ФормаСпискаФайловИИзображений"); Форма.Открыть(); Элемент = Справочники.Номенклатура.НайтиПоКоду("00030"); Форма = Элемент.ПолучитьФорму(); Форма.Открыть(); Перем контр;...
// Пример 1 Сервер="IP-адрес-сайта"; // IP адрес сайта ПользовательСервера="имя-пользователя-базы-данных"; // имя пользователя базы данных ПарольСервера="пароль-пользователя-базы-данных"; // пароль...
Соединение = Новый HTTPСоединение("export.rbc.ru"); //готовим соединение ИмяФайла = ПолучитьИмяВременногоФайла(".txt"); //строка-образец //http://export.rbc.ru/free/cb.0/free.fcgi?period=DAILY&tickers=USD&d1=18&m1=01&y1=2009&d2=17&m2=02&y2=2009&lastdays=30&separator=TAB&data_format=BROWSER&header=1 //http://export.rbc.ru/free/cb.5/free.fcgi?period=DAILY&tickers=USDEUR_BASKET&d1=08&m1=07&y1=2009&d2=22&m2=07&y2=2009&lastdays=14&separator=TAB&data_format=BROWSER&header=1 СтрокаСоединения="/free/"+Источник+"/free.fcgi?period=DAILY&tickers="+Валюта1+"&d1="+День1+"&m1="+Месяц1+"&y1="+Год1+"&d2="+День2+"&m2="+Месяц2+"&y2="+Год2+"&separator=%7C&data_format=BROWSER"; СтрокаСоединения=СтрЗаменить(СтрокаСоединения," ",""); Попытка //соединяемся...
Режим предназначен для выполнения конфигуратором административных функций без участия пользователя. Данный режим применяется в специальных случаях. Например,...
Например, организуем перебор записей с периодом действия в январе. ЖЗ = СоздатьОбъект("ЖурналРасчетов.Зарплата"); ДатаНач = '01.01.2002'; ДатаКон =...
В 8-ых версиях используйте: ИспользуемоеИмяФайла (UsedFileName) Использование: Только чтение. Описание: Тип: Строка. Содержит полное имя файла внешней...
Варианты решения проблемы "Не открывается предварительный просмотр": 1. Нет принтера — нет предварительного просмотра. Попробуй переустановить принтеры....