Код create function base36_to_base10 (@base36 char(6)) returns char(10) as begin if @base36 is null return null if...
7.x
7.x
ПарСумма — сумма, число Функция глРубКоп(ПарСумма) Экспорт Если Число(ПарСумма)=0 Тогда Возврат "руб. коп." КонецЕсли; Возврат ""+Цел(ПарСумма)+" руб....
Буду краток, делаем так: 1. Установить на сервер MSSQL. Краткая инструкция по установке есть в этом FAQ....
// Установим заголоков Название Конфигурации из синонима метаданных, // и чтобы быстро понимать в какой базе сидишь,...
Методы ДвижениеПриход и ДвижениеРасход, доступны только при проведении документа в предопределенной процедуре ОбработкаПроведения. ВыбратьСтроки(); //Переберем строки документа...
Метод ВыбратьДвиженияСОстатками инициирует выбор всех движении регистра в указанном интервале дат. До вызова данной процедуры может быть...
рег_оборот=создатьобъект("Регистр.Обороты"); рег_оборот.ИспользоватьПериод(ДатаГод(ТекущаяДата()),ДатаМесяц(ТекущаяДата())); рег_оборот.Итоги(Товар, Склад, Контрагент); Сообщить("Обороты Кол-во=" + рег_оборот.Количество + " Сумма=" + рег_оборот.Сумма);
Запрос=новый Запрос; Запрос.Текст=" |ВЫБРАТЬ | Номенклатура.Ссылка |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ПометкаУдаления = ИСТИНА |";...
Диаграмма = ЭлементыФормы.Диаграмма; // Очистить диаграмму, возможно ранее в нее уже выводились данные. Диаграмма.КоличествоСерий = 0; Диаграмма.КоличествоТочек...
Такого функционала в стандартной поставке нет, только ручными операциями.
На полную универсальность не претендует, но с русскими буквами работает нормально. // Преобразовать строку в UTF-8 Функция...
ВР = ВидРасчета.НаРуки; ВР = ВидРасчета.Премия; ВР = ВидРасчета.ПолучитьАтрибут("НаРуки");
Встроенные функции 1С 8.х для работы со значениями типа Число: // Функция вычислет степень числа // _База...
при открытии файла в таблице должен стоять фильтр с заданными параметрами: получить все товары у которых количество...
// Функция преобразовывает строку // вида: "Введен на основании: Счет на оплату № 000415 от 30 июня...
WshShell = Новый COMОбъект("WScript.Shell"); WshShell.Run(СтрокаЗапуска, 0, Истина)
Код create function base36_to_base10 (@base36 char(6)) returns char(10) as begin if @base36 is null return null if...
спКомп = СоздатьОбъект("СписокЗначений"); Попытка ScrptCtrl=СоздатьОбъект("MSScriptControl.ScriptControl"); ScrptCtrl.Language="vbscript"; ScrptCtrl.AddCode(" |Function GetComputers() | Set WinNT = GetObject(""WinNT:"") | WinNT.Filter =...
Код одинаков для 7 и 8 версии Функция ЦелМаксимальное(Сумма) Экспорт Возврат ?(Цел(Сумма) = Сумма, Сумма, Цел(Сумма) +...
СтарыйЗаголовок = ПолучитьЗаголовокСистемы(); НовыйЗаголовок = СтарыйЗаголовок + " " + ИмяПользователя(); УстановитьЗаголовокСистемы(НовыйЗаголовок); ТекущийЗаголовок = ЗаголовокСистемы();