gifts2017

Обработка файлов OpenOffice Calc без установленного OpenOffice и ВК

Опубликовал Александр Цегельников (markers) в раздел Обмен - Загрузка и выгрузка в Excel

Прямое чтение файлов OpenOffice Calc в ТЗ без использования ВК и самого OpenOffice! Высокая скорость чтения данных!

Некоторые клиенты присылают свои заказы в формате OpenOffice, а т.к. мы используем MS Office, мне приходилось конвертировать файл в установленном на моём компе OpenOffice.

А не так давно переписывал обработку заказов от клиентов и использовал обработку прямого чтения файлов Excel 2007 производства достопочтенного Dushelov, покурив файл OpenOffice решил попробовать переделать обработку под формат OpenOffice. Вот предлагаю общественности результат трудов.

Принцип работы:

Так как формат близок к формату Excel 2007, что значит обычные XML'ки в ZIP-архиве, то извлекаем во временную папку этот файл, берём нужный файл и обрабатываем как обычный XML-файл. Никаких COM-объектов, никаких внешних модулей, всё обрабатывается встроенными средствами 1С 8.1. Работает и под сервером 1С! Не требуется установленный OpenOffice!

Разрешение споров и конфликтов:

Если кто-то уже такое сделал (а я не нашёл), то уступаю ему лавры и поставлю вашу ссылку.

Обработка не претендует на: уникальность, чёткость кода, отсутствие методов "индийского программирования" и пр. Критику я выслушаю и учту. Если попадутся файлы, которые обработка не может обработать, выкладывайте в комментариях.

Обработка Excel 2007 тов. Dushelov: http://infostart.ru/public/19139/

Заранее спасибо!

UPDATE 1:

Переделал код вытаскивания текста из ячейки исправив тем самым баг с обрезанием строк, которые OpenOffice разбил на несколько. Ну и в целом алгоритм вытаскивания текста ячейки стал лучше. Также я добавил кучу комментариев.

 

Скачать файлы

Наименование Файл Версия Размер
OpenOffice2ТЗ.epf 205
.epf 9,11Kb
05.09.14
205
.epf 9,11Kb Скачать

См. также

Подписаться Добавить вознаграждение

Комментарии

1. Сергей Кучеров (СергейКа) 28.07.10 09:55
Саму обработку конечно же можно улучшить, но за перенос принципа с обработки Душелова и указание исходника плюс.
2. Александр Цегельников (markers) 28.07.10 10:00
(1) Буду благодарен на указание проблемных мест и методов их решения.Это вообще мой первый опыт работы с XML, так что мог сделать не особо оптимально :) :(
3. Александр Цегельников (markers) 29.07.10 07:18
Так-же кому интересно, через некоторое время могу представить "комплексное" решение, чтение в зависимости от расширения файла:
xls = Немного переделанной обработкой Excel через ADO, не помню уже чей :(
xlsx = Прямое чтение Excel 2007 by Dushelov
ods = Прямое чтение OpenOffice
+ Хоть и не идеальное но решение поиска в какой колонке что брать для успешной обработки разнообразных вариантов заказов клиента (Неважно расположение колонок, необязательное наличие колонки Код (Но желательно), и многое прочее), которое я написал для работы т.к. нам присылают всевозможные варианты заказов (переделанные клиентами и многое другое). Скорей-всего необходимо будет её немного допилить под свои реалии. У нас обрабатывает она 99% заказов, и правильно обработанных заказов 99.9%. Но код не идеален.
Если интересно, могу выложить!
4. Артур Аюханов (artbear) 29.07.10 08:31
Плюсанул.
НО ИМХО название неудачное :(
Назови как-нибудь типа "Обработка файлов OpenOffice Calc без установленного OpenOffice"
5. Александр Цегельников (markers) 29.07.10 09:39
6. dushelov (Душелов) 29.07.10 13:20
Нормально, даешь больше универсальных функция чтения данных :)
7. Владимир Казначеев (Mogidin) 02.08.10 08:16
Так как формат близок к формату Excel 2007 что значит обычные XML`ки в ZIP архиве

http://ru.wikipedia.org/wiki/OpenDocument
http://ru.wikipedia.org/wiki/Office_Open_XML

Скорее наоборот))) Формат MS близок к OOo.
8. Александр Цегельников (markers) 02.08.10 08:26
(7) Согласен, но т.к. речь о нём шла от обработки Excel 2007, то написал так :)
9. Максим Шуйский (maxpiter) 02.08.10 10:45
(6) Даешь универсальную ВК для чтения данных MSExcel, OO Calc, а также SuperCalc ;)
10. Александр Цегельников (markers) 02.08.10 14:20
(9) ВК не самый лучший вариант, лучше максимально встроенными средствами 1С + максимум COM объекты, чтоб не обламывался народ желающий заюзать под сервером 1С (8.х)..... а про SuperCalc я вообще не вкурсе :) Если хранит данные в XML можете переделать обработку и под него :)
11. Максим Шуйский (maxpiter) 02.08.10 14:34
(10) SuperCalc это типа шутка :)
я к тому, что универсальную для всех и вся.
12. Александр Цегельников (markers) 02.08.10 15:23
13. Дмитрий Петров (421187162) 05.10.10 18:03
14. Александр Цегельников (markers) 30.05.11 23:36
(13) Да не за что! Пользуйтесь на здоровье!
15. Сергей (Che) Коцюра (CheBurator) 31.05.11 00:08
Ado выкинул после первой же пробы. на файле, который эксель показывает нормально - ado возвращал 4900 строк из 10 тыс...
16. Александр Цегельников (markers) 05.06.11 21:42
(15) Странно, у меня, на теперь уже на старой работе, были прайсы как раз порядка 10 тысяч строк, выбирало всё и даже больше.
17. Сергей (Che) Коцюра (CheBurator) 05.06.11 23:55
(16) а я и не говорю, что у вас - плохо обрабатывает. у вас - хорошо, а у меня - плохо... Причем у меня на куче файлов - нормально, а на одном - плохо. Где гарантия того, что на остальных не будет плохо..? хз..
18. Dmitiry (ndacoder) 29.06.11 18:48
поставил минус из-за того что автор не совсем честно разбирает файл, и результат не всегда соответствует ожидаемому,
в описание нужно добавить что случай многострочного объединения ячейки не учитывается.
19. bulpi bulpi (bulpi) 28.07.11 14:15
С объединением ячеек совсем плохо...
20. bulpi bulpi (bulpi) 28.07.11 15:39
А между тем, минимальные изменения в тексте функции ОбработатьФайлOpenOffice помогают справиться с этой проблемой!

Было (стр.48):
ИначеЕсли хмл.Имя = "table:table-cell" Тогда //Выпал тэг ячейки

Стало :
ИначеЕсли хмл.Имя = "table:table-cell" ИЛИ хмл.Имя ="table:covered-table-cell" Тогда //Выпал тэг ячейки

а также после стр. 60 :
Если Не ПустаяСтрока(СокрЛП(НенужнаяЯчейка)) Тогда

добавить строки :
Колонка = Колонка + Число(НенужнаяЯчейка)-1;
Для к = ТЗ.Колонки.Количество() По Колонка-1 Цикл ТЗ.Колонки.Добавить("F" + (ТЗ.Колонки.Количество()+1)); КонецЦикла;
21. l l (lcdlynx) 26.08.11 15:07
Небольшая проблемка.... при загрузке происходит смещение ячеек в строке, если перед ней была пустая ячейка.
Например:
1 2 3
4 [пустая]6
Получаем:
1 2 3
4 6

Как это исправить?
22. Алексей Гришков (asg1975) 27.09.11 09:55
В хозяйстве сгодится. Далеко не у всех стоит MS Office, да и Open Office тоже не всегда. А тут можно вывернуться
23. andrey P (andrey314) 06.03.14 14:20
Плюс поставил. Дешево и сердито. Но есть один минус - читает только первый лист.
Для написания сообщения необходимо авторизоваться
Прикрепить файл
Дополнительные параметры ответа