Имя: Пароль:
1C
 
Как получить дату в формате ггггммдд?
0 aleks100
 
28.07.15
13:55
Как получить дату в формате ггггммдд?
1 Волшебник
 
модератор
28.07.15
13:55
функцией Формат
2 Timon1405
 
28.07.15
13:57
почем нынче такие полоски продают?
3 aleks100
 
28.07.15
13:58
Функция ДатаВСтроку(Дата1С)
                Результат = Формат(Год(Дата1С),"ЧГ=0") + ?(СтрДлина(Строка(Месяц(Дата1С))) < 2,"0" + Строка(Месяц(Дата1С)) , Строка(Месяц(Дата1С)))
                + ?(СтрДлина(Строка(День(Дата1С))) < 2, "0" + Строка(День(Дата1С)), Строка(День(Дата1С))) ;
                
                
                Возврат Результат;
КонецФункции
4 Ёпрст
 
гуру
28.07.15
13:58
(3) извращенец
5 Ёпрст
 
гуру
28.07.15
13:59
"ДФ=yyyyMMdd"
6 drcrasher
 
28.07.15
14:01
(3) но зачем?
7 eklmn
 
гуру
28.07.15
14:01
(3) звиздец!!! в дворники, срочно!
8 drcrasher
 
28.07.15
14:01
(0) религия позволяет вот такое использовать Формат(ПериодЖурнала, "ДФ=yyyyMMdd") ?
9 aleks100
 
28.07.15
14:02
понял ошибку  https://helpf.pro/faq8/view/942.html
10 drcrasher
 
28.07.15
14:05
я сдаюсь
11 fisher
 
28.07.15
14:14
(9) Это... Это.... Это не может быть правдой!
12 fisher
 
28.07.15
14:15
"Функция переводит Дату в формате 1С в формат вида 'YYYYMMDD hh:mm:ss' и обратно".
Ааааа, убейте меня веником :)
13 stix2010
 
28.07.15
14:16
(3)  эта жесть
14 Fish
 
гуру
28.07.15
14:17
(12) Не, в оригинале всё-таки круче: Функция переводит дату в формате 1С в международный текстовый формат вида 'YYYYMMDD hh:mm:ss' :))
15 fisher
 
28.07.15
14:18
И обратно! Не забывайте про обратно! Чувак даже до литералов не добрался!
16 Fish
 
гуру
28.07.15
14:19
(15) А я считаю, что это гениально и сверхуниверсально:
"               Если ФорматДаты="дмг" тогда
                               День = Список[0]; Месяц = Список[1]; Год = Список[2];
                ИначеЕсли ФорматДаты="мдг" тогда
                               День = Список[1]; Месяц = Список[0]; Год = Список[2];
                ИначеЕсли ФорматДаты="гмд" тогда
                               День = Список[2]; Месяц = Список[1]; Год = Список[0];
                Иначе
                               День = 1; Месяц = 1; Год = 1;
                КонецЕсли;
   "
17 stix2010
 
28.07.15
14:20
есть подозрение что это копипаст из 7.7
18 fisher
 
28.07.15
14:23
Не, это восьмерочный код.
21 Smallrat
 
28.07.15
14:47
да в ЗУПе тоже было

НомерГода = Число(Прав(Год(ТекущаяДата()), 1));
ДатаМесяца = Дата(НомерГода, НомерМесяца, 1);

Успешно валилось в 2010 году
22 Jofa
 
28.07.15
14:59
(16)(3)Круто ! Все ужо забыли как быдлокодили? А потом когда смотря на свои супер мега обработки говорили кто это писал что за макдак?
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший