Terrence,

I'll take a closer look at this tomorrow. In the meantime, consider evaluating the parameter once before the case statement begins (lcparm = ALLTRIM(UPPER(tcAction))), and then evaluating lcparm within it. It'll improve readability and overall performance.