Поскажите плизззз...есть обработка движения по регистрам...как делать чтобы еще и табличная часть документа печаталась, меня интересует номенкатура

Буду очень признателен.

Выучить русский, прочитать учебник логики Челпанов Г. И., задать вопрос.

ок

(1) Русский? Шутник...

(0) Воспользуйся мастером запросов и не страдай :)

Процедура Сформировать()
   Перем Запрос, ТекстЗапроса, Таб;
   //Создание объекта типа Запрос
   Запрос = СоздатьОбъект("Запрос");
   ТекстЗапроса =
   "//{{ЗАПРОС(Сформировать)
   |Период с (ТекущаяДата()) по (ТекущаяДата());
   |Обрабатывать НеПомеченныеНаУдаление;
   |Реализация = Документ.Реализация.ТекущийДокумент;
   |Функция РеализацияКурсСумма = Сумма(Реализация.Курс);
   |"//}}ЗАПРОС
   ;
   // Если ошибка в запросе, то выход из процедуры
   Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
       Возврат;
   КонецЕсли;

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

ни чего не получается :(

Пока Запрос.Группировка("Реализация") = 1 Цикл      
       
       Стр = "";      
       ДокР = Запрос.Реализация;  
       Рег=СоздатьОбъект("Регистр.ОстаткиТМЦ");
       Док = СоздатьОбъект("Документ") ;
       Если (Рег.ВыбратьДвиженияДокумента(ДокР)=1)   Тогда
       ДокР.ВыбратьСтроки();
       Пока ДокР.ПолучитьСтроку() = 1 Цикл    
           Разм1=Рег.Номенклатура.Наименование;
           Стр = Стр +ДокР.Номенклатура.Наименование+" " + ДокР.Количество+Разм1;
       КонецЦикла;
       Сообщить( " " + Стр);
       КонецЕсли;
   КонецЦикла;
КонецПроцедуры

Подскажите почему не выводится ни чего по регистрам:(((

Смелая трактовка...

(7) Перебираешь строки документа, а не движения регистра

Пока Рег.ПолучитьДвижение() = 1
...

Либо если привязан номер строки - искать в движениях по Рег.НомерСтроки() строку документа

(9) в запросе нет группировок

Не могу понять :(

у меня две строки в документе 1 и 2, а по регистрам они меняться местами.

Как мне тоже привязать строку в документе и регистр.


Процедура Сформировать()
       Перем Запрос, ТекстЗапроса, Таб, Стр;
   //Создание объекта типа Запрос
   Запрос = СоздатьОбъект("Запрос");
   ТекстЗапроса =
   "//{{ЗАПРОС(НайтиДоки)
  |Период с НачДата по КонДата;
   |Обрабатывать НеПомеченныеНаУдаление;
   |НомерДок = Документ.Реализация.НомерДок;
   |Реализация = Документ.Реализация.ТекущийДокумент;
   |Группировка Реализация;
   |"//}}ЗАПРОС
   ;
   Если Запрос.Выполнить(ТекстЗапроса) = 0 Тогда
       Возврат;
   КонецЕсли;
   
   Пока Запрос.Группировка("Реализация") = 1 Цикл      
       Стр = "";      
       ДокР = Запрос.Реализация;
       Рег=СоздатьОбъект("Регистр.ОстаткиТМЦ");
       ДокР.ВыбратьСтроки();
       Если (ДокР.ПолучитьСтроку() = 1)    Тогда  
           Если (Рег.ВыбратьДвиженияДокумента(ДокР)=1) или (Рег.НомерСтроки()=1)  или (Рег.ПолучитьДвижение()=1)  Тогда
           Разм1=Рег.Количество;                            
           Раз=ДокР.Количество;    
           Стр = Стр +ДокР.Номенклатура.Наименование+" " + Раз+"="+Разм1;  
           Опа =  Разм1 -  ДокР.Количество;
       КонецЕсли;    
    КонецЕсли;

Если   Опа <> 0 Тогда  
         Сообщить( ДокР.Номенклатура.Наименование+" регистр ОстаткиТМЦ = "+Разм1+", количество в док. = "+ДокР.Количество+ " раздница = " +Опа+" "+ ДокР.НомерДок);            
КонецЕсли;  

    КонецЦикла;
    КонецПроцедуры

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

Значит ни как нельзя привязать?

(13) Можно.

Подскажите пожалуйста :((( я просто уже день мучаюсь

(15)
1. Правильно - как указано в (12).
2. Тупо - перебор строк документа -> Поиск (тем же перебором) в движениях регистра.

у меня с циклами полная беда :(

(13) если движения регистра пишутся один-в один, то привязывай номерСтрики в регистре (есть соответствующий метод)

при переборе движений регистра НомерСтроки регистра будет соответствовать НомерСтроки документа.. наслаждайся

Ты выбрал движения по регистру а циклом их перебирать кто за тебя будет

(18) подскажите плиз этот метод

(17)
ДокР.ВыбратьСтроки();
Пока (ДокР.ПолучитьСтроку() = 1) Цикл
   Рег.ВыбратьДвиженияДокумента(ДокР);
   Пока Рег.ПолучитьДвижение()=1 Цикл
       Если Рег.Номенклатура = ДокР.Номенклатура Тогда
           Сообщить("Ур-я-я-я-я. Нашли соответствие");
           Прервать;
       КонецЕсли;
   КонецЦикла;
КонецЦикла;

Попробуй сделать не запросом, а тупым перебором документов в цикле. Это может быть проще в твоем случае.
Напиши что-то типа:

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

(20) ПривязыватьСтроку.

Просто строка должна была быть привязана еще в проведении документа теперь уще поздно пить боржоми.
и это неработает для документов с к-вом строк больше 9999

Если строки небыли заранее привязаны то перебор всех движений с условием док.товар=рег.товар может еще кво добавить или еще что

(24) это ограничение только для  дбф, где linno число в 4 знака.