Имя: Пароль:
1C
1С v8
СледующаяДата
,
0 Kamich
 
27.03.13
16:51
Добрый день, как мне получить следующую дата, если дата=датой праздника.
К примеру
Если следующая дата равняется 08.03.2013,т.е.праздник 8 марта, то в поле дата указывается не 08.03.2013 а 09.03.2013.
Сделал вот это,не пойму что не так:
б="08.03.2013";
в="09.05.2013";
г="01.10.2013";
ДатаП1=Дата+(86400*7);
Если ДатаП1=а или ДатаП1=б или ДатаП1=в или ДатаП1=г Тогда
Дата1=ДатаП1+86400;
Иначе
Дата1=ДатаП1;
1 Господин ПЖ
 
27.03.13
16:51
дерьмокод... даже не читая понятно
2 Господин ПЖ
 
27.03.13
16:52
за

б="08.03.2013";
в="09.05.2013";
г="01.10.2013";

отдельное спасибо...
3 rbcvg
 
27.03.13
16:53
магнитные бури, наверное
v8: Проблема с циклом...
4 Kamich
 
27.03.13
16:53
(2) Я начинающий.
И так сказать экспериментирую)
5 Господин ПЖ
 
27.03.13
16:54
(4) буквари читать уже не модно? экспериментаторы куевы...
6 Kamich
 
27.03.13
16:54
(2) (3) Что предложите?
7 Господин ПЖ
 
27.03.13
16:54
(6) стена там ->
8 miki
 
27.03.13
16:55
(6)а если "следующий день" - воскресенье?
9 Kamich
 
27.03.13
16:56
(5) Следите за словами
10 Kamich
 
27.03.13
16:57
(5) Или вы то же "экспериментаторы куевы...",ведь когда то и Вы были такими!
11 rbcvg
 
27.03.13
16:57
(6) ты скажи для чего это тебе, небось в типовых полно готового, а ты велики изобретаешь.
12 Kamich
 
27.03.13
16:57
(8) И такой вариант то же нужно будет уследить
13 Господин ПЖ
 
27.03.13
16:57
(10) я книжки читал...
14 Kamich
 
27.03.13
16:58
(8) Есть варианты как это реализовать?
15 Господин ПЖ
 
27.03.13
16:58
(12) поищи в типовых, в районе зупа под производственным календарем
16 Kamich
 
27.03.13
16:58
(13) Кто читает просто книжки,кто читает Эл.книжки, кого то обучают
17 Dionisious
 
27.03.13
16:59
вместо "08.03.2013" надо '20130308'
18 hhhh
 
27.03.13
16:59
(16) регистр сведений регламентированный производственный календарь кури.
19 Господин ПЖ
 
27.03.13
17:00
(16) ну да... а ты просто палкой тыкаешь
20 rbcvg
 
27.03.13
17:03
РегламентированныйПроизводственныйКалендарь.ВидДня
21 Kamich
 
27.03.13
17:03
(19) Уже перешли на ты.Рано!

Не суди по другим ну или по себе.
Если Вы знаете это то почему бы не подсказать,в конце концов,зачем Вы тУТ?!Для чего начинающие заходят на этот сайт?
22 Maxus43
 
27.03.13
17:03
какая конфа? ЗУП, УПП и иже с ними всё уже придумали за тебя
23 Kamich
 
27.03.13
17:04
(22) Это самописка(Тестовая)
24 Maxus43
 
27.03.13
17:05
(23) каким образом собираемся определять праздничные дни?
25 miki
 
27.03.13
17:06
(24)
>>
б="08.03.2013";
в="09.05.2013";
г="01.10.2013";
26 Kamich
 
27.03.13
17:06
(24) а="08.03.2013"
Или есть другие варианты
27 Kamich
 
27.03.13
17:07
(26) Или есть другие варианты?
28 rbcvg
 
27.03.13
17:08
(27) полно, и все рабочие в отличие от твоего.
29 Maxus43
 
27.03.13
17:08
б="08.03.2013" - не кавычки, а ` апострофы.
30 rbcvg
 
27.03.13
17:09
Как явно указать нужную дату?
'20050308'
Дата(2005, 1, 1)
Дата(1, 1, 1)
Дата(2005, 1, 1, 10, 29, 50)
ДАТАВРЕМЯ(2005, 01, 01)
31 Kamich
 
27.03.13
17:09
(29) {Обработка.Обработка1.Форма.Форма(26,3)}: Ожидается выражение
б=<<?>>`08.03.2013`;
32 Reset
 
27.03.13
17:10
(31) Нужен другой, православный апостороф: '
33 Maxus43
 
27.03.13
17:11
(32) да, спутал)
ну и надо '20130308'
34 Reset
 
27.03.13
17:11
ну и формат даты как в (30)
35 Reset
 
27.03.13
17:11
(33) +1
36 MishaD
 
27.03.13
17:11
Чтобы не заморачиваться с апострофами пишу Дата(2013,8,1)
37 Reset
 
27.03.13
17:12
(34) точнее "формат литерала даты"
38 Reset
 
27.03.13
17:13
(36) Я тоже так пишу, но с другой стороны, смотри, мы же не пишем Число(999) ;) а сразу 999.
39 Reset
 
27.03.13
17:14
(38) это из категории "забавное"
40 Reset
 
27.03.13
17:14
точнее Число("999")
41 hhhh
 
27.03.13
17:14
а что у нас первого октября? Разве праздник?
42 Reset
 
27.03.13
17:16
Если Чтото=Булево("Истина") тогда
:D
43 Kamich
 
27.03.13
17:17
(30) (36) (33) Спасибо ребят)

А можно  это все писать в виде структура.
Т.е. к примеру чтобы не писать и перечислять в условиях типа:
Если ДатаП1=Дата(2013, 3, 8) ИЛИ ДатаП1=Дата(2013, 5, 9) Тогда
....
КонецЕсли;


А что-то вроде:
Если ДатаП1=ПроверочныеДаты Тогда
....
КонецЕсли;
44 Kamich
 
27.03.13
17:17
(41) День учителя)
45 Maxus43
 
27.03.13
17:18
(43) массив дат делай, потом Если МассивПраздничных.Найти(ИскомаяДата) Тогда....
46 MishaD
 
27.03.13
17:18
(38) Я апострофы путаю постоянно, да и лень язык переключать.
47 НафНаф
 
27.03.13
17:19
(46) зачем переключать? есть спец раскладка Чистова
48 Reset
 
27.03.13
17:19
(43)
еще вариант к (45)
ПразничныйДень=Новый Соответсвие;
ПразничныйДень.Вставить(Дата(2013,3,8),Истина);
ПразничныйДень.Вставить(Дата(2013,5,9),Истина);
....

Если ПразничныйДень[ДатаП1]=Истина тогда
49 Kamich
 
27.03.13
17:21
(45) (48) Спасибо Вам)
Помогли)))
Благодарю)
50 НафНаф
 
27.03.13
17:21
а что автор то делает в целом?
51 Maxus43
 
27.03.13
17:23
(50) выносит мозг мисте
52 Зойч
 
27.03.13
17:23
вместо '20050308'
удобнее писать '2005-03-08'. Читабельность повышается значительно
53 Kamich
 
27.03.13
17:24
А что -то вроде такого реализовать можно?:
ПразничныйДень.Вставить(Дата(ТекущийГод,3,8),Истина);
54 Maxus43
 
27.03.13
17:25
(53) нет
55 НафНаф
 
27.03.13
17:25
(53) можно
56 Maxus43
 
27.03.13
17:25
я против
57 НафНаф
 
27.03.13
17:25
я бы юзал производственный календарь, а то завтра отменят празднование первого мая и приплыли
58 Kamich
 
27.03.13
17:26
(55) Чем можно заменить?
59 Kamich
 
27.03.13
17:26
(58) ТекущийГод
60 НафНаф
 
27.03.13
17:27
(59) ТекущийГод = Год(ТекущаяДата());
61 Kamich
 
27.03.13
17:28
(60) Спасибо)
62 Kamich
 
27.03.13
17:29
(60) (48) (45) (30) Всем спасибо)