deutschen Handbuch - QT software GmbH
deutschen Handbuch - QT software GmbH
deutschen Handbuch - QT software GmbH
Sie wollen auch ein ePaper? Erhöhen Sie die Reichweite Ihrer Titel.
YUMPU macht aus Druck-PDFs automatisch weboptimierte ePaper, die Google liebt.
Anhang A - ForDBC Funktionsübersicht<br />
qtODBCInterfaces<br />
00001 !==================================================================<br />
00002 ! (C) Copyright Joerg Kuthe, <strong>QT</strong> <strong>software</strong> <strong>GmbH</strong>, Germany, 1999 - 2011<br />
00003 ! All rights reserved. http://www.qt<strong>software</strong>.de<br />
00004 !—————————————————————————————————<br />
00005 !<br />
00006 ! qtODBCInterfaces for FTN95, CVF, IVF, ...<br />
00007 !<br />
00008 ! DVF/CVF<br />
00009 ! ——---—-<br />
00010 ! compile: DF qtODBCInterfaces.F90 -c -win -compile_only -nologo -libs:dll /warn:nofileopt -dll<br />
00011 !<br />
00012 ! IVF<br />
00013 ! —-<br />
00014 ! compile: IFORT qtODBCInterfaces.F90 /nologo /Od /libs:static /threads /c<br />
00015 !<br />
00016 ! LF95<br />
00017 ! ——<br />
00018 ! compile: LF95 qtODBCInterfaces.f90 -nwrap -c -win -mod d:.mod&obj -ml msvc<br />
00019 ! mit “d:.mod&obj” als dem Modulpfad<br />
00020 !<br />
00021 MODULE qtODBCInterfaces<br />
00022<br />
00023 INTERFACE SQLAllocConnect<br />
00024 FUNCTION SQLAllocConnect(env, dbc)<br />
00025 USE qtODBCKinds<br />
00026 INTEGER (SQLRETURN) :: SQLAllocConnect<br />
00028 INTEGER (SQLHENV) :: env<br />
00029 INTEGER (SQLHDBC) :: dbc<br />
00031 END FUNCTION SQLAllocConnect<br />
00032 END INTERFACE<br />
00033<br />
00034 INTERFACE SQLAllocEnv<br />
00035 FUNCTION SQLAllocEnv( env )<br />
00036 USE qtODBCKinds<br />
00037 INTEGER (SQLRETURN) :: SQLAllocEnv<br />
00038 INTEGER (SQLHENV) :: env<br />
00041 END FUNCTION SQLAllocEnv<br />
00042 END INTERFACE<br />
00043<br />
00044 INTERFACE SQLAllocHandle<br />
00045 FUNCTION SQLAllocHandle( HandleType, InputHandle, OutputHandlePtr )<br />
00046 USE qtODBCKinds<br />
00047 INTEGER (SQLRETURN) :: SQLAllocHandle<br />
00048 INTEGER (SQLSMALLINT) :: HandleType<br />
00049 INTEGER (SQLHANDLE) :: InputHandle<br />
00050 INTEGER (SQLHANDLE) :: OutputHandlePtr<br />
00053 END FUNCTION SQLAllocHandle<br />
00054 END INTERFACE<br />
00055<br />
00056 INTERFACE SQLAllocStmt<br />
00057 FUNCTION SQLAllocStmt( dbc, phstmt )<br />
00058 USE qtODBCKinds<br />
00059 INTEGER (SQLRETURN) :: SQLAllocStmt<br />
00060 INTEGER (SQLHDBC) :: dbc<br />
00061 INTEGER (SQLHSTMT) :: phstmt<br />
00064 END FUNCTION SQLAllocStmt<br />
00065 END INTERFACE<br />
00066<br />
00067<br />
00068 INTERFACE SQLBindCol<br />
00069 ! SQLRETURN SQLBindCol(<br />
00070 ! SQLHSTMT StatementHandle,<br />
00071 ! SQLUSMALLINT ColumnNumber,<br />
00072 ! SQLSMALLINT TargetType,<br />
00073 ! SQLPOINTER TargetValuePtr,<br />
00074 ! SQLLEN BufferLength,<br />
00075 ! SQLLEN * StrLen_or_Ind);<br />
00076<br />
00077 FUNCTION SQLBindColChar( stmt, icol, fCType, rgbValue, cbValueMax, pcbValue )<br />
00078 ! bind CHAR column<br />
00079 USE qtODBCKinds<br />
00080 INTEGER (SQLRETURN) :: SQLBindColChar<br />
00081 INTEGER (SQLHSTMT) :: stmt<br />
00082 INTEGER (SQLUSMALLINT) :: icol<br />
00083 INTEGER (SQLSMALLINT) :: fCType<br />
00084 CHARACTER(*) rgbValue<br />
00085 INTEGER (SQLLEN) :: cbValueMax<br />
00086 INTEGER (SQLLEN) :: pcbValue<br />
ForDBC - Fortran Database Connectivity 44