All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
(I'm forwarding this to the "L" as the first one was returned)
Cheryl,
Here is an IFE attribute that will default previous responses for a multiple
line query. It works well as long as you allow the user to enter through each
line in order to convert the group look-up mnemonics to the response. Be sure
to pay attention to the "Tweaks" that need to be made depending on the number
of lines displayed and the length of the response field.
IFE=IF{+/[ANS%0,"QUERY"]M[""];
IFE=""^ZX,
IFE=DO{+([EMAIL PROTECTED],"QUERY"]M
IFE=[ZX],ZV)^ZX ZV|0^/[ANS%0,"QUERY"]M[ZX]|0,
IFE=IF{ZX'>2 P(R-1+ZX,S,ZV|0:25L)^#}},
IFE=DO{ZX'>2 P(R-1+ZX,S," ":25)^#,ZX+1^ZX}},1
- Replace the QUERY with the desired query mnemonic whose responses are to
default.
- Change the two >2s in the last two lines to the number of lines in your
query.
- The two 25s in the last two lines should be changed to the length of your
query.
- You may replace the 1 at the end with to make the response default
and not be editable. (Only defaults the mnemonic if a group look-up query and
you skip.)
I did write a macro that I use to default previous responses that will display
the element name if found in the group look-up or will display free text
reponses typed into an Optional type query. Using this macro call in an IFE
attribute, you could skip the query but default appropriately. You would need
to change the macro call depending on where you wrote it in your system but I
left my documentation of the Macro Call because the arguments would still
apply. Here is the macro:
; This macro defaults the last query response element name or the optionally
; typed response if an OPTIONAL query type with Multiple lines.
; Used on IV Fluid CDS's for Medications
;
; ***PLEASE - DO NOT ALTER THIS MACRO WITHOUT DISCUSSING WITH KENNY WHITESIDE
FIRST!****
;
;Macro call: %MIS.zcus.nm.M.default.name.or.option(query,grmnemonic,ANS%0,#
resp.lines,
; R,S)X
;A= Current Query Mnemonic of Multi-line Query to default responses in.
;B=GROUP QUERY MNEMONIC
;C=ANS%0 (Probably don't need this since I'm extending the symbol table!)
;D=# of lines in query response
;E=R
;F=S
;G= **If calling responses from another query, place the query mnemonic from
the other
; query as argument G. Otherwise leave blank
A^DFTQUERY,
B^GRMNEMONIC,
C^ANS,
D^NUMLINES,
E^ZR,
F^ZS,
@SAVQUERY,
IF{+/[ANS,DFTQUERY]M[""];""^ZX,
DO{+([EMAIL PROTECTED],DFTQUERY]M[ZX],ZV)^ZX ZV|0^/[ANS,SAVQUERY]M[ZX]|0,
[EMAIL PROTECTED],ZV|0]^DR;ZV|0^DR},
IF{ZX'>NUMLINES P(ZR-1+ZX,ZS,DR:25L)^#}},
DO{ZX'>NUMLINES P(ZR-1+ZX,ZS," ":25)^#,ZX+1^ZX}};
SAVQUERY
IF{G G^SAVQUERY;DFTQUERY^SAVQUERY}
Good luck,
Kenny Whiteside
Kenny Whiteside BSN, RN
Patient Care Information Systems
Catawba Valley Medical Center
810 Fairgrove Church Road
Hickory, NC 28602
[EMAIL PROTECTED]
--- Begin Message ---
Cheryl,
Here is an IFE attribute that will default previous responses for a multiple
line query. It works well as long as you allow the user to enter through each
line in order to convert the group look-up mnemonics to the response. Be sure
to pay attention to the "Tweaks" that need to be made depending on the number
of lines displayed and the length of the response field.
IFE=IF{+/[ANS%0,"QUERY"]M[""];
IFE=""^ZX,
IFE=DO{+([EMAIL PROTECTED],"QUERY"]M
IFE=[ZX],ZV)^ZX ZV|0^/[ANS%0,"QUERY"]M[ZX]|0,
IFE=IF{ZX'>2 P(R-1+ZX,S,ZV|0:25L)^#}},
IFE=DO{ZX'>2 P(R-1+ZX,S," ":25)^#,ZX+1^ZX}},1
- Replace the QUERY with the desired query mnemonic whose responses are to
default.
- Change the two >2s in the last two lines to the number of lines in your
query.
- The two 25s in the last two lines should be changed to the length of your
query.
- You may replace the 1 at the end with to make the response default
and not be editable. (Only defaults the mnemonic if a group look-up query and
you skip.)
I did write a macro that I use to default previous responses that will display
the element name if found in the group look-up or will display free text
reponses typed into an Optional type query. Using this macro call in an IFE
attribute, you could skip the query but default appropriately. You would need
to change the macro call depending on where you wrote it in your system but I
left my documentation of the Macro Call because the arguments would still
apply. Here is the macro:
; This macro defaults the last query response element name or the optionally
; typed response if an OPTIONAL query type with Multiple lines.
; Used on IV Fluid CDS's for Medications
;
; ***PLEASE - DO NOT ALTER THIS MACRO WITHOUT DISCUSSING WITH KENNY WHITESIDE
FIRST!****
;
;Macro call: %MIS.zcus.nm.M.default.name.or.option(query,grmnemonic,ANS%0,#
resp.lines,
; R,S)X
;A= Current Query Mnemonic of Multi-line Query to default responses in.
;B=GROUP QUERY MNEMONIC
;C=ANS%0 (Probably don't need this since I'm extending the symbol table!)
;D=# of lines in query response
;E=R
;F=S
;G= **If calling responses from another query, place the query mnemonic from
the other
; query as argument G. Otherwise leave blank
A^DFTQUERY,
B^GRMNEMONIC,
C^ANS,
D^NUMLINES,
E^ZR,
F^ZS,
@SAVQUERY,
IF{+/[ANS,DFTQUERY]M[""];""^ZX,
DO{+([EMAIL PROTECTED],DFTQUERY]M[ZX],ZV)^ZX ZV|0^/[ANS,SAVQUERY]M[ZX]|0,
[EMAIL PROTECTED],ZV|0]^DR;ZV|0^DR},
IF{ZX'>NUMLINES P(ZR-1+ZX,ZS,DR:25L)^#}},
DO{ZX'>NUMLINES P(ZR-1+ZX,ZS," ":25)^#,ZX+1^ZX}};
SAVQUERY
IF{G G^SAVQUERY;DFTQUERY^SAVQUERY}
Good luck,
Kenny Whiteside
Kenny Whiteside BSN, RN
Patient Care Information Systems
Catawba Valley Medical Center
810 Fairgrove Church Road
Hickory, NC 28602
[EMAIL PROTECTED]
>>> "TOOMEY, CHERYL" <[EMAIL PROTECTED]> 09/27/2006 1:33:29 PM >>>
All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
In search of a DFT attribute -
We use the following attribute to default the previous response to a
query. It doesn't work for multiples. Does anyone have an attribute
that recalls the last query value of a multiple type query?
[EMAIL PROTECTED]@t.ADM.PAT.urn,"NURQUERY"]
Cheryl Toomey MHA, RN BC
Clinical Informatics Specialist
Milford Regional Medical Center
Milford, MA 01757
vm (508) 422-2449
[EMAIL PROTECTED]
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
Header
Description: Binary data
--- End Message ---
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
