Помощь - Поиск - Пользователи - Календарь
Полная версия этой страницы: Заполнение реализации на основании: вставить значение дополнительного (нетипового) поля
Украинский 1С форум: всё про 1С 8.3, 1С 8.2, 1С 8.1, 1С 8.0, 1С 7.7 > Программисту > Программирование в 1С Предприятие 8.2 > Программирование обычных форм 1С 8.2 и не интерфейсной логики
Constantus
Приветствую, Форумчане!

Имеется СчетНаОплатуПокупателя. В данный документ вставлен дополнительный (новый) реквизит "ПроектПредприятия".

После заполнения СчетаНаОплату, выбираю: "Ввести на основании - Реализация Товаров и Услуг"

В "Реализации" также имеется дополнительный реквизит "ПроектПредприятия"

Как сделать так, чтобы при выполнении этой операции (Ввод на основании) значение "ПроектПредприятия" из Счета на оплату также перенесся в реквизит "ПроектПредприятия" в новый документ "Реализация Товаров и Услуг"?

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

Реквизит "ПроектПредприятия" - ссылка на документ...

1с8.2, УТ 10.3, обычное...
Vofka
В модуле документа Реализация товаров и услуг посмотрите процедуру ОбработкаЗаполнения. Она возникает, когда документ вводится на основании.
Constantus
Vofka @ Сегодня, 11:58 необходимо зарегистрироваться для просмотра ссылки,

Нашел в Модуле Объекта "Реализации товаров и услуг" процедуру:

Процедура ЗаполнитьПоДокументуОснования(Основание) Экспорт


Добавил туда код в начало:

Если  ТипЗнч(Основание) = Тип("ДокументСсылка.СчетНаОплатуПокупателю") Тогда
    ЭтотОбъект.ПроектПредприятия=Основание.ПроектПредприятия;
КонецЕсли;


вот так теперь выглядит код:

Процедура ЗаполнитьПоДокументуОснования(Основание) Экспорт
    
    Если Основание = Неопределено ИЛИ НЕ Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Основание)) Тогда
        Возврат;
    КонецЕсли;     
//******************************************************************************    
    Если  ТипЗнч(Основание) = Тип("ДокументСсылка.СчетНаОплатуПокупателю") Тогда
        ЭтотОбъект.ПроектПредприятия=Основание.ПроектПредприятия;
    КонецЕсли;    
//*******************************************************************************    
    Если ТипЗнч(Основание) = Тип("ДокументСсылка.ЗаказПокупателя")
     ИЛИ ТипЗнч(Основание) = Тип("ДокументСсылка.СчетНаОплатуПокупателю") Тогда


На сколько данные изменения нанесут вред типовой конфигурации???


 ! 

Правила, пункт 12
 
Vofka
Да никакого вреда, по-моему, не будет. И выделяйте, пожалуйста, код нормально.
Для просмотра полной версии этой страницы, пожалуйста, пройдите по ссылке.