ZWWW - ФМ для выгрузки данных в WORD, EXCEL

east

Именно так! С последними версиями MS Office все замечательно!

east

Именно так! С последними версиями MS Office все замечательно!

MM'щик

Уважаемые спецы,
Кто-нибудь знает про ZWWW for OpenOffice ?

Parazit

MM'щик написал:

Уважаемые спецы,
Кто-нибудь знает про ZWWW for OpenOffice ?

Пока не делал, но в планах есть. А как используете Open Office, для работы с документами MS Office (xls, doc), или с его родным форматом? И в какой среде, Windows или Linux?

MM'щик

используем Linux , OpenOffice и его формат *.ods *.odt
Задача - печатать бланк из R3.
посмотрел код АБАП , его переделал, выгружает 3 файла (бланк, данные, макрос),
начал смотреть макрос - вешалка !

Parazit

MM'щик написал:

используем Linux , OpenOffice и его формат *.ods *.odt
Задача - печатать бланк из R3.
посмотрел код АБАП , его переделал, выгружает 3 файла (бланк, данные, макрос),
начал смотреть макрос - вешалка !

Вообще то макрос не обязателен, он только для ускорения, АБАП-код самодостаточен, если только нет проблем с типом STRING.
Похоже, пока, нормальную выгрузку в *.odt не сделать, т.к. нельзя присвоить имя закладки строке таблицы.

MM'щик

Я так думаю
1. Мы можем выгружать файлы из R3 (шаблон, данные, макрос)
2. Мы можем запускать OpenOffice из R3 типа ooffice /file /macro
3. Мы можем присвоить имя для области в OpenOfficeCalc
4 При помощи StarBasic можем заполнять области данными

Больших принципиальных проблем не вижу, поправьте если что....

Пётр

MM'щик написал:

Я так думаю
1. Мы можем выгружать файлы из R3 (шаблон, данные, макрос)
2. Мы можем запускать OpenOffice из R3 типа ooffice /file /macro
3. Мы можем присвоить имя для области в OpenOfficeCalc
4 При помощи StarBasic можем заполнять области данными

Больших принципиальных проблем не вижу, поправьте если что....

Есть свой велосипед на данную тему. С похожим принципом работы. Но основное отличие в том, что все логика создания документа на стороне офиса.
Задачи абапа:
1. Выгрузить шаблон из веб репозитария.
2. Сформировать табличные данные в виде локальных фалов.
3. Данные отличные от таблиц( заголовоки, подписи) выкрузить в свойства уже выгруженного шаблона.
4. Для каждого из локальных файлов запустить макрос из шаблона( во входные параметры макроса передаем имена локальных файлов ).
Задача макроса:
Собственно формирование документа.

То что живет в макросах шаблона в общем-то достаточно универсально( до ума не доведено, но вполне жизнеспобно )
Основной макрос выглядит примерно след образом:

Code:

Sub add_page(s_fn As String, s_name As String)
    Dim tmp_page As Worksheet
    Dim tmp_table As QueryTable
    
    
   ' Debug.Assert (False)
    
   ' Application.Visible = True
    
    If is_in_collection(collection:=Worksheets, name:="Private") = True Then
     Worksheets("Private").Visible = True
    End If
    
    Set tmp_page = createlist(l_name:=s_name)
    
    If FileSystem.FileLen(s_fn) > 1 Then
    
        Set tmp_table = create_table(s_filename:=s_fn, WS:=tmp_page)
         Call AUTO_set_qt_prop(table:=tmp_table)
   '      Call add_column(table:=tmp_table, pos:=7, defval:="---")
         Call draw_table_line(table:=tmp_table)
         Call set_table_format(table:=tmp_table)
    End If
    
    Dim berror As Boolean
    berror = tmp_table Is Nothing
    If Not berror Then
        berror = (tmp_table.ResultRange.Rows.Count = 0)
    End If
    
    'Call mark_as_error(name:="HEADER", berror:=berror)
    
     If Not tmp_table Is Nothing Then
        Call set_table_format(table:=tmp_table)
     End If
  '   Call autofit_coulumns(WS:=tmp_page)
     Call AUTOFIT_ROWS(rs:=tmp_page.UsedRange)
    
    
    Call set_named_val(prefix:="")
    Call copy_named_range(genlist:=tmp_page, name:="HEADER", b2head:=True)
    Call copy_named_range(genlist:=tmp_page, name:="FOOTER", b2head:=False)
    Call ref2val(WS:=tmp_page)
    
    Call autofit_coulumns(WS:=tmp_page)
     
    
    If is_in_collection(collection:=Worksheets, name:="Private") = True Then
     Worksheets("Private").Visible = False
    End If
    
    
End Sub

Делать презентационную логику на абапе не вижу смысла. Имхо презентационная логика должна быть на уровне отображения.

В принципе достаточно удобно тестировать и дописывать макросы
локально без r3. Файлы с данными есть, свойства документа можно загрузить один раз а делее играемся макросом вида:

Sub TEST()
'
Call add_page(s_fn:="C:\1.txt", s_name:="Page1")
End Sub

Для nix можно адаптировать:
со стороны абапа( вот уж не знаю насколько одинаковое оле) вызов вместо оле какого нить коммандника с передачей ему в качестве параметров имя файла, а тот уже сам вызовет приложение для вывода.
насколько совместимы макросы - тоже незнаю, но думаю переписать их не составит труда.

Всякие задачи по тому какой разделитель целых и десятичных также решается макросом на этапе загрузке данных из файла.

PS
чисто мое ИМХО на тему формирования документов в офисе.

MM'щик

Я так понимаю в предыдущем сообщении опять-таки идет речь об Windows и MS office.Это и так понятно. Хотелось увидеть макрос для Open Office и код ABAP для ЛИНУХ.
Это простите, другой велосипед

MM'щик

Сделал zwww для OpenOffice в Linux
Смотреть здесь
http://www.ynpz.ru/20080301_sap_zwww/sap_zwww.html

MaZai

Уважаемый Parazit, пытаюсь разобраться с твоим ФМ, однако возникли проблемы. А так как я токлько только начинаю вникать в ABAP, то сам не могу разобраться.

Проблема:
В функциональном модуле ZWWW_PREPARE_TABLE в параметрах есть две таблицы IT_FIELDS_CATALOG и IT_GROUPS_CATALOG. Если я указываю для них соответствующие типы ZWWW_FIELD_CATALOG и ZWWW_GROUP_CATALOG, то возникает сообщение "Параметры TABLES устарели!" и нет возможности сохранения и других действий пока не уберёшь типы.

Подскажи плиз в чём может быть проблема и как её решить. Может быть дело в версии (у нас установлена 7-ка).

sibrin

MaZai написал(а):

то возникает сообщение "Параметры TABLES устарели!" и нет возможности сохранения и других действий пока не уберёшь типы.

Когда возникает сообщение, можно нажать Enter и продолжить работу. Типизацию нужно делать через LIKE, а не TYPE.

MaZai

Спасибо, sibrin. Помогло.

Parazit

Спасибо, sibrin.

MaZai

Спасибо тебе Parazit, за такой модуль.
Правда я только начал с ним разбираться. У меня сразу вопрос: есть ли возможность с помощью твоего ФМ формировать файл с данными в фоне в указанный путь?

Тут же задам ещё вопрос.
Видел тут обсуждалась проблема макросов (возникает ошибка run-time error 91). Кто-нибудь нашёл решение данной проблемы, а то у меня та же ситуация? А без оптимизатора очень долго формируется файл.

Правила форума

ZWWW - ФМ для выгрузки данных в WORD, EXCEL

Кто сейчас на конференции