DATA: RSPAR_TAB TYPE TABLE OF RSPARAMS,
RSPAR_LINE LIKE LINE OF RSPAR_TAB.
CLEAR:RSPAR_TAB[],RSPAR_LINE.
*RSPAR_LINE-SELNAME = 'SD_SAKNR'.
* RSPAR_LINE-SIGN = 'I'.
* RSPAR_LINE-OPTION = 'BT'.
* RSPAR_LINE-LOW = '1405010000'.
* RSPAR_LINE-HIGH = '1405020000'.
* APPEND RSPAR_LINE TO RSPAR_TAB. CLEAR: RSPAR_LINE.
*
* RSPAR_LINE-SELNAME = 'SD_SAKNR'..
* RSPAR_LINE-SIGN = 'I'.
* RSPAR_LINE-OPTION = 'BT'.
* RSPAR_LINE-LOW = '1404010000'.
* RSPAR_LINE-HIGH = '1404020000'.
* APPEND RSPAR_LINE TO RSPAR_TAB. CLEAR: RSPAR_LINE.
*
* RSPAR_LINE-SELNAME = 'SD_SAKNR'..
* RSPAR_LINE-SIGN = 'I'.
* RSPAR_LINE-OPTION = 'BT'.
* RSPAR_LINE-LOW = '1403010000'.
* RSPAR_LINE-HIGH = '1403020000'.
* APPEND RSPAR_LINE TO RSPAR_TAB. CLEAR: RSPAR_LINE.
*
* RSPAR_LINE-SELNAME = 'SD_BUKRS'..
* RSPAR_LINE-SIGN = 'I'.
* RSPAR_LINE-OPTION = 'EQ'.
* RSPAR_LINE-LOW = '8030'.
* .
* APPEND RSPAR_LINE TO RSPAR_TAB. CLEAR: RSPAR_LINE.
*
* SUBMIT RFITEMGL WITH SELECTION-TABLE RSPAR_TAB
* VIA SELECTION-SCREEN AND RETURN.
第二种
第三种
使用PERFORM FORM1 IN PROGRAM ('ZMM001')等价于PERFORM FORM1(ZMM001).使用FIELD-SYMBOLS使用其他程序的数据,
FIELD-SYMBOLS <F1>TYPE ANY.
DATA XX(50).
XX = '(ZMM002)G_DATA'."程序ZMM001中G_DATA的数据
ASSIGN (XX) TO <F1>.
<F1>= 'SDFAS'. "这样就可以茄陆孝将主程序悉念中ZMM001的变量G_DATA的值修改为SDFAS了。颤稿
你这个是SUBMIT的用法配瞎错了SUBMIT zreport with p_param1 = 'value1' with p_param2 = 'value2'.
上培碧空面这句的用法是针对parameter的,可以这样传单值
但是你写的是select-options,应该用慧埋这个
SUBMIT zreport with selection-table seltab
下面写个简单例子:
DATA: GT_A TYPE TABLE OF RSPARAMS,
LW_A LIKE LINE OF GT_A.
LW_A-SELNAME = 'S_A'.
LW_A-SIGN = 'I'.
LW_A-OPTION = 'EQ'.
LW_A-LOW = '20110101'.
APPEND LW_A TO GT_A.
SUBMIT ZREPORT WITH SELECTION-TABLE GT_A.
以下是ZREPORT的代码:
SELECT-OPTIONS: s_a FOR sy-datum.
如果没明白的话可以继续问
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)