REPORT z12_06.
TABLES : scarr, sscrfields.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(10) text-001 FOR FIELD p_1.
PARAMETERS : p_1 LIKE scarr-carrid.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS : p_2 LIKE scarr-carrname.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN ULINE.
SELECTION-SCREEN ULINE /1(10).
SELECTION-SCREEN ULINE pos_low(10).
SELECTION-SCREEN ULINE pos_high(10).
SELECTION-SCREEN PUSHBUTTON /pos_low(10) text-002 USER-COMMAND btn01.
SELECTION-SCREEN BEGIN OF BLOCK block WITH FRAME TITLE text-003.
PARAMETERS : p_3 TYPE c.
SELECT-OPTIONS : s_1 FOR scarr-carrid.
SELECTION-SCREEN END OF BLOCK block.
SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME TITLE text-004
NO INTERVALS.
PARAMETERS : p_4 TYPE c.
SELECT-OPTIONS : s_2 FOR scarr-carrid.
SELECTION-SCREEN END OF BLOCK block2.
SELECTION-SCREEN FUNCTION KEY 1.
INITIALIZATION.
MOVE 'Function key 1' TO sscrfields-functxt_01.
AT SELECTION-SCREEN.
IF sscrfields-ucomm = 'FC01'.
MESSAGE 'You clicked Function Key 1' TYPE 'I'.
ENDIF.
IF sscrfields-ucomm = 'BTN01'.
MESSAGE 'You clicked Fuction Key button' TYPE 'I'.
ENDIF.
TABLES : scarr, sscrfields.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(10) text-001 FOR FIELD p_1.
PARAMETERS : p_1 LIKE scarr-carrid.
SELECTION-SCREEN POSITION POS_LOW.
PARAMETERS : p_2 LIKE scarr-carrname.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN SKIP 2.
SELECTION-SCREEN ULINE.
SELECTION-SCREEN ULINE /1(10).
SELECTION-SCREEN ULINE pos_low(10).
SELECTION-SCREEN ULINE pos_high(10).
SELECTION-SCREEN PUSHBUTTON /pos_low(10) text-002 USER-COMMAND btn01.
SELECTION-SCREEN BEGIN OF BLOCK block WITH FRAME TITLE text-003.
PARAMETERS : p_3 TYPE c.
SELECT-OPTIONS : s_1 FOR scarr-carrid.
SELECTION-SCREEN END OF BLOCK block.
SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME TITLE text-004
NO INTERVALS.
PARAMETERS : p_4 TYPE c.
SELECT-OPTIONS : s_2 FOR scarr-carrid.
SELECTION-SCREEN END OF BLOCK block2.
SELECTION-SCREEN FUNCTION KEY 1.
INITIALIZATION.
MOVE 'Function key 1' TO sscrfields-functxt_01.
AT SELECTION-SCREEN.
IF sscrfields-ucomm = 'FC01'.
MESSAGE 'You clicked Function Key 1' TYPE 'I'.
ENDIF.
IF sscrfields-ucomm = 'BTN01'.
MESSAGE 'You clicked Fuction Key button' TYPE 'I'.
ENDIF.
댓글 0
| 번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
|---|---|---|---|---|
| » | REPORT z12_06. | sapjoy | 2012.07.30 | 1298 |
| 489 | REPORT z12_31. | sapjoy | 2012.07.30 | 1312 |
| 488 | REPORT z03_25. | sapjoy | 2012.07.30 | 1367 |
| 487 | REPORT z16_11. | sapjoy | 2012.08.01 | 1400 |
| 486 | REPORT z15_24. | sapjoy | 2012.08.01 | 1401 |
| 485 | REPORT z04_04. | sapjoy | 2012.07.30 | 1411 |
| 484 | PROGRAM z13_01. | sapjoy | 2012.08.01 | 1411 |
| 483 | REPORT z17_13 . | sapjoy | 2012.08.01 | 1427 |
| 482 | REPORT z03_24 [1] | sapjoy | 2012.07.30 | 1428 |
| 481 | REPORT z04_05. | sapjoy | 2012.07.30 | 1439 |
| 480 | REPORT z04_02. | sapjoy | 2012.07.30 | 1442 |
| 479 | REPORT Z04_12. | sapjoy | 2012.07.30 | 1443 |
| 478 | REPORT z03_26. | sapjoy | 2012.07.30 | 1445 |
| 477 | REPORT z04_10. | sapjoy | 2012.07.30 | 1479 |
| 476 | REPORT z04_03. | sapjoy | 2012.07.30 | 1494 |
| 475 | REPORT Z03_17. | sapjoy | 2012.07.30 | 1495 |
| 474 | REPORT Z03_18. | sapjoy | 2012.07.30 | 1495 |
| 473 | REPORT Z03_12. | sapjoy | 2012.07.30 | 1498 |
| 472 | REPORT z03_11. | sapjoy | 2012.07.30 | 1500 |
| 471 | REPORT z04_15. | sapjoy | 2012.07.30 | 1500 |
