|
Приход в начало дня, расход в конец. | ☑ | ||
---|---|---|---|---|
0
Sj
22.03.12
✎
21:40
|
Доброе время суток!
Не подскажете такую обработку, которая кидает приходные накладные в начало дня, а расходные в конец? |
|||
1
ДенисЧ
22.03.12
✎
21:41
|
А самому? Там работы на 15 минут...
|
|||
2
Рэйв
22.03.12
✎
21:43
|
для приходных:
ПередЗаписью() Дата= НачалоДня(Дата); для Расходных: ПередЗаписью() Дата= КонецДня(Дата); |
|||
3
Wobland
22.03.12
✎
21:44
|
(0) нет. делов на полчаса с перекурами
|
|||
4
Sj
22.03.12
✎
21:46
|
(2) нет слов. А. Есть! Спасибо!
|
|||
5
МихаилМ
22.03.12
✎
22:02
|
все документы - одним времененм - не гуд
|
|||
6
Рэйв
22.03.12
✎
22:04
|
(5)доктор сказал в морг- значит в морг.
|
|||
7
Sj
23.03.12
✎
01:33
|
Может кому пригодиться:
Процедура ОбработатьДокументы( Что, Как) Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | ПоступлениеТоваровУслуг.Ссылка |ИЗ | Документ.ПоступлениеТоваровУслуг КАК ПоступлениеТоваровУслуг |ГДЕ | ПоступлениеТоваровУслуг.Дата МЕЖДУ &НачПериода И &КонПериода"; Если Как = 1 Тогда Запрос.Текст = СтрЗаменить(Запрос.Текст,"ПоступлениеТоваровУслуг","РеализацияТоваровУслуг"); КонецЕсли; Запрос.Параметры.Вставить("НачПериода",НачалоДня(НачПериода)); Запрос.Параметры.Вставить("КонПериода",КонецДня(КонПериода)); Сообщить("Начало " + ТекущаяДата()); Выборка= Запрос.Выполнить().Выбрать(); Дельта = 1; День = 0; Пока Выборка.Следующий() Цикл Состояние( Выборка.Ссылка.Дата); Док = Выборка.Ссылка.ПолучитьОбъект(); //Сообщить( Док ); Если День(Док.Дата) = День Тогда Дельта = Дельта + 1; Иначе Дельта = 1; День = День(Док.Дата); КонецЕсли; Док.Дата = ?(Как = -1, НачалоДня(Док.Дата), КонецДНя(Док.Дата)) + Дельта * ( - Как); Док.Записать(); Сообщить( Док ); КонецЦикла; Сообщить("Окончание " + ТекущаяДата()); КонецПроцедуры Процедура ОсновныеДействияФормыПриход(Кнопка) ОбработатьДокументы("ПоступлениеТоваровУслуг", -1); КонецПроцедуры Процедура ОсновныеДействияФормыРасход(Кнопка) ОбработатьДокументы("РеализацияТоваровУслуг", 1); КонецПроцедуры |
|||
8
FIXXXL
23.03.12
✎
05:37
|
а Групповая даты не меняет?
|
|||
9
FIXXXL
23.03.12
✎
05:38
|
+ ну и перепровести
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |