HELP WITH SQL QUERY
-
Hi all. I have two tables in access (VB6): SupplierInvoices & Sales. They both have 3 common field names: Date, Code & Qty. I need to query both tables via SQL query by a specific date range as follows (I know this is wrong, but just to give you an idea): rs.Open "Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as tTotal from SupplierInvoices, format(Sales.Date, 'dd-MMM-yyyy') as sDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy');", cn, adOpenKeyset, adLockOptimistic The result needs to return from both tables the sum of the qty fields for that date range. I can't get it right! Please help.
From the Lounge response
Quote:
but it says "the field PLU could refer to more than one
Indicates that you need to prefix the PLU field (TableName.PLU) with a table name so the query knows which table to use.
Never underestimate the power of human stupidity - RAH I'm old. I know stuff - JSOP
-
Hi all. I have two tables in access (VB6): SupplierInvoices & Sales. They both have 3 common field names: Date, Code & Qty. I need to query both tables via SQL query by a specific date range as follows (I know this is wrong, but just to give you an idea): rs.Open "Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as tTotal from SupplierInvoices, format(Sales.Date, 'dd-MMM-yyyy') as sDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy');", cn, adOpenKeyset, adLockOptimistic The result needs to return from both tables the sum of the qty fields for that date range. I can't get it right! Please help.
I am curious - is this a university or school project question? I ask because the SQL you have is just not going to work - it's basically a word salad of SQL, a jumble of keywords in the wrong order and missing information. I would suggest you step back and start learning the basics of SQL. Also it will not be possible to anyone to help you with the information you have provided as you have not told us which columns are the primary and foreign keys within Sales and SupplierInvoices.
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
From the Lounge response
Quote:
but it says "the field PLU could refer to more than one
Indicates that you need to prefix the PLU field (TableName.PLU) with a table name so the query knows which table to use.
Never underestimate the power of human stupidity - RAH I'm old. I know stuff - JSOP
Thanks Mycroft. I am using this one - trying to get it to work: Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as lTotal from SupplierInvoices where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy') Union Select distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(Sales.Date, 'dd-MMM-yyyy') Error is: Item sTotal cannot be found. I appreciate any feedback (even if it's about vb6/access!)
-
I am curious - is this a university or school project question? I ask because the SQL you have is just not going to work - it's basically a word salad of SQL, a jumble of keywords in the wrong order and missing information. I would suggest you step back and start learning the basics of SQL. Also it will not be possible to anyone to help you with the information you have provided as you have not told us which columns are the primary and foreign keys within Sales and SupplierInvoices.
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
I appreciate the feedback. This is what is giving me headaches: Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as lTotal from SupplierInvoices where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy') Union Select distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(Sales.Date, 'dd-MMM-yyyy') It says Item sTotal cannot be found. I am new to SQL and am trying to learn, hence asking on this forum.
-
Thanks Mycroft. I am using this one - trying to get it to work: Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as lTotal from SupplierInvoices where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy') Union Select distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(Sales.Date, 'dd-MMM-yyyy') Error is: Item sTotal cannot be found. I appreciate any feedback (even if it's about vb6/access!)
Read up on what the UNION command does. I could tell you what is not working here but you will find out much more if you read, understand than methodically practise what you have read and understood rather than throwing things together hoping they will work then asking for help when they don't work. What the heck, I will tell you anyway - either change ITotal to sTotal or change sTotal to ITotal. The column names for the unioned results need to be the same. As an aside - I don't think that query is going to give you any information that is of any use as you are basically listing sales totals and dates together with invoice totals and dates with no ability to distinguish between what is a sales row and what is an invoice row. I think you need to step away from the computer, read a book, follow tutorials and work out what you want to do on paper before typing SQL queries that you hope will somehow work.
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
Read up on what the UNION command does. I could tell you what is not working here but you will find out much more if you read, understand than methodically practise what you have read and understood rather than throwing things together hoping they will work then asking for help when they don't work. What the heck, I will tell you anyway - either change ITotal to sTotal or change sTotal to ITotal. The column names for the unioned results need to be the same. As an aside - I don't think that query is going to give you any information that is of any use as you are basically listing sales totals and dates together with invoice totals and dates with no ability to distinguish between what is a sales row and what is an invoice row. I think you need to step away from the computer, read a book, follow tutorials and work out what you want to do on paper before typing SQL queries that you hope will somehow work.
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
You are right, Guy. At this stage I don't fully understand SQL and am attempting queries out of my depth of understanding! Thank you for the encouragement.
-
I appreciate the feedback. This is what is giving me headaches: Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as lTotal from SupplierInvoices where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy') Union Select distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(Sales.Date, 'dd-MMM-yyyy') It says Item sTotal cannot be found. I am new to SQL and am trying to learn, hence asking on this forum.
BrunoPigeon wrote:
I am new to SQL and am trying to learn, hence asking on this forum.
Ok there is something REALLY wrong with this. You are trying to learn SQL using the absolutely WRONG tools. As I said VB6 is dead, you will not get anything but bad memories from old farts who used to use it. Access is not a suitable learning platform for SQL it has some weird stuff unique to Access. Port your database to SQL Server (there is a clear migration path) and use the proper tools to learn TSQL. You are doing yourself a disservice continuing to use these tools as you will need to UNLEARN a lot of stuff. Besides there are a huge number of resources to help you with the current tool sets.
Never underestimate the power of human stupidity - RAH I'm old. I know stuff - JSOP
-
I appreciate the feedback. This is what is giving me headaches: Select distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate, Sum(SupplierInvoices.QTY) as lTotal from SupplierInvoices where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy') Union Select distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate, Sum(Sales.QTY) as sTotal from Sales where PLU = '" & lblPLU.Caption & "' and Date Between #" & StartTime & "# and #" & EndTime & "# Group by format(Sales.Date, 'dd-MMM-yyyy') It says Item sTotal cannot be found. I am new to SQL and am trying to learn, hence asking on this forum.
Have a look at my other comment where I explain what is going on. I'd also suggest that you get into the habit of formatting your SQL so that is is easier to read. Here's an example of a possible way of formatting your SQL:
Select
distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate,
Sum(SupplierInvoices.QTY) as lTotal
from SupplierInvoices
where PLU = '" & lblPLU.Caption & "'
and Date Between #" & StartTime & "# and #" & EndTime & "#
Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy')
Union
Select
distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate,
Sum(Sales.QTY) as sTotal
from Sales
where PLU = '" & lblPLU.Caption & "'
and Date Between #" & StartTime & "# and #" & EndTime & "#
Group by format(Sales.Date, 'dd-MMM-yyyy')“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
You are right, Guy. At this stage I don't fully understand SQL and am attempting queries out of my depth of understanding! Thank you for the encouragement.
Take it slowly and learn from the beginning - it's the classic thing of if you bite off more than you can at first chew you will be put off by it. If you are diligent, within a couple of weeks you will be able to solve these sorts of issues without too much help. Good luck!
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
BrunoPigeon wrote:
I am new to SQL and am trying to learn, hence asking on this forum.
Ok there is something REALLY wrong with this. You are trying to learn SQL using the absolutely WRONG tools. As I said VB6 is dead, you will not get anything but bad memories from old farts who used to use it. Access is not a suitable learning platform for SQL it has some weird stuff unique to Access. Port your database to SQL Server (there is a clear migration path) and use the proper tools to learn TSQL. You are doing yourself a disservice continuing to use these tools as you will need to UNLEARN a lot of stuff. Besides there are a huge number of resources to help you with the current tool sets.
Never underestimate the power of human stupidity - RAH I'm old. I know stuff - JSOP
:thumbsup: Excellent points. I learnt SQL using Access and basically I learnt nothing of use. Then when I picked up SQL Server and did the training courses, the world of SQL open up to me with its resplendent unicorn rainbows and... okay I am exaggerating a bit but I think you make some very good points in your comment.
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
You are right, Guy. At this stage I don't fully understand SQL and am attempting queries out of my depth of understanding! Thank you for the encouragement.
Maybe try something like this: SQL in 24 Hours, Sams Teach Yourself: Amazon.co.uk: Ryan Stephens, Arie D. Jones, Ron Plew: 9780672337598: Books[[^](https://www.amazon.co.uk/SQL-Hours-Sams-Teach-Yourself/dp/0672337592/ref=sr_1_1?
crid=2DRD3GTNWLWQD&keywords=sql+in+24+hours&qid=1554450027&s=gateway&sprefix=sql+in+24%2Caps%2C139&sr=8-1 "New Window")] The books can be a bit expensive but I have generally found that the series is a good introduction to any topic and you can usually get through all the exercises in a week.“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
Have a look at my other comment where I explain what is going on. I'd also suggest that you get into the habit of formatting your SQL so that is is easier to read. Here's an example of a possible way of formatting your SQL:
Select
distinct format(SupplierInvoices.Date, 'dd-MMM-yyyy') as tDate,
Sum(SupplierInvoices.QTY) as lTotal
from SupplierInvoices
where PLU = '" & lblPLU.Caption & "'
and Date Between #" & StartTime & "# and #" & EndTime & "#
Group by format(SupplierInvoices.Date, 'dd-MMM-yyyy')
Union
Select
distinct format(Sales.Date, 'dd-MMM-yyyy') as tDate,
Sum(Sales.QTY) as sTotal
from Sales
where PLU = '" & lblPLU.Caption & "'
and Date Between #" & StartTime & "# and #" & EndTime & "#
Group by format(Sales.Date, 'dd-MMM-yyyy')“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
I really appreciate all the things you said, Guy. Thanks a ton. I will dive into this this weekend and hopefully by Sunday, have a solution to my own question! Take care & thanks for your valuable input. Bruno
-
BrunoPigeon wrote:
I am new to SQL and am trying to learn, hence asking on this forum.
Ok there is something REALLY wrong with this. You are trying to learn SQL using the absolutely WRONG tools. As I said VB6 is dead, you will not get anything but bad memories from old farts who used to use it. Access is not a suitable learning platform for SQL it has some weird stuff unique to Access. Port your database to SQL Server (there is a clear migration path) and use the proper tools to learn TSQL. You are doing yourself a disservice continuing to use these tools as you will need to UNLEARN a lot of stuff. Besides there are a huge number of resources to help you with the current tool sets.
Never underestimate the power of human stupidity - RAH I'm old. I know stuff - JSOP
I know MyCroft! I am busy porting it over to MySQL but , GEEEEZ, alot must be changed in the code! But yes, I agree vb6 is dead. It's just that I have an old program I still support. So hanging in there on the last threads of vb6!! Thank you for your input - I really appreciate it. Bruno
-
I really appreciate all the things you said, Guy. Thanks a ton. I will dive into this this weekend and hopefully by Sunday, have a solution to my own question! Take care & thanks for your valuable input. Bruno
You're welcome. You will get there - good on you for bearing with things!
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
-
You're welcome. You will get there - good on you for bearing with things!
“That which can be asserted without evidence, can be dismissed without evidence.”
― Christopher Hitchens
Cheers, brother! I will. You will be the first to know.