| 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)
 
 
 
 |