Error 3075. DAO.Database Syntax error(missing operator) in SQL statement

When executing the attached SQL statement in a function I get "Error 3075 in query expression 'PUB_INvcHead.CustNum=tblCust.CustNum INNER JOIN PUB_ShipTo ON (PUB_InvcDtl.CustNum = PUB_Shipto.CustNum' ". I created the statement by copying a workable SQL statement. I added the PUB_ShipTo to it. What is missing? I cannot see anything amiss.
Please let me know if there is a better clearer method of attaching the code.
Thanks
strSQL = "SELECT tblCust.CustID, tblCust.Name, tblCust.SupplierNumber, " & _
    "PUB_InvcHead.CustNum, PUB_InvcHead.InvoiceDate, Format([InvoiceDate]," & Chr(34) & invdat & Chr(34) & ") AS InvDatEDI, " & _
    "PUB_InvcHead.InvoiceType, PUB_InvcHead.InvoiceNum, PUB_InvcHead.InvoiceAmt, PUB_InvcDtl.InvoiceLine, " & _
    "qrsOrderHedDtlInv.OrderNum, qrsOrderHedDtlInv.PONum, qrsOrderHedDtlInv.BYName, qrsOrderHedDtlInv.BYPlantCode, " & _
    "IIf([ItemNum] Is Not Null And [ItemNum]<>" & Chr(34) & Chr(34) & ",[ItemNum],1) AS ItNum, " & _
    "PUB_InvcDtl.PartNum, PUB_InvcDtl.ShipDate, PUB_InvcDtl.PackNum, PUB_InvcDtl.OurShipQty, " & _
    "PUB_InvcDtl.UnitPrice, NZ([XPartNum]," & Chr(34) & Chr(34) & ") AS CustPNum, PUB_InvcDtl.ExtPrice, " & _
    "PUB_InvcDtl.PackLine, tblCust.EDICode, PUB_ShipTo.Name As STName, PUB_ShipTo.Address1, PUB_ShipTo.Address2, " & _
    "PUB_ShipTo.City, PUB_ShipTo.State, PUB_ShipTo.Zip, PUB_ShipTo.Country " & _
    "FROM ((PUB_InvcHead INNER JOIN PUB_InvcDtl ON PUB_InvcHead.InvoiceNum = PUB_InvcDtl.InvoiceNum) " & _
    "LEFT JOIN qrsOrderHedDtlInv ON (PUB_InvcDtl.OrderNum = qrsOrderHedDtlInv.OrderNum) AND " & _
    "(PUB_InvcDtl.OrderLine = qrsOrderHedDtlInv.OrderLine)) " & _
    "INNER JOIN tblCust ON (PUB_InvcHead.CustNum = tblCust.CustNum) " & _
    "INNER JOIN PUB_ShipTo ON (PUB_InvcDtl.CustNum = PUB_ShipTo.CustNum) AND (PUB_InvcDtl.ShipToNum = PUB_ShipTo.ShipToNum) " & _
    "WHERE (((PUB_InvcHead.CustNum) =" & [Forms]![frmInvEntry]![cmbCustNum] & ") And " & _
    "((PUB_InvcHead.InvoiceDate) =#" & [Forms]![frmInvEntry]![txtInvDate] & "#) And " & _
    "((PUB_InvcHead.InvoiceType) = " & Chr(34) & SType & Chr(34) & ") And " & _
    "((tblCust.EDICode) Is Not Null And (tblCust.EDICode) <> " & Chr(34) & Chr(34) & ")) " & _
    "ORDER BY PUB_InvcHead.InvoiceNum, PUB_InvcDtl.InvoiceLine;"

Open in new window

StampITAsked:
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.

Jim Dettman (Microsoft MVP/ EE MVE)President / OwnerCommented:
<<Please let me know if there is a better clearer method of attaching the code.>>
  Nope, that's it.
<< What is missing? >>

 Probably a ).   I would try and break it down.  First, chop off the WHERE and ORDER BY clauses and try executing.  If an error, then eliminate all the SELECT's fields except for one field.  If it still fails (and this is probably where it is), then it's the joins.
User the query designer to get the join syntax you need.  You can design it graphically and then switch to SQL view, or play in SQL view and build the statement up slowly switching to design view as you progress.  If you get an error, then you know what you just did is at fault.
JimD.
0
Jim Dettman (Microsoft MVP/ EE MVE)President / OwnerCommented:
BTW,  you've got a couple of these in there:
& Chr(34) & Chr(34)
 Which doesn't look quite right.  Either you meant to stick a value in there and didn't, or you included an extra quote (chr$(34)) by mistake.
JimD.
0
godspropyCommented:
I'm no MS Access expert but I have never seen # characters used that way in SQL.

I would try replacing:

#" & [Forms]![frmInvEntry]![txtInvDate] & "#

with:

" & [Forms]![frmInvEntry]![txtInvDate] & "
0
The Ultimate Tool Kit for Technolgy Solution Provi

Broken down into practical pointers and step-by-step instructions, the IT Service Excellence Tool Kit delivers expert advice for technology solution providers. Get your free copy for valuable how-to assets including sample agreements, checklists, flowcharts, and more!

Jim Dettman (Microsoft MVP/ EE MVE)President / OwnerCommented:
godspropy,
#'s are delimiters to indicate date/time fields in JET SQL
JimD
0
StampITAuthor Commented:
JimD,
   Thanks for the comments. To create the SQL statement that generates the error I copied from the attached code. The attached runs fine. I added some fields and the last INNER JOIN for the PUB_ShipTo table. So doing as you suggest, eliminating the last INNER JOIN I know the statement will work. Also I did create the query graphically first. The way I have the last INNER JOIN is the way it is when I switch the graphical query to SQL. Is there anything else I can try?
strSQL = "SELECT tblCust.CustID, tblCust.Name, tblCust.SupplierNumber, " & _
    "PUB_InvcHead.CustNum, PUB_InvcHead.InvoiceDate, Format([InvoiceDate]," & Chr(34) & invdat & Chr(34) & ") AS InvDatEDI, " & _
    "PUB_InvcHead.InvoiceType, PUB_InvcHead.InvoiceNum, PUB_InvcHead.InvoiceAmt, PUB_InvcDtl.InvoiceLine, " & _
    "qrsOrderHedDtlInv.OrderNum, qrsOrderHedDtlInv.PONum, " & _
    "IIf([ItemNum] Is Not Null And [ItemNum]<>" & Chr(34) & Chr(34) & ",[ItemNum],1) AS ItNum, " & _
    "PUB_InvcDtl.PartNum, PUB_InvcDtl.ShipDate, PUB_InvcDtl.PackNum, PUB_InvcDtl.OurShipQty, " & _
    "PUB_InvcDtl.UnitPrice, NZ([XPartNum]," & Chr(34) & Chr(34) & ") AS CustPNum, PUB_InvcDtl.ExtPrice, PUB_InvcDtl.PackLine, tblCust.EDICode " & _
    "FROM ((PUB_InvcHead INNER JOIN PUB_InvcDtl ON PUB_InvcHead.InvoiceNum = PUB_InvcDtl.InvoiceNum) " & _
    "LEFT JOIN qrsOrderHedDtlInv ON (PUB_InvcDtl.OrderNum = qrsOrderHedDtlInv.OrderNum) AND " & _
    "(PUB_InvcDtl.OrderLine = qrsOrderHedDtlInv.OrderLine)) INNER JOIN tblCust ON PUB_InvcHead.CustNum = tblCust.CustNum " & _
    "WHERE (((PUB_InvcHead.CustNum) =" & [Forms]![frmInvEntry]![cmbCustNum] & ") And " & _
    "((PUB_InvcHead.InvoiceDate) =#" & [Forms]![frmInvEntry]![txtInvDate] & "#) And " & _
    "((PUB_InvcHead.InvoiceType) = " & Chr(34) & SType & Chr(34) & ") And " & _
    "((tblCust.EDICode) Is Not Null And (tblCust.EDICode) <> " & Chr(34) & Chr(34) & ")) " & _
    "ORDER BY PUB_InvcHead.InvoiceNum, PUB_InvcDtl.InvoiceLine;"

Open in new window

0
Jim Dettman (Microsoft MVP/ EE MVE)President / OwnerCommented:
<<Also I did create the query graphically first. The way I have the last INNER JOIN is the way it is when I switch the graphical query to SQL. Is there anything else I can try? >>
And if you take the statement that is giving you an error and past it into SQL view and attempt to switch to graphical view it does not give you an error and runs fine?
I don't understand why your getting a syntax error then...
JimD.
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
StampITAuthor Commented:
JimD,
   Not sure what was missing initially but I did as you suggested and pasted the SQL statement into  SQL view. I received the same error. So I copied only the FROM to before the WHERE part of the statement that worked in the SQL view and pasted this into the SQL statement in the code and it worked. Thanks.
0
Jim Dettman (Microsoft MVP/ EE MVE)President / OwnerCommented:
Probably a )  and that's why I came back and I asked again; those are HARD to spot.
I often go back and forth with the designer until I figure out where the problem is.
JimD.
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
Microsoft Access

From novice to tech pro — start learning today.