Совсем запарился... Не могу понять, где не прав и все... Может кто поможет?...
Ситуация:
Необходимо загрузить "Перечисление" из таблицы значений в документ...
Вот, что я делаю:
ШапкаДокумента=СоздатьОбъект("ТаблицаЗначений");
ШапкаДокумента.НоваяКолонка("Реквизит","Строка",,,,20);
ШапкаДокумента.НоваяКолонка("Значение",,,,,10);
ШапкаДокумента.НоваяКолонка("Тип","Строка",,,,10);
ПредстЗначРекв="Поступление ТМЦ (купля-продажа)";
ТипРекв="Перечисление.КодыОпераций";
ШапкаДокумента.НоваяСтрока();
ШапкаДокумента.Реквизит="КодОперации";
ТекПеречисление="КодыОпераций";
ШапкаДокумента.Значение="";
Для СчетчикЦикла = 1 По МетаДанные.Перечисление.(ТекПеречисление).Значение() Цикл
Если ПредстЗначРекв=Строка(МетаДанные.Перечисление(ТекПеречисление).Значение(СчетчикЦикла)) Тогда
ШапкаДокумента.Значение=МетаДанные.Перечисление(ТекПеречисление).Значение(СчетчикЦикла);
ШапкаДокумента.Тип=ТипРекв;
Прервать;
КонецЕсли;
... Т.е. теперь в ТаблицеЗначений:ШапкаДокумента есть одна строка с колонками: "Реквизит"="КодОперации", "Значение"=Поступление ТМЦ (купля-продажа), "Тип"="Перечисление.КодыОпераций"...
//Теперь записываю в документ:
...
ТекДокумент.НазначитьТип(ШапкаДокумента.Реквизит,ШапкаДокумента.Тип);
ТекДокумент.УстановитьАтрибут(ШапкаДокумента.Реквизит,ШапкаДокумента.Значение);
...
//где ТекДокумент=СоздатьОбъект("Документ" ...
И почему-то значение не добавляется в документ... Со справочниками и документами все в порядке, а вот как загрузить перечисление?... Может я чего не понимаю?... Подскажите, плз... Надежда только на вас...
Или может просто, кто подскажет, как из таблицы значений загрузить "перечисление" в документ?...
Ситуация:
Необходимо загрузить "Перечисление" из таблицы значений в документ...
Вот, что я делаю:
ШапкаДокумента=СоздатьОбъект("ТаблицаЗначений");
ШапкаДокумента.НоваяКолонка("Реквизит","Строка",,,,20);
ШапкаДокумента.НоваяКолонка("Значение",,,,,10);
ШапкаДокумента.НоваяКолонка("Тип","Строка",,,,10);
ПредстЗначРекв="Поступление ТМЦ (купля-продажа)";
ТипРекв="Перечисление.КодыОпераций";
ШапкаДокумента.НоваяСтрока();
ШапкаДокумента.Реквизит="КодОперации";
ТекПеречисление="КодыОпераций";
ШапкаДокумента.Значение="";
Для СчетчикЦикла = 1 По МетаДанные.Перечисление.(ТекПеречисление).Значение() Цикл
Если ПредстЗначРекв=Строка(МетаДанные.Перечисление(ТекПеречисление).Значение(СчетчикЦикла)) Тогда
ШапкаДокумента.Значение=МетаДанные.Перечисление(ТекПеречисление).Значение(СчетчикЦикла);
ШапкаДокумента.Тип=ТипРекв;
Прервать;
КонецЕсли;
... Т.е. теперь в ТаблицеЗначений:ШапкаДокумента есть одна строка с колонками: "Реквизит"="КодОперации", "Значение"=Поступление ТМЦ (купля-продажа), "Тип"="Перечисление.КодыОпераций"...
//Теперь записываю в документ:
...
ТекДокумент.НазначитьТип(ШапкаДокумента.Реквизит,ШапкаДокумента.Тип);
ТекДокумент.УстановитьАтрибут(ШапкаДокумента.Реквизит,ШапкаДокумента.Значение);
...
//где ТекДокумент=СоздатьОбъект("Документ" ...
И почему-то значение не добавляется в документ... Со справочниками и документами все в порядке, а вот как загрузить перечисление?... Может я чего не понимаю?... Подскажите, плз... Надежда только на вас...
Или может просто, кто подскажет, как из таблицы значений загрузить "перечисление" в документ?...
