Имя: Пароль:
1C
1С v8
Помогите по коду в подписке на события плз
0 BigShmax
 
04.10.11
15:54
Нужно в подписке заменить подменить при условии  значение одного из реквизитов регистра.

стоит

Если ТипЗнч(Источник) = Тип("ДокументОбъект.ПоступлениеТоваровУслуг") Тогда

далее различные  условия исполнения

ДвиженияРазмещениеЗаказов = Источник.Движения.РазмещениеЗаказовПокупателей;
       ДвиженияРазмещениеЗаказов.Прочитать();
       Для Каждого Запись из ДвиженияРазмещениеЗаказов Цикл
           
           тут собсно нужно осуществить подмену            
       КонецЦикла;    

ДвиженияРазмещениеЗаказов.ЭтотОбъект.мТаблицаДвижений
дает мне таблицу значений  вроде ту что надо Но посмотреть  значение ЗаказПокупателя неполучается  выдет тока имена колонок и ваще
1 Широкий
 
04.10.11
15:58
Читаешь после того как вся движуха прибита? :)
2 BigShmax
 
04.10.11
16:01
Нет, движуха на месте.  мне по идее нужно  реквизит регистра поменять на другой из характеристики и все.  вот и хотел циклом пробежаться.  в доках строк от 1 до 5 ти обычно.  а в регистр в реквизит "ЗаказПокупателя" при разных условияхз буду писать либо оставлять заказ покупателя  либо подменять на заказ на производство
3 BigShmax
 
04.10.11
16:03
при отладке в
ДвиженияРазмещениеЗаказов.ЭтотОбъект.мТаблицаДвижений
таблица значений есть и в ней все строки дока  с нужными мне реквизитами там же есть и характеристика из которой брать подмену.  но я не могу  посомтреть значения реквизитов  , т.е.могу тока глянуть таблицу целиком
4 Scooter
 
04.10.11
16:03
Источник.Движения.Хозрасчетный.Прочитать();
   
   НаборДвижений = Источник.Движения.Хозрасчетный;
   ТаблицаДвижений = НаборДвижений.Выгрузить();

   СтруктураОтбора = Новый Структура("СчетДт", ПланыСчетов.Хозрасчетный.РасчетыСПокупателями);
   МассивСтрок = ТаблицаДвижений.НайтиСтроки(СтруктураОтбора);

   Для каждого СтрокаТабл Из МассивСтрок Цикл
       
       Проводка = НаборДвижений[СтрокаТабл.НомерСтроки - 1];
       БухгалтерскийУчет.УстановитьСубконто(Проводка.СчетДт, Проводка.СубконтоДт, "Проекты", Источник.ДополнительныеСвойства.СтруктураШапкиДокумента.Проект);
       
   КонецЦикла;
5 Mort
 
04.10.11
16:06
Перед записью движений не судьба подпиливать?
6 Scooter
 
04.10.11
16:09
(5)поддержка, итить её
7 BigShmax
 
04.10.11
18:10
(5)  затру  когда нибудь ведь. а подписки у меня вынесены в свой модуль.  
(6)  да какая поддержка  лопачено перелопачено :-)   так  хоть каких то приличий  придерживаться
8 BigShmax
 
04.10.11
18:29
(4)  только я все равно не понял чем мой код отличается от того что Вы дали.

ДвиженияРазмещениеЗаказов = Источник.Движения.РазмещениеЗаказовПокупателей;
       ДвиженияРазмещениеЗаказов.Прочитать();
       ТаблицаДвижений = ДвиженияРазмещениеЗаказов.Выгрузить();

       
       Для Каждого Запись из ТаблицаДвижений Цикл
           
                       
       КонецЦикла;    

Отладчиком - ТаблицаДвижений имеет значение таблицы значений.  если заглянуть внутрь там все строки моего документа.  я не могу в  "Вычислить выражение" стоя внутри цикла глянуть не всю таблицу  а строку а точнее ее реквизит ЗваказПокупателя и ХарактеристикаНоменклатуры
9 acsent
 
04.10.11
19:03
Причем здесь мТаблицаДвижений???
Выдавать глобальные идеи — это удовольствие; искать сволочные маленькие ошибки — вот настоящая работа. Фредерик Брукс-младший