Вход | Регистрация

1С:Предприятие ::

Метки:

Почему не сохраняются значения подчиненного справочника?

Я
   Lazarus
 
22.04.04 - 13:01
Есть простетская обработка, которая должна перезаписать все значения большие чем указано в элементе диалога Колонка.
Причем отображает все верно, но вот перезаписывать не хочет... хотя ошибок никаких не выдает. Не подскажите где грабли?
//*******************************************

Процедура Сформировать()
    Пользов=СоздатьОбъект("Справочник.Пользователи");
    ДискрЦенДоп=СоздатьОбъект("Справочник.ДискретныеЦеныДопуски");
    
    Пользов.ВыбратьЭлементы(1);
    номер=0;
    Пока Пользов.ПолучитьЭлемент()=1 Цикл
        ТекПольз=Пользов.ТекущийЭлемент();
        Влад=ДискрЦенДоп.ИспользоватьВладельца(ТекПольз);
        ДискрЦенДоп.ВыбратьЭлементы(1);  
        Пока ДискрЦенДоп.ПолучитьЭлемент()=1 Цикл    
Если (ДискрЦенДоп.ТекущийЭлемент().Наименование=строка(Выбтов)) тогда
Если число(ДискрЦенДоп.ТекущийЭлемент().Колонка)>колонка тогда        
сообщить(строка(ТекПольз)+" "+строка(ДискрЦенДоп.ТекущийЭлемент().Колонка));                    
ДискрЦенДоп.ТекущийЭлемент().Колонка=Колонка;   
ДискрЦенДоп.Записать();
конецесли;
Конецесли;
        Конеццикла;
    состояние("обрабатывается "+строка(ТекПольз));
    номер=номер+1;
    КонецЦикла;
    сообщить(номер);
КонецПроцедуры
 
  Рекламное место пустует
   Gavrila
 
1 - 22.04.04 - 13:04
В строке ДискрЦенДоп.ТекущийЭлемент().Колонка=Колонка;
пиши ДискрЦенДоп.Колонка=Колонка;
   Lazarus
 
2 - 22.04.04 - 13:08
тьфу, блин... точно.
Вот она невнимательность, ведь наступал же уже на эти грабли ;-(

Спасибо, раскрыли глаза ;-)


Список тем форума
Рекламное место пустует   Рекламное место пустует
Программист всегда исправляет последнюю ошибку.
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.
Ветка сдана в архив. Добавление сообщений невозможно.
Но вы можете создать новую ветку и вам обязательно ответят!
Каждый час на Волшебном форуме бывает более 2000 человек.
Рекламное место пустует