Error 17                      THEN is Missing                         pp 17

 Source:  Compiler

 Cause:   Then is missing from If/Then construct.

 Remedy:  Examine the statement(s) ahead of the error cursor, back to the
          start of the IF statment for the above condition.


 ----------------------------------------------------------------------------


 Example:
       BEGIN
          If (1+1) < (2+2) { Then }     { Wrong - 'THEN' is missing     }
             Begin
             WriteLn ('OK');
             End

          If (1+1) < (2+2) Tehn         { Wrong - 'THEN' is mis-spelled }
             Begin
             WriteLn ('OK');
             End
       END.