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

Hi Roy

        What you have to do is cycle the events segment for the event following 
the
date and time of the charting and determine the location of the patient from
that record.  I Have a macro the cycles the event segment for multiple
pieces of information which is pated below.

        Create a report Z.zcus.npr
        Paste the code below into the report

        If you are a magic site then you may have to alter the variable names to
match how variables are named in your system.

        To use this macro the statement would be

        %Z.zcus.npr.M.get.event.info(ADM.PAT.urn,DATE,TIME,"event.location")

Hope this Helps
Ken

;Programmer : Ken MacPherson                 Date : March 11, 2004
;Purpose    : Cycle ADM.PAT Event Segment to determine historic patient
information
@SETUP,
@CYCLE.EFFECTIVE.DATES;

SETUP
A^ADM.PAT.urn,
B^DATE,
C^TIME,
D^REQUEST.FLAG,
%Z.date.text(DATE,"YND")^PARM.DATE,
%Z.time.text(TIME,"HM","S")^PARM.TIME,
PARM.DATE_PARM.TIME^PARM.DATE.TIME,
""^FOUND

CYCLE.EFFECTIVE.DATES
""^ADM.PAT.event.date,
""^BEST.DATE.TIME,
""^HOLD,
[EMAIL PROTECTED] @PROCESS.EFFECTIVE.DATE},
FOUND

NEXT.DATE
@Next(ADM.PAT.event.date,ADM.PAT.events)

PROCESS.EFFECTIVE.DATE
""^ADM.PAT.event.seq.no,
[EMAIL PROTECTED] @PROCESS.EFFECTIVE.EVENT}

NEXT.EVENT
@Next(ADM.PAT.event.seq.no,ADM.PAT.events)

PROCESS.EFFECTIVE.EVENT
[EMAIL PROTECTED];
   %Z.date.text(@ADM.PAT.event.eff.date,"YND")^EFF.DATE,
   %Z.time.text(@ADM.PAT.event.eff.time,"HM","S")^EFF.TIME,
   EFF.DATE_EFF.TIME^EFF.DATE.TIME,
   IF{(EFF.DATE.TIME>PARM.DATE.TIME)!(EFF.DATE.TIME<BEST.DATE.TIME);
      EFF.DATE.TIME^BEST.DATE.TIME,
      IF{REQUEST.FLAG="event.accom" @ADM.PAT.event.accom;
         REQUEST.FLAG="event.admit.doctor" @ADM.PAT.event.admit.doctor;
         REQUEST.FLAG="event.attend.doctor" @ADM.PAT.event.attend.doctor;
         REQUEST.FLAG="event.location" @ADM.PAT.event.location;
         REQUEST.FLAG="event.prim.care.doctor"
@ADM.PAT.event.prim.care.doctor;
         REQUEST.FLAG="event.room.rate.accom"
@ADM.PAT.event.room.rate.accom;
         REQUEST.FLAG="event.room" @ADM.PAT.event.room;
         REQUEST.FLAG="event.service" @ADM.PAT.event.service;
         REQUEST.FLAG="event.status" @ADM.PAT.event.status;
         REQUEST.FLAG="event.user" @ADM.PAT.event.user;
         REQUEST.FLAG="event.bed" @ADM.PAT.event.bed}^HOLD,
      IF{HOLD;FOUND}^FOUND}}

FIXED
@ADM.PAT.event.qualifiers="<FIXED>"


-----Original Message-----
From: [EMAIL PROTECTED]
[mailto:[EMAIL PROTECTED] Behalf Of Coutts Roy
Sent: Wednesday, August 16, 2006 3:21 PM
To: [EMAIL PROTECTED]
Subject: [MEDITECH-L] NPR - Show Where Patient Was Located At Time
OfDocumentation


Hey GroupÂ…
I'm kind of stumped on this one.  Not sure if it is a easy fix or not.
>From the DPM: NUR.PC.WORK
I am trying to get the patient's location at the time of charting.  For
example, patient was in ICU yesterday and they documented restraints and
then today the patient is in PCU and they document restraints.  I want
something similar to this:
Date      Patient     Restraint Location
08/15/06  John Smith  ICU
08/15/06  John Smith  PCU
Any ideas would be appreciated!!!


Roy Coutts, LPN

_______________________________________________
meditech-l mailing list
[email protected]
http://mtusers.com/mailman/listinfo/meditech-l

Reply via email to