Keep in mind that the posted example will not work correctly.
If the code is to ACCEPT values from SYSIN, the variables should be in working-storage.
Many organizations no longer permit use of ACCEPT to read multiple variables into a program. If more than one variable is needed, the code must have a SELECT, an FD, OPEN, READ, etc.
Hope this helps,