Thanks.
Barb Stump
Applications Analyst III
Lima Memorial Health System
p: 419-998-4441
f: 419-998-4725
www.limamemorial.org<http://www.limamemorial.org>
====================================
Please do NOT send messages that ask "Please post to the list" These are useless messages that just waste the email server's resources. Instead, email the original requester and ask that they send you or post the results of their question.
To UNSUBSCRIBE, go to http://MTUSers.net
for information.
The meditech-l archives (and other tips) can be found at
http://mtusers.net/zarchives
Job opportunities in the Meditech community can be found at
http://mtusers.net/zjobs
This strips the string, however it does not test to see if PRN is a separate word, so if you have a job description of PRNOGNOSTICATOR, it will turn into OGNOSTICATOR
DO{L(STRING,"PRN")^p<L(STRING) STRING$p_(STRING%(p+2))^STRING}
If you want to make sure you only strip "<space>PRN" you could do that like this:
DO{L(STRING," PRN")^p<L(STRING) STRING$p_(STRING%(p+3))^STRING}
Joe Cocuzzo
Vice President
NPR Services
Iatric Systems, Inc.
Phone/Fax: (978) 805-4115
Email: mailto:Joe.C...@iatric.com
Web: http://www.iatric.com/
Iatric Systems is a leading provider of integrated software applications, interfaces and reporting solutions for hospitals and healthcare systems.
__________
I used this mostly for getting the facility for a given database : ie
@.db#1.
You can substitute the <n> with a variable to extract the token as
follows:
<string>#(n_"A")
Some pseudo code to check for the token PRN may be something as follows:
"blah blah blah PRN blah blah blah"^c.string.to.check,
0-1^n,
DO{n+1^n,c.string.to.check#(n_"A")^c.token IF{c.token="PRN"
@REMOVE.TOKEN.FROM.STRING}}
@REMOVE.TOKEN.FROM.STRING
I do not have code available to get the actual token removed from the
string but you get the overall picture.
James Purvins
Inland Northwest Health Services
(509) 232-8384
This e-mail and any attachments are confidential and may also be
privileged. If you are not the named recipient, or have otherwise
received this communication in error, please delete it from your inbox,
notify the sender immediately by replying to the message, and do not
disclose its contents to any other person, use the information for any
purpose or store or copy the information in any medium. Thank you for
your cooperation