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