Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- REPORT zapfchr01_test NO STANDARD PAGE HEADING LINE-SIZE 25.
- TABLES : t012.
- ranges : r_bank FOR t012-hbkid,
- r_bank_x for t012-hbkid.
- DATA gt_t012 TYPE STANDARD TABLE OF T012.
- DEFINE mc_select.
- &4-sign = &1.
- &4-option = &2.
- &4-low = &3.
- &4-high = space.
- APPEND &4.
- END-OF-DEFINITION.
- mc_select 'I' 'EQ' 'BBL01' r_bank.
- mc_select 'I' 'EQ' 'BBL02' r_bank.
- mc_select 'I' 'EQ' 'BBL03' r_bank.
- mc_select 'I' 'EQ' 'SCB01' r_bank.
- mc_select 'I' 'EQ' 'BBL03' r_bank_x.
- select *
- FROM t012
- into TABLE gt_t012
- WHERE
- * hbkid NOT IN r_bank_x.
- hbkid NOT IN r_bank.
- BREAK-POINT.
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement