Имеется документ ("Дневная выработка") с номером "000000001", в нем заполнены ручками реквизиты...
Имеется обработка, на ее форме: окно списка документов "Дневная выработка" и рядом КНОПКА "Добавить новую дневную выработку"...
Какую процедуру этой кнопки необходимо описать, чтобы сработала аналогия нажатия кнопки F9 по документу с номером "000000001"?

Што?

Я так понимаю человек хотел что бы заместо нового документа при нажатии на кнопку создавалась копия ! =)

копия документа 000000001

Процедура ПередОткрытием(Отказ, СтандартнаяОбработка)

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

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

Более правильный вид кода

Издеваетесь? Вы или вопрос не читали, или поняли его как хотели, или еще очень далеки от программирования... (или сильно погрузли в 7.7)

    ТекущаяСтрока = ЭлементыФормы.ТабличнаяЧасть1.ТекущиеДанные;
    Если ЗначениеЗаполнено(ТекущаяСтрока.НазваниеКолонкиСРеквизитомДокумента.Ссылка) Тогда
        НовыйДокумент = ТекущаяСтрока.НазваниеКолонкиСРеквизитомДокумента.Ссылка.Скопировать();
        // если надо просто создать документ
        НовыйДокумент.Записать();
        // если надо открыть форму
        ОткрытьЗначение(НовыйДокумент);
    КонецЕсли;

p.s. названия реквизитов замените на свои

этот код вводить в какой процедуре?

Если честно, этот код лучше никуда не вводить.

Ну человек попросил... у себя я проверил нормально работает ! =)
Если вы считаете что он не коректен предложите свой вариант решения проблемы человека... а не дискридитируйте чужие предложения !

Не в обиду было сказано. Просто этот код некорректен. Да и logist же предложил код.

Вообще-то я предложил свой вариант, я ж не виноват, что вы читать не умеете


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