Помогите с кодом отчета

[Яна93]

Добрый день! Возникла необходимость в создании нового внешнего отчета..у меня получилось составить диалоговую форму в которой буду вибирать дату начала и дату конца периода и выбор экспедитора..ну так вот..необходимо по выбранному экспедитору составить процедуру при которой будут выводится сумма реализации. В общем должна происходить проверка по маршрутным листам данного экспедитора..у которых в трабличной части в Реализации будет цифра 1 колонке НФ (НалФакт) она находится в шапке Реализации..конфигурация 1с 7.7 торговля и склад..

[Яна93]

вот немного набросала..может подскажет кто...правильно ли я делаю...
Процедура Сформировать()
   ОбщСумма=0;
   Таб=СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");
    Док=СоздатьОбъект("Документ.МаршрутныйЛиста");
   Док.ВыбратьДокументы(ДатаНачала,ДатаКонца);
    Таб.ВывестиСекцию("Заголовок");
    Таб.ВывестиСекцию("Шапка");
   Пока Док.ПолучитьДокумент()=1 Цикл
      Если Док.Экспедитор=Экспедитор Тогда 

[sergejK74]

До этого места все почти правильно. Но конструктором запроса будет быстрее

[Яна93]

До этого места все почти правильно. Но конструктором запроса будет быстрее

Конструктором я не умею.. а вот в коде не совсем еще понимаю..по обрывкам в интернете ищу...и собираю свой код..только пока в ступоре..не знаю как дальше...

[sergejK74]

Сумма = Док.Итог("Сумма"); ?????????????
ОбщСумма = ОбщСумма+сумма;
Таб.ВывестиСекцию("строка");
конецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Итого");
Таб.Показать();

[Яна93]

Сумма = Док.Итог("Сумма"); ?????????????
ОбщСумма = ОбщСумма+сумма;
Таб.ВывестиСекцию("строка");
конецЕсли;
КонецЦикла;
Таб.ВывестиСекцию("Итого");
Таб.Показать();

Сергей, стисняюсь спросить..что означают знаки вопросов?

[Яна93]

Спасибо Сергей за помощь! Вот мой окончательный вариант..я убрала сортировку по Экспедиторам..
Процедура Сформировать()
   ОбщСумма=0;
   Таб=СоздатьОбъект("Таблица");
   Таб.ИсходнаяТаблица("Таблица");
    Док=СоздатьОбъект("Документ.МаршрутныйЛист");
   Док.ВыбратьДокументы(ДатаНачала,ДатаКонца);
    Таб.ВывестиСекцию("Заголовок");
   Таб.ВывестиСекцию("Шапка");
   Пока Док.ПолучитьДокумент()=1 Цикл
   
      
         Док.ВыбратьСтроки();
         Пока Док.ПолучитьСтроку()=1 Цикл
            Если Док.ДокОтгрузки.Нф=1 Тогда
               Сумма = Док.ДокОтгрузки.Итог("Сумма");
               ОбщСумма = ОбщСумма+сумма;   
               Эксп=Док.ЭкспедиторСТР;
               Таб.ВывестиСекцию("строка");
            КонецЕСли;
         КонецЦикла;

   
   КонецЦикла;
   Таб.ВывестиСекцию("Итого");   
   ТАб.ТолькоПросмотр(1);
   Таб.Показать();
   

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