ГОСПОДА !
Создал программно док, заполнил его реквизиты.
Теперь хочу посмотреть что получилось и потом либо записать либо нет.
Что то у меня переклинило и не работает.
Подскажите пож. кому не в лом.
Док = СоздатьОбъект("Документ.накладная");
Док.Новый();
Док.Контрагент = МойКонтр;
ОткрытьФорму(Док);
/// НЕ ПАШЕТ ??? :-((

ОткрытьФорму("Документ.накладная");

и не будет пахать

Ты лучше реквизиты заполняй в форме документа в процедуре ВводНового(). А открывай ОткрытьФорму() для нового документа.

http://www.kuban.ru/forum_new/forum9/files/278018.html
читать, много думать

(1) Это откроется форма нового документа т.е. с не заполненными реквизитами.
А мне надо открыть тот док который я уже заполнил.

в модуле формы заполнялку пропиши

ОткрытьФорму("Документ.накладная",Конт);
Конт.Контрагент = МойКонтр;

//*******************************************
Процедура Сформировать()
  Конт = "";
  ОткрытьФорму("Документ.Тест",Конт);
  Конт.Аккаунт = Константа.ОсновнаяУчетнаяЗапись;
  Конт.Форма.Обновить();
КонецПроцедуры

(8,9) как ТЧ будем заполнять? :))

(10) в моём документе нет реквизитов в табличной части :)

(11) шайтан.... ;)))

(8) ну это да - работает плохо только то что форма открывается до того как определяются значения реквизитов. А у меня тут часто бывает так, что эти реквизиты таковы, что и док создавать не надо и уж тем более его записывать. Можно конечно сначала узнать надо/не надо ее открывть а уж потом - создавать док. Но это есть некоторое лишнее нагромождение.
Хотелось бы его избежать.
(7) тоже работает - только в моем случае не годится потому как конфу я правит не могу - все делается во вешнем отчете.

Создаешь обработку с формой аналогичной форме документа, заполняешь ее как надо (программно или вручную). Если нравиться - из обработки заполняешь документ.

(11) Это у тебя "Тест", а у него то "Накладная" :))

(13) таб. часть тоже заполняешь?

а между прочим (прочим по турецки - ноги :) )
можно и такую конструкцию сделать
Новый();
...
заполняем
...
ОткрытьФорму(

(17) чего форму?

(0) А может ОткрытьФорму(Док.ТекущийДокумент()) ?????

(19) нет его

(18) нового незаписанного

(20) Ты прав. Лучше как в (14)

(15) а кому щас легко?, тока извраты это всё, правильней через параметры при открытии, но типовую придётся плющить :(

(17) через транзакцию?

я записываю, открываю, а там уж юзер решает проводить или удалять

(24) да... при чём даже Таб часть заполниться...

А что мешает записать документ, а потом, если он не нужен, Док.Удалить(1)?

(27) видимо мешает, хороший тон.....

(27) В каком модуле?

(26) ну это понятно, если без ТЧ, то "правильнее" все же (8,9)

(29) был 2 (27)

(30) да я больше для себя написал.... просто ни разу так не делал....

заполнение ТЧ через контекст работает в 26 релизе...

(29) Кинуть на форму документа кнопку "Удалить" и написать процедуру удаления.
Хотя.... (13) Конфу править не хочет.

(24) Да
...
Ненада ничего Удалить(1), он и так откроется незаписанный и заполненный

(33) серьезно?

ГОСПОДА !
Корме всего прочего одновременно может быть открыта форма только одного нового документа !
А у меня тут их может быть несколько.
Так что видимо придется сначала всетаки записывать а уж потом открывать.
Такие дела.
:-(

Меня уже клинит :(
2 (34) а не ругнется на заблокированный объект?
2 (33) а где такое взять? Я еще не видел.

(36)
да, толко что обнаружил
+все что касается ТЧ через контекст

(37) Не изобретай свинтопрульный аппарат, займись лучше чем-нибудь полезным ...

(33) почемуто у меня и в 21 работало ?

(39) Может, у тебя Формекс или 1С++ стоит?

(35) я думал, ща как-нибудь скриптами :)))
  
выложу код тогда за тебя :)
  
Док.Новый();
...
заполняем
...
НачатьТранзакцию();
Док.Записать();
ОткрытьФорму(Док.ТекущийДокумент());
ОтменитьТранзакцию();
  

(43) Дык, вроде этот документ потом хрен запишешь?

(38) Перед Удалить(1) написать: Форма.Закрыть(0)

(33) Правда? Не ставил еще 26 ..
(37)
"Корме всего прочего одновременно может быть открыта форма только одного нового документа"
Гон, одновременно можно открыть сколь угодно много новых форм документов...
Пит показывал, как сделать.

2 (45) спасибо, попробую

передай что хочешь при создании, а потом в ПриОткрытии()...

(47) не вздумай так делать

(41) Не тренди ...

(44) хм.. и правда не записывается...

(51) Уфф, успокоил :)

У меня никогда не стоял вопрос о невозможности править конфу, поэтому всегда делал в "приОткрытии()". А все остальное беру на заметку. ИМХО (43) - дешево и сердито.

(46)
см. (39)

(49) Почему?

(51) да и у меня тоже....
2smaharbA - тогда в чём смысл??

В общем, раз user1C не отвечает на (42), напишу сам. Насколько я понял, если есть Формекс или 1С++ с включенным в нее Формекс, то можно сделать ОткрытьФорму ("Документ.ГЫГЫГЫ", Конт) и далее Конт.НоваяСтрока () с заполнением табличной части. Все будет работать нормально на разных релизах 1С (что на 26-м, что на 21-м).

(57)
только ядро 26

(58)+
и 1С++ :))

(58) с формексом и на 2 и на 25 работает

(54) Поставил 26, просто так не работает ...:(

+60 и на 21

(61)
сорь, для чистого 26 это так и осталось мечтой :(

(60)
да я в курсе

ну так на чем остановились то?

(65) формекс рулит....
через транзакцию - обманули...

а что Абрахамс скажет? :))

- либо правка конфы (много новых с заполнением каждого нового нужной инфой штатными средствами платформы) - это работает
- либо формекс
- либо ВК от Орефкова (турбоБл ?)

(68)
имхо, 3-й пункт работу с ТЧ через контекст не решает

(69) потому и стоит вопрос

(68) 4-й способ. Без правки конфы и без ВК, используя возможности подбора. Работает для ТиС и, возможно, Комплексной.

(71) офигеть... и как же?

(71) Показывай!

http://www.kuban.ru/forum_new/forum9/arhiv/271899.html
85-й пост. Там небольшой косячок - надо переменную Конт определить.

1. Могу программно заполнить новый док и открыть его форму как нового.
2. Mогу открыть одновременно сколько угодно новых незаписанных форм из п.1 одновременно.
все штатными средствами.

хитёр.... надо будет проверить

(75)+ безо всяких там подборов (сорри, если не в теме)

(74) Фигня, это всё равно, что в ВводНового или в ПриОткрытии написать код...там же всё в ОбраткеПодбора делается ...
НезаЧот ...

(78) Конфа не меняется, не забывай.

(75) не меняя код в документе?

(79) Метод не универсален. Работает только в ТиСе, может и в комплексной, т.к там прописаны действия в ОбработкеПодбора, а это равносильно в любой конфе использовать свою процедуру по заполнению ТЧ дока ...например, в ПриОткрытии(),ВВодНового() ...

(81) Никто и не утверждал, что он универсален. Но тем не менее, работает без изменений конфы и без ВК... Блин, и чего я еще объясняю... Ну, не нравится не используй...

(75) опять 25... ну молодец, возьми с полки пирожок и гордись, что знаешь... а другние идиоты пускай мучуются....
(78) и всё таки вариант, достоин жизни..... хотя конечно и с ограничениями...

(81) Универсально - в ссылке пост 17-й ...

(80)
75.1 - не меняя код дока
75.2 - изменения в процедуре ПриОткрытии() - но они не считаются изменениями, потому как задача такая поставлена...

(84) Угу. Еще один носитель тайного знания вроде пита. Вроде и не сказал ни хрена, а у всех присутствующих ощущение, что прикоснулись к чему-то огромному и непостижимому :))

(85) ну 75.2 сегодня уже проходили :)
http://www.kuban.ru/forum_new/forum9/files/278194.html

(84) Там просто супер..! :)
(82) Просто, такой способ уже есть, то бишь код вносится в документ, неважно, типовой он , или сам прописал где нибудь...вот я о чем. Интересен вариант без внесения кода в сам документ.

(86) Ну, если ты этот пошаговый рецепт не в состоянии осилить - тогда тебе прямая дорога переходить на снеговика ...

(89) Да, видать, придется... :)

а в чем поблемы в 75.1...?

(91) Собственно, пример приведи :)

(92)
+1

Вот так все бросить и привести?
а может я облажался...? вроде у меня же работает в куче мест...
надо глянуть.. чей-то я испужался...

(94) Ага. Без примера чтой-то не верится :) Я тоже могу сказать, что у меня в 7.7 одновременно сидит более 500 юзверей, каждый день вводится по мульену докУментов по 500-600 строк и проводятся полсекунды максимум, любые отчеты формируются не дольше 1 секунды (за любой период времени), а на вопрос о подробностях скромно умолчать...

(94) Хотя... Может, ты про документы без табличной части...

Вот пример, через одно место, через которое предлагали...
...
Перем Док;
Процедура ОтменаТранзакции()
  Док.Удалить(1);
    Форма.ОбработкаОжидания("",0);
КонецПроцедуры
//*******************************************
Процедура Сформировать()
  Док=СоздатьОбъект("Документ.ЗаказНаОтгрузку");
  Док.Новый();
  Док.ДатаДок = ТекущаяДата();
  Док.Комментарий = "НОВЕЙШИЙ";
  Док.ХозОперация=глПолучитьХозОперацию("Заказ покупателя");
  Спр=СоздатьОбъект("Справочник.Контрагенты");
  Спр.ВыбратьЭлементы();
  Пока Спр.ПолучитьЭлемент() = 1 Цикл
    Если Спр.ЭтоГруппа()=1 Тогда
      Продолжить;
    КонецЕсли;
    Док.Контрагент=Спр.ТекущийЭлемент();
    Док.Основание=глПолучитьОсновнойОбъект(Спр.ТекущийЭлемент(),"Основание");
    Прервать;
  КонецЦикла;
  СпрЕ=СоздатьОбъект("Справочник.ЕдиницыИзмерения");
  Спр=СоздатьОбъект("Справочник.Номенклатура");
  Спр.НайтиПоНаименованию("СП-120",0,0);
  Док.НоваяСтрока();
  Док.Номенклатура = Спр.ТекущийЭлемент();
  Док.Количество = 1;
  Док.Кратность = 1;
  СпрЕ.НайтиПоРеквизиту("Номенклатура",Спр.ТекущийЭлемент(),1);
  Док.Единица=СпрЕ.ТекущийЭлемент();
  Док.ОперацияТ=Перечисление.ОперацииСЗаказами.НаОтгрузку;
  Док.Цена = 100;
  Док.Сумма=100;
  Док.Автор=глПользователь;
  Док.МестоСоздания=глПользователь.Подразделение;
  Док.Подразделение=глПользователь.Подразделение;
  глДокументУстановкаОтборов(Док);
  глУстановитьРеквизитыОтбора(Док);
  Док.Записать();
  конт="";
  ОткрытьФорму("Журнал.ЗаказыНаОтгрузку",Конт);
  Шел=СоздатьОбъект("WScript.Shell");
  глЖурналНайтиДокумент(Конт,глЖурналНайтиДокумент(Конт,Док.ТекущийДокумент()));
  Шел.SendKeys("{F9}~");
    Форма.ОбработкаОжидания("ОтменаТранзакции",1);
КонецПроцедуры
...
Конечно привязано к моей конфе, но поймете думаю :)

ужас

(97) С НомерДок нехорошо получилось :)

(98) дак вот пришлося помаксимуму поля заполнять, а то у меня все журналы общие :)

(98) Ну прям слово в слово, как Дурочка 1С © показывала в (84) ... ! :)

(101) Не надо грязи! У меня таких косяков не было!

(99)+ Хотя, если номер записанного документа запомнить, а после удаления прописать в открытую форму через контекст, то будет нормально.
PS. Хотя способ мне все-таки не слишком нравится :)

Дак и сказано что это между прочим через жпо...

(102) идея то похожая, а вот реализация - это дело техники ... :)

+(102) Какие-то транзакции наплел, Док не удалил, журнал (почемуто не общий) не закрыл, новый открытый документ не перенумеровал ...

(106) ничего я не наплел, с транзакциями можно, но смысл ?
А тут так проста процедура с названием подруку попалась, а мене нах номер, у меня в конфе все ок, в приоткрытии во всех доках многа чего делается и всего одной строкой, мене не нада за этим следить в отличии от вас...

(107) Покажешь, как новый номер документу устанавливаешь? ...

Процедура ВводНового(Копирование,Документ)
  глДокументПриСоздании(Контекст,Копирование,Документ);
///
а там
глДокументУстановкаНомера(Конт);
...
а тама...
Функция глДокументУстановкаНомера(Док,ПрефНом="") Экспорт
// Устанавливает номер документа по префиксу УРБД, Фирмы, Вида и т.п. ДРК05
// Все префиксы описаны в таблице глДостДок. Если номер установлен возвращает 1, иначе 0
Перем ПрефСтр;
  ВД=Док.Вид();
  Если глДокументНайтиДескриптор(ВД)=0 Тогда Возврат 0;
  Иначе Преф="";
    Если глДостДок.ПрефБД=1 Тогда Преф=Преф+глПрефиксБД; КонецЕсли;
    Если глДостДок.ПрефФрм=1 Тогда
      Если Док.Фирма.Выбран()=1 Тогда
        Преф=Преф+СокрЛП(Док.Фирма.ПрефиксНумерации);
      КонецЕсли;
    КонецЕсли;
    Если ПустаяСтрока(ПрефНом)=1 Тогда
      Преф=Преф+СокрЛП(глДостДок.ПрефНом);
    Иначе Преф=Преф+СокрЛП(ПрефНом);
    КонецЕсли;
    Док.УстановитьНовыйНомер(Преф);
  КонецЕсли;
КонецФункции // глДокументУстановкаНомера
...
ну в "особо сложных" случаях -
Формат(глНайтиСвободныйНомер(Контекст)-1,"Ч(0)7") - тут уже перебор, но этт худой метод...

(94)+ так как времени смотреть где это у меня и как сделано нет - то, по- видимому я облажался.. (но запомню, время будет - посмотрю...)

(109) правильно, "ПриОткрытии()"! Я недавно сам так лохонулся с номером. Смотрю вечером, а у бухов пару документов, а старший номер уже за 50.
Ты ж удаляешь док копирования после открытия нового.

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