M_Volkov
Gold Member | Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
Templl
Цитата:| С новым форматом обмена разобрался кто-нибудь? |
КД3.0 изучать надо...
Добавлено:
Цитата:| В общем нужны остатки банковского счета на момент предшествующий записи документа по всем 3-м ресурсам: Сумма, СуммаУпр, СуммаРегл. Есть такая готовая функция? |
Вообще-то мне нужна себестоимость валюты по упр. учету. По упр. учету приход ДС делаем по курсу конвертации банка (не по офиц. курсу как для регл. учета), а списание по "себестоимость валюты". Функцию написал:
Код: Процедура СебестоимостьВалюты() Экспорт
Сообщить("Валюта: " + Валюта + ", Дата: " + Дата + ", КурсКонвертации до: " + КурсКонвертации, СтатусСообщения.Информация); //+МВ 16.02.2016 Отладка
Если Валюта = Константы.ВалютаУправленческогоУчета.Получить() Тогда
Возврат;
КонецЕсли;
Запрос = Новый Запрос;
Запрос.Текст = "
|ВЫБРАТЬ РАЗРЕШЕННЫЕ
| ДенежныеСредстваБезналичные.СуммаУпрОстаток / ДенежныеСредстваБезналичные.СуммаОстаток КАК КурсКонвертации
|ИЗ
| РегистрНакопления.ДенежныеСредстваБезналичные.Остатки(&Дата, БанковскийСчет = &БанковскийСчет) КАК ДенежныеСредстваБезналичные
|";
Запрос.УстановитьПараметр("Дата", Дата);
Запрос.УстановитьПараметр("БанковскийСчет", БанковскийСчет);
Выборка = Запрос.Выполнить().Выбрать();
Если Выборка.Следующий() Тогда
КурсКонвертации = Выборка.КурсКонвертации;
Сообщить("КурсКонвертации по себестоимости валюты: " + Выборка.КурсКонвертации, СтатусСообщения.Информация); //+МВ 16.02.2016 Отладка
КонецЕсли;
КонецПроцедуры |
Сомнение - эти остатки на момент предшествующий проведению документа?
Добавлено:
Вставлял ее и ПередЗаписью(), и саму ОбработкаПроведения(), но в процессе проведения процедуры из менеджера показывают КурсКонвертации = 0, т.е. не учитывают его  |
Всего записей: 5794 | Зарегистр. 23-06-2008 | Отправлено: 06:48 17-02-2016 | Исправлено: M_Volkov, 09:49 19-02-2016 |
|
Программы » 
Варезник » 
в тп битрикса послали...