S
PL_
PL_
PL_ISVAR2{%}FROM{%}
*
      V1$$$ = {%2}
      GOSUB 799002
      IF V2$$$ THEN
         {%1} = 1
      END
