igmig65 @ Сегодня, 21:01 ,


ну тогда палец,который на форме форума.

igmig65 @ Сегодня, 19:05 ,

Не спешите ! Все решится гораздо раньше !
Есть в FormEx нужный функционал - почти как в 1с 8-ке !
Прописываете вызовы ваших процедур в процедуру (я ее назвал- "ВашаПроцедура"-назовите её как хотите) и вызываете её методом - ВыполнитьПроцедуру !

Должно работать !

Процедура ПослеОткрытия()
   
    Окно = СоздатьОбъект("Окна");
    Окно.ЦентрироватьОкно(Форма);
    //Окно.СтильОкна(Форма,2);
    Форма.Обновить();
    Сервис = СоздатьОбъект("Сервис");
    Сервис.ВыполнитьПроцедуру(Контекст, "ВашаПроцедура"); // да,да,вот она !

КонецПроцедуры

ВыполнитьПроцедуру(<?>,,)
Синтаксис:
ВыполнитьПроцедуру(<Контекст>,<ИмяПроцедуры>,<СписокАргументов>)
Назначение:
Метод предназначен для выполнения процедуры в заданном контексте.
Возвращает 1 в случае успеха, 0 - в противном случае.
ПРИМЕР:
Перем Конт;
Сервис = СоздатьОбъект("Сервис");
ОткрытьФорму("Обработка.Демо", Конт);
Список = СоздатьОбъект("СписокЗначений");
Список.ДобавитьЗначение("Первый параметр");
Список.ДобавитьЗначение("Второй параметр");
Список.ДобавитьЗначение("Третий параметр");
Сервис.ВыполнитьПроцедуру(Конт, "Выполнить", Список);

Только все эти фишки (фичи) - от FormEx !

Для вывода окна по центру в форме обработки пропишите следующую процедуру :
(если используете компоненту FormEx)

Процедура ПослеОткрытия()
   Окно = СоздатьОбъект("Окна");
   Окно.ЦентрироватьОкно(Форма);
   Форма.Обновить();
КонецПроцедуры

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

andrew76 @ Сегодня, 17:48 ,

Можно там же поэкспериментировать со стилем окна:

Процедура ПослеОткрытия()
   Окно = СоздатьОбъект("Окна");
   Окно.ЦентрироватьОкно(Форма);
   Окно.СтильОкна(Форма,2); //стиль от 0 до 2, 1 и 2 -без заголовка окна,2 - по моему модальный режим
   Форма.Обновить();
КонецПроцедуры

Что-нибудь получилось ? Дальше мне искать ? Чи не трэба ?



Так этот вопрос ещё актуален ? Истина уже близко !

Vofka @ Сегодня, 12:59 ,

Это описание ОбработкиОжидания от FormEx:
РасширениеФормы->ОбработкаОжидания

ОбработкаОжидания(<?>,)
Синтаксис:
ОбработкаОжидания(Имя, Интервал)
Назначение:
Вызывает процедуру модуля формы с заданным интервалом в миллисекундах. В отличии от штатной обработки ожидания, вызывается при открытых модальных формах. Для одной формы может быть установлено сколько угодно обработок ожидания путем создания нужного количества объектов РасширениеФормы. При уничтожении объекта, для которого вызывался данный метод, соответствующая процедура обработки ожидания останавливается. Метод работает только после физического открытия окна формы.
Параметры:
<Имя> - (Строка Имя процедуры модуля текущей формы для периодического вызова (если в качестве параметра передается пустая строка, то ранее запущенный процесс прекращается))
<Интервал> - (Число Интервал вызова процедуры в миллисекундах (если в качестве параметра передается 0 (ноль)) , то ранее запущенный процесс прекращается)
ВОЗВРАЩАЕМОЕ ЗНАЧЕНИЕ:
(Строка) Имя процедуры, которая была установлена ранее в качестве процедуры обработки ожидания.

Есть еще ,тоже от FormEx
Сервис->ОстальныеМетоды

ОбработкаОжидания(<?>,)
Синтаксис:
ОбработкаОжидания(<Имя>,<Интервал>)
Назначение:
Вызывает глобальную процедуру с заданным интервалом в миллисекундах.
ПРИМЕР:
Сервис = СоздатьОбъект("Сервис");
Сервис.ОбработкаОжидания("глПолучитьНовыеЗаявки",100);



Есть еще процедура ПослеСозданияФормы от FormEx

Процедура ПослеСозданияФормы(<?>)КонецПроцедуры
Синтаксис:
Процедура ПослеСозданияФормы(<Контекст>)КонецПроцедуры
Назначение:
Предопределенная процедура вызывается после физического создания окна формы в системе, когда окно формы создано, но еще не полностью проинициализировано и не отображено на экране.
Параметры:
<Контекст> - контекст открытой формы
ЗАМЕЧАНИЕ:
В этой процедуре (и во всех процедурах, вызываемых после нее) можно вызывать методы, которые помечены как "работает только после физического открытия окна формы".


andrew76 @ Сегодня, 14:07 ,

Не работает ПослеОткрытия() в модальном режиме:
правда,ветка на том форуме древняя:
https://www.1cpp.ru/forum/YaBB.pl?num=1499687314/0

ещё такое есть:
v7: ОбработкаОжидания в Formex
https://www.mista.ru/topic/719183



А может посадить процедуры на кнопку (кнопка на форме).
Сделать кнопку невидимой.Потом сэмулировать нажатие этой кнопки ?
Должно сработать в принципе и без formex.

Lunatik_51 @ Вчера, 23:22 ,

Добрый день.
Штатными средствами этого сделать нельзя.Нужно писать свою обработку.

вот здесь посмотрите,может пригодится что-то:
https://pro1c.org.ua/index.php?showtopic=18547

а если самому делать ,то примерно так начинается это дело:

Эксель= СоздатьОбъект("Excel.Application");
Книга = Эксель.Workbooks.Add();
Книга.Worksheets(1).Cells(2,1).Value = Строка("Товар");
Книга.Worksheets(1).Cells(2,2).Value = Число("Количество");
Книга.SaveAs("с:\проба.xlsх");
Книга.Close();
Эксель.Quit();

Но конечно прийдётся делать здесь ещё форматирование всех колонок,подбирать шрифт и т.д.

Посмотрите Процедуру ПриЗаписи() этого документа (накладная в вашем случае).
Скорее всего там будет что-то вроде:

Типучёта=бух;

Можно менять и стили через FormEx.Правда,не в таком виде будет , как просил товарищ -4andriy,который эту тему открыл.
Вот здесь про это,кому интересно (правда ветка 12-летней давности,но внешняя обработка там рабочая):
https://www.1cpp.ru/forum/YaBB.pl?num=1345736013/4#4
Обработка,с экспериментами со стилями элементов управления окна:
https://www.1cpp.ru/forum/YaBB.pl?action=do...5FExample%2Eert
Для работы обработки требуется наличие библиотеки FormEx на компе.

https://forum.infostart.ru/forum9/topic33073/
https://infostart.ru/1c/tools/77297/

вот пример с 1cpp (не мой конечно)
http://www.1cpp.ru/forumfiles/Attachments/Test_Buttun.rar

А вообще,это я считаю не нужно в 1С 7.7.
Есть жалобы на работоспособность 1С после таких опытов.

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

Синтаксис Поиска в справочниках по наименованию:

НайтиПоНаименованию(<?>,,);
Синтаксис:
НайтиПоНаименованию(<Наименование>,<Режим>,<ФлагПоиска>)
Назначение:
Найти элемент справочника по наименованию.
Возвращает: 1 - если действие выполнено;
0 - если действие не выполнено (элемент не найден).
Параметры:
<Наименование> - строка с наименованием искомого элемента справочника,
<Режим> - необязательный параметр. Число: 1 - поиск внутри установленного подчинения (родителя); 0 - поиск во всем справочнике вне зависимости от родителя. Значение по умолчанию - 1.
<ФлагПоиска> - необязательный параметр. Число: 1 - найти точное соответствие наименования; 0 - найти наименование по первым символам. Значение по умолчанию - 0.

Profi_1C77 @ 12.11.24, 12:29 ,

Посмотрел описание библиотеки FormEx версия: 2.0.5.198 от 30.09.2024.Про стиль кнопки там ничего нет.
Есть формы,панели,таблицы и всякая интересная штука.

Prana @ Сегодня, 0:08 ,

Ну вот и хорошо.а на форуме (для спасибо) есть кнопка "c пальцем".

dravva @ Вчера, 17:20 ,

Доброе утро.
Может все таки не сохранилась конфигурация при обновлении (причины-блокировка базы,ошибки логики или синтаксические ошибки присутствовали) ? Посмотрите журнал регистрации работы пользователя.

Вопрос-почему нет индексов ? Список счетов визуально не поврежден.По идее индексы пересоздаются при монопольном запуске.

Dmitrij19631025 @ 06.02.24, 19:21 ,

Скачал этот мд-файл.Правда,скажу сразу - делал на платформе 7.7.025.В конфигураторе-загрузил измененную конфигурацию и сохранил.
Выгрузил после этого md-файл в архив.По моему проблема не в MD-файле.


andrew76 @ Сегодня, 9:20 ,
архив здесь:
https://transfiles.ru/yr200

Так у меня ТабличныйДокумент на форме а не ТабличноеПоле.В ТабличномДокументе вроде нет такого свойства- ТекущиеДанные.

andrew76 @ Сегодня, 16:04 ,

Вышел из положения следующим образом:через События->ПриИзменении в ТабличномПоле.

Процедура Поле1ПриИзменении(Элемент)
    
Если Элемент.ТекущаяОбласть.Имя="R3C3" тогда
    
        //Действие с нужной мне ячейкой
    
КонецЕсли;

andrew76 @ Вчера, 20:22 ,

вот рабочий вариант.
тему можно закрывать.

Шел=СоздатьОбъект("Shell.Application");
Папка=Шел.NameSpace("c:\out\photo_\");
fil="";
fil=ID_+".jpeg";
Файл=Папка.ParseName(fil);
Д_Ф=Формат(ТекущаяДата(),"ДДДММГГГГ");
ДД_ф=Сред(Д_ф,4,2)+"/"+Лев(Д_ф,2)+"/"+Прав(Д_ф,4);
Файл.ModifyDate=(ДД_ф+" 01:00:00 AM");

Vofka @ Сегодня, 14:22 ,

Сервер перестал раздавать лицензии.А лекарство я нашёл.
Прямо как в известном фильме-"Достаточно одной таблэтки" ©.
Лекарство сделано под 64-х разрядную Windows 7,но работает и под Windows 10 X64.

ПолучитьСтрокуПоНомеру(<?>);
Синтаксис:
ПолучитьСтрокуПоНомеру(<НомерСтроки>)
Назначение:
Получить строку таблицы значений по номеру. Указанная строка становится текущей.
Параметры:
<НомерСтроки> - номер строки, на которую следует переместиться.

ТЗ.ПолучитьСтрокуПоНомеру(<?>);

Вдогонку :

ТЗ.ВыбратьСтроки();  //эта строчка лишняя скорее всего

ТЗ.ПолучитьСтрокуПоНомеру(А);                   //ПЫТАЕМСЯ ПОЛУЧИТЬ СТРОКУ А

Если (ТЗ.ЗАКАЗ=Расх.НомерЗаказа)и(ТЗ.СТАТУС=Перечисление.Статусы.АКС)  Тогда  
       ТЗ.К=К; 
КонецЕсли;

Судя по названию темы ("Ограничение доступа с пользователей к складам"),Автора
интересовал только ограниченный доступ к складам.А если на всю конфу,то надо использовать RLS,
Или ролями манипулировать.

Цикл строить не надо.

ТЗ.Сортировать("+ДатаПриема");
Сообщить(ТЗ.ПолучитьЗначение(1,"ДатаПриема")); //минимальное значение

ZUBR @ Вчера, 21:45 ,

А команда Сообщить() выдает пустую строку ?

Если нижеуказанный код повесить на кнопку ,которая будет расположена на форме
Расходной Накладной,то все должно работать ( у меня по крайней мере работает).
Если вешать этот код на обработчик флажка,то ошибка будет вылетать.
Поэтому могу предложить другой вариант открытия формы.

Процедура Проблема()                                   
    Спр = СоздатьОбъект("Справочник.Контрагенты");
    Спр.НайтиПоНаименованию(Контрагент.Наименование,0,1); // 
    Сообщить(Спр.ТекущийЭлемент());
    ОткрытьФорму(Спр.ТекущийЭлемент());
КонецПроцедуры

Отрыть форму модально: // в этом варианте все должно работать

Процедура Проблема()                                   
    Спр = СоздатьОбъект("Справочник.Контрагенты");
    Спр.НайтиПоНаименованию(Контрагент.Наименование,0,1); // 
    Сообщить(Спр.ТекущийЭлемент());
    ОткрытьФормуМодально(Спр.ТекущийЭлемент());
КонецПроцедуры

WillyM @ Сегодня, 18:44 ,


Проверяйте заполняемость полей Фамилия,Имя,Отчество
Не вижу весь код запроса ,поэтому предлагаю такой "псевдокод" :

Если ЗначениеЗаполнено(Фамилия) и ЗначениеЗаполнено(Имя) и  ЗначениеЗаполнено(Отчество) Тогда 
       ОбластьМакетаШапка.Параметры.Физлицо = РезультатФИО.Фамилия +" "+РезультатФИО.Имя+" "+РезультатФИО.Отчество;
Иначе
       ОбластьМакетаШапка.Параметры.Физлицо="Неполные данные в ФИО";
КонецЕсли;

WillyM @ Сегодня, 18:06 ,

Маловато данных для анализа ошибки.Огласите текст запроса пожалуйста.

ZUBR @ Сегодня, 17:48 ,

Найти(<?>,)
Синтаксис:
Найти(<Строка1>,<Строка2>)
Назначение:
Возвращает позицию первого вхождения в строку поиска заданной подстроки.
Параметры:
<Строка1> - строка в которой ищем (место поиска);
<Строка2> - строка которую ищем (шаблон поиска).
Замечание:
Если не находит - возвращает число 0.
Первая позиция имеет индекс 1.

Телефон_=СокрЛП(Телефон);  //убирает лишние пробелы справа и слева
Расх.ВыбратьДокументы(НачДата,КонДата);
            Пока Расх.ПолучитьДокумент()=1 Цикл 
                Если (Найти(Расх.Телефон,Телефон_)>0)и(Расх.СтатусЗаказа <> Перечисление.Статусы.Акс)  Тогда   
                    ТЗ.НоваяСтрока();
                    ТЗ.Модель = Расх.Модель;

mut @ Сегодня, 18:52 ,

Ладненько,уговорили:

Телефон_=СокрЛП(Телефон);  //убирает лишние пробелы справа и слева
Расх.ВыбратьДокументы(НачДата,КонДата);
            Пока Расх.ПолучитьДокумент()=1 Цикл 
                Если (Найти(Расх.Телефон,Телефон_)=1)и(Расх.СтатусЗаказа <> Перечисление.Статусы.Акс)  Тогда   
                    ТЗ.НоваяСтрока();
                    ТЗ.Модель = Расх.Модель;