All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
I've updated the attribute and macro on my site to remove the references
to /S.LAST.QUERY. Here are the changes based on the query NURRCPLAN7.
New attribute
IFE=IF{/[ANS%0,"NURRCPLAN7","M",1] 1;
IFE=%NUR.PAT.zcus.pgm.M.ct.gen(ANS,R,S,"","NURRCPLAN7"),1}
Macro
Change /S.LAST.QUERY^MIS.QUERY.mnemonic
to
E^MIS.QUERY.mnemonic
Moran, Michael wrote:
All messages should be posted in plain text. HTML will be converted to
attachments. The meditech-l web site is MTUsers.com
======================================
Hello L,
I'm using the macro I found on Double-T's website to pull canned
text into a Nursing customer-defined screen but since going LIVE with
5.5 I'm getting screen corruption and it won't work. I'm using the
following attribute to call the macro:
IFE=IF{/[ANS%0,"NURRCPLAN7","M",1] 1;
IFE=%NUR.PAT.zcus.pgm.M.ct.gen(ANS,R,S,""),1}
I changed it from the original:
IFE=IF{/[ANS%0,/S.LAST.QUERY,"M",1] 1;
IFE=%NUR.PAT.zcus.pgm.M.ct.gen(ANS,R,S,""),1}
I'm getting corruption where the last comment queries response field
inserts itself into the response field for the canned text (which is a
multiple - 9 display lines). The following is the first part of the
macro: (I think the /S.LAST QUERY is the problem)
A%0^ANS,
B^ROW,
C^COL,
D^MAX,
IF{ANS 1,
/S.LAST.QUERY^MIS.QUERY.mnemonic,
/patient^patient,@NUR.PAT.sex^/NUR.PAT.sex,
[EMAIL PROTECTED]'="Y" @W.err("Query "_MIS.QUERY.mnemonic_"
is not a multiple")
@CLEANUP,
@LOAD.TEXT,
@SETUP.FOR.EDITOR,
@CALL.MIS.TEXT.EDITOR,
@SAVE.TEXT}},
END;
SETUP.FOR.EDITOR
; Canned text will be put in [ ] format
;
"Y"^/MIS.GET.EVAL,
[EMAIL PROTECTED]"NUR"]^/MIS.GET.FLD,
[EMAIL PROTECTED](@NUR.TEXT.main)^/MIS.GET.TXT
Any help will be greatly appreciated!! Thanks....have a great
day....stay cool! - Mike
Michael T. Moran <mailto:[EMAIL PROTECTED]>
Application Manager
Information Technology
Quincy Medical Center
114 Whitwell Street
Quincy, MA 02169
(617)376-5455
<file://C:\Documents and Settings\mmora\Application
Data\Microsoft\Stationery\..\..\..\My Documents\LOGOCROP.JPG>
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l
