Имя: Пароль:
1C
1С v8
Как записать реквизит в существующую проводку
,
0 isabel_morley
 
06.12.11
16:09
Если (запись_массив51.СчетКт = Счет51) и ( запись_массив51.СубконтоКт1<>Справочники.БанковскиеСчета.ПустаяСсылка()) Тогда
                           Если запись_массив51.Идент = 0 Тогда //Присвоим новый номер
                               ДвиженияБУ=РегистрыБухгалтерии.Хозрасчетный.Константа.ИдентПроводки = Константы.НомерПлатежки.Получить() + 1;
       Пока ДвиженияБУ.Следующий() цикл
                                   Если ДвиженияБУ.СчетКт=Счет51 тогда
                                       
                                       ДвиженияБУ.Идентификатор=Константы.НомерПлатежки.Получить() + 1;
                                                                           
                                   КонецЕсли;
                               КонецЦикла;
=============
"идентификатор"- реквизит
как записать данный реквизит?
1 Господин ПЖ
 
06.12.11
16:10
писец...
2 Grusswelle
 
06.12.11
16:10
(0) Без фото не взлетит!
3 GROOVY
 
06.12.11
16:11
(2) Тут вообще не взлетит...
4 DrShad
 
06.12.11
16:12
(0) срочно замуж и рожать детей
5 GROOVY
 
06.12.11
16:14
За строку "ДвиженияБУ=РегистрыБухгалтерии.Хозрасчетный.Константа.ИдентПроводки = Константы.НомерПлатежки.Получить() + 1;" отдельное спасибо...
6 isabel_morley
 
06.12.11
16:19
(5) ваще бед какой,согласна..неправильно скопировала
7 isabel_morley
 
06.12.11
16:20
Если (запись_массив51.СчетКт = Счет51) и ( запись_массив51.СубконтоКт1<>Справочники.БанковскиеСчета.ПустаяСсылка()) Тогда
                           Если запись_массив51.Идент = 0 Тогда //Присвоим новый номер
                               ДвиженияБУ=РегистрыБухгалтерии.Хозрасчетный.Константа.ИдентПроводки = Константы.НомерПлатежки.Получить() + 1;(запись_массив51.Регистратор);
                               Пока ДвиженияБУ.Следующий() цикл
                                   Если ДвиженияБУ.СчетКт=Счет51 тогда
                                       
                                       ДвиженияБУ.Идентификатор=Константы.НомерПлатежки.Получить() + 1;
                                       Константа.ИдентПроводки =ДвиженияБУ.Идентификатор;
                                       
                                   КонецЕсли;
                               КонецЦикла;
8 hhhh
 
06.12.11
16:22
(7) но что означает это магическое слово "Хозрасчетный.Константа"??
9 GROOVY
 
06.12.11
16:26
(7) Да так стало на много понятнее. Синтаксический контроль как это проходит?
10 isabel_morley
 
06.12.11
16:50
ДвиженияБУ=РегистрыБухгалтерии.Хозрасчетный.ВыбратьПоРегистратору(запись_массив51.Регистратор);
                               
                               Пока ДвиженияБУ.Следующий() цикл
                                   Если ДвиженияБУ.СчетКт=Счет51 тогда
                                       
                                       ДвиженияБУ.Идентификатор=Константы.НомерПлатежки.Получить() + 1;
                                       Константа.ИдентПроводки =ДвиженияБУ.Идентификатор;
                                       
                                   КонецЕсли;
                               КонецЦикла;
11 DrShad
 
06.12.11
17:11
(10) и снова бред
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший