If you need to write lines of code, then that should not worry you, because at the end of the day that is a major part of your job.
You don't need 49 MOVE statements. You can do it with one MOVE with 49 receiving fields.
For either of the above, the editor makes your task hardly noticeable.
I suggest you check on your understanding of what happens with initialise if, as you say, your delimeters are disappearing. It isn't magic, it is something that you have done, even if you are not aware of it. For the moment, forget what you think you know and check it out thoroughly in the manual.
If you have initial values in your copybook (for everthing) you can do this sort of thing:
move the-01-of-the-copybook to another-01-of-the same-size
you do that up where you are setting-up the program.
Then, to initiliase whenever you need to:
move another-01-of-the same-size to the-01-of-the-copybook
You can ensure that the 01-levels are the same length using LENGTH OF (although it does not matter for correct processing, just for human clarity, if the second is longer, it does (can) matter if the second is shorter).