   Solution 1 
*   Use the REVERSE intrinsic function to reverse the string
*   then use the INSPECT tallying to count the number of spaces at the
*   begining of the reversed string.  The substring length is then the
*   FullSringLength - CharCount.
*   Use reference modification of get the substring.
    DISPLAY "Task4 Before = " xStr "<<<<<<"
    MOVE 0 TO CharCount
    INSPECT FUNCTION REVERSE(xStr) TALLYING CharCount
        FOR LEADING SPACES
    DISPLAY "Task4 After = "xStr(1:50 - CharCount