S
PL_
PL_
PL_GETVAR2{%}FROM{%}
*
      V1$$$ = {%2}
      GOSUB 799001
      {%1} = V2$$$
