Имя: Пароль:
1C
1С v8
Рс Непериодический не зависимый
, ,
0 KonstantinK90
 
15.10.15
11:29
Всем добрый день! Есть РС "Автомобили", Как установить отбор по не обходимой записи и изменить ее вишу вот так и не знаю что дальше делать
Для Каждого Стр Из Не_НайденныеАвто Цикл
        Если стр.Установить Тогда    
Запрос = Новый запрос;
Запрос.Текст = "ВЫБРАТЬ
               |    уатПервоначальныеСведенияТС.ОсновноеСредство КАК ОС,
               |    уатПервоначальныеСведенияТС.VIN,
               |    уатПервоначальныеСведенияТС.НомерШасси,
               |    уатПервоначальныеСведенияТС.ГосударственныйНомер,
               |    уатПервоначальныеСведенияТС.Модель
               |ИЗ
               |    РегистрСведений.уатПервоначальныеСведенияТС КАК уатПервоначальныеСведенияТС
               |ГДЕ
               |    уатПервоначальныеСведенияТС.VIN = &вин";
    
    Запрос.УстановитьПараметр("Вин",Стр.Вин_Номер);
    
    ВЫборка = Запрос.ВЫполнить().Выбрать();
    
    Пока Выборка.Следующий() Цикл
        МенеджерЗаписи = РегистрыСведений.уатПервоначальныеСведенияТС.СоздатьНаборЗаписей();
        МенеджерЗаписи.Отбор.ОсновноеСредство.Установить(Стр.ОС);
        //Что дальше делать незнаю
        
        МенеджерЗаписи.Прочитать();
        МенеджерЗаписи.Записать();
        
    КонецЦикла;
    
    КонецЕсли;    
КонецЦикла;
1 cw014
 
15.10.15
11:31
Какие измерения у рс?
2 KonstantinK90
 
15.10.15
11:33
ОсновноеСредство,ГосНомер
3 The_SpecialOne
 
15.10.15
11:36
Между Прочитать() и Записать()

МенеджерЗаписи.Прочитать();
МенеджерЗаписи.НомерШасси = НовыйНомерШасси;
МенеджерЗаписи.Записать();
4 ibreiter
 
15.10.15
11:36
Запрос вам не нужен
5 KonstantinK90
 
15.10.15
11:37
да я по началу пробовал сделать отбор по вин номеру
6 KonstantinK90
 
15.10.15
11:41
МенеджерЗаписи.НомерШасси пишет поле объекта не обнаружено
7 cw014
 
15.10.15
11:43
Потому что нету у "РегистраСведенийНаборЗаписей" такого поля. Оно есть у "РегистрСведенийЗапись" и "РегистрСведенийМенеджерЗаписи"

Используй последнее, и заполняй все измерения
8 ibreiter
 
15.10.15
11:43
Нет значит такого поля
9 KonstantinK90
 
15.10.15
11:47
последние это СоздатьМенеджерЗаписи или что?
10 KonstantinK90
 
15.10.15
11:49
пишу вот так он ругается говорит поле отбор не найдено
МенеджерЗаписи = РегистрыСведений.уатПервоначальныеСведенияТС.СоздатьМенеджерЗаписи();
        МенеджерЗаписи.Отбор.ГосударственныйНомер_.Установить(Стр.ГосНомер);
        //Что дальше делать незна
        
        МенеджерЗаписи.Прочитать();
        МенеджерЗаписи.VIN = "123";
        
        МенеджерЗаписи.Записать();
11 KonstantinK90
 
15.10.15
11:49
ГосударственныйНомер_ это измерение в РС
12 cw014
 
15.10.15
11:49
У менеджера записи нет отбора
13 cw014
 
15.10.15
11:50
Почитайте матчасть, поучитесь, там все разжовано
14 KonstantinK90
 
15.10.15
11:52
обязательно почитаю спасибо! просто сейчас край это нужно сделать
15 cw014
 
15.10.15
11:55
Если стр.Установить Тогда    
Запрос = Новый запрос;
Запрос.Текст = "ВЫБРАТЬ
               |    уатПервоначальныеСведенияТС.ОсновноеСредство КАК ОС,
               |    уатПервоначальныеСведенияТС.VIN,
               |    уатПервоначальныеСведенияТС.НомерШасси,
               |    уатПервоначальныеСведенияТС.ГосударственныйНомер,
               |    уатПервоначальныеСведенияТС.Модель
               |ИЗ
               |    РегистрСведений.уатПервоначальныеСведенияТС КАК уатПервоначальныеСведенияТС
               |ГДЕ
               |    уатПервоначальныеСведенияТС.VIN = &вин";
    
    Запрос.УстановитьПараметр("Вин",Стр.Вин_Номер);
    
    ВЫборка = Запрос.ВЫполнить().Выбрать();
    
    Пока Выборка.Следующий() Цикл
        МенеджерЗаписи = РегистрыСведений.уатПервоначальныеСведенияТС.СоздатьМенеджерЗаписи();
        МенеджерЗаписи.ОсновноеСредство = Стр.ОС;
        МенеджерЗаписи.ГосударственныйНомер = Стр.ГосударственныйНомер;
        МенеджерЗаписи.<что то что ты хотел изменить> = <то, на что хочешь изменить>
        ...
        МенеджерЗаписи.<что то что ты хотел изменить> = <то, на что хочешь изменить>
        
        МенеджерЗаписи.Записать();
        
    КонецЦикла;
    
    КонецЕсли;    
КонецЦикла;
16 ibreiter
 
15.10.15
11:59
(14) Да ладно))
17 KonstantinK90
 
15.10.15
12:04
не правильно работает как вы сказали он создает новую запись а мне нужно что бы он искал необходимую и перезатирал точ то мне нужно
18 KonstantinK90
 
15.10.15
12:08
вот так я сделал и работает правильное
МенеджерЗаписи = РегистрыСведений.уатПервоначальныеСведенияТС.СоздатьНаборЗаписей();
        МенеджерЗаписи.Отбор.ГосударственныйНомер_.Установить(Стр.ГосНомер);
        МенеджерЗаписи.Прочитать();
        Для Каждого Запись ИЗ МенеджерЗаписи Цикл
                  Запись.VIN = "1236";
            КонецЦикла;
        
        МенеджерЗаписи.Записать();
19 ibreiter
 
15.10.15
12:14
Правильное и будет работать
20 hhhh
 
15.10.15
12:22
(18) физически он всё равно новую создает, а старую стирает. Когда вы уже запомните? Нет там перезатирания.
Есть два вида языков, одни постоянно ругают, а вторыми никто не пользуется.