|   |   | 
| 
 | Отбор пример | ☑ | ||
|---|---|---|---|---|
| 0
    
        Doman26 28.07.11✎ 12:08 | 
        Дайте какой нить простой пример отбора. Задача - взять запись регистра сведений по измерению и взять из него ресурс, знаю что легче легкого, но все же     | |||
| 1
    
        vicof 28.07.11✎ 12:22 | 
        кури СрезПоследних()     | |||
| 2
    
        zbv 28.07.11✎ 12:23 | 
        ВЫБРАТЬ
  НужныйРегистрСведений.НужныйРесурс ИЗ РегистрСведений.НужныйРегистрСведений КАК НужныйРегистрСведений ГДЕ НужныйРегистрСведений.НужноеИзмерение = &ОтборПоИзмерению - это для независимого, непериодического регистра сведений | |||
| 3
    
        Wobland 28.07.11✎ 12:24 | 
        (0) запрос?     | |||
| 4
    
        Doman26 28.07.11✎ 12:24 | 
        (2)запросом я знаю, я хотел отбором это сделать, для ликбеза     | |||
| 5
    
        Doman26 28.07.11✎ 12:25 | 
        отбор.добавить или как там?     | |||
| 6
    
        zbv 28.07.11✎ 12:27 | 
        (4) тогда смотри СП, там должен быть пример.     | |||
| 7
    
        PVV65 28.07.11✎ 12:29 | 
        КурсыВалют = РегистрыСведений.КурсыВалют;
  НаборКурсов = КурсыВалют.СоздатьНаборЗаписей(); Доллар = Справочники.Валюты.НайтиПоНаименованию("USD"); НаборКурсов.Отбор.Валюта.Установить(Доллар); НаборКурсов.Отбор.Период.Установить(НачалоДня(ТекущаяДата())); НаборКурсов.Прочитать(); Если НаборКурсов.Количество() = 0 Тогда НовыйКурс = НаборКурсов.Добавить(); НовыйКурс.Валюта = Доллар; НовыйКурс.Период = ТекущаяДата(); ИначеЕсли НаборКурсов.Количество() = 1 Тогда НовыйКурс = НаборКурсов[0]; Иначе Предупреждение("Курс валюты задается один раз в день.", 60); Возврат; КонецЕсли; НовыйКурс.Курс = 31.44; НовыйКурс.Кратность = 1; НаборКурсов.Записать(); Сообщить("Курс " + СокрЛП(НовыйКурс.Валюта) + " на сегодня: "+ НовыйКурс.Курс + " руб."); | |||
| 8
    
        Doman26 28.07.11✎ 12:33 | 
        (7) спасибо     | |||
| 9
    
        Doman26 28.07.11✎ 12:50 | 
        (6) а что такое сп?     | |||
| 10
    
        Wobland 28.07.11✎ 12:51 | ||||
| 11
    
        Doman26 28.07.11✎ 14:19 | 
        Вот такой отбор, почему то не работает, хотя записи есть, Может не так параметры отбора передаю (это реквизиты документа, в модуле котором нахожусь) 
  Регистры = РегистрыСведений.CW_ПараметрыДоговора; НаборДог = Регистры.СоздатьНаборЗаписей(); НаборДог.Отбор.контрагент.Установить(Контрагент); НаборДог.Отбор.ДоговорКонтрагента.Установить(ДоговорКонтрагента); Если НаборДог.Количество() = 1 Тогда Область.Параметры.Руководитель = НаборДог.Руководитель; Область.Параметры.ГлавныйБухгалтер = НаборДог.ГлавныйБухгалтер; КонецЕсли; подскажите в чем дело | |||
| 12
    
        zbv 28.07.11✎ 14:20 | 
        (11) прочитать записи забыл.     | |||
| 13
    
        Doman26 28.07.11✎ 14:53 | 
        (12) и индекс))     | 
| Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |