The text files are old reports I have saved or written at other facilities.
-----Original Message----- From: [email protected] [mailto:[EMAIL PROTECTED] On Behalf Of Gary Ring Sent: Friday, January 19, 2007 6:37 AM To: Benoy, Marc; [email protected] Subject: Re: [MEDITECH-L] NPR - Location, Room, Bed During Patient's Stay Marc: You could write this report out of B/AR, as the module does contain the Location and Room/Bed info. However, it won't have an audit trail of every room that a patient was in during their stay; it will only have the Location/Room/Bed that the patient was occupying at the time of discharge. Gary J. Ring Strategic Resource Group, Inc. 978-807-1573 ---- Original message ---- >Date: Mon, 15 Jan 2007 10:04:14 -0500 >From: "Benoy, Marc" <[EMAIL PROTECTED]> >Subject: [MEDITECH-L] NPR - Location, Room, Bed During Patient's Stay >To: <[email protected]> > >Hello all, > >I have been asked to write a report that pulls all the patients between a certain date range and their respective locations, rooms, and beds that they have occupied. > >Do you have a similar report that you are willing to share? > >Or how would I approach this report? > >Problems: >1. I believe I cannot write this report in ADM, since the date range may be further then 60 days in the past (where we loose the data for the rooms and beds). However, ABS does not keep the room and bed data either. > >Thanks, > >Marc > >Marc Benoy RN, MS, MBA >Clinical IT Project Leader RN >301.552.8876 (Phone) >301.552.8181 (Fax) >[EMAIL PROTECTED] > >Doctors Community Hospital >8118 Good Luck Road >Lanham, MD 20706 > >Magic 5.4(LIVE) & 5.61(TEST) > >CONFIDENTIALITY STATEMENT: This communication, including attachments, is for the exclusive use of addressee and may contain proprietary, confidential or privileged information. If you are not the intended recipient, you are hereby notified that any disclosure, use, copying, dissemination, distribution or taking of any action in reliance on the content of this information is strictly prohibited. If you are not the intended recipient, please notify the sender immediately by return email and delete this communication and destroy all copies. Thank you. >________________>TNEF12301.rtf (2k bytes) >________________>=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= >To subscribe or unsubscribe to the meditech-l, visit MTUsers.COM. > >To check the status of the meditech-l, visit MTUsers.NET. > >For help, email [EMAIL PROTECTED] >______________________________________ >meditech-l mailing list >[email protected] >http://mtusers.com/mailman/listinfo/meditech-l =*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= To subscribe or unsubscribe to the meditech-l, visit MTUsers.COM. To check the status of the meditech-l, visit MTUsers.NET. For help, email [EMAIL PROTECTED] ______________________________________ meditech-l mailing list [email protected] http://mtusers.com/mailman/listinfo/meditech-l ********************************************************************** This email and any files transmitted with it are confidential and intended solely for the use of the individual or entity to whom they are addressed. This footnote also confirms that this email message has been swept by Sophos and MIMEsweeper for the presence of computer viruses. **********************************************************************
E&l1O(8U(s0p20.000h4102T)10U)s0p20.000h4102T&k6.000H&l5.647c4e66F&a6L
REPORT LIST
PAGE 1
RUN ON 09/08/99-1059
KYC.LIVE.MIS
ABS.PAT.zcus.mty.patient.in.what.beds
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SCREEN: zcus.mty.patient.in.what.beds OK PROMPT :
%Z.on.device Type: 2
TITLE : PATIENT BED HISTORY EXIT LOGIC:
Data segment:
COLOR
LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9-+
Sections 1
1 |Enter Name: @1
|
+--------------------------------------------------------------------------------------------+
1=c.name
REQ=1
IFE=1
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
REPORT: ABS.PAT.zcus.mty.patient.in.what.beds CPI=12 CPL=92 LPI=6 LPG=60
PGSZ=66 MARG=0 BAN=REG
TYPE LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9-+
|RUN DATE: mm/dd/yy HOSPITAL NAME
PAGE n |
|RUN TIME: hhmm PATIENT BED HISTORY
|
HP 1 |
|
HP 2 | Patient:
xx.name_______________________ |
HP 3 |
|
HP 4 | Room: Bed: Unit # Admit Date:
Discharge Date: |
HP 5 |
|
D 6 | xx. be unit.numbe adm.date
dis.date |
D 7 |
|
+--------------------------------------------------------------------------------------------+
LINE ATTRIBUTES
---- ----------
1 BX = GRAY
2 PF = b
3 BX = WHITE
FIELDS
------
1 xx.name = xx.name [DAT=FREE, JFY=L, LEN=30, VAL=c.name]
4 unit.numbe = unit.number
2 xx. = xx.room [DAT=FREE, JFY=L, LEN=3, [EMAIL PROTECTED]
5 adm.date = adm.date
3 be = bed [LEN=2]
6 dis.date = dis.date
DETAIL SEGMENT: ABS.PAT abs.pat
INDEX FILE: ABS.PAT abs.pat.name.x
SORT FIELDS PRODUCED BY DETAIL SEGMENT/INDEX FILE
1 name
2 urn
# SELECT OP PROMPT/VALUE
DEFAULT/KEYWORD
-------- -- ------------
---------------
1 name EQ Enter Name:
2 room NE ""
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
(CONTINUED)
REPORT LIST
PAGE 2
RUN ON 09/08/99-1059
KYC.LIVE.MIS
ABS.PAT.zcus.mty.patient.in.what.beds {continued}
EE%-12345XE&l1O(8U(s0p20.000h4102T)10U)s0p20.000h4102T&k6.000H&l5.647c4e66F&a6L
REPORT LIST
PAGE 1
RUN ON 09/08/99-1057
KYC.LIVE.MIS
ABS.PAT.zcus.mty.past.bed.occupant
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SCREEN: zcus.mty.past.bed.occupant OK PROMPT :
%Z.on.device Type: 2
TITLE : PAST BED OCCUPANTS EXIT LOGIC:
Data segment:
COLOR
LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9-+
Sections 1,2,3
1 |Enter a Date: @1
|
2 |
|
3 |Enter a Room: @2
|
4 |
|
5 |Enter a Bed: @3
|
+--------------------------------------------------------------------------------------------+
1=b.adm.date
REQ=1
IFE=1
3=c.bed
REQ=1
IFE=1
2=c.room
REQ=1
IFE=1
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
REPORT: ABS.PAT.zcus.mty.past.bed.occupant CPI=12 CPL=92 LPI=6 LPG=60
PGSZ=66 MARG=0 BAN=REG
TYPE LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9-+
|RUN DATE: mm/dd/yy HOSPITAL NAME
PAGE n |
|RUN TIME: hhmm PAST BED OCCUPANTS
|
HP 1 |
|
HP 2 | Room and Bed:xx.-xx
|
HP 3 |
|
HP 4 | PATIENT NAME: ACCT # UNIT #
DISCHARGE DATE |
HP 5 |
|
D 6 | name__________________________ account.numb unit.numbe
dis.date |
D 7 |
|
+--------------------------------------------------------------------------------------------+
LINE ATTRIBUTES
---- ----------
1 BX = GRAY
2 PF = b
3 BX = WHITE
FIELDS
------
1 xx. = xx.room [DAT=FREE, JFY=L, LEN=3, VAL=c.room%1]
4 account.numb = account.number
2 xx = xx.bed [DAT=FREE, JFY=L, LEN=2, VAL=c.bed]
5 unit.numbe = unit.number
3 name = name
6 dis.date = dis.date
(CONTINUED)
REPORT LIST
PAGE 2
RUN ON 09/08/99-1057
KYC.LIVE.MIS
ABS.PAT.zcus.mty.past.bed.occupant {continued}
DETAIL SEGMENT: ABS.PAT abs.pat
INDEX FILE:
SORT FIELDS AS MODIFIED BY USER
1 name
2 urn
# SELECT OP PROMPT/VALUE
DEFAULT/KEYWORD
-------- -- ------------
---------------
1 adm.date GE Enter a Date:
2 room EQ Enter a Room:
3 bed EQ Enter a Bed:
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
EE%-12345XE&l1O(8U(s0p20.000h4102T)10U)s0p20.000h4102T&k6.000H&l5.647c4e66F&a6L
REPORT LIST
PAGE 1
RUN ON 10/02/99-2259
LIVE.MIS
ADM.PAT.zcus.bm.bed.hx
--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
SCREEN: zcus.bm.bed.hx OK PROMPT :
%Z.on.device Type: 2
TITLE : BED HISTORY EXIT LOGIC:
Data segment:
COLOR
LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9-+
Sections 2,3,6
1 |FROM DATE @2
|
2 |THRU DATE @3
|
3 |
|
4 |ROOM @6
|
+--------------------------------------------------------------------------------------------+
2=b.date
REQ=1
IFE=1
6=c.event.room
REQ=1
IFE=1
3=e.date
REQ=1
IFE=1
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
REPORT: ADM.PAT.zcus.bm.bed.hx CPI=12 CPL=100 LPI=6 LPG=60
PGSZ=66 MARG=0 BAN=REG
TYPE LN
+----------1---------2---------3---------4---------5---------6---------7---------8---------9---------+
|RUN DATE: mm/dd/yy HOSPITAL NAME
PAGE n |
|RUN TIME: hhmm BED HISTORY
|
HP 1 |
|
HP 2 | STATUS ACC# EVENT CODE OLD ROOM/BED NEW ROOM/BED
DATE TIME |
HP 3 |
|
D 4 | sta acct.number_ event.code eve-ev eve-ev
event.ef even |
TR 5 |
|
TR 6 |
xx.rpt_____________________________ |
+----------------------------------------------------------------------------------------------------+
LINE ATTRIBUTES
---- ----------
1 BX = GR
FF = b
PF = b
3 BX = WHITE
FF = n
FIELDS
------
1 sta = status.type
9 even = event.eff.time
2 acct.number = acct.number
10 xx.rpt = xx.rpt [DAT=FREE, JFY=L, LEN=35,
VAL=/R.NEW.PAGE.PGM]
3 event.code = event.code
11 S = xx.select [DAT=FREE, JFY=L, LEN=1,
4 eve = event.old.room [LEN=3]
VAL=IF{(@event.code^EVC="ENADMIN")!(EVC="TFRADMIN")!(EVC="ENADMOB")!(EVC="SWAPADM
5 ev = event.old.bed [LEN=2]
IN") 1;""}]
6 eve = event.room [LEN=3]
12 x = xx.select2 [DAT=FREE, JFY=L, LEN=1,
7 ev = event.bed [LEN=2]
VAL=IF{(([EMAIL PROTECTED])!([EMAIL
PROTECTED])) 1;""}]
8 event.ef = event.eff.date
(CONTINUED)
REPORT LIST
PAGE 2
RUN ON 10/02/99-2300
LIVE.MIS
ADM.PAT.zcus.bm.bed.hx {continued}
DETAIL SEGMENT: ADM.PAT adm.pat.events
INDEX FILE: ADM.PAT adm.pat.registration.index
SORT FIELDS PRODUCED BY DETAIL SEGMENT/INDEX FILE
1 facility
2 status.type
3 date
4 time
5 urn
6 event.date
7 event.seq.no
# SELECT OP PROMPT/VALUE
DEFAULT/KEYWORD
-------- -- ------------
---------------
1 facility EQ "EDW"
2 date GE FROM DATE
3 date LE THRU DATE
4 xx.select EQ "1"
5 status.type EQ "IN"
6 event.room IG ROOM
7 xx.select2 EQ "1"
------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------
EE%-12345X=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*= To subscribe or unsubscribe to the meditech-l, visit MTUsers.COM. To check the status of the meditech-l, visit MTUsers.NET. For help, email [EMAIL PROTECTED] ______________________________________ meditech-l mailing list [email protected] http://mtusers.com/mailman/listinfo/meditech-l
