https://devhubby.com/thread/how-to-use-a-perform-varying-loop-in-cobol