MAXSTRLEN, Maximum string length exceeded

Run Time Error: This indicates that a string exceeded the maximum limit of 1,048,576 bytes. In M mode, each byte holds a character, but in UTF-8 mode, a character may take between one and four bytes.

Action: Modify the routine so it uses shorter strings.