[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax on LONG SQL Statement

Have the below code.  I know the SQL statement is good as it runs fine in SQL 2000 query analyzer.  When I try to run it via ASP I get the following error:

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC SQL Server Driver][SQL Server]Line 1: Incorrect syntax near 'tblDocumentInfo'.
/reports/NewDTReport.asp, line 80

Line 80 is the one that reads "set rs = conn.execute(strSQL)"

I can see no syntax errors.  Any Ideas?  I am an ASP newbie.

'Begin ASP Code

<!doctype html public "-//w3c//dtd html 3.2//en">

<html>
<head>
<title>New DT Report</title>
<STYLE TYPE="text/css">
      <!--
      .darkrow, .darkrow TD, .darkrow TH
      {
      background-color:052651;
      color:white;
      }
body {
      background-color: #990000;
}
.style1 {color: #FFFFFF}
.style3 {font-size: x-large}
a:link {
      color: #FFFFFF;
}
a:visited {
      color: #FFFFFF;
}
a:hover {
      color: #FFFFFF;
}
a:active {
      color: #FFFFFF;
}
      -->
      </STYLE>
      
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<body>
<table width="1054" border="0">
  <tr>
    <td><span class="style1"><img src="../images/v_logo.gif" width="96" height="70"></span></td>
    <td valign="middle"><div align="center"><span class="style1"><span class="style3">NEW DT Report </span></span></div></td>
    <td align="right" valign="bottom"><a href="show_all.asp"><img src="butt.gif" width="158" height="35" border="0"></a></td>
    <td align="right" valign="bottom"><a href="search.htm"><img src="searchbut.gif" width="125" height="35" border="0" align="bottom"></a></td>
  </tr>
  <tr>
    <td><span class="style1"><a href="Report_input.htm"><img src="runagain.gif" width="230" height="35" border="0"></a></span></td>
    <td valign="top">&nbsp;</td>
    <td valign="bottom">&nbsp;</td>
    <td valign="bottom">&nbsp;</td>
  </tr>
  <tr>
    <td width="231"><span class="style1"></span></td>
    <td width="513" valign="top"><div align="center"><span class="style1"></span></div></td>
    <td width="161" valign="bottom">&nbsp;</td>
    <td width="131" valign="bottom"><div align="right"></div></td>
  </tr>
</table>
<%
'Create Database Connection and Open the Recordset
set conn=Server.CreateObject("ADODB.Connection")
 strconn="DSN=reports;UID=reporman;PWD=reports"
 conn.Open strConn
strSQL = "select tblparty.sNameLast as 'Market Source',"&_
"sum( case when sMarketSource = 'AMERICAN TITLE COMPANY' THEN 1 ELSE 0 END) [AMERICAN TITLE]"&_
", sum( case when sMarketSource = 'ATLANTIC ALLIANCE' THEN 1 ELSE 0 END) [ATLANTIC ALLIANCE]"&_
", sum( case when sMarketSource = 'HOLGATE TITLE COMPANY' THEN 1 ELSE 0 END) [HOLGATE TITLE]"&_
", sum( case when sMarketSource = 'CANYON TITLE' THEN 1 ELSE 0 END) [CANYON TITLE]"&_
", sum( case when sMarketSource = 'DENVER TITLE COMPANY' THEN 1 ELSE 0 END) [DENVER TITLE]"&_
", sum(case when SMarketSource in"&_
"('AMERICAN TITLE COMPANY','ATLANTIC ALLIANCE','HOLGATE TITLE COMPANY','CANYON TITLE ',"&_
"'DENVER TITLE COMPANY') then 1 else 0 end) as Totals"&_
"From tblDocumentInfo inner join  tblparty on tblDocumentinfo.irecordid = tblparty.irecordid"&_
"Where( tblDocumentInfo.sMarketSource = 'American Title Company'"&_
"or tblDocumentInfo.sMarketSource = 'Atlantic Alliance'"&_
"or tblDocumentInfo.sMarketSource = 'Holgate Title Company'"&_
"or tblDocumentInfo.sMarketSource = 'Canyon Title '"&_
"or tblDocumentInfo.sMarketSource = 'Denver Title Company' )"&_
"and tblDocumentInfo.sInstrumentType in ('DEED OF TRUST','MORTGAGE')"&_
"and tblDocumentInfo.dtFiledDate >= convert(datetime, '2007-02-01' , 120)"&_
"and tblDocumentInfo.dtFiledDate < convert(datetime, '2007-03-01', 120)"&_
"and tblparty.tiPartyType = '2'"&_
"group by tblparty.sNameLast"
set rs = conn.execute(strSQL)
%>
<TABLE width="21%" border=3 cellpadding=3 cellspacing=0 bgcolor="#FFFFFF">
<tr CLASS="darkrow">
<td><div align="left"><strong>Market Source</strong></div></td>
<td><strong>AMERICAN TITLE</strong></td>
<td><strong>ATLANTIC ALLIANCE</strong></td>
<td><strong>HOLGATE TITLE</strong></td>
<td><strong>CANYON TITLE</strong></td>
<td><strong>DENVER TITLE</strong></td>
<td><strong>TOTAL</strong></td>
</tr>
<%
if (rs.eof) then
%>
<tr>
<td>
No records found for Report
</td>
</tr>
<%
'Loop through the recordset and display address information - Note the hyperlink in the name field to go to the Address_Book_Edit.asp page.
else
Do while not rs.eof
%>
<tr>
<td width="8%"><%=rs("Market Source")%>&nbsp</td>
<td width="10%"><%=rs("AMERICAN TITLE")%>&nbsp</td>
<td width="10%"><%=rs("ATLANTIC ALLIANCE")%>&nbsp</td>
<td width="10%"><%=rs("HOLGATE TITLE")%>&nbsp</td>
<td width="10%"><%=rs("CANYON TITLE")%>&nbsp</td>
<td width="10%"><%=rs("DENVER TITLE")%>&nbsp</td>
<td width="10%"><%=rs("Totals")%>&nbsp</td>
</tr>
<%
rs.movenext
loop
end if
%>
</tr>
</table>
</body>
</html>
ckangas7Asked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

rdivilbissCommented:
The error thrown on that line is telling you your SQL statement is wrong.

0
rdivilbissCommented:
strSQL = "select tblparty.sNameLast as 'Market Source',sum( case when sMarketSource = 'AMERICAN TITLE COMPANY' THEN 1 ELSE 0 END) [AMERICAN TITLE], sum( case when sMarketSource = 'ATLANTIC ALLIANCE' THEN 1 ELSE 0 END) [ATLANTIC ALLIANCE], sum( case when sMarketSource = 'HOLGATE TITLE COMPANY' THEN 1 ELSE 0 END) [HOLGATE TITLE], sum( case when sMarketSource = 'CANYON TITLE' THEN 1 ELSE 0 END) [CANYON TITLE], sum( case when sMarketSource = 'DENVER TITLE COMPANY' THEN 1 ELSE 0 END) [DENVER TITLE], sum(case when SMarketSource in('AMERICAN TITLE COMPANY','ATLANTIC ALLIANCE','HOLGATE TITLE COMPANY','CANYON TITLE ','DENVER TITLE COMPANY') then 1 else 0 end) as TotalsFrom tblDocumentInfo inner join  tblparty on tblDocumentinfo.irecordid = tblparty.irecordidWhere( tblDocumentInfo.sMarketSource = 'American Title Company'or tblDocumentInfo.sMarketSource = 'Atlantic Alliance'or tblDocumentInfo.sMarketSource = 'Holgate Title Company'or tblDocumentInfo.sMarketSource = 'Canyon Title 'or tblDocumentInfo.sMarketSource = 'Denver Title Company' )and tblDocumentInfo.sInstrumentType in ('DEED OF TRUST','MORTGAGE')and tblDocumentInfo.dtFiledDate >= convert(datetime, '2007-02-01' , 120)and tblDocumentInfo.dtFiledDate < convert(datetime, '2007-03-01', 120)and tblparty.tiPartyType = '2'group by tblparty.sNameLast

And removing all your "&_ shows at the minimum you've cut out a lot of spaces when you broke you SQL command into sub strings.

I don't know if those missing spaces are causing SQL to choke or not, and I have no way to test your SQL statement without the same tables, etc.

Parsing it with Query Analyzer says.

Server: Msg 170, Level 15, State 1, Line 1
Line 1: Incorrect syntax near '='.
Server: Msg 103, Level 15, State 1, Line 1
The identifier that starts with 'select tblparty.sNameLast as 'Market Source',sum( case when sMarketSource = 'AMERICAN TITLE COMPANY' THEN 1 ELSE 0 END) [AMERICA' is too long. Maximum length is 128.
Server: Msg 105, Level 15, State 1, Line 1
Unclosed quotation mark before the character string 'select tblparty.sNameLast as 'Market Source',sum( case when sMarketSource = 'AMERICAN TITLE COMPANY' THEN 1 ELSE 0 END) [AMERICAN'.

So I guess you need to get your working SQL statement from your Query Analyzer or Enterprise manager and be more careful when parsing it into sub strings.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Anthony PerkinsCommented:
You need to output the result of strSQL before the line:
set rs = conn.execute(strSQL)

If you cannot tell what is the error from the output, post the result here.
0
Cloud Class® Course: Amazon Web Services - Basic

Are you thinking about creating an Amazon Web Services account for your business? Not sure where to start? In this course you’ll get an overview of the history of AWS and take a tour of their user interface.

walkerkeCommented:
I believe you're missing some spaces in your string concatenation. There appear to be lines that end abruptly without a space and then pick up again at the beginning of the next line. For example:

>>>"'DENVER TITLE COMPANY') then 1 else 0 end) as Totals"&_
>>>"From tblDocumentInfo inner join  tblparty on tblDocumentinfo.irecordid = tblparty.irecordid"&_
>>>"Where( tblDocumentInfo.sMarketSource = 'American Title Company'"&_

will concatenat to:

'DENVER TITLE COMPANY') then 1 else 0 end) as TotalsFrom tblDocumentInfo inner join  tblparty on tblDocumentinfo.irecordid = tblparty.irecordidWhere( tblDocumentInfo.sMarketSource = 'American Title Company'

See "as TotalsFrom tblDocumentInfo" and "tblparty.irecordidWhere("

acperkins is right -- you need to output the result of the strSQL concatenation to see the actual query.
0
ckangas7Author Commented:
OK, can you please tell me how I can  output the result of strSQL before the line:
set rs = conn.execute(strSQL)?
0
rdivilbissCommented:
response.write strSQL
on error resume next
set rs = conn.execute(strSQL)
if err then
    response.write err.number & " " & err.description & " " & err.source & "<br>" & strSQL
end if
0
ckangas7Author Commented:
All right that did it.  You were correct it was the way I parsed the SQL statement.  A few spaces here and there fixed the problem.  Awesome, I'm halfway home.
0
Anthony PerkinsCommented:
You are welcome.
0
rdivilbissCommented:
LOL
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.