|
v7: Вычислить количество дней
| ☑ |
0
work92
02.08.13
✎
09:43
|
Есть выборка Выбираю документы за период.
Например выбрал документы есть 2 дока в них нужно посчитать дней от даты началы до даты конца .Использую созданный календарь и функцию Календ.Дней но веровно выдоет результат (0).Может кто подскажет решение проблемы
Таб=СоздатьОбъект("Таблица");
таб.ИсходнаяТаблица("Таблица");
Таб.вывестисекцию("шапка");
ДокументОТ=СоздатьОбъект("Документ.ПриказПоОтпуску");
ДокументБЛ=СоздатьОбъект("Документ.БольничныйЛист");
Календ=СоздатьОбъект("Календарь.БЛ");
ДатаОТ=ДобавитьМесяц(КонМесяца(рабочаядата()),-1);
КонДатаОТ=ДобавитьМесяц(рабочаядата(),-7);
ДокументБЛ.Выбратьдокументы(КонДатаОТ,ДатаОТ);
Пока ДокументБЛ.ПолучитьДокумент()=1 Цикл
Если ДокументБЛ.Проведен()=1 Тогда
Если ДокументБЛ.Сотрудник=Сотрудник1 Тогда
НомБЛ=ДокументБЛ.НомерДок;
ФИОБЛ=ДокументБЛ.Сотрудник;
ДНЧБЛ=ДокументБЛ.Начало; // Дата Начало
ДНКБЛ=ДокументБЛ.Окончание;///Дата окончания
ДниБЛ=Календ.Дней(ДНЧБЛ,ДНКБЛ);
Таб.вывестисекцию("Строка2");
КонецЕсли;
КонецЕсли;
КонецЦикла;
Таб.Вывестисекцию("Итог");
Таб.Показать();
|
|
1
Любопытная
02.08.13
✎
09:44
|
Мозг сломался об орфографические ошибки(
|
|
2
1Сергей
02.08.13
✎
09:45
|
Календарные дни и без календаря посчитать можно
|
|
3
work92
02.08.13
✎
09:47
|
как
|
|
4
work92
02.08.13
✎
09:49
|
1Сергей а как подсчитать очень нужно
|
|
5
1Сергей
02.08.13
✎
09:49
|
ДниБЛ = ДНКБЛ - ДНЧБЛ;
|
|
6
work92
02.08.13
✎
09:51
|
1Сергей СП
|
|
7
Chum
02.08.13
✎
09:53
|
А НомерДняГода нельзя применить?
|
|
8
cincout
02.08.13
✎
09:58
|
"выдоет" - от слова "доить"?
|
|
9
vinogradъ
02.08.13
✎
10:00
|
|
|
10
Jaffar
02.08.13
✎
10:04
|
(8) а "веровно" тебя не смущает?
вероятно, вероломно?
|
|
11
Jaffar
02.08.13
✎
10:05
|
"в них нужно посчитать дней"
посчитать дней, куриц, яиц...
"от даты началы (???) до даты конца"
тогда уж "от даты началы до даты концы"
|
|