声明:
data: begin of it_item occurs 0,
end of it_item.
data it_item1 like it_item occurs 0 with header line.
data it_header like table of zit_header with header line.
data: begin of istp2 occurs 0,
num1 like stpox-stufe,
num2 like stpox-stufe.
include structure stpov. "BOM 項目(展開以顯示用途清單)
data: end of istp2.
data it_tab_header like zsi_header value is initial.
选择屏幕:
selection-screen begin of block b1 with frame title text-002.
parameter: p_bukrs like bkpf-bukrs obligatory default '2000'. "紙本輸出
select-options: s_budat for bkpf-budat obligatory.
parameter: p_file like rlgrap-filename default 'C:\Test.TXT'. "檔案預設下載路徑
selection-screen end of block b1.
提示错误信息:
if sy-subrc <> 0.
message s001 with '无数据!' display like 'E'.
exit.
endif.
阅读(726) | 评论(0) | 转发(0) |