Имя: Пароль:
1C
1С v8
Операция бухгалтерская
0 Маргоша
 
01.09.11
14:24
Пытаюсь в существующую операцию добавить недостающее субконто (незаполненное). Как сделать правильно? Желательно еще и валютную сумму. Конфигурация БГУ8.        

ДвиженияБУ = РегистрыБухгалтерии.ЕПСБУ.ВыбратьПоРегистратору(ДокВыб);
       НомОп = ДБФ_ОС.NomerOp;
       Пока (ДвиженияБУ.Следующий()) и (НомОп = ДБФ_ОС.NomerOp) Цикл
           СчетДт = ДвиженияБУ.СчетДт;
           СчетКт = ДвиженияБУ.СчетКт;
           Если СчетДт.Валютный = Истина Тогда
               //ДвиженияБУ.ВалютаДт = Справочники.Валюты.НайтиПоКоду("643");
               //ДвиженияБУ.ВалютнаяСуммаДт = ДвиженияБУ.Сумма;
           КонецЕсли;
           Если СчетКт.Валютный = Истина Тогда
               //ДвиженияБУ.ВалютаКт = Справочники.Валюты.НайтиПоКоду("643");
               //ДвиженияБУ.ВалютнаяСуммаКт = ДвиженияБУ.Сумма;
           КонецЕсли;
           Для Каждого Субконто Из ДвиженияБУ.СубконтоДт Цикл
               Если Субконто.Ключ = ПланыВидовХарактеристик.ВидыСубконтоБюджет.НайтиПоНаименованию("Темы") Тогда
                   Если ДБФ_ОС.SubkDt4 <> 0 Тогда
                       Тема = Справочники.Темы.НайтиПоКоду(ДБФ_ОС.SubkDt4);
                       ДвиженияБУ.СубконтоДт[Субконто.Ключ] = Тема;
                   КонецЕсли;
1 Рэйв
 
01.09.11
14:26
Создай набор записей с отбором по регистратору.
Прочитай и перебирая заполняй что надо
2 forforumandspam
 
01.09.11
14:27
"Мама мия"
3 Маргоша
 
01.09.11
14:31
Поподробнее насчет набора записей можно?
4 Маргоша
 
01.09.11
14:33
Из ДвиженияБУ я записи считываю, а записать, получается, не могу.
5 salvator
 
01.09.11
14:35
(4) В чем проблема присваивания записи?
6 Naumov
 
01.09.11
14:35
Писать прямо в выборку - это гениально.
7 Рэйв
 
01.09.11
14:36
(3)Как то так:


Проводки = РегистрыБухгалтерии.Основной.СоздатьНаборЗаписей();
Проводки.Отбор.Регистратор.Установить(Документ);
Проводки.Прочитать();
Для Каждого Запись из Проводки Цикл
  Запись.Субконто=ЧтоТо;
КонецЦикла;

Проводки.Записать(Истина);
8 Маргоша
 
01.09.11
14:37
Не появляется в операции. Хотя в отладчике видно, что
ДвиженияБУ.СубконтоДт[Субконто.Ключ] присвоилось значение субконто "темы". На валюту ругается, что недоступна для записи.
9 Маргоша
 
01.09.11
14:40
Субконто не одно.
10 Рэйв
 
01.09.11
14:41
(9)Да хоть 10.  Запись полностью доступна.Все поля
11 Маргоша
 
01.09.11
14:41
Спасибо. Сейчас попробую.
12 WF72
 
01.09.11
14:53
Однако, точь-в-точь моя проблема :)  только что решил.
13 WF72
 
01.09.11
14:53
Перенос из 7.7 делали?
14 Маргоша
 
01.09.11
15:26
Нет. Из ББУ8. Пробовали настроить конвертацию: были нетиповые субконто. Почему-то задваивает операции непонятным образом. Решил написать обработку по выгрузке из ББУ8 и загрузке в БГУ8. А как вы решили?
15 WF72
 
01.09.11
15:43
У меня получился косяк: по счетам 10.11.х и МЦ в выгруженных оборотах отсутствовала аналитика. Пришлось писать обработку, которая в операциях копировала 1-е субконто из кредита в дебет; оказалось, что к субконто в операциях нужно обращаться через план видов характеристик, индекс не прокатит.
16 WF72
 
01.09.11
15:45
Хорошо, что вам аксиок.нет не навязали, как некоторым госучреждениям. Повесились бы ;)
17 Маргоша
 
01.09.11
16:21
А что это?