Форум Программирование Общие вопросы программирования (Dev)

Вывести на форму сумму из регистра накопления

1С:Управление торговлей 11 Платформа 1С v8.3

1. gtrr34 6 14.01.21 13:38 Сейчас в теме

Здравствуйте!
В рамках обучения решил написать калькулятор кассы, с задачей суммирования банкнот и монет из полей справился, теперь хочу вывести на форму данные Кассы из регистра, что бы в дальнейшем сравнить фактические наличные деньги с "теоретическими".

Обработку делаю в расширении
Добавил в расширение регистр накоплений ДенежныеСредстваНаличные со всеми вложениями.
создал запрос с помощью конструктора запросов:

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

    Пока Записи.Следующий() Цикл
        Сообщить(Записи.Сумма);
    КонецЦикла;
	Сообщить (Записи.Сумма);

Показать

В примерах везде запросы вытаскивают из регистров несколько ресурсов, поэтому по образцу сделал с циклом, хотя он тут скорее всего не нужен :)
не понятно, нужно ли выставлять в параметрах организацию, если она всего одна.

Результат - пустое сообщение. ткните пожалуйста дошкольника в ошибку

Ответы

В избранное Подписаться на ответы

Свернуть все

2. FatPanzer 9 14.01.21 13:47 Сейчас в теме

Значит не найдена Касса или Организация, соответственно результат запроса пустой.

Кстати, условия по Кассе и Организации надо засовывать в условия виртуальной таблицы, и не использовать их в секции "ГДЕ..."

4. gtrr34 6 14.01.21 13:57 Сейчас в теме

(2) а возможно "сообщить" этот параметр что бы проверить, нашел он или нет...

типа Сообщить(Записи.Запрос.Параметр("Касса"))

кстати, может это из-за расширения, потому что в него не добавлены справочники... хотя он же их позволяет в коде и не ругается что нет таких

5. user868505 14.01.21 14:01 Сейчас в теме

(4)можно так:

НайденнаяКасса = Справочники.Кассы.НайтиПоНаименованию("Касса физическая");
Если НайденнаяКасса = Справочники.Кассы.ПустаяСсылка() Тогда
  Сообщить("Кассу не нашли")
Иначе
  Сообщить(НайденнаяКасса)
КонецЕсли;

Или просто посмотреть в отладчике.

3. user868505 14.01.21 13:52 Сейчас в теме

(1)Циклом обходятся элементы выборки, а не "вытащенные" ресурсы, поэтому в этом смысле цикл не нужен.
Цикл нужен, если у вас результат запроса - более, чем одна запись, чтобы вывести все записи.

Далее, если Касса и Организация - это измерения регистра, то условия нужно накладывать не в ГДЕ, а в параметры виртуальной таблицы.

И по сути вопроса, почему пустое сообщение.
Запрос выбирает какие-то данные вообще? Записи.Количество() - чему равно?
И если оно больше 0, то второй вопрос. На этом этапе
Сообщить (Записи.СуммаОстаток)
чему равно значение Записи.СуммаОстаток?

6. gtrr34 6 14.01.21 15:06 Сейчас в теме

Эврика! получилось!
1) вытащил каим то чудом сумму и офигел от количества записей :) Понял свой косяк, Исправил и взял СуммаОстаток
2) Организацию не смог найти ни по названию, ни по ИНН, ну да бог с ней, без нее работает только по кассе.
3) по поводу того что в "где" не надо пихать параметр а делать это в виртуальной таблице не понял, но вроде и так работает.
4) Без цикла не работает, не смотря, на то что один результат должен быть.
т.е. если закомментировать цикл и вставить просто Сообщить(Записи.СуммаОстаток); то почему то не работает...

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

			РезультатЗапроса = Запрос.Выполнить();
			Записи = РезультатЗапроса.Выбрать();

    Пока Записи.Следующий() Цикл
        Сообщить(Записи.СуммаОстаток);
    КонецЦикла;

Показать

Чувствую что вырос, хотя зря, сделал без понимания, методом тыка.
СПАСИБО! вам большое что потратили на меня время!

7. FatPanzer 9 14.01.21 15:37 Сейчас в теме

(6) Все-таки параметры виртуальной таблицы лучше использовать с самого начала обучения...

8. user868505 14.01.21 16:10 Сейчас в теме

(6)без цикла у вас не работает, потому что вы не переходите на первую запись выборки.
Метод Выборка.Следующий() делает "шаг" на следующую запись.
Можно использовать в цикле, как в вашем примере, для обхода всех записей. Но если, например, в выборке всего 1 запись, или если вам в любом случае нужна только первая, можно делать так:

Выборка.Следующий();
Сообщить(Выборка.СуммаОстаток)

По поводу параметров. Это важный момент, и грубая ошибка, поэтому лучше разобраться в этом нюансе изначально.
Вот пример запроса, где из регистра накопления выбираются данные по измерениям с использованием параметров виртуальной таблицы:

	Запрос.Текст = "ВЫБРАТЬ
	|	ОстаткиТоваровОстатки.КоличествоОстаток КАК КоличествоОстаток
	|ИЗ
	|	РегистрНакопления.ОстаткиТоваров.Остатки(
	|			,
	|			Номенклатура = &Номенклатура
	|				И Склад = &Склад) КАК ОстаткиТоваровОстатки";
	
	Запрос.УстановитьПараметр("Номенклатура",);// Номенклатура
	Запрос.УстановитьПараметр("Склад",);// Склады учета

Показать

Оставьте свое сообщение

E-mail:

Вопросы с вознаграждением

Запросы условие перечисление (1) 0.5 $m Admin БП3.0 v8	1	34 минуты назад Ranel
ЗУП 3.1 ограничение доступа по подразделениям (1) 1 $m Зарплата ЗУП3.x	1	сегодня, 09:21 titanium2008
Командный интерфейс основного раздела (3) 1 $m Dev 1cv8.cf Интерфейсы	3	вчера, 13:58 Mahon83
Создание больничных листов с помощью сканирования штрих-кода в ERP 2.4 (4) 5 $m Зарплата ERP2	4	21.01.21 Annett
Ошибка формирования декларации по НДС - Не указан номер счета-фактуры (4) 3 $m БУ БП3.0 Розничная и сетевая торговля (FMCG) НДС	4	21.01.21 windsurf
Самопроизвольно прекращается регламентное задание (19) 0.6 $m Admin УТ11 Платформа 1С v8.1 Windows	19	21.01.21 Adrenal1n
RDP проброс стабильного com порта онлайн кассы для 1с (14) 1.5 $m Admin	14	21.01.21 andrey7617
Разрешить или запретить редактировать Элементы (14) 0.2 $m Dev	14	20.01.21 user1087014
Как учитывать НДС в стоимость товара? (7) 0.18 $m Учет УТ11 v8	7	20.01.21 Kstore
Открытие конфигуратора из другой IP подсети (13) 2 $m Admin	13	20.01.21 malikov_pro
Процент оплаты в больничном ЗУП, МРОТ (12) 0.5 $m Зарплата ЗУП3.x	12	20.01.21 ogre2007
Исполнитель = УстановилРезультат при делегировании. Это правильно? (7) 1 $m Документооборот	7	20.01.21 burmsergey
Транспортный налог за год 2020 (6) 2 $m БУ БП3.0 Транспортный налог	6	20.01.21 11111111111
Морфер. Глюк. Слетает Имя и Отчество у ранее спряженных ФИО (2) 1 $m Dev ЗУП3.x	2	19.01.21 GIZmo
Web - сервис. Выбор файла в одиночном режиме. (10) 0.33 $m Dev v8	10	19.01.21 TVA_11
Установлена программа на сервере ЗУП 3.1.16.108 платформа "1С:Предприятие 8.3 (8.3.17.1851)" КриптоПро 4.0.99.75 серверная. Ошибка при получении данных по ЭЛН из ФСС (8) 1 $m Зарплата ЗУП3.x	8	19.01.21 Asuneft
Печатная форма документа графика отпусков с сортировкой по плановой дате базы ЗУП 2.5 (10) 1 $m Dev ЗУП2.5	10	18.01.21 dmitry888
Заполнение формы данными при нажатии на кнопку (14) 0.9 $m Dev	14	18.01.21 Varlant1n
Тестовое задание на вакансию "Программист 1С" №5 (4) 1 $m Dev v8 УТ11	4	30.11.-1 Sungang
РМК 1с розница (изменение работы) (76) 0.01 $m Торговля	76	16.01.21 pk_ekran