Перегрузка 7 - 8. Нужно установить время!

☑

0 Мисти

11.01.16

✎

21:31

Просят установить время при перегрузке в 8 ровно как было в 7. Пока не соображу, как это сделать.

1 MadJhey

11.01.16

✎

22:12

В Пкс ДатаДок при выгрузке объекта
ч=0;
м=0;
с=0;
Источник.ПолучитьВремя(ч, м, ч);

Значение = ""+ДатаГод(Источник.ДатаДок) + ДатаМесяц(Источник.ДатаДок)+ДатаЧисло(Источник.ДатаДок)+ч+м+с;

добавить лидирующие нули, где надо.

2 Мисти

11.01.16

✎

22:14

В Пкс ДатаДок - вот это не очень понятно.
И я через Оле!

3 MadJhey

11.01.16

✎

22:21

а какая разница...
собери дату документа

4 Мисти

11.01.16

✎

23:18

Ладно, попробую, спасибо.

5 Aleksey

12.01.16

✎

01:49

В типовой КД есть встроенная функция
ПолучитьДатуV8(ЧастьДата, ЧастьВремя = "00:00:00")

6 Мисти

12.01.16

✎

17:05

А что там внутри написано? Я же без КД?

7 ДенисЧ

12.01.16

✎

17:09

Обоги...
док.Дата = '20160115151718';

8 Мисти

12.01.16

✎

17:50

Спасибо, это тоже немножко поможет.

9 Мисти

12.01.16

✎

19:13

Ч=0;
            М=0;
            С=0;
            Год=     ДатаГод(Док7.ДатаДок);
            Месяц =   ДатаМесяц(Док7.ДатаДок);
            День   =   ДатаЧисло(Док7.ДатаДок);
            Док7.ПолучитьВремя(Ч,М,С);
            Если СтрДлина(Ч)=1 Тогда
                Ч = "0"+ч;
            КонецЕсли;
            Если СтрДлина(М)=1 Тогда
                М = "0"+М;
            КонецЕсли;
            Если СтрДлина(С)=1 Тогда
                С = "0"+С;
            КонецЕсли;
            Если СтрДлина(Месяц)=1 Тогда
                Месяц = "0"+Месяц;
            КонецЕсли;
            Если СтрДлина(День)=1 Тогда
                День = "0"+День;
            КонецЕсли;

            //ДатаГод(Источник.ДатаДок) + ДатаМесяц(Источник.ДатаДок)+ДатаЧисло(Источник.ДатаДок)+ч+м+с;
            ТекДата = "'"+Год+Месяц+День+Ч+М+С+"'";



ТекДата = "'20150102120520'" - кавычки меня эти беспокоят (это в отладчике так выглядит сконструированная дата)

10 Мисти

12.01.16

✎

19:16

Оно даже и такую '20150115151718' дату не съело.
Получилось 30.12.1899 0:00:00

11 Мисти

12.01.16

✎

20:20

А еще 2 задачи я решаю параллельно вполне успешно!