|
V8: Нужен аналог "В начало дня" и "В конец дня" |
☑ |
0
Asmody
24.08.04
✎
16:16
|
т.е. нужно получить момент времени "перед самым первым документом этого дня" и "после самого последнего". НачалоДня() и КонецДня() не катит...
|
|
1
Волшебник
24.08.04
✎
16:21
|
расскажи задачу
|
|
2
Asmody
24.08.04
✎
16:29
|
в 7.7 было такое окно в журналах документов "Изменить время документа".
вот надо нечто похожее...
|
|
3
Asmody
24.08.04
✎
21:45
|
подъем!
|
|
4
NS
24.08.04
✎
22:03
|
секунду вычти. (-1)
|
|
5
Asmody
24.08.04
✎
23:26
|
(4) из чего? как найти "самый первый документ"?
|
|
6
fez
24.08.04
✎
23:41
|
(5) Совсем мозги заплесневели? Выбираешь все документы за день, встаешь на первую запись в выборке.
|
|
7
Asmody
25.08.04
✎
11:25
|
(6) в 8ке? ну-ка расскажите мне как в 8ке организовать выборку документов _всех_ видов?
|
|
8
Asmody
25.08.04
✎
11:27
|
(7)+ желательно, запросом
|
|
9
Asmody
25.08.04
✎
14:35
|
надо
|
|
10
Asmody
26.08.04
✎
12:22
|
в общем ясно, пока сам не сделаешь, ни одна собака не пошевелится...
оказалось сольрешения вопроса в процедурке:
Процедура КоманднаяПанель1ОК(Кнопка)
ДокументОбъект=Документ.ПолучитьОбъект();
Если ВНачалоДня=1 Тогда
ДокументОбъект.УстановитьВремя(РежимАвтоВремя.Первым,Истина);
ИначеЕсли ВНачалоДня=2 Тогда
ДокументОбъект.УстановитьВремя(РежимАвтоВремя.Последним,Истина);
ИначеЕсли ВНачалоДня=3 Тогда
ДокументОбъект.Дата=ТекущаяДата();
ИначеЕсли ВНачалоДня=4 Тогда
ДатаДок=НачалоДня(ДокументОбъект.Дата);
ДокументОбъект.Дата=ДатаДок+(УказанноеВремя-'00010101');
КонецЕсли;
ДокументОбъект.Записать(РежимЗаписиДокумента.Запись);
Закрыть();
КонецПроцедуры
|
|