ADODB: загрузка документов из 1С7.7 в 1С8.1. Получаем время документа

17.05.11

Интеграция - Обмен между базами 1C

Для новичков!!!

_1SJOURN
DATE_TIME_IDDOC
«2009011385UHM8  EDMU»
как получить время?

Возможно, кто-то задался целью загружать документы из 1С7.7 в 1С 8.1  прямыми запросами. Тогда вы наверняка столкнетесь с тем, что в таблице _1SJOURN дата и время документа выглядит несколько странно.

То есть,  значение в поле «DATE_TIME_IDDOC» выглядит как, например, «2009011385UHM8  EDMU»

85UHM8 и есть так нужное нам время. Как же его привести к виду 1С8.1?

Лично мне понадобилось некоторое время, чтобы решить проблему.

Для начала, в прямом запросе разделим дату и время:

….

|SELECT    

|Convert(Char(8),_1SJOURN.DATE_TIME_IDDOC) as Date,

|Substring(_1SJOURN.DATE_TIME_IDDOC,9,6) as Time,

На широких просторах интернета мне удалось найти лишь такое решение:

Функция Конвертировать36_10(Рез36)

            Если СокрЛП(Рез36)="" тогда

                        Возврат "0";

            КонецЕсли;

            Arr36 = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";

            Deci=0;

            Для j=1 по СтрДлина(СокрЛП(Рез36)) цикл

                                   Deci = Deci*36;

                                   Deci = Deci+Найти(Arr36,Сред(СокрЛП(Рез36),j,1))-1;

            КонецЦикла;

            Возврат Deci:

КонецФункции

Но этого явно не достаточно для решений нашей проблемы…

Конечный вид функции после доработки:

Функция Конвертировать36_Стр(Рез36)

            Если СокрЛП(Рез36)="" тогда

                        Возврат "0";

            КонецЕсли;

            Arr36 = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ";

            Deci=0;

            Для j=1 по СтрДлина(СокрЛП(Рез36)) цикл

                                   Deci = Deci*36;

                                   Deci = Deci+Найти(Arr36,Сред(СокрЛП(Рез36),j,1))-1;

            КонецЦикла;

            Deci=Deci/10000;

            час = Цел(Deci/3600);

            ЧасСек = час*3600;

            Остаток = Deci-ЧасСек;

            мин = Цел(Остаток/60);

            минСек = мин*60;

            Остаток = Остаток-минСек;

            Сек = Остаток;

            Возврат Формат(Час,"ЧЦ=2;ЧВН=;ЧН=") + "" + Формат(Мин,"ЧЦ=2;ЧВН=;ЧН=") + ""+Формат(Сек,"ЧЦ=2;ЧВН=;ЧН=");

КонецФункции

 

Вот теперь можем смело писать дату и время документа:

НовДок.Дата = Дата(""+Набор.Fields("Date").Value + Конвертировать36_Стр(Набор.Fields("Time").Value) );

 PS: Предназначено для бухгалтерских конфигураций)

См. также

SALE! 20%

Перенос данных из УПП 1.3 в ERP 2 / УТ 11 / КА 2. Переносятся документы, справочная информация и остатки

Обмен между базами 1C Платформа 1С v8.3 1С:Управление производственным предприятием 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос документов, начальных остатков и справочной информации из УПП 1.3 в ERP 2 | из УПП 1.3 в УТ 11 | из УПП в КА 2 | Правила конвертации (КД 2) в продаже с 2015 года, постоянно работаем над их развитием | Более 360 предприятий выполнили переход с использованием этого продукта! | Сэкономьте время - используйте готовое решение для перехода! | Позволяет перенести из УПП 1.3 в ERP / УТ 11 / КА 2 всю возможную информацию | В переносе есть фильтр по организации и множество других опциональных параметров выгрузки | Есть несколько алгоритмов выгрузки остатков на выбор

45650 36520 руб.

04.08.2015    159724    364    267    

345

SALE! 15%

[ED3] Обмен для ERP 2.5, КА 2.5, УТ 11.5 БП 3.0, Розница, УНФ и других с EnterpriseData (универсальный формат обмена), правила обмена

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Россия Платные (руб)

Правила в универсальном формате обмена для ERP 2.5, КА 2.5, УТ 11.5, БП 3.0, Розница, УНФ, для последних версий конфигураций. Ссылки на другие конфигурации в описании публикации. Правила совместимы со всеми другими версиями конфигураций новыми и старыми, поддерживающими обмен в формате EnterpriseData. Не требуется синхронного обновления правил после обновления другой конфигурации, участвующей в обмене. Типовой обмен через планы обмена кнопкой Синхронизация вручную или автоматически по расписанию, или вручную обработкой.

25080 22572 руб.

12.06.2017    134967    721    291    

388

SALE! 20%

Перенос данных из ERP 2 / КА 2 / УТ 11 в БП 3.0. Переносятся документы, начальные остатки и справочники

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

Перенос данных из ERP в БП 3 | из КА 2 в БП 3 | из УТ 11 в БП 3 | из ЕРП в БП 3 | В продаже с 2019г. | Воспользовались более 176 предприятий! | Сэкономьте время - используйте готовое решение для перехода! | Перенос разработан в формате КД 2 (правила конвертации данных) | Переносятся все возможные виды документов, начальных остатков и нормативно-справочная информация| Можно опционально выгружать каждую пару "номенклатура+характеристика" как отдельную номенклатуру | Есть выгрузка настроек счетов учета и зарплатных данных из ERP / КА 2 | Можно проверить на вашем сервере перед покупкой, обращайтесь!

34650 27720 руб.

15.04.2019    68434    180    138    

111

SALE! 20%

Перенос данных из ERP 2 / КА 2 в ЗУП 3. Переносятся остатки, документы и справочники

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Комплексная автоматизация 2.х 1С:Зарплата и Управление Персоналом 3.x Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из ERP в ЗУП 3 | из КА 2 в ЗУП | Воспользовались более 79 предприятий! | Предлагаем приобрести готовые правила конвертации данных (КД 2) для переноса остатков, документов с движениями и справочной информации 3 | В продаже с 2020г. | Оперативно обновляем правила до актуальных релизов 1С | Есть перенос начальной задолженности по зарплате и начальной штатной расстановки на выбранную дату | Обороты за прошлые годы (данные для расчета среднего) переносятся свернуто в документ "Перенос данных" | Есть фильтр по организациям | Документы за текущий период переносятся сразу с движениями, поэтому не потребуется делать перерасчеты | Перенос можно проверить перед покупкой, обращайтесь!

43450 34760 руб.

03.12.2020    34176    80    58    

78

SALE! 10%

Перенос данных из УТ 10.3 в УТ 11.5. Переносятся документы (обороты за период), справочная информация и остатки

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 Оперативный учет 1С:Управление торговлей 10 1С:Управление торговлей 11 Россия Управленческий учет Платные (руб)

Перенос данных из 1С:Управление торговлей 10.3 в 1С:Управление торговлей 11.5 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УТ 10.3 (10.3.87.x) и УТ 11.5 (11.5.16.x).

28000 25200 руб.

23.07.2020    46317    196    64    

158

Перенос данных из Парус 10 в ЗГУ ред.3

Внешние источники данных Кадровый учет Файловый обмен (TXT, XML, DBF), FTP Обмен между базами 1C Платформа 1С v8.3 Сложные периодические расчеты 1С:Зарплата и кадры государственного учреждения 3 Государственные, бюджетные структуры Россия Бухгалтерский учет Бюджетный учет Платные (руб)

Обработка позволяет перенести кадровую информацию и данные по заработной плате, фактических удержаниях, НДФЛ, вычетах, страховых взносах из базы Парус 10 учреждений в конфигурацию 1С:Зарплата и кадры государственного учреждения ред. 3 (ЗГУ) и начать с ней работать с любого месяца года.

60000 руб.

05.10.2022    9217    9    8    

10

SALE! 10%

Перенос данных из УПП 1.3 в БП 3.0. Переносятся документы (обороты за период), справочная информация и остатки

Обмен между базами 1C Файловый обмен (TXT, XML, DBF), FTP Платформа 1С v8.3 1С:Управление производственным предприятием 1С:Бухгалтерия 3.0 Россия Бухгалтерский учет Управленческий учет Платные (руб)

Перенос данных из 1С:Управление производственным предприятием 1.3 в 1С:Бухгалтерия предприятия 3.0 с помощью правил обмена. Переносятся остатки, документы (обороты за период), справочная информация. Правила проверены на конфигурациях УПП 1.3 (1.3.223.x) и БП 3.0 (3.0.149.x). Правила подходят для версии ПРОФ и КОРП.

28000 25200 руб.

15.12.2021    20261    132    38    

90

SALE! 10%

Перенос данных из БП 3.0 в УТ 11 / КА 2 / ERP 2. Переносятся начальные остатки, документы и справочники

Обмен между базами 1C Платформа 1С v8.3 1С:ERP Управление предприятием 2 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

В продаже с 2014г. | Воспользовались более 122 предприятий! | Перенос данных из БП 3.0 в УТ 11 | из БП 3.0 в КА 2 | из БП 3.0 в ERP | Сэкономьте свое время - используйте готовое решение для перехода! | Постоянно работаем над развитием переноса данных | Обновляем на новые релизы 1С | Есть фильтр выгрузки по организациям | Переносятся начальные остатки на выбранную дату, документы за период времени и вся возможная справочная информация | Перенос сделан на технологии КД 2 (правила конвертации данных)

50722 45650 руб.

31.10.2014    231432    124    327    

296
Комментарии
В избранное Подписаться на ответы Сортировка: Древо развёрнутое
Свернуть все
1. artbear 1448 08.02.11 16:24 Сейчас в теме
(0) У тебя функция Конвертировать36_10 выполняет совершенно другую роль :)
Дай ей другое наименование, иначе коряво смотрится и плохо для сопровождения - например, старая функция возвращает число, а у тебя возвращается строка :)
2. jan27 732 08.02.11 16:34 Сейчас в теме
(1) спасибо, это я пропустил )
3. sml 41 10.02.11 09:20 Сейчас в теме
Проще в Скуле прописать хранимую процедуру (в сети их навалом) и пользовать ее непосредственно в запросе
6. jan27 732 14.02.11 05:28 Сейчас в теме
(3) согласен, так и пытался и сделать, но не являясь администратором...
4. 1513472 11.02.11 09:18 Сейчас в теме
Подскажите пожалуйста а как вообще можно из 77 в 82 данные скопировать чтоб не остатки и не справочники а сами сдеанные документы (Акты, счета, начисления з\п принятие ОС и многое другое)А то из данной статьи понятно что нужно алгоритм куда то прописать и к чему то добавить а я просто пользователь-бухгалтер
5. jan27 732 14.02.11 05:26 Сейчас в теме
(4) наймите специалиста
Оставьте свое сообщение