Solved

calculate YTD based on end of month

Posted on 2015-02-09
7
108 Views
Last Modified: 2015-09-22
I have a query in sql that I am using via VB6.

esql = "SELECT SUM(Hours) from tblOrgHours where Month(activitydate) < " & SelectedMonth & " And ParticipantHour = 1 And AgencyID = " & AgencyID & " and Fiscal = " & Fiscal

Open in new window


the only problem I am having is that SelectedMonth needs to be the last day of that month.  so if SelectedMonth = 9 Then the selection needs to be adjusted to be 9/30 instead.  

How can I accomplish this?
0
Comment
Question by:al4629740
7 Comments
 
LVL 46

Assisted Solution

by:Martin Liss
Martin Liss earned 100 total points
ID: 40599659
Without knowing more about the structure of your table (and maybe not even then) I don't think I can help except to give you this which finds the last day in any month.

Dim dteAnyDate As Date
dteAnyDate = Now ' or any date
 
MsgBox Day(DateSerial(Year(dteAnyDate), Month(dteAnyDate) + 1, 1) - 1)

Open in new window

0
 

Author Comment

by:al4629740
ID: 40599722
Martin,

The variable that is passing through is the number of the month.  So if I have September, then SelectedMonth would be 9.

In your example, I don't need the year, since I have a fiscal already.  All I need is the last day of the month

Would it be

Day(DateSerial( SelectedMonth  + 1, 1) - 1)
0
 
LVL 48

Accepted Solution

by:
PortletPaul earned 400 total points
ID: 40599756
SELECT SUM(Hours) from tblOrgHours where Month(activitydate) < " & SelectedMonth

You are using the TSQL function MONTH() on  every row of data. that function returns an integer.

So I do not understand your question really.

What you should be doing is NOT USING month() see: sargable: Search ARGument ABLE
http://en.wikipedia.org/wiki/Sargable

Rules of thumb
Avoid applying functions on data values in a sql condition.
Avoid non-sargable predicates and replace them with sargable equivalents.

You should aim to NOT ALTER the (many rows of) DATA to suit your (single) parameter, instead do the reverse.
Alter the single parameter to suit the many rows of data.

So, if your parameter is 9, you need a routine that will give you the FIRST DAY of month 10
with the only wrinkle being if the parameter is 12 you need the FIRST DAY of month 1 and the year incremented however as you don't reveal how the financial year is established this might not be a problem.

Let's illustrate this:

assuming [activitydate] is date or datetime(2)

2014-09-01 is less than 2015-10-01
...
2014-09-30 is less than 2015-10-01

so you will be accurate by using less than (the first day of the next month)
0
Best Practices: Disaster Recovery Testing

Besides backup, any IT division should have a disaster recovery plan. You will find a few tips below relating to the development of such a plan and to what issues one should pay special attention in the course of backup planning.

 
LVL 48

Expert Comment

by:PortletPaul
ID: 40599763
by the way, if useful, in SQL Server, you can safely use a string in the form of YYYYMMDD to compare to dates/datetimes

e.g.
SELECT SUM(Hours) from tblOrgHours where activitydate < '20151001'

how you achieve this in VB I won't attempt to answer
0
 

Author Comment

by:al4629740
ID: 40599765
That is what I was just looking at also.  Good idea.  

Fiscal year is July1 to June30
0
 

Author Comment

by:al4629740
ID: 40599871
I ended up doing

If SelectedMonth >= 7 And SelectedMonth <= 12 Then
    YTDate = CDate(SelectedMonth & "/01/" & Fiscal3)
    YTDate = DateAdd("m", 1, YTDate)
    YTDate = DateAdd("d", -1, YTDate)
End If

If SelectedMonth >= 1 And SelectedMonth <= 6 Then
    YTDate = CDate(SelectedMonth & "/01/" & Fiscal)
    YTDate = DateAdd("m", 1, YTDate)
    YTDate = DateAdd("d", -1, YTDate)
End IfIf SelectedMonth >= 7 And SelectedMonth <= 12 Then
    YTDate = CDate(SelectedMonth & "/01/" & Fiscal3)
    YTDate = DateAdd("m", 1, YTDate)
    YTDate = DateAdd("d", -1, YTDate)
End If

If SelectedMonth >= 1 And SelectedMonth <= 6 Then
    YTDate = CDate(SelectedMonth & "/01/" & Fiscal)
    YTDate = DateAdd("m", 1, YTDate)
    YTDate = DateAdd("d", -1, YTDate)
End If

Open in new window

0
 
LVL 65

Expert Comment

by:Jim Horn
ID: 40988988
al - Not sure if this is where you were going with this question, but I just kicked out an article that deals specifically with Fiscal calendar planning --> SQL Server Calendar Table:  Fiscal Years.   Let me know if this helps you, and if yes please click on the 'Good Article' button and provide some feedback.  Thanks.
0

Featured Post

PRTG Network Monitor: Intuitive Network Monitoring

Network Monitoring is essential to ensure that computer systems and network devices are running. Use PRTG to monitor LANs, servers, websites, applications and devices, bandwidth, virtual environments, remote systems, IoT, and many more. PRTG is easy to set up & use.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

If you need to start windows update installation remotely or as a scheduled task you will find this very helpful.
This article shows gives you an overview on SQL Server 2016 row level security. You will also get to know the usages of row-level-security and how it works
Via a live example, show how to extract information from SQL Server on Database, Connection and Server properties
Viewers will learn how to use the SELECT statement in SQL to return specific rows and columns, with various degrees of sorting and limits in place.

856 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question