Autor: socra7

• 

* ESTE PARÁMETRO INDICARÁ CUAL MODULO DE FUNCIÓN LLAMAR PARA MOSTRAR EL FORMULARIO

PARAMETERS: p_form TYPE tdsfname.

DATA: ti_itab TYPE zitabsflight. » Definición de la tabla interna.

DATA: lv_fm TYPE rs38l_fnam.


«Obtener la informacion de la BD.
SELECT * FROM sflight INTO TABLE ti_itab.

«Obtener el nombre del módulo de función del smartform
CALL FUNCTION ‘SSF_FUNCTION_MODULE_NAME’
  EXPORTING
    formname           = p_form
  IMPORTING
    fm_name            = lv_fm
  EXCEPTIONS
    no_form            = 1
    no_function_module = 2
    OTHERS             = 3.
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.

«Llamar al módulo de función generado y mostrar smartform
CALL FUNCTION ‘/1BCDWB/SF00000009’
 EXPORTING
   USER_SETTINGS                = ‘X’
  TABLES
    itab                        =  ti_itab
 EXCEPTIONS
   FORMATTING_ERROR           = 1
   INTERNAL_ERROR             = 2
   SEND_ERROR                 = 3
   USER_CANCELED              = 4
   OTHERS                     = 5
          .
IF sy-subrc <> 0.
* Implement suitable error handling here
ENDIF.