DATA: field(50).
FIELD-SYMBOLS: <dbcnt> TYPE any.
field = '(ZMM220)lft_h[]'.
ASSIGN (field) TO <dbcnt>.
IF sy-subrc <> 0.
MESSAGE e000(oo) WITH '此Smartforms必须在程序ZMM220中调用'.
ENDIF.
p_h = <dbcnt>. "抬头信息
field = '(ZMM220)lft_i[]'.
ASSIGN (field) TO <dbcnt>.
p_i = <dbcnt>.
在smartforms中提示此form属于哪个程序使用。因为smartforms在程序初始化的时候,需要传入那个程序使用此form,此处是ZMM220。在使用相同form的时候,经常忘记修改此处,如果设置从message,可以有效提醒错误。
网友评论