PHP Word Excel. Создание документов по шаблону.

Представляю на всеобщее обозрение результат двухнедельного поиска в интернете соответствующей информации.
Передо мной встала следующая задача.
Из корпоративной базы данных информацию выдать в виде отчетов в формате MS Word и MS Excel.
Ну и конечно отчет выставить в WEB.
Механизм выборки данных и публикации в WEB описывать не буду. Очень много информации в инете, да и баз данных море.
А вот формирование документов по шаблону - вещь полезная. Почему то нигде не нашел примеров работы с шаблонами.

Оговорка. Всё отрабатывалось на Windows Server 2003 + Oracle Apache Server.
О Linux-платформе в конце статьи.

Итак.

Excel.
С Excel-ом попроще. Готовим красивый файл. Форматируем внутренности, т.е. готовим ячейки куда будем прописывать данные. Теперь пишем PHP:

<?php
// Создаем СОМ-объект
$excel = new COM("Excel.Application") or die("Unable to instanciate excel");
$excel->Visible = false;
$excel->DisplayAlerts = false;
// Выводим версию MS Excel
echo "I'm using MS Excel {$excel->Version}";
$excel->Application->Visible = 0;
$excel->DisplayAlerts = 0;
# Открытие сущуствующей проформы
$excel->Workbooks->Open("C:\\temp\\example.xls");
// Выбираем активный лист и устанавливаем курсов в область ячейки (1, 1)
$sheet = $excel->Worksheets(1);
$sheet->activate;
$cell = $sheet->Cells(1,1);
$cell->Activate;
// Записываем в ячейку текст или данные
$cell->value = 'Test';
// Сохраняем как новый документ - от туда и выбрасываем в инет
$excel->Workbooks[1]->SaveAs("c:\\temp\\New.xls");
// Всё - уходим
$excel->Quit();
$excel->Release();
$excel = Null;
?>

Примеры форматирования ячеек
$change = $excel -> Selection -> Range("A1");
$change -> Font -> Bold = true;
$change -> Font -> Italic = true;
$change -> Font -> Underline = true;
$change -> Font -> Name = "Times New Roman";
$change -> Font -> Size = 12;
$change -> Font -> ColorIndex = 3;

Про форматирование в конце статьи дам общие рекомендации.

Word.
Ну а теперь самое интересное. Пока до этого докопался ...
Даже в O'Reilly Programming PHP такого не нашел.

С Вордовскими шаблонами работа заключается в следующем:
а) записать данные в закладку (надеюсь не надо объяснять что такое закладка в Ворде) - использовать что-то типа <FIELD1> и методом поиска и замены не рекомендую - может когда-то такая комбинация встретиться;
б) добавить какое-то количество строк в какую-то таблицу в документе (таблиц может быть много, причем как в колонтитулах так и в самом документе);
в) записать данные в ячейку таблицы;
г) нарисовать в ячейке линию (border) - это для подчеркивания итогов в основном;
д) объединить несколько ячеек таблицы - это из практики формирования судовых документов.
Поверьте - всё остальное готовится заранее в шаблоне.

Ну что? Кто нибудь решал такую задачу?

Итак пишем PHP:
<?php
//создаем новый объект COM – word.application
$word = new COM("word.application") or die("Cannot create Word object");
$word->Visible = false;
$word->DisplayAlerts = false;
// переменная $empty нужна для подстановки
// неопределенных переменных в методы VBA
$empty = new VARIANT();
// Открытие сущуствующей проформы
$template_file = "C:/temp/doc3.doc";
$word->Documents->Open($template_file);
//
// Пишем в закладку 'test'
// естественно в шаблоне такая закладка в нужном
// месте должна быть подготовлена
$current_date = date("m/d/Y");
$bookmarkname = "test";
$objBookmark = $word->ActiveDocument->Bookmarks($bookmarkname);
$range = $objBookmark->Range;
$range->Text = $current_date;
//
// Пишем в ячейку таблицы
$objTable = $word->ActiveDocument->Tables(1);
$objCell = $objTable->Cell(1,1);
$range = $objCell->Range;
$range->Text = "cell(1.1)";
//
// Рисуем линию ячейки
$mySelect = $objCell->Select();
$myBorder = $word->Selection->Borders(-1);
$myBorder->LineStyle = 1;
// Оговорка - не используйте Borders(wdBorderTop)
// Для распознавания Виндовых имен типа wdBorderTop
// необходимо подгружать библиотеку
//com_load_typelib('Word.Application');
// что в свою очередь инициирует на сервере еще один процесс MS Word
// который потом закончить нельзя
// числовые эквиваленты таких имен как wdBorderTop
// легко найти в справке по VBA в самом Ворде
//
// Добавляем строки к таблице
$word->Selection->GoTo('2',$empty,'2',$empty);
$word->Selection->InsertRowsBelow(1);
// Самое интересное
// Объединяем ячейки
$myTable = $word->ActiveDocument->Tables(2);
$rangeStart = $myTable->Cell(1,4);
$myRangeStart = $rangeStart->Range->Start();
$rangeEnd = $myTable->Cell(2,4);
$myRangeEnd = $rangeEnd->Range->End();
$myRange = $word->ActiveDocument->Range($myRangeStart,$myRangeEnd);
$myRange->Cells->Merge();
//
// Сохраняем документ под новым именем
$new_file = "C:/temp/new3.doc";
$word->Documents[1]->SaveAs($new_file);
//
// Всё - уходим
$word->Quit();
$word = null;
unset($word);
?>

Ну вот и всё. Пользуйтесь.

Теперь общие замечания или выводы по интерпретации кода VBA в PHP.
Всё очень просто.
Оказывается если придерживаться одного правила,
то переносить код VBA в PHP очень просто.
////////////////////////////////////////////////////////////////////////////////////////////
ПРАВИЛО! Использовать больше двух '->' в одной строке нельзя!!!
////////////////////////////////////////////////////////////////////////////////////////////
Пример. Объединение ячеек.

Код в VBA:

Set myTable = ActiveDocument.Tables(1)
If Not IsNull(rstBl!ORDER_NO) Then
ActiveDocument.Tables(1).Cell(vCurentRow, 10).Range.Text = rstBl![ORDER_NO].Value
Set myRange = ActiveDocument.Range(myTable.Cell(vCurentRow, 10).Range.Start, myTable.Cell((vCurentRow + vMaxRows), 10).Range.End)
myRange.Select
Selection.Cells.Merge
End If

Код PHP:

// Объединяем ячейки
$myTable = $word->ActiveDocument->Tables(2);
$rangeStart = $myTable->Cell(1,4);
$myRangeStart = $rangeStart->Range->Start();
$rangeEnd = $myTable->Cell(2,4);
$myRangeEnd = $rangeEnd->Range->End();
$myRange = $word->ActiveDocument->Range($myRangeStart,$myRangeEnd);
$myRange->Cells->Merge();

Как видите - внимательно превращая VBA-точки в PHP-стрелки, можно писать в PHP как в VBA.

Теперь про платформу Linux.
Конечно с таким решением задачи я сам лично не согласен. Т.е. приходится использовать Виндовый сервак. Нужен движок Ворда и Экселя.
Я выбрал решение следующее. Linux, OpenOffice Calc Writer, JavaScript, PHP.
Как решу задачу - дополню эту статью.

Всем успехов.
Письма благодарности жду по адресу n.kostilev@gmail.com

 

Просьба не выражаться. А с такими "культурными" общаться желания нету. Про классы - да есть, RTF - можно - а в жизни, когда юзверю всё ни почём и он жалуется руководителю - надо в ворде - попробуй не сделать. Про поиск - попробуй найти хоть один пример. Две недели поиска - ничего реального. Тока запись в голый документ.

 

Если у кого-то есть практический пример решения такой задачи на платформе Linux (Ooo Calc, Ooo Writer, PHP, Java, JavaScript) - просьба поделиться примером.