INPUT TRANSFORM: S Z=$E($P(^SRF($S($D(SRTN):SRTN,1:DA(2)),0),"^",9),1,7),X=$S(X?1.4N.A!(X?1.2N1":"2N.A):Z_"@"_X,1:X) K %DT,Z S %DT="ERTX" D ^%DT S X=Y K:Y<1 X
LAST EDITED: DEC 08, 1993
HELP-PROMPT: Enter the DATE/TIME that the circulating nurse entered the OR.
DESCRIPTION:
Enter the date/time that this person's circulating role responsibilities began. Note: Both the date and time must be entered for this field.
PRE-LOOKUP: S Z=$E($P(^SRF($S($D(SRTN):SRTN,1:DA(2)),0),"^",9),1,7),X=$S(X?1.4N.A!(X?1.2N1":"2N.A):Z_"@"_X,1:X) K %DT,Z S %DT="RTX" D ^%DT S X=Y K:Y<1 X
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
INPUT TRANSFORM: S SRSUB=19,SRP=1 D OFF2^SROVAR S %DT="ERTX" D ^%DT S X=Y K:Y<1 X
OUTPUT TRANSFORM: X ^DD("DD")
LAST EDITED: JUN 01, 1993
HELP-PROMPT: Enter the date/time that the circulating role responsibilities ended.
DESCRIPTION:
This is the date and time that the circulating role responsibilities ended. Times entered without a date will be converted to the date of the operation at that time.
NOTES: XXXX--CAN'T BE ALTERED EXCEPT BY PROGRAMMER
HELP-PROMPT: Enter the code corresponding to the reason for relief.
DESCRIPTION: This is the reason why the circulating support person was relieved, or left the operating room during this case. Although optional, this information may be important in documenting the case.