Wrox Programmer Forums
|
BOOK: Beginning VB.NET Databases
This is the forum to discuss the Wrox book Beginning VB.NET Databases by Thearon Willis; ISBN: 9780764568008
Welcome to the p2p.wrox.com Forums.

You are currently viewing the BOOK: Beginning VB.NET Databases section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
 
Old December 3rd, 2005, 03:58 PM
Registered User
 
Join Date: Oct 2005
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default Conversion to 7 day week.

I'm in the process of converting 5 day week to 7 day week. I have modified the form to reflect 7 days and it appears to work, however in returning the dataset it returns 16 instances of project, instead of 4. For instance it would have 4 rows for Vacation, 4 rows for Sick Days, etc. Anyone have any ideas?

Here is my modified stored procedure.

ALTER PROCEDURE usp_SelectTimeSheet
(
   @UserID UNIQUEIDENTIFIER,
   @WeekEndingDate DATETIME
)
AS
-- Select the TimeSheetID, Submitted, ProjectID and ProjectName
SELECT TimeSheets.TimeSheetID, Submitted, Projects.ProjectID, ProjectName,
  -- Select the TimeSheetItemID and Hours for Sunday
   Sunday.TimeSheetItemID AS SundayTimeSheetItemID,
   Sunday.Hours AS SundayHours,
   -- Select the TimeSheetItemID and Hours for Monday
   Monday.TimeSheetItemID AS MondayTimeSheetItemID,
   Monday.Hours AS MondayHours,
   -- Select the TimeSheetItemID and Hours for Tuesday
   Tuesday.TimeSheetItemID AS TuesdayTimeSheetItemID,
   Tuesday.Hours AS TuesdayHours,
   -- Select the TimeSheetItemID and Hours for Wednesday
   Wednesday.TimeSheetItemID AS WednesdayTimeSheetItemID,
   Wednesday.Hours AS WednesdayHours,
   -- Select the TimeSheetItemID and Hours for Thursday
   Thursday.TimeSheetItemID AS ThursdayTimeSheetItemID,
   Thursday.Hours AS ThursdayHours,
   -- Select the TimeSheetItemID and Hours for Friday
   Friday.TimeSheetItemID AS FridayTimeSheetItemID,
   Friday.Hours AS FridayHours,
   -- Select the TimeSheetItemID and Hours for Saturday
   Saturday.TimeSheetItemID AS SaturdayTimeSheetItemID,
   Saturday.Hours AS SaturdayHours
-- TimeSheets is the main table
FROM TimeSheets
-- Join TimeSheetItems table for Sunday's data
LEFT OUTER JOIN TimeSheetItems Sunday ON
   TimeSheets.TimeSheetID = Sunday.TimeSheetID
   AND Sunday.TimeSheetDate = DATEADD(day,-6,@WeekEndingDate)
-- Join Projects table for Project names
LEFT OUTER JOIN Projects ON
   Sunday.ProjectID = Projects.ProjectID
-- Join TimeSheetItems table for Monday's data
LEFT OUTER JOIN TimeSheetItems Monday ON
   TimeSheets.TimeSheetID = Monday.TimeSheetID
   AND Monday.TimeSheetDate = DATEADD(day,-5,@WeekEndingDate)
-- Join Projects table for Project names
--LEFT OUTER JOIN Projects ON
-- Monday.ProjectID = Sunday.ProjectID
-- Join TimeSheetItems table for Tuesday's data
LEFT OUTER JOIN TimeSheetItems Tuesday ON
   TimeSheets.TimeSheetID = Tuesday.TimeSheetID
   AND Tuesday.ProjectID = Monday.ProjectID
   AND Tuesday.TimeSheetDate = DATEADD(day,-4,@WeekEndingDate)
-- Join TimeSheetItems table for Wednesday's data
LEFT OUTER JOIN TimeSheetItems Wednesday ON
   TimeSheets.TimeSheetID = Wednesday.TimeSheetID
   AND Wednesday.ProjectID = Monday.ProjectID
   AND Wednesday.TimeSheetDate = DATEADD(day,-3,@WeekEndingDate)
-- Join TimeSheetItems table for Thursday's data
LEFT OUTER JOIN TimeSheetItems Thursday
   ON TimeSheets.TimeSheetID = Thursday.TimeSheetID
   AND Thursday.ProjectID = Monday.ProjectID
   AND Thursday.TimeSheetDate = DATEADD(day,-2,@WeekEndingDate)
-- Join TimeSheetItems table for Friday's data
LEFT OUTER JOIN TimeSheetItems Friday ON
   TimeSheets.TimeSheetID = Friday.TimeSheetID
   AND Friday.ProjectID = Monday.ProjectID
   AND Friday.TimeSheetDate = DATEADD(day,-1,@WeekEndingDate)
-- Join TimeSheetItems table for Saturday's data
LEFT OUTER JOIN TimeSheetItems Saturday ON
   TimeSheets.TimeSheetID = Saturday.TimeSheetID
   AND Saturday.ProjectID = Monday.ProjectID
   AND Saturday.TimeSheetDate = @WeekEndingDate
-- Search criteria is the WeekEndingDate and UserID
WHERE WeekEndingDate = @WeekEndingDate
   AND UserID = @UserID
-- Order the results by the SequenceNumber of the projects
ORDER BY SequenceNumber

    RETURN










Similar Threads
Thread Thread Starter Forum Replies Last Post
getting the same day of the week. crabjoe Classic ASP Basics 3 February 27th, 2008 12:45 PM
DAY of the week wdepreter Excel VBA 3 February 7th, 2007 06:44 AM
Day of week finder mrjaygreene Classic ASP Basics 6 May 13th, 2006 04:43 PM





Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
Copyright (c) 2020 John Wiley & Sons, Inc.