Query syntax on a large inner-joined select query linked to a control giving runtime 3071 error message - sql
I am getting Runtime error message 3071 on the following query stating that the query is too complex. I have created queries in the past which have seemed more complex than this one. I would like to understand what generates this message:
sql_get = "SELECT tblValueChain01.IDMacroProcesso, tblValueChain02.IDMicroProcesso02, tblValueChain03.ID, tblDependencies01.ID AS DependencyID, tblValueChain02.MicroProcesso02, tblValueChain01.MacroProcess, tblValueChain01.TeamLead, tblValueChain01.LastOrganisationDate, tblValueChain01.TempiIndeterminati, tblValueChain01.TempiDeterminati, tblValueChain01.Interinali, tblValueChain01.PartTime, tblValueChain01.DailyMinutesAverage AS Minutes01, tblValueChain01.DailyMinutesHigh AS Minutes01H, tblValueChain01.DailyMinutesLow AS Minutes01L, tblValueChain02.MicroProcesso02, " & _
"tblValueChain02.DailyMinutesAverage AS Minutes02, tblValueChain02.DailyMinutesHigh AS Minutes02H, tblValueChain02.DailyMinutesLow AS Minutes02L, tblValueChain03.MicroProcess, tblValueChain03.MinutesPerDay AS Minutes03, tblValueChain03.MinutesPerDayHigh AS Minutes03H, tblValueChain03.MinutesPerDayLow AS Minutes03L, tblDependencies01.FlowDescription, tblDependencies01.FlowType, tblTeamsDepartments.Department, tblTeams.Team, tblDependencies01.Precision, " & _
"tblDependencies01.ServiceDelivery , tblDependencies01.RiskReduction, tblDependencies01.CapacityCreation, tblDependencies01.TargetCapacityCreation, tblDependencies01.Feasibility, tblDependencies01.Timeframe, tblDependencies01.Priority, tblDependencies01.Note, tblDependencies01.RedundantControls, tblDependencies01.RedundantControlsNotes, tblDependencies01.RedundantControlsPotSolution, tblDependencies01.RedundantControlsNotesSymbol, tblDependencies01.RedundantControlsPotSolSymbol, tblDependencies01.RolesAndResponsibilities, tblDependencies01.RolesAndResponsibilitiesNotes, " & _
"tblDependencies01.RolesAndResponsibilitiesPotSolution , tblDependencies01.RolesResponNotesSymbol, tblDependencies01.RolesRespPotSolSymbol, tblDependencies01.SubstandardSvcs, tblDependencies01.SubstandardSvcsNotes, tblDependencies01.SubStandardSvcsPotSolution, tblDependencies01.SubStandardSvcsNotesSymbol, tblDependencies01.SubStandardSvcsPotSolSymbol, tblDependencies01.KnowledgeGaps, tblDependencies01.KnowledgeGapsNotes, tblDependencies01.KnowledgeGap, " & _
"PotSolution , tblDependencies01.KnowledgeGapsNotesSymbol, tblDependencies01.KnowledgeGapsPotSolSymbol, tblDependencies01.ExcessiveOversight, tblDependencies01.ExcessiveOversightNotes, tblDependencies01.ExcessiveOversightPotSolution, tblDependencies01.ExcessiveOversightNotesSymbol, tblDependencies01.ExcessiveOversightPotSolSymbol, tblDependencies01.UpstreamErrors, tblDependencies01.UpstreamErrorsNotes, tblDependencies01.UpstreamErrorsPotSolution, tblDependencies01.UpstreamErrorsNotesSymbol, tblDependencies01.UpstreamErrorsPotSolSymbol, tblDependencies01.DefectsRework, " & _
"tblDependencies01.DefectsReworkNotes , tblDependencies01.DefectsReworkPotSolution, tblDependencies01.DefectsReworkNotesSymbol, tblDependencies01.DefectsReworkPotSolSymbol, tblDependencies01.OverProduction, tblDependencies01.OverproductionNotes, tblDependencies01.OverproductionPotSolution, tblDependencies01.OverproductionNotesSymbol, tblDependencies01.OverproductionPotSolSymbol, tblDependencies01.MotionTransport, " & _
"tblDependencies01.MotionTransportNotes , tblDependencies01.MotionTransportPotSolution, tblDependencies01.MotionNotesSymbol, tblDependencies01.MotionSolSymbol, tblDependencies01.DowntimeWaiting, tblDependencies01.DowntimeWaitingNotes, tblDependencies01.DowntimeWaitingPotSolution, tblDependencies01.WaitDowntimeNotesSymbol, tblDependencies01.WaitDowntimeSolSymbol, tblDependencies01.ExcessiveHandoffs, tblDependencies01.ExcessiveHandoffNotes, tblDependencies01.ExcessiveHandoffPotSolution, " & _
"tblDependencies01.ExcessiveHandoffsSymbol , tblDependencies01.ExcessiveHandoffsPotSolSymbol, tblDependencies01.RCSLABreachInternal, tblDependencies01.RCSLABreachExternal, tblDependencies01.RCCorporatePolicyBreach, tblDependencies01.RCOperatingModelDiscrepancy, tblDependencies01.RRSLABreachInternal, tblDependencies01.RRSLABreachExternal, tblDependencies01.RRCorporatePolicyBreach, tblDependencies01.RROperatingModelDiscrepancy, tblDependencies01.SSSLABreachInternal, tblDependencies01.SSSLABreachExternal, tblDependencies01.SSCorporatePolicyBreach, " & _
"tblDependencies01.SSOperatingModelDiscrepancy , tblDependencies01.KGSLABreachInternal, tblDependencies01.KGSLABreachExternal, tblDependencies01.KGCorporatePolicyBreach, tblDependencies01.KGOperatingModelDiscrepancy, tblDependencies01.EOSLABreachInternal, tblDependencies01.EOSLABreachExternal, tblDependencies01.EOCorporatePolicyBreach, tblDependencies01.EOOperatingModelDiscrepancy, tblDependencies01.UESLABreachInternal, tblDependencies01.UESLABreachExternal, tblDependencies01.UECorporatePolicyBreach, tblDependencies01.UEOperatingModelDiscrepancy, tblDependencies01.DefSLABreachInternal, " & _
"tblDependencies01.DefSLABreachExternal , tblDependencies01.DefCorporatePolicyBreach, tblDependencies01.DefOperatingModelDiscrepancy, tblDependencies01.OPSLABreachInternal, tblDependencies01.OPSLABreachExternal, tblDependencies01.OPCorporatePolicyBreach, tblDependencies01.OPOperatingModelDiscrepancy, tblDependencies01.EHSLABreachInternal, tblDependencies01.EHSLABreachExternal, tblDependencies01.EHCorporatePolicyBreach, " & _
"tblDependencies01.EHOperatingModelDiscrepancy , tblDependencies01.DTSLABreachInternal, tblDependencies01.DTSLABreachExternal, tblDependencies01.DTCorporatePolicyBreach, tblDependencies01.DTOperatingModelDiscrepancy, tblDependencies01.ECSLABreachInternal, tblDependencies01.ECSLABreachExternal, tblDependencies01.ECCorporatePolicyBreach, tblDependencies01.ECOperatingModelDiscrepancy " & _
"FROM (tblTeamsDepartments INNER JOIN tblTeams ON tblTeamsDepartments.ID = tblTeams.Department) INNER JOIN (tblValueChain01 INNER JOIN ((tblValueChain03 INNER JOIN tblValueChain02 ON tblValueChain03.IDMacroProcess = tblValueChain02.IDMicroProcesso02) INNER JOIN tblDependencies01 ON tblValueChain03.ID = tblDependencies01.IDSubProcess) ON tblValueChain01.IDMacroProcesso = tblValueChain02.IDMacroProcesso01) ON tblTeams.ID = tblDependencies01.Group WHERE [tblDependencies01].[ID]= '" & ID & "'"
Form_frmValueChainDynamic01.Form.RecordSource = sql_get
Possible typo:
...
INNER JOIN tblValueChain02 ON tblValueChain03.IDMacroProcess = tblValueChain02.IDMicroProcesso02)`
...
...perhaps should be IDMacroProcesso (missing "o" at the end of this field)?
Is [tblDependencies01].[ID] a number field? If so, then in your WHERE clause you've used single quotes denoting you're expecting to match a string; so this:
WHERE [tblDependencies01].[ID]= '" & ID & "'"
...should be written like this, if ID is a number:
WHERE [tblDependencies01].[ID]=" & ID
You've referred to most fields in your SELECT clause using the tableName.fieldName convention except for PotSolution (this may not be an issue, but it's good to be consistent!)
Some more things to try if the above doesn't work: http://allenbrowne.com/subquery-02.html#QueryTooComplex
Related
Update query, nested iif SET and joined tables
Trying to make an Update Query with inner join and have the SET reflect the current month number. Need help with syntax on updating a joined table that has columns for months, need to update the months that are Month(DATE()) +1,+2 only. Trying to use the below nested IIF as "IIF(Month(Date()) ="1",( SET table.c = table2.c2......) complete code below. Syntax error is the result Sample data to update sql table linked excel with values to use for updates Update dbo_MasterSalesForecast_Test INNER JOIN MasterSalesForecastUpdate ON (dbo_MasterSalesForecast_Test.SubTo=MasterSalesForecastUpdate.Item) AND( dbo_MasterSalesForecast_Test.Planner=MasterSalesForecastUpdate.Planner) IIF(Month(Date()) ="1",( SET dbo_MasterSalesForecast_Test.[YY:1] = [MasterSalesForecastUpdate].[YYJan], dbo_MasterSalesForecast_Test.[YY:2] = [MasterSalesForecastUpdate].[YYFan], dbo_MasterSalesForecast_Test.[YY:3] = [MasterSalesForecastUpdate].[YYMar]) , IIF(Month(Date())="2",( SET dbo_MasterSalesForecast_Test.[YY:2]=[MasterSalesForecastUpdate].[YYFeb], dbo_MasterSalesForecast_Test.[YY:3]=[MasterSalesForecastUpdate].[YYMar], dbo_MasterSalesForecast_Test.[YY:4]=[MasterSalesForecastUpdate].[YYApr]) , IIF(Month(Date())="3",( SET dbo_MasterSalesForecast_Test.[YY:3]=[MasterSalesForecastUpdate].[YYMar], dbo_MasterSalesForecast_Test.[YY:4]=[MasterSalesForecastUpdate].[YYApr], dbo_MasterSalesForecast_Test.[YY:5]=[MasterSalesForecastUpdate].[YYMay]) , IIF(Month(Date())="4",(SET dbo_MasterSalesForecast_Test.[YY:4]=[MasterSalesForecastUpdate].[YYApr], dbo_MasterSalesForecast_Test.[YY:5]=[MasterSalesForecastUpdate].[YYMay], dbo_MasterSalesForecast_Test.[YY:6]=[MasterSalesForecastUpdate].[YYJun]) , IIF(Month(Date())="5",(SET dbo_MasterSalesForecast_Test.[YY:5]=[MasterSalesForecastUpdate].[YYMay], dbo_MasterSalesForecast_Test.[YY:6]=[MasterSalesForecastUpdate].[YYJun], dbo_MasterSalesForecast_Test.[YY:7]=[MasterSalesForecastUpdate].[YYJul]) , IIF(Month(Date())="6",(SET dbo_MasterSalesForecast_Test.[YY:6]=[MasterSalesForecastUpdate].[YYJun], dbo_MasterSalesForecast_Test.[YY:7]=[MasterSalesForecastUpdate].[YYJul], dbo_MasterSalesForecast_Test.[YY:8]=[MasterSalesForecastUpdate].[YYAug]) , IIF(Month(Date())="7",(SET dbo_MasterSalesForecast_Test.[YY:7]=[MasterSalesForecastUpdate].[YYJul], dbo_MasterSalesForecast_Test.[YY:8]=[MasterSalesForecastUpdate].[YYAug], dbo_MasterSalesForecast_Test.[YY:9]=[MasterSalesForecastUpdate].[YYSep]) , IIF(Month(Date())="8",(SET dbo_MasterSalesForecast_Test.[YY:8]=[MasterSalesForecastUpdate].[YYAug], dbo_MasterSalesForecast_Test.[YY:9]=[MasterSalesForecastUpdate].[YYSep], dbo_MasterSalesForecast_Test.[YY:10]=[MasterSalesForecastUpdate].[YYOct]) , IIF(Month(Date())="9",(SET dbo_MasterSalesForecast_Test.[YY:9]=[MasterSalesForecastUpdate].[YYSep], dbo_MasterSalesForecast_Test.[YY:10]=[MasterSalesForecastUpdate].[YYOct], dbo_MasterSalesForecast_Test.[YY:11]=[MasterSalesForecastUpdate].[YYNov]) , IIF(Month(Date())="10",(SET dbo_MasterSalesForecast_Test.[YY:10]=[MasterSalesForecastUpdate].[YYOct], dbo_MasterSalesForecast_Test.[YY:11]=[MasterSalesForecastUpdate].[YYNov], dbo_MasterSalesForecast_Test.[YY:12]=[MasterSalesForecastUpdate].[YYDec]) , IIF(Month(Date())="11",(SET dbo_MasterSalesForecast_Test.[YY:11]=[MasterSalesForecastUpdate].[YYNov], dbo_MasterSalesForecast_Test.[YY:12]=[MasterSalesForecastUpdate].[YYDec], dbo_MasterSalesForecast_Test.[YY+1:1]=[MasterSalesForecastUpdate].[YY+1Jan]) , IIF(Month(Date())="12"(SET dbo_MasterSalesForecast_Test.[YY:12]=[MasterSalesForecastUpdate].[YYDec], dbo_MasterSalesForecast_Test.[YY+1:1]=[MasterSalesForecastUpdate].[YY+1Jan], dbo_MasterSalesForecast_Test.[YY+1:02]=[MasterSalesForecastUpdate].[YY+1Feb]) )))))))))));
Cannot conditionally reference fields. Field must be static in query object then value to update with can be determined in an IIf() for each field. Use VBA to build and execute action SQL statement.
CurrentDb.Execute "UPDATE dbo_MasterSalesForecast_Test " & _
"INNER JOIN MasterSalesForecastUpdate " & _
"ON (dbo_MasterSalesForecast_Test.SubTo=MasterSalesForecastUpdate.Item) " & _
"AND (dbo_MasterSalesForecast_Test.Planner=MasterSalesForecastUpdate.Planner) " & _
"SET [YY:" & Month(Date()) & "] = [YY" & Format(Date(),"mmm") & "]," & _
"[YY:" & Month(DateAdd("m",1,Date())) & "] = [YY" & Format(DateAdd("m",1,Date()),"mmm") & "]," & _
"[YY:" & Month(DateAdd("m",2,Date())) & "] = [YY" & Format(DateAdd("m",2,Date()),"mmm") & "]"
Is there a way to combine all the outputs into one in MS-ACCES?
I want to make a SQL Filter in MS-Acces where I have the Option to filter all the Elements in the table. But when I make the UNION SELECT, I can show only 1 column in each row, so I made database_geräte.* to database_geräte.ID . This works fine now, but I want all the Outputs from the database_geräte.ID select into one row, so that I can Filter all of them at once. I tried to make a GROUPCONCAT, but that gives me an error. SELECT database_geräte.ID, dbo.GROUPCONCAT (STRINGVALUE) FROM database_geräte UNION SELECT database_geräte.Gerät FROM database_geräte; I also tried to make a count on the database_geräte.ID But then I get the value of the database_geräte.ID select, which doesn't fit in the filter because a ID with that number doesn't exist... The SQL Select: SELECT database_geräte.ID, dbo.GROUPCONCAT FROM database_geräte UNION SELECT database_geräte.Gerät FROM database_geräte; The SQL filter in VBA: sql = "SELECT* FROM database1 WHERE Gerät = '" & Me.GeräteFilter & "'" Me.sb_1.Form.RecordSource = sql Me.sb_1.Form.Requery So the Filter should show an option where I can filter all the elements of the table and show it in the subform.
I just made an UNION that gives me all the data at once. The SQL Select: SELECT ID, Gerät FROM database_geräte UNION select "*" as ID, "Alle" as Gerät from database_geräte; Then I made a function, that I can give to two Filters: sql = "SELECT database_geräte.Gerät, database1.Name, database1.Grund, database1.Gerät_ID" _ & " FROM database_geräte INNER JOIN database1 ON database_geräte.ID = database1.Gerät_ID " _ & "" & IIf(Me.GeräteFilter <> "*", "Where database1.Gerät_ID = " & Me.GeräteFilter & " ", "") & " " _ & "" & IIf(Me.Person <> "Alle", IIf(Me.GeräteFilter <> "*", " AND database1.Name = '" & Me.Person & "'", "WHERE database1.Name = '" & Me.Person & "'"), "") & "" Me.sb_1.Form.RecordSource = sql Me.sb_1.Form.Requery
How to build dropdown list with database?
I have try to build dropdown list that bind with database. I found out some errors that i dont really found. Please help, here below is my codes.
strSQL = "SELECT distinct table1.DeptName FROM Table1 " & _
"FULL JOIN Table2 on table1.DeptName = Table2.deptname" & _
"FULL JOIN Table3 on Table1.deptname = table3.DeptName " & _
"Where table1.deptname is not null order by table1.deptname "
Common.OpenConn()
Common.execReader(strSQL, params, dt, Common.txn)
If dt.Rows.Count > 0 Then
DropDownListDept.DataSource = dt
DropDownListDept.DataTextField = "DeptName"
DropDownListDept.DataValueField = "DeptName"
DropDownListDept.DataBind()
DropDownListDept.Items.Insert(0, New ListItem("Select Department Name", "0"))
End If
error found
Invalid column name 'DeptNameFULL'.
Your error is in your sql statement... The database is looking for a field called "DeptNameFULL" and of course there isn't. strSQL = "SELECT distinct table1.DeptName FROM Table1 " & _ "FULL JOIN Table2 on table1.DeptName = Table2.deptname" & _ "FULL JOIN Table3 on Table1.deptname = table3.DeptName " & _ "Where table1.deptname is not null order by table1.deptname " On the second line - you need a space after "Table2.deptname" - so it should be Table2.deptname " instead.
MS ACCESS SQL Join Subquery
I have two tables: newparts, storedparts I insert the parts of the newparts, which are not jet in the storedparts into the storedparts: SQL_String = "INSERT INTO storedparts " & _ "SELECT newparts.* " & _ "FROM storedparts " & _ "RIGHT JOIN newparts ON (storedparts.identifier = newparts.identifier) AND (storedparts.timeStamp = newparts.timeStamp) " & _ "WHERE ((storedparts.AutoID) Is Null);" This is working fine so far. Now the Problem: Table storedparts is getting so big that the programm is taking too Long for the join process. My solution: Just compare the newparts not to all parts of the storedparts, but just to parts that aren't older than 4 days... I tried a subquery like this, but i can't get it to run. SQL_String = "INSERT INTO storedparts " & _ "SELECT newparts.* " & _ "FROM storedparts (WHERE storedparts.timestamp > Now() - 4) " & _ "RIGHT JOIN newparts ON (storedparts.identifier = newparts.identifier) AND (storedparts.timeStamp = newparts.timeStamp) " & _ "WHERE ((storedparts.AutoID) Is Null);" Any help is appreciated.
This wouldn't be a problem if your tables have indexes. CREATE INDEX ndx_sp_identifier ON storedparts (identifier); CREATE INDEX ndx_np_identifier ON newparts (identifier); Then I suggest you change your query to something like this as #jarlh pointed out. INSERT INTO storedparts SELECT newparts.* FROM newparts LEFT JOIN storedparts ON newparts.identifier = storedparts.identifier AND newparts.timeStamp = storedparts.timeStamp WHERE storedparts.AutoID Is Null;
You could add the where clause after the join statements and see if it improves the performance of the query . Else Try this and see if it works SQL_String = "INSERT INTO storedparts " & _ "SELECT newparts.* " & _ "FROM ( SELECT * FROM storedparts WHERE storedparts.timestamp > DateAdd ( 'd', -4, Now()) )sparts" & _ "RIGHT JOIN newparts ON (sparts.identifier = newparts.identifier) AND (sparts.timeStamp = newparts.timeStamp) " & _ "WHERE ((sparts.AutoID) Is Null);"
MS Access vba query where
Simple Question. For example, i have a Customer that have 10 Orders and each order include 6-10 Items. i want to create a vba query that will desplay all the items of a specific customer. My query is: x = CustomerNum Query = "Select OrderNum from CustomerOrderT Where CustomerNum = " & x Set result = CurrentDb.OpenRecordset(Query) y = result!OrderNum '(there is a lot of orders on y) Query = "Select Product From OrderProducts Where OrderNum = " & y Set result = CurrentDb.OpenRecordset(Query) The problem is that i only see the Products of the first order and i cannot see the products of all the orders that i select on the first query. Need some help to handke this situation. Thank you very much.
You can just execute a single query for all orders: x = CustomerNum Query = " SELECT CustomerOrderT.CustomerNum, " & _ CustomerOrderT.OrderNum, " & _ " OrderProducts.Product " & _ " FROM CustomerOrderT INNER JOIN OrderProducts " & _ ON CustomerOrderT.OrderNum = OrderProducts.OrderNum " & _ " WHERE (((CustomerOrderT.CustomerNum)=" & x & ")) " & _ "ORDER BY CustomerOrderT.OrderNum, " & _ " OrderProducts.Product;" And then loop over all the records, noting each change in OrderNum But beware of building SQL like this if you don't control how variable CustomerNum is assigned, as you open yourself to SQL injection attacks.