Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
18 сен 2021, 01:37

Вывести фамилию имя и отчество а так же паспортные данные.

Автор Торнадич, 09 дек 2016, 12:06

0 Пользователей и 1 гость просматривают эту тему.

Торнадич

Доброго времени суток!
Подскажите пожалуйста, как вывести фамилию имя и отчество а так же паспортные данные?

ТабДокумент = Новый ТабличныйДокумент;
   ИтоговаяСумма = 0;
   Макет = ПолучитьМакет("ВедомостьПоПеречислениюЗПНаПК");
   Обл   = Макет.ПолучитьОбласть("Заголовок");
   
   Обл.Параметры.ДатаФормирования= Формат(Платеж.Дата, "ДЛФ=Д");
   Обл.Параметры.НаименованиеОрганизации= "" + Платеж.Организация;
   
   ТабДокумент.Вывести(Обл);
   
   Для каждого Ведомость ИЗ Ведомости Цикл
      
      ЗапросПоВедомости = Новый Запрос;
      ЗапросПоВедомости.Текст =
      "ВЫБРАТЬ
      |   ЗарплатаКВыплатеОрганизацийЗарплата.Физлицо.Наименование КАК Наименование,
      |   ЗарплатаКВыплатеОрганизацийЗарплата.Сумма + ЗарплатаКВыплатеОрганизацийЗарплата.КомпенсацияЗаЗадержкуЗарплаты КАК Сумма,
      |   ЛицевыеСчетаРаботниковОрганизации.НомерЛицевогоСчета КАК НомерЛицевогоСчета
      |ИЗ
      |   Документ.ЗарплатаКВыплатеОрганизаций.Зарплата КАК ЗарплатаКВыплатеОрганизацийЗарплата
      |      ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЛицевыеСчетаРаботниковОрганизации КАК ЛицевыеСчетаРаботниковОрганизации
      |      ПО (ЛицевыеСчетаРаботниковОрганизации.ФизЛицо = ЗарплатаКВыплатеОрганизацийЗарплата.Физлицо)
      |         И (ЛицевыеСчетаРаботниковОрганизации.Организация = &Организация)
      |         И (ЛицевыеСчетаРаботниковОрганизации.Банк = &Банк)
      |ГДЕ
      |   ЗарплатаКВыплатеОрганизацийЗарплата.Ссылка = &Ссылка";

      
      
      ЗапросПоВедомости.УстановитьПараметр("Ссылка", Ведомость);
      ЗапросПоВедомости.УстановитьПараметр("Организация", Платеж.Организация);
      ЗапросПоВедомости.УстановитьПараметр("Банк", Платеж.Банк);
      
      ВыборкаФизЛиц = ЗапросПоВедомости.Выполнить().Выбрать();
            
      Пока ВыборкаФизЛиц.Следующий() Цикл
      
         Обл   = Макет.ПолучитьОбласть("СтрокаВыплаты");
         
         // заполняем данные физ лица
         Обл.Параметры.ФИОСотрудника = ВыборкаФизЛиц.Наименование;
         Обл.Параметры.Сумма = ВыборкаФизЛиц.Сумма;
         Обл.Параметры.ЛицевойСчет = ВыборкаФизЛиц.НомерЛицевогоСчета;
                        
         ИтоговаяСумма = ИтоговаяСумма + ВыборкаФизЛиц.Сумма;
         // заполняем лицевой счет
         
         ТабДокумент.Вывести(Обл);
      
      КонецЦикла;

Теги:

Похожие темы (5)

Рейтинг@Mail.ru Rambler's Top100

Поиск