Имя: Пароль:
1C
1С v8
УПП 1.3.21 Программное редактирование проводок
0 vitgl
 
18.01.12
23:10
Есть подписка на запись в регистр Хозрасчетный и основной "затык" происходит в следующем коде:

   СубконтоРаботники = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.РаботникиОрганизации;
   СубконтоНазначениеИспользованияСпецодежды = ПланыВидовХарактеристик.ВидыСубконтоХозрасчетные.НайтиПоНаименованию("Назначение использования спецодежды");

   Индекс = -1;
   Для Каждого Проводка из Источник Цикл
       
       Индекс = Индекс + 1;
       Строка = ТабМатериалы.Получить(Индекс);
       // Дебет
       Если Проводка.СчетДт = Счет10111 и
            Проводка.СубконтоДт[СубконтоРаботники] = Неопределено Тогда
           
           Если Строка <> Неопределено Тогда
               Проводка.СубконтоДт[СубконтоРаботники] = Строка.ФизЛицо;
           КонецЕсли;
       КонецЕсли;

       Если Проводка.СчетДт = Счет10111 и
            Проводка.СубконтоДт[СубконтоНазначениеИспользованияСпецодежды] = Неопределено Тогда
           Если Строка <> Неопределено Тогда
               Проводка.СубконтоДт.Вставить(Проводка.СчетДт.ВидыСубконто.Получить(1).ВидСубконто, Строка.НазначениеИспользования);
           КонецЕсли;
       КонецЕсли;
   КонецЦикла;

Самое интересное, что код, где я подставляю СубконтоРаботники работает на ура, а код, где подставляется субконто СубконтоНазначениеИспользованияСпецодежды работать не хочет.
Также не хочет субконто СубконтоНазначениеИспользованияСпецодежды подставляться и в случае если я пишу код
Проводка.СубконтоДт[СубконтоНазначениеИспользованияСпецодежды] = Строка.НазначениеИспользования

Субконто для спецодежды создавалось самостоятельно.

Подскажите, как же все-таки записать это субконто и почему оно не хочет записываться сейчас.

Заранее спасибо.
1 vitgl
 
22.01.12
11:55
Неужели никто не добавлял в конфигурацию свои субконто и потом проставлял его в документах?