LISTSERV - HP3000-L Archives

HP3000-L Archives

May 1998, Week 2

HP3000-L@RAVEN.UTC.EDU

	LISTSERV Archives
	HP3000-L Home
	HP3000-L May 1998, Week 2

	Log In
	Register

	Subscribe or Unsubscribe

	Search Archives
Options:	Use Monospaced Font Show Text Part by Default Show All Mail Headers
Message:	[<< First] [< Prev] [Next >] [Last >>]
Topic:	[<< First] [< Prev] [Next >] [Last >>]
Author:	[<< First] [< Prev] [Next >] [Last >>]
Subject:	ODBCLink/SE-32 and ADO
From:	[log in to unmask][log in to unmask]
Reply To:	[log in to unmask]
Date:	Fri, 8 May 1998 22:49:00 GMT
Content-Type:	text/plain
Parts/Attachments:	text/plain (248 lines)
I'm trying to use MS ADO 1.5 to connect to the data sources on the HP3000 via
ODBCLINK/SE-32.  I'm able to connect, but not open data source.  My
application will just lockup.  Here is a portion of my code:

Const sADOConnect = "DSN=SFD32;UID=;PWD=;DRIVER={ODBCLink/SE-32
Driver};DATABASE=;"

Dim ADORS As New ADODB.Recordset
Dim ADOCN As New ADODB.Connection
Dim aSQL As String

ADOCN.Open (sADOConnect)

ADORS.CursorLocation = adUseClient
' I tried this...
ADORS.Open "Select * from sfd.BasicTRL", ADOCN, adOpenKeyset, adLockOptimistic
' ...and this
ADORS.Open "Select * from BasicTRL", ADOCN, adOpenKeyset, adLockOptimistic

upon executing the ADORS.Open... statement the application locks (never
returns or times out)

Any idea what is happening?

Here is a copy of the ODBC log file on the HP.  All of this happens and the
application still locks.  It looks like the HP is finished but the
information never makes it back to PC.

FYI, I do not have a problem with MS RDO.  I do have a need to use MS ADO.

98/05/08 17:10:49 1298 ODBC listener started
98/05/08 17:11:38 1298 Listener created new connection as SYS1 (PIN 1258),
98/05/08 17:11:39 1258 ODBCLNSE E.55.02 started from sockets
98/05/08 17:11:39 1258 Allbase Prepare[49]SELECT NAME, OWNER, TYPE, NPAGES,
NROWS FROM CATALOG.TABLE;
98/05/08 17:11:39 1258 Allbase SetParams[49]
98/05/08 17:11:39 1258 Allbase Fetch[49] Rows=200 MaxRows=200
98/05/08 17:11:39 1258 Allbase Fetch[49] Rows=93 MaxRows=200
98/05/08 17:11:40 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:11:40 1258 Allbase Close cursor[49]
98/05/08 17:11:40 1258 Allbase Commit
98/05/08 17:11:40 1258 Allbase Commit
98/05/08 17:11:40 1258 Allbase Prepare[49]SELECT
NAME,OWNER,NUMP,NUMR,MULTIRESULT FROM CATALOG.PROCEDURE;
98/05/08 17:11:40 1258 Allbase SetParams[49]
98/05/08 17:11:40 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:11:40 1258 Allbase Close cursor[49]
98/05/08 17:11:40 1258 Allbase Commit
98/05/08 17:11:40 1258 Allbase Commit
98/05/08 17:11:40 1258 User MGR.SFD connected to SFDDBE.DATA.SFD,
ClientVer=E.55.02
98/05/08 17:13:07 1258 Prepare[0]Select * from sfd.BasicTRL
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT * FROM SFD.BASICTRL;
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT CONSTRAINTNAME,TYPE FROM
CATALOG.CONSTRAINT WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT
CONSTRAINTNAME,NUMC,COLNUMS,UNIQUE FROM CATALOG.CONSTRAINTINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT NUMC,NFULL,UNIQUE,COLNUMS
FROM CATALOG.HASH WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.INDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.TPINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[49]SELECT INDEXNAME,COLNUMS,UNIQUE
FROM CATALOG.IMAGEKEY WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:07 1258 Allbase SetParams[49]
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=1 MaxRows=200
98/05/08 17:13:07 1258 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[49]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:07 1258 Allbase Prepare[0]SELECT * FROM SFD.BASICTRL;
98/05/08 17:13:07 1258 SetParams[0] nparam=0
98/05/08 17:13:07 1258 Allbase SetParams[0]
98/05/08 17:13:07 1258 Allbase Fetch[0] Rows=90 MaxRows=200
98/05/08 17:13:07 1258 Allbase Fetch[0] Rows=0 MaxRows=200
98/05/08 17:13:07 1258 Allbase Close cursor[0]
98/05/08 17:13:07 1258 Allbase Commit
98/05/08 17:13:08 1298 Listener created new connection as SYS2 (PIN 889),
98/05/08 17:13:08 889 ODBCLNSE E.55.02 started from sockets
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT NAME, OWNER, TYPE, NPAGES,
NROWS FROM CATALOG.TABLE;
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=200 MaxRows=200
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=93 MaxRows=200
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT
NAME,OWNER,NUMP,NUMR,MULTIRESULT FROM CATALOG.PROCEDURE;
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 User MGR.SFD connected to SFDDBE.DATA.SFD,
ClientVer=E.55.02
98/05/08 17:13:08 889 Prepare[0]SELECT * FROM sfd.BasicTRL
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT * FROM SFD.BASICTRL;
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT CONSTRAINTNAME,TYPE FROM
CATALOG.CONSTRAINT WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT
CONSTRAINTNAME,NUMC,COLNUMS,UNIQUE FROM CATALOG.CONSTRAINTINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT NUMC,NFULL,UNIQUE,COLNUMS
FROM CATALOG.HASH WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.INDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.TPINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[49]SELECT INDEXNAME,COLNUMS,UNIQUE FROM
CATALOG.IMAGEKEY WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:08 889 Allbase SetParams[49]
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=1 MaxRows=200
98/05/08 17:13:08 889 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:08 889 Allbase Close cursor[49]
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Commit
98/05/08 17:13:08 889 Allbase Prepare[0]SELECT * FROM SFD.BASICTRL;
98/05/08 17:13:09 1298 Listener created new connection as SYS3 (PIN 1636),
98/05/08 17:13:09 1636 ODBCLNSE E.55.02 started from sockets
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT NAME, OWNER, TYPE, NPAGES,
NROWS FROM CATALOG.TABLE;
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=200 MaxRows=200
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=93 MaxRows=200
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT
NAME,OWNER,NUMP,NUMR,MULTIRESULT FROM CATALOG.PROCEDURE;
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 User MGR.SFD connected to SFDDBE.DATA.SFD,
ClientVer=E.55.02
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT * FROM SFD.BASICTRL;
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT CONSTRAINTNAME,TYPE FROM
CATALOG.CONSTRAINT WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT
CONSTRAINTNAME,NUMC,COLNUMS,UNIQUE FROM CATALOG.CONSTRAINTINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT NUMC,NFULL,UNIQUE,COLNUMS
FROM CATALOG.HASH WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.INDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT
INDEXNAME,NUMC,NPAGES,UNIQUE,COLNUMS FROM CATALOG.TPINDEX WHERE
TABLENAME='BASICTRL            ' AND OWNER='SFD                 ';
98/05/08 17:13:09 1636 Allbase SetParams[49]
98/05/08 17:13:09 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:09 1636 Allbase Close cursor[49]
98/05/08 17:13:09 1636 Allbase Commit
98/05/08 17:13:09 1636 Allbase Prepare[49]SELECT INDEXNAME,COLNUMS,UNIQUE
FROM CATALOG.IMAGEKEY WHERE TABLENAME='BASICTRL            ' AND
OWNER='SFD                 ';
98/05/08 17:13:10 1636 Allbase SetParams[49]
98/05/08 17:13:10 1636 Allbase Fetch[49] Rows=1 MaxRows=200
98/05/08 17:13:10 1636 Allbase Fetch[49] Rows=0 MaxRows=200
98/05/08 17:13:10 1636 Allbase Close cursor[49]
98/05/08 17:13:10 1636 Allbase Commit
98/05/08 17:13:10 1636 Allbase Commit
98/05/08 17:13:10 1636 Normal exit, Received 2 requests (130 bytes), Sent 0
records (160 bytes), CPU=0 (93.6%)
98/05/08 17:13:10 889 FreeStmt[0]
98/05/08 17:13:10 889 Allbase Commit
98/05/08 17:13:10 889 Normal exit, Received 2 requests (144 bytes), Sent 0
records (65 bytes), CPU=0 (33.5%)
98/05/08 17:15:56 1258 Normal exit, Received 2 requests (148 bytes), Sent 90
records (3361 bytes), CPU=1 (0.4%)

-----== Posted via Deja News, The Leader in Internet Discussion ==-----
http://www.dejanews.com/   Now offering spam-free web-based newsreading
ATOM RSS1 RSS2
RAVEN.UTC.EDU