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

Parazit

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

Привет Паразит

Всё чудненько работает, но вот незадача с excel, как бы пологичнее,
покрасивее выводить подитоги к листу. Пока никак не удаётся. В ТОРГ12 есть такая гадость :twisted:

как подитоги. Пока думаю реализовать путём фиксированной высотой строки, но это не гибко :roll:

Может кто реализовывал? Или идея :idea:

есть по этому вопросу :?:

Спасибо за внимание.

Привет!"

А в чем проблема? Вроде с подитогами все довольно просто, см. пример ZWWW_SAMPLE на втором листе.

p.s.
Если есть вопросы, обращайся в аську

108126715

upper

Да, просто субмурно

выразился.
Подитог нужен на каждый выводимый лист,
асю отобрали, бьюсь за неё вкровь :shock:

есть только skipe, и это не так уж и мало

)))

Parazit

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

Да, просто субмурно

выразился.
Подитог нужен на каждый выводимый лист,
асю отобрали, бьюсь за неё вкровь :shock:

есть только skipe, и это не так уж и мало

)))

Есть и скайп, ищи mrparazit.

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

ROKO

Сделал все как в инструкции

. Решил протестить ZWWW_MANY_SHEETS. Но почему-то выгружает пустой шаблон

И строк вроде 10? В чем может быть засада?

Parazit

ROKO написал:

Сделал все как в инструкции

. Решил протестить ZWWW_MANY_SHEETS. Но почему-то выгружает пустой шаблон

И строк вроде 10? В чем может быть засада?

А структура ZWWW_VALUES соответствует данной?:

VAR_NAME CHAR 50 0 Имя переменной (пусто для всего листа)
VAR_NUM NUMC 5 0 Порядковый номер переменной (строки EXCEL)
FIND_TEXT CHAR 50 0 Текст замены
VAL_TYPE CHAR 1 0 Тип значения
VALUE STRING 0 0 Значение переменной (искомого текста)

ROKO

Parazit написал:

А структура ZWWW_VALUES соответствует данной?:

VAR_NAME CHAR 50 0 Имя переменной (пусто для всего листа)
VAR_NUM NUMC 5 0 Порядковый номер переменной (строки EXCEL)
FIND_TEXT CHAR 50 0 Текст замены
VAL_TYPE CHAR 1 0 Тип значения
VALUE STRING 0 0 Значение переменной (искомого текста)

Все так только у VALUE тип сделал CHAR(253) из-за проблем передачи строки, описанной в предыдущих постах :roll:

Parazit

ROKO написал:

Все так только у VALUE тип сделал CHAR(253) из-за проблем передачи строки, описанной в предыдущих постах :roll:

Хм, кажется что то подобное было с типом CHAR. Может быть из-за упрощенного присвоения значения в примере (ZWWW_MANY_SHEETS):
it_Val-Value = &5.

Со STRING прокатывает, а с CHAR может выравнивать значения по правому краю. Поэтому лучше присваивать примерно так:
Write &5 to it_Val-Value left-justified.

Кстати, можно добиться и нормальной работы STRING. Нужно задать поиск строки "проблем*string" по главной программе, прочитать найденные коментарии и сделать, что написано.

ROKO

Parazit написал:

ROKO написал:

Все так только у VALUE тип сделал CHAR(253) из-за проблем передачи строки, описанной в предыдущих постах :roll:

Хм, кажется что то подобное было с типом CHAR. Может быть из-за упрощенного присвоения значения в примере (ZWWW_MANY_SHEETS):
it_Val-Value = &5.

Со STRING прокатывает, а с CHAR может выравнивать значения по правому краю. Поэтому лучше присваивать примерно так:
Write &5 to it_Val-Value left-justified.

Кстати, можно добиться и нормальной работы STRING. Нужно задать поиск строки "проблем*string" по главной программе, прочитать найденные коментарии и сделать, что написано.

Поменял char(253) на STRING, но ничего не изменилось шаблон как был пустым так и остался

Parazit

ROKO написал:

Поменял char(253) на STRING, но ничего не изменилось шаблон как был пустым так и остался

Эх, в отладке бы посмотреть

А перед вызовом ФМ таблицу it_Val проверял, там все нормально заполнено?

p.s.
Давай в мыло misterxyz@mail.ru или аську 108126715

judge

Ух и задолбался я

с макросами.
Выгрузка летит замечательно. Вся оргструктура перекидывается вмиг. Дольше строится. Но вот с макросами беда.
Мне нужно, чтобы после заполнения таблицы данными этот файл сохранился и даже, в будущем, закрылся. Я пока пытаюсь его сохранить.
Макрос в моем шаблоне, куда я передаю данные, такой:

Code:

Public Sub MySaveFileAs(suffix As String)
    ActiveWorkbook.SaveAs (Replace(UCase(ActiveWorkbook.FullName), ".XLS", suffix & ".xls"))
    MsgBox Replace(UCase(ActiveWorkbook.FullName), ".XLS", suffix & ".xls")
End Sub

Простое сохранение. Плюс еще мессаджбокс для дебага так сказать.
Код в ABAP:

Code:

CALL FUNCTION 'ZWWW_PREPARE_TABLE'
  EXPORTING
    LINE_NAME               = 'LINE1'
    VAL_TYPE                = ''
  TABLES
    IT_ANY_TABLE            = o_log
    IT_VALUES               = it_Val.

    it_Val-Var_Name = 'Я_Макрос'.
    it_Val-Val_Type = 'M'.            "тип Macros
    it_Val-Value    = 'MySaveFileAs("test2")'. "имя макроса
    Append it_Val.

CALL FUNCTION 'ZWWW_OPENFORM'
  EXPORTING
    FORM_NAME               = 'Z_ARIS_OBJECTS'
    PRINTDIALOG             = ''
    OPTIMIZE                = 0
    DEBUG_MODE              = ' '
 TABLES
    IT_VALUES               = it_Val
 EXCEPTIONS
   PRINTCANCEL             = 1
   OTHERS                  = 2.

Что получается? Сначала выгружается текстовый файл с данными. Затем я вижу мессаджбокс с новым именем файла. Затем вижу еще один такой же. Далее Ексель закрывается и открывается новая копия с уже моими данными.
Почему макрос отрабатывает раньше поолженного? Почему 2 раза? Где я прокосячил?

Помогите.

ЗЫ: За ФМ-ы спасибо. Выгрузка данных через OLE - это гимор. А тут все быстро шелестит

philips

Parazit написал:

Дополнение от 09/08/2007:
Разработка позволяет использовать для выгрузки WWW-шаблоны (транзакция SMW0) и BDS-шаблоны (транзация OAOR). Основной ее принцип - максимальное соответствие технологии WYSIWYG. Т.е. ваша ABAP-программа занимается только выборкой и выводом данных, форма отчета, раскраска и стиль задаются шаблоном. Технология вывода в Word и Excel идентичная, т.е. практически любую форму отчета Excel можно реализовать средствами Word (и наоборот), не изменяя при этом вашу ABAP-программу, просто заменив шаблон.
При этом, для нормального вывода, нет необходимости в каждый шаблон вставлять какие-либо макросы. Однако возможно использовать собственные макросы для специфической обработки, например для автоматического форматирования. При чем они будут работать даже при включенном максимальном уровне безопасности макросов MS-Office, также не требуется разрешения доступа к VB, что позволяет соблюсти политику безопасности компании.

Все это позволяет максимально упростить использование уже готовых форм, подготовленных средствами MS-Office, например, выгруженных из Консультант+. Т.о. разработку и модификацию шаблонов можно поручить функционалам или продвинутым пользователям.

классно! т.е. теперь можно шаблон загрузить через OAOR, а дальше получать результат при помощи ФМ ZBDS_OPENFORM? Тогда сразу вопрос - а что там за параметр DESCRIPTION?

Parazit

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

классно! т.е. теперь можно шаблон загрузить через OAOR, а дальше получать результат при помощи ФМ ZBDS_OPENFORM?

Точно так!

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

Тогда сразу вопрос - а что там за параметр DESCRIPTION?

В свойствах шаблона он называется "Описание".

Вот примерчик со стандартным SAP-овским шаблоном sap_om.xls:

Code:

REPORT  ZBDS_SAMPLE.

Data:
  it_Val type standard table of ZWWW_VALUES
    with header line.

End-of-Selection.

  it_Val-VAR_NAME = 'A1'.
  it_Val-VALUE = 'Тест'.
  Append it_Val.

  Call function 'ZBDS_OPENFORM'
    exporting
      DESCRIPTION = 'sap_om.xls'
      DOC_CLASSNAME = 'ALVLAYOUTTEMPLATES'
      DOC_CLASSTYPE = 'OT'
      DOC_OBJECT = 'SAP_STANDARD_TEMPLATE'
      PRINTDIALOG = ''
    tables
      IT_VALUES = it_Val.

Skif

Parazit написал:

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

классно! т.е. теперь можно шаблон загрузить через OAOR, а дальше получать результат при помощи ФМ ZBDS_OPENFORM?

Точно так!

а... - дайте две ! ))

p.s. привет - что-то давно не видел. где твои вкусности лежат-то?

Parazit

Skif написал:

p.s. привет - что-то давно не видел. где твои вкусности лежат-то?

Привет!

Дык, всё там же, ссылка в первом посте.

philips

и еще небольшая проблемка - при выгрузке в excel прога вылетает с ошибкой что, мол нужен zwww_macros. куды его грузить то?

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

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

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