此Smartforms必须在程序***中调用

2016-08-16  本文已影响31人  SmalltalkVoice
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,可以有效提醒错误。

上一篇 下一篇

猜你喜欢

热点阅读