можно и через переменную модуля объекта:

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

У форм документа:
Процедура ПриОткрытии()
Сообщить(ФлагНаОсновании);
КонецПроцедуры


P.S. на мисте конечно быстрее и поиск рулит