| IN |
When a user selects to review progress notes through
OE/RR, one possible action to take is to select a new patient to review notes
for. Rather than have the user return to the original patient upon exiting to
OE/RR, I am using a call to D IN^OR to handle selecting a new patient; this
call selects a new patient and updates all needed OR variables as well.
As this piece of code requires ORVP be defined, I have placed a screen on
the selection of the protocol that invokes this code from the Progress Notes
review screen: I +XQORNOD(0),$D(ORVP) This eliminates the potential for a
user to "^^"-jump to the review screen and error out of the program because
ORVP was not defined. (The first piece of XQORNOD(0) holds the IFN of the
selected protocol unless it was "^^"-jumped to.)
|
