igarewa
14.07.2023, 10:29
Не могу понять как задать значение ПКО.Кассы =
В ВыемкеДС нет такого реквизита, указывается только КассаККМ.
&После ("ВыполнитьАвтоматическуюИн кассациюДС")
Процедура Автоматическое_СозданиеПК� �_ПриЗакрытииСмены(КассаКК� �, ОшибкаПриСнятииZОтчета) Экспорт
// Запрос для поиска последней выемки денежных средств
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ ПЕРВЫЕ 1
| ВыемкаДенежныхСредствИзКа ссыККМ.Ссылка КАК Ссылка
|ИЗ
| Документ.ВыемкаДенежныхСр� �дствИзКассыККМ КАК ВыемкаДенежныхСредствИзКа ссыККМ
|ГДЕ
| ВыемкаДенежныхСредствИзКа ссыККМ.Проведен
|УПОРЯДОЧИТЬ ПО
| Дата УБЫВ";
// Выполняем запрос и получаем ссылку на последнюю проведенную выемку
РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда
Возврат;
КонецЕсли;
Выборка = РезультатЗапроса.Выбрать();
Выборка.Следующий();
ПоследняяВыемка = Выборка.Ссылка;
Если ЗначениеЗаполнено(Последн� �яВыемка) Тогда
// Создаем объект ПКО
ПКО = Документы.ПриходныйКассов� �йОрдер.СоздатьДокумент();
// Заполняем ПКО на основании последней выемки
ПКО = Документы.ПриходныйКассов� �йОрдер.СоздатьДокумент();
ПКО.Дата = ТекущаяДата();
ПКО.Организация = ПоследняяВыемка.Организац� �я;
ПКО.СуммаДокумента = ПоследняяВыемка.СуммаДоку� �ента;
ПКО.Валюта = ПоследняяВыемка.Валюта;
ПКО.Кассир = ПоследняяВыемка.Кассир;
ПКО.ХозяйственнаяОперация = Перечисления.Хозяйственны� �Операции.ПоступлениеДенеж ныхСредствИзКассыККМ;
ПКО.КассаККМ = ПоследняяВыемка.КассаККМ;
//ПКО.Касса =
// Запись и проведение ПКО
ПКО.Записать(РежимЗаписиДо кумента.Проведение);
// Вывод информации о созданном ПКО
Сообщить("ПКО успешно создан на основе последней выемки денежных средств.");
КонецЕсли;
КонецПроцедуры
Знаю что касса привязывается к фискальному устройству в Настройках РМК, но нет идеи как достать нужное мне значение.
В ВыемкеДС нет такого реквизита, указывается только КассаККМ.
&После ("ВыполнитьАвтоматическуюИн кассациюДС")
Процедура Автоматическое_СозданиеПК� �_ПриЗакрытииСмены(КассаКК� �, ОшибкаПриСнятииZОтчета) Экспорт
// Запрос для поиска последней выемки денежных средств
Запрос = Новый Запрос;
Запрос.Текст =
"ВЫБРАТЬ ПЕРВЫЕ 1
| ВыемкаДенежныхСредствИзКа ссыККМ.Ссылка КАК Ссылка
|ИЗ
| Документ.ВыемкаДенежныхСр� �дствИзКассыККМ КАК ВыемкаДенежныхСредствИзКа ссыККМ
|ГДЕ
| ВыемкаДенежныхСредствИзКа ссыККМ.Проведен
|УПОРЯДОЧИТЬ ПО
| Дата УБЫВ";
// Выполняем запрос и получаем ссылку на последнюю проведенную выемку
РезультатЗапроса = Запрос.Выполнить();
Если РезультатЗапроса.Пустой() Тогда
Возврат;
КонецЕсли;
Выборка = РезультатЗапроса.Выбрать();
Выборка.Следующий();
ПоследняяВыемка = Выборка.Ссылка;
Если ЗначениеЗаполнено(Последн� �яВыемка) Тогда
// Создаем объект ПКО
ПКО = Документы.ПриходныйКассов� �йОрдер.СоздатьДокумент();
// Заполняем ПКО на основании последней выемки
ПКО = Документы.ПриходныйКассов� �йОрдер.СоздатьДокумент();
ПКО.Дата = ТекущаяДата();
ПКО.Организация = ПоследняяВыемка.Организац� �я;
ПКО.СуммаДокумента = ПоследняяВыемка.СуммаДоку� �ента;
ПКО.Валюта = ПоследняяВыемка.Валюта;
ПКО.Кассир = ПоследняяВыемка.Кассир;
ПКО.ХозяйственнаяОперация = Перечисления.Хозяйственны� �Операции.ПоступлениеДенеж ныхСредствИзКассыККМ;
ПКО.КассаККМ = ПоследняяВыемка.КассаККМ;
//ПКО.Касса =
// Запись и проведение ПКО
ПКО.Записать(РежимЗаписиДо кумента.Проведение);
// Вывод информации о созданном ПКО
Сообщить("ПКО успешно создан на основе последней выемки денежных средств.");
КонецЕсли;
КонецПроцедуры
Знаю что касса привязывается к фискальному устройству в Настройках РМК, но нет идеи как достать нужное мне значение.