Help for CPD0010

For a list, the maximum nesting level is 5. For the TYPE(*CMD) parameter the maximum nesting level is 25.

Change the program so that the depth of nesting levels does not exceed the maximum allowed.