max313
Максим Лобашев

Обработка загрузки цен номенклатуры из Excel без установленного MS Excel для 1С Управление торговлей 10.4. Достаточно установленного к примеру libreoffice (тестировалась с ним).

я за нее денег не беру, кому надо, тот качает

свою функцию обработка выполняет, усложнять не было необходимости.

Простенькая выгрузка на FTP сервер, управление одной кнопкой, настройки данные FTP забиваются в конфе, кто знает как в конфе открыть форму, тот разберется.

после условия проверки теперь выводятся все сотрудники в таблицу,

Если Номер1 > Счетчик Тогда
КомОбъект.Bookmarks().Add("Сотрудник");
КонецЕсли;
Счетчик = Счетчик + 1;


но сплошным текстом, подскажите как сделать чтобы каждый сотрудник выводился в списке с новой строки
заранее спасибо.

когда проходит первый цикл, ругается на объект КомОбъект.Bookmarks(СокрЛП("Сотрудник")).Select(); я думаю потому что закладка только одна, вот и спрашиваю про программные методы создания Bookmarks. Хотя возможно я что то усложняю, просто задача чтоб на шаблоне word не было границ таблицы, даже скрытых, нужен просто текст

вот мой код программы, в 1с дилетант, скопировал печать стандартного макета, который выводит все как надо, мой же макет выводи только первую строку

номер1 = 1;
Счетчик = 1;
Для каждого Строка1 Из ЭтотОбъект.Сотрудник Цикл

сс = "";
если строка1.Измерение = справочники.Измерение.НайтиПоКоду("01") Тогда // %

должок = ПолучитьДолжность(Строка1.Сотрудник,объект,1);
сс = сс + Строка(должок) +" магазина "+магаз+" " + СокрЛП(Строка1.Сотрудник);
Если строка1.Значение = 5 Тогда
сс = "Объявить замечание "+сс+".";
Иначе
сс = "Объявить выговор "+сс+".";
КонецЕсли;
Иначе
должок = ПолучитьДолжность(Строка1.Сотрудник,объект,2);
сс = сс + Строка(должок) +" магазина "+магаз+" " + СокрЛП(Строка1.Сотрудник);
сс = "Взыскать с "+сс+" сумму в размере "+СокрЛП(строка1.Значение)+" руб.";
КонецЕсли;

ОбластьСтрока.Параметры.сотрудник = сс;
ОбластьСтрока.Параметры.Номер = СокрЛП(Номер1)+".";
Номер1 = номер1 + 1;
ТабДок.Вывести(ОбластьСтрока);

КомОбъект.Bookmarks(СокрЛП("Сотрудник")).Select();
КомОбъект.Application.Selection.TypeText(СокрЛП(сс));

Если Номер1 > Счетчик Тогда
перевод=символ(13)+"";
КонецЕсли;
Счетчик = Счетчик + 1;

КонецЦикла;

Проблема такая. Нужно с 1с 8.1 после формирования документа Наказание, нужно распечатать приказ. Приказ должен выводиться в word. Порылся в инете, нашел как в шаблон Active Document вывести одного сотрудника, но есть документы Наказание, где более одного сотрудника. В этом случае есть необходимость в приказе перечислить построчно всех сотрудников с наказаниями вот так

Причина, ПРИКАЗЫВАЮ:

1. Взыскать с стажера магазина №1 Иванова сумму в размере 100 руб.
2. Взыскать с стажера магазина №1 Петрова сумму в размере 100 руб.
3. Взыскать с стажера магазина №1 Сидорова сумму в размере 100 руб.

4. Приказ довести до персонала на общем собрании.

Active Document создавал по методу закладок, заходил в шаблон, создал закладку, закладке в 1с программно присваивается значение, в итоге получается так

Причина, ПРИКАЗЫВАЮ:
1. Взыскать с стажера магазина №1 Иванова сумму в размере 100 руб.
2. Приказ довести до персонала на общем собрании.

как сделать случай с несколькими сотрудниками найти не могу, желательно чтобы результат выводился без таблицы.

Теоретически прикинул, что возможно после создания первого из списка сотрудника, можно передвинуть курсор вниз на следующую строку, создать загнать программно закладку и ей уже присваивать следующего сотрудника.

Возможно ли это, и если возможно подскажите плз как.
Заранее спасибо.