FORM FRM_USER_STATUS USING EXTAB TYPE SLIS_T_EXTAB.
DATA:L_BUTXT TYPE BUTXT.
* SELECT SINGLE butxt INTO l_butxt FROM t001 WHERE bukrs IN s_bukrs.
"設置gui狀態
SET PF-STATUS ‘STANDARD’ .
"設置動態標題
SET TITLEBAR ‘STANDARD’ WITH L_BUTXT .
ENDFORM.