FUNCTION Y96_LIST_TO_EXCEL_BY_HTML.
*"----------------------------------------------------------------------
*"*"Локальный интерфейс:
*"       IMPORTING
*"             VALUE(FILENAME) TYPE  C OPTIONAL
*"             VALUE(CONFIRM) TYPE  C DEFAULT 'X'
*"             VALUE(EXEC) TYPE  C DEFAULT 'X'
*"             VALUE(COLOR_OFF) TYPE  C DEFAULT ' '
*"             VALUE(BORDER_OFF) TYPE  C DEFAULT ' '
*"             VALUE(SYMBOL_MODE) TYPE  C DEFAULT '-'
*"             VALUE(CHECKBOX_MODE) TYPE  C DEFAULT '-'
*"             VALUE(ICON_MODE) TYPE  C DEFAULT '-'
*"             VALUE(CELLS_OPTIMIZATION) TYPE  C DEFAULT 'X'
*"             VALUE(NOTCOLSPAN) TYPE  C DEFAULT ' '
*"             VALUE(ROWFILTER_ON) TYPE  C DEFAULT ' '
*"             VALUE(REWRITE) TYPE  C DEFAULT 'C'
*"       TABLES
*"              LIST TYPE  SLIST_LIST_TAB
*"              FMBS TYPE  SLIST_FMBS_TAB
*"              FMBX TYPE  SLIST_FMBS_TAB
*"              FSEL TYPE  SLIST_FSEL_TAB
*"              FIDO TYPE  SLIST_FIDO_TAB OPTIONAL
*"              HIDE TYPE  SLIST_HIDE_TAB OPTIONAL
*"              HDLN TYPE  SLIST_HIDELINE_TAB OPTIONAL
*"----------------------------------------------------------------------

  SET_PARAM.

  PERFORM GET_HTML TABLES LIST FMBS FMBX FSEL FIDO HIDE HDLN.
  PERFORM SAVE_FILE USING SCR-FNAME SCR-EXEC.
ENDFUNCTION.
Используются технологии uCoz