Имя: Пароль:
1C
1С v8
Как вывести данные в одной строке СКД
0 reznik911
 
14.01.14
14:40
на закладке Ресурсы :
Поле ДатаДиска - Выражение Выбор Когда ЗначениеЗаполнено(Сумма(КоличествоНеОтгруженных)) Тогда СоединитьСтроки(Формат(ДатаДиска, "ДФ=MM.yy"),",") Иначе "" Конец ;
  
Поле КоличествоНеОтгруженных  - Выражение Сумма(КоличествоНеОтгруженных) ;
  
Поле ДатаДиска - Выражение Null , Расчитывать по ... Общий итог
  
В Настройках отчета :
  
вывод виде группировки по всем полям
1 reznik911
 
14.01.14
14:41
ВЫБРАТЬ
       ИТС_ПодпискиСрезПоследних.Организация,
       ИТС_ПодпискиСрезПоследних.Контрагент КАК Контрагент,
       ИТС_ПодпискиСрезПоследних.ВидПодписки,
       ИТС_ПодпискиСрезПоследних.ДатаНачала,
       ИТС_ПодпискиСрезПоследних.ДатаЗавершения,
       ИТС_ПодпискиСрезПоследних.Контрагент.ОсновноеКонтактноеЛицо,
       ИТС_ПодпискиСрезПоследних.СостояниеЗаявки,
       ИТС_ПодпискиСрезПоследних.Заявка.РегНомер КАК РегистрационныйНомер,
       ИТС_ПодпискиСрезПоследних.Заявка
ПОМЕСТИТЬ ВТ_ИТСПодпискиСрезПоследних
ИЗ
       РегистрСведений.ИТС_Подписки.СрезПоследних(&Дата, Организация = &Организация) КАК ИТС_ПодпискиСрезПоследних

ИНДЕКСИРОВАТЬ ПО
       Контрагент
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
       ВТ_ИТСПодпискиСрезПоследних.Организация,
       ВТ_ИТСПодпискиСрезПоследних.Контрагент,
       ВТ_ИТСПодпискиСрезПоследних.ВидПодписки,
       ВТ_ИТСПодпискиСрезПоследних.ДатаНачала,
       ВТ_ИТСПодпискиСрезПоследних.ДатаЗавершения,
       МАКСИМУМ(ВЫБОР
                   КОГДА НЕ ЕСТЬNULL(КонтактнаяИнформация.Поле6, "") = ""
                         ТОГДА "Ул. " + КонтактнаяИнформация.Поле6 + ВЫБОР
                    КОГДА НЕ ЕСТЬNULL(КонтактнаяИнформация.Поле7, "") = ""
                    ТОГДА ", Дом " + КонтактнаяИнформация.Поле7 + ВЫБОР
                    КОГДА НЕ ЕСТЬNULL(КонтактнаяИнформация.Поле8, "") = ""
                    ТОГДА ", " + КонтактнаяИнформация.Поле8 + ВЫБОР
                    КОГДА НЕ ЕСТЬNULL(КонтактнаяИнформация.Поле9, "") = ""
                    ТОГДА ", " + КонтактнаяИнформация.Поле9
                    ИНАЧЕ ""
                    КОНЕЦ
                    ИНАЧЕ ""
                    КОНЕЦ
                    ИНАЧЕ ""
                    КОНЕЦ
                   ИНАЧЕ ""
             КОНЕЦ) КАК Адрес,
       МАКСИМУМ(КонтактнаяИнформация.Поле3) КАК Телефон,
       ВТ_ИТСПодпискиСрезПоследних.Контрагент.ОсновноеКонтактноеЛицо,
       ВТ_ИТСПодпискиСрезПоследних.СостояниеЗаявки,
       ВТ_ИТСПодпискиСрезПоследних.Заявка.РегНомер КАК РегистрационныйНомер,
       ВТ_ИТСПодпискиСрезПоследних.Заявка КАК Заявка
ПОМЕСТИТЬ ПодпискиИТС
ИЗ
       ВТ_ИТСПодпискиСрезПоследних КАК ВТ_ИТСПодпискиСрезПоследних
             ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация
             ПО (ВТ_ИТСПодпискиСрезПоследних.Контрагент = (ВЫРАЗИТЬ(КонтактнаяИнформация.Объект КАК Справочник.Контрагенты)))
                   И (КонтактнаяИнформация.Вид В (ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ЮрАдресКонтрагента), ЗНАЧЕНИЕ(Справочник.ВидыКонтактнойИнформации.ТелефонКонтрагента)))

СГРУППИРОВАТЬ ПО
       ВТ_ИТСПодпискиСрезПоследних.ВидПодписки,
       ВТ_ИТСПодпискиСрезПоследних.Организация,
       ВТ_ИТСПодпискиСрезПоследних.Контрагент,
       ВТ_ИТСПодпискиСрезПоследних.ДатаНачала,
       ВТ_ИТСПодпискиСрезПоследних.ДатаЗавершения,
       ВТ_ИТСПодпискиСрезПоследних.СостояниеЗаявки,
       ВТ_ИТСПодпискиСрезПоследних.Заявка,
       ВТ_ИТСПодпискиСрезПоследних.Контрагент.ОсновноеКонтактноеЛицо,
       ВТ_ИТСПодпискиСрезПоследних.Заявка.РегНомер

ИНДЕКСИРОВАТЬ ПО
       Заявка
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
       ИТС_ДискиСрезПоследних.Заявка КАК Заявка,
       СУММА(ВЫБОР
                   КОГДА ИТС_ДискиСрезПоследних.СостояниеДиска = ЗНАЧЕНИЕ(Перечисление.ИТС_ВидыСостоянийДисков.Получен)
                         ТОГДА 1
             КОНЕЦ) КАК КоличествоНеОтгруженных,
       ДОБАВИТЬКДАТЕ(ИТС_ДискиСрезПоследних.Заявка.ДатаНачала, МЕСЯЦ, ИТС_ДискиСрезПоследних.Заявка.ВидПодписки.Периодичность * (ИТС_ДискиСрезПоследних.НомерПериода - 1)) КАК ДатаДиска
ПОМЕСТИТЬ ДискиИТС
ИЗ
       РегистрСведений.ИТС_Диски.СрезПоследних КАК ИТС_ДискиСрезПоследних

СГРУППИРОВАТЬ ПО
       ИТС_ДискиСрезПоследних.Заявка,
       ДОБАВИТЬКДАТЕ(ИТС_ДискиСрезПоследних.Заявка.ДатаНачала, МЕСЯЦ, ИТС_ДискиСрезПоследних.Заявка.ВидПодписки.Периодичность * (ИТС_ДискиСрезПоследних.НомерПериода - 1))

ИНДЕКСИРОВАТЬ ПО
       Заявка
;

////////////////////////////////////////////////////////////////////////////////
ВЫБРАТЬ
       ПодпискиИТС.Организация,
       ПодпискиИТС.Контрагент,
       ПодпискиИТС.ВидПодписки,
       ПодпискиИТС.ДатаНачала,
       ПодпискиИТС.ДатаЗавершения,
       ПодпискиИТС.Адрес,
       ПодпискиИТС.Телефон,
       ПодпискиИТС.КонтрагентОсновноеКонтактноеЛицо,
       ПодпискиИТС.СостояниеЗаявки,
       ПодпискиИТС.РегистрационныйНомер,
       ДискиИТС.КоличествоНеОтгруженных,
       ДискиИТС.ДатаДиска
ИЗ
       ПодпискиИТС КАК ПодпискиИТС
             ЛЕВОЕ СОЕДИНЕНИЕ ДискиИТС КАК ДискиИТС
             ПО ПодпискиИТС.Заявка = ДискиИТС.Заявка
2 reznik911
 
14.01.14
15:10
алле да что ж это такое
3 reznik911
 
14.01.14
15:36
пробовал через СоединитьСтроки сделать что то не так он формирует
4 reznik911
 
14.01.14
15:36
за основу взят регистр сведений
5 reznik911
 
14.01.14
15:47
тот же запрос вывод детальные записи без ресурсов выводит правильно
6 reznik911
 
14.01.14
15:57
пошаманил в ресурсах кое че получается но не то
7 reznik911
 
14.01.14
15:58
может в группировках че нить изменить или в ресурсах цикл изменить?
8 reznik911
 
14.01.14
17:44
может кто то посоветует че а то сам собой разговоариваю
AdBlock убивает бесплатный контент. 1Сергей