Форум Программирование Общие вопросы программирования (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:

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

Морфер. Глюк. Слетает Имя и Отчество у ранее спряженных ФИО (2) 1 $m Dev ЗУП3.x	2	вчера, 19:40 GIZmo
Ошибка при вызове метода контекста (Записать) (6) 0.1 $m Dev	6	вчера, 17:08 Varlant1n
Web - сервис. Выбор файла в одиночном режиме. (3) 0.33 $m Dev v8	3	вчера, 16:51 TVA_11
Скан штрих-кодов УТ 10.3 (15) 0.5 $m ВК	15	вчера, 12:02 user1466103
Установлена программа на сервере ЗУП 3.1.16.108 платформа "1С:Предприятие 8.3 (8.3.17.1851)" КриптоПро 4.0.99.75 серверная. Ошибка при получении данных по ЭЛН из ФСС (8) 1 $m Зарплата ЗУП3.x	8	вчера, 09:38 Asuneft
Доработка мобильного приложения для 1С документооборот (7) 2.64 $m MobileDev ДО v8::Mobile	7	18.01.21 Skripagan
Печатная форма документа графика отпусков с сортировкой по плановой дате базы ЗУП 2.5 (0) 1 $m Dev ЗУП2.5	0	18.01.21 dmitry888
Заполнение формы данными при нажатии на кнопку (12) 0.9 $m Dev	12	18.01.21 Varlant1n
Тестовое задание на вакансию "Программист 1С" №5 (4) 1 $m Dev v8 УТ11	4	30.11.-1 Sungang
РМК 1с розница (изменение работы) (71) 0.01 $m Торговля	71	16.01.21 pk_ekran
Программная лицензия у сервера лицензий (13) 0.75 $m Hardware КА2 8.3.14 ИТ-компания Вопрос Обсуждение Вопрос c ответом Лицензия 1С	13	15.01.21 semenoof
у кого есть положительный/ отрицательный опыт по релизам 8.3.17.1851 , 8.3.18.1288, 8.3.18.1289 для файлового / серверного вариантов (15) 0.2 $m UpdateCF БП3.0 ЗУП3.x 8.3.8	15	15.01.21 pm74
Мобильный клиент. Команда в боковом меню. (4) 1 $m MobileDev	4	15.01.21 Mahon83
Отчет СКД: таблица по месяцам (8) 0.36 $m Dev УТ11 v8 1С Внешний отчет (ert,erf)	8	14.01.21 ildariuscurban1
Функция добавление фотографию через свой ПК... (6) 0.3 $m Dev	6	14.01.21 user1087014
Ошибка арифметического переполнения при преобразовании numeric к типу данных numeric (1) 0.09 $m Dev 1cv8.cf v8 1С:Франчайзи, автоматизация бизнеса	1	12.01.21 den17
Выгрузка из 1с Далион УНО групп печати во Фронтол 6 (0) 0.05 $m Обмен	0	12.01.21 user653330_111_ElemenT_111
Помощь в настройке УАТ и формы отчета (4) 1 $m Учет Автомобили, автосервисы Транспорт, автопарки, такси	4	12.01.21 maksa2005
Передача и возврат значений (19) 0.3 $m Dev v8	19	10.01.21 Devilion
Восстанавливает резерв по сомнительным долгам после списания (5) 2 $m БУ ERP2 КА2 Налог на прибыль БУ	5	09.01.21 kns77