Using EXCEPTIONS in functions.

Question

Hi all!
I would like to use excepions in function  modules, could you please explain to me how should I use it? If I pass an internal  table if there is some error, I would like to have exceptions instead of get a dump.
Please let me know.
Thank you!
Gabriela.

Answer 1

Hi,
Try this way.
<li>Create function module with RAISE statement.
FUNCTION zget_marc_data.
*"*"Local Interface:
*"  IMPORTING
*"     REFERENCE(WERKS) TYPE  MARC-WERKS
*"  TABLES
*"      IT_MARC STRUCTURE  MARC
*"  EXCEPTIONS
*"      NO_DATA
  SELECT * FROM marc INTO TABLE it_marc WHERE werks = werks.
  IF sy-subrc NE 0.
    RAISE no_data.
  ENDIF.
ENDFUNCTION.
<li>Call this function module in the program.
REPORT ztest_notepad.
DATA: it_marc TYPE TABLE OF marc.
CALL FUNCTION 'ZGET_MARC_DATA'
  EXPORTING
    werks   = 'X000'
  TABLES
    it_marc = it_marc
  EXCEPTIONS
    no_data = 1
    OTHERS  = 2.
IF sy-subrc <> 0.
  MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
          WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
Thanks
Venkat.O