Предыдущая тема :: Следующая тема |
Автор |
Сообщение |
ssv1977 Внедряю Босс
Зарегистрирован: 13.05.2008 Сообщения: 47
|
Добавлено: Ср Май 14, 2008 19:08 Заголовок сообщения: Выгрузка в EXCEL |
|
|
Народ, кто то может поделиться информацией о том, как осуществлять выгрузку в EXCEL из Ораклового БОССа, но не средствами z-языка? |
|
Вернуться к началу |
|
 |
shvn
Зарегистрирован: 15.05.2008 Сообщения: 2
|
Добавлено: Чт Май 15, 2008 11:32 Заголовок сообщения: |
|
|
В состав дистрибутива входит библиотека WIN_SRV.PLL
а вней пакеты EXCEL и MSWORD, для вывода в эксель и ворд.
Там по названиям можно догадаться, какая функция для чего  |
|
Вернуться к началу |
|
 |
ssv1977 Внедряю Босс
Зарегистрирован: 13.05.2008 Сообщения: 47
|
Добавлено: Чт Май 15, 2008 11:46 Заголовок сообщения: |
|
|
shvn писал(а): | В состав дистрибутива входит библиотека WIN_SRV.PLL
а вней пакеты EXCEL и MSWORD, для вывода в эксель и ворд.
Там по названиям можно догадаться, какая функция для чего  |
О! Спасибо.
Сейчас попробую разобраться.
А случайно нет небольшого примера....
был бы очень признателен. |
|
Вернуться к началу |
|
 |
shvn
Зарегистрирован: 15.05.2008 Сообщения: 2
|
Добавлено: Чт Май 15, 2008 12:34 Заголовок сообщения: |
|
|
Вот примерно так
/*открыть Excel*/
Excel.Open();
Excel.AddWorkBook;
...
/*изменить ячейку nRow, nCol*/
Excel.SetEl(nRow, nCol, sValue);
/* установить фоматирование ячеек */
Excel.setRangeProperty(nRow, nCol, kRow, kCol, 'Font.Bold', 1);
...
/* получим имя временного файла на ApplicationServer */
temp_name := HR.GetUserFileName('>tmp.xls', 1);
/*сохраним отчет во временный файл*/
Excel.SaveAsFile(temp_name);
/* закроем Excel*/
Excel.Close(1);
/*ОТОБРАЖЕНИЕ ФАЙЛА ОТЧЕТА НА КЛИЕНТЕ*/
HR_CONN.ShowReport(temp_name);
Ну и куча разных вариаций, например можно не создавать файл заново, а открывать имеющийся готовый шаблон и вносить в него изменения. |
|
Вернуться к началу |
|
 |
ssv1977 Внедряю Босс
Зарегистрирован: 13.05.2008 Сообщения: 47
|
Добавлено: Чт Май 15, 2008 14:07 Заголовок сообщения: |
|
|
Как говориться век живи, век учись. -)
shvn, спасибо! |
|
Вернуться к началу |
|
 |
|