home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / PRECOM.ZIP / SQLSTUFF.DEF < prev    next >
Encoding:
Modula Definition  |  1992-09-22  |  635 b   |  21 lines
  1. DEFINITION MODULE SQLStuff;
  2. FROM SQLDA IMPORT sqlda,sqldaPtr;
  3. FROM SQLCA IMPORT sqlca;
  4.  
  5.  
  6. TYPE
  7.   SQLErrorRoutine = PROCEDURE(CARDINAL,     (* output file handle *)
  8.                               ARRAY OF CHAR,  (* msg to prepend*)
  9.                               sqlca); (* file handle & error number *)
  10.  
  11.  
  12.  
  13. VAR
  14.   SQLErrorHandler : SQLErrorRoutine;   (* default error handler*)
  15.  
  16. PROCEDURE AllocSQLDA( VAR TheDA : sqldaPtr; NbrVars : CARDINAL);
  17. PROCEDURE DeallocSQLDA(VAR TheDA : sqldaPtr);
  18. PROCEDURE DefaultErrorRoutine( Handle : CARDINAL; Msg : ARRAY OF CHAR;
  19.                                CA : sqlca);
  20.  
  21. END SQLStuff.