Как прочитать записи регистра накопления оборотов в 1с 8.3, 8.2, с возможностью отбора и упорядочивания.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 |
Процедура КакПрочитатьЗаписиРегистраНакопленияОборотов() ОрганизацияПоУмолчанию = БухгалтерскийУчетПереопределяемый.ПолучитьЗначениеПоУмолчанию("ОсновнаяОрганизация"); Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | РеализацияУслуг.Период, | РеализацияУслуг.Регистратор, | РеализацияУслуг.НомерСтроки, | РеализацияУслуг.Активность, | РеализацияУслуг.Организация, | РеализацияУслуг.СчетРасходов, | РеализацияУслуг.НоменклатурнаяГруппа, | РеализацияУслуг.Подразделение, | РеализацияУслуг.Сумма |ИЗ | РегистрНакопления.РеализацияУслуг КАК РеализацияУслуг |ГДЕ | РеализацияУслуг.Организация = &ВыбОрганизация |УПОРЯДОЧИТЬ ПО | РеализацияУслуг.Сумма УБЫВ"; Запрос.УстановитьПараметр("ВыбОрганизация", ОрганизацияПоУмолчанию); РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); Пока ВыборкаДетальныеЗаписи.Следующий() Цикл Сообщить( Строка(ВыборкаДетальныеЗаписи.Период) + " " + ВыборкаДетальныеЗаписи.Сумма ); КонецЦикла; КонецПроцедуры |
Как получить обороты регистра накопления оборотов за период в 1с 8.3, 8.2.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 |
Процедура КакПолучитьОборотыРегистраНакопленияОборотовЗаПериод() ОрганизацияПоУмолчанию = БухгалтерскийУчетПереопределяемый.ПолучитьЗначениеПоУмолчанию("ОсновнаяОрганизация"); Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | РеализацияУслугОбороты.Организация, | РеализацияУслугОбороты.СчетРасходов, | РеализацияУслугОбороты.НоменклатурнаяГруппа, | РеализацияУслугОбороты.Подразделение, | РеализацияУслугОбороты.СуммаОборот |ИЗ | РегистрНакопления.РеализацияУслуг.Обороты( | &НачалоПериода, &КонецПериода | ) КАК РеализацияУслугОбороты |ГДЕ | РеализацияУслуг.Организация = &ВыбОрганизация"; Запрос.УстановитьПараметр("ВыбОрганизация", ОрганизацияПоУмолчанию); Запрос.УстановитьПараметр("НачалоПериода", '20170101'); Запрос.УстановитьПараметр("КонецПериода", '20171231'); РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); Пока ВыборкаДетальныеЗаписи.Следующий() Цикл Сообщить(ВыборкаДетальныеЗаписи.СуммаОборот); КонецЦикла; // Для регистров оборотов оборот подсчитывается как сумма всех движений. // Параметры таблицы Обороты(НачалоПериода, КонецПериода, Периодичность, // Условие). КонецПроцедуры // ЗарплатаКВыплате - регистр накопления остатков // // Измерения: Организация, ФизическоеЛицо, СтатьяФинансирования, // СтатьяРасходов, Сотрудник, Подразделение, // ПериодВзаиморасчетов, ХарактерВыплаты // // Ресурсы: СуммаКВыплате |
Как прочитать записи регистра накопления остатков в 1с 8.3, 8.2, с возможностью отбора и упорядочивания.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 |
Процедура КакПрочитатьЗаписиРегистраНакопленияОстатков() Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ЗарплатаКВыплате.Период, | ЗарплатаКВыплате.Регистратор, | ЗарплатаКВыплате.НомерСтроки, | ЗарплатаКВыплате.Активность, | ЗарплатаКВыплате.ВидДвижения, | ЗарплатаКВыплате.Организация, | ЗарплатаКВыплате.ФизическоеЛицо, | ЗарплатаКВыплате.СтатьяФинансирования, | ЗарплатаКВыплате.СтатьяРасходов, | ЗарплатаКВыплате.Сотрудник, | ЗарплатаКВыплате.Подразделение, | ЗарплатаКВыплате.ПериодВзаиморасчетов, | ЗарплатаКВыплате.ХарактерВыплаты, | ЗарплатаКВыплате.СуммаКВыплате |ИЗ | РегистрНакопления.ЗарплатаКВыплате КАК ЗарплатаКВыплате"; РезультатЗапроса = Запрос.Выполнить(); ВыборкаДетальныеЗаписи = РезультатЗапроса.Выбрать(); Пока ВыборкаДетальныеЗаписи.Следующий() Цикл |