Stata routine that wraps a string to a specific number of characters