定义contorl控件CONTROLS:TC_0100 TYPE TABLEVIEW USING SCREEN 0100.逻辑流绑定内表,读取内容PROCESS BEFORE OUTPUT.:
MODULE STATUS_0100.
MODULE TC_0100_CHANGE_TC_ATTR.
LOOP AT IT_EKPO
INTO WA_EKPO
WITH CONTROL TC_0100
CURSOR TC_0100-CURRENT_LINE.
ENDLOOP.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_0100.
LOOP AT IT_EKPO.
CHAIN.
FIELD:
WA_EKPO-EBELN,
WA_EKPO-MATKL,
WA_EKPO-MATNR,
WA_EKPO-TXZ01,
WA_EKPO-MEINS,
WA_EKPO-MENGE.
ENDCHAIN.
ENDLOOP.
逻辑流中的 MODULE TC_0100_CHANGE_TC_ATTR为读取内表行数绑定到TABEL CONTORL控件:
MODULE TC_0100_CHANGE_TC_ATTR OUTPUT.
DESCRIBE TABLE IT_EKPO LINES TC_0100-LINES.
ENDMODULE. " TC_0100_CHANGE_TC_ATTR OUTPUT屏幕设计:
屏幕设计:
以上~
MODULE STATUS_0100.
MODULE TC_0100_CHANGE_TC_ATTR.
LOOP AT IT_EKPO
INTO WA_EKPO
WITH CONTROL TC_0100
CURSOR TC_0100-CURRENT_LINE.
ENDLOOP.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_0100.
LOOP AT IT_EKPO.
CHAIN.
FIELD:
WA_EKPO-EBELN,
WA_EKPO-MATKL,
WA_EKPO-MATNR,
WA_EKPO-TXZ01,
WA_EKPO-MEINS,
WA_EKPO-MENGE.
ENDCHAIN.
ENDLOOP.
逻辑流中的 MODULE TC_0100_CHANGE_TC_ATTR为读取内表行数绑定到TABEL CONTORL控件:
MODULE TC_0100_CHANGE_TC_ATTR OUTPUT.
DESCRIBE TABLE IT_EKPO LINES TC_0100-LINES.
ENDMODULE. " TC_0100_CHANGE_TC_ATTR OUTPUT屏幕设计:
屏幕设计:

以上~