API tools faq
paste
Guest User

Untitled

a guest
May 11th, 2018
165
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
ABAP 0.74 KB | None | 0 0
raw download clone embed print report
  1. *&---------------------------------------------------------------------*
  2. *& Report  ZUSER16SUBROUTINE
  3. *&
  4. *&---------------------------------------------------------------------*
  5. *&
  6. *&
  7. *&---------------------------------------------------------------------*
  8.  
  9. REPORT  ZUSER16SUBROUTINE.
  10.  
  11. PARAMETERS: input1 TYPE i , input2 TYPE i , input3 TYPE i , input4 TYPE i.
  12. DATA: result TYPE i.
  13.  
  14. PERFORM calc
  15.   USING
  16.         input1
  17.         input2
  18.  
  19.   CHANGING
  20.     result.
  21. WRITE: 'input1 + input2 = ' , result.
  22.  
  23. PERFORM calc
  24.   USING
  25.         input3
  26.         input4
  27.  
  28.   CHANGING
  29.     result.
  30. WRITE: / 'input3 + input4 = ', result.
  31.  
  32. FORM calc
  33.   USING
  34.     val1 TYPE i
  35.     val2 TYPE i
  36.   CHANGING
  37.     val3 TYPE i.
  38.  
  39.   val3 = val1 + val2.
  40.   ENDFORM.
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!