form f_read_data中:
message '找不到数据' type 'E'.
stop.
改为:
message '找不到数据' type 'S' display like 'E'.
stop.
然后:
start
-of-selection.
perform f_read_data.
************************************************************************
end-of-selection.
IF it_intab[] IS NOT INITIAL.
perform f_get_smf_name.
perform f_smartform_print.
ENDIF.
perform f_read_data.
************************************************************************
end-of-selection.
IF it_intab[] IS NOT INITIAL.
perform f_get_smf_name.
perform f_smartform_print.
ENDIF.