ZTTESTEXCMSGWord文件下载.docx
《ZTTESTEXCMSGWord文件下载.docx》由会员分享,可在线阅读,更多相关《ZTTESTEXCMSGWord文件下载.docx(24页珍藏版)》请在冰豆网上搜索。
*
INCLUDE
ZT_TEST_EXCMSG_TOP.
T
O
R
PARAMETERS:
P_PLANT
TYPE
T001W-WERKS
OBLIGATORY.
*BLOCK
'
Selection
by'
SELECTION-SCREEN
BEGIN
OF
BLOCK
B1
WITH
FRAME
TITLE
TEXT-H01.
*LINE
1
LINE.
PARAMETERS
RB_MATRL
RADIOBUTTON
GROUP
GR1
DEFAULT
X'
USER-COMMAND
CMD.
COMMENT
3(15)
TEXT-001.
SELECT-OPTIONS:
S_MATRL
FOR
T_MATRL.
END
2
RB_MRPC
.
3(18)
TEXT-002.
P_MRPCNL
T024D-DISPO.
3
RB_PRDG
GR1.
TEXT-003.
P_PRDGRP
RM61R-PRGRP
MATCHCODE
OBJECT
MAT2.
4
RB_VNDR
TEXT-004.
S_VENDOR
T_VENDOR.
5
RB_PCSG
TEXT-005.
P_PCSGRP
T024-EKGRP
B1.
Restrict
Selection'
B2
TEXT-H02.
P_CB1
AS
CHECKBOX
C_X.
3(35)
TEXT-CO1.
P_CB2
TEXT-CO2.
P_CB3
TEXT-CO3.
P_CB4
TEXT-CO4.
P_CB5
TEXT-CO5.
6
P_CB6
TEXT-CO6.
7
P_CB7
TEXT-CO7.
8
P_CB8
TEXT-CO8.
B2.
A
P
AT
OUTPUT.
IF
IS
INITIAL.
LOOP
SCREEN.
SCREEN-NAME
=
C_RB_MATRL.
SCREEN-INPUT
C_ZERO.
ENDIF.
C_RB_MRPC.
C_RB_PRDG.
C_RB_VNDR.
C_RB_PCSG.
C_MATLOW.
C_MATHIGH.
C_MRPCNL.
C_PRDGRP.
C_VNDLOW.
C_VNDHIGH.
C_PCSGRP.
MODIFY
ENDLOOP.
REFRESH
S_VENDOR.
CLEAR:
P_MRPCNL,
P_PRDGRP,
P_PCSGRP.
ELSE.
*Material
SELECTED