Addressing only the routing question yields
| aif (t'&L eq 'O').omitted_L_value
|&capL setc UPPER('&L)
| aif ('&capL' eq '32767').case_32767,
+
| ('&capL' eq 'LENGTH').case_length,
+
| ('&capL' eq 'EQUATE').case_equate
| ago .unsupported_L_value
|.omitted_L_value anop
| . . .
|.case_32767 anop
| . . .
|.case_length anop
| . . .
|.case_equate anop
| . . .
|.unsupported_L_value anop
| . . .John Gilmore, Ashland, MA 01721 - USA
