Модераторы: stron
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> позиционированиев журналу документов, 1cv77 
V
    Опции темы
drlev
Дата 29.4.2009, 13:19 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 10.9.2008

Репутация: нет
Всего: нет



Уважаемые коллеги, подскажите, есть ли возможность в журнале документов программно перевести курсор на нужный документ?
Или подскажите другой вариант, может я не той дорогой пошел...
Нужно сделать поиск в журнале, через графы отбора не получается, поиск идет по реквизиту документа, тип этого реквизита - строка, а ищется только вхождение критерия в эту строку. Я делаю так: пользователь вводит критерий, нажимает кнопку "Найти", открывается весь набор документов и ищется в каждом документе совпадение реквизита с критерием. Совпадение нахожу, а дальше, как перепрыгнуть на нужный документ в журнале... не знаю...
Код

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

PM MAIL   Вверх
Tirpiz
Дата 29.4.2009, 13:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 20.12.2008
Где: Казахстан

Репутация: нет
Всего: нет



Попробуй 
ОткрытьФорму("Журнал.Общий.ФормаСписка",ТекДок);

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

Это сообщение отредактировал(а) Tirpiz - 29.4.2009, 13:36
PM MAIL   Вверх
drlev
Дата 29.4.2009, 13:43 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 10.9.2008

Репутация: нет
Всего: нет



Tirpiz
К сожалению ничего не получилось... курсор остался на прежнем месте.
PM MAIL   Вверх
Tirpiz
Дата 29.4.2009, 14:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 45
Регистрация: 20.12.2008
Где: Казахстан

Репутация: нет
Всего: нет



Тогда затрудняюсь.... smile  Может, что-нибудь с позицией документа помудрить?

Добавлено через 10 минут и 7 секунд
А впрочем..., может это и глупо, но раз ты все равно в журнале, зачем создавать объект Документ, можно просто делать выборку, на нужном доке прервать цикл, фокус ввода по идее должен остаться на этом самом доке
PM MAIL   Вверх
AkelaSQL
Дата 29.4.2009, 15:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 392
Регистрация: 14.9.2007
Где: Москва

Репутация: 6
Всего: 7



АктивизироватьОбъект(ТекДок);



--------------------
user posted image
PM MAIL ICQ   Вверх
drlev
Дата 29.4.2009, 15:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 16
Регистрация: 10.9.2008

Репутация: нет
Всего: нет



AkelaSQL, Спасибо, как раз то что и нужно smile
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "1C: Предприятие, SAP, ERP и учётные системы"
stron

Запрещается!

1. Обсуждение крэков, кейгенов и других подобных программ

Пробуйте искать сами или обращайтесь в приват к участникам форума.

Темы с подобными вещами будут немедленно удаляться, а нарушители - получать предупреждения.

Также запрещается обсуждение проблем работы этих программ (что куда вписать, куда что скопировать и т.п...)

2. Давать ссылки на взломанные продукты

  • Пожалуйста, пользуйтесь поиском перед тем, как задать вопрос - возможно ответ уже есть на форуме.
  • Название темы должно отражать её суть
  • Действия модераторов можно обсудить здесь

С уважением, stron, Pegas.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | 1C: Предприятие, SAP, ERP и учётные системы | Следующая тема »


 




[ Время генерации скрипта: 0.0671 ]   [ Использовано запросов: 20 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.