Если КомпоновщикНастроек = Неопределено Тогда КомпоновщикНастроек = Новый КомпоновщикНастроекКомпоновкиДанных; КомпоновщикНастроек.ЗагрузитьНастройки(МакетСКД.НастройкиПоУмолчанию); КонецЕсли;
Настройки = КомпоновщикНастроек.ПолучитьНастройки(); КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
Скопировать роль Пользователь, назвать как то (ПользовательНеТостый), убрать "толстый клиент", в коде найти все проверки на "РольДоступна("Пользователь") и добавить через логическое ИЛИ "ПользовательНеТостый" (по идеи их не много). Заменить у "умного" кладовщика роль пользователя на новую.
Для принудительного запуска предприятия в Обычном или Управляемом приложении используются следующие ключи:
/RunModeOrdinaryApplication запуск толстого клиента в обычном режиме, несмотря на настройки конфигурации и пользователя, от имени которого будет выполняться запуск.
/RunModeManagedApplication запуск толстого клиента в режиме управляемого приложения, несмотря на настройки конфигурации и пользователя, от имени которого будет выполняться запуск.
При указании любого из этих двух ключей отключается механизм автоматического выбора клиентского приложения кроме случаев, когда пользователь в командной строке явно указал ключ /AppAutoCheckMode (с 8.2.15)
KriAn @ Сегодня, 13:18
, Ничего, конвертация - это история о том как маленький, но гордый системный администратор выходит с важным поручением в далекую страну ради высшего блага, а приходит спустя 18 лет (или около того) с пониманием того, что перенесенные им в путешествии раны никогда уже не затянутся, и позднее удаляется от дел. Его мучают воспоминания пережитого, неоправданное чувство вины, что его поход кончился выживанием, а не самопожертвованием, а кроме того, и тёмными искушениями
Но даже у него, для выполнения столь особого задания должны быть друзья, которые спасут его из пещеры с багами во главе с огромной паучихой, которые накормят его вкусными лепешками по щекам, что - бы он не тупил и не засыпал, которые не дадут ему переметнулся на темную сторону SAP.
С новым годом. Найдите толковых аналитиков/программистов или обратитесь к франчам. Перенос данных это не то на чем стоит экономить.
eact @ Сегодня, 12:56
, расчет расходов (сумма отпускных и начисленного на нее ЕСВ), понесенных в связи с «чернобыльским» отпуском, по форме № 3, утвержденной приказом № 391, детально тут
Добавте строчку:
ПВР = ВзносыВФонды Вид расчета = ЕСВ ФОТ (оплата труда)
Решил поделиться решением. Задача: есть форматированный документ его необходимо вывести в табличный документ. Процедуры не полностью универсальные, содержат ряд условностей, но для начала, как пища для размышлений, подойдет.
Проблемы которые пока не получилось сделать лучше: 1.Нумерованный список в нумерованном списке в нумер.... и т.д.. 2.Маркированный список в маркированном списке в марки... и т.д.. 3.После применения форматирования оригинальная область приходит в негодность и ее надо восстановить для дальнейшего использования 4. Выделение цветного текста происходит по последнему условному оформлению "параграфа" (беда 1с, что в табличном документе в рамках одной ячейки нельзя устанавливать разное оформление: шрифт, цвет и т.д..)
Если есть подсказки, идеи, фиксы ошибок: готов выслушать. Кстати, тема очень актуальная, т.к. объект "Форматированный документ" - очень перспективен, но загвоздка в том, что вывести и полноценно распечатать его является проблемой, что очень сильно ограничивает область применения.
// Описание // Устанавливает свойства ячеек области в зависимости от элемента форматированного документа // Параметры // Область - ОбластьЯчеекТабличногоДокумента - область которую следует изменить // ЭлементФорматированногоДокумента - ТекстФорматированногоДокумента - элемент по которому следует изменить область Процедура УстановитьУсловноеФорматированиеОбласти(Область,ЭлементФорматированногоДокумента) Экспорт
Если НЕ ТипЗнч(ЭлементФорматированногоДокумента) = Тип("ТекстФорматированногоДокумента") Тогда Возврат КонецЕсли;
// Описание // Добавляет в табличный документ оббласть с форматированным текстом (переносит форматирование на ячейку области) // Параметры // ТабличныйДокумент - ТабличныйДокумент - Табличный документ в который следует вставить область // Область - ОбластьЯчеекТабличногоДокумента - область которую следует изменить // ЭлементФорматированногоДокумента - ТекстФорматированногоДокумента - элемент по которому следует изменить область Процедура ВывестиФорматированныйТекстВТабличныйДокумент(ТабличныйДокумент,Область,ЭлементФорматированногоДокумента) Экспорт
Если ЭтоМаркСписок Тогда ПриставкаПараграфа = " • "; НомерцияПараграфа = 0; ИначеЕсли ЭтоНумСписок Тогда НомерцияПараграфа = НомерцияПараграфа + 1; Иначе НомерцияПараграфа = 0; КонецЕсли;
//Накапливаем текст / данные ТекущийТипПараграфа = Неопределено; Описание = ПриставкаПараграфа; ЭлементПараграфаДляОформленияОбласти = Неопределено;
Для Каждого ЭлементПараграфа Из Параграф.Элементы Цикл
ТекущийТипПараграфа = ?(ТекущийТипПараграфа = Неопределено,Тип(ЭлементПараграфа),ТекущийТипПараграфа); Если Тип(ЭлементПараграфа) = Тип("ТекстФорматированногоДокумента") Тогда
Если ЭтоНумСписок Тогда ПриставкаПараграфа = Лев(" " + Формат(НомерцияПараграфа,"ЧЦ=3; ЧДЦ=") + ". ",4);//ограничем 99 Описание = ПриставкаПараграфа + Описание + ЭлементПараграфа.Текст; Иначе Описание = Описание + ЭлементПараграфа.Текст; КонецЕсли; ЭлементПараграфаДляОформленияОбласти = ЭлементПараграфа; ТекущийТипПараграфа = Тип("ТекстФорматированногоДокумента"); ИначеЕсли Тип(ЭлементПараграфа) = Тип("ПереводСтрокиФорматированногоДокумента") Тогда
Если ТекущийТипПараграфа = Тип("ТекстФорматированногоДокумента") Тогда ТекущийТипПараграфа = Тип("ПереводСтрокиФорматированногоДокумента");
Если ТолькоТекстКлиента Тогда ШаблоныЗаполнения.ВернутьШаблонБезТегов(Описание); КонецЕсли;
ОбластьТекст.Параметры.Описание = Описание;
ВывестиФорматированныйТекстВТабличныйДокумент(ТабличныйДокумент,ОбластьТекст,ЭлементПараграфаДляОформленияОбласти); ОбластьТекст = Макет.ПолучитьОбласть("ОбластьОписание"); Описание = ПриставкаПараграфа; КонецЕсли;
ОбластьТекст.Параметры.Описание = "";
ТабличныйДокумент.Вывести(ОбластьТекст); ИначеЕсли Тип(ЭлементПараграфа) = Тип("КартинкаФорматированногоДокумента") Тогда Если ТекущийТипПараграфа = Тип("ТекстФорматированногоДокумента") Тогда ТекущийТипПараграфа = Тип("КартинкаФорматированногоДокумента");
ОбластьТекст.Параметры.Описание = Описание; ТабличныйДокумент.Вывести(ОбластьТекст); Описание = ПриставкаПараграфа; КонецЕсли;
1. Добавить вспомогательное поле "ДокументЗаполнен", тип булево, предусмотреть его заполнение (предполагаю на сервере). 2. В обычном цикле пройтись по табличной части и насобирать строки у которых заполнен документ.
Желательно б уточнить, для чего собираются строки (если для визуального отбора на форме, то лучше такое делать через "Условное оформление"
Дмитрий Максимов @ Сегодня, 11:04
, Добрый день. У Вас не хватает прав. На данный РС права на чтение есть у следующий прав : "Чтение данных бухгалтерии" Право на редактирование данного РС есть у следующих прав: "Полных права", "Добавление и изменение данных бухгалтерии".
Добавьте на форму (в табличную часть) реквизит формы "АдресКартинки". Обратите внимание на процедуры "ПередЗаписью" и "ПередЗаписьюНаСервере".
Главная идея: не ганяем при каждом клике по строке клиента на сервер, а изначально ссылки на временные адреса храним у клиента, и только в момент записи передаем эти адреса на сервер и записываем их + при открытии апдейтим их.
Код не идеален, просто, за 15 минут, что успел -написал.
&НаКлиенте Процедура ДобавитьИзображение(Команда)
ТекСтрока = Элементы.Товары.ТекущиеДанные;
Если ТекСтрока = Неопределено Тогда Возврат; КонецЕсли;
Режим = РежимДиалогаВыбораФайла.Открытие; ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(Режим); ДиалогОткрытияФайла.ПолноеИмяФайла = ""; Фильтр = "Изображения(*.bmp,*.jpg,*.png,*.jpeg)|*.bmp;*.jpg;*.png;*.jpeg"; ДиалогОткрытияФайла.Фильтр = Фильтр; ДиалогОткрытияФайла.МножественныйВыбор = Ложь; ДиалогОткрытияФайла.Заголовок = "Выберите файл для загрузки";
ДиалогОткрытияФайла.Показать(Новый ОписаниеОповещения("ДобавитьИзображениеЗавершение", ЭтотОбъект, Новый Структура("ДиалогОткрытияФайла, ТекСтрока", ДиалогОткрытияФайла, ТекСтрока)));
инд = 1; Для Каждого СтрокаТовары Из ТекущийОбъект.Товары Цикл СсылкаНаКартинку = ПараметрыЗаписи["СтрокаТовары" + Формат(инд,"ЧГ=0")]; Если ЭтоАдресВременногоХранилища(СсылкаНаКартинку) Тогда СтрокаТовары.ХранилищеИзображения = Новый ХранилищеЗначения(ПолучитьИзВременногоХранилища(СсылкаНаКартинку)); КонецЕсли; инд = инд + 1; КонецЦикла;
КонецПроцедуры
&НаКлиенте Процедура ПередЗаписью(Отказ, ПараметрыЗаписи) инд = 1; Для Каждого СтрокаТовары Из Объект.Товары Цикл ПараметрыЗаписи.Вставить("СтрокаТовары" + Формат(инд,"ЧГ=0"),СтрокаТовары.АдресКартинки); инд = инд + 1; КонецЦикла; КонецПроцедуры
&НаКлиенте Процедура ПриОткрытии(Отказ) Для Каждого СтрокаТовары Из Объект.Товары Цикл СтрокаТовары.АдресКартинки = ПолучитьНавигационнуюСсылку(Объект.Ссылка, "Товары.ХранилищеИзображения", СтрокаТовары.НомерСтроки - 1 ); КонецЦикла; КонецПроцедуры
Ну, для того, что - бы мы были уверенны в реальном идиотизме кода необходимо удостоверится, что дальше в условии нет "Метки". Ведь дальше может быть следующее (пофантазируем)
If ReturnResult = Undefined Then
WriteInFile = False;
If WriteInFile Then ~SendMessage:
Text = "Беда не в том, что человек глуп, беда в том, что он глуп внезапно." StrReplace(Text,"глуп","смертен");
Message(Text);
WriteInFile = True; //условие выхода EndIf;
EndIf;
If (ReturnResult = Undefined) AND (Not WriteInFile) Then Goto ~SendMessage; EndIf;
robot1 @ Сегодня, 15:46 , Кладете файлик в спец. каталог. Правка - > Редактирование текстов интерфейса Указываете только необходимый каталог. Действия - > Копировать тексты (Указываете с какого на какой язык)
Добрый день. 1-й вариант : отказаться от идеи контролировать это в рамках дня. Записывать отдельно статус сотрудника : "вошел в здание", "вышел из здания". При срабатывании карточки на пропускном пункте запрашивать последний статус и добавлять запись с противоположным значением. 2-й вариант : если есть Физ. Лицо, значит можно найти сотрудника. У сотрудника есть связь с графиком. В зависимости от графика решать начало это нового дня или окончание смены. 3-й вариант : закрывать все статусы карточек, только на время 23:59:59 и открывать в 00:00:00
P.S.Есть мнение, что слова "ихнее" нет в русском языке
Доброго времени суток. Раньше пользовался "Hot Tray 1c .net". Но "StartManager 1.4"- это комбайн на все случаи жизни, перешел на него теперь. Ссылка на описание : StartManager 1.4 - Развитие альтернативного стартера Функциональные особенности Ниже перечислены основные функциональные возможности StartManager 1.4, которые отсутствуют в штатном стартере от 1С:
1. Универсальное самостоятельное приложение, не требующее дополнительных библиотек, с возможностью запуска со сменного носителя информации; 2. Все базы в одном месте: иерархический список с возможностью отображения информационных баз (ИБ) для 4-х платформ (8.1, 8.2, 8.3, 8.4) одновременно и по отдельности; 3. Список ИБ содержит дополнительные информационные колонки отображающие: версию платформы, дату изменений и размер файла ИБ; 4. Возможность использования альтернативных файлов списков информационных баз отдельно для каждой из четырех платформ; 5. Механизм интерактивного отбора в списке информационных баз по ключевой фразе содержащейся в наименовании ИБ; 6. Возможность запуска информационной базы с предварительным выбором предопределенных параметров; 7. Возможность сохранения имени пользователя и пароля раздельно для режима «Конфигуратор» и «1С:Предприятие», а так же для Хранилища конфигурации; 8. Возможность подключения программного комплекса «Snegopat» отдельного для платформы «8.2» и «8.3», для которых он должен использоваться; 9. Реализован механизм поиска информационных баз (1Cv8.1CD) в предопределенных каталогах локального диска и регистрация их в списке информационных баз; 10. Реализована возможность удаления из списка тех информационных баз, у которых отсутствует файл 1Cv8.1CD; 11. Добавлена возможность удаления зависших процессов «1С:Предприятия» из оперативной памяти: 12. Реализован механизм интеграции с проводником Windows позволяющий: 12.1. быстро зарегистрировать файл 1Cv8.1CD в списке информационных баз; 12.2. запустить файл в режиме «1С:Предприятие»; 12.3. запустить файл в режиме «Конфигуратор». 13. Изменение внешнего вида интерфейса при помощи стилей оформления (VCL Styles). Можно предопределить 5 основных стилей оформления для быстрого переключения. 14. Дополнительно к стилям оформления, для списка баз возможно: 14.1. установить свой шрифт и его размер; 14.2. настроить высоту строк списка; 14.3. настроить вид и интенсивность выделения курсора; 14.4. назначить собственный цвет текста наименования информационных баз индивидуально для каждой платформы; 14.5. назначить собственное оформление для отсутствующих информационных баз; 14.6. назначить цвет для группы из 7-и предопределённых 15. Возможность сохранения текущего состояния списков информационных баз с последующим восстановлением, включая механизм автосохранения при запуске; 16. Реализован механизм сценариев резервирования позволяющий: 16.1. Выгружать данные информационной базы (*.dt) 16.2. Выгружать структуру конфигурации (*.cf) 16.3. Архивировать данные в формате ZIP (*.zip) 16.4. Архивировать данные в формате RAR (*.rar) 17. Добавлена возможность включения и отключения механизма отображения истории запуска информационных баз; 18. Добавлена возможность - без открытия конфигуратора: 18.1. выполнить загрузку конфигурации из CF-файла; 18.2. выполнить загрузку информационной базы из DT-файла; 18.3. выполнить тестирования ИБ. 19. Добавлена возможность временной блокировки StartManager (например, на время отсутствия пользователя); 20. Добавлена возможность установки/снятия блокировки файловой информационной базы без открытия «1С:Предприятия»; 21. Встроенный механизм проверки наличия обновлений индивидуально для каждой информационной базы; 22. Новый механизм проверки обновлений «Актуальные релизы»; 23. Очистка программного или пользовательского кэш (cache) определенной информационной базы или всех информационных баз из списка, с возможностью указания пользователей системы; 24. Возможность удаления кэш (cache) оставшегося от информационных баз, ранее удаленных из списка; 25. Индивидуально для каждой информационной базы можно указать ссылку на внешнюю обработку для последующего запуска при открытии в режиме «1С:Предприятие»; 26. Механизм быстрого доступа к избранным информационным базам (с поддержкой drag&drop) включая доступ через меню в системном трее; 27. Быстрое создание ярлыка на рабочем столе для любой ИБ; 28. Назначение действия для события двойного щелчка как всех информационных баз, так и индивидуально для каждой ИБ; 29. Быстрый запуск утилиты chdbfl.exe для проверки физической целостности с указанием пути к информационной базе; 30. Сохранение копии экрана в файл по предопределённому сочетанию клавиш; 31. Автозапуск при начале работы Windows; 32. Встроенный механизм автообновления стартера.
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!
1 2 3 > »
