Имя: Пароль:
LIFE
Юмор
OFF: Пришло время менять программу!!!
,
0 napagokc
 
24.02.12
12:11
Just for fun...
Щас из филиала вопрос пришел - в одном отчете не дает выбрать 2012 год. Можно выбрать с 2004 по 2011 включительно и все. Полез смотреть в код и узрел следующее (ЧислоЛет = 7):

Год = 2004;
СписокВыбора.Добавить(Год);
Для инд = 1 по ЧислоЛет Цикл
   Год = Год + 1;
   Если Год > Год(ТекущаяДата()) Тогда
       инд = ЧислоЛет;
   Иначе
       СписокВыбора.Добавить(Год);
   КонецЕсли;
КонецЦикла;
Если Год < Год(ТекущаяДата())Тогда
   Сообщить("Пришло время менять программу!!! Прошло уже ведь 7 лет!");
КонецЕсли;
1 БибиГон
 
24.02.12
12:13
:)
2 zak555
 
24.02.12
12:14
это что за конфа ?
3 Mnemonic1C
 
24.02.12
12:14
Точно не УПП
4 napagokc
 
24.02.12
12:14
(2) Это самописная конфа :)
5 zak555
 
24.02.12
12:15
(4) версия 1с ?
6 napagokc
 
24.02.12
12:16
(5) 8.2
7 Скользящий
 
24.02.12
12:16
Далеко в будущее смотрят, однако.
8 Азат
 
24.02.12
12:16
(5) Видно же, что не 77
9 neomarat
 
24.02.12
12:17
(0) ну а что... нормально. Точным математическим расчетом автором выведено, что срок устаревания программы - 7 лет.
Скажи спасибо, что форматирование диска после этого не делает.
10 Fish
 
24.02.12
12:17
Программисты прикололись :))
11 napagokc
 
24.02.12
12:17
+(6) Эта 8.2 была переведена с 8.0, которая в свою очередь когда-то давно была переведена с 7.7. Но отчет, вероятно, в 8.0 делался... не знаю. Никаких комментов нет.
12 Asmody
 
24.02.12
12:18
хорошо ещё, что диск не форматирует при этом…
13 Beduin
 
24.02.12
12:18
Позиция = Найти(СокрЛП(НомерСчета),"/");
Если Позиция = 0 Тогда //нет слэша
   Преф = "";
Иначе
   Преф = Сред(СокрЛП(НомерСчета),Позиция,3);
КонецЕсли;

Если (преф = "/03") ИЛИ (преф = "/04") ИЛИ (преф = "/05") ИЛИ (преф = "/06") ИЛИ (преф = "/07") ИЛИ (преф = "/08") ИЛИ (преф = "/09")  ИЛИ (преф = "/10") Тогда

Это при загрузке из сторонней программы.
14 Asmody
 
24.02.12
12:18
(12)+ блин! с учётом (9), я — адский тормоз
15 zak555
 
24.02.12
12:18
(8) как ты определил ?
16 Stim
 
24.02.12
12:19
за такое бьют линейкой по пальцам..
17 PLUT
 
24.02.12
12:19
(0) за определенную плату можно продлить срок использования программы

работает? ничего не трогай!
18 Fish
 
24.02.12
12:20
(16) Если есть кому бить :))) Видно, это человек перед увольнением сделал :)))
19 napagokc
 
24.02.12
12:21
(17) ))))) точняк!
20 dva1c
 
24.02.12
12:21
(15) Я тоже не понял, как?
21 Рэйв
 
24.02.12
12:21
(15)>>СписокВыбора.Добавить(Год);
22 napagokc
 
24.02.12
12:22
(18) Человек остался неопознанным. Мы когда что-то правим, всегда комменты оставляем - кто правил и когда. Иногда еще пишем зачем (если не очевидно). Тут же ничего нет.
23 PLUT
 
24.02.12
12:22
(18) скорее всего сделал, как смог

"не стреляйте в программиста! он кодит как умеет" © не моё
24 Fish
 
24.02.12
12:25
(22) Только сообщение неправильное. Я бы написал так: "Для продления программы отправьте СМС на короткий номер ХХХХ" :))))
25 napagokc
 
24.02.12
12:26
(24) Ага, щас так и исправлю. Только ЧислоЛет увеличу до восьми, чтоб сразу не палиться )))
26 zak555
 
24.02.12
12:26
(21) точно !

ещё и Год
правда про Год() можно было предположить, что есть функция самописная такая =)
27 Jaffar
 
24.02.12
12:40
(22) наивный человек. он был уверен, что через 7 лет кто-то вспомнит, кто в то время был программистом, и у кого-то останутся его контакты (даже если не принимать во внимание вариант, что фирма банально обанкротится)?
28 neomarat
 
24.02.12
12:53
я тоже так на работе делал.
Выдавались справки на год, так вот надо было каждый год продлевать в коде намеренно.
А все потому что однажды вызвал гл. бух и сказал - а че ты ничего не делаешь с программой, а мы тебе за нее доплату платим.
После простой строчки кода - такого вопроса больше не возникало.
Студентом правда был еще тогда.
29 Aswed
 
24.02.12
12:56
(0) Порадовал)))))))))))))
Надо такую же пасхалочку замутить)))))))
30 1Сергей
 
24.02.12
13:21
31 PLUT
 
24.02.12
13:25
(30) первое слово на русский переводится - ну них.я себе??!!!
32 Jaffar
 
24.02.12
13:41
(30) прикольная аркада была!