Advertisement
Guest User

Untitled

a guest
Jan 8th, 2018
98
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
COBOL 0.24 KB | None | 0 0
  1. WS VARIABLER:
  2. WS-TEMP-RES PIC 99.
  3. WS-TEMP-MOD PIC 99.
  4.  
  5. COMPUTE WS-TEMP-RES = WS-TEMP-RUTKONTROLL / 2
  6. COMPUTE WS-TEMP-MOD =                        
  7.         WS-TEMP-RUTKONTROLL - WS-TEMP-RES * 2
  8. MOVE WS-TEMP-MOD TO WS-TEMP-RUTKONTROLL
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement