Суммировать количество

@Ermak27 · Регистрация: 16.01.2013

Author24 — интернет-сервис помощи студентам

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

1C

    Фильтр = Новый Структура();     
    Фильтр.Вставить("Маршрут",Маршрут);
    КоличествоЗаявок=РегистрыСведений.ЗаявкиНаПоставку.ПолучитьПоследнее(КонецДня(ДатаПоставки),Фильтр).Количество;    
    Если КоличествоЗаявок > 5  Тогда
....

@Ermak27 · 25.12.2015, 10:27 **[ТС]**

А нужно если Xomych, Вот код

1C

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

@Xomych · 25.12.2015, 10:31

1C

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

@Ermak27 · 25.12.2015, 10:39 **[ТС]**

Все работает, спасибо большое!

@Ermak27 · 28.12.2015, 10:50 **[ТС]**

Почему то не работает, что не так

1C

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

Добавлено через 5 минут
В отладчике перед циклом пишет ошибка чтения значения.

@Dethmontt · 28.12.2015, 11:09

Сообщение от Ermak27

В отладчике перед циклом пишет ошибка чтения значения.

Это не ошибка, так и должно работать! Значения появятся только после метода Следующий()

@Ermak27 · 28.12.2015, 11:58 **[ТС]**

Dethmontt, а почему тогда не работает.

Добавлено через 15 секунд
Не заходит в цикл

@Dethmontt · 28.12.2015, 12:02

Сообщение от Ermak27

Не заходит в цикл

Значит нет записей - в синт. помощнике почитай про метод Следующий()

@Ermak27 · 28.12.2015, 12:06 **[ТС]**

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

1C

1 2	Запрос.УстановитьПараметр("ДатаНач",НачалоДня(Дата)); Запрос.УстановитьПараметр("ДатаКон",КонецДня(Дата));

@Dethmontt · 28.12.2015, 12:09

Сообщение от Ermak27

а как тогда быть

Включаем МОЗг и начинаем ДУМАТЬ!

@Ermak27 · 28.12.2015, 12:11 **[ТС]**

Dethmontt, я не понимаю, у меня же правильно прописано установка параметра по периоду

@Dethmontt · 28.12.2015, 12:35

Сообщение от Ermak27

у меня же правильно

Конечно правильно, только вот какие данные у тебя в регистре известно только тебе одному!

@Ermak27 · 28.12.2015, 14:01 **[ТС]**

Dethmontt, Не понял.

@Ermak27 · 29.12.2015, 17:34 **[ТС]**

Dethmontt, я не понимаю почему тогда этот код работает, тут тоже сначала заявок 0

1C

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

@Dethmontt · 29.12.2015, 17:57

Сообщение от Ermak27

я не понимаю почему

Потому что код нужно писать, а не ТУПО копировать.

З.Ы. Включаешь СВОЙ МОЗГ и много думаешь!!!

@Ermak27 · 30.12.2015, 09:04 **[ТС]**

Dethmontt, хороший ответ, помог

@Xomych · 30.12.2015, 09:31

Сообщение от Ermak27

НачалоДня(Дата)

Не надо использовать слово Дата как переменную

@Ermak27 · 30.12.2015, 09:34 **[ТС]**

Xomych, а как тогда, если у меня реквизит называется Дата

@Xomych · 30.12.2015, 09:40

Сообщение от Ermak27

Xomych, а как тогда, если у меня реквизит называется Дата

А, это реквизит, тогда норм.

@Ermak27 · 30.12.2015, 09:44 **[ТС]**

Xomych, Да это реквизит в документе

@Dethmontt · 30.12.2015, 11:06

Ermak27, что за поле Количество ? Что в нем храниться и зачем ты его суммируешь в запросе?

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	25.12.2015, 10:39 [ТС]	23
	Все работает, спасибо большое! 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	28.12.2015, 11:58 [ТС]	26
	Dethmontt, а почему тогда не работает. Добавлено через 15 секунд Не заходит в цикл 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	28.12.2015, 14:01 [ТС]	32
	Dethmontt, Не понял. 0

@Xomych 857 / 656 / 111 Регистрация: 01.11.2012 Сообщений: 2,411
	30.12.2015, 09:31	36
	Сообщение от Ermak27 НачалоДня(Дата) Не надо использовать слово Дата как переменную 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	30.12.2015, 09:34 [ТС]	37
	Xomych, а как тогда, если у меня реквизит называется Дата 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	28.12.2015, 11:09	25
	Сообщение от Ermak27 В отладчике перед циклом пишет ошибка чтения значения. Это не ошибка, так и должно работать! Значения появятся только после метода Следующий() 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	28.12.2015, 12:02	27
	Сообщение от Ermak27 Не заходит в цикл Значит нет записей - в синт. помощнике почитай про метод Следующий() 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	28.12.2015, 12:09	29
	Сообщение от Ermak27 а как тогда быть Включаем МОЗг и начинаем ДУМАТЬ! 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	28.12.2015, 12:11 [ТС]	30
	Dethmontt, я не понимаю, у меня же правильно прописано установка параметра по периоду 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	28.12.2015, 12:35	31
	Сообщение от Ermak27 у меня же правильно Конечно правильно, только вот какие данные у тебя в регистре известно только тебе одному! 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	29.12.2015, 17:57	34
	Сообщение от Ermak27 я не понимаю почему Потому что код нужно писать, а не ТУПО копировать. З.Ы. Включаешь СВОЙ МОЗГ и много думаешь!!! 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	30.12.2015, 09:04 [ТС]	35
	Dethmontt, хороший ответ, помог 0

@Xomych 857 / 656 / 111 Регистрация: 01.11.2012 Сообщений: 2,411
	30.12.2015, 09:40	38
	Сообщение от Ermak27 Xomych, а как тогда, если у меня реквизит называется Дата А, это реквизит, тогда норм. 0

@Ermak27 4 / 4 / 0 Регистрация: 16.01.2013 Сообщений: 1,228
	30.12.2015, 09:44 [ТС]	39
	Xomych, Да это реквизит в документе 0

@Dethmontt Модератор 3784 / 2964 / 589 Регистрация: 10.03.2011 Сообщений: 11,669 Записей в блоге: 1
	30.12.2015, 11:06	40
	Ermak27, что за поле Количество ? Что в нем храниться и зачем ты его суммируешь в запросе? 0

Суммировать количество

Решение