REPORT Z20_01.
PARAMETERS pa_carr TYPE sflight-carrid.
DATA gs_sflight TYPE demo_focc.
AT SELECTION-SCREEN.
AUTHORITY-CHECK OBJECT 'Z_TEST'
ID 'CARRID' FIELD pa_carr
ID 'ACTVT' FIELD '03'.
IF SY-SUBRC = 4.
MESSAGE 'You need a authority' TYPE 'E'.
ELSEIF SY-SUBRC = 0.
MESSAGE 'SUCCESS' TYPE 'S'.
ENDIF.
START-OF-SELECTION.
SELECT carrid connid fldate seatsmax seatsocc
FROM sflight
INTO CORRESPONDING FIELDS OF gs_sflight
WHERE carrid = pa_carr.
WRITE: / gs_sflight-carrid,
gs_sflight-connid,
gs_sflight-fldate,
gs_sflight-seatsmax,
gs_sflight-seatsocc.
댓글 0
번호 | 제목 | 글쓴이 | 날짜 | 조회 수 |
---|---|---|---|---|
671 | 직원 데이터 [1] | sapjoy | 2024.07.02 | 244 |
670 | REPORT Z99_24. | sapjoy | 2024.05.21 | 84 |
669 | REPORT Z06_01. | sapjoy | 2024.04.21 | 61 |
668 | REPORT z05_36 | sapjoy | 2023.02.08 | 271 |
667 | API | sapjoy | 2022.11.03 | 351 |
666 | z15_21_drag | sapjoy | 2022.02.24 | 307 |
665 | Z18_06_DRAGCLASS | sapjoy | 2022.02.23 | 334 |
664 | REPORT Z21_01 | sapjoy | 2015.10.28 | 2276 |
663 | subroutine pool | sapjoy | 2013.11.16 | 3314 |
» | REPORT Z20_01. | sapjoy | 2012.08.02 | 5097 |
661 | REPORT Z19_02. | sapjoy | 2012.08.02 | 3953 |
660 | REPORT z19_01. | sapjoy | 2012.08.02 | 3559 |
659 | REPORT z18_06. | sapjoy | 2012.08.02 | 3195 |
658 | REPORT z18_05 | sapjoy | 2012.08.02 | 3384 |
657 | REPORT z18_04 . | sapjoy | 2012.08.02 | 3388 |
656 | REPORT z18_03. | sapjoy | 2012.08.02 | 4598 |
655 | REPORT z18_02. | sapjoy | 2012.08.02 | 3124 |
654 | REPORT z18_01. | sapjoy | 2012.08.02 | 3152 |
653 | REPORT z17_23 | sapjoy | 2012.08.02 | 2539 |
652 | REPORT z17_22 | sapjoy | 2012.08.02 | 2307 |