Создание нового документа на основании данных из формы внешней обработки

[kssh24]

Задача такая:

Необходимо создать внешнюю обработку, которая создаст новый документ Поступление товаров и услуг, заполнит реквизиты документа согласно указанных данных на форме обработки.

Как создать новый документ из внешней обработки?

[LexaK]

kssh24, в форме внешней обработке пишите примерно такой код

Код Выделить Развернуть

&НаСервевре
Процедура СоздатьДокументПТУ()

лкДок = Документы.ПоступлениеТоваровИУслуг.СоздатьДокумент();
лкДок.Дата = ТекущаяДата();
    //и далее заполняете все реквизиты документа
...

    //и не забываем записать
Попытка
лкДок.Записать(РежимЗаписиДокумента.Запись);//просто Запись
Исключение
лкОшибка = ОписаниеОшибки();
Сообщить(лкОшибка);
КонецПопытки;

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


[Afinogen]

kssh24,
Точно также как и из невнешней
загоняете в реквизиты обработки или формы (это уже как душе угодно) всю нужную информацию и затем делаете серверную процедуру

Код Выделить Развернуть

&НаСервере
Процедура СоздатьНовыйДокумент()
ДокОбъект = Документы{имя в конфигурации вашего документа}.СоздатьДокумент();

//заполняете данные документа

ДокОбъект.записать();

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



[kssh24]

Afinogen, я так и написала, а оно не работает(

Код Выделить Развернуть

&НаСервере
Процедура СоздатьДокументНаСервере()

НовыйДокумент = Документы.ПриобретениеТоваровУслуг.СоздатьДокумент();

НовыйДокумент.Дата = ТекущаяДата();
НовыйДокумент.Организация = Объект.Организация;
НовыйДокумент.Контрагент = Объект.Поставщик;
НовыйДокумент.Договор = Объект.Договор;
НовыйДокумент.Склад = Объект.Склад;

        НовыйДокумент.Записать();



[LexaK]

kssh24,

я так и написала, а оно не работает(

что оно работало, эту процедуру надо выполнить!
вы ее выполняете/запускаете?

[kssh24]

LexaK,

Код Выделить Развернуть

&НаКлиенте
Процедура СоздатьДокумент(Команда)

СоздатьДокументНаСервере();

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


[LexaK]

kssh24, а что нибудь в окно сообщений пишет?

так сделайте

Код Выделить Развернуть

    ...
    Попытка
        НовыйДокумент.Записать(РежимЗаписиДокумента.Запись);//просто Запись
        Сообщить("Создан новый документ: " + НовыйДокумент.Ссылка);
    Исключение
        лкОшибка = ОписаниеОшибки();
        Сообщить(лкОшибка);
    КонецПопытки;