Здарвствуйте
Не типовая
Что не так? Где надо подправить?
При создании документа на соновании, некоторые параметры заполняются из настроек пользователя по умолчанию (спр.ползователи) из процедуры  ПриОткрытии
Допустим в документе Поступление ТМЦ Склад стоит №3, и когда далаем на его основание документ возврата поставщику, то ставится склад №1 как в спр. пользователи по умолчанию
  Если ЭтоНовый()Тогда
          
  УправлениеДокументами.ЗаполнитьШапкуДокумента(ЭтотОбъект, глЗначениеПеременной("глТекущийПользователь"),ПараметрОбъектКопирования);
          
КонецЕсли;

В Процедура ЗаполнитьШапкуДокумента есть параметр ПараметрОснование = неопределено как с ним работать.


// Процедура - обработчик события "ОбработкаЗаполнения".
// Поступление от поставщика --> Возврат поставщику
Процедура ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
    Если ТипЗнч(ДанныеЗаполнения) = Тип("ДокументСсылка.ТМЦ_Поступление") Тогда
        
        // Заполнение шапки
        //ЗаполнитьЗначенияСвойств(ЭтотОбъект, ДанныеЗаполнения,
        //"МХ, Контрагент, Договор, РасчетныеСчета, Валюта, РасчетНалогов, СчетВзаиморасчетов");
        
        // Заполнение шапки
         УправлениеДокументами.ЗаполнитьШапкуДокументаПоОснованию(ЭтотОбъект, ДанныеЗаполнения);
          Сообщить("Не ставится МХ и ставка ");    
КонецПроцедуры

проверять на заполненность жеж

Что такое жеж

(2) жеж, это частица речи

переделать все на ОбработкаЗаполнения

(4) Что там надо переделать?

(5) убрать заполнение документа в ПриОткрытии, перенеся код в ОбработкаЗаполнения

Вот Процедуры общего модуля

Процедура ЗаполнитьШапкуДокумента(ДокументОбъект, ТекПользователь, ПараметрОбъектКопирования = неопределено, ПараметрОснование = неопределено) Экспорт
    
    МетаданныеДокумента = ДокументОбъект.Метаданные();

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

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


Процедура ЗаполнитьШапкуДокументаПоОснованию(ДокументОбъект, ДокументОснование) Экспорт
    
    МетаданныеДокумента          = ДокументОбъект.Метаданные();
    МетаданныеДокументаОснования = ДокументОснование.Метаданные();
    
    // Дата
    Если НЕ ЗначениеЗаполнено(ДокументОбъект.Дата) Тогда
        ДокументОбъект.Дата = ОбщегоНазначения.ПолучитьРабочуюДату();
    КонецЕсли;

    Если ОбщегоНазначения.ЕстьРеквизитДокумента("МХ", МетаданныеДокумента)
        И ОбщегоНазначения.ЕстьРеквизитДокумента("МХ", МетаданныеДокументаОснования) Тогда
        ДокументОбъект.МХ = ДокументОснование.МХ;
    КонецЕсли;

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

(6) А как тогда быть если документ новый, как они будут заполняться

(8) в ПриОткрытии проверяете, если склад не пустой, не трогаете его тогда.

(9) 5555++++++++
СПАСИБО