代码写在屏幕逻辑流中
MODULE kutext_auto INPUT.
IF ztsd033-kunwe IS NOT INITIAL.
SELECT SINGLE name1 INTO ztsd033-kutext
FROM kna1
WHERE kunnr = ztsd033-kunwe.
IF sy-subrc <> 0.
MESSAGE '售达方编码填入有误!' TYPE 'E'.
ENDIF.
ENDIF.
ENDMODULE.