Имя: Пароль:
1C
1C 7.7
v7: Как обратиться к бух. проводкам документа?
0 Босечка
 
12.03.14
15:11
Как обратиться к бух. проводкам документа?
1 val
 
12.03.14
15:14
Опер = ТекДок.Операция;
                Опер.ВыбратьПроводки();
                Пока Опер.ПолучитьПроводку() = 1 Цикл
2 2S
 
12.03.14
15:15
Опер = СоздатьОбъект("Операция");
Опер.НайтиОперацию(ТвойДок);
Далее (1)
3 2S
 
12.03.14
15:16
или кури БИ с отбором по "Операция"
4 Franchiser
 
гуру
12.03.14
15:16
смотря откуда. если из того же документа ВыбратьПроводки()
5 Босечка
 
12.03.14
15:20
Спасибо, а как к субконто обратиться?
6 mikecool
 
12.03.14
15:21
(5) проводка.Субконто(ВидСубконто...)
7 Босечка
 
12.03.14
15:22
Если Опер.ВыбранаПоКт()=1 тогда
                  Сообщить(Опер.Субконто());
                Конецесли;
Ругается ВыбранаПоКт() -"Поле объекта не обнаружено"
8 Franchiser
 
гуру
12.03.14
15:23
Если Опер.Выбрана()=1 тогда
9 mikecool
 
12.03.14
15:26
(7) а где перебор проводок? читай уже СП
10 2S
 
12.03.14
15:27
(7) специалиста позвать не предлагать?
11 Franchiser
 
гуру
12.03.14
15:28
Опер.ВыбратьПроводки();
Пока Опер.ПолучитьПроводку() = 1 Цикл
Если Опер.Кредит.Счет = СлучайныйСчет Тогда
Если Опер.Кредит.Субконто(ВидыСубконто.Номенклатура) = Работа Тогда
..
КонецЕсли;
КонецЕсли;
КонецЦикла;
12 Franchiser
 
гуру
12.03.14
15:31
(10) судя по анкете она - специалист)