Thank you everyone for the awesome information….I could not of course use everyone’s suggestions but I appreciate them all none the less….I’m am fairly new to BWS and seeing everyone’s ideas here on the list serve is a great benefit….
Thanks again!! Travis Hanson 618.288.5711 ext. 5862 From: [email protected] [mailto:[email protected]] Sent: Friday, May 15, 2009 9:02 AM To: [email protected] Subject: [talkbws] RE: NPR Report date parameters ? Here is some code I have used for dates. If Weekday(Now()) = 2 Then ' Monday ' Friday dtStart = Format(DateAdd("d", -3, Now()), "mmddyy") 'Sunday dtEnd = Format(DateAdd("d", -1, Now()), "mmddyy") Else dtStart = Format(DateAdd("d", -1, Now()), "mmddyy") dtEnd = dtStart End If ' Report start date first of last month dtStart = Format(DateAdd("m", -1, Now()), "mm" & "01" & "yy") ' Report end date last day of last month dtEnd = DateAdd("m", 1, Format(DateAdd("m", -1, Now()), "mm/" & "01" & "/yy")) dtEnd = Format(DateAdd("d", -1, dtEnd), "mmddyy") John Burdek Programmer Analyst Saint Clare's Health System 66 Ford Road Denville, NJ 07834 Phone: (973) 983-1532 Pager: (973) 259-2721 Fax: (973) 983-1530 [email protected] <mailto:[email protected]> ________________________________ From: [email protected] [mailto:[email protected]] Sent: Thursday, May 14, 2009 12:12 PM To: [email protected] Subject: [talkbws] RE: NPR Report date parameters ? Thanks for the info Paul….I appreciate your help!! Travis Hanson 618.288.5711 ext. 5862 From: [email protected] [mailto:[email protected]] Sent: Thursday, May 14, 2009 10:36 AM To: [email protected] Subject: [talkbws] RE: NPR Report date parameters ? Here is one way to accomplish what you are trying to do within BW. Although this is not clean as an experienced programmer would write it, it should work. Thanks! Paul Paul Brungardt Clinical Analyst HaysMedicalCenter PH: 785-623-2196 PG: 785-650-5989 ----------------------------------------------------------------------------------------------------------------------------------------------------- CURRENTDATE = Format(Date, "mmddyy") CURRENTMONTH = Left(CURRENTDATE, 2) CURRENTDAY = Mid(CURRENTDATE, 3, 2) CURRENTYEAR = Right(CURRENTDATE, 2) If CURRENTMONTH = "01" Then ENDMONTHDAY = "31" If CURRENTMONTH = "02" Then ENDMONTHDAY = "28" If CURRENTMONTH = "03" Then ENDMONTHDAY = "31" If CURRENTMONTH = "04" Then ENDMONTHDAY = "30" If CURRENTMONTH = "05" Then ENDMONTHDAY = "31" If CURRENTMONTH = "06" Then ENDMONTHDAY = "30" If CURRENTMONTH = "07" Then ENDMONTHDAY = "31" If CURRENTMONTH = "08" Then ENDMONTHDAY = "31" If CURRENTMONTH = "09" Then ENDMONTHDAY = "30" If CURRENTMONTH = "10" Then ENDMONTHDAY = "31" If CURRENTMONTH = "11" Then ENDMONTHDAY = "30" If CURRENTMONTH = "12" Then ENDMONTHDAY = "31" If CURRENTDAY < "16" Then REPORTSTARTDATE = CURRENTMONTH & "01" & CURRENTYEAR REPORTENDDATE = CURRENTMONTH & "15" & CURRENTYEAR End If If CURRENTDAY > "15" Then REPORTSTARTDATE = CURRENTMONTH & "16" & CURRENTYEAR REPORTSENDDATE = CURRENTMONTH & ENDMONTHDAY & CURRENTYEAR ----------------------------------------------------------------------------------------------------------------------------------------------------- ________________________________ From: [email protected] [mailto:[email protected]] Sent: Thursday, May 14, 2009 9:14 AM To: [email protected] Subject: [talkbws] NPR Report date parameters ? Good morning… I have a script that will run an NPR report that once completed will run on the 1st and 15th of every month. I need the script to be able to evaluate what day is it running and based from that, input either the 1st day of the month (05/01/09) to the 15th day of the month (05/15/09) if it’s being run on the 15th OR input the 16th (05/16/09) and the last day of the month (05/31/09) which of course will change month to month depending on what month it is if it’s being run on the 1st of the month… I’m kind of at a loss on how to accomplish this…Anyone will to share their thoughts or ideas on it? Thanks! Travis D. Hanson, Application Analyst Anderson Hospital 6800 State Route 162 Maryville, IL 62062 618.288.5711 ext 5862 [email protected] --- To post a message to this list, send mail to: [email protected] You are currently subscribed as: [email protected] Unsubscribe in the customer center on our website: http://www.bostonworkstation.com/customer_center/virtual_user_group_talk.aspx Nh֦zh+-ݙZF&b.\ &u#nzK{\R{.n+^r-gqz'y"m h +Z*'rr-gqznj[z+mjY DISCLAIMER: Saint Clare's Health System Confidentiality Notice: This e-mail and any accompanying documents may be confidential and/or legally privileged. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution or the taking of any action in reliance on the contents of this information is strictly prohibited. If you have received this e-mail in error, please notify the sender immediately by reply e-mail and delete the message and any attachments. Thank you. Nzˁ+陨Fʵb箷\&uj{םײʵrz)zעz+wzǂ֑
