home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / PRECOM.ZIP / PARSEVAR.DEF < prev    next >
Text File  |  1992-12-04  |  1KB  |  49 lines
  1. DEFINITION MODULE ParseVar;
  2. IMPORT SQLPREP;
  3. (* Manages the host variables
  4.     Builds list of host variables
  5.     registers the host variables as found
  6.     returns ID of host variables
  7.  
  8. *)
  9.  
  10. CONST
  11.  
  12.   MaxVars = 300;
  13.  
  14. TYPE
  15.   VarRec = RECORD
  16.     Name : ARRAY[0..30] OF CHAR;
  17.     Prefix:ARRAY[0..30] OF CHAR;
  18.     Suffix:ARRAY[0..10] OF CHAR;  (* used WITH objects TO point TO the data part*)
  19.     Type : CARDINAL;
  20.     Len  : CARDINAL;
  21.     ID   : CARDINAL;
  22.   END;
  23.  
  24.   VarArray = RECORD
  25.     Allocated, used : CARDINAL;
  26.     Vars : ARRAY[0..MaxVars] OF VarRec;
  27.   END;
  28.  
  29. VAR
  30.  
  31.  ProgVars    : VarArray;
  32.  
  33.   (* given an input line, get  valid variables *)
  34.  
  35. PROCEDURE GetVars(Line : ARRAY OF CHAR; VAR InComment : CARDINAL);
  36.  
  37.   (* given a host variable, return the variable ID*)
  38. PROCEDURE PrepareSQL(VAR Line : ARRAY OF CHAR; VAR Token: SQLPREP.sqla_tokens);
  39. PROCEDURE GetID(VarName : ARRAY OF CHAR): LONGCARD;
  40. PROCEDURE GetVarName(VAR Varname : ARRAY OF CHAR;
  41.                      VAR type,len : CARDINAL;
  42.                          ID : LONGCARD);
  43. PROCEDURE RemoveComment(VAR Line : ARRAY OF CHAR; VAR InComment : CARDINAL);
  44. PROCEDURE SQLStatement(Line : ARRAY OF CHAR): BOOLEAN;
  45.  
  46.  
  47.  
  48. END ParseVar.
  49.