Counting the number of days in a parameter

[Halfcan]

Hello,

I need to count the number of days in the parameter choosen by the user.

I'm using a string variable, to list date ranges, and the select expert code chooses the exact date ranges based on the string selected in the param.

This is my select expert code:

{DeviceList.Date Added } <
Switch
(

{?Custom Date Range} = &quot;Year to Date&quot;,
YearToDate,
{?Custom Date Range} = &quot;Month to Date&quot;,
MonthToDate,
{?Custom Date Range} = &quot;Last Month&quot;,
LastFullMonth,
{?Custom Date Range} = &quot;All Dates To Today&quot;,
AllDatesToToday,
{?Custom Date Range} = &quot;Last Year&quot;,
CDate(Year(CurrentDate) - 1, 1, 1) To CDate(Year(CurrentDate) -1, 12, 31),

{?Custom Date Range} = &quot;1st Quarter 2002&quot;,
CDate(Year(CurrentDate) -1, 1, 1) To CDate(Year(CurrentDate) -1, 3, 31),

{?Custom Date Range} = &quot;2nd Quarter 2002&quot;,
CDate(Year(CurrentDate) -1, 4, 1) To CDate(Year(CurrentDate) -1, 6, 30),

{?Custom Date Range} = &quot;3rd Quarter 2002&quot;,
CDate(Year(CurrentDate) -1, 7, 1) To CDate(Year(CurrentDate) -1, 9, 30),

{?Custom Date Range} = &quot;4th Quarter 2002&quot;,
CDate(Year(CurrentDate) -1, 10, 1) To CDate(Year(CurrentDate) -1, 12, 31),

{?Custom Date Range} = 'January', Date(Year(CurrentDate),01,01) to
Date(Year(currentdate),01,31),

{?Custom Date Range} = 'February', Date(Year(currentdate),02,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),02,1))-1,


{?Custom Date Range} = 'March', Date(Year(currentdate),03,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),03,1))-1,


{?Custom Date Range} = 'April', Date(Year(currentdate),04,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),04,1))-1,

{?Custom Date Range} = 'May', Date(Year(currentdate),05,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),05,1))-1,


{?Custom Date Range} = 'June', Date(Year(currentdate),06,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),06,1))-1,


{?Custom Date Range} = 'July', Date(Year(currentdate),07,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),07,1))-1,


{?Custom Date Range} = 'August', Date(Year(currentdate),08,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),08,1))-1,


{?Custom Date Range} = 'September', Date(Year(currentdate),09,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),09,1))-1,


{?Custom Date Range} = 'October', Date(Year(currentdate),10,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),10,1))-1,


{?Custom Date Range} = 'November', Date(Year(currentdate),11,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate),11,1))-1,


{?Custom Date Range} = 'December' and Month(currentdate) <> 12, Date(Year(currentdate)-1,12,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate)-1,12,1))-1,

//Last year months

{?Custom Date Range} = 'January (lastyear)', Date(Year(CurrentDate) -1, 01,01) to
Date(Year(currentdate) -1, 01,31),

{?Custom Date Range} = 'February (lastyear)', Date(Year(currentdate) -1, 02,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 02,1))-1,


{?Custom Date Range} = 'March (lastyear)', Date(Year(currentdate) -1, 03,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 03,1))-1,


{?Custom Date Range} = 'April (lastyear)', Date(Year(currentdate) -1, 04,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 04,1))-1,

{?Custom Date Range} = 'May (lastyear)', Date(Year(currentdate) -1, 05,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 05,1))-1,


{?Custom Date Range} = 'June (lastyear)', Date(Year(currentdate) -1, 06,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 06,1))-1,


{?Custom Date Range} = 'July (lastyear)', Date(Year(currentdate) -1, 07,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 07,1))-1,


{?Custom Date Range} = 'August (lastyear)', Date(Year(currentdate) -1, 08,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 08,1))-1,


{?Custom Date Range} = 'September (lastyear)', Date(Year(currentdate) -1, 09,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 09,1))-1,


{?Custom Date Range} = 'October (lastyear)', Date(Year(currentdate) -1, 10,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 10,1))-1,


{?Custom Date Range} = 'November (lastyear)', Date(Year(currentdate) -1, 11,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate) -1, 11,1))-1,


{?Custom Date Range} = 'December (lastyear)', Date(Year(currentdate)-1,12,01)
to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate)-1,12,1))-1,

//{?Custom Date Range} = 'December (lastyear)' and Month(currentdate) <> 12, Date(Year(currentdate)-2,12,01)
//to dateadd(&quot;M&quot;,1, Date(Year(CurrentDate)-2,12,1))-1,



True, // provide default handling and specify a valid range
CDate(1899, 12, 30) To CDate(1899, 12, 30) )
*********************************************
Does anyone know how to generate the number of days the user is working with depending on the selection of the parameter?

V8.5
Thanks,

Andy

 

[Reebo99]

Have you tried the DateDiff function?
Reebo
Scotland (Going mad in the mist!)