I have a lot of problems with scripts not logging in to McKesson Star but it never occurred to me to build steps to allow for that. I'm going to give your script a try. Thanks!!
________________________________ From: [email protected] [mailto:[email protected]] Sent: Monday, January 17, 2011 12:39 PM To: [email protected] Subject: [talkbws] Intermittent timeouts on STAR character view login to AIX Greetings, We have a scheduled script connecting to McKesson STAR in character view that periodically times out during login to the AIX server. I added a timeout step to capture the cursor location and View() in an email. Boston is reporting the cursor location as @0,0 and View() is empty. A couple of weeks ago I called support and we added some timing loops after the launch of STAR Nav and the HBOWEM server. I've pasted the subroutine code below. I was wondering if any other STAR users have had intermittent login issues? Maybe a carriage return or two would help sync things up between STAR and the HBOWEM server before I start the login? Thanks, David Garcia Sr. Programmer/Analyst Washington Hospital Healthcare System 2000 Mowry Avenue Fremont, CA 94538 (510) 745-6477 Sub StartApps() Dim i As Integer Dim lw As New CListWindows 'If WEM is already open, close it If lw.HasCaptionLike("McKesson's Windows*").Count > 0 Then CloseApplication ("McKesson's Windows*") Wait 0.5 End If 'Launch WEM Shell "C:\Program Files\McKesson\STAR Navigator 15\HBOC32\McKWEM.exe Star", vbNormalFocus 'Wait 30 seconds for WEM to launch i = 0 Do While i < 30 And lw.HasCaptionLike("McKesson's Windows*").Count = 0 i = i + 1 Wait 1 Loop 'If the WEM server is already running, close it If lw.HasCaptionLike("HBOWEM Server:*").Count > 0 Then CloseApplication ("HBOWEM Server:*") Wait 0.5 End If 'Launch the WEM Server Shell_ "C:\Bss70\HBOWEMServer.exe Star" 'Wait 10 seconds for WEM server to start i = 0 Do While i < 10 And lw.HasCaptionLike("HBOWEM Server:*").Count = 0 i = i + 1 Wait 1 Loop Stable 1 End Sub --- 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 Confidentiality Notice: This email message, including any attachments, is for the sole use of the intended recipient(s), and may contain privileged or confidential information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please notify the sender of this email, and destroy all copies of the original message. --- 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
