Имя: Пароль:
1C
1С v8
Открытие неуправляемой формы из управляемой (проводки)
,
0 Solitar
 
15.08.12
09:50
Создал новый документ в бп 2.0. Добавил кнопку ДтКт, привязал к ней процедуру

Процедура ДтКт(Команда)
Если Объект.Ссылка.Пустая() Тогда Сообщить("Документ не проведен") Иначе
   ОткрытьДвижения()
КонецЕсли;
КонецПроцедуры


Процедура ОткрытьДвижения ()
   
   
   ЭтотОбж = РеквизитФормыВЗначение("Объект");
   ОбщегоНазначения.РучнаяКорректировкаОсновнаяФорма(ложь,Объект.Ссылка,ЭтотОбж)

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



Ниже процедура открывающая проводки.

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

       ФормаНастройки.Открыть();
   КонецЕсли;
   
КонецПроцедуры


ФормаНастройки.ДокументОбъект = ЭтотОбъект делает НЕОПРЕДЕЛЕННО и из-за этого ничего не открывается. В чем косяк???
1 Anastasiy
 
15.08.12
09:55
Хм... А через обработчик при нажатии, не проще?
2 DrShad
 
15.08.12
10:02
а откуда в 2.0 РеквизитФормыВЗначение("Объект")? или я что-то упустил
3 Solitar
 
15.08.12
10:03
забыл указать, документ на управляемых формах.
4 DrShad
 
15.08.12
10:04
(3) и как это?
5 Solitar
 
15.08.12
10:05
(4) что как это? создал и все)
6 Лоботряс
 
15.08.12
10:07
не реквизит формы в значение а ДанныеФормыВЗначение
7 Лоботряс
 
15.08.12
10:07
надо использовать
8 DrShad
 
15.08.12
10:09
(6) ну вот взял и все испортил
9 DrShad
 
15.08.12
10:09
(5) и в управляемом приложении ты хочешь открывать обычные формы!? жестяная жесть
10 Лоботряс
 
15.08.12
10:10
(9)Ну извини... предупреждать надо что вы тут интригу держите
11 DrShad
 
15.08.12
10:12
(10) да как бы меня больше интересовало что он ожидает увидеть в обычной форме открытой в упр приложении, да и нафига все эти пляски с бубном
12 Solitar
 
15.08.12
10:16
(11) хочу увидеть открытую форму обработки с проводками.
изменил на вот это, и все равно в процедуре ФормаНастройки.ДокументОбъект = ЭтотОбъект делает НЕОПРЕДЕЛЕННО

ЭтотОбж = ДанныеФормыВЗначение(Объект,Тип("ДокументОбъект.Закрытие"))
13 Лоботряс
 
15.08.12
10:19
(11)А че такого если у конфигурации стоит настройка "использовать обычные формы в упр. приложении"?
14 DrShad
 
15.08.12
10:21
(13) ну если так, тогда конечно, но все равно не ясны эти танцы с бубнами
15 Anastasiy
 
15.08.12
10:23
"Если основному реквизиту формы указать тип значения Документ.Объект.ПриходнаяНакладная, то при закрытии формы будет запрашиваться подтверждение записи и проведения, если же -//- указать Справочник.Объект.Клиенты, то подобного подтверждения возникать не будет".. проверь реквизиты в управляемой форме и  их значения.
16 Solitar
 
15.08.12
10:23
проблема решена. это было из-за того, что ФормаНастройки.ДокументОбъект не стоял тип моего документа.
17 Лоботряс
 
15.08.12
10:24
(16) ну так и знал...
Кaк может человек ожидaть, что его мольбaм о снисхождении ответит тот, кто превыше, когдa сaм он откaзывaет в милосердии тем, кто ниже его? Петр Трубецкой