Имя: Пароль:
1C
 
Количество дней просроченной дебиторской задолженности УТ 10.3
0 Chungachkuk
 
13.09.15
20:52
Добрый вечер!
Может быть эту тему уже поднимали, но у мне необходимо программно узнать самое большое кол-во дней просроченной задолженности по определенному контрагенту от текущей даты. Знаю, что надо будет обращаться к регистру накопления "Взаиморасчеты с контрагентами", но там выдаётся только общая задолженность. Как вычислить кол-во дней с самой давней просрочки? Сильно не пинайте, т.к. только начинаю постигать эту область. Спасибо!
1 Джинн
 
13.09.15
20:59
Взаиморасчеты по документам расчетов?
2 Chungachkuk
 
13.09.15
22:40
(1) Да
3 Maxwell198705
 
14.09.15
09:21
Партионный учёт включен?
4 kerm
 
14.09.15
09:28
Запрос.Текст = "ВЫБРАТЬ
                   |    СУММА(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.СуммаВзаиморасчетовКонечныйОстаток) КАК СуммаВзаиморасчетовКонечныйОстаток,
                   |    СУММА(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.СуммаВзаиморасчетовРасход) КАК СуммаВзаиморасчетовРасход,
                   |    СУММА(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.СуммаВзаиморасчетовПриход) КАК СуммаВзаиморасчетовПриход,
                   |    СУММА(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.СуммаВзаиморасчетовНачальныйОстаток) КАК СуммаВзаиморасчетовНачальныйОстаток,
                   |    ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.Контрагент КАК Контрагент,
                   |    МАКСИМУМ(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.ПериодДень) КАК ПериодДень,
                   |    МАКСИМУМ(РАЗНОСТЬДАТ(НАЧАЛОПЕРИОДА(ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.ПериодДень, ДЕНЬ), &ТекДень, ДЕНЬ)) КАК Дни,
                   |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.Регистратор) КАК Регистратор,
                   |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.ДоговорКонтрагента) КАК ДоговорКонтрагента,
                   |    КОЛИЧЕСТВО(РАЗЛИЧНЫЕ ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.Сделка) КАК Сделка
                   |ИЗ
                   |    РегистрНакопления.ВзаиморасчетыСКонтрагентами.ОстаткиИОбороты(
                   |            &НачПериод,
                   |            &ТекДень,
                   |            Авто,
                   |            Движения,
                   |            ДоговорКонтрагента В
                   |                (ВЫБРАТЬ
                   |                    ВзаиморасчетыСКонтрагентамиОстатки.ДоговорКонтрагента
                   |                ИЗ
                   |                    РегистрНакопления.ВзаиморасчетыСКонтрагентами.Остатки(&ТекДень, ) КАК ВзаиморасчетыСКонтрагентамиОстатки
                   |                ГДЕ
                   |                    ВзаиморасчетыСКонтрагентамиОстатки.ДоговорКонтрагента.ВидДоговора В (&ВидДоговора)
                   |                    И ВзаиморасчетыСКонтрагентамиОстатки.СуммаВзаиморасчетовОстаток > 100)) КАК ВзаиморасчетыСКонтрагентамиОстаткиИОбороты
                   |ГДЕ
                   |    ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.ДоговорКонтрагента.ВидДоговора В(&ВидДоговора)
                   |    И ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.Контрагент.Регион В(&СписРегионов)
                   |
                   |СГРУППИРОВАТЬ ПО
                   |    ВзаиморасчетыСКонтрагентамиОстаткиИОбороты.Контрагент
                   |
                   |УПОРЯДОЧИТЬ ПО
                   |    Контрагент
                   |АВТОУПОРЯДОЧИВАНИЕ";

    Запрос.УстановитьПараметр("НачПериод",ДобавитьМесяц(Дата,-36));
    Запрос.УстановитьПараметр("ТекДень",КонецДня(Дата));
        
    мВидДоговора = новый списокзначений;
    мВидДоговора.Добавить(Перечисления.ВидыДоговоровКонтрагентов.СПокупателем);

    
    Запрос.УстановитьПараметр("ВидДоговора",мВидДоговора);
5 kerm
 
14.09.15
09:30
Смотрю кто больше ста рублей должен.
6 Chungachkuk
 
14.09.15
11:35
(3) Да, включен
7 Chungachkuk
 
14.09.15
14:01
(4) Спасибо за код, очень помог)
8 Maniac
 
14.09.15
14:02
Бесплатно дарю
http://subsystems.ru/catalog/program=134/
9 Chungachkuk
 
14.09.15
14:43
(8) Всегда знал, что миста очень хороший форум, но сегодня меня прям осыпали золотом)) Спасибо, уважаемые!