topic Replace 'raise' with message in Application Development and Automation Discussions

Replace 'raise' with message

Former Member — Fri, 15 Jun 2007 14:55:20 GMT

Hello!

Replace 'raise' with message is the warning which I get. What has to be

done ?

Regards

sas

  CALL FUNCTION '/BMW/STD_IFF_SNR_ZU_AG'
       EXPORTING
            werk       = iff_daten-werk
            sachnummer = iff_daten-sachnummer
            ai         = iff_daten-ai
       IMPORTING
            snr_zu_ag  = ila_iff_snr_ls
       EXCEPTIONS
            not_found  = 1
            OTHERS     = 2.

  IF sy-subrc = 0.
    snr_zu_ag_lf = 'X'.
  ELSE.
    snr_zu_ag_lf = ' '.
  ENDIF.

* Wurde keine Zuordnung gefunden, lesen Kunde aus zfs5zwv_abst
  IF snr_zu_ag_lf = ' '.
    SELECT SINGLE debitor
      FROM /BMW/STD_ZFS5ZWV
      INTO lv_kunnr_lf
     WHERE bmwwerk = iff_daten-werk.
    IF sy-subrc <> 0.
      RAISE kunnr_not_found.
      EXIT.
    ENDIF.
  ELSE.
    lv_kunnr_lf = ila_iff_snr_ls-auftraggeber.
  ENDIF.

  IF lv_kunnr_lf IS INITIAL.
    RAISE kunnr_not_found.
    EXIT.
  ENDIF.

Re: Replace 'raise' with message

RichHeilman — Fri, 15 Jun 2007 14:57:52 GMT

Is all of this code being called within a function module or method?

Regards,

Rich Heilman

Re: Replace 'raise' with message

Former Member — Fri, 15 Jun 2007 14:59:03 GMT

hi sas,

if it's function module then it dont accept message, you should replace with raise keyword.

if it's report then u should write like this,

message e001 (ZMEGCLA).

ZMEGCLA this should be message class which u should create in se91,

e001 by double click on this text u can enter text like'custmoer not avbl'.

then save and activate.

reward points if useful,

regards,

seshu.

Re: Replace 'raise' with message

Former Member — Fri, 15 Jun 2007 14:59:23 GMT

Based on the Program Create a Message class ZA using SE91 (not for fun module) and

add/create a message 000 with 4 Place holders in it like &&&& and

then write

IF snr_zu_ag_lf = ' '.

SELECT SINGLE debitor

FROM /BMW/STD_ZFS5ZWV

INTO lv_kunnr_lf

WHERE bmwwerk = iff_daten-werk.

IF sy-subrc <> 0.

message i000(za) with 'Customer Not found'.

EXIT.

ENDIF.

ELSE.

lv_kunnr_lf = ila_iff_snr_ls-auftraggeber.

ENDIF.

IF lv_kunnr_lf IS INITIAL.

message i000(za) with 'Customer Not found'.

EXIT.

ENDIF.

Reward points for useful Answers

Regards

Anji

Message was edited by:

Anji Reddy Vangala

Re: Replace 'raise' with message

Former Member — Fri, 15 Jun 2007 15:01:25 GMT

Hi,

Go to SE91. Create a message class(for example:zwarn) and add a message number to it(example: W01)

Now replace raise in your program with

MESSAGE W01.

Hope it solves.

Regards

Aneesh.