Here is code that was done for me by I think his name is Rich, at Boston 
Software.  I need to run the report on the 15th of each month for the 1st thru 
the 14th and on the 1st of the month for the 15th thru the end of the previous 
month.  Hope this helps.

 

Sub Edit_Action(Optional dummy_ As String)

Dim strDate As String

If Day(Now) = 1 Then

strDate = Format(Month(DateAdd("m", -1, Now)), "0#") & "/15/" & Year(Now) & " 
00:00:00"

Tab_ Format(strDate, "yyyy-mm-dd hh:MM:ss")

Tab_

Tab_

Tab_

strDate = Format(DateAdd("d", -2, Now), "mm/dd/yyyy") & " 00:00:00"

Tab_ Format(strDate, "yyyy-mm-dd hh:MM:ss")

Tab_

Tab_

Tab_

Enter

Else

strDate = Month(Now) & "/01/" & Year(Now) & " 00:00:00"

Tab_ Format(strDate, "yyyy-mm-dd hh:MM:ss")

Tab_

Tab_

Tab_

strDate = Month(Now) & "/14/" & Year(Now) & " 00:00:00"

Tab_ Format(strDate, "yyyy-mm-dd hh:MM:ss")

Tab_

Tab_

Tab_

Enter

End If

End Sub

 

Joanne Barrett-Haramis 

Sr. Programmer /Analyst

Data Management and User Provisioning

Halifax Health - IT

386-254-4116 X 1115

E-Mail: [email protected] <mailto:[email protected]> 

Learn IT, Use IT, Love IT

 P please consider the environment before printing this email 

Electronic communications originating from or sent to Halifax Health are 
subject to monitoring and public inspection under ยง 119.07, Florida Statutes.  
This message and any attachments are the property of Halifax Health and are 
intended to be received only by the individuals or entities identified in the 
message.  If you have received this message in error, please take notice: 1) 
that any use, copying, printing, forwarding or distribution of this message in 
any form is strictly prohibited, and 2) please notify the Halifax Health 
Compliance Department at (386) 254-4278 and/or forward the message to 
[email protected], and please delete or destroy all copies of the message 
and any attachments.

________________________________

From: [email protected] [mailto:[email protected]] 
Sent: Thursday, May 14, 2009 10: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 



---
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

Reply via email to