Advertisement
Guest User

Untitled

a guest
Sep 27th, 2017
87
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 1.00 KB | None | 0 0
  1. *****Necesitas definir estas Variables para Impresion.
  2. DATA: w_ssfcompop TYPE ssfcompop.
  3. DATA: w_ssfctrlop LIKE ssfctrlop.
  4.  
  5. DATA: w_sform LIKE tnapr-sform.
  6. DATA: w_fm_name TYPE rs38l_fnam.
  7.  
  8.  
  9. * Control parameters
  10.   w_ssfctrlop-no_dialog = ' '.
  11.   w_ssfctrlop-langu = sy-langu.
  12.  
  13.   w_ssfcompop-tdtitle = 'Printing Forms Miscelanous'(t01).
  14.   w_ssfcompop-tddest = 'HPSAP'.
  15.   w_ssfcompop-tdimmed = 'X'.
  16.   w_ssfcompop-tddelete = 'X'.
  17.   w_ssfcompop-tdlifetime = '1'.
  18.   w_ssfcompop-tdnoprev = ' '.
  19.  
  20.  
  21.   w_sform = 'Z_AQUI_EL_NOMBRE_DEL_SMARTFORM'.
  22.  
  23.     CALL FUNCTION 'SSF_FUNCTION_MODULE_NAME' " <---esta es la función que llama el SMARTFORM
  24.       EXPORTING
  25.         formname           = w_sform
  26.       IMPORTING
  27.         fm_name            = w_fm_name
  28.       EXCEPTIONS
  29.         no_form            = 1
  30.         no_function_module = 2
  31.         OTHERS             = 3.
  32.  
  33.     IF sy-subrc <> 0.
  34.       MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
  35.             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
  36.     ENDIF.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement