All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================

Hi Tommy,

Here is an NPR report we have used from PCI.  It finds the last Inpatient visit 
and uses that patient in ADM.

I hope that helps out.

Good luck,

Brian Schmit
Sr. Programmer, Picis
Direct: 781 557 3315
Fax: 781 557 3140
100 Quannapowitt Parkway
Suite 405
Wakefield, MA 01880
[EMAIL PROTECTED]
www.picis.com

Please visit http://www.picis.com/services/technical/npr.asp# for additional 
information about our NPR Report Writing Trainings.

The information in this email is confidential and may be legally privileged. It 
is intended solely for the addressee. Access or use by any other person to this 
internet email is not authorized and may be unlawful. If you are not the 
intended recipient, please delete or destroy this email. If you do not wish to 
receive future emails from the sender, please reply directly to this email 
requesting you be removed from any mailing list.


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Tommy Finley
Sent: Monday, July 31, 2006 1:30 PM
To: [email protected]
Subject: [MEDITECH-L] link npr report in pci


All messages should be posted in plain text.  HTML will be converted to
attachments.    The meditech-l web site is MTUsers.com
======================================

MEDITECH.CUST.RPTS^Newton-Wellesley 
Hospital^NEW5.4^TEST.5.4.MIS^MSM.BMS^20060706^A^
@@VERSION:1
ADM.PAT.zcus.picis.bms.pci
@@PROC
ADM.PAT.zcus.picis.bms.pci
[EMAIL PROTECTED]
@@MACRO
ADM.PAT.zcus.picis.bms.pci.M.start.macro
0
ZZ%O(/X),
1
""^urn^DONE,
2
DO{-/ACCT[urn]^urn,
3
urn&@Not(DONE) IF{/ACCT[urn]|2'="ADM IN"'="DIS IN";urn^DONE}},
4
ZZ%O(/X),
5
DONE
@@RPT
Yzcus.picis.bms.pciADM.PATmainPCI 
TESTREG129266066adm.patient.fileNNNYN011Y
AT      755005851
MSM.BMSE
AT      813141768
MSM.BMSE
AT      831475710
MSM.BMSE
CI

F1
unit.number
unit.numbe10L
F2
acct.numberacct.number12L
F3
namename30L
FS1
urn
FS1SE1
EQ(DONE)(DONE)
FI10
101
FI113
122
FI128
303
L1
D
N1
AL START start.macro
P1
unit.numbe   acct.number_   name__________________________
T1
urnNONENASC
@@SCRN
Yzcus.picis.bms.pciADM.PATADM.PAT.zcus.picis.bms.pci2NN
CS
4648
P1
PCI TEST%Z.on.device
_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l

Reply via email to