ChemOffice.Com - CambridgeSoft

Administrator
literals
n = Len(s) ' number of characters in the
query structure
pos = 1 ' starting position
i = 0 ' starting index
segmentLength = 4000 ' the length of a
segment of the query string
While pos < n ' there is remaining part
of a query string to be passed
si = Mid(s, pos, segmentLength) '
get one 4000 character chunk of the
query
Dim v As Variant
v = si '
create parameter expects the value as
variant
parname = ":xpar" + CStr(i) '
parameter name as a stem and running
index
Dim par As ADODB.Parameter '
create the parameter
Set par = com.CreateParameter(parname,
adLongVarChar, adParamInput, Len(si),
v)
com.Parameters.Append par '
append it to the parameters
accompanying the command
sql = sql + parname '
the sql command will have a new
parameter
pos = pos + segmentLength ' move the
position
If pos < n Then '
if there is data still to be processed
sql = sql + "," '
add a comma to separate the parameters
End If
i = i + 1
Wend
sql = sql + "),'FULL=NO')=1" ' finish
up the sql text
com.CommandType = adCmdText
com.ActiveConnection = c
com.CommandText = sql '
set the CommandText field of the
command object
Set r = com.Execute '
and now the command is ready to be
executed
Custom Screening
Custom screening is a tool for a database
administrator to affect the processing of a SELECT
statement. The database administrator can define
any structure to screen the database when
processing a substructure search. If a screen
structure is a substructure of a query structure, then
the processing of that particular query will be faster.
There is no recommendation on how to choose
custom screens. Choosing them should be based on
the particulars of the database and expected interest
of the users.
Custom screen can be defined by calling the
MolScreen procedure.
CALL
CsCartridge.MolScreen('schema_na
me', 'table_name', 'field_name',
'index_name',
'smiles_or_encoded_cdx',
'second_part');
where
• schema_name - is the schema the table is
owned by
• table_name - is the name of the table to be
custom indexed
• field_name - is the name of the field
containing chemical information
202•CS Oracle Cartridge
CambridgeSoft
Custom Screening