Конфигурация 1С 7.7 "Торговля + Склад"

Как сделать в документе "Контакт" чтобы пользователь пока не заполнит определенные реквизиты (Способ, ТиКонтакта, ИсточникРекламы ...)  ,документ не проводился

Не могу найти код в Модуле()))

документ явно не типовой.
А так можно взять код из модуля проведения типового документа

...
Если глВсеРеквизитыДокументаЗаполнены(Контекст,
    "Способ,ТиКонтакта,ИсточникРекламы ")=0 Тогда

если реквизиты шапки - в модуле дока:
Функция ПроверкаШапки()
    глВсеВыбрано = 1;
    глВыбранЛи(Способ,"Способ");        
    глВыбранЛи(ТиКонтакта,"ТиКонтакта");
    глВыбранЛи(ИсточникРекламы,"ИсточникРекламы");
    Возврат глВсеВыбрано;
КонецФункции

Процедура ОбработкаПроведения()
    Если ПроверкаШапки()=0 Тогда
        глНеПроводить(Контекст);
        Возврат;
    КонецЕсли;
КонецПроцедуры

(0) проверить реквизиты и запретить проведение...

какой код ты ищешь в модуле()))

(0) как вариант:

Если ПустоеЗначение(МестоХранения) = 1 Тогда
        Предупреждение("Пожалуйста, укажите место хранения !");
        Активизировать("МестоХранения",1);
        СтатусВозврата(0); Возврат;
    КонецЕсли;

+ в процедуре ПриЗаписи()

(2) а зачем тут функция и возврат, если я правильно понял глВсеВыбрано это глоб переменная.

если же это локальная переменная функции то, думаю, ее нужно еще в глВыбранЛи(Способ,"Способ") передавать для установки

так - на всякий просто в глаза бросилось

(6) ну конечно-же "глВсеВыбрано это глоб переменная"
а Возврат нужен, так  
Процедура ОбработкаПроведения()
    Если ПроверкаШапки()=0 Тогда
        глНеПроводить(Контекст);
        Возврат;
    КонецЕсли;
// ТУТ еще куча строчек которые незачем выполнять если проверка не пройдена
КонецПроцедуры

ну и, на всякий случай

Процедура глВыбранЛи(Что,Стр,НомСтр = 0) Экспорт
    ВСтроке = ?(НомСтр=0,""," в строке "+НомСтр);
    Если ПустоеЗначение(Что)=1 Тогда
        глТрассировка("Не заполнен реквизит "+Стр+ВСтроке+"!",0);
        глВсеВыбрано = 0;
    КонецЕсли;
КонецПроцедуры //глВыбранЛи


зы: механизм типовой, семерошный ...ох уж эти восьмерошники :)

(7) :) а я уже не знаю кто.