01.12.2025

8.x

Фильтр = Новый Структура; Фильтр.Вставить("ФизЛицо",ТекущаяСтрока.Физлицо); СумОст=РегистрыНакопления.ВзаиморасчетыСРаботникамиОрганизаций.Остатки(ПериодРегистрации,Фильтр);
ВозможныеИменаФайлаШрифтаEANGNIVC = Новый Массив; ВозможныеИменаФайлаШрифтаEANGNIVC.Добавить("EANGNIVC.TTF"); ВозможныеИменаФайлаШрифтаEANGNIVC.Добавить("EANG000.TTF"); Попытка objShell = Новый COMОбъект("Shell.Application"); objFolder = objShell.Namespace(20); ПутьККаталогуШрифтов = objFolder.Items().Item().Path;...
Запрос = Новый Запрос(" |ВЫБРАТЬ | ПродажиОбороты.Номенклатура, | ВЫРАЗИТЬ(ПродажиОбороты.СтоимостьОборот/ПродажиОбороты.КоличествоОборот КАК ЧИСЛО(15, 2)) КАК СредняяЦенаПродажи |ИЗ | РегистрНакопления.Продажи.Обороты(&ДатаНач,...
КодГруппы = "123100"; ПоискПоПолномуКоду = Ложь; // значение по умолчанию Группа = Справочники.Номенклатура.НайтиПоКоду(КодГруппы, ПоискПоПолномуКоду); Если Группа.Пустая() Тогда...
// Получим суммы начисленные по ФизЛицу документом НачислениеЗарплатыРаботникамОрганизаций // (отбор по Документ.НачислениеЗарплатыРаботникамОрганизаций) Запрос=новый Запрос; Запрос.Текст=" |ВЫБРАТЬ |...
Функция ПересчетСуммыПоКурсу(ВалютнаяСумма, Валюта, Дата) Экспорт Запись = РегистрыСведений.КурсыВалют.ПолучитьПоследнее(Дата, Новый Структура("Валюта", Валюта)); Сумма = ВалютнаяСумма * Запись.Курс; Если...
//Пример: СТР = "Тест [наш]ей функции" //НовСтр=ПолучитьПеременнуюИзСтроки(СТР) //В итоге НовСтр="наш"; Функция ПолучитьПеременнуюИзСтроки(ПереданнаяСтрока) Экспорт Переменная = ""; ПервыйСимвол...
Перем ОбъектыКонфы; Перем СтруктКонфы; Процедура ВыгрузитьВWord() Попытка Word = Новый COMОбъект("Word.Application"); Исключение Сообщить("Не удалось открыть Word"); Возврат;...
V77 = Новый COMОбъект("V77M.Application"); Если V77.Initialize(V77.RMTrade,"ИсточникСтр","") Тогда Сообщить("Успех"); Накл= V77.EvalExpr("CreateObject(""Документ.РасходнаяНакладная"")"); ДокОсн= V77.EvalExpr("CreateObject(""Документ"")"); Накл.ВыбратьДокументы(); Пока Накл.ПолучитьДокумент()=1 Цикл Номер=СокрЛП(Накл.НомерДок);...
//Функция преобразует строку вида 04/30/09 в дату Функция РазобратьДату(ИзмДата); Возврат Дата("20"+Сред(ИзмДата,7,2)+Сред(ИзмДата,0,2)+Сред(ИзмДата,4,2)); КонецФункции //НовДата = РазобратьДату("04/30/09"); //НовДата будет...
Получение значения ресурсов наиболее поздней записи регистра сведений, соответствующей указанным периоду и значениям измерений регистра. Доллары =...