| Name | Value |
|---|---|
| PRINT FIELD | SERVICE CONNECTED |
| MUMPS CODE TO SET VARIABLE | S RTDPT=$P($P(RT0,"^"),";",2)="DPT(",RTV(RTJ)="Unknown" Q:'RTDPT S Y=$S($D(^DPT(+RT0,.3)):$P(^(.3),"^",1),1:""),C=$P(^DD(2,.301,0),"^",2) D Y^DIQ S RTV(RTJ)=$S(Y]"":Y,1:"Unknown") K RTDPT,Y,C |
| TYPE OF LABEL | RECORD or REQUEST |
| DEFAULT TITLE | SC: |
| TEST VALUE | NO |
| INTERNAL VARIABLE | RTV(14) |
| PARENT FILE |
|