These procedure converts a string to Proper-, Pascal- and CamelCase.
The routines will handle exception for certain words like ‘ApS’ (Danish company type), ‘A/S’ (Danish company type, ‘LTD’ (UK/US company type), ‘GmbH’ (German company type) and others. You can extend with type you need. Further, words starting with ‘Mc’ or ‘Mac’ will also be converted correctly.
This procedure searches the IFS tree structure (including sub-directories) for files and directories having a name that matches the mask 🙂
When a matching file or directory is found, a ‘File Found’ procedure is called. The ‘File Found’ procedure is one that you supply to process the found file/directory. An example of a ‘File Found’ procedure is supplied.
The two procedures described in this article, converts a string to upper or lower case. The conversion is done fast by using a combination of a translation API to provide the correct translation tables, which includes national characters for us with such, and then use the build in function %XLate to perform the actual translation very fast.
The speed of the convert is way faster than using SQL (Set B = Upper(A) ) or translate APIs. These two methods will do the job if you just need to convert now-and-then. A batch job converting many fields/records will benefit from my fast routines.