Выгрузка в DBF (DBS3)

Светлана

Подскажите, пожалуйста, как из ERP 2005 выгрузить данные в DBF файл (DBS 3).
Пытаюсь выгрузить функциональным модулем HR_99S_DOWNLOAD
указываю параметр P_FILETYPE = 'DBF'(Этот ф-й модуль в свою очередь вызывает метод cl_gui_frontend_services=>gui_download, а онвызывает
функциональный модуль GUI_DOWNLOAD).
У меня выгружаются данные, но не выгружаются имена полей.
Заранее спасибо.

РМщик

пользуйтесь GUI_DOWNLOAD
и заполняйте таблицу имен полей: FIELDNAMES

diatchkov

Светлана написал(а):

Подскажите, пожалуйста, как из ERP 2005 выгрузить данные в DBF файл (DBS 3).
Пытаюсь выгрузить функциональным модулем HR_99S_DOWNLOAD
указываю параметр P_FILETYPE = 'DBF'(Этот ф-й модуль в свою очередь вызывает метод cl_gui_frontend_services=>gui_download, а онвызывает
функциональный модуль GUI_DOWNLOAD).
У меня выгружаются данные, но не выгружаются имена полей.
Заранее спасибо.

PMщик прав, только функция просто DOWNLOAD.

Светлана

Хорошо, в DBF можно выгрузить ф-м модулем GUI_DOWNLOAD,
названия полей пишутся в таблицу FIELFNAMES.
А какого типа должна быть таблица FIELFNAMES?
Назввания полей перечисляются в отдельных строках
или одной строкой с разделителями?
Возможно, кто-то может выслать пример.
Всем спасибо за ответы.

diatchkov

Светлана написал(а):

Хорошо, в DBF можно выгрузить ф-м модулем GUI_DOWNLOAD,
названия полей пишутся в таблицу FIELFNAMES.
А какого типа должна быть таблица FIELFNAMES?
Назввания полей перечисляются в отдельных строках
или одной строкой с разделителями?
Возможно, кто-то может выслать пример.
Всем спасибо за ответы.

У меня 4.6С версия, видимо поэтому в GUI_DOWNLOAD такого параметра нет. Если исходить из функциональности DOWNLOAD то тип FIELDNAMES это char10 ну или если быть точным то тип С с длиной 10. Таблица должна быть заполнена в соответствии с положением "одна колонка - одна запись".

РМщик

Code:

PROGRAM A.

TYPE-POOLS: SLIS.
DATA: PRN LIKE SY-REPID,
      CT TYPE SLIS_T_FIELDCAT_ALV,
      CL LIKE LINE OF CT,
      BEGIN OF FNAMES OCCURS 0,
         FIELDNAME(30),
      END OF FNAMES,
      T_T001 TYPE TABLE OF T001.

START-OF-SELECTION.

  PRN = SY-REPID.
  CLEAR: CT, CT[], T_T001, T_T001[],
         FNAMES, FNAMES[].
         
  SELECT * FROM T001 INTO  TABLE T_T001.
  CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      I_PROGRAM_NAME     = PRN
      I_STRUCTURE_NAME   = 'T001'
    CHANGING
      CT_FIELDCAT        = CT.

  LOOP AT CT INTO CL.
    FNAMES-FIELDNAME = CL-FIELDNAME.
    APPEND FNAMES.
  ENDLOOP.

  CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
      FILENAME   = 'C:\T001.DBF'
      FILETYPE   = 'DBF'
    TABLES
      DATA_TAB   = T_T001[]
      FIELDNAMES = FNAMES
    EXCEPTIONS
      OTHERS     = 1.

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

Выгрузка в DBF (DBS3)

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