|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 |
PARAMETERS<img src="//www.ut163.com/wp-content/uploads/2019/08/20190829101447-92.gif" border="0" alt="" />_YHXX AS CHECKBOX USER-COMMAND YHXX. PARAMETERS: P_YHDM LIKE SKB1-HBKID MODIF ID RD2, P_HKTID LIKE SKB1-HKTID MODIF ID RD2, P_AMO LIKE ZFI_CXGZ-ZMHGZ MODIF ID RD2, P_YHLS(50) MODIF ID RD2. SELECTION-SCREEN END OF BLOCK SC5. SELECTION-SCREEN END OF BLOCK SC2. AT SELECTION-SCREEN OUTPUT. IF P_QUERRY = ''. LOOP AT SCREEN. CASE SCREEN-GROUP1. WHEN 'RD2'. IF P_YHXX = 'X'. SCREEN-ACTIVE = '1'. ELSE. SCREEN-ACTIVE = '0'. ENDIF. ENDCASE. MODIFY SCREEN. ENDLOOP. ENDIF. |
2019
08-29
08-29
