Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *&---------------------------------------------------------------------*
- *& Report Z_SELECTOPTION_TEST
- *&
- *&---------------------------------------------------------------------*
- *&
- *&
- *&---------------------------------------------------------------------*
- REPORT Z_SELECTOPTION_TEST.
- *Tables Used
- TABLES: ZASG_SAL , ZASG_EMP .
- *Data Variables.
- DATA: l_subrc TYPE SY-SUBRC,
- wa_emp TYPE ZASG_EMP,
- S_empid TYPE TABLE OF SELOPT WITH HEADER LINE,
- counter TYPE INT1 VALUE 0,
- errors TYPE INT1 VALUE 0.
- *Selection Screen (ID)
- SELECTION-SCREEN BEGIN OF BLOCK SELECTION WITH FRAME TITLE text-001.
- SELECT-OPTIONS EMP_ID FOR ZASG_EMP-id .
- PARAMETERS : EMP_NAME LIKE ZASG_EMP-name .
- PARAMETERS : EMP_POS LIKE ZASG_EMP-empposition .
- SELECTION-SCREEN END OF BLOCK SELECTION.
- wa_emp-name = EMP_NAME.
- wa_emp-empposition = EMP_POS.
- LOOP AT EMP_ID.
- S_empid-SIGN = EMP_ID-SIGN.
- S_empid-OPTION = EMP_ID-OPTION.
- S_empid-LOW = EMP_ID-LOW.
- S_empid-HIGH = EMP_ID-HIGH.
- APPEND S_empid.
- CLEAR S_empid.
- ENDLOOP.
- CALL FUNCTION 'Z_ASG_FN_SEARCH_TEST'
- EXPORTING
- WA_EMP = WA_EMP
- TABLES
- Z_EMPID = S_empid.
- INITIALIZATION.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement