Sorry Typo...setting Asc(D("1") before the Do. But I think I see where my
mistake was, or would have been. :)
Brian Bennett
Affinity Health Systems
Systems Analyst
PBS\Clinic Billing
(920)628-9055
[email protected]
-----Original Message-----
From: [email protected] [mailto:[email protected]]
Sent: Friday, June 25, 2010 2:16 PM
To: [email protected]
Subject: RE: [talkbws] Search DataStation
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_ta
> lk.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_ta
> lk.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_ta
> lk.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
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
