At the beginning of your loop you are setting:
F("DAsc") = Asc(Left$(D("1"),1))
so your loop would never have the condition
Asc(Left$(D1("1"),1)) > F("DAsc")
because they are always equal.
--
Bill Palmer
Financial Systems Analyst
Mid-Columbia Medical Center
541-296-7417
>>> On 6/25/2010 at 11:54 AM, in message
<[email protected]> wrote:
> Normally I compile everything in Excel but the time allotted for this
> particular job is pretty short. In the next couple weeks I'll be focusing on
> an SQL connection so I don't have to run 2 or 3 reports to get all the data
> on one mnemonic and can access the info right in DR and skip the excel
> portion.
>
> To shorten my search times for the current job I set D.Record = D.Record - 20
> (With everything in alphabetic order there is no reason to start over each
> time) and to save searching all the way to the end of the record set I
> converted to ASCII and exited the routine when the searched values were
> greater than the source value.
>
> Like
>
> Do
> F("DAsc") = Asc(Left$(D("1"),1))
> F("D1Acs") = Asc(Left$(D1("1"),1))
> If F("DAsc") > F("D1Asc") then
> execute something
> end if.
> Loop
>
> I couldn't get things to function in my Do/Loop by using
>
> Loop until Asc(Left$(D1("1"),1)) > F("DAsc")
>
> Must have been missing something. But figuring out the SQL connection
> should eliminate most of this type of programming.
>
> Brian Bennett
> Affinity Health Systems
> Systems Analyst
> PBS\Clinic Billing
> (920)628-9055
> [email protected]
>
>
>
> ________________________________
> From: [email protected] [mailto:[email protected]]
> Sent: Friday, June 25, 2010 7:12 AM
> To: [email protected]
> Subject: RE: [talkbws] Search DataStation
>
> I use Monarch called from a BWS script to do this kind of "pre-processing". I
> have it export a file that I then use in datastation. This way all of the
> "external" work is done before ever connecting to Meditech.
>
>
>
> Stephen Breitenbach, MT(ASCP)
> Applications Analyst
> St. Joseph Medical Center
> 7601 Osler Drive
> Towson, MD 21204
> phone (410) 337-1948 FAX (410) 427-5432
> cell (443) 468-0555
> CONFIDENTIALITY NOTICE:
> This message contains information that may be confidential and privileged.
> Unless you are the intended addressee (or authorized to receive for the
> intended addressee), you may not use, copy, or disclose to anyone the message
> or any information contained in the message. If you have received the message
> in error, please advise the sender by reply e-mail and delete the message.
>
>
>
> ________________________________
> From: [email protected] [mailto:[email protected]]
> Sent: Friday, June 25, 2010 8:00 AM
> To: [email protected]
> Subject: [talkbws] Search DataStation
>
> I'm sure I've asked this before, but not finding anything, not recalling
> anything.
>
> Is there a way to search records in the datastation without hitting every
> record? I've got one datastation (D) with 5000+ records and another (D1)
> with 8400 records. I need to check D against D1. Currently I'm stepping
> through each record via Boston. I can do the same thing faster in VB, but is
> there a "Faster" way? I don't want to have Meditech time out on me while the
> datastations are being searched.
>
> Thanks.
>
> Brian Bennett
> Affinity Health Systems
> Systems Analyst
> PBS\Clinic Billing
> (920)628-9055
> [email protected]
>
>
>
> ________________________________
> CONFIDENTIALITY NOTICE: This e-mail communication and any attachments may
> contain confidential and privileged information for the use of the designated
> recipient(s) named above. If you are not the intended recipient, you are
> hereby notified that you have received this communication in error and that
> any review, disclosure, dissemination, distribution or copying of it or its
> contents is prohibited. If you have received this communication in error,
> please notify the sender at the electronic mail address noted above and
> destroy all copies of this communication and any attachments. Thank you for
> your cooperation.
>
>
> --- 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
>
> ________________________________
> CONFIDENTIALITY NOTICE: This e-mail communication and any attachments may
> contain confidential and privileged information for the use of the designated
> recipient(s) named above. If you are not the intended recipient, you are
> hereby notified that you have received this communication in error and that
> any review, disclosure, dissemination, distribution or copying of it or its
> contents is prohibited. If you have received this communication in error,
> please notify the sender at the electronic mail address noted above and
> destroy all copies of this communication and any attachments. Thank you for
> your cooperation.
>
> --- 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 e-mail message (including attachments)
is covered by the Electronic Communications Privacy Act, 18 U.S.C.
2510-2521, and is intended only for the person or entity to which it
is addressed and may contain confidential and/or privileged material.
Any unauthorized review, use, disclosure, dissemination, copying,
forwarding or distribution is prohibited. If you are not the intended
recipient, please contact the sender by reply e-mail and destroy all
copies of the original message. If you are the intended recipient but
do not wish to receive communication through this medium, please
advise the sender immediately.
--- 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
