Заказы на доработку 1С (сервис удаленной работы)

Хранилище

База знаний
Бесплатные отчеты, обработки, конфигурации, внешние компоненты для 1С Статьи, описание работы, методики по работе с 1С

Здравствуйте, гость ( Вход | Зарегистрироваться )



> Отчет по двум запросам , Сформировать отчет по двум запросам 2 страниц V   1 2 >          
ranis Подменю пользователя
сообщение 07.11.17, 12:38
Сообщение #1

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

Нужно сформировать отчет по двум запросам.
При формировании отчета, не выводит данные первого запроса, а со вторым всё в порядке. Подскажите пожалуйста, в чем ошибка(В 7.7 работаю не давно, больше опыта в 8)


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

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

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


Сообщение отредактировал Vofka - 07.11.17, 13:00

Flexy Подменю пользователя
сообщение 07.11.17, 12:55
Сообщение #2

Танцор с Бубном
Иконка группы
Группа: Местный
Сообщений: 1121
Из: Днепра
Спасибо сказали: 230 раз
Рейтинг: 0

Табличный документ - переменная "Таб". Перезаписывается, после первого запроса. Она же и выводиться последней.
Таб.ВывестиСекцию("Итого"); 
...
Таб = СоздатьОбъект("Таблица");


Сообщение отредактировал Flexy - 07.11.17, 12:55

Спасибо сказали: ranis,

ranis Подменю пользователя
сообщение 07.11.17, 13:01
Сообщение #3

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

Flexy @ Сегодня, 13:55 * ,
И что сделать?

Flexy Подменю пользователя
сообщение 07.11.17, 13:15
Сообщение #4

Танцор с Бубном
Иконка группы
Группа: Местный
Сообщений: 1121
Из: Днепра
Спасибо сказали: 230 раз
Рейтинг: 0

Цитата(ranis @ 07.11.17, 13:01) *
И что сделать?

Выводить в одну таблицу два отчета:
Таб = СоздатьОбъект("ТабличныйДокумент");
//Вывод первого отчета
// Вывод второго отчета
Таб.Показать();

Или в разные шаблоны:
Таб = СоздатьОбъект("ТабличныйДокумент");
Таб.ИсходнаяТаблица("Отчет_1");
// Вывод отчета
Таб.Показать();
Таб = СоздатьОбъект("ТабличныйДокумент");
Таб.ИсходнаяТаблица("Отчет_2");
// Вывод второго отчета в другой шаблон
Таб.Показать();

Спасибо сказали: ranis,

ranis Подменю пользователя
сообщение 07.11.17, 13:17
Сообщение #5

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

Flexy @ Сегодня, 14:15 * ,
Суть в том что в 1 таблице одно условие, во второй таблице другое условие. В этом и проблема

Flexy Подменю пользователя
сообщение 07.11.17, 13:23
Сообщение #6

Танцор с Бубном
Иконка группы
Группа: Местный
Сообщений: 1121
Из: Днепра
Спасибо сказали: 230 раз
Рейтинг: 0

Цитата(ranis @ 07.11.17, 13:17) *
Суть в том что в 1 таблице одно условие, во второй таблице другое условие. В этом и проблема

Сделайте одним запросом
СписокУсловий = СоздатьОбъект("СписокЗначений");
СписокУсловий.Добавить(Расчет1);
СписокУсловий.Добавить(Расчет2);
ТекстЗапроса="
...
|Условие(Расчет В СписокУсловий );

ranis Подменю пользователя
сообщение 07.11.17, 13:46
Сообщение #7

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

ranis @ Сегодня, 14:17 * ,

Вот диалоговое окно


Вот так должно сформироваться


Так формируется



 ! 

Правила: 8, в следующий раз картинки удалю
 


Flexy @ Сегодня, 14:23 * ,
Похоже я совсем не умею описывать. Нужно по одному документу создать отчет. Есть два отбора "Удержание " и "Доплата". К примеру ставим удержание 25 и Произвольную доплату 50. В одной таблице нужно вывести данные по отбору Удержание, во второй таблице по отбору Доплата. И это всё должно быть в одном отчетеFlexy @ Сегодня, 14:23 * ,


Flexy @ Сегодня, 14:23 * ,
Получается надо получить 2 таблицы. С разными отборами

Сообщение отредактировал Vofka - 07.11.17, 13:36

ranis Подменю пользователя
сообщение 08.11.17, 8:35
Сообщение #8

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

Актуально sad.gif

salton Подменю пользователя
сообщение 08.11.17, 10:23
Сообщение #9

Говорящий
***
Группа: Пользователи
Сообщений: 92
Из: Полтава
Спасибо сказали: 24 раз
Рейтинг: 0

ranis, измените макет таким образом, чтобы у Вас секции Итого1, ДатаДок1, Расчет1 итд были вертикальными.
И при обходе результата второго запроса используйте метод ПрисоединитьСекцию().

Как пишет помощник: "В выражении можно задавать имена двух секций, разделенных знаком ''|''. При этом будет получена область исходной таблицы, являющаяся пересечением первой и второй указанных секций. При этом одна секция может быть горизонтальной (состоять из строк), а другая - вертикальной (состоять из колонок). В результате получится прямоугольная область таблицы."

Спасибо сказали: ranis,

ranis Подменю пользователя
сообщение 08.11.17, 12:37
Сообщение #10

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

salton @ Сегодня, 11:23 * ,
Не то

salton Подменю пользователя
сообщение 08.11.17, 13:03
Сообщение #11

Говорящий
***
Группа: Пользователи
Сообщений: 92
Из: Полтава
Спасибо сказали: 24 раз
Рейтинг: 0

Цитата(ranis @ 08.11.17, 12:37) *
Не то

Что не то?
Используя ПрисоединитьСекцию() можно выводить в одну строку две разных колонки.
Если Вам не нравиться так - делайте одним запросом как подсказал Flexy, и в обходе результата выводите одну строку/секцию для обеих таблиц сразу.

ranis Подменю пользователя
сообщение 08.11.17, 13:29
Сообщение #12

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

salton @ Сегодня, 14:03 * ,
Пробывал присоединяя, тоже пустые строчки выходят. Один запрос не проходит, т.к по одному докменту нужно вывести 2 отчета для сравнения. В одном условие один рассчет, в другом другой. Таблицы с данными должн быть параллельные

sava1 Подменю пользователя
сообщение 08.11.17, 13:36
Сообщение #13

Живет на форуме
Иконка группы
Группа: Местный
Сообщений: 2684
Из: Проскуров
Спасибо сказали: 678 раз
Рейтинг: 656.7

Выгрузите результат в тз.
Цикл по первой тз
вторая - получитьстрокупономеру (номер строки первой тз)
выводим первую часть
присоединяем вторую

ranis Подменю пользователя
сообщение 09.11.17, 7:03
Сообщение #14

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

актуально

nysysimara Подменю пользователя
сообщение 09.11.17, 8:54
Сообщение #15

Оратор
Иконка группы
Группа: Местный
Сообщений: 312
Из: Бердянск
Спасибо сказали: 110 раз
Рейтинг: 0

во-первых, не понимаю этой формулы:
 СкидкаКДоходамДляСтраховыхВзносов-СкидкаКДоходамДляСтраховыхВзносов+Число(Величина)

ведь: (а - а) + в = 0 + в

во-вторых, предлагаю вам все-таки написать один запрос,

в-третьих, если "Таблицы с данными должн быть параллельные", а запроса остается все-таки два, то скидываете результаты в общую таблицу и сворачивайте


Signature
1С Предприятие 7.7: Бух. учет для Украины (активно дописанная) + самописка (учет производства и ЗП)
1С Предприятие 8.3: Бух.предприятия 3.0 + самописка
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
Кроме высшего образования, нужно иметь хотя бы среднее соображение

ranis Подменю пользователя
сообщение 09.11.17, 9:20
Сообщение #16

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

nysysimara @ Сегодня, 9:54 * ,
1) Величина тип "Неопределенный", а для суммирование как раз та и нужно сделать.
2) Если делать одним запросом, то я не представляю, как объеденить существующие запросы
3) Я не имею представления как работать с таблицами значений

nysysimara Подменю пользователя
сообщение 09.11.17, 10:26
Сообщение #17

Оратор
Иконка группы
Группа: Местный
Сообщений: 312
Из: Бердянск
Спасибо сказали: 110 раз
Рейтинг: 0

ranis @ Сегодня, 9:20 * ,
тогда вам в стол заказов

Спасибо сказали: ranis,

ranis Подменю пользователя
сообщение 09.11.17, 12:08
Сообщение #18

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

nysysimara @ Сегодня, 11:26 * ,
Мне лучше научиться. жаль нет методичек

nysysimara Подменю пользователя
сообщение 09.11.17, 13:35
Сообщение #19

Оратор
Иконка группы
Группа: Местный
Сообщений: 312
Из: Бердянск
Спасибо сказали: 110 раз
Рейтинг: 0

Таблицы обязательно должны быть параллельные?

Нужны ли строки с итоговыми значениями по Дате и по Расчету?

Спасибо сказали: ranis,

ranis Подменю пользователя
сообщение 09.11.17, 14:19
Сообщение #20

Общительный
**
Группа: Пользователи
Сообщений: 18
Спасибо сказали: 0 раз
Рейтинг: 0

nysysimara @ Сегодня, 14:35 * ,
//*******************************************
// Процедура генерации запроса Сформировать.
//
Процедура Сформировать()
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос    
        
  
ТЗ=СоздатьОбъект("ТаблицаЗначений");
ТЗ.КоличествоКолонок(10);//сколько надо    

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

Пока Для й=1 по Результат1.КоличествоСтрок() Цикл //1
Если й>ТЗ.КоличествоСтрок() Тогда
//в 1 результате вдруг больше строк чем уже есть в ТЗ
ТЗ.НоваяСтрока();
КонецЕсли;

ТЗ.НоваяСтрока();
ТЗ.УстановитьЗначение(й,1,Итого);
ТЗ.УстановитьЗначение(й,2,Расчет);
ТЗ.УстановитьЗначение(й,3,НомерДок);
ТЗ.УстановитьЗначение(й,4,ДатаДок);
КонецЦикла;


////////////////////////////////////////////////////////2222222
Для й=1 по Результат2.КоличествоСтрок() Цикл //2
Если й>ТЗ.КоличествоСтрок() Тогда
//во 2 результате вдруг больше строк чем уже есть в ТЗ
ТЗ.НоваяСтрока();
КонецЕсли;
ТЗ.УстановитьЗначение(й,1,Итого1);
ТЗ.УстановитьЗначение(й,2,Расчет1);
ТЗ.УстановитьЗначение(й,3,НомерДок1);
ТЗ.УстановитьЗначение(й,4,ДатаДок1);
//и т.д.

//

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

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

// Заполнение полей Расчет
Таб.ВывестиСекцию("Расчет");

// Заполнение полей НомерДок
Таб.ВывестиСекцию("НомерДок");

КонецЦикла;

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

nysysimara @ Сегодня, 14:35 * ,
Таблицы обязательно нужны параллельные, где есть столбцы дата, расчет, и сумма

Точнее вот так
Процедура Сформировать() 
Перем Запрос, ТекстЗапроса, Таб;
//Создание объекта типа Запрос    
        
  
ТЗ=СоздатьОбъект("ТаблицаЗначений");
ТЗ.КоличествоКолонок(10);//сколько надо    

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

; Пока Для й=1 по Запрос3.КоличествоСтрок() Цикл //1
Если й>ТЗ.КоличествоСтрок() Тогда
//в 1 результате вдруг больше строк чем уже есть в ТЗ
ТЗ.НоваяСтрока();
КонецЕсли;

ТЗ.НоваяСтрока();
ТЗ.УстановитьЗначение(й,1,Итого);
ТЗ.УстановитьЗначение(й,2,Расчет);
ТЗ.УстановитьЗначение(й,3,НомерДок);
ТЗ.УстановитьЗначение(й,4,ДатаДок);
КонецЦикла;

                                


////////////////////////////////////////////////////////2222222


//

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

Для й=1 по Запрос1.КоличествоСтрок() Цикл //2
Если й>ТЗ.КоличествоСтрок() Тогда
//во 2 результате вдруг больше строк чем уже есть в ТЗ
ТЗ.НоваяСтрока();
КонецЕсли;
ТЗ.УстановитьЗначение(й,1,Итого1);
ТЗ.УстановитьЗначение(й,2,Расчет1);
ТЗ.УстановитьЗначение(й,3,НомерДок1);
ТЗ.УстановитьЗначение(й,4,ДатаДок1);
//и т.д.

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

// Заполнение полей Расчет
Таб.ВывестиСекцию("Расчет");

// Заполнение полей НомерДок
Таб.ВывестиСекцию("НомерДок");

КонецЦикла;

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

Не нашли ответа на свой вопрос?
Зарегистрируйтесь и задайте новый вопрос.


2 страниц V   1 2 >
Ответить Новая тема
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 

RSS Текстовая версия Сейчас: 28.03.24, 16:51
1С Предприятие 8.3, 1С Предприятие 8.2, 1С Предприятие 8.1, 1С Предприятие 8.0, 1С Предприятие 7.7, Литература 1С, Общие вопросы по администрированию 1С, Методическая поддержка 1С - всё в одном месте: на Украинском 1С форуме!