Что то погуглил. Тема старая. Что то не решается.
Пишу код. Все равно открывает пустой док. Что не так?

&НаСервере
Процедура мУстановкаЦенНоменклатуры(ДанныеФормы)
   
   НовыйДокумент = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.УстановкаЦенНоменклатуры"));
   
   НовыйДокумент.Дата        = ТекущаяДата();
   НовыйДокумент.Ответственный = ПараметрыСеанса.ТекущийПользователь;
   НовыйДокумент.Комментарий = "";
   
   СтрокаТЧ = НовыйДокумент.ВидыЦен.Добавить();
   СтрокаТЧ.ВидЦены = Объект.ВидЦенНоменклатуры;
       
   Для Каждого Стр из Объект.ТоварыУстановкаЦенНоменклатуры Цикл    
       Если НЕ ЗначениеЗаполнено(Стр.Номенклатура) Тогда
           Продолжить;
       КонецЕсли;
       
       Если НЕ Стр.Пометка Тогда
           Продолжить;
       КонецЕсли;
       
       СтрокаТЧ = НовыйДокумент.Товары.Добавить();
       СтрокаТЧ.Номенклатура     = Стр.Номенклатура;
       СтрокаТЧ.Характеристика   = Стр.ХарактеристикаНоменклатуры;
       СтрокаТЧ.Упаковка         = Стр.Упаковка;
       СтрокаТЧ.ВидЦены          = Объект.ВидЦенНоменклатуры;
       СтрокаТЧ.Цена             = Стр.Цена;                
   КонецЦикла;
   
   ЗначениеВДанныеФормы(НовыйДокумент,ДанныеФормы);
   
КонецПроцедуры

&НаКлиенте
Процедура УстановкаЦенНоменклатуры(Команда)
   
   Если НЕ ЗначениеЗаполнено(Объект.ВидЦенНоменклатуры) Тогда
       Сообщить("Не указан Вид цен номенклатуры!");
       Возврат;
   КонецЕсли;

   
   Форма = ПолучитьФорму("Документ.УстановкаЦенНоменклатуры.ФормаОбъекта");
   ДанныеФормы = Форма.Объект;
   мУстановкаЦенНоменклатуры(ДанныеФормы);
   КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
   Форма.Открыть();
   
КонецПроцедуры

Мне стыдно лезть с советами к Гуру, внедряющему 50 робочих мест за 580 тыщ (не злопамятный, просто ты был в ударе и запомнился.) Но почему бы не записать, показать, откатить транзакцию?

И - этот бизнес-процесс был ещё в 7.5

(1) Неверный путь
(0) Еще и поиском не умеешь пользоваться?

Методология разработки в 8.2 от 1С:

1) Формы не настраиваются в месте вызова, им передаются параметры и форма сама должна обработать эти параметры и настроится ( аля конструктор объекта ). ПОлучитьФорму( - плохой тон в 8.2

2) Документ должен заполняется в одном месте - в обработке заполнения, а не в месте вызова

то есть код открытия новой формы должен выглядеть так:

ОткрытьФорму( "Документ.УстановкаЦенНоменклатуры.ФормаОбъекта" , ПолучитьПараметрыНовогоДокумента() , ЭтаФорма );

(2) поисковики дают 0 -результата решения.

(1) какое то решение через Ж. Оно хоть рабочее? или из теории вероятности (чем напичкано в поисковиках кстати)? для 8.2

(3) Поясняю. Для пункта 3 надо все прописывать в модуле документа. менять типовую под специфичное заполнение.
В данном случае это не долджно затрагивать типовые модули вообще.

(6) Открой для себя ДанныеЗаполненияю

(7) где это? есть у кого нибудь текст кода чтобы часами не рыться?

(8) Есть

Команда вызывается из документа УстановкаЦенНоменклатуры ?
Если да в этом документе уже есть данные?

Если все нет, объясните порядок действий

(0) смотри ОбработкаЗаполнения(<ДанныеЗаполнения>, <СтандартнаяОбработка>)

(0) Мань, помнишь?

"Я бы порекомендовал вам (вижу что пока не очень сильны в 1Ске). Начать со следующего. Перестать - "делаю бесплатно". Сделать несколько вещей до конца. тогда они и по 200 рейтинга смогут заработать. А вам перестать работать за бесплатно, а хотя бы какую то мотивирующую для себя сделать, и направить эти средства на курсы по обучению."

Воспользуйся своим советом, сходи на курсы...

(12) чорт, ты его цитируешь ))))
как интересно цитату нашел?

за что ж вы его так не любите?

Я бы сделал так:
(Defender вроде лучше метод показывал, я опять забыл)

#Если Сервер Тогда
Функция СоздатьЭлементСправочника() Экспорт
    Объект=Справочники.Справочник1.СоздатьЭлемент();
    Объект.Наименование="Ntcn";
    Возврат ПоместитьВоВременноеХранилище(Объект,Новый УникальныйИдентификатор());
КонецФункции
#КонецЕсли

   Адрес=ОбщийМодуль.СоздатьЭлементСправочника();
   СтруктураОткрытия=Новый Структура;
   СтруктураОткрытия.Вставить("АдресОбъекта",Адрес);
   Форма=ПолучитьФорму("Справочник.Справочник1.ФормаОбъекта",СтруктураОткрытия);
   Форма.Открыть();

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

г1с затравили, теперь этот на очереди?

(16) Девиантов нигде не любят.

ну с них еще и смеяться можно. зачем же сразу травить?

(16) OFF: Братья-одинэсники! Поддержите мою дочку на конкурсе "Маленькая мисс 2011"

166 и дальше... некрасиво

(10) нет. не из документа
(11) я уже написал. мне не нужно переписывать типовую.
ОбработкаЗаполнения не катит. т.к. она существует только в модуле объекта в типовой.
(15) с адресами работал. чесно не уверен сработает ли это. попробую. спасибо.

Если есть еще варианты пишите. Я уже их десятки испробовал безрезультатно.

(13) ну дык... я не злопамятен, но память у меня хорошая ))

(19) дурак тот кто не имеет фактов. я вчера узнал только об той ветке. нигде ничего не писал. и вообще слухом не слышал.
Понял только что Задов ваще окуел.

epic fail...

и это наши мозговые аристократы... предлагавшие разные профсоюзы и прочие увеличения заработков. А сами не в силах обработку накорябать...

какая же ты маня балаболка...

(22) Надо провести расследование, найти виновных и ... сделать доброе дело. кто ж ники ворует такой...

(25) какие ники? на мисте никто не писал под моими никами. а те ссылки что привели - какое то сайты которых я в жизни не видел, никогда не был, и тем более не регился.

(26) человек бывающий на мисте специально зарегился под твоим ником ТАМ и нагадил... беда

(26) почему-то склонен тебе верить в этом...

(26) И поиском не ты пользоваться не умеешь?

Вот, 2 ссылка в гугле...
v8: Открытие формы созданного документа

ППЦ, Маниак.

(30) ну извини мне в голову не пришло набрать в поисковике набор таких слов.

Неужели эти примеры из СП не подходят?


Расширение управляемой формы для объектов.ЗначенияЗаполнения (Managed form extension for objects.FillingValues)
Расширение управляемой формы для объектов (Managed form extension for objects)
ЗначенияЗаполнения (FillingValues)
Описание:

Тип: Структура. Параметры заполнения нового объекта.

Расширение управляемой формы для объектов.Основание (Managed form extension for objects.Basis)
Расширение управляемой формы для объектов (Managed form extension for objects)
Основание (Basis)
Описание:

Тип: Произвольный. Объект, являющийся основание для создания нового объекта.

(33) причем тут основание. нету никакого основание.
док вводится не на основании.

У меня сейчас все рабочие вараинты готовые работают через запись дока в базу и его открытие.
Вот понадобилось сделать создание дока и открытие без его записи.

Или основная интрига состоит в том, что нельзя менять модуль формы в конфе на поддержке?

(34) Учи матчасть. в 8.2 основание есть всегда.
Жаль, у меня тут 1С нету, а то я бы показал на бис, что она умеет :)

(36) Интрига состоит в том, чтобы вчитаться в то, что просит аутор.

(37) Чтобы ты делал с объектом на &ТонкомКлиенте?

(39) Ничего. Это особая, одинэсовская магия - (7) :)

А кто скажет почему сабж не работает? Код рабочий. Отладчик показывает заполнение но нифига не происходит.

чисто чтобы понимать.

Все кажется я понял. надо через временное хранилище прогнать.
ДанныеФормы.

Еще можно сделать, как в (3), а чтобы не лезть в типовые модули, создать подписку на событие ОбработкаЗаполнения.

v8: 8.2 - заполнять из данных заполнения - это что?

(45) фигня. мне это не нравится. галки шмалки. это все ограничивает возможности. пока галку не поставишь - куй получишь. я такого не понимаю.

апаю ветку. что имелось в виду в (7)?

(47) Я все еще в больнице. Вечером нарисую.

(48) Выздаравливай!

Никто больше не в курсе? Один специалист только по данному вопросу?

(48) ты один кто спец видимо. жду когда поправишся.

(50) яж тебе писал там в ветке про 8.2.14 как сделать сабж...

(51) не видел.

(52) ясен пень что не видел.. х.ли читать то что пишут..
главное орать погромче что 1с гамно...

адресдокумента = создатьизаполнитьдокументнасервере();

       ПараметрыОткрываемойФормы=Новый Структура;
       ПараметрыОткрываемойФормы.Вставить("АдресГотовогоОбъекта",АдресДокумента);
       ОткрытьФорму(ФПечати,ПараметрыОткрываемойФормы);

на сервере соответственно всякая байда по созданию и заполнению и в конце соответственно

АдресДокумента = ПоместитьВоВременноеХранилище(ДокПечати, Новый УникальныйИдентификатор);

Возврат АдресДокумента;

никакой докпечати.записать(); естественно нет

поржал=)
(0) удачи, юный подаван

(54) Что такое  ФПечати ? нифига непонятно. Где создание дока?

(55) ну ржи. если ты лошадь.

(54) завтра попробую конструкцию. Если ты написал и оно работает то ты ща единственный кто это описал.

Еще не факт что заработает! в последней УТ так изменили модули что док вообще не создать даже программно. втулили версионность тупую.

(53) гамно и есть. ты разве не знал?

(58) Ты - дятелъ.
Я это тебе описал кодом в этой ветке.
Да еще показал, что подобная ссылка -2 в гугле при правильном поиске.

Подаван, такой подаван.

(56) фпечати это строковое название формы, посмотри СП про  "ОткрытьФорму".. которое к делу не относится..

создание дока - стандартное.. документ.блаблабла.СоздатьДокумент()

(61) главное 1с гамно...
остальное неважно...

(61) где ты что писал? не видел рабочего решения. а если у тебя с психикой не все в пордяке и ты кого то дятлом называешь то может быть дятел ты сам.

(62) все понял. спасибо. попробую.

Ну сделал. НИФИГА НЕ РАБОТАЕТ

&НаКлиенте
Процедура СоздатьЗаявкуПокупателя(Команда)
   
   Если НЕ ЗначениеЗаполнено(Объект.Партнер) Тогда
       Сообщить("Не указан Партнер!");
       Возврат;
   КонецЕсли;
   
   АдресДокумента = мЗаказПокупателя();
   
   ПараметрыОткрываемойФормы = Новый Структура;
   ПараметрыОткрываемойФормы.Вставить("АдресГотовогоОбъекта",АдресДокумента);
   ОткрытьФорму("Документ.ЗаказКлиента.Форма.ФормаДокумента",ПараметрыОткрываемойФормы);
           
КонецПроцедуры



&НаСервере
Функция мЗаказПокупателя()
   
   НовыйДокумент = Документы.ЗаказКлиента.СоздатьДокумент();
   НовыйДокумент.Дата        = ТекущаяДата();
   НовыйДокумент.Статус      = Перечисления.СтатусыЗаказовКлиентов.Согласован;
   НовыйДокумент.Менеджер    = ПараметрыСеанса.ТекущийПользователь;
   НовыйДокумент.Партнер     = Объект.Партнер;
   НовыйДокумент.ЗаполнитьУсловияПродажПоУмолчанию();
   НовыйДокумент.Комментарий = "";
   НовыйДокумент.Приоритет   = Перечисления.Приоритеты.Средний;

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

КонецФункции

(66) )))

(66) у меня работает.. значит что то не то сделал

код я весь показал

ты уверен что в строке
ПараметрыОткрываемойФормы.Вставить("АдресГотовогоОбъекта",АдресДокумента);
вот это олжно быть ? АдресГотовогоОбъекта

(71) Почитай мой пост (15) внимательно. И раскинь мозг по черепной коробке, юнный подаван.

(72) я уже читал. у тебя конструкция требует изменения модуля документа

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

МНЕ НЕ ПОДХОДИТ чтобя я менял еще типовую!

(73) Нет.
Модуля ФОРМЫ документа.

Либо так, либо через Команды, как у Дефендера.

(74) Нежный возраст?

(71) ага..

в модуле только формы вот это есть еще:

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

(74) нет ручек - нет печеньки..
все просто..

(75) да пофигу чего!!! мне не нужны варианты требующие изменения типовой. с этим бы я и сам давно уже догадался.

Еще меня обзывали подаваном. дятлы.
Если конфу менянть надо это уже через задний ход решение.

(80) Стена. Ядъ.

(80) Скопируй упр. форму документа себе во внешку и вызывай ее. Подаванчик.

(82) хватит уже фантазировать и заднюю включать.

Не знаешь так лучше молчи.

скопировать форму во внешку вообще бредня.

&НаКлиенте
Процедура Команда1(Команда)
   Форма = ПолучитьФорму("Документ.ПоступлениеТоваровУслуг.ФормаОбъекта");
   ДанныеФормы = Форма.Объект;
   ДанныеФормы = Заполнить(ДанныеФормы);
   КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
   Форма.Открыть();
КонецПроцедуры


&НаСервере
Функция Заполнить(ДанныеФормы)
   ДанныеФормы2 = ДанныеФормыВЗначение(ДанныеФормы, Тип("ДокументОбъект.ПоступлениеТоваровУслуг"));
   ДанныеФормы2.Товары.Добавить();
   ЗначениеВДанныеФормы(ДанныеФормы2, ДанныеФормы);
   Возврат ДанныеФормы;
КонецФункции

у меня работает..

(86)..попробовал...
{Форма.Форма.Форма(1930)}: Ошибка при вызове метода контекста (мЗаказПокупателя)
   ДанныеФормы = мЗаказПокупателя(ДанныеФормы);
по причине:
Ошибка передачи данных между клиентом и сервером. Значение недопустимого типа.
по причине:
Ошибка преобразования данных XDTO:
НачалоСвойства: ret    Форма: Элемент    Тип: {http://www.w3.org/2001/XMLSchema}anyType
по причине:
Ошибка преобразования данных XDTO:
НачалоСвойства: {http://v8.1c.ru/8.1/data/enterprise/current-config}Ref    Форма: Элемент    Тип: {http://www.w3.org/2001/XM

(85) Чем не вариант? Но я думаю, (86) - сработает.

(87) значит возвращаешь не ту переменную.
у меня также ругается, если я делаю возврат ДанныеФормы2 из своего примера

УРА
(86) КРОСАВЕЦ. Заработало!

(90) 2 недели разработок. солдат спит - служба идет.

СПАСИБО ДРУГ! Наконец то.

Кстати теперь усложняем задачу. что делать если объектов надо создать кучу?

т.е. есть таблица. по ней обход. программа создает сразу массив документов. все они должны открыться без записи.

Все эти данные в массив можно запихнуть?

Усложним еще больше задачу (просто до невозможности). ПОПРОБУЙ РЕШИТЬ ЭТО САМ!!!

(93)
1. если данных много, это закончится тем что пользователь будет нажимать "ОК" на все открытые формы.
2. можно конечно.

(96) тока в массив не форму, а данныеформы, которые вернулись из функции. а там уже на каждый элемент массива копировать данные формы

(96) не так что много. 2-3 дока.
ок спасибо и на том!) Ветку можно в книгу знаний. Потому что это единственное рабочее решение которое сейчас в инете есть.

(97) я понял. сейчас буду делать

100!

хорошая ветка

Не пойму в чем прикол, но у меня работает как в (0) ??? с маленькими изменениями (и 1С 8.2.11.236):
&НаКлиенте
Процедура Команда1(Команда)
   Форма = ПолучитьФорму("Справочник.ФизическиеЛица.ФормаОбъекта");
   ДанныеФормы = Форма.Объект;
   мУстановкаЦенНоменклатуры(ДанныеФормы);
   Форма.Открыть();//эту строчку поднял просто проверить, что и так работает
   КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
КонецПроцедуры

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

(102) я сам без понятия. вроде все один в один совпадает.
Отличие только что мУстановкаЦенНоменклатуры функция
т.е.
ДанныеФормы = мУстановкаЦенНоменклатуры(ДанныеФОрмы);

ВИдимо надо функцией возвращать назад ДанныеФормы. Процедура видимо не меняет переданный параметр.

Что-то мне подсказывает, что партия не одобрит такой подход.

(103) а отладчиком ходил? может при открытии какой-нибудь код хитро..опый все обнуляет?