ITEM |
-
- CareProviders
- SEQUENCE: 1
- ITEM TYPE: LIST
- ENTITY: VPR SIGNER
- LIST TYPE: ARRAY
- XML NAME: CareProvider
- GET ACTION: N X S X=$P($G(LR0),U,13) S:X DLIST(1)=X_"^V" ;verifier
-
- NationalTitle
- SEQUENCE: 4
- ITEM TYPE: ENTITY
- FILE NUMBER: 63.08
- ENTITY: VPR CODE TABLE
- GET ACTION: S VALUE=$S(LRSUB="CY":"26438-2^CYTOLOGY",LRSUB="EM":"50668-3^MICROSCOPY",1:"27898-6^PATHOLOGY")_" STUDIES^LOINC"
-
- NationalTitleSubject
- SEQUENCE: 8
- ITEM TYPE: ENTITY
- FILE NUMBER: 63.08
- ENTITY: VPR CODE TABLE
- GET ACTION: S VALUE="4697104^LABORATORY^VHAT"
-
- PatientLocation
- SEQUENCE: 10
- ITEM TYPE: ENTITY
- FILE NUMBER: 63.08
- FIELD NUMBER: .08
- ENTITY: VPR LOCATION
- OUTPUT TRANSFORM: S VALUE=$O(^SC("B",VALUE,0))
- GET ACTION: S VALUE=$P($G(LR0),U,8)
|