https://pyclip.ru/en/tapes/lzmLaI5AWDM/string-manipulation-in-cobol-part-1