Hi experts,
I have created a function module .But in epc check list I am founding 2 warnings
1.No RAISE for EXCEPTION NOTHING_ACTIVE in the Exception Group
2.No RAISE for EXCEPTION ERROR_COUNTRY_CODE in the Exception Group
can you please help me to solve this?(I have given the code in below)
Regards,
Sarkar
FUNCTION Z_bte_00003410.
*"----
""Local Interface:
*" IMPORTING
*" REFERENCE(IM_MLDLA) TYPE MLDPARAM-MLDLA
*" REFERENCE(IM_MLDEM) TYPE MLDPARAM-MLDEM
*" REFERENCE(IM_MLZLA) TYPE MLDPARAM-MLZLA
*" REFERENCE(IM_SPRAS) TYPE T002-SPRAS DEFAULT SY-LANGU
*" REFERENCE(IM_TABNAME) TYPE DFIES-TABNAME
*" REFERENCE(IM_RECORD)
*" CHANGING
*" REFERENCE(CH_INTCA) TYPE T005-INTCA
*" REFERENCE(CH_LANDA) TYPE T005-LANDA
*" REFERENCE(CH_LKVRZ) TYPE T005-LKVRZ
*" REFERENCE(CH_LANDX) TYPE T005T-LANDX
*" REFERENCE(CH_LANDX50) TYPE MLDPARAM-LANDX50
*" REFERENCE(CH_IDTYP) TYPE MLDPARAM-IDTYP
*" EXCEPTIONS
*" ERROR_COUNTRY_CODE
*" NOTHING_ACTIVE
*"----
************************************************************************
************************************************************************
*Local Variable Declaration:
DATA : l_v_landa TYPE landa_005z,
l_v_landx TYPE landx,
l_v_lkvrz TYPE lkvrz_005z,
l_v_landx50 TYPE landx50_005z.
Check if an entry exists in T005Z
SELECT SINGLE t005z~landa
t005zt~landx
t005zt~lkvrz
t005zt~landx50
FROM t005z INNER JOIN t005zt "#EC CI_BUFFJOIN
ON t005zmldla = t005ztmldla
AND t005zmldem = t005ztmldem
AND t005zintca = t005ztintca
INTO (l_v_landa,l_v_landx,l_v_lkvrz,l_v_landx50)
WHERE t005z~mldla EQ im_mldla
AND t005z~mldem EQ im_mldem
AND t005z~intca EQ im_mlzla
AND t005zt~spras EQ im_spras .
IF sy-subrc EQ 0.
ch_intca = im_mlzla.
ch_landa = l_v_landa.
ch_lkvrz = l_v_lkvrz.
ch_landx = l_v_landx.
ch_landx50 = l_v_landx50.
ENDIF.
ENDFUNCTION.