Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- *&---------------------------------------------------------------------*
- *& Report ZASG_EMP_SAL_SEARCH
- *&
- *&---------------------------------------------------------------------*
- *&
- *&
- *&---------------------------------------------------------------------*
- REPORT ZASG_EMP_SAL_SEARCH.
- TABLES: ZASG_SAL , ZASG_EMP .
- DATA: l_subrc TYPE SY-SUBRC,
- wa_emp TYPE ZASG_EMP,
- wa_sal TYPE ZASG_SAL,
- S_empid TYPE TABLE OF SELOPT WITH HEADER LINE.
- SELECTION-SCREEN SKIP.
- 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.
- *selection-screen begin of block b1 .
- *parameters:
- * EMP_SAL type ZASG_SAL-amount modif id sc1.
- *selection-screen end of block b1.
- *loop at EMP_ID.
- * WRITE : / EMP_ID-LOW.
- *endloop.
- wa_emp-name = EMP_NAME.
- wa_emp-empposition = EMP_POS.
- S_empid-SIGN = EMP_ID-SIGN.
- S_empid-OPTION = EMP_ID-OPTION.
- S_empid-LOW = EMP_ID-LOW.
- S_empid-HIGH = EMP_ID-HIGH.
- CALL FUNCTION 'Z_ASG_FN_SEARCHFOREMPLOYEE'
- EXPORTING
- WA_EMP = WA_EMP
- TABLES
- Z_EMPID = S_empid.
- .
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement