STATUS OF ORDER (1022) OE/RR PRINT FIELDS (100.22)

Name	Value
NAME	STATUS OF ORDER
DEFAULT CAPTION	Status:
EXAMPLE ENTRY	p
VARIABLE	ORPSTAT
CODE FOR SETTING VARIABLE	S ORPSTAT=$P($G(^OR(100,+$G(ORIFN),8,+$G(OACTION),0)),"^",15) S:ORPSTAT="" ORPSTAT=$P($G(^OR(100,+$G(ORIFN),3)),"^",3) S:ORPSTAT'="" ORPSTAT=$P(^ORD(100.01,ORPSTAT,.1),"^")