PROCESS BEFORE OUTPUT.
*&SPWIZARD: PBO FLOW LOGIC FOR TABLECONTROL 'ZTC'
MODULE ZTC_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE ZTC_CHANGE_COL_ATTR.
LOOP AT GT_ZKEVIN
INTO GS_ZKEVIN
WITH CONTROL ZTC
CURSOR ZTC-CURRENT_LINE.
MODULE ZTC_GET_LINES.
*&SPWIZARD: MODULE ZTC_CHANGE_FIELD_ATTR
ENDLOOP.
MODULE STATUS_1000.
*
PROCESS AFTER INPUT.
*&SPWIZARD: PAI FLOW LOGIC FOR TABLECONTROL 'ZTC'
LOOP AT GT_ZKEVIN.
CHAIN.
FIELD GS_ZKEVIN-ID.
FIELD GS_ZKEVIN-NAME.
MODULE ZTC_MODIFY ON CHAIN-REQUEST.
endchain.
FIELD GS_ZKEVIN-LINE
MODULE ZTC_MARK ON REQUEST.
ENDLOOP.
MODULE ZTC_USER_COMMAND.
*&SPWIZARD: MODULE ZTC_CHANGE_TC_ATTR.
*&SPWIZARD: MODULE ZTC_CHANGE_COL_ATTR.
MODULE USER_COMMAND_1000.
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/9433213/viewspace-410259/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/9433213/viewspace-410259/