METHOD if_ex_inspectionlot_update~set_ud_at_save. * IF sy-tcode = 'QA32' OR sy-tcode = 'QA11'. * IF new_insplot-herkunft = '01' AND new_insplot-lmenge07 > 0. * * ENDIF. * ENDIF. DATA:result TYPE c LENGTH 20. DATA:ls_zexit TYPE zexit. DATA:lt_qals TYPE TABLE OF qals. SELECT SINGLE * INTO CORRESPONDING FIELDS OF ls_zexit FROM zexit WHERE znum = '005'. IF ls_zexit-zflag = 'X'. CALL FUNCTION 'ZSRM_ISCMBS_EXIT' EXPORTING iv_qplos = new_insplot-prueflos. ENDIF. ENDMETHOD.