|
v7: Открытие окна в данном режиме недоступно! как решить проблему? | ☑ | ||
|---|---|---|---|---|
|
0
Invzor
24.01.14
✎
13:39
|
Функция ОткрытьФорму не работет... как отурыть форму списка подчиненного справочника Договоры...
Процедура ЧитатьШтрих() Сообщить("Читаю штрихкод..."); СпрКонтр = СоздатьОбъект("Справочник.Контрагенты"); СпрДог = создатьОбъект("Справочник.Договоры"); СпрШтрих = СоздатьОбъект("Справочник.Идентификатор"); Если СпрШтрих.НайтиПоКоду(Число(СоСканераШтрих)) =1 тогда Сообщить(СпрШтрих.Код); Если СоСканераШтрих >= 1 тогда СпрКонтр.ВыбратьЭлементы(); // Сообщить(СпрКонтр.Наименование); Пока СпрКонтр.ПолучитьЭлемент() = 1 Цикл // Сообщить(СпрКонтр.Наименование); конецЦикла; Если СпрКонтр.ЭтоГруппа() = 0 Тогда СпрДог.ИспользоватьВладельца(СпрКонтр); //открыть догооры КонтекстФормы = ""; ОткрытьФорму("Справочник.Договоры", КонтекстФормы); КонтекстФормы.ИспользоватьВладельца(СпрКонтр.ТекущийЭлемент()); СпрДог.ВыбратьЭлементы(); // Сообщить(СпрДОг.ИдентификаторШтриха); Пока СпрДог.ПолучитьЭлемент() = 1 цикл Если СпрДог.ИдентификаторШтриха.код = СпрШтрих.Код тогда // сообщить(СпрДог.Код); сообщить(СпрКонтр.Наименование); СпрДог.Статус = Перечисление.СтатусДоговора.Действует; СпрДог.Записать(); конецЕсли; КонецЦИкла; КонецЕсли; КонецЦикла; СоСканераШтрих = ""; Сообщить("обработал"); Иначе Сообщить("Введен нулевой ШТРИХКОД"); конецЕсли; Иначе Сообщить("Такого штрихКода нет в базе!"); конецЕсли; КонецПроцедуры |
|||
|
1
dachnik
24.01.14
✎
13:45
|
казалось бы, при чем тут v8?
|
|||
|
2
Invzor
24.01.14
✎
13:46
|
сорри 1С 7.7
|
|||
|
3
Invzor
24.01.14
✎
14:13
|
(1) это ваш коронный совет я так понимаю? а сказать что -то по делу не вариант?
|
|||
|
4
Invzor
24.01.14
✎
14:14
|
закройте тему.
|
|||
|
5
Torquader
24.01.14
✎
15:51
|
Если открытие окна недоступно, то или создавать обработчик ожидания, который потом откроет нужное окно, или делать "ложное закрытие", чтобы можно было открыть форму из процедуры ПриЗакрытии.
|
| Форум | Правила | Описание | Секции | Поиск |