| Name | Value |
|---|---|
| NAME | PROCEDURE/CONSULT TYPE |
| EXAMPLE ENTRY | Catheterization |
| VARIABLE | ORPCPROC |
| PACKAGE RESTRICTION | CONSULT/REQUEST TRACKING |
| CODE FOR SETTING VARIABLE | S ORPK=$S($D(^OR(100,$G(ORIFN),4)):^(4),1:""),ORPCPROC="" I $D(^GMR(123,+ORPK,0)),$D(^ORD(101,+$P(^GMR(123,+ORPK,0),U,8),0)) S ORPCPROC=$P(^(0),U,2) |