Имя: Пароль:
1C
1С v8
БухгалтерскиеИтоги. БУ 4.5 в БП 3.0
0 KuJIT
 
10.02.14
11:04
День добрый. Есть Бухгалтерский учет редакция 4.5 (на 7ке) и БП редакция 3.0 (на 8ке). В БУ добавлялся документ с таким куском кода, его нужно переделать под БП 3.0. С 7кой не работал никогда =/ Может быть, подскажете, что к чему?

БИ9022=СоздатьОбъект("БухгалтерскиеИтоги");
БИ9022.ВключатьСубсчета(1);

СпрВидНом = СоздатьОбъект("Справочник.ВидыНоменклатуры");
СпрВидНом.ВыбратьЭлементы();
Пока СпрВидНом.ПолучитьЭлемент() = 1 Цикл
Если СпрВидНом.Склад=Таб.Производство Тогда
Процент=0;
БИ.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,СпрВидНом.ТекущийЭлемент(),1);
БИ.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),СчетПоКоду("90.1.2"), "С");

БИ9022.ИспользоватьСубконто(ВидыСубконто.ВидыНоменклатуры,СпрВидНом.ТекущийЭлемент(),1);
БИ9022.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),СчетПоКоду("90.2.2"), "С");

На сколько я понял роль БухгалтерскихИтогов в контексте БУ в 8ке исполняет регистр бухгалтерии "хозрасчетный" и достаточно просто формировать запросы для него, чтобы получить то же самое, что и при работе с БухИтогами. Но аналога "Справочник.ВидыНоменклатуры" я не нашел. Да не очень понятно назначение метода "Использовать".
1 KuJIT
 
10.02.14
11:05
Или ссылочку какую на нужную информацию (соответствие между БУ 4.5 и БП 3.0)
2 zak555
 
10.02.14
11:06
1. запрос в цикле -- ужас
2. ты человеческими словами, объясни что хочешь в конечном итоге
3 KuJIT
 
10.02.14
11:09
В конечном итоге мне нужно сделать документ в БП 3.0, который бы копировал документ из БУ 4.5 (не типовой). А что этот документ делает, я как раз и пытаюсь понять =/
4 zak555
 
10.02.14
11:10
(3) что за документ в бу ?
5 KuJIT
 
10.02.14
11:11
Если нужно, могу скинуть текст всей формы. Там функция "Печать".
6 KuJIT
 
10.02.14
11:11
Говорю же не типовой документ, а что он делает я и пытаюсь понять.
7 zak555
 
10.02.14
11:12
(6) я к тому, что может он и не нужен в БП 3.0
8 KuJIT
 
10.02.14
11:13
(7) Это в каком случае? оО
Думаю, раз поручили сделать, то нужен.
9 zak555
 
10.02.14
11:16
(8)

в общем
10 KuJIT
 
10.02.14
11:22
(9) В общем случае? Исходя из того, что это нужно сделать, как можно перевести такой кусок

    БИ42 = СоздатьОбъект("БухгалтерскиеИтоги");
    БИ42.ИспользоватьСубконто(ВидыСубконто.МестаХранения,,1);
    БИ42.ВыполнитьЗапрос(НачМесяца(ДатаДок),КонМесяца(ДатаДок),СчетПоКоду("42"),,,,, "С");

    БИ42.ВыбратьСубконто();
    Пока БИ42.ПолучитьСубконто()=1 Цикл
11 hhhh
 
10.02.14
11:27
(10) 42-й счет - это учет торговой наценки в рознице. В БП 3.0 он есть в типовой, поэтому просто выбросьте этот кусок и не парьтесь. В последних 7.7 тоже появился.
12 KuJIT
 
10.02.14
11:29
Ну так информация же какая-то вытаскивается этим куском, нет?
13 hhhh
 
10.02.14
11:31
(12) ну в закрытие месяца, там закрытие торговой наценки, скопипастите себе, если это для вас важно.
14 KuJIT
 
10.02.14
11:34
Таб.СальдоН42 = БИ42.СНК();
        Таб.ДО42      = БИ42.ДО();
        Таб.КО42      = БИ42.КО();
        Таб.СальдоК42 = БИ42.СКК();

- это что-то в роде

ВЫБРАТЬ
    ХозрасчетныйОстаткиИОбороты.КоличествоКонечныйОстатокКт
ИЗ
    РегистрБухгалтерии.Хозрасчетный.ОстаткиИОбороты КАК ХозрасчетныйОстаткиИОбороты
ГДЕ
    ХозрасчетныйОстаткиИОбороты.Счет = &Счет
15 KuJIT
 
10.02.14
11:34
?
16 zak555
 
10.02.14
11:40
(10) в общем случае, созданные ранее в 7ке доки переносят в обычный док бп
17 KuJIT
 
10.02.14
11:43
(16) Не понял.
18 zak555
 
10.02.14
11:47
(17) ответь на мой вопрос, тогда поймёшь
19 KuJIT
 
10.02.14
12:02
(7) этот?
20 zak555
 
10.02.14
12:02
на 4
Ошибка? Это не ошибка, это системная функция.