Нам нужно будет создать документ, изменить флаг выписки документа. У нас есть документ основание. Вот по его номеру мы и создадим объект. Есть функция поиска по номеру.

НайтиПоНомеру
Найти документ по номеру.

Синтаксис:

НайтиПоНомеру(<Номер>, <Дата>, <ИдентВида>)

Англоязычный синоним:

FindByNum

Параметры:
<Номер> Строковое выражение, содержащее значение номера искомого документа.
<Дата> Выражение типа «дата».
<ИдентВида> Необязательный параметр. Строковое выражение, содержащее идентификатор вида документа или идентификатор Нумератора.

Возвращаемое значение:
Число 1 — если действие выполнено (документ найден);
Число 0 — если действие не выполнено.

Описание:
Метод НайтиПоНомеру позиционирует документ по номеру. В качестве второго параметра задается любая дата из диапазона, в котором нужно искать документ с данным номером. Поиск зависит от выбранного в конфигураторе способа уникальности номеров (по месяцу, году и др.).
Метод может быть использован для объекта Документ общего вида, тогда для поиска нужно указать в параметре <ИдентВида> идентификатор вида документа или идентификатор Нумератора.
Данный метод может использоваться только для объектов, созданных функцией СоздатьОбъект.

Ищем. Кстати я на ошибку поиска не проверяю. Ведь документ создается на основании и значит он есть. Но вы можете проверять, мало ли что бывает.

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

Но пока мы просто нашли документ и изменили его шапку. А нужно документ еще и записать. Читаем дальше.