|
Отбор пример | ☑ | ||
---|---|---|---|---|
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) и индекс))
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |